void GWEN_DlgShowBox_Init(GWEN_DIALOG *dlg) {
GWEN_DLGSHOWBOX *xdlg;
int i;
GWEN_DB_NODE *dbParams;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, GWEN_DLGSHOWBOX, dlg);
assert(xdlg);
dbParams=GWEN_Dialog_GetPreferences(dlg);
assert(dbParams);
/* read width */
i=GWEN_DB_GetIntValue(dbParams, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbParams, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* special stuff */
if (xdlg->title)
GWEN_Dialog_SetCharProperty(dlg, "", GWEN_DialogProperty_Title, 0, xdlg->title, 0);
if (xdlg->text)
GWEN_Dialog_SetCharProperty(dlg, "descrLabel", GWEN_DialogProperty_Title, 0, xdlg->text, 0);
xdlg->wasInit=1;
}
int LC_Starcos_KeyDescr_ReadDb(LC_STARCOS_KEYDESCR *st, GWEN_DB_NODE *db) {
assert(st);
assert(db);
LC_Starcos_KeyDescr_SetKeyId(st, GWEN_DB_GetIntValue(db, "keyId", 0, 0));
LC_Starcos_KeyDescr_SetStatus(st, GWEN_DB_GetIntValue(db, "status", 0, 0));
LC_Starcos_KeyDescr_SetKeyType(st, GWEN_DB_GetIntValue(db, "keyType", 0, 0));
LC_Starcos_KeyDescr_SetKeyNum(st, GWEN_DB_GetIntValue(db, "keyNum", 0, 0));
LC_Starcos_KeyDescr_SetKeyVer(st, GWEN_DB_GetIntValue(db, "keyVer", 0, 0));
return 0;
}
void AB_SetupNewUserDialog_Init(GWEN_DIALOG *dlg) {
AB_SETUP_NEWUSER_DIALOG *xdlg;
GWEN_DB_NODE *dbPrefs;
int i;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, AB_SETUP_NEWUSER_DIALOG, dlg);
assert(xdlg);
dbPrefs=GWEN_Dialog_GetPreferences(dlg);
GWEN_Dialog_SetCharProperty(dlg,
"",
GWEN_DialogProperty_Title,
0,
I18N("New User Wizard"),
0);
/* select first page */
GWEN_Dialog_SetIntProperty(dlg, "wiz_stack", GWEN_DialogProperty_Value, 0, 0, 0);
/* setup intro page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_begin_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>This dialog assists you in creating an online banking user."
"The following steps are:</p>"
"<ul>"
"<li>select the banking protocol</li>"
"<li>select the type of user to create</li>"
"</ul>"
"</html>"
"This dialog assists you in creating an online banking user.\n"
"The following steps are:\n"
" - select the banking protocol\n"
" - select the type of user to create\n"),
0);
/* read width */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* disable next and previous buttons */
GWEN_Dialog_SetIntProperty(dlg, "wiz_prev_button", GWEN_DialogProperty_Enabled, 0, 0, 0);
GWEN_Dialog_SetIntProperty(dlg, "wiz_next_button", GWEN_DialogProperty_Enabled, 0, 1, 0);
}
int LC_DDVCard_GetKeyVersion1(LC_CARD *card, int keyNumber){
LC_DDVCARD *ddv;
GWEN_DB_NODE *dbReq;
GWEN_DB_NODE *dbResp;
LC_CLIENT_RESULT res;
int keyVersion;
assert(card);
ddv=GWEN_INHERIT_GETDATA(LC_CARD, LC_DDVCARD, card);
assert(ddv);
dbReq=GWEN_DB_Group_new("GetKeyInfo");
dbResp=GWEN_DB_Group_new("response");
GWEN_DB_SetIntValue(dbReq, GWEN_DB_FLAGS_DEFAULT,
"keyNumber", keyNumber);
res=LC_Card_ExecCommand(card, "GetKeyInfo", dbReq, dbResp);
if (res!=LC_Client_ResultOk) {
GWEN_DB_Group_free(dbReq);
GWEN_DB_Group_free(dbResp);
return -1;
}
keyVersion=GWEN_DB_GetIntValue(dbResp,
"response/keyVersion", 0, -1);
if (keyVersion==-1) {
DBG_ERROR(LC_LOGDOMAIN, "No keyversion returned by command");
}
GWEN_DB_Group_free(dbReq);
GWEN_DB_Group_free(dbResp);
return keyVersion;
}
GWEN_CRYPT_PADDALGO *GWEN_Crypt_PaddAlgo_fromDb(GWEN_DB_NODE *db)
{
const char *s;
assert(db);
s=GWEN_DB_GetCharValue(db, "id", 0, NULL);
if (s) {
GWEN_CRYPT_PADDALGO *a;
GWEN_CRYPT_PADDALGOID id;
id=GWEN_Crypt_PaddAlgoId_fromString(s);
if (id==GWEN_Crypt_PaddAlgoId_Unknown) {
DBG_INFO(GWEN_LOGDOMAIN, "Unknown paddalgo id [%s]", s);
return NULL;
}
a=GWEN_Crypt_PaddAlgo_new(id);
assert(a);
a->paddSize=GWEN_DB_GetIntValue(db, "paddSize", 0, 0);
return a;
}
else {
DBG_INFO(GWEN_LOGDOMAIN, "Missing paddalgo id");
return NULL;
}
}
/* Prints all results that can be found in the outbox into the interactor */
static void gnc_hbci_printresult(HBCI_Outbox *outbox, GNCInteractor *inter)
{
/* Got no sysid. */
GWEN_DB_NODE *rsp, *n;
g_assert(outbox);
if (!inter)
return;
rsp = HBCI_Outbox_response(outbox);
n = GWEN_DB_GetFirstGroup(rsp);
while (n)
{
if (strcasecmp(GWEN_DB_GroupName(n), "msgresult") == 0)
{
GWEN_DB_NODE *r = GWEN_DB_GetFirstGroup(n);
while (r)
{
if (strcasecmp(GWEN_DB_GroupName(r), "result") == 0)
{
gchar *logtext;
int resultcode;
const char *text, *elementref, *param;
resultcode = GWEN_DB_GetIntValue(r, "resultcode", 0, 0);
text = GWEN_DB_GetCharValue(r, "text", 0, "Response without text");
elementref = GWEN_DB_GetCharValue(r, "elementref", 0, "");
param = GWEN_DB_GetCharValue(r, "param", 0, "");
if (strlen(elementref) > 0 || strlen(param) > 0)
logtext = g_strdup_printf("%s (%d; Elementref %s; Param %s)", text,
resultcode, elementref, param);
else
logtext = g_strdup_printf("%s (%d)", text, resultcode);
GNCInteractor_add_log_text(inter, logtext);
g_free(logtext);
}
r = GWEN_DB_GetNextGroup(r);
}
}
else if (strcasecmp(GWEN_DB_GroupName(n), "segresult") == 0)
{
GWEN_DB_NODE *r = GWEN_DB_GetFirstGroup(n);
while (r)
{
if (strcasecmp(GWEN_DB_GroupName(r), "result") == 0)
{
}
r = GWEN_DB_GetNextGroup(r);
}
}
n = GWEN_DB_GetNextGroup(n);
} /* while */
GWEN_DB_Group_free(rsp);
}
/* --------------------------------------------------------------- FUNCTION */
int AH_Job_GetTransactions_GetLimits(AH_JOB *j, AB_TRANSACTION_LIMITS **pLimits)
{
AB_TRANSACTION_LIMITS *tl;
GWEN_DB_NODE *dbParams;
dbParams=AH_Job_GetParams(j);
tl=AB_TransactionLimits_new();
AB_TransactionLimits_SetCommand(tl, AH_Job_GetSupportedCommand(j));
AB_TransactionLimits_SetMaxValueSetupTime(tl, GWEN_DB_GetIntValue(dbParams, "storeDays", 0, 0));
/* nothing more to set for this kind of job */
*pLimits=tl;
return 0;
}
int LC_DDVCard_GetSignKeyVersion0(LC_CARD *card){
LC_DDVCARD *ddv;
LC_CLIENT_RESULT res;
GWEN_DB_NODE *dbRecord;
GWEN_BUFFER *mbuf;
int keyVer;
assert(card);
ddv=GWEN_INHERIT_GETDATA(LC_CARD, LC_DDVCARD, card);
assert(ddv);
res=LC_Card_SelectEf(card, "EF_KEYD");
if (res!=LC_Client_ResultOk) {
DBG_INFO(LC_LOGDOMAIN, "here");
return -1;
}
mbuf=GWEN_Buffer_new(0, 4, 0, 1);
res=LC_Card_IsoReadRecord(card,
LC_CARD_ISO_FLAGS_RECSEL_GIVEN,
1 /* should be 2 */,
mbuf);
if (res!=LC_Client_ResultOk) {
DBG_INFO(LC_LOGDOMAIN, "here");
GWEN_Buffer_free(mbuf);
return -1;
}
GWEN_Buffer_Rewind(mbuf);
dbRecord=GWEN_DB_Group_new("autd");
if (LC_Card_ParseRecord(card,
1 /* should be 2, but that doesn't work */,
mbuf, dbRecord)) {
DBG_ERROR(LC_LOGDOMAIN, "Error parsing record");
GWEN_DB_Group_free(dbRecord);
GWEN_Buffer_free(mbuf);
return -1;
}
GWEN_Buffer_free(mbuf);
keyVer=GWEN_DB_GetIntValue(dbRecord, "keyVersion", 0, -1);
GWEN_DB_Group_free(dbRecord);
if (keyVer==-1) {
DBG_ERROR(LC_LOGDOMAIN, "No keyVersion in record 2 of EF_KEYD");
}
return keyVer;
}
int GWEN_Url_ReadDb(GWEN_URL *st, GWEN_DB_NODE *db) {
assert(st);
assert(db);
GWEN_Url_SetProtocol(st, GWEN_DB_GetCharValue(db, "protocol", 0, 0));
GWEN_Url_SetServer(st, GWEN_DB_GetCharValue(db, "server", 0, 0));
GWEN_Url_SetPort(st, GWEN_DB_GetIntValue(db, "port", 0, 0));
GWEN_Url_SetPath(st, GWEN_DB_GetCharValue(db, "path", 0, 0));
GWEN_Url_SetUserName(st, GWEN_DB_GetCharValue(db, "userName", 0, 0));
GWEN_Url_SetPassword(st, GWEN_DB_GetCharValue(db, "password", 0, 0));
if (1) { /* for local vars */
GWEN_DB_NODE *dbT;
dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "vars");
if (dbT) {
if (st->vars)
GWEN_DB_Group_free(st->vars);
st->vars=GWEN_DB_Group_dup(dbT);
}
}
GWEN_Url_SetUrl(st, GWEN_DB_GetCharValue(db, "url", 0, 0));
return 0;
}
GWEN_TIME *GWEN_Time_fromDb(GWEN_DB_NODE *db) {
GWEN_TIME *t;
GWEN_DB_NODE *dbT;
int day, month, year;
int hour, min, sec;
int inUtc;
day=month=year=0;
hour=min=sec=0;
inUtc=GWEN_DB_GetIntValue(db, "inUtc", 0, 0);
dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "date");
if (dbT) {
day=GWEN_DB_GetIntValue(dbT, "day", 0, 0);
month=GWEN_DB_GetIntValue(dbT, "month", 0, 1)-1;
year=GWEN_DB_GetIntValue(dbT, "year", 0, 0);
if (!day || !year) {
DBG_INFO(GWEN_LOGDOMAIN, "Bad date in DB");
return 0;
}
}
dbT=GWEN_DB_GetGroup(db, GWEN_PATH_FLAGS_NAMEMUSTEXIST, "time");
if (dbT) {
hour=GWEN_DB_GetIntValue(dbT, "hour", 0, 0);
min=GWEN_DB_GetIntValue(dbT, "min", 0, 0);
sec=GWEN_DB_GetIntValue(dbT, "sec", 0, 0);
}
DBG_VERBOUS(GWEN_LOGDOMAIN,
"Creating time from this: %04d/%02d/%02d - %02d:%02d:%02d (%d)",
year, month, day, hour, min, sec, inUtc);
t=GWEN_Time_new(year, month, day, hour, min, sec, inUtc);
if (!t) {
DBG_INFO(GWEN_LOGDOMAIN, "Bad date/time");
return 0;
}
return t;
}
void AB_SelectBankInfoDialog_Init(GWEN_DIALOG *dlg)
{
AB_SELECTBANKINFO_DIALOG *xdlg;
GWEN_DB_NODE *dbPrefs;
int i;
int j;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, AB_SELECTBANKINFO_DIALOG, dlg);
assert(xdlg);
dbPrefs=GWEN_Dialog_GetPreferences(dlg);
GWEN_Dialog_SetCharProperty(dlg, "blzEdit", GWEN_DialogProperty_Value, 0, xdlg->bankCode, 0);
GWEN_Dialog_SetCharProperty(dlg,
"",
GWEN_DialogProperty_Title,
0,
I18N("Select a Bank"),
0);
GWEN_Dialog_SetCharProperty(dlg,
"listBox",
GWEN_DialogProperty_Title,
0,
I18N("Bank Code\tBIC\tName\tLocation\tProtocols"),
0);
GWEN_Dialog_SetIntProperty(dlg,
"listBox",
GWEN_DialogProperty_SelectionMode,
0,
GWEN_Dialog_SelectionMode_Single,
0);
/* read width */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* read bank column widths */
for (i=0; i<5; i++) {
j=GWEN_DB_GetIntValue(dbPrefs, "bank_list_columns", i, -1);
if (j<LIST_MINCOLWIDTH)
j=LIST_MINCOLWIDTH;
GWEN_Dialog_SetIntProperty(dlg, "listBox", GWEN_DialogProperty_ColumnWidth, i, j, 0);
}
/* get sort column */
i=GWEN_DB_GetIntValue(dbPrefs, "bank_list_sortbycolumn", 0, -1);
j=GWEN_DB_GetIntValue(dbPrefs, "bank_list_sortdir", 0, -1);
if (i>=0 && j>=0)
GWEN_Dialog_SetIntProperty(dlg, "listBox", GWEN_DialogProperty_SortDirection, i, j, 0);
/* disable ok button */
GWEN_Dialog_SetIntProperty(dlg, "okButton", GWEN_DialogProperty_Enabled, 0, 0, 0);
}
void AH_NewKeyFileDialog_Init(GWEN_DIALOG *dlg) {
AH_NEWKEYFILE_DIALOG *xdlg;
GWEN_DB_NODE *dbPrefs;
int i;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, AH_NEWKEYFILE_DIALOG, dlg);
assert(xdlg);
dbPrefs=GWEN_Dialog_GetPreferences(dlg);
GWEN_Dialog_SetCharProperty(dlg,
"",
GWEN_DialogProperty_Title,
0,
I18N("HBCI Keyfile Setup Wizard"),
0);
/* select first page */
GWEN_Dialog_SetIntProperty(dlg, "wiz_stack", GWEN_DialogProperty_Value, 0, 0, 0);
/* setup intro page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_begin_label",
GWEN_DialogProperty_Title,
0,
I18N("This dialog assists you in setting up a Keyfile User.\n"),
0);
/* setup bank page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_bank_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>Please select the bank.</p>"
"<p>AqBanking has an internal database which "
"contains HBCI/FinTS information about many banks.<p>"
"<p>If there is an entry for your bank this dialog will use the "
"information from the database.</p>"
"</html>"
"Please select the bank.\n"
"AqBanking has an internal database which contains\n"
"HBCI/FinTS information about many banks.\n"
"If there is an entry for your bank this dialog will use the\n"
"information from the database."),
0);
/* setup user page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_user_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>For most banks the customer id must be the same as the user id.</p>"
"<p>However, some banks actually use the customer id, so please look into "
"the documentation provided by your bank to discover whether this is the "
"case with your bank.</p>"
"</html>"
"For most banks the customer id must be the same as the user id.\n"
"However, some banks actually use the customer id, so please look into\n"
"the documentation provided by your bank to discover whether this is the\n"
"case with your bank."),
0);
/* setup creation page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_create_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>We are now ready to create the user and exchange keys with the server.</p>"
"<p>Click the <i>next</i> button to proceed or <i>abort</i> to abort.</p>"
"</html>"
"We are now ready to create the user and exchange keys with the server.\n"
"Click the NEXT button to proceed or ABORT to abort."),
0);
/* setup extro page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_end_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>The user has been successfully created.</p>"
"<p>You must now <b>print</b> the INI letter (click the button below) "
"and <b>send</b> it to the bank.</p> "
"<p>The activation of your account by the bank can take a few days.</p>"
"</html>"
"The user has been successfully created.\n"
"You must now PRINT the INI letter (click the button below)\n"
"and SEND it to the bank.\n"
"The activation of your account by the bank can take a few days."),
0);
/* read width */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* disable next and previous buttons */
GWEN_Dialog_SetIntProperty(dlg, "wiz_prev_button", GWEN_DialogProperty_Enabled, 0, 0, 0);
GWEN_Dialog_SetIntProperty(dlg, "wiz_next_button", GWEN_DialogProperty_Enabled, 0, 1, 0);
}
int EBC_Provider_Init(AB_PROVIDER *pro, GWEN_DB_NODE *dbData) {
EBC_PROVIDER *dp;
const char *logLevelName;
assert(pro);
dp=GWEN_INHERIT_GETDATA(AB_PROVIDER, EBC_PROVIDER, pro);
assert(dp);
if (!GWEN_Logger_IsOpen(AQEBICS_LOGDOMAIN)) {
GWEN_Logger_Open(AQEBICS_LOGDOMAIN,
"aqebics", 0,
GWEN_LoggerType_Console,
GWEN_LoggerFacility_User);
}
logLevelName=getenv("AQEBICS_LOGLEVEL");
if (logLevelName) {
GWEN_LOGGER_LEVEL ll;
ll=GWEN_Logger_Name2Level(logLevelName);
if (ll!=GWEN_LoggerLevel_Unknown) {
GWEN_Logger_SetLevel(AQEBICS_LOGDOMAIN, ll);
DBG_WARN(AQEBICS_LOGDOMAIN,
"Overriding loglevel for AqEBICS with \"%s\"",
logLevelName);
}
else {
DBG_ERROR(AQEBICS_LOGDOMAIN, "Unknown loglevel \"%s\"",
logLevelName);
}
}
DBG_INFO(AQEBICS_LOGDOMAIN, "Please remember to purchase a license if you want to use the EBICS backend.");
if (1) {
GWEN_STRINGLIST *sl=GWEN_PathManager_GetPaths(AB_PM_LIBNAME,
AB_PM_LOCALEDIR);
const char *localedir=GWEN_StringList_FirstString(sl);
int rv;
rv=GWEN_I18N_BindTextDomain_Dir(PACKAGE, localedir);
if (rv) {
DBG_ERROR(AQEBICS_LOGDOMAIN, "Could not bind textdomain (%d)", rv);
}
else {
rv=GWEN_I18N_BindTextDomain_Codeset(PACKAGE, "UTF-8");
if (rv) {
DBG_ERROR(AQEBICS_LOGDOMAIN, "Could not set codeset (%d)", rv);
}
}
GWEN_StringList_free(sl);
}
DBG_NOTICE(AQEBICS_LOGDOMAIN, "Initializing AqEBICS backend");
dp->connectTimeout=GWEN_DB_GetIntValue(dbData, "connectTimeout", 0,
EBC_DEFAULT_CONNECT_TIMEOUT);
dp->transferTimeout=GWEN_DB_GetIntValue(dbData, "transferTimeout", 0,
EBC_DEFAULT_TRANSFER_TIMEOUT);
return 0;
}
int EBC_Provider_Execute(AB_PROVIDER *pro, AB_IMEXPORTER_CONTEXT *ctx) {
EBC_PROVIDER *dp;
int oks=0;
int errors=0;
AB_JOB_LIST2_ITERATOR *jit;
int rv;
assert(pro);
dp=GWEN_INHERIT_GETDATA(AB_PROVIDER, EBC_PROVIDER, pro);
assert(dp);
rv=EBC_Provider_ExecQueue(pro, ctx);
if (!rv)
oks++;
else {
errors++;
if (rv==GWEN_ERROR_USER_ABORTED) {
EBC_Queue_Clear(dp->queue);
AB_Job_List2_Clear(dp->bankingJobs);
return rv;
}
}
/* set results in referencing jobs, too */
jit=AB_Job_List2_First(dp->bankingJobs);
if (jit) {
AB_JOB *uj;
uj=AB_Job_List2Iterator_Data(jit);
assert(uj);
while(uj) {
if (AB_Job_GetStatus(uj)==AB_Job_StatusSent) {
AB_JOB *rj;
uint32_t rjid;
rj=uj;
/* find referenced job (if any) */
do {
GWEN_DB_NODE *dbT;
dbT=AB_Job_GetProviderData(rj, pro);
assert(dbT);
rjid=GWEN_DB_GetIntValue(dbT, "refJob", 0, 0);
if (rjid) {
rj=EBC_Provider_FindJobById(dp->bankingJobs, rjid);
}
} while(rjid && rj);
if (rj && rj!=uj) {
/* found referenced job, copy status and result text */
DBG_INFO(AQEBICS_LOGDOMAIN,
"Copying status from referenced job");
AB_Job_SetStatus(uj, AB_Job_GetStatus(rj));
AB_Job_SetResultText(uj, AB_Job_GetResultText(rj));
}
if (AB_Job_GetStatus(uj)==AB_Job_StatusSent)
AB_Job_SetStatus(uj, AB_Job_StatusFinished);
}
uj=AB_Job_List2Iterator_Next(jit);
} /* while */
AB_Job_List2Iterator_free(jit);
}
rv=AB_Banking_ExecutionProgress(AB_Provider_GetBanking(pro));
if (rv==GWEN_ERROR_USER_ABORTED) {
DBG_INFO(AQEBICS_LOGDOMAIN,
"User aborted");
return rv;
}
EBC_Queue_Clear(dp->queue);
AB_Job_List2_Clear(dp->bankingJobs);
if (!oks && errors) {
DBG_INFO(AQEBICS_LOGDOMAIN, "Not a single job succeeded");
return GWEN_ERROR_GENERIC;
}
return 0;
}
int AHB_DTAUS__CreateSetC(GWEN_BUFFER *dst,
GWEN_DB_NODE *cfg,
GWEN_DB_NODE *xa,
AB_VALUE *sumEUR,
AB_VALUE *sumDEM,
AB_VALUE *sumBankCodes,
AB_VALUE *sumAccountIds){
unsigned int i;
const char *p;
char buffer[32];
int isDebitNote;
int isEuro;
unsigned int extSets;
//unsigned int startPos;
AB_VALUE *val;
GWEN_STRINGLIST *purposeList;
DBG_DEBUG(AQBANKING_LOGDOMAIN, "Creating C set");
/* ______________________________________________________________________
* preparations
*/
purposeList=GWEN_StringList_new();
/* cut purpose lines into manageable portions (max 27 chars) */
for (i=0; ; i++) {
int slen;
GWEN_BUFFER *nbuf;
p=GWEN_DB_GetCharValue(xa, "purpose", i, 0);
if (p==NULL)
break;
if (i>14) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Too many purpose lines (maxmimum is 14)");
GWEN_StringList_free(purposeList);
return -1;
}
slen=strlen(p);
nbuf=GWEN_Buffer_new(0, slen+1, 0, 1);
AB_ImExporter_Utf8ToDta(p, -1, nbuf);
p=GWEN_Buffer_GetStart(nbuf);
while(*p) {
while(*p>0 && *p<33)
p++;
slen=strlen(p);
if (slen==0)
break;
else if (slen>27) {
char *ns;
ns=(char*) malloc(28);
assert(ns);
memmove(ns, p, 27);
ns[27]=0;
/* let stringlist take over ownership of the the string */
GWEN_StringList_AppendString(purposeList, ns, 1, 0);
p+=27;
}
else {
GWEN_StringList_AppendString(purposeList, p, 0, 0);
break;
}
}
GWEN_Buffer_free(nbuf);
} /* for */
//startPos=GWEN_Buffer_GetPos(dst);
GWEN_Buffer_AllocRoom(dst, 256);
isDebitNote=(strcasecmp(GWEN_DB_GetCharValue(cfg, "type", 0, "transfer"),
"debitnote")==0);
isEuro=(strcasecmp(GWEN_DB_GetCharValue(cfg, "currency", 0, "EUR"),
"EUR")==0);
/* compute number of extension sets */
extSets=0;
/* add purpose */
if (GWEN_StringList_Count(purposeList))
extSets+=GWEN_StringList_Count(purposeList)-1;
/* add name */
for (i=1; i<2; i++) { /* max 1 extset for local name */
if (GWEN_DB_GetCharValue(xa, "localName", i, 0)==0)
break;
if (i>1) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Too many name lines (maxmimum is 2)");
GWEN_StringList_free(purposeList);
return -1;
}
extSets++;
} /* for */
/* add other name */
for (i=1; i<2; i++) { /* max 1 extset for remote name */
if (GWEN_DB_GetCharValue(xa, "remoteName", i, 0)==0)
break;
if (i>1) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Too many peer name lines (maxmimum is 2)");
GWEN_StringList_free(purposeList);
return -1;
}
extSets++;
} /* for */
/* check number of extension sets */
if (extSets>15) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Too many extension sets (%d)", extSets);
GWEN_StringList_free(purposeList);
return -1;
}
/* ______________________________________________________________________
* actually write C set
*/
/* field 1, 2: record header */
snprintf(buffer, sizeof(buffer), "%04d", 187+(extSets*29));
GWEN_Buffer_AppendString(dst, buffer);
GWEN_Buffer_AppendByte(dst, 'C');
/* field 3: acting bank code */
if (AHB_DTAUS__AddNum(dst, 8, GWEN_DB_GetCharValue(cfg, "bankCode", 0, ""))) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 4: destination bank code */
p=GWEN_DB_GetCharValue(xa, "remoteBankCode", 0, 0);
if (p) {
val=AB_Value_fromString(p);
if (val==NULL) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Bad bank code");
GWEN_StringList_free(purposeList);
return -1;
}
AB_Value_AddValue(sumBankCodes, val);
AB_Value_free(val);
if (AHB_DTAUS__AddNum(dst, 8, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
else {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Peer bank code missing");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 5: destination account id */
p=GWEN_DB_GetCharValue(xa, "remoteAccountNumber", 0, 0);
if (p) {
val=AB_Value_fromString(p);
if (val==NULL) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Bad account id");
GWEN_StringList_free(purposeList);
return -1;
}
AB_Value_AddValue(sumAccountIds, val);
AB_Value_free(val);
if (AHB_DTAUS__AddNum(dst, 10, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
else {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Peer account id missing");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 6: internal customer number (0s for now) */
for (i=0; i<13; i++) GWEN_Buffer_AppendByte(dst, '0');
/* field 7a: text key */
snprintf(buffer, sizeof(buffer), "%02d", GWEN_DB_GetIntValue(xa, "textkey", 0, isDebitNote?5:51));
if (AHB_DTAUS__AddNum(dst, 2, buffer)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 7b: text key extension */
snprintf(buffer, sizeof(buffer), "%03d", GWEN_DB_GetIntValue(xa, "textkeyext", 0, 0));
if (AHB_DTAUS__AddNum(dst, 3, buffer)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 8: bank internal field */
GWEN_Buffer_AppendByte(dst, ' ');
/* field 9: value in DEM */
if (!isEuro) {
val=AB_Value_fromString(GWEN_DB_GetCharValue(xa, "value/value", 0, "0,0"));
if (val==NULL || AB_Value_IsZero(val)) {
AB_Value_free(val);
DBG_ERROR(AQBANKING_LOGDOMAIN, "Bad DEM value:");
GWEN_StringList_free(purposeList);
return -1;
}
AB_Value_AddValue(sumDEM, val);
snprintf(buffer, sizeof(buffer), "%011.0f", AB_Value_GetValueAsDouble(val)*100.0);
AB_Value_free(val);
if (AHB_DTAUS__AddNum(dst, 11, buffer)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
else {
if (AHB_DTAUS__AddNum(dst, 11, "0")) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
/* field 10: local bank code */
p=GWEN_DB_GetCharValue(xa, "localbankCode", 0, 0);
if (!p)
p=GWEN_DB_GetCharValue(cfg, "bankCode", 0, 0);
if (!p) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "No local bank code");
GWEN_StringList_free(purposeList);
return -1;
}
if (AHB_DTAUS__AddNum(dst, 8, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 11: local account id */
p=GWEN_DB_GetCharValue(xa, "localAccountNumber", 0, 0);
if (!p)
GWEN_DB_GetCharValue(cfg, "accountId", 0, 0);
if (!p) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "No local account number");
GWEN_StringList_free(purposeList);
return -1;
}
if (AHB_DTAUS__AddNum(dst, 10, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 12: value in EUR */
if (isEuro) {
val=AB_Value_fromString(GWEN_DB_GetCharValue(xa, "value/value", 0, "0,0"));
if (val==NULL || AB_Value_IsZero(val)) {
AB_Value_free(val);
DBG_ERROR(AQBANKING_LOGDOMAIN, "Bad EUR value:");
GWEN_StringList_free(purposeList);
return -1;
}
AB_Value_AddValue(sumEUR, val);
snprintf(buffer, sizeof(buffer), "%011.0f", AB_Value_GetValueAsDouble(val)*100.0);
AB_Value_free(val);
if (AHB_DTAUS__AddNum(dst, 11, buffer)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
else {
if (AHB_DTAUS__AddNum(dst, 11, "0")) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
}
/* field 13: blanks */
for (i=0; i<3; i++) GWEN_Buffer_AppendByte(dst, ' ');
/* field 14a: peer name */
if (AHB_DTAUS__AddWord(dst, 27, GWEN_DB_GetCharValue(xa, "remoteName", 0, ""))) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 14b: blanks */
for (i=0; i<8; i++) GWEN_Buffer_AppendByte(dst, ' ');
/* field 15: name */
if (AHB_DTAUS__AddWord(dst, 27, GWEN_DB_GetCharValue(xa, "localname", 0, ""))) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 16: purpose */
p=GWEN_StringList_FirstString(purposeList);
if (p==NULL)
p="";
if (AHB_DTAUS__AddWord(dst, 27, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
/* field 17a: currency */
if (isEuro)
GWEN_Buffer_AppendByte(dst, '1');
else
GWEN_Buffer_AppendByte(dst, ' ');
/* field 17b: blanks */
for (i=0; i<2; i++) GWEN_Buffer_AppendByte(dst, ' ');
/* field 18: number of extension sets */
snprintf(buffer, sizeof(buffer), "%02d", extSets);
if (AHB_DTAUS__AddNum(dst, 2, buffer)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
if (extSets) {
unsigned int writtenExtSets=0;
/* now append extension sets */
/* add peer name lines */
for (i=1; i<2; i++) { /* max: 1 extset */
unsigned int j;
p=GWEN_DB_GetCharValue(xa, "remoteName", i, 0);
if (!p)
break;
/* append extension set */
GWEN_Buffer_AppendString(dst, "01");
if (AHB_DTAUS__AddWord(dst, 27, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
writtenExtSets++;
if (writtenExtSets==2)
/* 2 ext sets written, so we need to align "C 2.Satzabschnitt" to 128 now */
for (j=0; j<11; j++) GWEN_Buffer_AppendByte(dst, ' ');
else if (writtenExtSets>2 && ((writtenExtSets-2) % 4)==0)
/* "C 3-5.Satzabschnitt" complete, align to 128 bytes */
for (j=0; j<12; j++) GWEN_Buffer_AppendByte(dst, ' ');
} /* for */
/* add purpose lines */
for (i=1; i<GWEN_StringList_Count(purposeList); i++) {
unsigned int j;
p=GWEN_StringList_StringAt(purposeList, i);
if (!p)
break;
/* append extension set */
GWEN_Buffer_AppendString(dst, "02");
/* strings in the list are already in DTA charset */
if (AHB_DTAUS__AddDtaWord(dst, 27, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
writtenExtSets++;
if (writtenExtSets==2)
/* 2 ext sets written, so we need to align "C 2.Satzabschnitt" to 128 now */
for (j=0; j<11; j++) GWEN_Buffer_AppendByte(dst, ' ');
else if (writtenExtSets>2 && ((writtenExtSets-2) % 4)==0)
/* "C 3-5.Satzabschnitt" complete, align to 128 bytes */
for (j=0; j<12; j++) GWEN_Buffer_AppendByte(dst, ' ');
} /* for */
/* add name lines */
for (i=1; i<2; i++) { /* max: 1 extset */
unsigned int j;
p=GWEN_DB_GetCharValue(xa, "localname", i, 0);
if (!p)
break;
/* append extension set */
GWEN_Buffer_AppendString(dst, "03");
if (AHB_DTAUS__AddWord(dst, 27, p)) {
DBG_ERROR(AQBANKING_LOGDOMAIN, "Error writing to buffer");
GWEN_StringList_free(purposeList);
return -1;
}
writtenExtSets++;
if (writtenExtSets==2)
/* 2 ext sets written, so we need to align "C 2.Satzabschnitt" to 128 now */
for (j=0; j<11; j++) GWEN_Buffer_AppendByte(dst, ' ');
else if (writtenExtSets>2 && ((writtenExtSets-2) % 4)==0)
/* "C 3-5.Satzabschnitt" complete, align to 128 bytes */
for (j=0; j<12; j++) GWEN_Buffer_AppendByte(dst, ' ');
} /* for */
}
i=((GWEN_Buffer_GetUsedBytes(dst)+127) & ~127)-GWEN_Buffer_GetUsedBytes(dst);
while(i--)
GWEN_Buffer_AppendByte(dst, ' ');
GWEN_StringList_free(purposeList);
return 0;
}
int extractArchive(GWEN_DB_NODE *dbArgs, int argc, char **argv) {
GWEN_DB_NODE *db;
const char *aname;
GWEN_SAR *sr;
int rv;
int verbosity;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"archive", /* name */
1, /* minnum */
1, /* maxnum */
"a", /* short option */
"archive", /* long option */
"Specify the archive file name", /* short description */
"Specify the archive file name" /* long description */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"verbosity", /* name */
0, /* minnum */
10, /* maxnum */
"v", /* short option */
NULL, /* long option */
"set verbosity", /* short description */
"set verbosity" /* 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,
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;
}
aname=GWEN_DB_GetCharValue(db, "archive", 0, NULL);
assert(aname);
verbosity=GWEN_DB_GetIntValue(db, "verbosity", 0, 0);
sr=GWEN_Sar_new();
rv=GWEN_Sar_OpenArchive(sr, aname,
GWEN_SyncIo_File_CreationMode_OpenExisting,
GWEN_SYNCIO_FILE_FLAGS_READ);
if (rv<0) {
fprintf(stderr, "ERROR: Error opening archive (%d)\n", rv);
return 2;
}
else {
const GWEN_SAR_FILEHEADER_LIST *fhl;
fhl=GWEN_Sar_GetHeaders(sr);
if (fhl) {
const GWEN_SAR_FILEHEADER *fh;
fh=GWEN_SarFileHeader_List_First(fhl);
while(fh) {
const char *s;
s=GWEN_SarFileHeader_GetPath(fh);
if (s && *s) {
rv=GWEN_Sar_ExtractFile(sr, fh);
if (rv<0) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
GWEN_Sar_CloseArchive(sr, 1);
GWEN_Sar_free(sr);
return rv;
}
if (verbosity>0) {
fprintf(stdout, "extracted \"%s\"\n", s);
}
}
fh=GWEN_SarFileHeader_List_Next(fh);
}
}
rv=GWEN_Sar_CloseArchive(sr, 0);
if (rv<0) {
fprintf(stderr, "ERROR: Error closing archive (%d)\n", rv);
return 2;
}
return 0;
}
}
void GWEN_Param_ReadDb(GWEN_PARAM *p_struct, GWEN_DB_NODE *p_db)
{
assert(p_struct);
/* member "name" */
if (p_struct->name) {
free(p_struct->name);
}
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "name", 0, NULL);
if (s)
p_struct->name=strdup(s);
}
if (p_struct->name==NULL) {
p_struct->name=NULL;
}
/* member "flags" */
p_struct->flags=GWEN_DB_GetIntValue(p_db, "flags", 0, 0);
/* member "type" */
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "type", 0, NULL);
if (s)
p_struct->type=GWEN_Param_Type_fromString(s);
else
p_struct->type=GWEN_Param_Type_Unknown;
}
/* member "dataType" */
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "dataType", 0, NULL);
if (s)
p_struct->dataType=GWEN_Param_DataType_fromString(s);
else
p_struct->dataType=GWEN_Param_DataType_Unknown;
}
/* member "shortDescription" */
if (p_struct->shortDescription) {
free(p_struct->shortDescription);
}
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "shortDescription", 0, NULL);
if (s)
p_struct->shortDescription=strdup(s);
}
if (p_struct->shortDescription==NULL) {
p_struct->shortDescription=NULL;
}
/* member "longDescription" */
if (p_struct->longDescription) {
free(p_struct->longDescription);
}
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "longDescription", 0, NULL);
if (s)
p_struct->longDescription=strdup(s);
}
if (p_struct->longDescription==NULL) {
p_struct->longDescription=NULL;
}
/* member "currentValue" */
if (p_struct->currentValue) {
free(p_struct->currentValue);
}
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "currentValue", 0, NULL);
if (s)
p_struct->currentValue=strdup(s);
}
if (p_struct->currentValue==NULL) {
p_struct->currentValue=NULL;
}
/* member "defaultValue" */
if (p_struct->defaultValue) {
free(p_struct->defaultValue);
}
{
const char *s;
s=GWEN_DB_GetCharValue(p_db, "defaultValue", 0, NULL);
if (s)
p_struct->defaultValue=strdup(s);
}
if (p_struct->defaultValue==NULL) {
p_struct->defaultValue=NULL;
}
/* member "choices" */
if (p_struct->choices) {
GWEN_StringList2_free(p_struct->choices);
}
{
p_struct->choices=GWEN_StringList2_fromDb(p_db, "choices", GWEN_StringList2_IntertMode_AlwaysAdd);
}
if (p_struct->choices==NULL) {
p_struct->choices=NULL;
}
/* member "internalIntValue" */
/* member "internalIntValue" is volatile, just presetting */
p_struct->internalIntValue=0;
/* member "internalFloatValue" */
/* member "internalFloatValue" is volatile, just presetting */
p_struct->internalFloatValue=0;
/* member "runtimeFlags" */
/* member "runtimeFlags" is volatile, just presetting */
p_struct->runtimeFlags=0;
}
void APY_NewUserDialog_Init(GWEN_DIALOG *dlg) {
APY_NEWUSER_DIALOG *xdlg;
GWEN_DB_NODE *dbPrefs;
int i;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, APY_NEWUSER_DIALOG, dlg);
assert(xdlg);
dbPrefs=GWEN_Dialog_GetPreferences(dlg);
GWEN_Dialog_SetCharProperty(dlg,
"",
GWEN_DialogProperty_Title,
0,
I18N("Paypal Setup Wizard"),
0);
/* select first page */
GWEN_Dialog_SetIntProperty(dlg, "wiz_stack", GWEN_DialogProperty_Value, 0, 0, 0);
/* setup intro page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_begin_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>This dialog assists you in setting up a Paypal User.</p>"
"<p>Please note that you have to apply for API access with Paypal. "
"The following procedure helps you getting there:</p>"
"<p>Login into your Paypal account via web browser, enter the <i>My Profile</i> "
"page, click <i>API access</i> under <i>Account information</i>.</p>"
"<p>Choose <b>Option 2</b>.</p>"
"</html>"
"This dialog assists you in setting up a Paypal User.\n"
"Please note that you have to apply for API access with Paypal.\n"
"The following procedure helps you getting there:\n"
"Login into your Paypal account via web browser, enter the \"My Profile\"\n"
"page, click \"API access\" under \"Account information\".\n"
"Choose OPTION 2."
),
0);
/* setup user page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_user_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>You can find the information needed here after logging into your "
"Paypal account via web browser. The information can then be found "
"under <i>My Profile</i>, <i>Account Information</i>, <i>API Access</i>.</p>"
"</html>"
"You can find the information needed here after logging into your\n"
"Paypal account via web browser. The information can then be found\n"
"under <\"My Profile\", \"Account Information\", \"API Access\"."
),
0);
GWEN_Dialog_SetCharProperty(dlg,
"wiz_url_edit",
GWEN_DialogProperty_Value,
0,
"https://api-3t.paypal.com/nvp",
0);
/* setup secret page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_secret_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>Enter the API password and signature as it is found on the "
"Paypal page described in the previous steps.</p>"
"<p><font color=\"red\"><b>"
"The API password and API signature are extremely sensitive "
"information which you must under no circumstances reveal to "
"anybody!</b></font></p>"
"<p>That being said, these credentials are also quite hard to "
"remember, so AqBanking stores them in a file which is very well "
"encrypted.</p>"
"<p>When the user is created in the next step you will be asked for "
"the password to be set for that credential file.</p>"
"</html>"
"Enter the API password and signature as it is found on the\n"
"Paypal page described in the previous steps.\n"
"The API password and API signature are extremely sensitive\n"
"information which you must under no circumstances reveal to\n"
"anybody!\n"
"That being said, these credentials are also quite hard to\n"
"remember, so AqBanking stores them in a file which is very well\n"
"encrypted.\n"
"When the user is created in the next step you will be asked for\n"
"the password to be set for that credential file."
),
0);
/* setup creation page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_create_label",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>We are now ready to create the user.</p>"
"<p>Click the <i>next</i> button to proceed or <i>abort</i> to abort.</p>"
"<p>If you proceed you will be asked to enter a new password. This is the password "
"for the credentials file described in previous steps.</p>"
"<p>Please be carefull to enter a sufficiently secure password</p>"
"</html>"
"We are now ready to create the user.\n"
"Click the \"next\" button to proceed or \"abort\" to abort.\n"
"If you proceed you will be asked to enter a new password. This is the password\n"
"for the credentials file described in previous steps.\n"
"Please be carefull to enter a sufficiently secure password."
),
0);
/* setup extro page */
GWEN_Dialog_SetCharProperty(dlg,
"wiz_end_label",
GWEN_DialogProperty_Title,
0,
I18N("The user has been successfully setup."),
0);
/* read width */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* disable next and previous buttons */
GWEN_Dialog_SetIntProperty(dlg, "wiz_prev_button", GWEN_DialogProperty_Enabled, 0, 0, 0);
GWEN_Dialog_SetIntProperty(dlg, "wiz_next_button", GWEN_DialogProperty_Enabled, 0, 1, 0);
}
int AH_Control_AddAccount(AB_PROVIDER *pro,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv)
{
GWEN_DB_NODE *db;
AB_USER *u=0;
int rv;
uint32_t userId;
const char *bankId;
const char *accountName;
const char *accountId;
const char *ownerName;
const GWEN_ARGS args[]= {
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"bankId", /* name */
1, /* 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_Int, /* type */
"userId", /* name */
1, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the unique user id", /* short description */
"Specify the unique user id" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ownerName", /* name */
0, /* minnum */
1, /* maxnum */
"N" /* 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_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"accountId", /* name */
1, /* 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_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;
}
userId=GWEN_DB_GetIntValue(db, "userId", 0, 0);
if (userId<1) {
fprintf(stderr, "ERROR: Invalid user id\n");
return 1;
}
bankId=GWEN_DB_GetCharValue(db, "bankId", 0, "*");
accountId=GWEN_DB_GetCharValue(db, "accountId", 0, "*");
accountName=GWEN_DB_GetCharValue(db, "accountName", 0, "Account");
ownerName=GWEN_DB_GetCharValue(db, "ownerName", 0, NULL);
rv=AB_Provider_HasUser(pro, userId);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) userId);
return 2;
}
rv=AB_Provider_GetUser(pro, userId, 1, 1, &u);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) userId);
return 2;
}
else {
AB_ACCOUNT *account;
AB_BANKINFO_LIST2 *bl;
AB_BANKINFO_LIST2_ITERATOR *bit;
AB_BANKINFO *tbi;
AB_BANKINFO *bi;
int rv;
bl=AB_BankInfo_List2_new();
tbi=AB_BankInfo_new();
AB_BankInfo_SetBankId(tbi, bankId);
rv=AB_Banking_GetBankInfoByTemplate(AB_Provider_GetBanking(pro), "de", tbi, bl);
if (rv) {
fprintf(stderr, "Error looking for bank info: %d\n", rv);
AB_User_free(u);
return 3;
}
bit=AB_BankInfo_List2_First(bl);
if (bit) {
bi=AB_BankInfo_List2Iterator_Data(bit);
assert(bi);
AB_BankInfo_List2Iterator_free(bit);
}
else {
bi=NULL;
fprintf(stderr, "Could not find bank with id %s\n", bankId);
}
AB_BankInfo_List2_free(bl);
account=AB_Provider_CreateAccountObject(pro);
assert(account);
if (!ownerName)
AB_Account_SetOwnerName(account, AB_User_GetUserName(u));
else
AB_Account_SetOwnerName(account, ownerName);
AB_Account_SetAccountNumber(account, accountId);
if (accountName)
AB_Account_SetAccountName(account, accountName);
AB_Account_SetBankCode(account, bankId);
if (bi)
AB_Account_SetBankName(account, AB_BankInfo_GetBankName(bi));
AB_Account_SetUserId(account, userId);
/* add account to system */
rv=AB_Provider_AddAccount(pro, account, 1); /* lock corresponding user */
if (rv<0) {
DBG_ERROR(0, "Error adding account (%d)", rv);
AB_Account_free(account);
AB_User_free(u);
return 3;
}
AB_Account_free(account);
AB_User_free(u);
}
return 0;
}
int main(int argc, char **argv) {
int rv;
GWEN_DB_NODE *db;
const char *s;
LC_CLIENT *cl;
LC_CLIENT_RESULT res;
GWEN_GUI *gui;
int v;
gui=GWEN_Gui_CGui_new();
GWEN_Gui_SetGui(gui);
db=GWEN_DB_Group_new("arguments");
rv=GWEN_Args_Check(argc, argv, 1,
GWEN_ARGS_MODE_ALLOW_FREEPARAM,
prg_args,
db);
if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 256, 0, 1);
if (GWEN_Args_Usage(prg_args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "Could not generate usage string.\n");
GWEN_Buffer_free(ubuf);
return RETURNVALUE_PARAM;
}
usage(argv[0], GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
if (rv<1) {
fprintf(stderr, "ERROR: Error in argument list (%d)\n", rv);
return RETURNVALUE_PARAM;
}
v=GWEN_DB_GetIntValue(db, "verbosity", 0, 0);
if (v<2)
GWEN_Gui_AddFlags(gui, GWEN_GUI_FLAGS_NONINTERACTIVE);
/* get command */
s=GWEN_DB_GetCharValue(db, "params", 0, 0);
if (!s) {
fprintf(stderr, "No command given.\n");
GWEN_DB_Group_free(db);
return RETURNVALUE_PARAM;
}
cl=LC_Client_new("kvkcard", PROGRAM_VERSION);
res=LC_Client_Init(cl);
if (res!=LC_Client_ResultOk) {
showError(0, res, "Init");
return RETURNVALUE_SETUP;
}
/* handle command */
if (strcasecmp(s, "read")==0) {
rv=kvkRead(cl, db);
}
else if (strcasecmp(s, "daemon")==0) {
fprintf(stderr, "KVK daemon no longer supported.\n");
return RETURNVALUE_SETUP;
}
else if (strcasecmp(s, "rdvd")==0) {
rv=rdvd(cl, db);
}
else if (strcasecmp(s, "rdpd")==0) {
rv=rdpd(cl, db);
}
else if (strcasecmp(s, "psvd")==0) {
rv=psvd(cl, db);
}
else {
fprintf(stderr, "Unknown command \"%s\"", s);
rv=RETURNVALUE_PARAM;
}
LC_Client_free(cl);
GWEN_DB_Group_free(db);
return 0;
}
int AH_Control_ListItanModes(AB_PROVIDER *pro,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv)
{
GWEN_DB_NODE *db;
uint32_t uid;
AB_USER *u=NULL;
int rv;
const GWEN_ARGS args[]= {
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Int, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the unique user id", /* short description */
"Specify the unique user id" /* 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;
}
/* doit */
uid=(uint32_t) GWEN_DB_GetIntValue(db, "userId", 0, 0);
if (uid==0) {
fprintf(stderr, "ERROR: Invalid or missing unique user id\n");
return 1;
}
rv=AB_Provider_HasUser(pro, uid);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) uid);
return 2;
}
rv=AB_Provider_GetUser(pro, uid, 1, 1, &u);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) uid);
return 2;
}
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);
}
}
}
AB_User_free(u);
return 0;
}
int APY_Provider_Init(AB_PROVIDER *pro, GWEN_DB_NODE *dbData)
{
APY_PROVIDER *dp;
const char *logLevelName;
uint32_t currentVersion;
uint32_t lastVersion;
assert(pro);
dp=GWEN_INHERIT_GETDATA(AB_PROVIDER, APY_PROVIDER, pro);
assert(dp);
if (!GWEN_Logger_IsOpen(AQPAYPAL_LOGDOMAIN)) {
GWEN_Logger_Open(AQPAYPAL_LOGDOMAIN,
"aqpaypal", 0,
GWEN_LoggerType_Console,
GWEN_LoggerFacility_User);
}
logLevelName=getenv("AQPAYPAL_LOGLEVEL");
if (logLevelName) {
GWEN_LOGGER_LEVEL ll;
ll=GWEN_Logger_Name2Level(logLevelName);
if (ll!=GWEN_LoggerLevel_Unknown) {
GWEN_Logger_SetLevel(AQPAYPAL_LOGDOMAIN, ll);
DBG_WARN(AQPAYPAL_LOGDOMAIN, "Overriding loglevel for AqPAYPAL with \"%s\"", logLevelName);
}
else {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Unknown loglevel \"%s\"", logLevelName);
}
}
/* check whether we need to update */
currentVersion=
(AQBANKING_VERSION_MAJOR<<24) |
(AQBANKING_VERSION_MINOR<<16) |
(AQBANKING_VERSION_PATCHLEVEL<<8) |
AQBANKING_VERSION_BUILD;
lastVersion=GWEN_DB_GetIntValue(dbData, "lastVersion", 0, 0);
if (lastVersion<currentVersion) {
int rv;
DBG_WARN(AQPAYPAL_LOGDOMAIN, "Updating configuration for AqPaypal (before init)");
rv=APY_Provider_UpdatePreInit(pro, lastVersion, currentVersion);
if (rv<0) {
DBG_INFO(AQPAYPAL_LOGDOMAIN, "here (%d)", rv);
return rv;
}
}
/* do some init (currently: none needed) */
/* update post-init */
if (lastVersion<currentVersion) {
int rv;
DBG_WARN(AQPAYPAL_LOGDOMAIN, "Updating configuration for AqPaypal (after init)");
rv=APY_Provider_UpdatePostInit(pro, lastVersion, currentVersion);
if (rv<0) {
DBG_INFO(AQPAYPAL_LOGDOMAIN, "here (%d)", rv);
return rv;
}
}
if (1) {
GWEN_STRINGLIST *sl;
const char *localedir;
int rv;
sl=GWEN_PathManager_GetPaths(AB_PM_LIBNAME, AB_PM_LOCALEDIR);
localedir=GWEN_StringList_FirstString(sl);
rv=GWEN_I18N_BindTextDomain_Dir(PACKAGE, localedir);
if (rv) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not bind textdomain (%d)", rv);
}
else {
rv=GWEN_I18N_BindTextDomain_Codeset(PACKAGE, "UTF-8");
if (rv) {
DBG_ERROR(AQPAYPAL_LOGDOMAIN, "Could not set codeset (%d)", rv);
}
}
GWEN_StringList_free(sl);
}
DBG_NOTICE(AQPAYPAL_LOGDOMAIN, "Initializing AqPaypal backend");
return 0;
}
void OH_GetInstituteDialog_Init(GWEN_DIALOG *dlg) {
OH_GETINST_DIALOG *xdlg;
GWEN_DB_NODE *dbPrefs;
int i;
int j;
assert(dlg);
xdlg=GWEN_INHERIT_GETDATA(GWEN_DIALOG, OH_GETINST_DIALOG, dlg);
assert(xdlg);
dbPrefs=GWEN_Dialog_GetPreferences(dlg);
GWEN_Dialog_SetCharProperty(dlg,
"",
GWEN_DialogProperty_Title,
0,
I18N("Select a Bank"),
0);
GWEN_Dialog_SetCharProperty(dlg,
"listBox",
GWEN_DialogProperty_Title,
0,
I18N("Bank Name"),
0);
GWEN_Dialog_SetIntProperty(dlg,
"listBox",
GWEN_DialogProperty_SelectionMode,
0,
GWEN_Dialog_SelectionMode_Single,
0);
GWEN_Dialog_SetCharProperty(dlg,
"infoLabel",
GWEN_DialogProperty_Title,
0,
I18N("<html>"
"<p>Please start typing in the name of your bank. The list "
"below will be updated to show matching banks.</p>"
"<p>Choose the bank from list below and click <b>ok</b>.</p>"
"</html>"
"Please start typing in the name of your bank. The list\n"
"below will be updated to show matching banks.\n"
"Choose the bank from list below and click OK."),
0);
/* read width */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_width", 0, -1);
if (i>=DIALOG_MINWIDTH)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Width, 0, i, 0);
/* read height */
i=GWEN_DB_GetIntValue(dbPrefs, "dialog_height", 0, -1);
if (i>=DIALOG_MINHEIGHT)
GWEN_Dialog_SetIntProperty(dlg, "", GWEN_DialogProperty_Height, 0, i, 0);
/* read bank column widths */
for (i=0; i<1; i++) {
j=GWEN_DB_GetIntValue(dbPrefs, "bank_list_columns", i, -1);
if (j<LIST_MINCOLWIDTH)
j=LIST_MINCOLWIDTH;
GWEN_Dialog_SetIntProperty(dlg, "listBox", GWEN_DialogProperty_ColumnWidth, i, j, 0);
}
/* get sort column */
i=GWEN_DB_GetIntValue(dbPrefs, "bank_list_sortbycolumn", 0, -1);
j=GWEN_DB_GetIntValue(dbPrefs, "bank_list_sortdir", 0, -1);
if (i>=0 && j>=0)
GWEN_Dialog_SetIntProperty(dlg, "listBox", GWEN_DialogProperty_SortDirection, i, j, 0);
/* disable ok button */
GWEN_Dialog_SetIntProperty(dlg, "okButton", GWEN_DialogProperty_Enabled, 0, 0, 0);
}
int HtmlGroup_Box_StartTag(HTML_GROUP *g, const char *tagName)
{
HTML_GROUP *gNew=NULL;
GWEN_XML_CONTEXT *ctx;
GWEN_DB_NODE *dbAttribs;
assert(g);
ctx=HtmlGroup_GetXmlContext(g);
dbAttribs=HtmlCtx_GetCurrentAttributes(ctx);
if (strcasecmp(tagName, "b")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt),
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_STRONG);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
HtmlProps_free(pr);
HtmlGroup_SetObject(gNew, HtmlGroup_GetObject(g));
}
else if (strcasecmp(tagName, "i")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt),
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_ITALIC);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
HtmlProps_free(pr);
HtmlGroup_SetObject(gNew, HtmlGroup_GetObject(g));
}
else if (strcasecmp(tagName, "u")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt),
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_UNDERLINE);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
HtmlProps_free(pr);
HtmlGroup_SetObject(gNew, HtmlGroup_GetObject(g));
}
else if (strcasecmp(tagName, "p")==0) {
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
HtmlGroup_SetProperties(gNew, HtmlGroup_GetProperties(g));
o=HtmlObject_Box_new(ctx);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
if (dbAttribs) {
const char *s;
s=GWEN_DB_GetCharValue(dbAttribs, "align", 0, "left");
if (s) {
if (strcasecmp(s, "right")==0)
HtmlObject_AddFlags(o, HTML_OBJECT_FLAGS_JUSTIFY_RIGHT);
else if (strcasecmp(s, "center")==0)
HtmlObject_AddFlags(o, HTML_OBJECT_FLAGS_JUSTIFY_HCENTER);
}
}
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
HtmlGroup_SetObject(gNew, o);
}
else if (strcasecmp(tagName, "right")==0) {
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
HtmlGroup_SetProperties(gNew, HtmlGroup_GetProperties(g));
o=HtmlObject_Box_new(ctx);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE |
HTML_OBJECT_FLAGS_JUSTIFY_RIGHT);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
HtmlGroup_SetObject(gNew, o);
}
else if (strcasecmp(tagName, "br")==0) {
HTML_OBJECT *o;
/* just create and add a control object */
o=HtmlObject_new(ctx, HtmlObjectType_Control);
HtmlObject_AddFlags(o, HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
}
else if (strcasecmp(tagName, "img")==0) {
HTML_OBJECT *o;
GWEN_DB_NODE *dbAttribs;
o=HtmlObject_Image_new(ctx);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
dbAttribs=HtmlCtx_GetCurrentAttributes(ctx);
if (dbAttribs) {
const char *s;
int w;
int h;
w=GWEN_DB_GetIntValue(dbAttribs, "width", 0, -1);
h=GWEN_DB_GetIntValue(dbAttribs, "height", 0, -1);
/* preset */
if (w!=-1)
HtmlObject_Image_SetScaledWidth(o, w);
if (h!=-1)
HtmlObject_Image_SetScaledHeight(o, w);
s=GWEN_DB_GetCharValue(dbAttribs, "src", 0, NULL);
if (s && *s) {
HTML_IMAGE *img;
img=HtmlCtx_GetImage(ctx, s);
if (img) {
HtmlObject_Image_SetImage(o, img);
/* adjust scaled width and height if not set by attributes */
if (w==-1)
HtmlObject_Image_SetScaledWidth(o, HtmlImage_GetWidth(img));
if (h==-1)
HtmlObject_Image_SetScaledHeight(o, HtmlImage_GetHeight(img));
}
else {
DBG_ERROR(GWEN_LOGDOMAIN, "Image [%s] not found", s);
}
}
else {
DBG_ERROR(GWEN_LOGDOMAIN, "Missing image name in IMG element");
}
}
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
}
else if (strcasecmp(tagName, "table")==0) {
HTML_OBJECT *o;
gNew=HtmlGroup_Table_new(tagName, g, ctx);
HtmlGroup_SetProperties(gNew, HtmlGroup_GetProperties(g));
o=HtmlObject_Grid_new(ctx);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
HtmlGroup_SetObject(gNew, o);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
}
else if (strcasecmp(tagName, "ul")==0) {
HTML_OBJECT *o;
gNew=HtmlGroup_UnorderedList_new(tagName, g, ctx);
HtmlGroup_SetProperties(gNew, HtmlGroup_GetProperties(g));
o=HtmlObject_Grid_new(ctx);
HtmlObject_Grid_SetColumns(o, 2);
HtmlObject_SetProperties(o, HtmlGroup_GetProperties(g));
HtmlGroup_SetObject(gNew, o);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
}
else if (strcasecmp(tagName, "font")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
GWEN_DB_NODE *dbAttribs;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
dbAttribs=HtmlCtx_GetCurrentAttributes(ctx);
if (dbAttribs) {
HTML_FONT *fnt;
const char *s;
const char *fontName;
int fontSize;
uint32_t fontFlags;
fnt=HtmlProps_GetFont(pr);
fontName=GWEN_DB_GetCharValue(dbAttribs, "face", 0, NULL);
if (fontName==NULL)
fontName=HtmlFont_GetFontName(fnt);
fontFlags=HtmlFont_GetFontFlags(fnt);
fontSize=HtmlFont_GetFontSize(fnt);
s=GWEN_DB_GetCharValue(dbAttribs, "size", 0, NULL);
if (s && *s) {
if (*s=='+') {
int i;
sscanf(s, "%d", &i);
fontSize+=i*4;
}
else if (*s=='-') {
int i;
sscanf(s, "%d", &i);
fontSize+=i*4;
}
else
sscanf(s, "%d", &fontSize);
}
s=GWEN_DB_GetCharValue(dbAttribs, "color", 0, NULL);
if (s && *s) {
uint32_t color;
color=HtmlCtx_GetColorFromName(ctx, s);
HtmlProps_SetForegroundColor(pr, color);
}
fnt=HtmlCtx_GetFont(ctx, fontName, fontSize, fontFlags);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
}
HtmlGroup_SetProperties(gNew, pr);
HtmlProps_free(pr);
HtmlGroup_SetObject(gNew, HtmlGroup_GetObject(g));
}
else if (strcasecmp(tagName, "h1")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt)*1.8,
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_STRONG);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
o=HtmlObject_Box_new(ctx);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
HtmlObject_SetProperties(o, pr);
HtmlGroup_SetObject(gNew, o);
HtmlProps_free(pr);
}
else if (strcasecmp(tagName, "h2")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt)*1.5,
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_STRONG);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
o=HtmlObject_Box_new(ctx);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
HtmlObject_SetProperties(o, pr);
HtmlGroup_SetObject(gNew, o);
HtmlProps_free(pr);
}
else if (strcasecmp(tagName, "h3")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt),
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_STRONG);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
o=HtmlObject_Box_new(ctx);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
HtmlObject_SetProperties(o, pr);
HtmlGroup_SetObject(gNew, o);
HtmlProps_free(pr);
}
else if (strcasecmp(tagName, "h4")==0) {
/* Create new parser group with new properties but use the same object */
HTML_PROPS *pr;
HTML_FONT *fnt;
HTML_OBJECT *o;
gNew=HtmlGroup_Box_new(tagName, g, ctx);
pr=HtmlProps_dup(HtmlGroup_GetProperties(g));
fnt=HtmlProps_GetFont(pr);
fnt=HtmlCtx_GetFont(ctx,
HtmlFont_GetFontName(fnt),
HtmlFont_GetFontSize(fnt),
HtmlFont_GetFontFlags(fnt) | HTML_FONT_FLAGS_ITALIC);
if (fnt) {
HtmlProps_SetFont(pr, fnt);
//HtmlFont_free(fnt);
}
HtmlGroup_SetProperties(gNew, pr);
o=HtmlObject_Box_new(ctx);
HtmlObject_Tree_AddChild(HtmlGroup_GetObject(g), o);
HtmlObject_AddFlags(o,
HTML_OBJECT_FLAGS_START_ON_NEWLINE |
HTML_OBJECT_FLAGS_END_WITH_NEWLINE);
HtmlObject_SetProperties(o, pr);
HtmlGroup_SetObject(gNew, o);
HtmlProps_free(pr);
}
else if (strcasecmp(tagName, "html")==0 ||
strcasecmp(tagName, "body")==0) {
}
else {
DBG_WARN(GWEN_LOGDOMAIN,
"Unknown group [%s], handling as normal box", tagName);
gNew=HtmlGroup_Box_new(tagName, g, ctx);
HtmlGroup_SetProperties(gNew, HtmlGroup_GetProperties(g));
HtmlGroup_SetObject(gNew, HtmlGroup_GetObject(g));
}
if (gNew) {
HtmlCtx_SetCurrentGroup(ctx, gNew);
GWEN_XmlCtx_IncDepth(ctx);
}
return 0;
}
int AH_Msg_VerifyPinTan(AH_MSG *hmsg, GWEN_DB_NODE *gr) {
AH_HBCI *h;
GWEN_LIST *sigheads;
GWEN_LIST *sigtails;
GWEN_DB_NODE *n;
int nonSigHeads;
int nSigheads;
unsigned int dataBegin;
// char *dataStart;
// unsigned int dataLength;
unsigned int i;
AB_USER *u;
assert(hmsg);
h=AH_Dialog_GetHbci(hmsg->dialog);
assert(h);
u=AH_Dialog_GetDialogOwner(hmsg->dialog);
assert(u);
/* let's go */
sigheads=GWEN_List_new();
/* enumerate signature heads */
nonSigHeads=0;
nSigheads=0;
n=GWEN_DB_GetFirstGroup(gr);
while(n) {
if (strcasecmp(GWEN_DB_GroupName(n), "SigHead")==0) {
/* found a signature head */
if (nonSigHeads) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Found some unsigned parts at the beginning");
GWEN_List_free(sigheads);
return GWEN_ERROR_BAD_DATA;
}
GWEN_List_PushBack(sigheads, n);
nSigheads++;
}
else if (strcasecmp(GWEN_DB_GroupName(n), "MsgHead")!=0) {
if (nSigheads)
break;
nonSigHeads++;
}
n=GWEN_DB_GetNextGroup(n);
} /* while */
if (!n) {
if (nSigheads) {
DBG_ERROR(AQHBCI_LOGDOMAIN,
"Found Signature heads but no other segments");
GWEN_List_free(sigheads);
return GWEN_ERROR_BAD_DATA;
}
DBG_DEBUG(AQHBCI_LOGDOMAIN, "No signatures");
GWEN_List_free(sigheads);
return 0;
}
/* store begin of signed data */
dataBegin=GWEN_DB_GetIntValue(n, "segment/pos", 0, 0);
if (!dataBegin) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "No position specifications in segment");
GWEN_List_free(sigheads);
return GWEN_ERROR_BAD_DATA;
}
/* now get first signature tail */
while(n) {
if (strcasecmp(GWEN_DB_GroupName(n), "SigTail")==0) {
unsigned int currpos;
/* found a signature tail */
currpos=GWEN_DB_GetIntValue(n, "segment/pos", 0, 0);
if (!currpos || dataBegin>currpos) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Bad position specification in Signature tail");
GWEN_List_free(sigheads);
return GWEN_ERROR_BAD_DATA;
}
// dataLength=currpos-dataBegin;
break;
}
n=GWEN_DB_GetNextGroup(n);
} /* while */
if (!n) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "No signature tail found");
GWEN_List_free(sigheads);
return GWEN_ERROR_BAD_DATA;
}
sigtails=GWEN_List_new();
while(n) {
if (strcasecmp(GWEN_DB_GroupName(n), "SigTail")!=0)
break;
GWEN_List_PushBack(sigtails, n);
n=GWEN_DB_GetNextGroup(n);
} /* while */
if (!n) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Message tail expected");
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_BAD_DATA;
}
if (strcasecmp(GWEN_DB_GroupName(n), "MsgTail")!=0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Unexpected segment (msg tail expected)");
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_BAD_DATA;
}
n=GWEN_DB_GetNextGroup(n);
if (n) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Unexpected segment (end expected)");
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_BAD_DATA;
}
if (GWEN_List_GetSize(sigheads)!=
GWEN_List_GetSize(sigtails)) {
DBG_ERROR(AQHBCI_LOGDOMAIN,
"Number of signature heads (%d) does not match "
"number of signature tails (%d)",
GWEN_List_GetSize(sigheads),
GWEN_List_GetSize(sigtails));
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_BAD_DATA;
}
/* ok, now verify all signatures */
// dataStart=GWEN_Buffer_GetStart(hmsg->buffer)+dataBegin;
for (i=0; i< GWEN_List_GetSize(sigtails); i++) {
GWEN_DB_NODE *sighead;
GWEN_DB_NODE *sigtail;
const char *signerId;
/* get signature tail */
sigtail=(GWEN_DB_NODE*)GWEN_List_GetBack(sigtails);
/* get corresponding signature head */
sighead=(GWEN_DB_NODE*)GWEN_List_GetFront(sigheads);
if (!sighead || !sigtail) {
DBG_ERROR(AQHBCI_LOGDOMAIN,
"No signature head/tail left (internal error)");
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_INTERNAL;
}
GWEN_List_PopBack(sigtails);
GWEN_List_PopFront(sigheads);
signerId=GWEN_DB_GetCharValue(sighead, "key/userid", 0,
I18N("unknown"));
/* some checks */
if (strcasecmp(GWEN_DB_GetCharValue(sighead, "ctrlref", 0, ""),
GWEN_DB_GetCharValue(sigtail, "ctrlref", 0, ""))!=0) {
DBG_ERROR(AQHBCI_LOGDOMAIN, "Non-matching signature tail");
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return GWEN_ERROR_BAD_DATA;
}
/* verify signature */
DBG_INFO(AQHBCI_LOGDOMAIN, "Message signed by \"%s\"", signerId);
AH_Msg_AddSignerId(hmsg, signerId);
DBG_DEBUG(AQHBCI_LOGDOMAIN, "Verification done");
} /* for */
GWEN_List_free(sigheads);
GWEN_List_free(sigtails);
return 0;
}
int activateKey(GWEN_DB_NODE *dbArgs, int argc, char **argv) {
GWEN_DB_NODE *db;
const char *ttype;
const char *tname;
GWEN_CRYPT_TOKEN *ct;
unsigned int keyId;
int rv;
const char *s;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Int, /* type */
"keyId", /* name */
1, /* minnum */
1, /* maxnum */
"k", /* short option */
"key", /* long option */
"Key id", /* short description */
"Key id" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"tokenType", /* name */
1, /* minnum */
1, /* maxnum */
"t", /* short option */
"ttype", /* 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 */
"tname", /* long option */
"Specify the crypt token name", /* short description */
"Specify the crypt token 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,
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;
}
keyId=GWEN_DB_GetIntValue(db, "keyId", 0, 0);
if (keyId==0) {
DBG_ERROR(0, "Key Id must not be zero");
return 1;
}
s=GWEN_DB_GetCharValue(db, "algo", 0, "rsa");
if (!s) {
DBG_ERROR(0, "Algo id missing");
return 1;
}
ttype=GWEN_DB_GetCharValue(db, "tokenType", 0, 0);
assert(ttype);
tname=GWEN_DB_GetCharValue(db, "tokenName", 0, 0);
/* get crypt token */
ct=getCryptToken(ttype, tname);
if (ct==0)
return 3;
if (GWEN_DB_GetIntValue(dbArgs, "forcePin", 0, 0))
GWEN_Crypt_Token_AddModes(ct, GWEN_CRYPT_TOKEN_MODE_FORCE_PIN_ENTRY);
/* open crypt token for use */
rv=GWEN_Crypt_Token_Open(ct, 1, 0);
if (rv) {
DBG_ERROR(0, "Could not open token");
return 3;
}
else {
/* activate key */
rv=GWEN_Crypt_Token_ActivateKey(ct, keyId, 0);
if (rv) {
DBG_ERROR(GWEN_LOGDOMAIN,
"Error activating key (%d)", rv);
return 3;
}
}
/* close crypt token */
rv=GWEN_Crypt_Token_Close(ct, 0, 0);
if (rv) {
DBG_ERROR(0, "Could not close token");
return 3;
}
fprintf(stderr, "Key %d successfully activated.\n", keyId);
return 0;
}
int add2Archive(GWEN_DB_NODE *dbArgs, int argc, char **argv) {
GWEN_DB_NODE *db;
const char *aname;
GWEN_SAR *sr;
int rv;
int recursive;
int verbosity;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"archive", /* name */
1, /* minnum */
1, /* maxnum */
"a", /* short option */
"archive", /* long option */
"Specify the archive file name", /* short description */
"Specify the archive file name" /* long description */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"recursive", /* name */
0, /* minnum */
1, /* maxnum */
"r", /* short option */
"recursive", /* long option */
"add folders recursively", /* short description */
"add folders recursively" /* long description */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"verbosity", /* name */
0, /* minnum */
10, /* maxnum */
"v", /* short option */
NULL, /* long option */
"set verbosity", /* short description */
"set verbosity" /* 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,
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;
}
aname=GWEN_DB_GetCharValue(db, "archive", 0, NULL);
assert(aname);
recursive=GWEN_DB_GetIntValue(db, "recursive", 0, 0);
verbosity=GWEN_DB_GetIntValue(db, "verbosity", 0, 0);
sr=GWEN_Sar_new();
rv=GWEN_Sar_OpenArchive(sr, aname,
GWEN_SyncIo_File_CreationMode_OpenExisting,
GWEN_SYNCIO_FILE_FLAGS_READ|GWEN_SYNCIO_FILE_FLAGS_WRITE);
if (rv<0) {
fprintf(stderr, "ERROR: Error opening archive (%d)\n", rv);
return 2;
}
else {
int i;
GWEN_STRINGLIST *sl;
GWEN_STRINGLISTENTRY *se;
sl=GWEN_StringList_new();
for (i=0; ; i++) {
const char *fname;
fname=GWEN_DB_GetCharValue(db, "params", i, 0);
if (fname && *fname) {
rv=addToList(fname, recursive, sl);
if (rv<0) {
fprintf(stderr, "ERROR: Error adding entry \"%s\" to archive \"%s\" (%d)\n",
fname, aname, rv);
GWEN_StringList_free(sl);
return 2;
}
}
else
break;
}
se=GWEN_StringList_FirstEntry(sl);
while(se) {
const char *s;
s=GWEN_StringListEntry_Data(se);
if (s && *s) {
rv=GWEN_Sar_AddFile(sr, s);
if (rv<0) {
fprintf(stderr, "ERROR: Error adding file \"%s\" to archive \"%s\" (%d)\n",
s, aname, rv);
GWEN_Sar_CloseArchive(sr, 1);
GWEN_Sar_free(sr);
return 2;
}
if (verbosity>0) {
fprintf(stdout, "added \"%s\"\n", s);
}
}
se=GWEN_StringListEntry_Next(se);
} /* while se */
GWEN_StringList_free(sl);
rv=GWEN_Sar_CloseArchive(sr, 0);
if (rv<0) {
fprintf(stderr, "ERROR: Error closing archive (%d)\n", rv);
return 2;
}
return 0;
}
}
int AH_Control_GetItanModes(AB_PROVIDER *pro,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv)
{
GWEN_DB_NODE *db;
uint32_t uid;
AB_USER *u=NULL;
int rv;
const GWEN_ARGS args[]= {
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Int, /* type */
"userId", /* name */
0, /* minnum */
1, /* maxnum */
"u", /* short option */
"user", /* long option */
"Specify the unique user id", /* short description */
"Specify the unique user id" /* 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;
}
/* doit */
uid=(uint32_t) GWEN_DB_GetIntValue(db, "userId", 0, 0);
if (uid==0) {
fprintf(stderr, "ERROR: Invalid or missing unique user id\n");
return 1;
}
rv=AB_Provider_HasUser(pro, uid);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) uid);
return 2;
}
rv=AB_Provider_GetUser(pro, uid, 1, 1, &u);
if (rv<0) {
fprintf(stderr, "ERROR: User with id %lu not found\n", (unsigned long int) uid);
return 2;
}
else {
AB_IMEXPORTER_CONTEXT *ctx;
ctx=AB_ImExporterContext_new();
rv=AH_Provider_GetItanModes(pro, u, ctx, 1, 0, 1);
AB_ImExporterContext_free(ctx);
if (rv) {
DBG_ERROR_ERR(0, rv);
AB_User_free(u);
return 3;
}
}
AB_User_free(u);
return 0;
}
int addUser(AB_PROVIDER *pro,
GWEN_DB_NODE *dbArgs,
int argc,
char **argv)
{
GWEN_DB_NODE *db;
int rv;
GWEN_BUFFER *nameBuffer=NULL;
const char *tokenName;
const char *tokenType;
const char *bankId;
const char *userId;
const char *customerId;
const char *userName;
const char *hostName;
const char *server;
const char *ebicsVersion;
int importing;
uint32_t cid;
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 */
"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_Char, /* type */
"hostName", /* name */
1, /* minnum */
1, /* maxnum */
"H", /* short option */
"hostname", /* long option */
"Specify the EBICS hostname", /* short description */
"Specify the EBICS hostname" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"userName", /* name */
1, /* minnum */
1, /* maxnum */
"N", /* short option */
"username", /* long option */
"Specify the realname of the user", /* short description */
"Specify the realname of the user" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"ebicsVersion", /* name */
0, /* minnum */
1, /* maxnum */
"E", /* short option */
"ebicsversion", /* long option */
"Specify the EBICS version to use (e.g. H002)", /* short description */
"Specify the EBICS version to use (e.g. H002)" /* 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 */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"import", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"import", /* long option */
"Import a user which has already been in use (e.g. with previous versions)",
"Import a user which has already been in use (e.g. with previous versions)"
},
{
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;
}
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);
hostName=GWEN_DB_GetCharValue(db, "hostName", 0, 0);
userName=GWEN_DB_GetCharValue(db, "userName", 0, 0);
server=GWEN_DB_GetCharValue(db, "serverAddr", 0, 0);
cid=GWEN_DB_GetIntValue(db, "context", 0, 0);
importing=GWEN_DB_GetIntValue(db, "import", 0, 0);
ebicsVersion=GWEN_DB_GetCharValue(db, "ebicsVersion", 0, "H003");
if (1) {
const char *lbankId;
const char *luserId;
const char *lcustomerId;
const char *lserverAddr;
GWEN_URL *url;
GWEN_CRYPT_TOKEN_CONTEXT *ctx=NULL;
AB_USER *user;
if (1) {
GWEN_PLUGIN_MANAGER *pm;
GWEN_PLUGIN *pl;
GWEN_CRYPT_TOKEN *ct;
const GWEN_CRYPT_TOKEN_CONTEXT *cctx;
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);
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);
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);
rv=GWEN_Crypt_Token_Close(ct, 0, 0);
if (rv) {
DBG_ERROR(0, "Could not close token (%d)", rv);
return 3;
}
GWEN_Crypt_Token_free(ct);
}
if (!lbankId || !*lbankId) {
DBG_ERROR(0, "No bank id stored and none given");
return 3;
}
if (!luserId || !*luserId) {
DBG_ERROR(0, "No user id (Benutzerkennung) stored and none given");
return 3;
}
/* TODO: Check for existing users to avoid duplicates */
#if 0
user=AB_Banking_FindUser(ab, EBC_PROVIDER_NAME,
"de",
lbankId, luserId, lcustomerId);
if (user) {
DBG_ERROR(0, "User %s already exists", luserId);
return 3;
}
#endif
user=AB_Provider_CreateUserObject(pro);
assert(user);
AB_User_SetCountry(user, "de");
AB_User_SetBankCode(user, lbankId);
AB_User_SetUserId(user, luserId);
AB_User_SetCustomerId(user, lcustomerId);
EBC_User_SetPeerId(user, hostName);
AB_User_SetUserName(user, userName);
EBC_User_SetTokenType(user, tokenType);
EBC_User_SetTokenName(user, tokenName);
EBC_User_SetTokenContextId(user, cid);
if (ebicsVersion) {
if (strcasecmp(ebicsVersion, "H002")==0) {
EBC_User_SetProtoVersion(user, "H002");
EBC_User_SetSignVersion(user, "A004");
EBC_User_SetAuthVersion(user, "X001");
EBC_User_SetCryptVersion(user, "E001");
}
else if (strcasecmp(ebicsVersion, "H003")==0) {
EBC_User_SetProtoVersion(user, "H003");
EBC_User_SetSignVersion(user, "A005");
EBC_User_SetAuthVersion(user, "X002");
EBC_User_SetCryptVersion(user, "E002");
}
else if (strcasecmp(ebicsVersion, "H004")==0) {
EBC_User_SetProtoVersion(user, "H004");
EBC_User_SetSignVersion(user, "A005");
EBC_User_SetAuthVersion(user, "X002");
EBC_User_SetCryptVersion(user, "E002");
}
else {
fprintf(stderr, "%s",
I18N("Invalid protocol version.\n"
"Possible versions are H002, H003 and H004.\n"));
return 3;
}
}
/* 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_Provider_GetBanking(pro), 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;
}
}
GWEN_Url_SetProtocol(url, "https");
if (GWEN_Url_GetPort(url)==0)
GWEN_Url_SetPort(url, 443);
/* set url */
if (1) {
GWEN_BUFFER *tbuf;
tbuf=GWEN_Buffer_new(0, 256, 0, 1);
rv=GWEN_Url_toString(url, tbuf);
if (rv<0) {
DBG_ERROR(0, "Internal error storing URL");
return 3;
}
EBC_User_SetServerUrl(user, GWEN_Buffer_GetStart(tbuf));
GWEN_Buffer_free(tbuf);
}
GWEN_Url_free(url);
if (importing) {
EBC_User_AddFlags(user, EBC_USER_FLAGS_INI | EBC_USER_FLAGS_HIA);
EBC_User_SetStatus(user, EBC_UserStatus_Enabled);
}
rv=AB_Provider_AddUser(pro, user);
if (rv<0) {
DBG_ERROR(AQEBICS_LOGDOMAIN, "Coud not add new user (%d)", rv);
AB_User_free(user);
return 4;
}
AB_User_free(user);
/* context no longer needed */
GWEN_Crypt_Token_Context_free(ctx);
}
return 0;
}
int main(int argc, char **argv) {
GWEN_DB_NODE *db;
const char *cmd;
const char *pinFile;
int nonInteractive=0;
const char *s;
int rv;
AB_BANKING *ab;
GWEN_GUI *gui;
const GWEN_ARGS args[]={
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"cfgfile", /* name */
0, /* minnum */
1, /* maxnum */
"C", /* short option */
"cfgfile", /* long option */
"Specify the configuration file", /* short description */
"Specify the configuration file" /* long description */
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"pinfile", /* name */
0, /* minnum */
1, /* maxnum */
"P", /* short option */
"pinfile", /* long option */
"Specify the PIN file", /* short description */
"Specify the PIN file" /* long description */
},
{
0, /* flags */
GWEN_ArgsType_Int, /* type */
"nonInteractive", /* name */
0, /* minnum */
1, /* maxnum */
"n", /* short option */
"noninteractive", /* long option */
"Select non-interactive mode",/* short description */
"Select non-interactive mode.\n" /* long description */
"This automatically returns a confirmative answer to any non-critical\n"
"message."
},
{
0,
GWEN_ArgsType_Int,
"verbosity",
0,
10,
"v",
0,
"Increase the verbosity level",
"Increase the verbosity level"
},
{
GWEN_ARGS_FLAGS_HAS_ARGUMENT, /* flags */
GWEN_ArgsType_Char, /* type */
"charset", /* name */
0, /* minnum */
1, /* maxnum */
0, /* short option */
"charset", /* long option */
"Specify the output character set", /* short description */
"Specify the output character set" /* 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 */
}
};
rv=GWEN_Init();
if (rv<0) {
fprintf(stderr, "ERROR: Unable to init GWEN (%d).\n", rv);
return 2;
}
GWEN_Logger_Open("aqpaypal-tool", "aqpaypal-tool", 0,
GWEN_LoggerType_Console,
GWEN_LoggerFacility_User);
GWEN_Logger_SetLevel("aqpaypal-tool", GWEN_LoggerLevel_Warning);
GWEN_Logger_SetLevel(0, GWEN_LoggerLevel_Warning);
db=GWEN_DB_Group_new("arguments");
rv=GWEN_Args_Check(argc, argv, 1,
GWEN_ARGS_MODE_ALLOW_FREEPARAM |
GWEN_ARGS_MODE_STOP_AT_FREEPARAM,
args,
db);
if (rv==GWEN_ARGS_RESULT_ERROR) {
fprintf(stderr, "ERROR: Could not parse arguments main\n");
return -1;
}
else if (rv==GWEN_ARGS_RESULT_HELP) {
GWEN_BUFFER *ubuf;
ubuf=GWEN_Buffer_new(0, 1024, 0, 1);
GWEN_Buffer_AppendString(ubuf,
I18N("Usage: "));
GWEN_Buffer_AppendString(ubuf, argv[0]);
GWEN_Buffer_AppendString(ubuf,
I18N(" [GLOBAL OPTIONS] COMMAND "
"[LOCAL OPTIONS]\n"));
GWEN_Buffer_AppendString(ubuf,
I18N("\nGlobal Options:\n"));
if (GWEN_Args_Usage(args, ubuf, GWEN_ArgsOutType_Txt)) {
fprintf(stderr, "ERROR: Could not create help string\n");
return 1;
}
GWEN_Buffer_AppendString(ubuf,
I18N("\nCommands:\n\n"));
GWEN_Buffer_AppendString(ubuf,
I18N(" listusers:\n"
" blurb "
"file\n\n"));
GWEN_Buffer_AppendString(ubuf,
I18N(" listaccounts:\n"
" blurb "
"file\n\n"));
GWEN_Buffer_AppendString(ubuf,
I18N(" adduser:\n"
" blurb "
"file\n\n"));
GWEN_Buffer_AppendString(ubuf,
I18N(" addaccount:\n"
" blurb "
"file\n\n"));
GWEN_Buffer_AppendString(ubuf,
I18N(" setsecret:\n"
" blurb "
"file\n\n"));
fprintf(stdout, "%s\n", GWEN_Buffer_GetStart(ubuf));
GWEN_Buffer_free(ubuf);
return 0;
}
if (rv) {
argc-=rv-1;
argv+=rv-1;
}
cmd=GWEN_DB_GetCharValue(db, "params", 0, 0);
if (!cmd) {
fprintf(stderr, "ERROR: Command needed.\n");
return 1;
}
gui=GWEN_Gui_CGui_new();
s=GWEN_DB_GetCharValue(db, "charset", 0, "ISO-8859-15");
GWEN_Gui_SetCharSet(gui, s);
nonInteractive=GWEN_DB_GetIntValue(db, "nonInteractive", 0, 0);
if (nonInteractive)
GWEN_Gui_AddFlags(gui, GWEN_GUI_FLAGS_NONINTERACTIVE);
else
GWEN_Gui_SubFlags(gui, GWEN_GUI_FLAGS_NONINTERACTIVE);
pinFile=GWEN_DB_GetCharValue(db, "pinFile", 0, NULL);
if (pinFile) {
GWEN_DB_NODE *dbPins;
dbPins=GWEN_DB_Group_new("pins");
if (GWEN_DB_ReadFile(dbPins, pinFile,
GWEN_DB_FLAGS_DEFAULT |
GWEN_PATH_FLAGS_CREATE_GROUP)) {
fprintf(stderr, "Error reading pinfile \"%s\"\n", pinFile);
return 2;
}
/* set argument "persistent" to one in non-interactive mode */
GWEN_Gui_CGui_SetPasswordDb(gui, dbPins, nonInteractive);
}
GWEN_Gui_SetGui(gui);
ab=AB_Banking_new("aqpaypal-tool",
GWEN_DB_GetCharValue(db, "cfgfile", 0, 0),
0);
AB_Gui_Extend(gui, ab);
if (strcasecmp(cmd, "listusers")==0) {
rv=listUsers(ab, db, argc, argv);
}
else if (strcasecmp(cmd, "listaccounts")==0) {
rv=listAccounts(ab, db, argc, argv);
}
else if (strcasecmp(cmd, "adduser")==0) {
rv=addUser(ab, db, argc, argv);
}
else if (strcasecmp(cmd, "addaccount")==0) {
rv=addAccount(ab, db, argc, argv);
}
else if (strcasecmp(cmd, "setsecrets")==0) {
rv=setSecrets(ab, db, argc, argv);
}
else {
fprintf(stderr, "ERROR: Unknown command \"%s\".\n", cmd);
rv=1;
}
return rv;
}
