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;
}
void
gnc_AB_BANKING_delete(AB_BANKING *api)
{
if (!api)
api = gnc_AB_BANKING;
if (api)
{
if (api == gnc_AB_BANKING)
{
gnc_AB_BANKING = NULL;
gnc_AB_BANKING_fini(api);
}
AB_Banking_free(api);
}
}
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;
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) {
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 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 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 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;
}