int decodesfname(struct XMLDBtable *ptr,struct XMLDBtable *tree,
void *data) {
int i,j;
struct config *config;
struct XMLDBelement *e;
char zero[1]={0};
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
struct Entitydata *entptr;
entptr=EntityMake();
if (entptr==NULL) return -1;
EntityAddEntityStringArray(entptr,entity);
EntityAddSymbolStringArray(entptr,symbol);
config=(struct config *)data;
for (i=0;i<ptr->num;i++) {
e=ptr->element[i];
if (strcmp(e->name,"remail")==0) {
if (config->sfname.remail.buf !=NULL)
XMLDBFreeBuffer(config->sfname.remail.buf);
config->sfname.remail.type=0;
for (j=0;j<e->atnum;j++) {
if ((e->atval[j] !=NULL) && (strcmp(e->atval[j],"file")==0))
config->sfname.remail.type=1;
}
if (config->sfname.remail.type==1) {
config->sfname.remail.buf=XMLDBCopyBuffer(e->data);
XMLDBAddBuffer(config->sfname.remail.buf,zero,1);
} else config->sfname.remail.buf=EntityDecodeBuffer(entptr,e->data);
if (config->sfname.remail.buf==NULL) break;
}
if (strcmp(e->name,"remail.mail")==0) {
if (config->sfname.remailmail.buf !=NULL)
XMLDBFreeBuffer(config->sfname.remailmail.buf);
config->sfname.remailmail.type=0;
for (j=0;j<e->atnum;j++) {
if ((e->atval[j] !=NULL) && (strcmp(e->atval[j],"file")==0))
config->sfname.remailmail.type=1;
}
if (config->sfname.remailmail.type==1) {
config->sfname.remailmail.buf=XMLDBCopyBuffer(e->data);
XMLDBAddBuffer(config->sfname.remailmail.buf,zero,1);
} else config->sfname.remailmail.buf=EntityDecodeBuffer(entptr,e->data);
if (config->sfname.remailmail.buf==NULL) break;
}
}
free(entptr);
if (i<ptr->num) return -1;
return 0;
}
void DoReplace(char **replace,char *name,struct XMLDBbuffer *buf,
struct XMLDBbuffer *mod,char *sep,int type) {
struct XMLDBbuffer *tbuf;
char *txt;
if (buf==NULL) return;
if (buf->sze==0) return;
if (mod==NULL) tbuf=XMLDBCopyBuffer(buf);
else tbuf=ApplyModifier(mod,name,buf);
if (type==2) txt=XMLToRaw(tbuf);
else if (type==1) txt=XMLToURL(tbuf);
else txt=XMLToHTML(tbuf);
if (*replace==NULL) *replace=txt;
else {
char *tmp;
if (sep !=NULL) {
tmp=realloc(*replace,strlen(*replace)+strlen(sep)+strlen(txt)+1);
strcat(tmp,sep);
} else tmp=realloc(*replace,strlen(*replace)+strlen(txt)+1);
strcat(tmp,txt);
free(txt);
*replace=tmp;
}
XMLDBFreeBuffer(tbuf);
}
int EntityAddSymbol(struct Entitydata *ptr,
struct XMLDBbuffer *symbol) {
int n;
struct XMLDBbuffer **tmp;
int *itmp;
if (ptr==NULL) return -1;
n=ptr->symbol.num;
if (ptr->symbol.buf==NULL)
ptr->symbol.buf=malloc(sizeof(struct XMLDBbuffer *));
else {
tmp=realloc(ptr->symbol.buf,sizeof(struct XMLDBbuffer *)*(n+1));
if (tmp==NULL) return -1;
ptr->symbol.buf=tmp;
}
if (ptr->symbol.buf==NULL) return -1;
if (ptr->symbol.state==NULL) ptr->symbol.state=malloc(sizeof(int));
else {
itmp=realloc(ptr->symbol.state,sizeof(int)*(n+1));
if (itmp==NULL) return -1;
ptr->symbol.state=itmp;
}
if (ptr->symbol.state==NULL) return -1;
ptr->symbol.buf[n]=NULL;
ptr->symbol.state[n]=0;
if (symbol !=NULL) ptr->symbol.buf[n]=XMLDBCopyBuffer(symbol);
ptr->symbol.num++;
return 0;
}
int EntityAddEntity(struct Entitydata *ptr,
struct XMLDBbuffer *entity) {
struct XMLDBbuffer **tmp;
int *itmp;
int n;
if (ptr==NULL) return -1;
n=ptr->entity.num;
if (ptr->entity.buf==NULL)
ptr->entity.buf=malloc(sizeof(struct XMLDBbuffer *));
else {
tmp=realloc(ptr->entity.buf,
sizeof(struct XMLDBbuffer *)*(n+1));
if (tmp==NULL) return -1;
ptr->entity.buf=tmp;
}
if (ptr->entity.buf==NULL) return -1;
if (ptr->entity.state==NULL) ptr->entity.state=malloc(sizeof(int));
else {
itmp=realloc(ptr->entity.state,sizeof(int)*(n+1));
if (itmp==NULL) return -1;
ptr->entity.state=itmp;
}
if (ptr->entity.state==NULL) return -1;
ptr->entity.buf[n]=NULL;
ptr->entity.state[n]=0;
if (entity !=NULL) ptr->entity.buf[n]=XMLDBCopyBuffer(entity);
ptr->entity.num++;
return 0;
}
char *getDBstring(struct XMLDBbuffer *ptr) {
int s=0;
char *str=NULL;
char zero[1];
struct XMLDBbuffer *decode=NULL;
zero[0]=0;
decode=XMLDBCopyBuffer(ptr);
if (decode==NULL) return NULL;
s=XMLDBAddBuffer(decode,zero,1);
if (s !=0) {
XMLDBFreeBuffer(decode);
return NULL;
}
str=decode->buf;
free(decode);
return str;
}
int cmp(char *name,struct XMLDBbuffer *ptr,void *data) {
/* Search for a string in an XMLDB buffer structure */
char zero[1];
char *dst;
int s=0;
struct XMLDBbuffer *src=NULL;
zero[0]=0;
dst=(char *)data;
src=XMLDBCopyBuffer(ptr);
if (src==NULL) return -1;
XMLDBAddBuffer(src,zero,1);
if (strcmp(src->buf,dst)==0) s=1;
XMLDBFreeBuffer(src);
return s;
}
int xmldocbuild(struct XMLDBtable *ptr,struct XMLDBtable *tree,void *data) {
int i,j;
struct xmldoc *xmldoc;
struct XMLDBelement *e;
char zero[1]={0};
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
struct Entitydata *entptr;
entptr=EntityMake();
if (entptr==NULL) return -1;
EntityAddEntityStringArray(entptr,entity);
EntityAddSymbolStringArray(entptr,symbol);
xmldoc=(struct xmldoc *)data;
for (i=0;i<ptr->num;i++) {
e=ptr->element[i];
if (strcmp(e->name,"tree")==0) {
XMLdocGetConfigSection(e->data,"tree","tree",decodetree,xmldoc);
} else if (strcmp(e->name,"match")==0) {
XMLdocGetConfigSection(e->data,"match","match",decodematch,xmldoc);
} else if (strcmp(e->name,"script")==0) {
if (xmldoc->sc.buf !=NULL)
XMLDBFreeBuffer(xmldoc->sc.buf);
xmldoc->sc.type=0;
for (j=0;j<e->atnum;j++) {
if ((e->atval[j] !=NULL) && (strcmp(e->atval[j],"file")==0))
xmldoc->sc.type=1;
}
if (xmldoc->sc.type==1) {
xmldoc->sc.buf=XMLDBCopyBuffer(e->data);
XMLDBAddBuffer(xmldoc->sc.buf,zero,1);
} else xmldoc->sc.buf=EntityDecodeBuffer(entptr,e->data);
if (xmldoc->sc.buf==NULL) break;
} else if (strcmp(e->name,"map")==0) {
XMLdocGetConfigSection(e->data,"map","map/entry",decodemap,xmldoc);
} else if (strcmp(e->name,"external")==0) {
int xtp=0;
for (j=0;j<e->atnum;j++) {
if ((e->atval[j] !=NULL) && (strcmp(e->atval[j],"file")==0)) xtp=1;
}
if (xtp==0)
XMLdocGetConfigSection(e->data,"external","external/entry",
decodeexternal,xmldoc);
else {
char *fname=NULL;
FILE *fp;
fname=getDBstring(e->data);
if (fname==NULL) break;
fp=fopen(fname,"r");
if (fp !=NULL) {
loadexternal(fp,xmldoc);
fclose(fp);
}
}
} else if (strcmp(e->name,"xmldoc")==0) {
int xtp=0;
if (xmldoc->doc !=NULL) XMLdocFree(xmldoc->doc);
xmldoc->doc=XMLdocMake();
for (j=0;j<e->atnum;j++) {
if ((e->atval[j] !=NULL) && (strcmp(e->atval[j],"file")==0)) xtp=1;
}
if (xtp==0)
XMLdocGetConfigSection(e->data,"xmldoc","xmldoc",XMLdocBuild,
xmldoc->doc);
else {
char *fname=NULL;
FILE *fp;
fname=getDBstring(e->data);
if (fname==NULL) break;
fp=fopen(fname,"r");
if (fp !=NULL) {
loadXMLdoc(fp,xmldoc->doc);
fclose(fp);
}
}
}
}
free(entptr);
return 0;
}
int main(int argc,char *argv[]) {
int s=0,m,n;
FILE *fp;
FILE *xmlfp;
unsigned char help=0;
unsigned char option=0;
unsigned char ilf=0;
char *pathstr=NULL;
char *scstr=NULL;
int sctype=0;
struct XMLDBbuffer *scbuf=NULL;
struct XMLdata *xmldata=NULL;
struct XMLDBdata *xmldbdata=NULL;
struct XMLDBtree *tree=NULL;
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
struct Entitydata *entptr;
struct OptionText *ignore=NULL;
struct OptionText *remove=NULL;
char lbuf[255];
char zero[1]={0};
entptr=EntityMake();
EntityAddEntityStringArray(entptr,entity);
EntityAddSymbolStringArray(entptr,symbol);
OptionAdd(&opt,"-help",'x',&help);
OptionAdd(&opt,"-option",'x',&option);
OptionAdd(&opt,"ilf",'x',&ilf);
OptionAdd(&opt,"i",'a',&ignore);
OptionAdd(&opt,"r",'a',&remove);
OptionAdd(&opt,"path",'t',&pathstr);
OptionAdd(&opt,"script",'t',&scstr);
OptionAdd(&opt,"sctype",'i',&sctype);
arg=OptionProcess(1,argc,argv,&opt,NULL);
if (help==1) {
OptionPrintInfo(stdout,hlpstr);
exit(0);
}
if (option==1) {
OptionDump(stdout,&opt);
exit(0);
}
if ((argc-arg)<3) {
fprintf(stderr,"xmldoc pwd cfgfile xmldata\n");
exit(-1);
}
xmlfp=fopen(argv[arg+2],"r");
if (xmlfp==NULL) {
fprintf(stderr,"file not found.\n");
exit(-1);
}
chdir(argv[arg]);
fp=fopen(argv[arg+1],"r");
loadconfig(fp,&xmldoc);
fclose(fp);
if (argc>3) xmldoc.compare.data=argv[arg+3];
else xmldoc.compare.data=NULL;
xmldoc.compare.check=cmp;
xmldoc.map.iflg=-1;
if (pathstr !=NULL) {
free(xmldoc.tree.path);
xmldoc.tree.path=pathstr;
}
if (scstr !=NULL) {
xmldoc.sc.type=sctype;
scbuf=XMLDBMakeBuffer(64);
XMLDBAddBuffer(scbuf,scstr,strlen(scstr));
XMLDBFreeBuffer(xmldoc.sc.buf);
if (sctype==1) {
xmldoc.sc.buf=XMLDBCopyBuffer(scbuf);
XMLDBAddBuffer(xmldoc.sc.buf,zero,1);
} else xmldoc.sc.buf=EntityDecodeBuffer(entptr,scbuf);
XMLDBFreeBuffer(scbuf);
}
xmldata=XMLMake();
xmldbdata=XMLDBMake(xmldata);
tree=XMLDBMakeTree();
XMLDBBuildTree(xmldoc.tree.path,xmldoc.tree.delim,tree);
XMLDBSetTree(xmldbdata,tree);
/* Set the renderer to XMLrender */
XMLDBSetText(xmldbdata,render,&xmldoc);
XMLSetStart(xmldata,XMLDBStart,xmldbdata);
XMLSetEnd(xmldata,XMLDBEnd,xmldbdata);
XMLSetComment(xmldata,redirect,xmldata);
xmldoc.script=ScriptMake();
ScriptSetText(xmldoc.script,mapxml,&xmldoc);
XMLdocSetText(xmldoc.doc,stream_output,stdout);
if (remove !=NULL) {
xmldoc.map.remove.num=remove->num;
xmldoc.map.remove.txt=remove->txt;
}
if (ignore !=NULL) {
xmldoc.map.ignore.num=ignore->num;
xmldoc.map.ignore.txt=ignore->txt;
}
while(fgets(lbuf,255,xmlfp) !=NULL) {
if (ilf) {
m=0;
for (n=0;(lbuf[n] !=0) && (n<256);n++) {
if (lbuf[n]=='\n') continue;
lbuf[m]=lbuf[n];
m++;
}
lbuf[m]=0;
}
s=XMLDecode(xmldata,lbuf,strlen(lbuf));
if (s !=0) break;
}
XMLFree(xmldata);
XMLDBFree(xmldbdata);
XMLDBFreeTree(tree);
ScriptFree(xmldoc.script);
fclose(xmlfp);
fflush(stdout);
return 0;
}
int TagDBAddTable(struct TagDBtable *ptr,
struct XMLDBbuffer *name,struct XMLDBbuffer *start,
struct XMLDBbuffer *end) {
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
int n,s=0;
struct TagDBtag **tmp=NULL;
struct TagDBtag *t=NULL;
struct Entitydata *entptr=NULL;
if (ptr==NULL) return -1;
if (ptr->tag==NULL) ptr->tag=malloc(sizeof(struct TagDBtag *));
else {
tmp=realloc(ptr->tag,sizeof(struct TagDBtag *)*(ptr->num+1));
if (tmp==NULL) return -1;
ptr->tag=tmp;
}
if (ptr->tag==NULL) return -1;
n=ptr->num;
ptr->tag[n]=malloc(sizeof(struct TagDBtag));
if (ptr->tag[n]==NULL) return -1;
t=ptr->tag[n];
t->name=malloc(name->sze+1);
if (t->name==NULL) return -1;
memcpy(t->name,name->buf,name->sze);
t->name[name->sze]=0;
t->start.encode=NULL;
t->end.encode=NULL;
t->start.decode=NULL;
t->end.decode=NULL;
entptr=EntityMake();
if (entptr==NULL) return -1;
s=EntityAddEntityStringArray(entptr,entity);
s=EntityAddSymbolStringArray(entptr,symbol);
if (s !=0) {
EntityFree(entptr);
return -1;
}
if (start !=NULL) {
t->start.encode=XMLDBCopyBuffer(start);
if (t->start.encode==NULL) {
EntityFree(entptr);
return -1;
}
t->start.decode=EntityDecodeBuffer(entptr,start);
if (t->start.decode==NULL) {
EntityFree(entptr);
return -1;
}
}
if (end !=NULL) {
t->end.encode=XMLDBCopyBuffer(end);
if (t->end.encode==NULL) {
EntityFree(entptr);
return -1;
}
t->end.decode=EntityDecodeBuffer(entptr,end);
if (t->end.decode==NULL) {
EntityFree(entptr);
return -1;
}
}
EntityFree(entptr);
ptr->num++;
return 0;
}
int decodemap(struct XMLDBtable *ptr,struct XMLDBtable *tree,
void *data) {
int i,s=0,n;
struct config *config;
struct map *map;
struct XMLDBelement *e;
char *search=NULL;
char *replace=NULL;
struct XMLDBbuffer *defval=NULL;
struct XMLDBbuffer *sepval=NULL;
struct XMLDBbuffer *modval=NULL;
int mtp=0;
config=(struct config *)data;
for (i=0;i<ptr->num;i++) {
e=ptr->element[i];
if (strcmp(e->name,"search")==0) {
if (search !=NULL) free(search);
search=getDBstring(e->data);
if (search==NULL) break;
} else if (strcmp(e->name,"type")==0) {
char *type=NULL;
type=getDBstring(e->data);
if (strcmp(type,"html")==0) mtp=0;
if (strcmp(type,"url")==0) mtp=1;
if (strcmp(type,"raw")==0) mtp=2;
free(type);
} else if (strcmp(e->name,"replace")==0) {
if (replace !=NULL) free(replace);
replace=getDBstring(e->data);
if (replace==NULL) break;
} else if (strcmp(e->name,"default")==0) defval=e->data;
else if (strcmp(e->name,"separator")==0) sepval=e->data;
else if (strcmp(e->name,"modifier")==0) modval=e->data;
}
if (i<ptr->num) s=-1;
if ((s==0) && (search !=NULL)) {
n=config->map.num;
if (config->map.ptr==NULL)
config->map.ptr=malloc(sizeof(struct map *));
else {
struct map **tmp;
tmp=realloc(config->map.ptr,sizeof(struct map *)*(n+1));
if (tmp==NULL) return s=-1;
else config->map.ptr=tmp;
}
if (config->map.ptr==NULL) s=-1;
if (s==0) {
map=malloc(sizeof(struct map));
if (map !=NULL) {
map->search=search;
map->replace=replace;
map->type=mtp;
map->def=XMLDBCopyBuffer(defval);
map->sep=XMLDBCopyBuffer(sepval);
map->mod=XMLDBCopyBuffer(modval);
config->map.ptr[n]=map;
config->map.num++;
}
}
}
if (s !=0) {
if (search !=NULL) free(search);
if (replace !=NULL) free(replace);
return -1;
}
return 0;
}
