| 
									
										
										
										
											2001-03-02 05:58:11 +00:00
										 |  |  | /* drawf  DrawFile functions */ | 
					
						
							|  |  |  | 
 | 
					
						
							| 
									
										
										
										
											2001-10-24 20:13:15 +00:00
										 |  |  | #include "oslib/os.h"
 | 
					
						
							|  |  |  | #include "oslib/osfile.h"
 | 
					
						
							|  |  |  | #include "oslib/drawfile.h"
 | 
					
						
							| 
									
										
										
										
											2001-03-02 05:58:11 +00:00
										 |  |  | #include "Python.h"
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #include <limits.h>
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | #define PyDrawF_Check(op) ((op)->ob_type == &PyDrawFType)
 | 
					
						
							|  |  |  | #define HDRSIZE 40
 | 
					
						
							|  |  |  | #define GRPHDRSIZE 36
 | 
					
						
							|  |  |  | #define DRAWTYPE 0xaff
 | 
					
						
							|  |  |  | #define NEXT(d) ((drawfile_object*)((char*)(d)+(d)->size))
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | typedef struct | 
					
						
							|  |  |  | { PyObject_HEAD | 
					
						
							|  |  |  |   drawfile_diagram *drawf; | 
					
						
							|  |  |  |   int size; /*length in bytes*/ | 
					
						
							|  |  |  |   int nobjs;  /* no of objects */ | 
					
						
							|  |  |  | } PyDrawFObject; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | typedef struct dheader | 
					
						
							|  |  |  | {  char tag [4]; | 
					
						
							|  |  |  |    int major_version; | 
					
						
							|  |  |  |    int minor_version; | 
					
						
							|  |  |  |    char source [12]; | 
					
						
							|  |  |  |    os_box bbox; | 
					
						
							|  |  |  | } dheader; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawFError; /* Exception drawf.error */ | 
					
						
							|  |  |  | static os_error *e; | 
					
						
							|  |  |  | static PyTypeObject PyDrawFType; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static dheader header= | 
					
						
							|  |  |  | { {'D','r','a','w'}, | 
					
						
							|  |  |  |   201,0, | 
					
						
							|  |  |  |   {'P','y','t','h','o','n',' ',' ',' ',' ',' ',' '}, | 
					
						
							|  |  |  |   {INT_MAX,INT_MAX,INT_MIN,INT_MIN} | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_oserror(void) | 
					
						
							|  |  |  | { PyErr_SetString(DrawFError,e->errmess); | 
					
						
							|  |  |  |   return 0; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_error(char *s) | 
					
						
							|  |  |  | { PyErr_SetString(DrawFError,s); | 
					
						
							|  |  |  |   return 0; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | /* DrawFile commands */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static void countobjs(PyDrawFObject *pd) | 
					
						
							|  |  |  | { int k=0,q; | 
					
						
							|  |  |  |   drawfile_diagram *dd=pd->drawf; | 
					
						
							|  |  |  |   drawfile_object *d=dd->objects; | 
					
						
							|  |  |  |   char *end=(char*)dd+pd->size; | 
					
						
							|  |  |  |   pd->nobjs=-1; | 
					
						
							|  |  |  |   while((char*)d<end) | 
					
						
							|  |  |  |   { k++; | 
					
						
							|  |  |  |     q=d->size; | 
					
						
							|  |  |  |     if(q<=0||q&3) return ; | 
					
						
							|  |  |  |     d=NEXT(d); | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   if ((char*)d==end) pd->nobjs=k; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static drawfile_object *findobj(PyDrawFObject *pd,int n) | 
					
						
							|  |  |  | { drawfile_diagram *dd=pd->drawf; | 
					
						
							|  |  |  |   drawfile_object *d=dd->objects; | 
					
						
							|  |  |  |   for(;n>0;n--) d=NEXT(d); | 
					
						
							|  |  |  |   return d; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyDrawFObject* new(int size) | 
					
						
							|  |  |  | { PyDrawFObject *b=PyObject_NEW(PyDrawFObject,&PyDrawFType); | 
					
						
							|  |  |  |   if(!b) return NULL; | 
					
						
							|  |  |  |   size+=HDRSIZE; | 
					
						
							|  |  |  |   b->drawf=malloc(size); | 
					
						
							|  |  |  |   if(!b->drawf) | 
					
						
							|  |  |  |   { Py_DECREF(b); | 
					
						
							|  |  |  |     return (PyDrawFObject*)PyErr_NoMemory(); | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   b->size=size; | 
					
						
							|  |  |  |   return b; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static void extend(os_box *b,os_box *c) | 
					
						
							|  |  |  | { if(b->x0>c->x0) b->x0=c->x0; | 
					
						
							|  |  |  |   if(b->y0>c->y0) b->y0=c->y0; | 
					
						
							|  |  |  |   if(b->x1<c->x1) b->x1=c->x1; | 
					
						
							|  |  |  |   if(b->y1<c->y1) b->y1=c->y1; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_New(PyObject *self,PyObject *args) | 
					
						
							|  |  |  | { PyDrawFObject *b; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(args,"")) return NULL; | 
					
						
							|  |  |  |   b=new(0); | 
					
						
							|  |  |  |   if(!b) return NULL; | 
					
						
							|  |  |  |   *((dheader*)b->drawf)=header; | 
					
						
							|  |  |  |   b->nobjs=0; | 
					
						
							|  |  |  |   return (PyObject *)b; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Load(PyObject *self,PyObject *args) | 
					
						
							|  |  |  | { int size; | 
					
						
							|  |  |  |   char *fname; | 
					
						
							|  |  |  |   PyDrawFObject *b; | 
					
						
							|  |  |  |   fileswitch_object_type ot; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(args,"s",&fname)) return NULL; | 
					
						
							|  |  |  |   e=xosfile_read_no_path(fname,&ot,0,0,&size,0); | 
					
						
							|  |  |  |   if(e) return drawf_oserror(); | 
					
						
							|  |  |  |   size-=HDRSIZE; | 
					
						
							|  |  |  |   if(ot!=osfile_IS_FILE||size<0||size&3) return drawf_error("Bad draw file"); | 
					
						
							|  |  |  |   b=new(size); | 
					
						
							|  |  |  |   if(!b) return NULL; | 
					
						
							|  |  |  |   e=xosfile_load_stamped_no_path(fname,(byte*)(b->drawf),0,0,0,0,0); | 
					
						
							|  |  |  |   if(e) | 
					
						
							|  |  |  |   { Py_DECREF(b); | 
					
						
							|  |  |  |     return drawf_oserror(); | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   countobjs(b); | 
					
						
							|  |  |  |   if(b->nobjs>=0) return (PyObject *)b; | 
					
						
							|  |  |  |   Py_DECREF(b); | 
					
						
							|  |  |  |   return drawf_error("Corrupt draw file"); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Save(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { char *fname; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"s",&fname)) return NULL; | 
					
						
							|  |  |  |   e=xosfile_save_stamped(fname,DRAWTYPE, | 
					
						
							|  |  |  |   (byte*)(self->drawf),(byte*)(self->drawf)+self->size); | 
					
						
							|  |  |  |   if (e) return drawf_oserror(); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Render(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { int flags,trans,clip,flat; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"iiii",&flags,&trans,&clip,&flat)) return NULL; | 
					
						
							|  |  |  |   e=xdrawfile_render((drawfile_render_flags)flags,self->drawf,self->size, | 
					
						
							|  |  |  |   (os_trfm*)trans,(os_box*)clip,flat); | 
					
						
							|  |  |  |   if(e) return drawf_oserror(); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Path(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { PyObject *pl; | 
					
						
							|  |  |  |   PyObject *dp=0; | 
					
						
							|  |  |  |   os_colour fill; | 
					
						
							|  |  |  |   os_colour outline; | 
					
						
							|  |  |  |   int width,start=0; | 
					
						
							|  |  |  |   drawfile_path_style style; | 
					
						
							|  |  |  |   int size=40; | 
					
						
							|  |  |  |   int n,i,element_count; | 
					
						
							|  |  |  |   drawfile_diagram *diag; | 
					
						
							|  |  |  |   drawfile_object *dobj; | 
					
						
							|  |  |  |   drawfile_path *dpath; | 
					
						
							|  |  |  |   draw_path *thepath; | 
					
						
							|  |  |  |   draw_line_style line_style; | 
					
						
							|  |  |  |   draw_dash_pattern *dash_pattern=0; | 
					
						
							|  |  |  |   os_box *box; | 
					
						
							|  |  |  |   long *pe; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"O!(iiii)|O!i",&PyList_Type,&pl,(int*)&fill, | 
					
						
							|  |  |  |      (int*)&outline,&width,(int*)&style,&PyTuple_Type,&dp,&start)) return NULL; | 
					
						
							|  |  |  |   if(dp) | 
					
						
							|  |  |  |   { element_count=PyTuple_Size(dp); | 
					
						
							|  |  |  |     size+=4*element_count+8; | 
					
						
							|  |  |  |     style.flags|=drawfile_PATH_DASHED; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   else style.flags&=~drawfile_PATH_DASHED; | 
					
						
							|  |  |  |   n=PyList_Size(pl); | 
					
						
							|  |  |  |   size+=4*n+8; | 
					
						
							|  |  |  |   for(i=0;i<n;i++) if(!PyInt_Check(PyList_GetItem(pl,i))) size+=4; | 
					
						
							|  |  |  |   diag=realloc(self->drawf,self->size+size); | 
					
						
							|  |  |  |   if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |   self->drawf=diag; | 
					
						
							|  |  |  |   dobj=(drawfile_object*)((char*)diag+self->size); | 
					
						
							|  |  |  |   dobj->type=drawfile_TYPE_PATH; | 
					
						
							|  |  |  |   dobj->size=size; | 
					
						
							|  |  |  |   dpath=&dobj->data.path; | 
					
						
							|  |  |  |   self->size+=size; | 
					
						
							|  |  |  |   self->nobjs++; | 
					
						
							|  |  |  |   box=&dpath->bbox; | 
					
						
							|  |  |  |   dpath->fill=fill;dpath->outline=outline; | 
					
						
							|  |  |  |   dpath->width=width;dpath->style=style; | 
					
						
							|  |  |  |   pe=(long*)&(dpath->path); | 
					
						
							|  |  |  |   if(dp) | 
					
						
							|  |  |  |   { dash_pattern=&(((drawfile_path_with_pattern*)dpath)->pattern); | 
					
						
							|  |  |  |     dash_pattern->start=start; | 
					
						
							|  |  |  |     dash_pattern->element_count=element_count; | 
					
						
							|  |  |  |     for(i=0;i<element_count;i++) | 
					
						
							|  |  |  |     { dash_pattern->elements[i]=(int)PyInt_AsLong(PyTuple_GetItem(dp,i)); | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |     pe+=element_count+2; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   thepath=(draw_path*)pe; | 
					
						
							|  |  |  |   *pe++=draw_MOVE_TO; | 
					
						
							|  |  |  |   for(i=0;i<n;i++) | 
					
						
							|  |  |  |   { PyObject *p=PyList_GetItem(pl,i); | 
					
						
							|  |  |  |     if(PyInt_Check(p)) | 
					
						
							|  |  |  |       *pe++=PyInt_AsLong(p); | 
					
						
							|  |  |  |     else | 
					
						
							|  |  |  |     { | 
					
						
							|  |  |  |       *pe++=PyInt_AsLong(PyTuple_GetItem(p,0)); | 
					
						
							|  |  |  |       *pe++=PyInt_AsLong(PyTuple_GetItem(p,1)); | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   *pe=draw_END_PATH; | 
					
						
							|  |  |  |   line_style.join_style=style.flags&3; | 
					
						
							|  |  |  |   line_style.end_cap_style=(style.flags&3)>>2; | 
					
						
							|  |  |  |   line_style.start_cap_style=(style.flags&3)>>4; | 
					
						
							|  |  |  |   line_style.reserved=0; | 
					
						
							|  |  |  |   line_style.mitre_limit=10; | 
					
						
							|  |  |  |   line_style.start_cap_width=style.cap_width; | 
					
						
							|  |  |  |   line_style.end_cap_width=style.cap_width; | 
					
						
							|  |  |  |   line_style.start_cap_length=style.cap_length; | 
					
						
							|  |  |  |   line_style.end_cap_length=style.cap_length; | 
					
						
							|  |  |  |   e=xdraw_process_path(thepath,0x70000000,0,0,width,&line_style,dash_pattern, | 
					
						
							|  |  |  |   (draw_output_path)((char*)box+0x80000000),0); | 
					
						
							|  |  |  |   if(e) return drawf_oserror(); | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  |   /* draw_process_path seems to have a bug:
 | 
					
						
							|  |  |  |      If the bounding box size is zero, it returns 0x7FFFFFFF, ..., 0x80000000 instead of the | 
					
						
							|  |  |  |      correct size. */ | 
					
						
							|  |  |  |   if (box->x0==0x7FFFFFFF) | 
					
						
							|  |  |  |   { | 
					
						
							|  |  |  |       /* path has zero extension, so forget it; it would be invisible anyway */ | 
					
						
							|  |  |  |       self->size-=size; | 
					
						
							|  |  |  |       self->nobjs--; | 
					
						
							|  |  |  |       diag=realloc(self->drawf,self->size); | 
					
						
							|  |  |  |       if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |       self->drawf=diag; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   else | 
					
						
							|  |  |  |       extend(&(diag->bbox),box); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Text(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { os_colour fill,bg_hint; | 
					
						
							|  |  |  |   drawfile_text_style style; | 
					
						
							|  |  |  |   int xsize,ysize,x,y; | 
					
						
							|  |  |  |   int size,len; | 
					
						
							|  |  |  |   char *text; | 
					
						
							|  |  |  |   drawfile_diagram *diag; | 
					
						
							|  |  |  |   drawfile_object *dobj; | 
					
						
							|  |  |  |   drawfile_text *dtext; | 
					
						
							|  |  |  |   os_box *box; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"(ii)s(iiiii)",&x,&y,&text, | 
					
						
							|  |  |  |      (int*)&fill,(int*)&bg_hint,(int*)&style,&xsize,&ysize)) return NULL; | 
					
						
							|  |  |  |   len=strlen(text); | 
					
						
							|  |  |  |   size=((len+4)&(~3))+52; | 
					
						
							|  |  |  |   diag=realloc(self->drawf,self->size+size); | 
					
						
							|  |  |  |   if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |   self->drawf=diag; | 
					
						
							|  |  |  |   dobj=(drawfile_object*)((char*)diag+self->size); | 
					
						
							|  |  |  |   dobj->type=drawfile_TYPE_TEXT; | 
					
						
							|  |  |  |   dobj->size=size; | 
					
						
							|  |  |  |   dtext=&dobj->data.text; | 
					
						
							|  |  |  |   self->size+=size; | 
					
						
							|  |  |  |   self->nobjs++; | 
					
						
							|  |  |  |   dtext->fill=fill; | 
					
						
							|  |  |  |   dtext->bg_hint=bg_hint; | 
					
						
							|  |  |  |   dtext->style=style; | 
					
						
							|  |  |  |   dtext->xsize=xsize; | 
					
						
							|  |  |  |   dtext->ysize=ysize; | 
					
						
							|  |  |  |   dtext->base.x=x; | 
					
						
							|  |  |  |   dtext->base.y=y; | 
					
						
							|  |  |  |   memset(dtext->text,0,(len+4)&(~3)); | 
					
						
							|  |  |  |   sprintf(dtext->text,"%s",text); | 
					
						
							|  |  |  |   box=&(dtext->bbox); | 
					
						
							|  |  |  |   box->x0=x;box->y0=y;box->x1=x+len*xsize;box->y1=y+ysize; | 
					
						
							|  |  |  |   extend(&(diag->bbox),box); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_TText(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { os_colour fill,bg_hint; | 
					
						
							|  |  |  |   drawfile_text_style style; | 
					
						
							|  |  |  |   int xsize,ysize,x,y; | 
					
						
							|  |  |  |   int t1,t2,t3,t4,t5,t6; | 
					
						
							|  |  |  |   int size,len; | 
					
						
							|  |  |  |   char *text; | 
					
						
							|  |  |  |   drawfile_diagram *diag; | 
					
						
							|  |  |  |   drawfile_object *dobj; | 
					
						
							|  |  |  |   drawfile_trfm_text *dtext; | 
					
						
							|  |  |  |   os_box *box; | 
					
						
							|  |  |  |   t1=1<<16;t2=0; | 
					
						
							|  |  |  |   t3=0;t4=1<<16; | 
					
						
							|  |  |  |   t5=t6=0; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"(ii)s(iiiii)|(iiiiii)",&x,&y,&text, | 
					
						
							|  |  |  |      (int*)&fill,(int*)&bg_hint,(int*)&style,&xsize,&ysize,&t1,&t2,&t3,&t4,&t5,&t6)) return NULL; | 
					
						
							|  |  |  |   len=strlen(text); | 
					
						
							|  |  |  |   size=((len+4)&(~3))+52+28; | 
					
						
							|  |  |  |   diag=realloc(self->drawf,self->size+size); | 
					
						
							|  |  |  |   if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |   self->drawf=diag; | 
					
						
							|  |  |  |   dobj=(drawfile_object*)((char*)diag+self->size); | 
					
						
							|  |  |  |   dobj->type=drawfile_TYPE_TRFM_TEXT; | 
					
						
							|  |  |  |   dobj->size=size; | 
					
						
							|  |  |  |   dtext=&dobj->data.trfm_text; | 
					
						
							|  |  |  |   self->size+=size; | 
					
						
							|  |  |  |   self->nobjs++; | 
					
						
							|  |  |  |   dtext->trfm.entries[0][0]=t1; | 
					
						
							|  |  |  |   dtext->trfm.entries[0][1]=t2; | 
					
						
							|  |  |  |   dtext->trfm.entries[1][0]=t3; | 
					
						
							|  |  |  |   dtext->trfm.entries[1][1]=t4; | 
					
						
							|  |  |  |   dtext->trfm.entries[2][0]=t5; | 
					
						
							|  |  |  |   dtext->trfm.entries[2][1]=t6; | 
					
						
							|  |  |  |   dtext->flags=0; | 
					
						
							|  |  |  |   dtext->fill=fill; | 
					
						
							|  |  |  |   dtext->bg_hint=bg_hint; | 
					
						
							|  |  |  |   dtext->style=style; | 
					
						
							|  |  |  |   dtext->xsize=xsize; | 
					
						
							|  |  |  |   dtext->ysize=ysize; | 
					
						
							|  |  |  |   dtext->base.x=x; | 
					
						
							|  |  |  |   dtext->base.y=y; | 
					
						
							|  |  |  |   memset(dtext->text,0,(len+4)&(~3)); | 
					
						
							|  |  |  |   sprintf(dtext->text,"%s",text); | 
					
						
							|  |  |  |   box=&(dtext->bbox); | 
					
						
							|  |  |  |   box->x0=x;box->y0=y;box->x1=x+len*xsize;box->y1=y+ysize; | 
					
						
							|  |  |  |   extend(&(diag->bbox),box); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_FontTable(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { int size=8,n=0; | 
					
						
							|  |  |  |   PyObject *d,*key,*value; | 
					
						
							|  |  |  |   drawfile_diagram *diag; | 
					
						
							|  |  |  |   drawfile_object *dobj; | 
					
						
							|  |  |  |   char *dtable; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"O!",&PyDict_Type,&d)) return NULL; | 
					
						
							|  |  |  |   while(PyDict_Next(d,&n,&key,&value)) | 
					
						
							|  |  |  |   { int m=PyString_Size(value); | 
					
						
							|  |  |  |     if(m<0||!PyInt_Check(key)) return NULL; | 
					
						
							|  |  |  |     size+=m+2; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   size=(size+3)&(~3); | 
					
						
							|  |  |  |   diag=realloc(self->drawf,self->size+size); | 
					
						
							|  |  |  |   if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |   self->drawf=diag; | 
					
						
							|  |  |  |   dobj=(drawfile_object*)((char*)diag+self->size); | 
					
						
							|  |  |  |   dobj->type=drawfile_TYPE_FONT_TABLE; | 
					
						
							|  |  |  |   dobj->size=size; | 
					
						
							|  |  |  |   dtable=(char*)(&dobj->data.font_table); | 
					
						
							|  |  |  |   self->size+=size; | 
					
						
							|  |  |  |   self->nobjs++; | 
					
						
							|  |  |  |   memset(dtable,0,size-8); | 
					
						
							|  |  |  |   n=0; | 
					
						
							|  |  |  |   while(PyDict_Next(d,&n,&key,&value)) | 
					
						
							|  |  |  |   { int m=PyString_Size(value); | 
					
						
							|  |  |  |     *dtable=(char)PyInt_AsLong(key); | 
					
						
							|  |  |  |     strcpy(dtable+1,PyString_AsString(value)); | 
					
						
							|  |  |  |     dtable+=m+2; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Group(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { int size,n; | 
					
						
							|  |  |  |   PyDrawFObject *g; | 
					
						
							|  |  |  |   char *name=""; | 
					
						
							|  |  |  |   drawfile_diagram *diag; | 
					
						
							|  |  |  |   drawfile_object *dobj; | 
					
						
							|  |  |  |   drawfile_group *dgroup; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"O!|s",&PyDrawFType,(PyObject*)&g,&name)) | 
					
						
							|  |  |  |        return NULL; | 
					
						
							|  |  |  |   size=g->size-4; | 
					
						
							|  |  |  |   diag=realloc(self->drawf,self->size+size); | 
					
						
							|  |  |  |   if(!diag) return PyErr_NoMemory(); | 
					
						
							|  |  |  |   self->drawf=diag; | 
					
						
							|  |  |  |   self->nobjs++; | 
					
						
							|  |  |  |   dobj=(drawfile_object*)((char*)diag+self->size); | 
					
						
							|  |  |  |   self->size+=size; | 
					
						
							|  |  |  |   dobj->type=drawfile_TYPE_GROUP; | 
					
						
							|  |  |  |   dobj->size=g->size-4; | 
					
						
							|  |  |  |   dgroup=&dobj->data.group; | 
					
						
							|  |  |  |   dgroup->bbox=g->drawf->bbox; | 
					
						
							|  |  |  |   memset(dgroup->name,' ',12); | 
					
						
							|  |  |  |   n=strlen(name); | 
					
						
							|  |  |  |   if(n>12) n=12; | 
					
						
							|  |  |  |   memcpy(dgroup->name,name,n); | 
					
						
							|  |  |  |   memcpy((char*)dgroup->objects,(char*)g->drawf+40,g->size-40); | 
					
						
							|  |  |  |   extend(&(diag->bbox),&(dgroup->bbox)); | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Find(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { int x,y,n=0; | 
					
						
							|  |  |  |   int r=-1; | 
					
						
							|  |  |  |   drawfile_object *d; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"ii|i",&x,&y,&n)) return NULL; | 
					
						
							|  |  |  |   if(n<self->nobjs&&n>=0) | 
					
						
							|  |  |  |   { d=findobj(self,n); | 
					
						
							|  |  |  |     while(n<self->nobjs) | 
					
						
							|  |  |  |     { if(x>=d->data.text.bbox.x0&&x<=d->data.text.bbox.x1&& | 
					
						
							|  |  |  |          y>=d->data.text.bbox.y0&&y<=d->data.text.bbox.y1) { r=n;break;} | 
					
						
							|  |  |  |       n++; | 
					
						
							|  |  |  |       d=NEXT(d); | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   return PyInt_FromLong(r); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_Box(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { int n=-1; | 
					
						
							|  |  |  |   os_box *box; | 
					
						
							|  |  |  |   if(!PyArg_ParseTuple(arg,"|i",&n)) return NULL; | 
					
						
							|  |  |  |   if(n>=self->nobjs|n<0) box=&(self->drawf->bbox); | 
					
						
							|  |  |  |   else box=&(findobj(self,n)->data.text.bbox); | 
					
						
							|  |  |  |   return Py_BuildValue("iiii",box->x0,box->y0,box->x1,box->y1); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static void SetBlock(drawfile_object *d,int size,int type,int offset,int value) | 
					
						
							|  |  |  | { char *end=(char*)d+size; | 
					
						
							|  |  |  |   printf("s%d t%d o%d v%d\n",size,type,offset,value); | 
					
						
							|  |  |  |   for(;(char*)d<end;d=NEXT(d)) | 
					
						
							|  |  |  |     if(d->type==type) ((int*)(d))[offset]=value; | 
					
						
							|  |  |  |     else if(d->type==drawfile_TYPE_GROUP) | 
					
						
							|  |  |  |            SetBlock((drawfile_object*)&d->data.group.objects, | 
					
						
							|  |  |  |                     d->size,type,offset,value); | 
					
						
							|  |  |  |   printf("SetBlock Done\n"); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *SetWord(PyDrawFObject *self,PyObject *arg,int type,int offset) | 
					
						
							|  |  |  | { int n=PyTuple_Size(arg); | 
					
						
							|  |  |  |   int m,value,q; | 
					
						
							|  |  |  |   PyObject *par; | 
					
						
							|  |  |  |   drawfile_object *e,*d=self->drawf->objects; | 
					
						
							|  |  |  |   if(n==0) return  drawf_error("Value Required"); | 
					
						
							|  |  |  |   par=PyTuple_GetItem(arg,0); | 
					
						
							|  |  |  |   if(!PyInt_Check(par)) | 
					
						
							|  |  |  |   { PyErr_SetString(PyExc_TypeError,"Int Required"); | 
					
						
							|  |  |  |     return 0; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   value=(int)PyInt_AsLong(par); | 
					
						
							|  |  |  |   if(n==1) SetBlock(d,self->size-HDRSIZE,type,offset,value); | 
					
						
							|  |  |  |   else | 
					
						
							|  |  |  |   { for(m=1;m<n;m++) | 
					
						
							|  |  |  |     { par=PyTuple_GetItem(arg,m); | 
					
						
							|  |  |  |       if(!PyInt_Check(par)) | 
					
						
							|  |  |  |       { PyErr_SetString(PyExc_TypeError,"Int Required"); | 
					
						
							|  |  |  |         return 0; | 
					
						
							|  |  |  |       } | 
					
						
							|  |  |  |       q=(int)PyInt_AsLong(par); | 
					
						
							|  |  |  |       if(q<0||q>=self->nobjs) | 
					
						
							|  |  |  |       { PyErr_SetString(PyExc_ValueError,"Object out of range"); | 
					
						
							|  |  |  |         return 0; | 
					
						
							|  |  |  |       } | 
					
						
							|  |  |  |       e=d; | 
					
						
							|  |  |  |       for(;q>0;q--) e=NEXT(e); | 
					
						
							|  |  |  |       if(e->type==type) | 
					
						
							|  |  |  |       { ((int*)(e))[offset]=value; | 
					
						
							|  |  |  |       } | 
					
						
							|  |  |  |       else if(e->type==drawfile_TYPE_GROUP) | 
					
						
							|  |  |  |              SetBlock((drawfile_object*)&e->data.group.objects, | 
					
						
							|  |  |  |                       e->size-GRPHDRSIZE,type,offset,value); | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   Py_INCREF(Py_None);return Py_None; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_PathFill(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { return SetWord(self,arg,drawfile_TYPE_PATH,6); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_PathColour(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { return SetWord(self,arg,drawfile_TYPE_PATH,7); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_TextColour(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { return SetWord(self,arg,drawfile_TYPE_TEXT,6); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *DrawF_TextBackground(PyDrawFObject *self,PyObject *arg) | 
					
						
							|  |  |  | { return SetWord(self,arg,drawfile_TYPE_TEXT,7); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static struct PyMethodDef PyDrawF_Methods[]= | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  |   { "render",(PyCFunction)DrawF_Render,1}, | 
					
						
							|  |  |  |   { "save",(PyCFunction)DrawF_Save,1}, | 
					
						
							|  |  |  |   { "path",(PyCFunction)DrawF_Path,1}, | 
					
						
							|  |  |  |   { "text",(PyCFunction)DrawF_Text,1}, | 
					
						
							|  |  |  |   { "ttext",(PyCFunction)DrawF_TText,1}, | 
					
						
							|  |  |  |   { "fonttable",(PyCFunction)DrawF_FontTable,1}, | 
					
						
							|  |  |  |   { "group",(PyCFunction)DrawF_Group,1}, | 
					
						
							|  |  |  |   { "find",(PyCFunction)DrawF_Find,1}, | 
					
						
							|  |  |  |   { "box",(PyCFunction)DrawF_Box,1}, | 
					
						
							|  |  |  |   { "pathfill",(PyCFunction)DrawF_PathFill,1}, | 
					
						
							|  |  |  |   { "pathcolour",(PyCFunction)DrawF_PathColour,1}, | 
					
						
							|  |  |  |   { "textcolour",(PyCFunction)DrawF_TextColour,1}, | 
					
						
							|  |  |  |   { "textbackground",(PyCFunction)DrawF_TextBackground,1}, | 
					
						
							|  |  |  |   { NULL,NULL}		/* sentinel */ | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static int drawf_len(PyDrawFObject *b) | 
					
						
							|  |  |  | { return b->nobjs; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_concat(PyDrawFObject *b,PyDrawFObject *c) | 
					
						
							|  |  |  | { int size=b->size+c->size-2*HDRSIZE; | 
					
						
							|  |  |  |   PyDrawFObject *p=new(size); | 
					
						
							|  |  |  |   drawfile_diagram *dd; | 
					
						
							|  |  |  |   drawfile_object *d; | 
					
						
							|  |  |  |   int n; | 
					
						
							|  |  |  |   if(!p) return NULL; | 
					
						
							|  |  |  |   dd=p->drawf; | 
					
						
							|  |  |  |   d=(drawfile_object*)((char*)dd+b->size); | 
					
						
							|  |  |  |   memcpy((char*)dd,(char*)(b->drawf),b->size); | 
					
						
							|  |  |  |   memcpy(d,(char*)(c->drawf)+HDRSIZE,c->size-HDRSIZE); | 
					
						
							|  |  |  |   p->nobjs=b->nobjs+c->nobjs; | 
					
						
							|  |  |  |   for(n=c->nobjs;n>0;n--) | 
					
						
							|  |  |  |   { extend(&(dd->bbox),&(d->data.path.bbox)); | 
					
						
							|  |  |  |     d=NEXT(d); | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   return (PyObject*)p; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_repeat(PyDrawFObject *b,int i) | 
					
						
							|  |  |  | { PyErr_SetString(PyExc_IndexError,"drawf repetition not implemented"); | 
					
						
							|  |  |  |   return NULL; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_item(PyDrawFObject *b,int i) | 
					
						
							|  |  |  | { PyDrawFObject *c; | 
					
						
							|  |  |  |   int size; | 
					
						
							|  |  |  |   drawfile_diagram *dd; | 
					
						
							|  |  |  |   drawfile_object *d; | 
					
						
							|  |  |  |   if(i<0||i>=b->nobjs) | 
					
						
							|  |  |  |   { PyErr_SetString(PyExc_IndexError,"drawf index out of range"); | 
					
						
							|  |  |  |     return NULL; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   d=findobj(b,i); | 
					
						
							|  |  |  |   size=(char*)findobj(b,i+1)-(char*)d; | 
					
						
							|  |  |  |   c=new(size); | 
					
						
							|  |  |  |   if(!c) return NULL; | 
					
						
							|  |  |  |   dd=c->drawf; | 
					
						
							|  |  |  |   *((dheader*)dd)=header; | 
					
						
							|  |  |  |   memcpy(dd->objects,d,size); | 
					
						
							|  |  |  |   c->nobjs=1; | 
					
						
							|  |  |  |   extend(&(dd->bbox),&(d->data.path.bbox)); | 
					
						
							|  |  |  |   return (PyObject*)c; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *drawf_slice(PyDrawFObject *b,int i,int j) | 
					
						
							|  |  |  | { PyDrawFObject *c; | 
					
						
							|  |  |  |   int size,n; | 
					
						
							|  |  |  |   drawfile_diagram *dd; | 
					
						
							|  |  |  |   drawfile_object *d; | 
					
						
							|  |  |  |   if(i<0||j>b->nobjs) | 
					
						
							|  |  |  |   { PyErr_SetString(PyExc_IndexError,"drawf index out of range"); | 
					
						
							|  |  |  |     return NULL; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   d=findobj(b,i); | 
					
						
							|  |  |  |   size=(char*)findobj(b,j)-(char*)d; | 
					
						
							|  |  |  |   c=new(size); | 
					
						
							|  |  |  |   if(!c) return NULL; | 
					
						
							|  |  |  |   dd=c->drawf; | 
					
						
							|  |  |  |   *((dheader*)dd)=header; | 
					
						
							|  |  |  |   memcpy(dd->objects,d,size); | 
					
						
							|  |  |  |   c->nobjs=j-i; | 
					
						
							|  |  |  |   for(n=j-i;n>0;n--) | 
					
						
							|  |  |  |   { extend(&(dd->bbox),&(d->data.path.bbox)); | 
					
						
							|  |  |  |     d=NEXT(d); | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   return (PyObject*)c; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static int drawf_ass_item(PyDrawFObject *b,int i,PyObject *v) | 
					
						
							|  |  |  | { PyErr_SetString(PyExc_IndexError,"drawf ass not implemented"); | 
					
						
							|  |  |  |   return NULL; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | /*{ if(i<0||4*i>=b->length)
 | 
					
						
							|  |  |  |   { PyErr_SetString(PyExc_IndexError,"drawf index out of range"); | 
					
						
							|  |  |  |     return -1; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   if(!PyInt_Check(v)) | 
					
						
							|  |  |  |   { PyErr_SetString(PyExc_TypeError,"drawf item must be integer"); | 
					
						
							|  |  |  |     return -1; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   ((long*)(b->drawf))[i]=PyInt_AsLong(v); | 
					
						
							|  |  |  |   return 0; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | */ | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static int drawf_ass_slice(PyDrawFObject *b,int i,int j,PyObject *v) | 
					
						
							|  |  |  | { PyErr_SetString(PyExc_IndexError,"drawf ass_slice not implemented"); | 
					
						
							|  |  |  |   return NULL; | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PySequenceMethods drawf_as_sequence= | 
					
						
							|  |  |  | { (inquiry)drawf_len, | 
					
						
							|  |  |  |   (binaryfunc)drawf_concat, | 
					
						
							|  |  |  |   (intargfunc)drawf_repeat, | 
					
						
							|  |  |  |   (intargfunc)drawf_item, | 
					
						
							|  |  |  |   (intintargfunc)drawf_slice, | 
					
						
							|  |  |  |   (intobjargproc)drawf_ass_item, | 
					
						
							|  |  |  |   (intintobjargproc)drawf_ass_slice, | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyObject *PyDrawF_GetAttr(PyDrawFObject *s,char *name) | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  |   if (!strcmp(name, "size")) return PyInt_FromLong((long)s->size); | 
					
						
							|  |  |  |   if (!strcmp(name, "start")) return PyInt_FromLong((long)s->drawf); | 
					
						
							|  |  |  |   if (!strcmp(name, "__members__")) | 
					
						
							|  |  |  |   { PyObject *list = PyList_New(2); | 
					
						
							|  |  |  |     if (list) | 
					
						
							|  |  |  |     { PyList_SetItem(list, 0, PyString_FromString("size")); | 
					
						
							|  |  |  |       PyList_SetItem(list, 1, PyString_FromString("start")); | 
					
						
							|  |  |  |       if (PyErr_Occurred()) { Py_DECREF(list);list = NULL;} | 
					
						
							|  |  |  |     } | 
					
						
							|  |  |  |     return list; | 
					
						
							|  |  |  |   } | 
					
						
							|  |  |  |   return Py_FindMethod(PyDrawF_Methods, (PyObject*) s,name); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static void PyDrawF_Dealloc(PyDrawFObject *b) | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  |     if (b->drawf) | 
					
						
							|  |  |  |         ; | 
					
						
							|  |  |  |     else | 
					
						
							|  |  |  |         PyMem_DEL(b->drawf); | 
					
						
							|  |  |  |   PyMem_DEL(b); | 
					
						
							|  |  |  | } | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyTypeObject PyDrawFType= | 
					
						
							|  |  |  | { PyObject_HEAD_INIT(&PyType_Type) | 
					
						
							|  |  |  |   0,				/*ob_size*/ | 
					
						
							|  |  |  |   "drawf",			/*tp_name*/ | 
					
						
							|  |  |  |   sizeof(PyDrawFObject),	/*tp_size*/ | 
					
						
							|  |  |  |   0,				/*tp_itemsize*/ | 
					
						
							|  |  |  | 	/* methods */ | 
					
						
							|  |  |  |   (destructor)PyDrawF_Dealloc,	/*tp_dealloc*/ | 
					
						
							|  |  |  |   0,				/*tp_print*/ | 
					
						
							|  |  |  |   (getattrfunc)PyDrawF_GetAttr,	/*tp_getattr*/ | 
					
						
							|  |  |  |   0,				/*tp_setattr*/ | 
					
						
							|  |  |  |   0,				/*tp_compare*/ | 
					
						
							|  |  |  |   0,				/*tp_repr*/ | 
					
						
							|  |  |  |   0,				/*tp_as_number*/ | 
					
						
							|  |  |  |   &drawf_as_sequence,		/*tp_as_sequence*/ | 
					
						
							|  |  |  |   0,				/*tp_as_mapping*/ | 
					
						
							|  |  |  |   0,                            /*tp_hash*/ | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | static PyMethodDef DrawFMethods[]= | 
					
						
							|  |  |  | { | 
					
						
							|  |  |  |   { "load",DrawF_Load,1}, | 
					
						
							|  |  |  |   { "new",DrawF_New,1}, | 
					
						
							|  |  |  |   { NULL,NULL}		 /* Sentinel */ | 
					
						
							|  |  |  | }; | 
					
						
							|  |  |  | 
 | 
					
						
							|  |  |  | void initdrawf() | 
					
						
							|  |  |  | { PyObject *m, *d; | 
					
						
							|  |  |  |   m = Py_InitModule("drawf", DrawFMethods); | 
					
						
							|  |  |  |   d = PyModule_GetDict(m); | 
					
						
							|  |  |  |   DrawFError=PyString_FromString("drawf.error"); | 
					
						
							|  |  |  |   PyDict_SetItemString(d,"error",DrawFError); | 
					
						
							|  |  |  | } |