AB_USER *AB_Banking_CreateUser(AB_BANKING *ab, const char *backendName) {
AB_USER *u;
AB_PROVIDER *pro;
uint32_t uid;
int rv;
assert(ab);
pro=AB_Banking_GetProvider(ab, backendName);
if (!pro) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Backend \"%s\" not found", backendName);
return 0;
}
u=AB_User_new(ab);
AB_User_SetBackendName(u, AB_Provider_GetName(pro));
uid=AB_Banking_GetUniqueId(ab);
assert(uid);
AB_User_SetUniqueId(u, uid);
rv=AB_Provider_ExtendUser(pro, u, AB_ProviderExtendMode_Create, NULL);
if (rv) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error extending user (%d)", rv);
AB_User_free(u);
return 0;
}
return u;
}
void AB_Banking_ActivateAllProviders(AB_BANKING *ab) {
GWEN_PLUGIN_DESCRIPTION_LIST2 *descrs;
GWEN_PLUGIN_MANAGER *pm;
pm=GWEN_PluginManager_FindPluginManager("provider");
if (!pm) {
DBG_ERROR(AQBANKING_LOGDOMAIN,
"Could not find plugin manager for \"%s\"",
"provider");
return;
}
descrs=GWEN_PluginManager_GetPluginDescrs(pm);
if (descrs) {
GWEN_PLUGIN_DESCRIPTION_LIST2_ITERATOR *it;
GWEN_PLUGIN_DESCRIPTION *pd;
it=GWEN_PluginDescription_List2_First(descrs);
assert(it);
pd=GWEN_PluginDescription_List2Iterator_Data(it);
assert(pd);
while(pd) {
const char *pname=GWEN_PluginDescription_GetName(pd);
AB_PROVIDER *pro;
pro=AB_Banking_GetProvider(ab, pname);
if (!pro) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Could not load backend \"%s\", ignoring", pname);
}
else {
GWEN_StringList_AppendString(ab->activeProviders, pname, 0, 1);
}
pd=GWEN_PluginDescription_List2Iterator_Next(it);
} /* while */
GWEN_PluginDescription_List2Iterator_free(it);
GWEN_PluginDescription_List2_freeAll(descrs);
}
}
int APY_NewUserDialog_DoIt(GWEN_DIALOG *dlg) {
APY_NEWUSER_DIALOG *xdlg;
AB_USER *u;
int rv;
uint32_t pid;
AB_PROVIDER *pro;
DBG_INFO(0, "Doit");
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, APY_NEWUSER_DIALOG, dlg);
assert(xdlg);
pro=AB_Banking_GetProvider(xdlg->banking, "aqpaypal");
if (pro==NULL) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not find backend, maybe some plugins are not installed?");
// TODO: show error message
return GWEN_DialogEvent_ResultHandled;
}
DBG_INFO(0, "Creating user");
u=AB_Banking_CreateUser(xdlg->banking, "aqpaypal");
if (u==NULL) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not create user, maybe backend missing?");
// TODO: show error message
return GWEN_DialogEvent_ResultHandled;
}
/* generic setup */
AB_User_SetUserName(u, xdlg->userName);
AB_User_SetUserId(u, xdlg->userId);
AB_User_SetCustomerId(u, xdlg->userId);
AB_User_SetCountry(u, "de");
AB_User_SetBankCode(u, "PAYPAL");
APY_User_SetServerUrl(u, xdlg->url);
APY_User_SetHttpVMajor(u, xdlg->httpVMajor);
APY_User_SetHttpVMinor(u, xdlg->httpVMinor);
DBG_INFO(0, "Adding user");
rv=AB_Banking_AddUser(xdlg->banking, u);
if (rv<0) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not add user (%d)", rv);
AB_User_free(u);
return GWEN_DialogEvent_ResultHandled;
}
pid=GWEN_Gui_ProgressStart(GWEN_GUI_PROGRESS_DELAY |
GWEN_GUI_PROGRESS_ALLOW_EMBED |
GWEN_GUI_PROGRESS_SHOW_PROGRESS |
GWEN_GUI_PROGRESS_SHOW_ABORT,
I18N("Setting Up Paypal User"),
I18N("The user will be created."),
3,
0);
/* lock new user */
DBG_INFO(0, "Locking user");
rv=AB_Banking_BeginExclUseUser(xdlg->banking, u);
if (rv<0) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not lock user (%d)", rv);
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Unable to lock users"));
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
#if 0
DBG_INFO(0, "Getting certs (%08x)", AH_User_GetFlags(u));
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Notice,
I18N("Retrieving SSL certificate"));
rv=APY_Provider_GetCert(pro, u, 0, 1, 0);
if (rv<0) {
// TODO: retry with SSLv3 if necessary
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
rv=GWEN_Gui_ProgressAdvance(pid, GWEN_GUI_PROGRESS_ONE);
if (rv==GWEN_ERROR_USER_ABORTED) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQPAYPAL_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Aborted by user."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
#endif
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Notice,
I18N("Creating API credentials file"));
rv=APY_User_SetApiSecrets(u, xdlg->apiPassword, xdlg->apiSignature, xdlg->apiUserId);
if (rv<0) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQPAYPAL_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Aborted by user."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
/* unlock user */
DBG_INFO(0, "Unlocking user");
rv=AB_Banking_EndExclUseUser(xdlg->banking, u, 0);
if (rv<0) {
DBG_INFO(AQPAYPAL_LOGDOMAIN,
"Could not unlock user [%s] (%d)",
AB_User_GetUserId(u), rv);
GWEN_Gui_ProgressLog2(pid,
GWEN_LoggerLevel_Error,
I18N("Could not unlock user %s (%d)"),
AB_User_GetUserId(u), rv);
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
if (1) {
AB_ACCOUNT *account;
int rv;
static char accountname[256];
account=AB_Banking_CreateAccount(xdlg->banking, APY_PROVIDER_NAME);
assert(account);
#if 0
AB_User_SetUserName(u, xdlg->userName);
AB_User_SetUserId(u, xdlg->userId);
#endif
AB_Account_SetOwnerName(account, AB_User_GetUserName(u));
AB_Account_SetAccountNumber(account, AB_User_GetUserId(u));
AB_Account_SetBankCode(account, "PAYPAL");
AB_Account_SetBankName(account, "PAYPAL");
strcpy(accountname, "PP ");
strcat(accountname, AB_User_GetUserName(u));
AB_Account_SetAccountName(account, accountname);
AB_Account_SetUser(account, u);
AB_Account_SetSelectedUser(account, u);
rv=AB_Banking_AddAccount(xdlg->banking, account);
if (rv<0) {
DBG_INFO(AQPAYPAL_LOGDOMAIN, "Error adding account (%d)", rv);
AB_Account_free(account);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
}
GWEN_Dialog_SetCharProperty(dlg,
"wiz_end_label",
GWEN_DialogProperty_Title,
0,
I18N("The user has been successfully setup."),
0);
GWEN_Gui_ProgressEnd(pid);
APY_NewUserDialog_EnterPage(dlg, PAGE_END, 1);
xdlg->user=u;
return GWEN_DialogEvent_ResultHandled;
}
int addUser(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
int rv;
GWEN_BUFFER *nameBuffer=NULL;
const char *tokenName;
const char *tokenType;
const char *bankId;
const char *userId;
const char *customerId;
const char *server;
const char *userName;
int hbciVersion;
int rdhType;
uint32_t cid;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userName", /* name */
1, /* minnum */
1, /* maxnum */
"N", /* short option */
"username", /* long option */
"Specify the user name", /* short description */
"Specify the user name (not the userid!)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id (Benutzerkennung)", /* short description */
"Specify the user id (Benutzerkennung)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"tokenType", /* name */
1, /* minnum */
1, /* maxnum */
"t", /* short option */
"tokentype", /* long option */
"Specify the crypt token type", /* short description */
"Specify the crypt token type" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"tokenName", /* name */
0, /* minnum */
1, /* maxnum */
"n", /* short option */
"tokenname", /* long option */
"Specify the crypt token name", /* short description */
"Specify the crypt token name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"serverAddr", /* name */
0, /* minnum */
1, /* maxnum */
"s", /* short option */
"server", /* long option */
"Specify the server URL", /* short description */
"Specify the server URL" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Int, /* type */
"context", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"context", /* long option */
"Select a context on the medium", /* short description */
"Select a context on the medium" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT,
GWEN_ArgsType_Int,
"hbciversion",
0,
1,
0,
"hbciversion",
"Select the HBCI version",
"Select the HBCI protocol version"
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT,
GWEN_ArgsType_Int,
"rdhType",
0,
1,
0,
"rdhtype",
"Select the RDH profile type (1, 2, 3, 5, 10)",
"Select the RDH profile type (1, 2, 3, 5, 10)"
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
tokenType=GWEN_DB_GetCharValue(db, "tokenType", 0, 0);
tokenName=GWEN_DB_GetCharValue(db, "tokenName", 0, 0);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, 0);
userId=GWEN_DB_GetCharValue(db, "userId", 0, 0);
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, 0);
server=GWEN_DB_GetCharValue(db, "serverAddr", 0, 0);
cid=GWEN_DB_GetIntValue(db, "context", 0, 1);
hbciVersion=GWEN_DB_GetIntValue(db, "hbciVersion", 0, 0);
rdhType=GWEN_DB_GetIntValue(db, "rdhType", 0, 1);
userName=GWEN_DB_GetCharValue(db, "userName", 0, 0);
assert(userName);
/* generic check for some arguments */
if (hbciVersion>0 && rdhType>1) {
if (hbciVersion<300 && rdhType>1) {
DBG_ERROR(0, "RDH Types 2 and above only work with HBCI version 300 or later");
return 1;
}
}
if (hbciVersion>0) {
switch(hbciVersion) {
case 201:
case 210:
case 220:
case 300:
/* supported */
break;
default:
DBG_ERROR(0, "HBCI/FinTS version %d not supported", hbciVersion);
return 1;
}
}
if (rdhType>0) {
switch(rdhType) {
case 1:
case 2:
case 10:
/* supported */
break;
case 3:
case 4:
case 5:
case 6:
case 7:
case 8:
case 9:
default:
DBG_ERROR(0, "RDH type %d not supported", rdhType);
return 1;
}
}
if (1) {
const char *lbankId;
const char *luserId;
const char *lcustomerId;
const char *lserverAddr;
AH_CRYPT_MODE cm;
GWEN_URL *url;
GWEN_CRYPT_TOKEN_CONTEXT *ctx=NULL;
AB_USER *user;
if (strcasecmp(tokenType, "pintan")==0) {
lbankId=bankId;
luserId=userId;
lcustomerId=customerId?customerId:luserId;
lserverAddr=server;
cm=AH_CryptMode_Pintan;
}
else {
GWEN_PLUGIN_MANAGER *pm;
GWEN_PLUGIN *pl;
GWEN_CRYPT_TOKEN *ct;
const GWEN_CRYPT_TOKEN_CONTEXT *cctx;
const GWEN_CRYPT_TOKEN_KEYINFO *ki;
uint32_t keyId;
GWEN_CRYPT_CRYPTALGOID algo;
if (cid==0) {
DBG_ERROR(0, "No context given.");
return 1;
}
/* get crypt token */
pm=GWEN_PluginManager_FindPluginManager("ct");
if (pm==0) {
DBG_ERROR(0, "Plugin manager not found");
return 3;
}
pl=GWEN_PluginManager_GetPlugin(pm, tokenType);
if (pl==0) {
DBG_ERROR(0, "Plugin not found");
return 3;
}
DBG_INFO(0, "Plugin found");
ct=GWEN_Crypt_Token_Plugin_CreateToken(pl, tokenName);
if (ct==0) {
DBG_ERROR(0, "Could not create crypt token");
return 3;
}
/* open crypt token */
rv=GWEN_Crypt_Token_Open(ct, 0, 0);
if (rv) {
DBG_ERROR(0, "Could not open token (%d)", rv);
GWEN_Crypt_Token_free(ct);
return 3;
}
/* get real token name */
nameBuffer=GWEN_Buffer_new(0, 64, 0, 1);
GWEN_Buffer_AppendString(nameBuffer,
GWEN_Crypt_Token_GetTokenName(ct));
tokenName=GWEN_Buffer_GetStart(nameBuffer);
cctx=GWEN_Crypt_Token_GetContext(ct, cid, 0);
if (cctx==NULL) {
DBG_ERROR(0, "Context %02x not found", cid);
GWEN_Buffer_free(nameBuffer);
GWEN_Crypt_Token_Close(ct, 1, 0);
GWEN_Crypt_Token_free(ct);
return 3;
}
ctx=GWEN_Crypt_Token_Context_dup(cctx);
lbankId=bankId?bankId:GWEN_Crypt_Token_Context_GetServiceId(ctx);
luserId=userId?userId:GWEN_Crypt_Token_Context_GetUserId(ctx);
lcustomerId=customerId?customerId:luserId;
lserverAddr=server?server:GWEN_Crypt_Token_Context_GetAddress(ctx);
/* determine crypt mode */
keyId=GWEN_Crypt_Token_Context_GetSignKeyId(ctx);
if (keyId==0)
keyId=GWEN_Crypt_Token_Context_GetVerifyKeyId(ctx);
if (keyId==0)
keyId=GWEN_Crypt_Token_Context_GetEncipherKeyId(ctx);
if (keyId==0)
keyId=GWEN_Crypt_Token_Context_GetDecipherKeyId(ctx);
GWEN_Crypt_Token_Context_free(ctx);
if (keyId==0) {
DBG_ERROR(0, "No keys, unable to determine crypt mode");
GWEN_Buffer_free(nameBuffer);
GWEN_Crypt_Token_Close(ct, 1, 0);
GWEN_Crypt_Token_free(ct);
return 3;
}
ki=GWEN_Crypt_Token_GetKeyInfo(ct, keyId, 0xffffffff, 0);
if (ki==NULL) {
DBG_ERROR(0,
"Could not get keyinfo for key %d, "
"unable to determine crypt mode", keyId);
GWEN_Buffer_free(nameBuffer);
GWEN_Crypt_Token_Close(ct, 1, 0);
GWEN_Crypt_Token_free(ct);
return 3;
}
algo=GWEN_Crypt_Token_KeyInfo_GetCryptAlgoId(ki);
if (algo==GWEN_Crypt_CryptAlgoId_Des3K)
cm=AH_CryptMode_Ddv;
else if (algo==GWEN_Crypt_CryptAlgoId_Rsa)
cm=AH_CryptMode_Rdh;
else {
DBG_ERROR(0,
"Unexpected crypt algorithm \"%s\", "
"unable to determine crypt mode",
GWEN_Crypt_CryptAlgoId_toString(algo));
GWEN_Buffer_free(nameBuffer);
GWEN_Crypt_Token_Close(ct, 1, 0);
GWEN_Crypt_Token_free(ct);
return 3;
}
rv=GWEN_Crypt_Token_Close(ct, 0, 0);
GWEN_Crypt_Token_free(ct);
if (rv) {
DBG_ERROR(0, "Could not close token (%d)", rv);
GWEN_Buffer_free(nameBuffer);
return 3;
}
}
if (!lbankId || !*lbankId) {
DBG_ERROR(0, "No bank id stored and none given");
GWEN_Buffer_free(nameBuffer);
return 3;
}
if (!luserId || !*luserId) {
DBG_ERROR(0, "No user id (Benutzerkennung) stored and none given");
GWEN_Buffer_free(nameBuffer);
return 3;
}
user=AB_Banking_FindUser(ab, AH_PROVIDER_NAME,
"de",
lbankId, luserId, lcustomerId);
if (user) {
DBG_ERROR(0, "User %s already exists", luserId);
return 3;
}
user=AB_Banking_CreateUser(ab, AH_PROVIDER_NAME);
assert(user);
AB_User_SetUserName(user, userName);
AB_User_SetCountry(user, "de");
AB_User_SetBankCode(user, lbankId);
AB_User_SetUserId(user, luserId);
AB_User_SetCustomerId(user, lcustomerId);
AH_User_SetTokenType(user, tokenType);
AH_User_SetTokenName(user, tokenName);
AH_User_SetTokenContextId(user, cid);
AH_User_SetCryptMode(user, cm);
if (rdhType>0)
AH_User_SetRdhType(user, rdhType);
GWEN_Buffer_free(nameBuffer);
if (hbciVersion==0) {
if (cm==AH_CryptMode_Pintan)
AH_User_SetHbciVersion(user, 220);
else {
if (rdhType>1)
AH_User_SetHbciVersion(user, 300);
else
AH_User_SetHbciVersion(user, 210);
}
}
else {
AH_User_SetHbciVersion(user, hbciVersion);
}
/* try to get server address from database if still unknown */
if (!lserverAddr || *lserverAddr==0) {
GWEN_BUFFER *tbuf;
tbuf=GWEN_Buffer_new(0, 256, 0, 1);
if (getBankUrl(ab,
cm,
lbankId,
tbuf)) {
DBG_INFO(0, "Could not find server address for \"%s\"",
lbankId);
}
if (GWEN_Buffer_GetUsedBytes(tbuf)==0) {
DBG_ERROR(0, "No address given and none available in internal db");
return 3;
}
url=GWEN_Url_fromString(GWEN_Buffer_GetStart(tbuf));
if (url==NULL) {
DBG_ERROR(0, "Bad URL \"%s\" in internal db",
GWEN_Buffer_GetStart(tbuf));
return 3;
}
GWEN_Buffer_free(tbuf);
}
else {
/* set address */
url=GWEN_Url_fromString(lserverAddr);
if (url==NULL) {
DBG_ERROR(0, "Bad URL \"%s\"", lserverAddr);
return 3;
}
}
if (cm==AH_CryptMode_Pintan) {
GWEN_Url_SetProtocol(url, "https");
if (GWEN_Url_GetPort(url)==0)
GWEN_Url_SetPort(url, 443);
}
else {
GWEN_Url_SetProtocol(url, "hbci");
if (GWEN_Url_GetPort(url)==0)
GWEN_Url_SetPort(url, 3000);
}
AH_User_SetServerUrl(user, url);
GWEN_Url_free(url);
if (cm==AH_CryptMode_Ddv)
AH_User_SetStatus(user, AH_UserStatusEnabled);
AB_Banking_AddUser(ab, user);
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int addMedium(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv)
{
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
int rv;
const char *mediumName;
const char *mediumType;
GWEN_CRYPT_TOKEN_DEVICE dev;
const GWEN_ARGS args[]= {
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsTypeChar, /* type */
"mediumType", /* name */
1, /* minnum */
1, /* maxnum */
"t", /* short option */
"mediumtype", /* long option */
"Specify the medium type (file, card or pintan)", /* short description */
"Specify the medium type (file, card or pintan)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsTypeChar, /* type */
"mediumName", /* name */
0, /* minnum */
1, /* maxnum */
"m", /* short option */
"mediumname", /* long option */
"Specify the medium name", /* short description */
"Specify the medium name" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsTypeInt, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutTypeTXT)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqebics");
assert(pro);
mediumName=GWEN_DB_GetCharValue(db, "mediumName", 0, 0);
if (mediumName)
mediumType=GWEN_DB_GetCharValue(db, "mediumType", 0, "file");
else
mediumType=GWEN_DB_GetCharValue(db, "mediumType", 0, "card");
if (strcasecmp(mediumType, "pintan")==0)
dev=GWEN_CryptToken_Device_None;
else {
dev=GWEN_CryptToken_Device_fromString(mediumType);
if (dev==GWEN_CryptToken_Device_Unknown) {
DBG_ERROR(0, "Unknown device type name \"%s\"", mediumType);
return 1;
}
}
rv=EBC_Provider_AddMedium(pro, dev, mediumName);
if (rv) {
DBG_ERROR(0, "Could not add medium \"%s\"", mediumName);
return 3;
}
rv=AB_Banking_Fini(ab);
if (rv) {
DBG_ERROR(0, "Error on fini (%d)", rv);
return 5;
}
return 0;
}
int upload(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *bankId;
const char *userId;
const char *customerId;
const char *requestType;
const char *inFile;
uint32_t guiid;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id", /* short description */
"Specify the user id" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"requestType", /* name */
1, /* minnum */
1, /* maxnum */
"r", /* short option */
"request", /* long option */
"Specify the request type", /* short description */
"Specify the request type" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT,
GWEN_ArgsType_Char,
"inFile",
1,
1,
"f",
"infile",
"Specify the file to upload",
"Specify the file to upload"
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stdout, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on onlineInit (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, EBC_PROVIDER_NAME);
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, "*");
requestType=GWEN_DB_GetCharValue(db, "requestType", 0, NULL);
inFile=GWEN_DB_GetCharValue(db, "inFile", 0, NULL);
ul=AB_Banking_FindUsers(ab, EBC_PROVIDER_NAME,
"de", bankId, userId, customerId);
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 3;
}
else {
AB_USER_LIST2_ITERATOR *cit;
cit=AB_User_List2_First(ul);
assert(cit);
u=AB_User_List2Iterator_Data(cit);
AB_User_List2Iterator_free(cit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 3;
}
else {
GWEN_BUFFER *inBuffer;
inBuffer=GWEN_Buffer_new(0, 1024, 0, 1);
rv=readFile(inFile, inBuffer);
if (rv<0) {
DBG_ERROR(0, "Error reading data file (%d)", rv);
GWEN_Buffer_free(inBuffer);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 1;
}
guiid=GWEN_Gui_ProgressStart(GWEN_GUI_PROGRESS_ALLOW_SUBLEVELS |
GWEN_GUI_PROGRESS_SHOW_PROGRESS |
GWEN_GUI_PROGRESS_SHOW_LOG |
GWEN_GUI_PROGRESS_ALWAYS_SHOW_LOG |
GWEN_GUI_PROGRESS_KEEP_OPEN |
GWEN_GUI_PROGRESS_SHOW_ABORT,
I18N("Executing Request"),
I18N("Now the request is send "
"to the credit institute."),
GWEN_GUI_PROGRESS_NONE,
0);
rv=EBC_Provider_Upload(pro, u,
requestType,
(const uint8_t*)GWEN_Buffer_GetStart(inBuffer),
GWEN_Buffer_GetUsedBytes(inBuffer),
1);
GWEN_Gui_ProgressEnd(guiid);
if (rv) {
DBG_ERROR(0, "Error sending upload request (%d)", rv);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
else {
fprintf(stderr, "Upload request sent.\n");
}
GWEN_Buffer_free(inBuffer);
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on online deinit (%d)\n", rv);
AB_Banking_Fini(ab);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
fprintf(stderr, "Upload request ok.\n");
return 0;
}
int addAccount(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *userId;
const char *accountName;
const char *ownerName;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id (Benutzerkennung)", /* short description */
"Specify the user id (Benutzerkennung)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ownerName", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"owner", /* long option */
"Specify the owner name", /* short description */
"Specify the owner name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"accountName", /* name */
0, /* minnum */
1, /* maxnum */
"n", /* short option */
"name", /* long option */
"Specify the account name (Konto-Name)", /* short description */
"Specify the account name (Konto-Name)" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stdout, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, APY_PROVIDER_NAME);
assert(pro);
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
accountName=GWEN_DB_GetCharValue(db, "accountName", 0, "Account");
ownerName=GWEN_DB_GetCharValue(db, "ownerName", 0, NULL);
ul=AB_Banking_FindUsers(ab, APY_PROVIDER_NAME,
"*", "PAYPAL", userId, "*");
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
AB_Banking_Fini(ab);
return 3;
}
else {
AB_USER_LIST2_ITERATOR *cit;
cit=AB_User_List2_First(ul);
assert(cit);
u=AB_User_List2Iterator_Data(cit);
AB_User_List2Iterator_free(cit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
AB_Banking_Fini(ab);
return 3;
}
else {
AB_ACCOUNT *account;
int rv;
account=AB_Banking_CreateAccount(ab, APY_PROVIDER_NAME);
assert(account);
if (!ownerName)
AB_Account_SetOwnerName(account, AB_User_GetUserName(u));
else
AB_Account_SetOwnerName(account, ownerName);
if (accountName)
AB_Account_SetAccountNumber(account, accountName);
else
AB_Account_SetAccountNumber(account, AB_User_GetUserId(u));
AB_Account_SetBankCode(account, "PAYPAL");
AB_Account_SetUser(account, u);
AB_Account_SetSelectedUser(account, u);
rv=AB_Banking_AddAccount(ab, account);
if (rv) {
DBG_ERROR(0, "Error adding account (%d)", rv);
AB_Banking_Fini(ab);
return 3;
}
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int check2() {
AB_BANKING *ab;
AB_PROVIDER *pro;
int rv;
AH_MEDIUM *medium=0;
GWEN_CRYPTKEY *localCryptKey=0;
GWEN_CRYPTKEY *msgKey=0;
int err;
char keybuffer[16];
unsigned int bsize;
AH_MEDIUM_RESULT res;
GWEN_BUFFER *plainKeyBuf;
GWEN_BUFFER *encKeyBuf;
GWEN_BUFFER *decKeyBuf;
const char *p1, *p2;
int i;
GWEN_GUI *gui;
fprintf(stderr, "Check2:\n");
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGetPasswordFn(gui, _getPin);
unlink("check2.medium");
ab=AB_Banking_new("hbci-check1", 0, 0);
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
medium=AH_Provider_MediumFactory(pro, "ohbci", 0, "check2.medium");
if (!medium) {
DBG_ERROR(0, "Could not create medium object");
AB_Banking_Fini(ab);
return 3;
}
fprintf(stderr, " Creating medium ...\n");
rv=AH_Medium_Create(medium);
if (rv) {
DBG_ERROR(0, "Could not create medium (%d)", rv);
return 3;
}
fprintf(stderr, " Mounting medium ...\n");
rv=AH_Medium_Mount(medium);
if (rv) {
DBG_ERROR(0, "Could not mount medium (%d)", rv);
return 3;
}
fprintf(stderr, " Selecting context ...\n");
rv=AH_Medium_SelectContext(medium, 0);
if (rv) {
DBG_ERROR(0, "Could not select context (%d)", rv);
return 3;
}
fprintf(stderr, " Creating keys ...\n");
rv=AH_Medium_CreateKeys(medium);
if (rv) {
DBG_ERROR(0, "Could not create keys (%d)", rv);
return 3;
}
localCryptKey=AH_Medium_GetLocalPubCryptKey(medium);
if (!localCryptKey) {
DBG_ERROR(0, "No local crypt key.");
return 3;
}
fprintf(stderr, " Storing remote public key ...\n");
rv=AH_Medium_SetPubCryptKey(medium, localCryptKey);
if (rv) {
DBG_ERROR(0, "Could not store remote crypt key (%d)", rv);
return 3;
}
fprintf(stderr, " Creating DES key object ...\n");
msgKey=GWEN_CryptKey_Factory("DES");
if (!msgKey) {
DBG_ERROR(0, "Could not create message key (%d)", rv);
return 3;
}
fprintf(stderr, " Generating DES message key ...\n");
err=GWEN_CryptKey_Generate(msgKey, 16);
if (err) {
DBG_ERROR_ERR(0, err);
return 3;
}
fprintf(stderr, " Getting data of message key ...\n");
bsize=sizeof(keybuffer);
err=GWEN_CryptKey_GetData(msgKey, keybuffer, &bsize);
if (err) {
DBG_ERROR_ERR(0, err);
return 3;
}
fprintf(stderr, " Encrypting message key ...\n");
plainKeyBuf=GWEN_Buffer_new(0, 256, 0, 1);
GWEN_Buffer_AppendBytes(plainKeyBuf, keybuffer, bsize);
encKeyBuf=GWEN_Buffer_new(0, 256, 0, 1);
res=AH_Medium_EncryptKey(medium, plainKeyBuf, encKeyBuf, 1);
if (res!=AH_MediumResultOk) {
DBG_ERROR(0, "Error %d", res);
return 3;
}
fprintf(stderr, " Decrypting message key ...\n");
decKeyBuf=GWEN_Buffer_new(0, 256, 0, 1);
res=AH_Medium_DecryptKey(medium, encKeyBuf, decKeyBuf, 1);
if (res!=AH_MediumResultOk) {
DBG_ERROR(0, "Error %d", res);
return 3;
}
fprintf(stderr, " Comparing message key ...\n");
p1=GWEN_Buffer_GetStart(plainKeyBuf);
p2=GWEN_Buffer_GetStart(decKeyBuf);
rv=0;
for (i=0; i<GWEN_Buffer_GetUsedBytes(plainKeyBuf); i++) {
if (p1[i]!=p2[i]) {
fprintf(stderr, "Buffer1:\n");
GWEN_Buffer_Dump(plainKeyBuf, stderr, 2);
fprintf(stderr, "Buffer2:\n");
GWEN_Buffer_Dump(decKeyBuf, stderr, 2);
fprintf(stderr, "Differ at %d (%04x)\n", i, i);
rv=-1;
break;
}
}
if (rv) {
fprintf(stderr, "Data differs in content\n");
return 3;
}
fprintf(stderr, " Unmounting medium ...\n");
rv=AH_Medium_Unmount(medium, 1);
if (rv) {
DBG_ERROR(0, "Could not unmount medium (%d)", rv);
return 3;
}
rv=AB_Banking_Fini(ab);
if (rv) {
DBG_ERROR(0, "Could not deinit banking (%d)", rv);
return 3;
}
unlink("check2.medium");
fprintf(stderr, "Check2: PASSED\n");
return 0;
}
int AH_NewKeyFileDialog_DoIt(GWEN_DIALOG *dlg) {
AH_NEWKEYFILE_DIALOG *xdlg;
AB_USER *u;
GWEN_URL *url;
int rv;
uint32_t pid;
AB_IMEXPORTER_CONTEXT *ctx;
AB_PROVIDER *pro;
GWEN_PLUGIN_MANAGER *pm;
GWEN_PLUGIN *pl;
GWEN_CRYPT_TOKEN *ct;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, AH_NEWKEYFILE_DIALOG, dlg);
assert(xdlg);
rv=AH_NewKeyFileDialog_GetFilePageData(dlg);
if (rv<0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "No file?");
// TODO: show error message
return GWEN_DialogEvent_ResultHandled;
}
pro=AB_Banking_GetProvider(xdlg->banking, "aqhbci");
if (pro==NULL) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not find backend, maybe some plugins are not installed?");
GWEN_Gui_ShowError(I18N("Error"),
"%s",
I18N("Could not find HBCI backend, maybe some plugins are not installed?"));
return GWEN_DialogEvent_ResultHandled;
}
u=AB_Banking_CreateUser(xdlg->banking, "aqhbci");
if (u==NULL) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not create user, maybe backend missing?");
GWEN_Gui_ShowError(I18N("Error"), "%s", I18N("Could not find HBCI backend, maybe some plugins are not installed?"));
return GWEN_DialogEvent_ResultHandled;
}
/* generic setup */
AB_User_SetUserName(u, xdlg->userName);
AB_User_SetUserId(u, xdlg->userId);
if (xdlg->customerId && *(xdlg->customerId))
AB_User_SetCustomerId(u, xdlg->customerId);
else
AB_User_SetCustomerId(u, xdlg->userId);
AB_User_SetCountry(u, "de");
AB_User_SetBankCode(u, xdlg->bankCode);
/* HBCI setup */
AH_User_SetTokenType(u, "ohbci");
AH_User_SetTokenName(u, AH_NewKeyFileDialog_GetFileName(dlg));
AH_User_SetTokenContextId(u, 1);
AH_User_SetCryptMode(u, AH_CryptMode_Rdh);
AH_User_SetStatus(u, AH_UserStatusPending);
AH_User_SetHbciVersion(u, xdlg->hbciVersion);
AH_User_SetRdhType(u, xdlg->rdhVersion);
AH_User_SetFlags(u, xdlg->flags);
/* create CryptToken */
pm=GWEN_PluginManager_FindPluginManager(GWEN_CRYPT_TOKEN_PLUGIN_TYPENAME);
if (pm==0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Plugin manager not found");
GWEN_Gui_ShowError(I18N("Error"),
I18N("CryptToken plugin for type %s is not available. Did you install all necessary packages?"),
GWEN_CRYPT_TOKEN_PLUGIN_TYPENAME);
return 3;
}
pl=GWEN_PluginManager_GetPlugin(pm, AH_User_GetTokenType(u));
if (pl==0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Plugin not found");
GWEN_Gui_ShowError(I18N("Error"),
I18N("CryptToken plugin for type %s is not available. Did you install all necessary packages?"),
AH_User_GetTokenType(u));
AB_User_free(u);
return GWEN_DialogEvent_ResultHandled;
}
ct=GWEN_Crypt_Token_Plugin_CreateToken(pl, AH_User_GetTokenName(u));
if (ct==0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not create crypt token");
AB_User_free(u);
return GWEN_DialogEvent_ResultHandled;
}
/* create crypt token */
rv=GWEN_Crypt_Token_Create(ct, 0);
if (rv<0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not create token");
GWEN_Gui_ShowError(I18N("Error"),
I18N("The keyfile %s could not be created. Maybe there already is a file of that name (%d)."),
GWEN_Crypt_Token_GetTokenName(ct),
rv);
AB_User_free(u);
return GWEN_DialogEvent_ResultHandled;
}
/* close crypt token */
rv=GWEN_Crypt_Token_Close(ct, 0, 0);
if (rv) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not close token");
GWEN_Gui_ShowError(I18N("Error"),
I18N("The keyfile %s could not be closed. Please check disc space."),
GWEN_Crypt_Token_GetTokenName(ct),
rv);
AB_User_free(u);
unlink(AH_User_GetTokenName(u));
return GWEN_DialogEvent_ResultHandled;
}
url=GWEN_Url_fromString(xdlg->url);
assert(url);
GWEN_Url_SetProtocol(url, "hbci");
if (GWEN_Url_GetPort(url)==0)
GWEN_Url_SetPort(url, 3000);
AH_User_SetServerUrl(u, url);
GWEN_Url_free(url);
rv=AB_Banking_AddUser(xdlg->banking, u);
if (rv<0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not add user (%d)", rv);
GWEN_Gui_ShowError(I18N("Error"),
I18N("Could not add HBCI user, maybe there already is a user of that id (%d)"),
rv);
AB_User_free(u);
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not add user, maybe there already is a user of the same id (%d)?", rv);
return GWEN_DialogEvent_ResultHandled;
}
pid=GWEN_Gui_ProgressStart(GWEN_GUI_PROGRESS_DELAY |
GWEN_GUI_PROGRESS_ALLOW_EMBED |
GWEN_GUI_PROGRESS_SHOW_PROGRESS |
GWEN_GUI_PROGRESS_SHOW_ABORT,
I18N("Setting Up Keyfile User"),
I18N("The server keys will now be retrieved, keys created and sent to the bank."),
3, /* getkeys, mkKeys, sendKeys */
0);
/* lock new user */
rv=AB_Banking_BeginExclUseUser(xdlg->banking, u);
if (rv<0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Could not lock user (%d)", rv);
GWEN_Gui_ProgressLog2(pid,
GWEN_LoggerLevel_Error,
I18N("Unable to lock users (%d)"), rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
/* get server keys id */
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Notice,
I18N("Retrieving server keys"));
ctx=AB_ImExporterContext_new();
rv=AH_Provider_GetServerKeys(pro, u, ctx, 0, 1, 0);
if (rv<0) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
rv=AH_NewKeyFileDialog_CheckBankIniLetter(dlg, u);
if (rv<0) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Bad bank keys, you should contact your bank."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
rv=GWEN_Gui_ProgressAdvance(pid, GWEN_GUI_PROGRESS_ONE);
if (rv==GWEN_ERROR_USER_ABORTED) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Aborted by user."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
/* generate keys */
rv=AH_Provider_CreateKeys(pro, u, 0);
if (rv<0) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressLog2(pid,
GWEN_LoggerLevel_Error,
I18N("Error generating keys: %d"), rv);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
rv=GWEN_Gui_ProgressAdvance(pid, GWEN_GUI_PROGRESS_ONE);
if (rv==GWEN_ERROR_USER_ABORTED) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Aborted by user."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
/* send user keys */
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Notice,
I18N("Sending user keys"));
ctx=AB_ImExporterContext_new();
rv=AH_Provider_SendUserKeys2(pro, u, ctx, 0, 0, 1, 0); /* withAuthKey, withProgress, nounmount, doLock */
if (rv<0) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
rv=GWEN_Gui_ProgressAdvance(pid, GWEN_GUI_PROGRESS_ONE);
if (rv==GWEN_ERROR_USER_ABORTED) {
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
AB_Banking_DeleteUser(xdlg->banking, u);
//unlink(AH_NewKeyFileDialog_GetFileName(dlg));
GWEN_Gui_ProgressLog(pid,
GWEN_LoggerLevel_Error,
I18N("Aborted by user."));
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
/* unlock user */
rv=AB_Banking_EndExclUseUser(xdlg->banking, u, 0);
if (rv<0) {
DBG_INFO(AQHBCI_LOGDOMAIN,
"Could not unlock customer [%s] (%d)",
AB_User_GetCustomerId(u), rv);
GWEN_Gui_ProgressLog2(pid,
GWEN_LoggerLevel_Error,
I18N("Could not unlock user %s (%d)"),
AB_User_GetUserId(u), rv);
AB_Banking_EndExclUseUser(xdlg->banking, u, 1);
AB_Banking_DeleteUser(xdlg->banking, u);
GWEN_Gui_ProgressEnd(pid);
return GWEN_DialogEvent_ResultHandled;
}
GWEN_Gui_ProgressEnd(pid);
AH_NewKeyFileDialog_EnterPage(dlg, PAGE_END, 1);
xdlg->user=u;
return GWEN_DialogEvent_ResultHandled;
}
int AB_Banking_LoadAllAccounts(AB_BANKING *ab) {
GWEN_STRINGLIST *sl;
int rv;
sl=GWEN_StringList_new();
rv=GWEN_ConfigMgr_ListSubGroups(ab->configMgr, AB_CFG_GROUP_ACCOUNTS, sl);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here (%d)", rv);
GWEN_StringList_free(sl);
return rv;
}
if (GWEN_StringList_Count(sl)) {
GWEN_STRINGLISTENTRY *se;
se=GWEN_StringList_FirstEntry(sl);
while(se) {
const char *t;
GWEN_DB_NODE *db=NULL;
t=GWEN_StringListEntry_Data(se);
assert(t);
rv=GWEN_ConfigMgr_GetGroup(ab->configMgr, AB_CFG_GROUP_ACCOUNTS, t, &db);
if (rv<0) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Could not load account group [%s] (%d), ignoring",
t, rv);
}
else {
AB_ACCOUNT *a=NULL;
uint32_t uid;
assert(db);
uid=GWEN_DB_GetIntValue(db, "uniqueId", 0, 0);
if (uid)
a=AB_Banking_GetAccount(ab, uid);
if (a) {
/* account already exists, reload existing account */
const char *s;
AB_PROVIDER *pro;
AB_Account_SetDbId(a, t);
s=AB_Account_GetBackendName(a);
assert(s && *s);
pro=AB_Banking_GetProvider(ab, s);
if (!pro) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Provider \"%s\" not found, ignoring account [%s/%s]",
s,
AB_Account_GetBankCode(a),
AB_Account_GetAccountNumber(a));
}
else {
int rv;
GWEN_DB_NODE *dbP;
/* reload account from DB */
AB_Account_ReadDb(a, db);
/* let provider also reload account data */
dbP=GWEN_DB_GetGroup(db, GWEN_DB_FLAGS_DEFAULT,
"data/backend");
rv=AB_Provider_ExtendAccount(pro, a, AB_ProviderExtendMode_Reload, dbP);
if (rv<0) {
DBG_WARN(AQBANKING_LOGDOMAIN, "Could not extend account [%s/%s] (%d)",
AB_Account_GetBankCode(a), AB_Account_GetAccountNumber(a), rv);
}
}
}
else {
/* account is new, load and add it */
a=AB_Account_fromDb(ab, db);
if (a) {
const char *s;
AB_PROVIDER *pro;
AB_Account_SetDbId(a, t);
s=AB_Account_GetBackendName(a);
assert(s && *s);
pro=AB_Banking_GetProvider(ab, s);
if (!pro) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Provider \"%s\" not found, ignoring account [%s/%s]",
s, AB_Account_GetBankCode(a), AB_Account_GetAccountNumber(a));
}
else {
int rv;
GWEN_DB_NODE *dbP;
dbP=GWEN_DB_GetGroup(db, GWEN_DB_FLAGS_DEFAULT,
"data/backend");
rv=AB_Provider_ExtendAccount(pro, a, AB_ProviderExtendMode_Extend, dbP);
if (rv) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here");
AB_Account_free(a);
}
else {
DBG_DEBUG(AQBANKING_LOGDOMAIN, "Adding account");
AB_Account_List_Add(a, ab->accounts);
}
}
}
}
GWEN_DB_Group_free(db);
}
se=GWEN_StringListEntry_Next(se);
}
}
GWEN_StringList_free(sl);
return 0;
}
int AB_Banking_LoadAllUsers(AB_BANKING *ab) {
GWEN_STRINGLIST *sl;
int rv;
sl=GWEN_StringList_new();
rv=GWEN_ConfigMgr_ListSubGroups(ab->configMgr, AB_CFG_GROUP_USERS, sl);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here (%d)", rv);
GWEN_StringList_free(sl);
return rv;
}
if (GWEN_StringList_Count(sl)) {
GWEN_STRINGLISTENTRY *se;
se=GWEN_StringList_FirstEntry(sl);
while(se) {
const char *t;
GWEN_DB_NODE *db=NULL;
t=GWEN_StringListEntry_Data(se);
assert(t);
rv=GWEN_ConfigMgr_GetGroup(ab->configMgr, AB_CFG_GROUP_USERS, t, &db);
if (rv<0) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Could not load user group [%s] (%d), ignoring",
t, rv);
}
else {
AB_USER *u=NULL;
uint32_t uid;
assert(db);
uid=GWEN_DB_GetIntValue(db, "uniqueId", 0, 0);
if (uid)
u=AB_Banking_GetUser(ab, uid);
if (u) {
/* user already exists, reload existing user */
const char *s;
AB_PROVIDER *pro=NULL;
DBG_INFO(AQBANKING_LOGDOMAIN,
"Loading established user [%08x]",
(unsigned int) uid);
AB_User_SetDbId(u, t);
s=AB_User_GetBackendName(u);
if (s && *s)
pro=AB_Banking_GetProvider(ab, s);
if (!pro) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Provider \"%s\" not found, ignoring user [%s]",
s?s:"(null)", AB_User_GetUserId(u));
}
else {
int rv;
GWEN_DB_NODE *dbP;
/* reload user from DB */
AB_User_ReadDb(u, db);
/* let provider also reload user data */
dbP=GWEN_DB_GetGroup(db, GWEN_DB_FLAGS_DEFAULT,
"data/backend");
rv=AB_Provider_ExtendUser(pro, u, AB_ProviderExtendMode_Reload, dbP);
if (rv<0) {
DBG_WARN(AQBANKING_LOGDOMAIN, "Could not extend user [%s] (%d)",
AB_User_GetUserId(u), rv);
}
}
}
else {
/* user is new, load and add it */
DBG_INFO(AQBANKING_LOGDOMAIN,
"Loading new user [%08x]",
(unsigned int) uid);
u=AB_User_fromDb(ab, db);
if (u) {
const char *s;
AB_PROVIDER *pro=NULL;
AB_User_SetDbId(u, t);
s=AB_User_GetBackendName(u);
if (s && *s)
pro=AB_Banking_GetProvider(ab, s);
if (!pro) {
DBG_WARN(AQBANKING_LOGDOMAIN,
"Provider \"%s\" not found, ignoring user [%s]",
s, AB_User_GetUserId(u));
}
else {
int rv;
GWEN_DB_NODE *dbP;
dbP=GWEN_DB_GetGroup(db, GWEN_DB_FLAGS_DEFAULT,
"data/backend");
rv=AB_Provider_ExtendUser(pro, u, AB_ProviderExtendMode_Extend, dbP);
if (rv) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here");
AB_User_free(u);
}
else {
DBG_DEBUG(AQBANKING_LOGDOMAIN, "Adding user");
AB_User_List_Add(u, ab->users);
}
}
}
else {
DBG_INFO(AQBANKING_LOGDOMAIN, "Could not load user from DB");
}
}
GWEN_DB_Group_free(db);
}
se=GWEN_StringListEntry_Next(se);
}
}
else {
DBG_INFO(AQBANKING_LOGDOMAIN, "No users");
}
GWEN_StringList_free(sl);
return 0;
}
int iniLetter(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *bankId;
const char *userId;
const char *customerId;
int showBankKey;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
0,
GWEN_ArgsType_Int,
"bankKey",
0,
1,
0,
"bankkey",
"Show letter for the bank key",
"Show letter for the bank key"
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stdout, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, EBC_PROVIDER_NAME);
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, "*");
showBankKey=GWEN_DB_GetIntValue(db, "bankkey", 0, 0);
ul=AB_Banking_FindUsers(ab, EBC_PROVIDER_NAME,
"de", bankId, userId, customerId);
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
AB_Banking_Fini(ab);
return 3;
}
else {
AB_USER_LIST2_ITERATOR *cit;
cit=AB_User_List2_First(ul);
assert(cit);
u=AB_User_List2Iterator_Data(cit);
AB_User_List2Iterator_free(cit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
AB_Banking_Fini(ab);
return 3;
}
else {
GWEN_BUFFER *tbuf;
tbuf=GWEN_Buffer_new(0, 2048, 0, 1);
rv=EBC_Provider_GetIniLetterTxt(pro, u, showBankKey, tbuf, 0);
if (rv) {
DBG_ERROR(0, "Error creating ini letter (%d)", rv);
AB_Banking_Fini(ab);
return 3;
}
fprintf(stdout, "%s", GWEN_Buffer_GetStart(tbuf));
GWEN_Buffer_free(tbuf);
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
GWEN_DIALOG *AB_SetupNewUserDialog_new(AB_BANKING *ab) {
GWEN_DIALOG *dlg;
AB_SETUP_NEWUSER_DIALOG *xdlg;
GWEN_BUFFER *fbuf;
int rv;
GWEN_XMLNODE *n;
GWEN_XMLNODE *nDialog;
GWEN_PLUGIN_DESCRIPTION_LIST2 *providers;
GWEN_DIALOG_LIST *subDialogs=NULL;
dlg=GWEN_Dialog_new("ab_setup_newuser");
GWEN_NEW_OBJECT(AB_SETUP_NEWUSER_DIALOG, xdlg);
GWEN_INHERIT_SETDATA(GWEN_DIALOG, AB_SETUP_NEWUSER_DIALOG, dlg, xdlg,
AB_SetupNewUserDialog_FreeData);
GWEN_Dialog_SetSignalHandler(dlg, AB_SetupNewUserDialog_SignalHandler);
xdlg->backendDialogs=GWEN_Dialog_List2_new();
xdlg->backendRadioNames=GWEN_StringList_new();
xdlg->backendNames=GWEN_StringList_new();
/* get path of dialog description file */
fbuf=GWEN_Buffer_new(0, 256, 0, 1);
rv=GWEN_PathManager_FindFile(AB_PM_LIBNAME, AB_PM_DATADIR,
"aqbanking/dialogs/dlg_setup_newuser.dlg",
fbuf);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "Dialog description file not found (%d).", rv);
GWEN_Buffer_free(fbuf);
GWEN_Dialog_free(dlg);
return NULL;
}
/* read XML file, extend it */
n=GWEN_XMLNode_new(GWEN_XMLNodeTypeTag, "root");
rv=GWEN_XML_ReadFile(n, GWEN_Buffer_GetStart(fbuf),
GWEN_XML_FLAGS_DEFAULT |
GWEN_XML_FLAGS_HANDLE_HEADERS);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here (%d)", rv);
GWEN_XMLNode_free(n);
GWEN_Buffer_free(fbuf);
GWEN_Dialog_free(dlg);
return NULL;
}
nDialog=GWEN_XMLNode_FindFirstTag(n, "dialog", NULL, NULL);
if (nDialog==NULL) {
DBG_INFO(AQBANKING_LOGDOMAIN, "Dialog element not found in XML file [%s]", GWEN_Buffer_GetStart(fbuf));
GWEN_XMLNode_free(n);
GWEN_Buffer_free(fbuf);
GWEN_Dialog_free(dlg);
return NULL;
}
providers=AB_Banking_GetProviderDescrs(ab);
if (providers) {
GWEN_XMLNODE *nBackendRadioWidget;
nBackendRadioWidget=GWEN_XMLNode_FindFirstTag(nDialog, "widget", "name", "dialogVLayout");
if (nBackendRadioWidget)
nBackendRadioWidget=GWEN_XMLNode_FindFirstTag(nBackendRadioWidget, "widget", "name", "wiz_stack");
if (nBackendRadioWidget)
nBackendRadioWidget=GWEN_XMLNode_FindFirstTag(nBackendRadioWidget, "widget", "name", "backendRadioWidget");
subDialogs=GWEN_Dialog_List_new();
if (nBackendRadioWidget) {
GWEN_PLUGIN_DESCRIPTION_LIST2_ITERATOR *pit;
pit=GWEN_PluginDescription_List2_First(providers);
if (pit) {
GWEN_PLUGIN_DESCRIPTION *pd;
pd=GWEN_PluginDescription_List2Iterator_Data(pit);
while(pd) {
const char *name;
name=GWEN_PluginDescription_GetName(pd);
if (name && *name) {
AB_PROVIDER *pro;
pro=AB_Banking_GetProvider(ab, name);
if (pro) {
GWEN_DIALOG *cdlg;
GWEN_BUFFER *tbuf;
GWEN_XMLNODE *wn;
const char *s;
if (AB_Provider_GetFlags(pro) & AB_PROVIDER_FLAGS_HAS_USERTYPE_DIALOG) {
cdlg=AB_ProviderGetUserTypeDialog(pro);
if (cdlg==NULL) {
DBG_WARN(AQBANKING_LOGDOMAIN, "Backend [%s] does not return a userType dialog, using default", name);
cdlg=AB_UserTypePageDefaultDialog_new(ab);
}
}
else
cdlg=AB_UserTypePageDefaultDialog_new(ab);
tbuf=GWEN_Buffer_new(0, 256, 0, 1);
GWEN_Buffer_AppendString(tbuf, "backend_");
GWEN_Buffer_AppendString(tbuf, name);
GWEN_Buffer_AppendString(tbuf, "_radio");
wn=GWEN_XMLNode_new(GWEN_XMLNodeTypeTag, "widget");
GWEN_XMLNode_SetProperty(wn, "type", "radioButton");
GWEN_XMLNode_SetProperty(wn, "name", GWEN_Buffer_GetStart(tbuf));
GWEN_StringList_AppendString(xdlg->backendRadioNames, GWEN_Buffer_GetStart(tbuf), 0, 0);
GWEN_StringList_AppendString(xdlg->backendNames, name, 0, 0);
s=GWEN_PluginDescription_GetShortDescr(pd);
if (!(s && *s))
s=name;
GWEN_XMLNode_SetProperty(wn, "text", I18N(s));
GWEN_XMLNode_SetProperty(wn, "groupId", "999999");
GWEN_XMLNode_SetProperty(wn, "flags", "fillX justifyLeft");
GWEN_XMLNode_AddChild(nBackendRadioWidget, wn);
GWEN_Dialog_List_Add(cdlg, subDialogs);
}
else {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Could not activate backend [%s]", name);
}
}
pd=GWEN_PluginDescription_List2Iterator_Next(pit);
}
GWEN_PluginDescription_List2Iterator_free(pit);
}
}
else {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Dialog description does not contain path [dialogVLayout/wiz_stack/backendRadioWidget]");
GWEN_XMLNode_Dump(nDialog, 2);
GWEN_XMLNode_free(n);
GWEN_Buffer_free(fbuf);
GWEN_Dialog_free(dlg);
return NULL;
}
}
/* read dialog from dialog description file */
rv=GWEN_Dialog_ReadXml(dlg, nDialog);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here (%d).", rv);
GWEN_Dialog_List_free(subDialogs);
GWEN_XMLNode_free(n);
GWEN_Buffer_free(fbuf);
GWEN_Dialog_free(dlg);
return NULL;
}
GWEN_XMLNode_free(n);
GWEN_Buffer_free(fbuf);
/* insert pages for each backend */
if (GWEN_Dialog_List_GetCount(subDialogs)) {
GWEN_DIALOG *cdlg;
while ( (cdlg=GWEN_Dialog_List_First(subDialogs)) ) {
GWEN_Dialog_List_Del(cdlg);
DBG_NOTICE(AQBANKING_LOGDOMAIN, "Adding dialog %s", GWEN_Dialog_GetId(cdlg));
rv=GWEN_Dialog_AddSubDialog(dlg, "wiz_stack", cdlg);
if (rv<0) {
DBG_INFO(AQBANKING_LOGDOMAIN, "here (%d)", rv);
GWEN_Dialog_List_free(subDialogs);
GWEN_Dialog_free(cdlg);
GWEN_Dialog_free(dlg);
return NULL;
}
GWEN_Dialog_List2_PushBack(xdlg->backendDialogs, cdlg);
}
}
GWEN_Dialog_List_free(subDialogs);
xdlg->banking=ab;
/* done */
return dlg;
}
int check1() {
AB_BANKING *ab;
AB_PROVIDER *pro;
int rv;
AH_MEDIUM *medium=0;
GWEN_CRYPTKEY *remotePrivCryptKey=0;
GWEN_CRYPTKEY *remotePubCryptKey=0;
int err;
GWEN_DB_NODE *dbKey;
GWEN_GUI *gui;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGetPasswordFn(gui, _getPin);
unlink("check1.medium");
fprintf(stderr, "Check1:\n");
ab=AB_Banking_new("hbci-check1", 0, 0);
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
medium=AH_Provider_MediumFactory(pro, "ohbci", 0, "check1.medium");
if (!medium) {
DBG_ERROR(0, "Could not create medium object");
return 3;
}
fprintf(stderr, " Creating medium ...\n");
rv=AH_Medium_Create(medium);
if (rv) {
DBG_ERROR(0, "Could not create medium (%d)", rv);
return 3;
}
fprintf(stderr, " Mounting medium ...\n");
rv=AH_Medium_Mount(medium);
if (rv) {
DBG_ERROR(0, "Could not mount medium (%d)", rv);
return 3;
}
fprintf(stderr, " Selecting context ...\n");
rv=AH_Medium_SelectContext(medium, 0);
if (rv) {
DBG_ERROR(0, "Could not select context (%d)", rv);
return 3;
}
fprintf(stderr, " Creating keys ...\n");
rv=AH_Medium_CreateKeys(medium);
if (rv) {
DBG_ERROR(0, "Could not create keys (%d)", rv);
return 3;
}
remotePrivCryptKey=GWEN_CryptKey_Factory("RSA");
if (!remotePrivCryptKey) {
DBG_ERROR(0, "Could not create key (%d)", rv);
return 3;
}
fprintf(stderr, " Generating remote crypt key ...\n");
err=GWEN_CryptKey_Generate(remotePrivCryptKey, 768);
if (err) {
DBG_ERROR_ERR(0, err);
return 3;
}
fprintf(stderr, " Extracting remote public key ...\n");
dbKey=GWEN_DB_Group_new("key");
err=GWEN_CryptKey_toDb(remotePrivCryptKey, dbKey, 1);
if (err) {
DBG_ERROR_ERR(0, err);
return 3;
}
remotePubCryptKey=GWEN_CryptKey_fromDb(dbKey);
if (!remotePubCryptKey) {
DBG_ERROR(0, "Could not create remote pub crypt key");
return 3;
}
fprintf(stderr, " Storing remote public key ...\n");
rv=AH_Medium_SetPubCryptKey(medium, remotePubCryptKey);
if (rv) {
DBG_ERROR(0, "Could not store remote crypt key (%d)", rv);
return 3;
}
fprintf(stderr, " Unmounting medium ...\n");
rv=AH_Medium_Unmount(medium, 1);
if (rv) {
DBG_ERROR(0, "Could not unmount medium (%d)", rv);
return 3;
}
rv=AB_Banking_Fini(ab);
if (rv) {
DBG_ERROR(0, "Could not deinit banking (%d)", rv);
return 3;
}
unlink("check1.medium");
fprintf(stderr, "Check1: PASSED\n");
return 0;
}
int addsubAccountFlags(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv, int is_add ) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_ACCOUNT_LIST2 *al;
AB_ACCOUNT *a=0;
int rv;
const char *bankId;
const char *accountId;
const char *subAccountId;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"accountId", /* name */
0, /* minnum */
1, /* maxnum */
"a", /* short option */
"account", /* long option */
"Specify the account id (Kontonummer)", /* short description */
"Specify the account id (Kontonummer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"subAccountId", /* name */
0, /* minnum */
1, /* maxnum */
"aa", /* short option */
"subaccount", /* long option */
"Specify the sub account id (Unterkontomerkmal)", /* short description */
"Specify the sub account id (Unterkontomerkmal)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"flags", /* name */
1, /* minnum */
99, /* maxnum */
"f", /* short option */
"flags", /* long option */
"Specify the user flags", /* short description */
"Specify the user flags" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, "*");
subAccountId=GWEN_DB_GetCharValue(db, "subAccountId", 0, "*");
al=AB_Banking_FindAccounts(ab, AH_PROVIDER_NAME, "de",
bankId, accountId, subAccountId);
if (al) {
if (AB_Account_List2_GetSize(al)!=1) {
DBG_ERROR(0, "Ambiguous account specification");
AB_Account_List2_free(al);
return 3;
}
else {
AB_ACCOUNT_LIST2_ITERATOR *ait;
ait=AB_Account_List2_First(al);
assert(ait);
a=AB_Account_List2Iterator_Data(ait);
AB_Account_List2Iterator_free(ait);
}
AB_Account_List2_free(al);
}
if (!a) {
DBG_ERROR(0, "No matching customer");
return 3;
}
else {
GWEN_DB_NODE *vn;
uint32_t flags, bf, c=0;
/* parse flags */
flags=AH_Account_Flags_fromDb(db, "flags");
for (bf=flags; bf; bf>>=1) {
if (bf&1)
c++;
}
vn=GWEN_DB_FindFirstVar(db, "flags");
if (GWEN_DB_Values_Count(vn)!=c) {
fprintf(stderr, "ERROR: Specified flag(s) unknown\n");
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
/* lock account */
rv=AB_Banking_BeginExclUseAccount(ab, a);
if (rv<0) {
fprintf(stderr,
"ERROR: Could not lock account, maybe it is used in another application? (%d)\n",
rv);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
/* modify account */
if( is_add ) {
fprintf(stderr, "Adding flags: %08x\n", flags);
AH_Account_AddFlags(a, flags);
}
else {
fprintf(stderr, "Removing flags: %08x\n", flags);
AH_Account_SubFlags(a, flags);
}
/* unlock account */
rv=AB_Banking_EndExclUseAccount(ab, a, 0);
if (rv<0) {
fprintf(stderr,
"ERROR: Could not unlock account (%d)\n",
rv);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int mkPinList(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
GWEN_SYNCIO *sio;
AB_USER_LIST2 *ul;
int rv;
const char *outFile;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"outFile", /* name */
0, /* minnum */
1, /* maxnum */
"o", /* short option */
"outfile", /* long option */
"Specify the name of the output file", /* short description */
"Specify the name of the output file" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
outFile=GWEN_DB_GetCharValue(db, "outfile", 0, 0);
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqebics");
assert(pro);
if (outFile==0) {
sio=GWEN_SyncIo_File_fromStdout();
GWEN_SyncIo_AddFlags(sio, GWEN_SYNCIO_FLAGS_DONTCLOSE);
}
else {
sio=GWEN_SyncIo_File_new(outFile, GWEN_SyncIo_File_CreationMode_CreateAlways);
GWEN_SyncIo_AddFlags(sio,
GWEN_SYNCIO_FILE_FLAGS_READ |
GWEN_SYNCIO_FILE_FLAGS_WRITE |
GWEN_SYNCIO_FILE_FLAGS_UREAD |
GWEN_SYNCIO_FILE_FLAGS_UWRITE |
GWEN_SYNCIO_FILE_FLAGS_GREAD |
GWEN_SYNCIO_FILE_FLAGS_GWRITE);
rv=GWEN_SyncIo_Connect(sio);
if (rv<0) {
DBG_ERROR(0, "Error opening output file: %s",
strerror(errno));
return 4;
}
}
GWEN_SyncIo_WriteLine(sio,
"# This is a PIN file to be used "
"with AqBanking");
GWEN_SyncIo_WriteLine(sio,
"# Please insert the PINs/passwords "
"for the users below");
ul=AB_Banking_FindUsers(ab, "aqebics", "*", "*", "*", "*");
if (ul) {
AB_USER_LIST2_ITERATOR *uit;
uit=AB_User_List2_First(ul);
if (uit) {
AB_USER *u;
u=AB_User_List2Iterator_Data(uit);
assert(u);
while(u) {
const char *s;
GWEN_BUFFER *nbuf;
int rv;
GWEN_SyncIo_WriteLine(sio, "");
GWEN_SyncIo_WriteString(sio, "# User \"");
s=AB_User_GetUserId(u);
assert(s);
GWEN_SyncIo_WriteString(sio, s);
GWEN_SyncIo_WriteString(sio, "\" at \"");
s=AB_User_GetBankCode(u);
GWEN_SyncIo_WriteString(sio, s);
GWEN_SyncIo_WriteLine(sio, "\"");
nbuf=GWEN_Buffer_new(0, 256 ,0 ,1);
rv=EBC_User_MkPasswdName(u, nbuf);
if (rv==0) {
GWEN_BUFFER *obuf;
obuf=GWEN_Buffer_new(0, 256 ,0 ,1);
if (GWEN_Text_EscapeToBufferTolerant(GWEN_Buffer_GetStart(nbuf),
obuf)) {
DBG_ERROR(0, "Error escaping name to buffer");
return 3;
}
GWEN_SyncIo_WriteString(sio, GWEN_Buffer_GetStart(obuf));
GWEN_SyncIo_WriteLine(sio, " = \"\"");
GWEN_Buffer_free(obuf);
}
GWEN_Buffer_free(nbuf);
u=AB_User_List2Iterator_Next(uit);
}
AB_User_List2Iterator_free(uit);
}
AB_User_List2_free(ul);
}
rv=GWEN_SyncIo_Disconnect(sio);
if (rv<0) {
DBG_ERROR_ERR(0, rv);
GWEN_SyncIo_free(sio);
return 4;
}
GWEN_SyncIo_free(sio);
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int setHbciVersion(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *bankId;
const char *userId;
const char *customerId;
const char *hbciVersion;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id (Benutzerkennung)", /* short description */
"Specify the user id (Benutzerkennung)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"hbciVersion", /* name */
1, /* minnum */
1, /* maxnum */
0, /* short option */
"hbciversion", /* long option */
"Specify the HBCI version (201, 210, 220, 300)", /* short description */
"Specify the HBCI version (201, 210, 220, 300)" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, "*");
hbciVersion=GWEN_DB_GetCharValue(db, "hbciVersion", 0, "220");
ul=AB_Banking_FindUsers(ab, AH_PROVIDER_NAME, "de",
bankId, userId, customerId);
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
return 3;
}
else {
AB_USER_LIST2_ITERATOR *uit;
uit=AB_User_List2_First(ul);
assert(uit);
u=AB_User_List2Iterator_Data(uit);
AB_User_List2Iterator_free(uit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
return 3;
}
else {
int v;
v=atoi(hbciVersion);
if (v<200 || v>399) {
DBG_ERROR(0, "Invalid HBCI version \"%s\"", hbciVersion);
return 1;
}
/* lock user */
rv=AB_Banking_BeginExclUseUser(ab, u);
if (rv<0) {
fprintf(stderr,
"ERROR: Could not lock user, maybe it is used in another application? (%d)\n",
rv);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
/* modify user */
AH_User_SetHbciVersion(u, v);
/* unlock user */
rv=AB_Banking_EndExclUseUser(ab, u, 0);
if (rv<0) {
fprintf(stderr,
"ERROR: Could not unlock user (%d)\n",
rv);
AB_Banking_OnlineFini(ab);
AB_Banking_Fini(ab);
return 4;
}
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int listItanModes(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *bankId;
const char *userId;
const char *customerId;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id (Benutzerkennung)", /* short description */
"Specify the user id (Benutzerkennung)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, "*");
ul=AB_Banking_FindUsers(ab, AH_PROVIDER_NAME, "de",
bankId, userId, customerId);
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
return 3;
}
else {
AB_USER_LIST2_ITERATOR *uit;
uit=AB_User_List2_First(ul);
assert(uit);
u=AB_User_List2Iterator_Data(uit);
AB_User_List2Iterator_free(uit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
return 3;
}
else {
const AH_TAN_METHOD_LIST *tl;
tl=AH_User_GetTanMethodDescriptions(u);
if (tl) {
const AH_TAN_METHOD *tm;
tm=AH_TanMethod_List_First(tl);
fprintf(stdout, "TAN Methods\n");
while(tm) {
const char *mid;
const char *mname;
int combinedVersion;
combinedVersion=AH_TanMethod_GetFunction(tm)+(AH_TanMethod_GetGvVersion(tm)*1000);
fprintf(stdout,
"- %4d (F%3d/V%1d/P%1d)",
combinedVersion,
AH_TanMethod_GetFunction(tm),
AH_TanMethod_GetGvVersion(tm),
AH_TanMethod_GetProcess(tm));
mid=AH_TanMethod_GetMethodId(tm);
mname=AH_TanMethod_GetMethodName(tm);
if (mid && mname) {
fprintf(stdout, ": %s (%s)", mid, mname);
}
else if (mid && !mname) {
fprintf(stdout, ": %s", mid);
}
else if (!mid && mname) {
fprintf(stdout, ": %s", mname);
}
if (AH_User_HasTanMethod(u, AH_TanMethod_GetFunction(tm))) {
if (AH_User_GetSelectedTanMethod(u)==combinedVersion)
fprintf(stdout, " [available and selected]");
else
fprintf(stdout, " [available]");
}
else
fprintf(stdout, " [not available]");
fprintf(stdout, "\n");
tm=AH_TanMethod_List_Next(tm);
}
}
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int resetKeys(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
#warning "TODO"
#if 0
GWEN_DB_NODE *db;
AB_PROVIDER *pro;
AB_USER_LIST2 *ul;
AB_USER *u=0;
int rv;
const char *bankId;
const char *userId;
const char *customerId;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"Specify the bank code", /* short description */
"Specify the bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the user id (Benutzerkennung)", /* short description */
"Specify the user id (Benutzerkennung)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"customerId", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"customer", /* long option */
"Specify the customer id (Kundennummer)", /* short description */
"Specify the customer id (Kundennummer)" /* long description */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"userKeys", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"userkeys", /* long option */
"Reset user keys instead of bank keys", /* short description */
"Reset user keys instead of bank keys" /* long description */
},
{
GWEN_ARGS_FLAGS_HELP | GWEN_ARGS_FLAGS_LAST, /* flags */
GWEN_ArgsType_Int, /* type */
"help", /* name */
0, /* minnum */
0, /* maxnum */
"h", /* short option */
"help", /* long option */
"Show this help screen", /* short description */
"Show this help screen" /* long description */
}
};
db=GWEN_DB_GetGroup(dbArgs, GWEN_DB_FLAGS_DEFAULT, "local");
rv=GWEN_Args_Check(argc, argv, 1,
0 /*GWEN_ARGS_MODE_ALLOW_FREEPARAM*/,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments\n");
return 1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
fprintf(stderr, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
pro=AB_Banking_GetProvider(ab, "aqhbci");
assert(pro);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
userId=GWEN_DB_GetCharValue(db, "userId", 0, "*");
customerId=GWEN_DB_GetCharValue(db, "customerId", 0, "*");
ul=AB_Banking_FindUsers(ab, AH_PROVIDER_NAME,
"de", bankId, userId, customerId);
if (ul) {
if (AB_User_List2_GetSize(ul)!=1) {
DBG_ERROR(0, "Ambiguous customer specification");
AB_Banking_Fini(ab);
return 3;
}
else {
AB_USER_LIST2_ITERATOR *cit;
cit=AB_User_List2_First(ul);
assert(cit);
u=AB_User_List2Iterator_Data(cit);
AB_User_List2Iterator_free(cit);
}
AB_User_List2_free(ul);
}
if (!u) {
DBG_ERROR(0, "No matching customer");
AB_Banking_Fini(ab);
return 3;
}
else {
AH_MEDIUM *m;
m=AH_User_GetMedium(u);
assert(m);
rv=AH_Medium_Mount(m);
if (rv) {
DBG_ERROR(0, "Could not mount medium (%d)", rv);
AB_Banking_Fini(ab);
return 3;
}
rv=AH_Medium_SelectContext(m, AH_User_GetContextId(u));
if (rv) {
DBG_ERROR(0, "Could not select context %d (%d)",
AH_User_GetContextId(u), rv);
AB_Banking_Fini(ab);
return 3;
}
fprintf(stderr, "Resetting keys, please wait...\n");
if (GWEN_DB_VariableExists(db, "userKeys"))
rv=AH_Medium_ResetUserKeys(m);
else
rv=AH_Medium_ResetServerKeys(m);
if (rv) {
DBG_ERROR(0, "Could not reset keys (%d)", rv);
AB_Banking_Fini(ab);
return 3;
}
rv=AH_Medium_Unmount(m, 1);
if (rv) {
DBG_ERROR(0, "Could not unmount medium (%d)", rv);
AB_Banking_Fini(ab);
return 3;
}
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
#endif
return 0;
}
