int write_hp_group_c(ARGUMENTS *args, GWEN_XMLNODE *node,
GWEN_SYNCIO *sio)
{
int rv;
if (GWEN_XMLNode_GetType(node)==GWEN_XMLNodeTypeTag) {
if (strcasecmp(GWEN_XMLNode_GetData(node), "type")==0)
return write_h_struct_c(args, node, sio);
else if (strcasecmp(GWEN_XMLNode_GetData(node), "elem")==0) {
return write_h_elem_c(args, node, sio);
}
else if (strcasecmp(GWEN_XMLNode_GetData(node), "func")==0) {
return write_h_func_c(args, node, sio);
}
else if (strcasecmp(GWEN_XMLNode_GetData(node), "header")==0) {
return write_h_header(args, node, sio, "header");
}
else if (strcasecmp(GWEN_XMLNode_GetData(node), "group")==0) {
GWEN_XMLNODE *n;
n=GWEN_XMLNode_GetFirstTag(node);
while (n) {
rv=write_hp_group_c(args, n, sio);
if (rv)
return rv;
n=GWEN_XMLNode_GetNextTag(n);
} /* while */
} /* if group */
}
return 0;
}
int GWEN_DBIO__XmlDb_ImportGroup(GWEN_DBIO *dbio,
uint32_t flags,
GWEN_DB_NODE *data,
GWEN_DB_NODE *cfg,
GWEN_XMLNODE *node) {
GWEN_XMLNODE *n;
assert(node);
n=GWEN_XMLNode_GetFirstTag(node);
while(n) {
const char *tname;
const char *s;
tname=GWEN_XMLNode_GetData(n);
assert(tname && *tname);
s=GWEN_XMLNode_GetProperty(n, "type", 0);
if (s) {
if (strcasecmp(s, "group")==0) {
GWEN_DB_NODE *db;
int rv;
db=GWEN_DB_GetGroup(data, flags, tname);
if (db==0) {
DBG_INFO(GWEN_LOGDOMAIN, "here");
return GWEN_ERROR_INVALID;
}
rv=GWEN_DBIO__XmlDb_ImportGroup(dbio, flags, db, cfg, n);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
return rv;
}
}
else if (strcasecmp(s, "var")==0) {
int rv;
rv=GWEN_DBIO__XmlDb_ImportVar(dbio, flags, data, cfg, n);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
return rv;
}
}
else {
DBG_ERROR(GWEN_LOGDOMAIN, "Unexpected type \"%s\"", s);
return GWEN_ERROR_INVALID;
}
}
n=GWEN_XMLNode_GetNextTag(n);
}
return 0;
}
uint32_t LC_ReaderFlags_fromXml(GWEN_XMLNODE *node, const char *name){
const char *p;
uint32_t flags=0;
GWEN_XMLNODE *n;
n=GWEN_XMLNode_FindFirstTag(node, name, 0, 0);
while(n) {
GWEN_XMLNODE *nn;
nn=GWEN_XMLNode_GetFirstData(n);
if (nn) {
p=GWEN_XMLNode_GetData(nn);
assert(p);
if (strcasecmp(p, "keypad")==0)
flags|=LC_READER_FLAGS_KEYPAD;
else if (strcasecmp(p, "display")==0)
flags|=LC_READER_FLAGS_DISPLAY;
else if (strcasecmp(p, "noinfo")==0)
flags|=LC_READER_FLAGS_NOINFO;
else if (strcasecmp(p, "remote")==0)
flags|=LC_READER_FLAGS_REMOTE;
else if (strcasecmp(p, "auto")==0)
flags|=LC_READER_FLAGS_AUTO;
else if (strcasecmp(p, "suspended_checks")==0)
flags|=LC_READER_FLAGS_SUSPENDED_CHECKS;
else if (strcasecmp(p, "driverHasVerify")==0)
flags|=LC_READER_FLAGS_DRIVER_HAS_VERIFY;
else if (strcasecmp(p, "keepRunning")==0)
flags|=LC_READER_FLAGS_KEEP_RUNNING;
else if (strcasecmp(p, "lowWriteBoundary")==0)
flags|=LC_READER_FLAGS_LOW_WRITE_BOUNDARY;
else if (strcasecmp(p, "noMemorySw")==0)
flags|=LC_READER_FLAGS_NO_MEMORY_SW;
else {
DBG_WARN(0, "Unknown flag \"%s\", ignoring", p);
}
}
n=GWEN_XMLNode_FindNextTag(n, name, 0, 0);
} /* while */
return flags;
}
void GWEN_DBIO__XmlDb_ReadDataTags(GWEN_XMLNODE *node, GWEN_BUFFER *buf) {
GWEN_XMLNODE *ndata;
GWEN_BUFFER *tbuf;
int rv;
tbuf=GWEN_Buffer_new(0, 256, 0, 1);
ndata=GWEN_XMLNode_GetFirstData(node);
while(ndata) {
const char *s;
s=GWEN_XMLNode_GetData(ndata);
if (s) {
if (GWEN_Buffer_GetUsedBytes(tbuf))
GWEN_Buffer_AppendByte(tbuf, ' ');
GWEN_Buffer_AppendString(tbuf, s);
}
ndata=GWEN_XMLNode_GetNextData(node);
}
rv=GWEN_Text_UnescapeXmlToBuffer(GWEN_Buffer_GetStart(tbuf), buf);
if (rv<0) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
}
GWEN_Buffer_free(tbuf);
}
AB_TRANSACTION *AB_ImExporterYN__ReadLNE_LNS(AB_IMEXPORTER *ie,
AB_IMEXPORTER_ACCOUNTINFO *ai,
GWEN_XMLNODE *node)
{
AB_TRANSACTION *t;
GWEN_XMLNODE *nn;
GWEN_DATE *da=NULL;
AB_VALUE *val=NULL;
t=AB_Transaction_new();
/* get date */
nn=GWEN_XMLNode_FindFirstTag(node, "DTM", 0, 0);
if (nn)
da=AB_ImExporterYN__ReadDate(ie, nn, 209);
AB_Transaction_SetValutaDate(t, da);
GWEN_Date_free(da);
da=NULL;
/* read amount */
nn=GWEN_XMLNode_FindFirstTag(node, "MOA", 0, 0);
if (nn) {
/* Gutschrift */
val=AB_ImExporterYN__ReadValue(ie, nn, 210);
if (val) {
if (AB_Value_IsZero(val)) {
AB_Value_free(val);
val=NULL;
}
}
if (val==NULL) {
val=AB_ImExporterYN__ReadValue(ie, nn, 211);
if (val)
AB_Value_Negate(val);
}
}
if (val==NULL)
val=AB_Value_new();
AB_Value_SetCurrency(val, AB_ImExporterAccountInfo_GetCurrency(ai));
AB_Transaction_SetValue(t, val);
AB_Value_free(val);
val=0;
/* read purpose */
nn=GWEN_XMLNode_GetNodeByXPath(node, "FTX/C108",
GWEN_PATH_FLAGS_NAMEMUSTEXIST);
if (nn) {
GWEN_XMLNODE *nnn;
nnn=GWEN_XMLNode_FindFirstTag(nn, "D_4440", 0, 0);
while (nnn) {
GWEN_XMLNODE *nData;
nData=GWEN_XMLNode_GetFirstData(nnn);
if (nData) {
const char *s;
s=GWEN_XMLNode_GetData(nData);
if (s) {
GWEN_BUFFER *xbuf;
xbuf=GWEN_Buffer_new(0, 256, 0, 1);
AB_ImExporter_Iso8859_1ToUtf8(s, strlen(s), xbuf);
AB_Transaction_AddPurposeLine(t, GWEN_Buffer_GetStart(xbuf));
GWEN_Buffer_free(xbuf);
}
}
nnn=GWEN_XMLNode_FindNextTag(nnn, "D_4440", 0, 0);
}
}
return t;
}
int GWEN_DBIO__XmlDb_ImportVar(GWEN_DBIO *dbio,
uint32_t flags,
GWEN_DB_NODE *data,
GWEN_DB_NODE *cfg,
GWEN_XMLNODE *node) {
GWEN_XMLNODE *n;
const char *vname;
GWEN_BUFFER *tbuf;
assert(node);
vname=GWEN_XMLNode_GetData(node);
assert(vname && *vname);
tbuf=GWEN_Buffer_new(0, 256, 0, 1);
n=GWEN_XMLNode_FindFirstTag(node, "value", 0, 0);
while(n) {
const char *s;
const char *d;
int rv;
GWEN_DBIO__XmlDb_ReadDataTags(n, tbuf);
d=GWEN_Buffer_GetStart(tbuf);
if (*d) {
s=GWEN_XMLNode_GetData(n);
assert(s && *s);
s=GWEN_XMLNode_GetProperty(n, "type", 0);
if (s) {
if (strcasecmp(s, "char")==0) {
rv=GWEN_DB_SetCharValue(data, flags, vname, d);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
GWEN_Buffer_free(tbuf);
return rv;
}
}
else if (strcasecmp(s, "int")==0) {
int val;
if (1!=sscanf(d, "%i", &val)) {
DBG_INFO(GWEN_LOGDOMAIN, "Non-integer value [%s]", d);
GWEN_Buffer_free(tbuf);
return GWEN_ERROR_INVALID;
}
rv=GWEN_DB_SetIntValue(data, flags, vname, val);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
GWEN_Buffer_free(tbuf);
return rv;
}
}
else if (strcasecmp(s, "bin")==0) {
GWEN_BUFFER *xbuf;
xbuf=GWEN_Buffer_new(0, 256, 0, 1);
rv=GWEN_Text_FromHexBuffer(d, xbuf);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
GWEN_Buffer_free(xbuf);
GWEN_Buffer_free(tbuf);
return rv;
}
rv=GWEN_DB_SetBinValue(data, flags, vname,
GWEN_Buffer_GetStart(xbuf),
GWEN_Buffer_GetUsedBytes(xbuf));
GWEN_Buffer_free(xbuf);
if (rv) {
DBG_INFO(GWEN_LOGDOMAIN, "here (%d)", rv);
GWEN_Buffer_free(tbuf);
return rv;
}
}
else {
DBG_ERROR(GWEN_LOGDOMAIN,
"Unhandled value type \"%s\"", s);
GWEN_Buffer_free(tbuf);
return GWEN_ERROR_INVALID;
}
}
}
else {
DBG_DEBUG(GWEN_LOGDOMAIN, "Empty value");
}
GWEN_Buffer_Reset(tbuf);
n=GWEN_XMLNode_FindNextTag(n, "value", 0, 0);
}
GWEN_Buffer_free(tbuf);
return 0;
}
int GWEN_XMLNode_GetXPath(const GWEN_XMLNODE *n1,
const GWEN_XMLNODE *n2,
GWEN_BUFFER *nbuf) {
GWEN_BUFFER *lbuf;
const GWEN_XMLNODE *ln1;
const GWEN_XMLNODE *ln2;
if (!n1 && !n2) {
DBG_ERROR(GWEN_LOGDOMAIN, "Both nodes are NULL");
return -1;
}
if (!n1) {
n1=n2;
while(n1->parent)
n1=n1->parent;
}
if (!n2) {
n2=n1;
while(n2->parent)
n2=n2->parent;
}
if (n2==n1) {
GWEN_Buffer_AppendString(nbuf, "here()");
return 0;
}
lbuf=GWEN_Buffer_new(0, 256, 0, 1);
GWEN_Buffer_ReserveBytes(lbuf, 128);
ln1=n1->parent;
if (ln1) {
GWEN_Buffer_AppendString(lbuf, "../");
while(ln1) {
if (ln1==n2) {
/* found n2 */
GWEN_Buffer_AppendBuffer(nbuf, lbuf);
GWEN_Buffer_free(lbuf);
return 0;
}
if (GWEN_XMLNode_IsChildOf(ln1, n2))
break;
ln1=ln1->parent;
GWEN_Buffer_AppendString(lbuf, "../");
}
if (!ln1) {
DBG_ERROR(GWEN_LOGDOMAIN, "Nodes do not share root node");
GWEN_Buffer_free(lbuf);
return -1;
}
/* append path to n1 */
GWEN_Buffer_AppendBuffer(nbuf, lbuf);
}
DBG_ERROR(GWEN_LOGDOMAIN, "Path so far: %s", GWEN_Buffer_GetStart(lbuf));
/* get path to n2 */
GWEN_Buffer_Reset(lbuf);
ln2=n2;
while(ln2) {
GWEN_XMLNODE *tn;
int idx;
char idxbuf[32];
if (ln2->parent==ln1)
break;
/* count occurences of this tag in this level */
idx=1;
tn=ln2->parent;
if (tn) {
tn=GWEN_XMLNode_FindFirstTag(tn, ln2->data, 0, 0);
while(tn) {
if (tn==ln2)
break;
idx++;
tn=GWEN_XMLNode_FindNextTag(tn, ln2->data, 0, 0);
}
}
snprintf(idxbuf, sizeof(idxbuf), "[%d]", idx);
idxbuf[sizeof(idxbuf)-1]=0;
GWEN_Buffer_InsertString(lbuf, idxbuf);
GWEN_Buffer_InsertString(lbuf, GWEN_XMLNode_GetData(ln2));
GWEN_Buffer_InsertByte(lbuf, '/');
ln2=ln2->parent;
}
DBG_ERROR(GWEN_LOGDOMAIN, "Path so far: %s", GWEN_Buffer_GetStart(lbuf));
assert(ln2);
/* append path to n2 */
GWEN_Buffer_AppendBuffer(nbuf, lbuf);
GWEN_Buffer_free(lbuf);
return 0;
}
