int GrPlotImageNameStart(char *name,int atnum,char **atname,char **atval,
char *buf,int sze,void *data) {
int i;
struct GrPlotBlock *blk;
struct GrPlotImageName *ptr;
struct GrPlotData *plt;
struct GrPlotConvert *cnv;
blk=(struct GrPlotBlock *) data;
if (blk==NULL) return -1;
ptr=(struct GrPlotImageName *) blk->data;
if (ptr==NULL) return -1;
plt=ptr->plt;
if (plt==NULL) return -1;
cnv=&plt->cnv;
if (strcmp(name,blk->name)==0) {
int s=0;
unsigned int mask;
char *xvalue=NULL;
char *yvalue=NULL;
char *xtype=NULL;
char *ytype=NULL;
char tmp[64];
ptr->mask=0;
ptr->name=NULL;
ptr->matrix=NULL;
ptr->dx=0;
ptr->dy=0;
ptr->x=0;
ptr->y=0;
for (i=0;i<atnum;i++) {
if (strcmp(atname[i],"mask")==0) {
strcpy(tmp,"0x");
strcat(tmp,atval[i]);
sscanf(tmp,"%x",&mask);
ptr->mask=mask;
} else if (strcmp(atname[i],"matrix")==0)
ptr->matrix=RplotMatrixString(atval[i]);
else if (strcmp(atname[i],"xvalue")==0) xvalue=atval[i];
else if (strcmp(atname[i],"yvalue")==0) yvalue=atval[i];
else if (strcmp(atname[i],"xpos")==0) xvalue=atval[i];
else if (strcmp(atname[i],"ypos")==0) yvalue=atval[i];
else if (strcmp(atname[i],"xtype")==0) xtype=atval[i];
else if (strcmp(atname[i],"ytype")==0) ytype=atval[i];
else if (strcmp(atname[i],"xoffset")==0) ptr->dx=atof(atval[i]);
else if (strcmp(atname[i],"yoffset")==0) ptr->dy=atof(atval[i]);
}
if (xvalue !=NULL) {
if (xtype==NULL) ptr->x=atof(xvalue);
else if (cnv->user !=NULL)
s=(cnv->user)(xtype,xvalue,&ptr->x,cnv->data);
else ptr->x=0;
}
if (yvalue !=NULL) {
if (ytype==NULL) ptr->y=atof(yvalue);
else if (cnv->user !=NULL)
s=(cnv->user)(xtype,yvalue,&ptr->y,cnv->data);
else ptr->y=0;
}
return s;
}
if (strcmp(name,"extent")==0) {
struct GrPlotExtent *ext;
ext=malloc(sizeof(struct GrPlotExtent));
ext->cnv=&plt->cnv;
ext->inc=&plt->inc;
ext->xmin=&ptr->xmin;
ext->xmax=&ptr->xmax;
ext->ymin=&ptr->ymin;
ext->ymax=&ptr->ymax;
ptr->state=ptr->state | 0x01;
blk=GrPlotSave(blk->xml,"extent",ext);
XMLSetStart(blk->xml,GrPlotExtentStart,blk);
XMLSetEnd(blk->xml,GrPlotExtentEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
if (strcmp(name,"name")==0) {
struct GrPlotString *str;
str=malloc(sizeof(struct GrPlotString));
str->txt=&ptr->name;
str->inc=&plt->inc;
blk=GrPlotSave(blk->xml,"name",str);
XMLSetStart(blk->xml,GrPlotStringStart,blk);
XMLSetText(blk->xml,GrPlotStringText,blk);
XMLSetEnd(blk->xml,GrPlotStringEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
if (strcmp(name,"include")==0) {
struct GrPlotInclude *inc;
inc=malloc(sizeof(struct GrPlotInclude));
inc->inc=&plt->inc;
blk=GrPlotSave(blk->xml,name,inc);
XMLSetStart(blk->xml,GrPlotIncludeStart,blk);
XMLSetEnd(blk->xml,GrPlotIncludeEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
return 0;
}
int GrPlotShapeStart(char *name,int atnum,char **atname,char **atval,
char *buf,int sze,void *data) {
int i;
struct GrPlotBlock *blk;
struct GrPlotShape *ptr;
struct GrPlotData *plt;
struct GrPlotConvert *cnv;
blk=(struct GrPlotBlock *) data;
if (blk==NULL) return -1;
ptr=(struct GrPlotShape *) blk->data;
if (ptr==NULL) return -1;
plt=ptr->plt;
if (plt==NULL) return -1;
cnv=&plt->cnv;
if (strcmp(name,blk->name)==0) {
int s=0;
char *xvalue=NULL;
char *yvalue=NULL;
char *xtype=NULL;
char *ytype=NULL;
unsigned int mask;
char tmp[64];
ptr->color=0;
ptr->mask=0;
ptr->fill=0;
ptr->width=0;
ptr->dash=NULL;
ptr->matrix=NULL;
ptr->x=0;
ptr->y=0;
for (i=0;i<atnum;i++) {
if (strcmp(atname[i],"color")==0) {
strcpy(tmp,"0x");
strcat(tmp,atval[i]);
sscanf(tmp,"%x",&ptr->color);
} else if (strcmp(atname[i],"mask")==0) {
strcpy(tmp,"0x");
strcat(tmp,atval[i]);
sscanf(tmp,"%x",&mask);
ptr->mask=mask;
} else if (strcmp(atname[i],"width")==0) ptr->width=atof(atval[i]);
else if (strcmp(atname[i],"dash")==0)
ptr->dash=RplotMakeDashString(atval[i]);
else if (strcmp(atname[i],"fill")==0) ptr->fill=1;
else if (strcmp(atname[i],"matrix")==0)
ptr->matrix=RplotMatrixString(atval[i]);
else if (strcmp(atname[i],"xvalue")==0) xvalue=atval[i];
else if (strcmp(atname[i],"yvalue")==0) yvalue=atval[i];
else if (strcmp(atname[i],"xpos")==0) xvalue=atval[i];
else if (strcmp(atname[i],"ypot")==0) yvalue=atval[i];
else if (strcmp(atname[i],"xtype")==0) xtype=atval[i];
else if (strcmp(atname[i],"ytype")==0) ytype=atval[i];
}
if (xvalue !=NULL) {
if (xtype==NULL) ptr->x=atof(xvalue);
else if (cnv->user !=NULL)
s=(cnv->user)(xtype,xvalue,&ptr->x,cnv->data);
else ptr->x=0;
}
if (yvalue !=NULL) {
if (ytype==NULL) ptr->y=atof(yvalue);
else if (cnv->user !=NULL)
s=(cnv->user)(xtype,yvalue,&ptr->y,cnv->data);
else ptr->y=0;
}
return s;
}
if (strcmp(name,"extent")==0) {
struct GrPlotExtent *ext;
ext=malloc(sizeof(struct GrPlotExtent));
ext->cnv=&plt->cnv;
ext->inc=&plt->inc;
ext->xmin=&ptr->xmin;
ext->xmax=&ptr->xmax;
ext->ymin=&ptr->ymin;
ext->ymax=&ptr->ymax;
ptr->state=ptr->state | 0x01;
blk=GrPlotSave(blk->xml,"extent",ext);
XMLSetStart(blk->xml,GrPlotExtentStart,blk);
XMLSetEnd(blk->xml,GrPlotExtentEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
if (strcmp(name,"s")==0) {
struct GrPlotDimension *dim;
dim=malloc(sizeof(struct GrPlotDimension));
dim->cnv=&plt->cnv;
dim->inc=&plt->inc;
dim->w=&ptr->w;
dim->h=&ptr->h;
ptr->state=ptr->state | 0x02;
blk=GrPlotSave(blk->xml,"d",dim);
XMLSetStart(blk->xml,GrPlotDimensionStart,blk);
XMLSetEnd(blk->xml,GrPlotDimensionEnd,blk);
return 0;
}
if (strcmp(name,"include")==0) {
struct GrPlotInclude *inc;
inc=malloc(sizeof(struct GrPlotInclude));
inc->inc=&plt->inc;
blk=GrPlotSave(blk->xml,name,inc);
XMLSetStart(blk->xml,GrPlotIncludeStart,blk);
XMLSetEnd(blk->xml,GrPlotIncludeEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
if (strcmp(name,"ignore")==0) {
blk=GrPlotSave(blk->xml,name,NULL);
XMLSetStart(blk->xml,GrPlotIgnoreStart,blk);
XMLSetText(blk->xml,GrPlotIgnoreText,blk);
XMLSetEnd(blk->xml,GrPlotIgnoreEnd,blk);
return XMLCallStart(blk->xml,name,atnum,atname,atval,buf,sze);
}
return 0;
}
