/* --------------------------------------------------------------- FUNCTION */
int AH_Job_SepaStandingOrdersGet_Process(AH_JOB *j, AB_IMEXPORTER_CONTEXT *ctx){
GWEN_DB_NODE *dbResponses;
GWEN_DB_NODE *dbCurr;
const char *responseName;
int rv;
DBG_INFO(AQHBCI_LOGDOMAIN, "Processing JobSepaStandingOrdersGet");
assert(j);
responseName=AH_Job_GetResponseName(j);
dbResponses=AH_Job_GetResponses(j);
assert(dbResponses);
/* search for "Transactions" */
dbCurr=GWEN_DB_GetFirstGroup(dbResponses);
while(dbCurr) {
rv=AH_Job_CheckEncryption(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (encryption)");
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
rv=AH_Job_CheckSignature(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (signature)");
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
if (responseName && *responseName) {
GWEN_DB_NODE *dbXA;
dbXA=GWEN_DB_GetGroup(dbCurr, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "data");
if (dbXA)
dbXA=GWEN_DB_GetGroup(dbXA, GWEN_PATH_FLAGS_NAMEMUSTEXIST, responseName);
if (dbXA) {
const void *p;
unsigned int bs;
const char *fiId;
fiId=GWEN_DB_GetCharValue(dbXA, "fiId", 0, NULL);
p=GWEN_DB_GetBinValue(dbXA, "transfer", 0, 0, 0, &bs);
if (p && bs) {
rv=AH_Job_SepaStandingOrdersGet__ReadSto(j, ctx, p, bs, fiId);
if (rv<0) {
DBG_INFO(AQHBCI_LOGDOMAIN, "here (%d)", rv);
DBG_WARN(AQHBCI_LOGDOMAIN, "Error reading standing order from data, ignoring (%d)", rv);
}
}
}
}
dbCurr=GWEN_DB_GetNextGroup(dbCurr);
}
return 0;
}
int AH_Job_GetTransactionsCreditCard_Process(AH_JOB *j, AB_IMEXPORTER_CONTEXT *ctx)
{
AH_JOB_GETTRANSACTIONS *aj;
AB_ACCOUNT *a;
AB_IMEXPORTER_ACCOUNTINFO *ai;
AB_USER *u;
GWEN_DB_NODE *dbResponses;
GWEN_DB_NODE *dbCurr;
GWEN_BUFFER *tbooked;
GWEN_BUFFER *tnoted;
int rv;
DBG_INFO(AQHBCI_LOGDOMAIN, "Processing JobGetTransactionsCreditCard");
assert(j);
aj=GWEN_INHERIT_GETDATA(AH_JOB, AH_JOB_GETTRANSACTIONS, j);
assert(aj);
tbooked=GWEN_Buffer_new(0, 1024, 0, 1);
tnoted=GWEN_Buffer_new(0, 1024, 0, 1);
dbResponses=AH_Job_GetResponses(j);
assert(dbResponses);
DBG_INFO(AQHBCI_LOGDOMAIN, "Response:");
GWEN_DB_Dump(dbResponses, 2);
DBG_INFO(AQHBCI_LOGDOMAIN, "Response end");
a=AH_AccountJob_GetAccount(j);
assert(a);
ai=AB_ImExporterContext_GetOrAddAccountInfo(ctx,
AB_Account_GetUniqueId(a),
AB_Account_GetIban(a),
AB_Account_GetBankCode(a),
AB_Account_GetAccountNumber(a),
AB_Account_GetAccountType(a));
assert(ai);
AB_ImExporterAccountInfo_SetAccountId(ai, AB_Account_GetUniqueId(a));
u=AH_Job_GetUser(j);
assert(u);
/* search for "Transactions" */
dbCurr=GWEN_DB_GetFirstGroup(dbResponses);
while (dbCurr) {
GWEN_DB_NODE *dbXA;
rv=AH_Job_CheckEncryption(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (encryption)");
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
rv=AH_Job_CheckSignature(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (signature)");
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
dbXA=GWEN_DB_GetGroup(dbCurr, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"data/transactionscreditcard");
if (dbXA) {
GWEN_DB_NODE *dbT;
GWEN_DB_NODE *dbV;
GWEN_DATE *date;
GWEN_DATE *valutaDate;
const char *p;
const char *ref;
int i;
dbT=GWEN_DB_GetGroup(dbXA, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"entries");
while (dbT) {
AB_VALUE *v1;
AB_VALUE *v2;
GWEN_STRINGLIST *purpose;
AB_TRANSACTION *t;
/* read date (Buchungsdatum) */
p=GWEN_DB_GetCharValue(dbT, "date", 0, 0);
if (p)
date=GWEN_Date_fromStringWithTemplate(p, "YYYYMMDD");
else
date=NULL;
/* read valutaData (Umsatzdatum) */
p=GWEN_DB_GetCharValue(dbT, "valutaDate", 0, 0);
if (p)
valutaDate=GWEN_Date_fromStringWithTemplate(p, "YYYYMMDD");
else
valutaDate=NULL;
/* read value */
dbV=GWEN_DB_GetGroup(dbT, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"value");
if (dbV)
v1=AB_Value_fromDb(dbV);
else
v1=NULL;
v2=0;
if (!v1) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Error parsing value from DB");
}
else {
p=GWEN_DB_GetCharValue(dbT, "debitMark", 0, 0);
if (p) {
if (strcasecmp(p, "D")==0 ||
strcasecmp(p, "RC")==0) {
v2=AB_Value_dup(v1);
AB_Value_Negate(v2);
}
else if (strcasecmp(p, "C")==0 ||
strcasecmp(p, "RD")==0)
v2=AB_Value_dup(v1);
else {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Bad debit mark \"%s\"", p);
v2=0;
}
}
AB_Value_free(v1);
}
/* read purpose */
purpose=GWEN_StringList_new();
for (i=0; i<10; i++) {
p=GWEN_DB_GetCharValue(dbT, "purpose", i, 0);
if (!p)
break;
GWEN_StringList_AppendString(purpose, p, 0, 0);
}
/* read reference */
ref=GWEN_DB_GetCharValue(dbT, "reference", 0, 0);
if (ref)
GWEN_StringList_AppendString(purpose, ref, 0, 0);
t=AB_Transaction_new();
if (ref)
AB_Transaction_SetFiId(t, ref);
AB_Transaction_SetUniqueAccountId(t, AB_Account_GetUniqueId(a));
AB_Transaction_SetLocalBankCode(t, AB_User_GetBankCode(u));
AB_Transaction_SetLocalAccountNumber(t, AB_Account_GetAccountNumber(a));
AB_Transaction_SetValutaDate(t, valutaDate);
AB_Transaction_SetDate(t, date);
AB_Transaction_SetValue(t, v2);
AB_Transaction_SetPurposeFromStringList(t, purpose);
DBG_INFO(AQHBCI_LOGDOMAIN, "Adding transaction");
AB_ImExporterAccountInfo_AddTransaction(ai, t);
GWEN_StringList_free(purpose);
AB_Value_free(v2);
GWEN_Date_free(date);
GWEN_Date_free(valutaDate);
dbT = GWEN_DB_FindNextGroup(dbT, "entries");
} //while (dbT)
} //if (dbXA)
dbCurr=GWEN_DB_GetNextGroup(dbCurr);
}
return 0;
}
/* --------------------------------------------------------------- FUNCTION */
int AH_Job_GetBalance_Process(AH_JOB *j, AB_IMEXPORTER_CONTEXT *ctx){
AH_JOB_GETBALANCE *aj;
GWEN_DB_NODE *dbResponses;
GWEN_DB_NODE *dbCurr;
int rv;
DBG_INFO(AQHBCI_LOGDOMAIN, "Processing JobGetBalance");
assert(j);
aj=GWEN_INHERIT_GETDATA(AH_JOB, AH_JOB_GETBALANCE, j);
assert(aj);
dbResponses=AH_Job_GetResponses(j);
assert(dbResponses);
/* search for "Balance" */
dbCurr=GWEN_DB_GetFirstGroup(dbResponses);
while(dbCurr) {
GWEN_DB_NODE *dbBalance;
rv=AH_Job_CheckEncryption(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (encryption)");
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
rv=AH_Job_CheckSignature(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (signature)");
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
dbBalance=GWEN_DB_GetGroup(dbCurr, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"data/balance");
if (!dbBalance)
dbBalance=GWEN_DB_GetGroup(dbCurr, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"data/balancecreditcard");
if (dbBalance) {
AB_ACCOUNT_STATUS *acst;
GWEN_DB_NODE *dbT;
AB_ACCOUNT *a;
AB_IMEXPORTER_ACCOUNTINFO *ai;
DBG_NOTICE(AQHBCI_LOGDOMAIN, "Got a balance");
if (GWEN_Logger_GetLevel(0)>=GWEN_LoggerLevel_Debug)
GWEN_DB_Dump(dbBalance, 2);
acst=AB_AccountStatus_new();
/* read booked balance */
dbT=GWEN_DB_GetGroup(dbBalance, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"booked");
if (dbT) {
AB_BALANCE *bal;
bal=AH_Job_GetBalance__ReadBalance(dbT);
if (bal) {
AB_AccountStatus_SetBookedBalance(acst, bal);
AB_AccountStatus_SetTime(acst, AB_Balance_GetTime(bal));
AB_Balance_free(bal);
}
}
/* read noted balance */
dbT=GWEN_DB_GetGroup(dbBalance, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"noted");
if (dbT) {
AB_BALANCE *bal;
bal=AH_Job_GetBalance__ReadBalance(dbT);
if (bal) {
AB_AccountStatus_SetNotedBalance(acst, bal);
if (AB_AccountStatus_GetTime(acst)==NULL)
AB_AccountStatus_SetTime(acst, AB_Balance_GetTime(bal));
AB_Balance_free(bal);
}
}
/* read credit Line */
dbT=GWEN_DB_GetGroup(dbBalance, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"creditLine");
if (dbT) {
AB_VALUE *v;
v=AB_Value_fromDb(dbT);
if (!v) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Error parsing value from DB");
}
else {
AB_AccountStatus_SetBankLine(acst, v);
}
AB_Value_free(v);
}
a=AH_AccountJob_GetAccount(j);
assert(a);
ai=AB_ImExporterContext_GetAccountInfo(ctx,
AB_Account_GetBankCode(a),
AB_Account_GetAccountNumber(a));
assert(ai);
/* add new account status */
AB_ImExporterAccountInfo_AddAccountStatus(ai, acst);
break; /* break loop, we found the balance */
} /* if "Balance" */
dbCurr=GWEN_DB_GetNextGroup(dbCurr);
}
return 0;
}
/* --------------------------------------------------------------- FUNCTION */
int AH_Job_GetTransactions_Process(AH_JOB *j, AB_IMEXPORTER_CONTEXT *ctx)
{
AH_JOB_GETTRANSACTIONS *aj;
AB_ACCOUNT *a;
AB_IMEXPORTER_ACCOUNTINFO *ai;
GWEN_DB_NODE *dbResponses;
GWEN_DB_NODE *dbCurr;
GWEN_BUFFER *tbooked;
GWEN_BUFFER *tnoted;
int rv;
DBG_INFO(AQHBCI_LOGDOMAIN, "Processing JobGetTransactions");
assert(j);
aj=GWEN_INHERIT_GETDATA(AH_JOB, AH_JOB_GETTRANSACTIONS, j);
assert(aj);
tbooked=GWEN_Buffer_new(0, 1024, 0, 1);
tnoted=GWEN_Buffer_new(0, 1024, 0, 1);
dbResponses=AH_Job_GetResponses(j);
assert(dbResponses);
/* search for "Transactions" */
dbCurr=GWEN_DB_GetFirstGroup(dbResponses);
while (dbCurr) {
GWEN_DB_NODE *dbXA;
rv=AH_Job_CheckEncryption(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (encryption)");
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
rv=AH_Job_CheckSignature(j, dbCurr);
if (rv) {
DBG_INFO(AQHBCI_LOGDOMAIN, "Compromised security (signature)");
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
AH_Job_SetStatus(j, AH_JobStatusError);
return rv;
}
dbXA=GWEN_DB_GetGroup(dbCurr, GWEN_PATH_FLAGS_NAMEMUSTEXIST,
"data/transactions");
if (dbXA) {
const void *p;
unsigned int bs;
if (GWEN_Logger_GetLevel(0)>=GWEN_LoggerLevel_Debug)
GWEN_DB_Dump(dbXA, 2);
p=GWEN_DB_GetBinValue(dbXA, "booked", 0, 0, 0, &bs);
if (p && bs)
GWEN_Buffer_AppendBytes(tbooked, p, bs);
p=GWEN_DB_GetBinValue(dbXA, "noted", 0, 0, 0, &bs);
if (p && bs)
GWEN_Buffer_AppendBytes(tnoted, p, bs);
} /* if "Transactions" */
dbCurr=GWEN_DB_GetNextGroup(dbCurr);
}
GWEN_Buffer_Rewind(tbooked);
GWEN_Buffer_Rewind(tnoted);
/* now the buffers contain data to be parsed by DBIOs */
a=AH_AccountJob_GetAccount(j);
assert(a);
ai=AB_ImExporterContext_GetOrAddAccountInfo(ctx,
AB_Account_GetUniqueId(a),
AB_Account_GetIban(a),
AB_Account_GetBankCode(a),
AB_Account_GetAccountNumber(a),
AB_Account_GetAccountType(a));
assert(ai);
/* read booked transactions */
if (GWEN_Buffer_GetUsedBytes(tbooked)) {
if (getenv("AQHBCI_LOGBOOKED")) {
FILE *f;
f=fopen("/tmp/booked.mt", "w+");
if (f) {
if (fwrite(GWEN_Buffer_GetStart(tbooked),
GWEN_Buffer_GetUsedBytes(tbooked), 1, f)!=1) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "fwrite: %s", strerror(errno));
}
if (fclose(f)) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "fclose: %s", strerror(errno));
}
}
}
if (AH_Job_GetTransactions__ReadTransactions(j,
ai,
"SWIFT-MT940",
AB_Transaction_TypeStatement,
(const uint8_t *) GWEN_Buffer_GetStart(tbooked),
GWEN_Buffer_GetUsedBytes(tbooked))) {
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
DBG_INFO(AQHBCI_LOGDOMAIN, "Error parsing booked transactions");
AH_Job_SetStatus(j, AH_JobStatusError);
return -1;
}
}
/* read noted transactions */
if (GWEN_Buffer_GetUsedBytes(tnoted)) {
if (getenv("AQHBCI_LOGNOTED")) {
FILE *f;
f=fopen("/tmp/noted.mt", "w+");
if (f) {
if (fwrite(GWEN_Buffer_GetStart(tnoted),
GWEN_Buffer_GetUsedBytes(tnoted), 1, f)!=1) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "fwrite: %s", strerror(errno));
}
if (fclose(f)) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "fclose: %s", strerror(errno));
}
}
}
if (AH_Job_GetTransactions__ReadTransactions(j,
ai,
"SWIFT-MT942",
AB_Transaction_TypeNotedStatement,
(const uint8_t *) GWEN_Buffer_GetStart(tnoted),
GWEN_Buffer_GetUsedBytes(tnoted))) {
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
DBG_INFO(AQHBCI_LOGDOMAIN, "Error parsing noted transactions");
AH_Job_SetStatus(j, AH_JobStatusError);
return -1;
}
}
if (GWEN_Logger_GetLevel(AQHBCI_LOGDOMAIN)>=GWEN_LoggerLevel_Debug) {
GWEN_DB_NODE *gn;
AB_TRANSACTION *ttmp;
DBG_INFO(AQHBCI_LOGDOMAIN, "*** Dumping transactions *******************");
ttmp=AB_ImExporterAccountInfo_GetFirstTransaction(ai, 0, 0);
while (ttmp) {
DBG_INFO(AQHBCI_LOGDOMAIN, "*** --------------------------------------");
gn=GWEN_DB_Group_new("transaction");
AB_Transaction_toDb(ttmp, gn);
GWEN_DB_Dump(gn, 2);
GWEN_DB_Group_free(gn);
ttmp=AB_Transaction_List_Next(ttmp);
}
DBG_INFO(AQHBCI_LOGDOMAIN, "*** End dumping transactions ***************");
}
GWEN_Buffer_free(tbooked);
GWEN_Buffer_free(tnoted);
return 0;
}
