int AB_free(aqbanking_Account *acct = NULL) {
int rv = 0;
if (acct == NULL) {
rv = AB_Banking_OnlineFini(ab);
} else {
rv = AB_Banking_OnlineFini(acct->ab);
}
if (rv)
{
PyErr_SetObject(AqBankingInitializeError, PyUnicode_FromFormat("Could not do online deinit. (%d).", rv));
return 3;
}
if (acct == NULL) {
rv = AB_Banking_Fini(ab);
} else {
rv = AB_Banking_Fini(acct->ab);
}
if (rv)
{
PyErr_SetObject(AqBankingInitializeError, PyUnicode_FromFormat("Could not do deinit. (%d).", rv));
return 3;
}
if (acct == NULL) {
AB_Banking_free(ab);
} else {
AB_Banking_free(acct->ab);
}
return 0;
}
gint
gnc_AB_BANKING_fini(AB_BANKING *api)
{
if (api == gnc_AB_BANKING)
{
if (--gnc_AB_BANKING_refcount == 0)
{
#ifdef AQBANKING_VERSION_5_PLUS
if (gnc_gwengui_extended_by_ABBanking)
AB_Gui_Unextend(gnc_gwengui_extended_by_ABBanking);
gnc_gwengui_extended_by_ABBanking = NULL;
#endif /* AQBANKING_VERSION_5_PLUS */
return AB_Banking_Fini(api);
}
}
else
{
#ifdef AQBANKING_VERSION_5_PLUS
if (gnc_gwengui_extended_by_ABBanking)
AB_Gui_Unextend(gnc_gwengui_extended_by_ABBanking);
gnc_gwengui_extended_by_ABBanking = NULL;
#endif /* AQBANKING_VERSION_5_PLUS */
return AB_Banking_Fini(api);
}
return 0;
}
int gnc_AB_BANKING_fini (AB_BANKING *api)
{
if (api == gnc_AB_BANKING)
{
gnc_AB_BANKING_refcnt--;
if (gnc_AB_BANKING_refcnt == 0)
return AB_Banking_Fini(api);
}
else
return AB_Banking_Fini(api);
return 0;
}
void gnc_AB_BANKING_delete (AB_BANKING *api)
{
if (api == 0)
api = gnc_AB_BANKING;
if (api)
{
if (api == gnc_AB_BANKING)
{
gnc_AB_BANKING = NULL;
gnc_hbci_inter = NULL;
if (gnc_AB_BANKING_refcnt > 0)
AB_Banking_Fini(api);
}
AB_Banking_free(api);
}
}
int main(int argc, char **argv) {
AB_BANKING *ab;
AB_ACCOUNT_LIST2 *accs;
int rv;
GWEN_GUI *gui;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGui(gui);
ab=AB_Banking_new("tutorial2", 0, 0);
rv=AB_Banking_Init(ab);
if (rv) {
fprintf(stderr, "Error on init (%d)\n", rv);
return 2;
}
rv=AB_Banking_OnlineInit(ab);
if (rv) {
fprintf(stderr, "Error on onlineinit (%d)\n", rv);
return 2;
}
fprintf(stderr, "AqBanking successfully initialized.\n");
/* Get a list of accounts which are known to AqBanking.
* There are some pecularities about the list returned:
* The list itself is owned by the caller (who must call
* AB_Account_List2_free() as we do below), but the elements of that
* list (->the accounts) are still owned by AqBanking.
* Therefore you MUST NOT free any of the accounts within the list returned.
* This also rules out calling AB_Account_List2_freeAll() which not only
* frees the list itself but also frees all its elements.
*
* The rest of this tutorial shows how lists are generally used by
* AqBanking.
*/
accs=AB_Banking_GetAccounts(ab);
if (accs) {
AB_ACCOUNT_LIST2_ITERATOR *it;
/* List2's are traversed using iterators. An iterator is an object
* which points to a single element of a list.
* If the list is empty NULL is returned.
*/
it=AB_Account_List2_First(accs);
if (it) {
AB_ACCOUNT *a;
/* this function returns a pointer to the element of the list to
* which the iterator currently points to */
a=AB_Account_List2Iterator_Data(it);
while(a) {
AB_PROVIDER *pro;
/* every account is assigned to a backend (sometimes called provider)
* which actually performs online banking tasks. We get a pointer
* to that provider/backend with this call to show its name in our
* example.*/
pro=AB_Account_GetProvider(a);
fprintf(stderr,
"Account: %s (%s) %s (%s) [%s]\n",
AB_Account_GetBankCode(a),
AB_Account_GetBankName(a),
AB_Account_GetAccountNumber(a),
AB_Account_GetAccountName(a),
/* the name of the provider/backend as decribed above */
AB_Provider_GetName(pro));
/* this function lets the iterator advance to the next element in
* the list, so a following call to AB_Account_List2Iterator_Data()
* would return a pointer to the next element.
* This function also returns a pointer to the next element of the
* list. If there is no next element then NULL is returned. */
a=AB_Account_List2Iterator_Next(it);
}
/* the iterator must be freed after using it */
AB_Account_List2Iterator_free(it);
}
/* as discussed the list itself is only a container which has to be freed
* after use. This explicitly does not free any of the elements in that
* list, and it shouldn't because AqBanking still is the owner of the
* accounts */
AB_Account_List2_free(accs);
}
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on online deinit (%d)\n", rv);
return 3;
}
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 3;
}
AB_Banking_free(ab);
return 0;
}
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 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 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 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 main(int argc, char **argv) {
AB_BANKING *ab;
int rv;
GWEN_GUI *gui;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGui(gui);
/* The first argument is the name of the application. This is needed for
* AqBanking to internally store some application-specific settings.
* This name may contain whatever characters you like, it is escaped
* internally before creating file paths or DB groups from it.
*
* The second argument is the folder in which the AqBanking settings are
* stored. You should in most cases provide NULL here which makes AqBanking
* choose the default path ($HOME/.aqbanking).
* If this folder doesn't exist it will be created as soon as AqBanking has
* something to store (in most cases when closing the application).
*/
ab=AB_Banking_new("tutorial1", 0, 0);
/* This function initializes AqBanking. It is only after successfull return
* from this function that any other AqBanking function may be used.
*/
rv=AB_Banking_Init(ab);
if (rv) {
fprintf(stderr, "Error on init (%d)\n", rv);
return 2;
}
/* Initialize the only banking part of AqBanking. This is needed to
* actually perform online banking actions (like retrieving account
* statements etc).
*/
rv=AB_Banking_OnlineInit(ab);
if (rv) {
fprintf(stderr, "Error on onlineinit (%d)\n", rv);
return 2;
}
fprintf(stderr, "AqBanking successfully initialized.\n");
/* deinit the online banking part of AqBanking */
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 3;
}
/* You must always call this function before exiting, because only then
* AqBanking's settings are written.
* After this function has been called no other function except
* AB_Banking_free() or AB_Banking_Init() may be called.
*/
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 3;
}
/* The AqBanking instance you created at the beginning must always be
* destroyed using this function to avoid memory leaks.
*/
AB_Banking_free(ab);
return 0;
}
int main(int argc, char **argv)
{
GWEN_GUI *gui;
AB_BANKING *ab;
AB_ACCOUNT_SPEC_LIST *accs=NULL;
AB_ACCOUNT_SPEC *as;
AB_IMEXPORTER_ACCOUNTINFO *ai;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGui(gui);
ab=AB_Banking_new("tutorial3", 0, 0);
AB_Banking_Init(ab);
fprintf(stderr, "AqBanking successfully initialized.\n");
/* get the list of known accounts */
AB_Banking_GetAccountSpecList(ab, &accs);
/* find a matching account within the given list */
as=AB_AccountSpec_List_FindFirst(accs,
"aqhbci", /* backendName */
"de", /* country */
"28*", /* bankId bank */
"*", /* accountNumber */
"*", /* subAccountId */
"*", /* iban */
"*", /* currency */
AB_AccountType_Unknown); /* ty */
if (as) {
AB_TRANSACTION_LIST2 *cmdList;
AB_TRANSACTION *t;
AB_IMEXPORTER_CONTEXT *ctx;
cmdList=AB_Transaction_List2_new();
t=AB_Transaction_new();
AB_Transaction_SetCommand(t, AB_Transaction_CommandGetTransactions);
AB_Transaction_SetUniqueAccountId(t, AB_AccountSpec_GetUniqueId(as));
AB_Transaction_List2_PushBack(cmdList, t);
ctx=AB_ImExporterContext_new();
AB_Banking_SendCommands(ab, cmdList, ctx);
ai=AB_ImExporterContext_GetFirstAccountInfo(ctx);
while (ai) {
const AB_TRANSACTION *t;
t=AB_ImExporterAccountInfo_GetFirstTransaction(ai, 0, 0);
while (t) {
const AB_VALUE *v;
v=AB_Transaction_GetValue(t);
if (v) {
const char *purpose;
purpose=AB_Transaction_GetPurpose(t);
fprintf(stderr, " %-32s (%.2f %s)\n",
purpose,
AB_Value_GetValueAsDouble(v),
AB_Value_GetCurrency(v));
}
t=AB_Transaction_List_Next(t);
} /* while transactions */
ai=AB_ImExporterAccountInfo_List_Next(ai);
} /* while ai */
AB_ImExporterContext_free(ctx);
} /* if (as) */
AB_Banking_Fini(ab);
AB_Banking_free(ab);
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;
}
int listUsers(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
int rv;
int xml=0;
AB_USER_LIST2 *ul;
const GWEN_ARGS args[]={
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"xml", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"xml", /* long option */
"Export as xml", /* short description */
0
},
{
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;
}
xml=GWEN_DB_VariableExists(db, "xml");
if( xml ) {
fprintf( stdout, "<?xml version=\"1.0\"?>\n" );
fprintf( stdout, "<users>\n" );
}
ul=AB_Banking_FindUsers(ab, EBC_PROVIDER_NAME, "*", "*", "*", "*");
if (ul) {
AB_USER_LIST2_ITERATOR *uit;
uit=AB_User_List2_First(ul);
if (uit) {
AB_USER *u;
int i=0;
u=AB_User_List2Iterator_Data(uit);
assert(u);
while(u) {
if( !xml ) {
fprintf(stdout, "User %d: Bank: %s/%s User Id: %s Customer Id: %s\n",
i++,
AB_User_GetCountry(u),
AB_User_GetBankCode(u),
AB_User_GetUserId(u),
AB_User_GetCustomerId(u));
}
else {
const char *name = AB_User_GetUserName(u);
fprintf( stdout, " <user>\n" );
fprintf( stdout, " <userUniqueId>%d</userUniqueId>\n", AB_User_GetUniqueId(u) );
if( !name )
fprintf( stdout, " <UserName></UserName>\n" );
else
fprintf( stdout, " <UserName><![CDATA[%s]]></UserName>\n", name );
fprintf( stdout, " <UserId>%s</UserId>\n", AB_User_GetUserId(u) );
fprintf( stdout, " <CustomerId>%s</CustomerId>\n", AB_User_GetCustomerId(u) );
fprintf( stdout, " <BankCode>%s</BankCode>\n", AB_User_GetBankCode(u) );
fprintf( stdout, " <Country>%s</Country>\n", AB_User_GetCountry(u) );
fprintf( stdout, " <LastSessionId>%d</LastSessionId>\n", AB_User_GetLastSessionId(u) );
fprintf( stdout, " </user>\n\n" );
}
u=AB_User_List2Iterator_Next(uit);
}
AB_User_List2Iterator_free(uit);
}
AB_User_List2_free(ul);
}
else {
fprintf(stderr, "No users found.\n");
}
if( xml ) {
fprintf( stdout, "</users>\n" );
}
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 main(int argc, char **argv)
{
AB_BANKING *ab;
AB_ACCOUNT_SPEC_LIST *accs=NULL;
int rv;
GWEN_GUI *gui;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGui(gui);
ab=AB_Banking_new("tutorial2", 0, 0);
/* Initialize AqBanking */
rv=AB_Banking_Init(ab);
if (rv) {
fprintf(stderr, "Error on init (%d: %s)\n", rv, GWEN_Error_SimpleToString(rv));;
return 2;
}
fprintf(stderr, "AqBanking successfully initialized.\n");
/* Get a list of accounts which are known to AqBanking.
* We own the list returned, so in order to avoid memory
* leaks we need to free it afterwards.
*
* The rest of this tutorial shows how lists are generally used by
* AqBanking.
*/
rv=AB_Banking_GetAccountSpecList(ab, &accs);
if (rv<0) {
fprintf(stderr, "Unable to get the list of accounts (%d: %s)\n", rv, GWEN_Error_SimpleToString(rv));
return 3;
}
else {
AB_ACCOUNT_SPEC *as;
/* return the first entry of the account spec list */
as=AB_AccountSpec_List_First(accs);
while (as) {
fprintf(stderr,
"Account: %s %s (%s) [%s]\n",
AB_AccountSpec_GetBankCode(as),
AB_AccountSpec_GetAccountNumber(as),
AB_AccountSpec_GetAccountName(as),
/* every account is assigned to a backend (sometimes called provider)
* which actually performs online banking tasks. We get a pointer
* to that provider/backend with this call to show its name in our
* example.*/
AB_AccountSpec_GetBackendName(as));
/* return the next entry of the account spec list */
as=AB_AccountSpec_List_Next(as);
}
/* free the list to avoid memory leaks */
AB_AccountSpec_List_free(accs);
}
/* deinitialize AqBanking */
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 3;
}
/* free AqBanking object */
AB_Banking_free(ab);
return 0;
}
static
int listTrans(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
int rv;
const char *ctxFile;
const char *outFile;
const char *exporterName;
const char *profileName;
const char *profileFile;
AB_IMEXPORTER_CONTEXT *ctx=0;
AB_IMEXPORTER_CONTEXT *nctx=0;
AB_IMEXPORTER_ACCOUNTINFO *iea=0;
const char *bankId;
const char *accountId;
const char *bankName;
const char *accountName;
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 number", /* short description */
"Specify the account number" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankName", /* name */
0, /* minnum */
1, /* maxnum */
"N", /* short option */
"bankname", /* long option */
"Specify the bank name", /* short description */
"Specify the bank name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"accountName", /* name */
0, /* minnum */
1, /* maxnum */
"n", /* short option */
"accountname", /* long option */
"Specify the account name", /* short description */
"Specify the account name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ctxFile", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"ctxfile", /* long option */
"Specify the file to store the context in", /* short description */
"Specify the file to store the context in" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"outFile", /* name */
0, /* minnum */
1, /* maxnum */
"o", /* short option */
"outfile", /* long option */
"Specify the file to store the data in", /* short description */
"Specify the file to store the data in" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"exporterName", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"exporter", /* long option */
"Specify the exporter to use", /* short description */
"Specify the exporter to use" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"profileName", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"profile", /* long option */
"Specify the export profile to use", /* short description */
"Specify the export profile to use" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"profileFile", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"profile-file", /* long option */
"Specify the file to load the export profile from",/* short description */
"Specify the file to load the export profile from" /* 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;
}
exporterName=GWEN_DB_GetCharValue(db, "exporterName", 0, "csv");
profileName=GWEN_DB_GetCharValue(db, "profileName", 0, "default");
profileFile=GWEN_DB_GetCharValue(db, "profileFile", 0, NULL);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, 0);
bankName=GWEN_DB_GetCharValue(db, "bankName", 0, 0);
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, 0);
accountName=GWEN_DB_GetCharValue(db, "accountName", 0, 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;
}
/* load ctx file */
ctxFile=GWEN_DB_GetCharValue(db, "ctxfile", 0, 0);
rv=readContext(ctxFile, &ctx, 1);
if (rv<0) {
DBG_ERROR(0, "Error reading context (%d)", rv);
AB_ImExporterContext_free(ctx);
return 4;
}
nctx=AB_ImExporterContext_new();
iea=AB_ImExporterContext_GetFirstAccountInfo(ctx);
while(iea) {
int matches=1;
const char *s;
if (matches && bankId) {
s=AB_ImExporterAccountInfo_GetBankCode(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, bankId, 0))
matches=0;
}
if (matches && bankName) {
s=AB_ImExporterAccountInfo_GetBankName(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, bankName, 0))
matches=0;
}
if (matches && accountId) {
s=AB_ImExporterAccountInfo_GetAccountNumber(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, accountId, 0))
matches=0;
}
if (matches && accountName) {
s=AB_ImExporterAccountInfo_GetAccountName(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, accountName, 0))
matches=0;
}
if (matches) {
AB_IMEXPORTER_ACCOUNTINFO *nai;
nai=AB_ImExporterAccountInfo_dup(iea);
AB_ImExporterContext_AddAccountInfo(nctx, nai);
} /* if matches */
iea=AB_ImExporterContext_GetNextAccountInfo(ctx);
} /* while */
AB_ImExporterContext_free(ctx);
/* export new context */
rv=AB_Banking_ExportToFileWithProfile(ab, exporterName, nctx,
profileName, profileFile,
outFile);
if (rv<0) {
DBG_ERROR(0, "Error exporting (%d).", rv);
AB_ImExporterContext_free(nctx);
return 4;
}
AB_ImExporterContext_free(nctx);
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
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 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;
}
static
int addTransaction(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
int rv;
AB_JOB_TYPE transferType;
const char *ctxFile;
const char *bankId;
const char *accountId;
const char *subAccountId;
AB_IMEXPORTER_CONTEXT *ctx=0;
AB_ACCOUNT_LIST2 *al;
AB_ACCOUNT *a;
AB_TRANSACTION *t;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ctxFile", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"ctxfile", /* long option */
"Specify the file to store the context in", /* short description */
"Specify the file to store the context in" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
0, /* minnum */
1, /* maxnum */
"b", /* short option */
"bank", /* long option */
"overwrite the bank code", /* short description */
"overwrite 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 */
"overwrite the account number", /* short description */
"overwrite the account number" /* 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 */
"remoteBankId", /* name */
1, /* minnum */
1, /* maxnum */
0, /* short option */
"rbank", /* long option */
"Specify the remote bank code",/* short description */
"Specify the remote bank code" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"remoteAccountId", /* name */
1, /* minnum */
1, /* maxnum */
0, /* short option */
"raccount", /* long option */
"Specify the remote account number", /* short description */
"Specify the remote account number" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"remoteIban", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"riban", /* long option */
"Specify the remote IBAN", /* short description */
"Specify the remote IBAN" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"remoteBic", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"rbic", /* long option */
"Specify the remote BIC", /* short description */
"Specify the remote BIC" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"value", /* name */
1, /* minnum */
1, /* maxnum */
"v", /* short option */
"value", /* long option */
"Specify the transfer amount", /* short description */
"Specify the transfer amount" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Int, /* type */
"textkey", /* name */
0, /* minnum */
1, /* maxnum */
"t", /* short option */
"textkey", /* long option */
"Specify the text key (51 for normal transfer)", /* short description */
"Specify the text key (51 for normal transfer)" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"remoteName", /* name */
1, /* minnum */
2, /* maxnum */
0, /* short option */
"rname", /* long option */
"Specify the remote name", /* short description */
"Specify the remote name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"purpose", /* name */
1, /* minnum */
6, /* maxnum */
"p", /* short option */
"purpose", /* long option */
"Specify the purpose", /* short description */
"Specify the purpose" /* 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;
}
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, 0);
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, 0);
subAccountId=GWEN_DB_GetCharValue(db, "subAccountId", 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;
}
/* get account */
al=AB_Banking_FindAccounts(ab, "*", "*", bankId, accountId, subAccountId);
if (al==NULL || AB_Account_List2_GetSize(al)==0) {
DBG_ERROR(0, "Account not found");
AB_Account_List2_free(al);
return 2;
}
else if (AB_Account_List2_GetSize(al)>1) {
DBG_ERROR(0, "Ambiguous account specification");
AB_Account_List2_free(al);
return 2;
}
a=AB_Account_List2_GetFront(al);
AB_Account_List2_free(al);
/* create transaction from arguments */
t=mkTransfer(a, db, &transferType);
if (t==NULL) {
DBG_ERROR(0, "Could not create transaction from arguments");
return 2;
}
ctxFile=GWEN_DB_GetCharValue(db, "ctxfile", 0, 0);
rv=readContext(ctxFile, &ctx, 0);
if (rv<0) {
DBG_ERROR(0, "Error reading context (%d)", rv);
AB_Transaction_free(t);
return 4;
}
AB_ImExporterContext_AddTransaction(ctx, t);
rv=writeContext(ctxFile, ctx);
AB_ImExporterContext_free(ctx);
if (rv<0) {
DBG_ERROR(0, "Error writing context (%d)", rv);
return 4;
}
/* that's it */
rv=AB_Banking_OnlineFini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on 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;
}
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 sepaTransfer(AB_BANKING *ab, GWEN_DB_NODE *dbArgs, int argc, char **argv)
{
GWEN_DB_NODE *db;
AB_ACCOUNT_SPEC *as;
int rv;
int rvExec=0;
const char *ctxFile;
AB_TRANSACTION *t;
int noCheck;
/* parse command line arguments */
db=_readCommandLine(dbArgs, argc, argv);
if (db==NULL) {
/* error in command line */
return 1;
}
/* read arguments */
noCheck=GWEN_DB_GetIntValue(db, "noCheck", 0, 0);
ctxFile=GWEN_DB_GetCharValue(db, "ctxfile", 0, 0);
/* init AqBanking */
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
/* get account to work with */
as=getSingleSelectedAccount(ab, db);
if (as==NULL) {
AB_Banking_Fini(ab);
return 2;
}
/* create transaction from arguments */
t=mkSepaTransfer(db, AB_Transaction_CommandSepaTransfer);
if (t==NULL) {
DBG_ERROR(0, "Could not create SEPA transaction from arguments");
AB_Transaction_free(t);
AB_AccountSpec_free(as);
AB_Banking_Fini(ab);
return 2;
}
AB_Transaction_SetUniqueAccountId(t, AB_AccountSpec_GetUniqueId(as));
/* set local account info from selected AB_ACCOUNT_SPEC */
AB_Banking_FillTransactionFromAccountSpec(t, as);
/* some checks */
rv=checkTransactionIbans(t);
if (rv!=0) {
AB_Transaction_free(t);
AB_AccountSpec_free(as);
AB_Banking_Fini(ab);
return rv;
}
/* probably check against transaction limits */
if (!noCheck) {
rv=checkTransactionLimits(t,
AB_AccountSpec_GetTransactionLimitsForCommand(as, AB_Transaction_GetCommand(t)),
AQBANKING_TOOL_LIMITFLAGS_PURPOSE |
AQBANKING_TOOL_LIMITFLAGS_NAMES |
AQBANKING_TOOL_LIMITFLAGS_DATE |
AQBANKING_TOOL_LIMITFLAGS_SEPA);
if (rv!=0) {
AB_Transaction_free(t);
AB_AccountSpec_free(as);
AB_Banking_Fini(ab);
return rv;
}
}
AB_AccountSpec_free(as);
/* execute job */
rv=execSingleBankingJob(ab, t, ctxFile);
if (rv) {
fprintf(stderr, "Error on executeQueue (%d)\n", rv);
rvExec=rv;
}
/* cleanup */
AB_Transaction_free(t);
/* that's it */
rv=AB_Banking_Fini(ab);
if (rv<0) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
if (rvExec==0)
rvExec=5;
}
return rvExec;
}
static
int listBal(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
int rv;
const char *ctxFile;
const char *outFile;
AB_IMEXPORTER_CONTEXT *ctx=0;
AB_IMEXPORTER_ACCOUNTINFO *iea=0;
const char *bankId;
const char *accountId;
const char *bankName;
const char *accountName;
FILE *f;
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 number", /* short description */
"Specify the account number" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankName", /* name */
0, /* minnum */
1, /* maxnum */
"N", /* short option */
"bankname", /* long option */
"Specify the bank name", /* short description */
"Specify the bank name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"accountName", /* name */
0, /* minnum */
1, /* maxnum */
"n", /* short option */
"accountname", /* long option */
"Specify the account name", /* short description */
"Specify the account name" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ctxFile", /* name */
0, /* minnum */
1, /* maxnum */
"c", /* short option */
"ctxfile", /* long option */
"Specify the file to store the context in", /* short description */
"Specify the file to store the context in" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"outFile", /* name */
0, /* minnum */
1, /* maxnum */
"o", /* short option */
"outfile", /* long option */
"Specify the file to store the data in", /* short description */
"Specify the file to store the data in" /* 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;
}
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, 0);
bankName=GWEN_DB_GetCharValue(db, "bankName", 0, 0);
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, 0);
accountName=GWEN_DB_GetCharValue(db, "accountName", 0, 0);
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
ctxFile=GWEN_DB_GetCharValue(db, "ctxfile", 0, 0);
rv=readContext(ctxFile, &ctx, 1);
if (rv<0) {
DBG_ERROR(0, "Error reading context (%d)", rv);
return 4;
}
/* open output stream */
outFile=GWEN_DB_GetCharValue(db, "outFile", 0, 0);
if (outFile==0)
f=stdout;
else
f=fopen(outFile, "w+");
if (f==0) {
DBG_ERROR(0, "Error selecting output file: %s",
strerror(errno));
return 4;
}
iea=AB_ImExporterContext_GetFirstAccountInfo(ctx);
while(iea) {
int matches=1;
const char *s;
if (matches && bankId) {
s=AB_ImExporterAccountInfo_GetBankCode(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, bankId, 0))
matches=0;
}
if (matches && bankName) {
s=AB_ImExporterAccountInfo_GetBankName(iea);
if (!s || !*s)
s=AB_ImExporterAccountInfo_GetBankName(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, bankName, 0))
matches=0;
}
if (matches && accountId) {
s=AB_ImExporterAccountInfo_GetAccountNumber(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, accountId, 0))
matches=0;
}
if (matches && accountName) {
s=AB_ImExporterAccountInfo_GetAccountName(iea);
if (!s || !*s)
s=AB_ImExporterAccountInfo_GetAccountName(iea);
if (!s || !*s || -1==GWEN_Text_ComparePattern(s, accountName, 0))
matches=0;
}
if (matches) {
AB_ACCOUNT_STATUS *ast;
ast=_getLastAccountStatus(iea);
if (ast) {
const GWEN_TIME *ti;
const char *s;
fprintf(f, "Account\t");
s=AB_ImExporterAccountInfo_GetBankCode(iea);
if (!s)
s="";
fprintf(f, "%s\t", s);
s=AB_ImExporterAccountInfo_GetAccountNumber(iea);
if (!s)
s="";
fprintf(f, "%s\t", s);
s=AB_ImExporterAccountInfo_GetBankName(iea);
if (!s)
s="";
fprintf(f, "%s\t", s);
s=AB_ImExporterAccountInfo_GetAccountName(iea);
if (!s)
s="";
fprintf(f, "%s\t", s);
ti=AB_AccountStatus_GetTime(ast);
_dumpBal(AB_AccountStatus_GetBookedBalance(ast), ti, f);
_dumpBal(AB_AccountStatus_GetNotedBalance(ast), ti, f);
fprintf(f, "\n");
}
} /* if matches */
iea=AB_ImExporterContext_GetNextAccountInfo(ctx);
} /* while */
if (outFile) {
if (fclose(f)) {
DBG_ERROR(0, "Error closing output file: %s",
strerror(errno));
return 4;
}
}
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 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;
}
int test3(int argc, char **argv) {
#ifdef USE_GWENGUI_GTK2
GWEN_GUI *gui;
GWEN_DIALOG *dlg;
int rv;
AB_BANKING *ab;
rv=GWEN_Init();
if (rv) {
fprintf(stderr, "ERROR: Unable to init Gwen.\n");
exit(2);
}
GWEN_Logger_SetLevel(AQBANKING_LOGDOMAIN, GWEN_LoggerLevel_Info);
GWEN_Logger_SetLevel(AQOFXCONNECT_LOGDOMAIN, GWEN_LoggerLevel_Info);
GWEN_Logger_SetLevel(GWEN_LOGDOMAIN, GWEN_LoggerLevel_Debug);
gtk_init(&argc, &argv);
gui=Gtk2_Gui_new();
GWEN_Gui_SetGui(gui);
ab=AB_Banking_new("test-ofxhome", NULL, 0);
rv=AB_Banking_Init(ab);
if (rv<0){
fprintf(stderr, "Error on banking init: %d\n", rv);
exit(2);
}
AB_Gui_Extend(gui, ab);
dlg=OH_GetInstituteDialog_new("/tmp/ofx", NULL);
if (dlg==NULL) {
fprintf(stderr, "Could not create dialog\n");
exit(2);
}
rv=GWEN_Gui_ExecDialog(dlg, 0);
if (rv<=0){
fprintf(stderr, "Dialog was aborted/rejected\n");
}
else {
const OH_INSTITUTE_DATA *od;
fprintf(stderr, "Dialog accepted, all fine\n");
od=OH_GetInstituteDialog_GetSelectedInstitute(dlg);
if (od) {
fprintf(stderr, "- Id : %d\n", OH_InstituteData_GetId(od));
fprintf(stderr, "- Name: %s\n", OH_InstituteData_GetName(od));
fprintf(stderr, "- FID : %s\n", OH_InstituteData_GetFid(od));
fprintf(stderr, "- ORG : %s\n", OH_InstituteData_GetOrg(od));
fprintf(stderr, "- URL : %s\n", OH_InstituteData_GetUrl(od));
}
}
GWEN_Dialog_free(dlg);
AB_Gui_Unextend(gui);
rv=AB_Banking_Fini(ab);
if (rv<0){
fprintf(stderr, "Error on banking fini: %d\n", rv);
exit(2);
}
AB_Banking_free(ab);
GWEN_Gui_free(gui);
#endif
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 listBal(AB_BANKING *ab, GWEN_DB_NODE *dbArgs, int argc, char **argv)
{
GWEN_DB_NODE *db;
int rv;
const char *ctxFile;
AB_IMEXPORTER_CONTEXT *ctx=0;
AB_IMEXPORTER_ACCOUNTINFO *iea=0;
uint32_t aid;
const char *bankId;
const char *accountId;
const char *subAccountId;
const char *iban;
const char *tmplString;
const char *s;
AB_BALANCE_TYPE bt=AB_Balance_TypeBooked;
/* parse command line arguments */
db=_readCommandLine(dbArgs, argc, argv);
if (db==NULL) {
/* error in command line */
return 1;
}
/* read command line arguments */
aid=(uint32_t)GWEN_DB_GetIntValue(db, "uniqueAccountId", 0, 0);
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, 0);
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, 0);
subAccountId=GWEN_DB_GetCharValue(db, "subAccountId", 0, 0);
iban=GWEN_DB_GetCharValue(db, "iban", 0, 0);
tmplString=GWEN_DB_GetCharValue(db, "template", 0,
"$(dateAsString)\t"
"$(valueAsString)\t"
"$(iban)");
/* determine balance type */
s=GWEN_DB_GetCharValue(db, "balanceType", 0, "noted");
if (s && *s) {
AB_BALANCE_TYPE tempBalanceType;
tempBalanceType=AB_Balance_Type_fromString(s);
if (tempBalanceType==AB_Balance_TypeUnknown) {
DBG_ERROR(0, "Invalid balance type given (%s)", s);
return 1;
}
bt=tempBalanceType;
}
/* init AqBanking */
rv=AB_Banking_Init(ab);
if (rv) {
DBG_ERROR(0, "Error on init (%d)", rv);
return 2;
}
/* load ctx file */
ctxFile=GWEN_DB_GetCharValue(db, "ctxfile", 0, 0);
rv=readContext(ctxFile, &ctx, 1);
if (rv<0) {
DBG_ERROR(0, "Error reading context (%d)", rv);
AB_ImExporterContext_free(ctx);
return 4;
}
/* copy context, but only keep wanted accounts and transactions */
iea=AB_ImExporterContext_GetFirstAccountInfo(ctx);
while (iea) {
if (AB_ImExporterAccountInfo_Matches(iea,
aid, /* unique account id */
"*",
bankId,
accountId,
subAccountId,
iban,
"*", /* currency */
AB_AccountType_Unknown)) {
AB_BALANCE *bal;
GWEN_DB_NODE *dbAccount;
const char *s;
dbAccount=GWEN_DB_Group_new("dbAccount");
s=AB_ImExporterAccountInfo_GetBankCode(iea);
if (s && *s)
GWEN_DB_SetCharValue(dbAccount, GWEN_DB_FLAGS_OVERWRITE_VARS, "bankCode", s);
s=AB_ImExporterAccountInfo_GetAccountNumber(iea);
if (s && *s)
GWEN_DB_SetCharValue(dbAccount, GWEN_DB_FLAGS_OVERWRITE_VARS, "accountNumber", s);
s=AB_ImExporterAccountInfo_GetBic(iea);
if (s && *s)
GWEN_DB_SetCharValue(dbAccount, GWEN_DB_FLAGS_OVERWRITE_VARS, "bic", s);
s=AB_ImExporterAccountInfo_GetIban(iea);
if (s && *s)
GWEN_DB_SetCharValue(dbAccount, GWEN_DB_FLAGS_OVERWRITE_VARS, "iban", s);
bal=AB_Balance_List_GetLatestByType(AB_ImExporterAccountInfo_GetBalanceList(iea), bt);
if (bal) {
GWEN_DB_NODE *dbElement;
const AB_VALUE *v;
const GWEN_DATE *dt;
GWEN_BUFFER *dbuf;
dbElement=GWEN_DB_Group_dup(dbAccount);
AB_Balance_toDb(bal, dbElement);
/* translate value */
dbuf=GWEN_Buffer_new(0, 256, 0, 1);
v=AB_Balance_GetValue(bal);
if (v) {
AB_Value_toHumanReadableString(v, dbuf, 2, 0);
GWEN_DB_SetCharValue(dbElement, GWEN_DB_FLAGS_OVERWRITE_VARS, "valueAsString", GWEN_Buffer_GetStart(dbuf));
GWEN_Buffer_Reset(dbuf);
}
/* translate date */
dt=AB_Balance_GetDate(bal);
if (dt) {
rv=GWEN_Date_toStringWithTemplate(dt, I18N("DD.MM.YYYY"), dbuf);
if (rv>=0) {
GWEN_DB_SetCharValue(dbElement, GWEN_DB_FLAGS_OVERWRITE_VARS, "dateAsString", GWEN_Buffer_GetStart(dbuf));
}
GWEN_Buffer_Reset(dbuf);
}
GWEN_DB_ReplaceVars(dbElement, tmplString, dbuf);
fprintf(stdout, "%s\n", GWEN_Buffer_GetStart(dbuf));
GWEN_Buffer_free(dbuf);
GWEN_DB_Group_free(dbElement);
} /* if bal */
GWEN_DB_Group_free(dbAccount);
} /* if account matches */
iea=AB_ImExporterAccountInfo_List_Next(iea);
} /* while */
AB_ImExporterContext_free(ctx);
/* deinit */
rv=AB_Banking_Fini(ab);
if (rv) {
fprintf(stderr, "ERROR: Error on deinit (%d)\n", rv);
return 5;
}
return 0;
}
int listAccounts(AB_BANKING *ab,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv) {
GWEN_DB_NODE *db;
int rv;
AB_ACCOUNT_LIST2 *al;
const GWEN_ARGS args[]={
{
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;
}
al=AB_Banking_FindAccounts(ab, EBC_PROVIDER_NAME, "*", "*", "*", "*");
if (al) {
AB_ACCOUNT_LIST2_ITERATOR *ait;
ait=AB_Account_List2_First(al);
if (ait) {
AB_ACCOUNT *a;
int i=0;
a=AB_Account_List2Iterator_Data(ait);
assert(a);
while(a) {
fprintf(stdout, "Account %d: Bank: %s Account Number: %s\n",
i++,
AB_Account_GetBankCode(a),
AB_Account_GetAccountNumber(a));
a=AB_Account_List2Iterator_Next(ait);
}
AB_Account_List2Iterator_free(ait);
}
AB_Account_List2_free(al);
}
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;
}
