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;
}
char *XMLToHTML(struct XMLDBbuffer *src) {
char *symbol[]={"\"","\\","<",">","&","<br>",0};
char *entity[]={""","'","<",">","&","\n",0};
struct Entitydata *ent=NULL;
char *txt=NULL;
struct XMLDBbuffer *dst=NULL;
ent=EntityMake();
EntityAddEntityStringArray(ent,entity);
EntityAddSymbolStringArray(ent,symbol);
dst=EntityDecodeBuffer(ent,src);
txt=getDBstring(dst);
XMLDBFreeBuffer(dst);
free(ent);
return txt;
}
char *XMLToURL(struct XMLDBbuffer *src) {
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
struct Entitydata *ent=NULL;
char *txt=NULL;
struct XMLDBbuffer *tmp=NULL;
struct XMLDBbuffer *dst=NULL;
ent=EntityMake();
EntityAddEntityStringArray(ent,entity);
EntityAddSymbolStringArray(ent,symbol);
tmp=EntityDecodeBuffer(ent,src);
dst=EntityDecodeBuffer(ent,tmp);
txt=CGIMakeURLString(dst->buf,dst->sze);
XMLDBFreeBuffer(tmp);
XMLDBFreeBuffer(dst);
free(ent);
return txt;
}
int XMLdocRenderFile(struct XMLdocfile *ptr) {
FILE *fp;
char lbuf[256];
struct Entitydata *ent;
char *filename=NULL;
int s=0;
if (ptr==NULL) return 0;
if (ptr->fname==NULL) return 0;
if (ptr->text==NULL) return 0;
if (ptr->path !=NULL) {
filename=malloc(strlen(ptr->path)+strlen(ptr->fname)+2);
sprintf(filename,"%s/%s",ptr->path,ptr->fname);
} else {
filename=malloc(strlen(ptr->fname)+1);
strcpy(filename,ptr->fname);
}
fp=fopen(filename,"r");
free(filename);
if (fp==NULL) return 0;
ent=EntityMake();
if (ent==NULL) {
fclose(fp);
return -1;
}
s=EntitySetText(ent,ptr->text,ptr->data);
if ((s==0) && (ptr->type !=0)) { /* raw file so must encode entities */
char *symbol[]={"\"","\\","<",">","&",0};
char *entity[]={""","'","<",">","&",0};
s=EntityAddEntityStringArray(ent,entity);
if (s==0) s=EntityAddSymbolStringArray(ent,symbol);
}
while ((s==0) && (fgets(lbuf,255,fp) !=NULL)) {
s=EntityEncode(lbuf,strlen(lbuf),ent);
if (s !=0) break;
}
fclose(fp);
return s;
}
char *RawToHTML(char *buf,int sze) {
char *symbol[]={"\"","\\","<",">","&","\n",0};
char *entity[]={""","'","<",">","&","<br>",0};
char *dtxt=NULL;
struct Entitydata *ent=NULL;
struct XMLDBbuffer *src=NULL;
struct XMLDBbuffer *dst=NULL;
ent=EntityMake();
EntityAddEntityStringArray(ent,entity);
EntityAddSymbolStringArray(ent,symbol);
src=XMLDBMakeBuffer(sze);
XMLDBAddBuffer(src,buf,sze);
dst=EntityEncodeBuffer(ent,src);
dtxt=getDBstring(dst);
XMLDBFreeBuffer(src);
XMLDBFreeBuffer(dst);
free(ent);
return dtxt;
}
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 decodeexternal(struct XMLDBtable *ptr,struct XMLDBtable *tree,void *data) {
int i,s=0,n;
struct xmldoc *xmldoc;
struct XMLDBelement *e;
struct XMLDBbuffer *dbuf=NULL;
char *search=NULL;
char *replace=NULL;
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,"search")==0) {
if (search !=NULL) free(search);
search=getDBstring(e->data);
if (search==NULL) break;
} else if (strcmp(e->name,"replace")==0) {
if (replace !=NULL) free(replace);
dbuf=EntityDecodeBuffer(entptr,e->data);
if (dbuf !=NULL) {
replace=getDBstring(dbuf);
XMLDBFreeBuffer(dbuf);
}
if (replace==NULL) break;
}
}
if (i<ptr->num) s=-1;
if ((s==0) && (search !=NULL)) {
n=xmldoc->external.search.num;
if (s==0) {
if (xmldoc->external.search.txt==NULL)
xmldoc->external.search.txt=malloc(sizeof(char *));
else xmldoc->external.search.txt=realloc(xmldoc->external.search.txt,
sizeof(char *)*(n+1));
if (xmldoc->external.search.txt==NULL) s=-1;
if (s==0) xmldoc->external.search.txt[n]=NULL;
}
if (s==0) {
if (xmldoc->external.replace.txt==NULL)
xmldoc->external.replace.txt=malloc(sizeof(char *));
else xmldoc->external.replace.txt=realloc(xmldoc->external.replace.txt,
sizeof(char *)*(n+1));
if (xmldoc->external.replace.txt==NULL) s=-1;
if (s==0) xmldoc->external.replace.txt[n]=NULL;
}
if (s==0) {
xmldoc->external.search.txt[n]=search;
xmldoc->external.replace.txt[n]=replace;
xmldoc->external.search.num++;
xmldoc->external.replace.num++;
}
}
free(entptr);
if (s !=0) {
if (search !=NULL) free(search);
if (replace !=NULL) free(replace);
return -1;
}
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;
}
