Python code coverage for RISCOS/Modules/drawfmodule.c

#	count	content
1	n/a	/* drawf DrawFile functions */
2	n/a
3	n/a	#include "oslib/os.h"
4	n/a	#include "oslib/osfile.h"
5	n/a	#include "oslib/drawfile.h"
6	n/a	#include "Python.h"
7	n/a
8	n/a	#include <limits.h>
9	n/a
10	n/a	#define PyDrawF_Check(op) ((op)->ob_type == &PyDrawFType)
11	n/a	#define HDRSIZE 40
12	n/a	#define GRPHDRSIZE 36
13	n/a	#define DRAWTYPE 0xaff
14	n/a	#define NEXT(d) ((drawfile_object)((char)(d)+(d)->size))
15	n/a
16	n/a	typedef struct
17	n/a	{ PyObject_HEAD
18	n/a	drawfile_diagram *drawf;
19	n/a	int size; /length in bytes/
20	n/a	int nobjs; /* no of objects */
21	n/a	} PyDrawFObject;
22	n/a
23	n/a	typedef struct dheader
24	n/a	{ char tag [4];
25	n/a	int major_version;
26	n/a	int minor_version;
27	n/a	char source [12];
28	n/a	os_box bbox;
29	n/a	} dheader;
30	n/a
31	n/a	static PyObject DrawFError; / Exception drawf.error */
32	n/a	static os_error *e;
33	n/a	static PyTypeObject PyDrawFType;
34	n/a
35	n/a	static dheader header=
36	n/a	{ {'D','r','a','w'},
37	n/a	201,0,
38	n/a	{'P','y','t','h','o','n',' ',' ',' ',' ',' ',' '},
39	n/a	{INT_MAX,INT_MAX,INT_MIN,INT_MIN}
40	n/a	};
41	n/a
42	n/a	static PyObject *drawf_oserror(void)
43	n/a	{ PyErr_SetString(DrawFError,e->errmess);
44	n/a	return 0;
45	n/a	}
46	n/a
47	n/a	static PyObject drawf_error(char s)
48	n/a	{ PyErr_SetString(DrawFError,s);
49	n/a	return 0;
50	n/a	}
51	n/a
52	n/a	/* DrawFile commands */
53	n/a
54	n/a	static void countobjs(PyDrawFObject *pd)
55	n/a	{ int k=0,q;
56	n/a	drawfile_diagram *dd=pd->drawf;
57	n/a	drawfile_object *d=dd->objects;
58	n/a	char end=(char)dd+pd->size;
59	n/a	pd->nobjs=-1;
60	n/a	while((char*)d<end)
61	n/a	{ k++;
62	n/a	q=d->size;
63	n/a	if(q<=0\|\|q&3) return ;
64	n/a	d=NEXT(d);
65	n/a	}
66	n/a	if ((char*)d==end) pd->nobjs=k;
67	n/a	}
68	n/a
69	n/a	static drawfile_object findobj(PyDrawFObject pd,Py_ssize_t n)
70	n/a	{ drawfile_diagram *dd=pd->drawf;
71	n/a	drawfile_object *d=dd->objects;
72	n/a	for(;n>0;n--) d=NEXT(d);
73	n/a	return d;
74	n/a	}
75	n/a
76	n/a	static PyDrawFObject* new(int size)
77	n/a	{ PyDrawFObject *b=PyObject_NEW(PyDrawFObject,&PyDrawFType);
78	n/a	if(!b) return NULL;
79	n/a	size+=HDRSIZE;
80	n/a	b->drawf=malloc(size);
81	n/a	if(!b->drawf)
82	n/a	{ Py_DECREF(b);
83	n/a	return (PyDrawFObject*)PyErr_NoMemory();
84	n/a	}
85	n/a	b->size=size;
86	n/a	return b;
87	n/a	}
88	n/a
89	n/a	static void extend(os_box b,os_box c)
90	n/a	{ if(b->x0>c->x0) b->x0=c->x0;
91	n/a	if(b->y0>c->y0) b->y0=c->y0;
92	n/a	if(b->x1<c->x1) b->x1=c->x1;
93	n/a	if(b->y1<c->y1) b->y1=c->y1;
94	n/a	}
95	n/a
96	n/a	static PyObject DrawF_New(PyObject self,PyObject *args)
97	n/a	{ PyDrawFObject *b;
98	n/a	if(!PyArg_ParseTuple(args,"")) return NULL;
99	n/a	b=new(0);
100	n/a	if(!b) return NULL;
101	n/a	((dheader)b->drawf)=header;
102	n/a	b->nobjs=0;
103	n/a	return (PyObject *)b;
104	n/a	}
105	n/a
106	n/a	static PyObject DrawF_Load(PyObject self,PyObject *args)
107	n/a	{ int size;
108	n/a	char *fname;
109	n/a	PyDrawFObject *b;
110	n/a	fileswitch_object_type ot;
111	n/a	if(!PyArg_ParseTuple(args,"s",&fname)) return NULL;
112	n/a	e=xosfile_read_no_path(fname,&ot,0,0,&size,0);
113	n/a	if(e) return drawf_oserror();
114	n/a	size-=HDRSIZE;
115	n/a	if(ot!=osfile_IS_FILE\|\|size<0\|\|size&3) return drawf_error("Bad draw file");
116	n/a	b=new(size);
117	n/a	if(!b) return NULL;
118	n/a	e=xosfile_load_stamped_no_path(fname,(byte*)(b->drawf),0,0,0,0,0);
119	n/a	if(e)
120	n/a	{ Py_DECREF(b);
121	n/a	return drawf_oserror();
122	n/a	}
123	n/a	countobjs(b);
124	n/a	if(b->nobjs>=0) return (PyObject *)b;
125	n/a	Py_DECREF(b);
126	n/a	return drawf_error("Corrupt draw file");
127	n/a	}
128	n/a
129	n/a
130	n/a	static PyObject DrawF_Save(PyDrawFObject self,PyObject *arg)
131	n/a	{ char *fname;
132	n/a	if(!PyArg_ParseTuple(arg,"s",&fname)) return NULL;
133	n/a	e=xosfile_save_stamped(fname,DRAWTYPE,
134	n/a	(byte)(self->drawf),(byte)(self->drawf)+self->size);
135	n/a	if (e) return drawf_oserror();
136	n/a	Py_INCREF(Py_None);return Py_None;
137	n/a	}
138	n/a
139	n/a	static PyObject DrawF_Render(PyDrawFObject self,PyObject *arg)
140	n/a	{ int flags,trans,clip,flat;
141	n/a	if(!PyArg_ParseTuple(arg,"iiii",&flags,&trans,&clip,&flat)) return NULL;
142	n/a	e=xdrawfile_render((drawfile_render_flags)flags,self->drawf,self->size,
143	n/a	(os_trfm)trans,(os_box)clip,flat);
144	n/a	if(e) return drawf_oserror();
145	n/a	Py_INCREF(Py_None);return Py_None;
146	n/a	}
147	n/a
148	n/a	static PyObject DrawF_Path(PyDrawFObject self,PyObject *arg)
149	n/a	{ PyObject *pl;
150	n/a	PyObject *dp=0;
151	n/a	os_colour fill;
152	n/a	os_colour outline;
153	n/a	int width,start=0;
154	n/a	drawfile_path_style style;
155	n/a	int size=40;
156	n/a	int n,i,element_count;
157	n/a	drawfile_diagram *diag;
158	n/a	drawfile_object *dobj;
159	n/a	drawfile_path *dpath;
160	n/a	draw_path *thepath;
161	n/a	draw_line_style line_style;
162	n/a	draw_dash_pattern *dash_pattern=0;
163	n/a	os_box *box;
164	n/a	long *pe;
165	n/a	if(!PyArg_ParseTuple(arg,"O!(iiii)\|O!i",&PyList_Type,&pl,(int*)&fill,
166	n/a	(int)&outline,&width,(int)&style,&PyTuple_Type,&dp,&start)) return NULL;
167	n/a	if(dp)
168	n/a	{ element_count=PyTuple_Size(dp);
169	n/a	size+=4*element_count+8;
170	n/a	style.flags\|=drawfile_PATH_DASHED;
171	n/a	}
172	n/a	else style.flags&=~drawfile_PATH_DASHED;
173	n/a	n=PyList_Size(pl);
174	n/a	size+=4*n+8;
175	n/a	for(i=0;i<n;i++) if(!PyInt_Check(PyList_GetItem(pl,i))) size+=4;
176	n/a	diag=realloc(self->drawf,self->size+size);
177	n/a	if(!diag) return PyErr_NoMemory();
178	n/a	self->drawf=diag;
179	n/a	dobj=(drawfile_object)((char)diag+self->size);
180	n/a	dobj->type=drawfile_TYPE_PATH;
181	n/a	dobj->size=size;
182	n/a	dpath=&dobj->data.path;
183	n/a	self->size+=size;
184	n/a	self->nobjs++;
185	n/a	box=&dpath->bbox;
186	n/a	dpath->fill=fill;dpath->outline=outline;
187	n/a	dpath->width=width;dpath->style=style;
188	n/a	pe=(long*)&(dpath->path);
189	n/a	if(dp)
190	n/a	{ dash_pattern=&(((drawfile_path_with_pattern*)dpath)->pattern);
191	n/a	dash_pattern->start=start;
192	n/a	dash_pattern->element_count=element_count;
193	n/a	for(i=0;i<element_count;i++)
194	n/a	{ dash_pattern->elements[i]=(int)PyInt_AsLong(PyTuple_GetItem(dp,i));
195	n/a	}
196	n/a	pe+=element_count+2;
197	n/a	}
198	n/a	thepath=(draw_path*)pe;
199	n/a	*pe++=draw_MOVE_TO;
200	n/a	for(i=0;i<n;i++)
201	n/a	{ PyObject *p=PyList_GetItem(pl,i);
202	n/a	if(PyInt_Check(p))
203	n/a	*pe++=PyInt_AsLong(p);
204	n/a	else
205	n/a	{
206	n/a	*pe++=PyInt_AsLong(PyTuple_GetItem(p,0));
207	n/a	*pe++=PyInt_AsLong(PyTuple_GetItem(p,1));
208	n/a	}
209	n/a	}
210	n/a	*pe=draw_END_PATH;
211	n/a	line_style.join_style=style.flags&3;
212	n/a	line_style.end_cap_style=(style.flags&3)>>2;
213	n/a	line_style.start_cap_style=(style.flags&3)>>4;
214	n/a	line_style.reserved=0;
215	n/a	line_style.mitre_limit=10;
216	n/a	line_style.start_cap_width=style.cap_width;
217	n/a	line_style.end_cap_width=style.cap_width;
218	n/a	line_style.start_cap_length=style.cap_length;
219	n/a	line_style.end_cap_length=style.cap_length;
220	n/a	e=xdraw_process_path(thepath,0x70000000,0,0,width,&line_style,dash_pattern,
221	n/a	(draw_output_path)((char*)box+0x80000000),0);
222	n/a	if(e) return drawf_oserror();
223	n/a
224	n/a	/* draw_process_path seems to have a bug:
225	n/a	If the bounding box size is zero, it returns 0x7FFFFFFF, ..., 0x80000000 instead of the
226	n/a	correct size. */
227	n/a	if (box->x0==0x7FFFFFFF)
228	n/a	{
229	n/a	/* path has zero extension, so forget it; it would be invisible anyway */
230	n/a	self->size-=size;
231	n/a	self->nobjs--;
232	n/a	diag=realloc(self->drawf,self->size);
233	n/a	if(!diag) return PyErr_NoMemory();
234	n/a	self->drawf=diag;
235	n/a	}
236	n/a	else
237	n/a	extend(&(diag->bbox),box);
238	n/a	Py_INCREF(Py_None);return Py_None;
239	n/a	}
240	n/a
241	n/a	static PyObject DrawF_Text(PyDrawFObject self,PyObject *arg)
242	n/a	{ os_colour fill,bg_hint;
243	n/a	drawfile_text_style style;
244	n/a	int xsize,ysize,x,y;
245	n/a	int size,len;
246	n/a	char *text;
247	n/a	drawfile_diagram *diag;
248	n/a	drawfile_object *dobj;
249	n/a	drawfile_text *dtext;
250	n/a	os_box *box;
251	n/a	if(!PyArg_ParseTuple(arg,"(ii)s(iiiii)",&x,&y,&text,
252	n/a	(int)&fill,(int)&bg_hint,(int*)&style,&xsize,&ysize)) return NULL;
253	n/a	len=strlen(text);
254	n/a	size=((len+4)&(~3))+52;
255	n/a	diag=realloc(self->drawf,self->size+size);
256	n/a	if(!diag) return PyErr_NoMemory();
257	n/a	self->drawf=diag;
258	n/a	dobj=(drawfile_object)((char)diag+self->size);
259	n/a	dobj->type=drawfile_TYPE_TEXT;
260	n/a	dobj->size=size;
261	n/a	dtext=&dobj->data.text;
262	n/a	self->size+=size;
263	n/a	self->nobjs++;
264	n/a	dtext->fill=fill;
265	n/a	dtext->bg_hint=bg_hint;
266	n/a	dtext->style=style;
267	n/a	dtext->xsize=xsize;
268	n/a	dtext->ysize=ysize;
269	n/a	dtext->base.x=x;
270	n/a	dtext->base.y=y;
271	n/a	memset(dtext->text,0,(len+4)&(~3));
272	n/a	sprintf(dtext->text,"%s",text);
273	n/a	box=&(dtext->bbox);
274	n/a	box->x0=x;box->y0=y;box->x1=x+len*xsize;box->y1=y+ysize;
275	n/a	extend(&(diag->bbox),box);
276	n/a	Py_INCREF(Py_None);return Py_None;
277	n/a	}
278	n/a
279	n/a	static PyObject DrawF_TText(PyDrawFObject self,PyObject *arg)
280	n/a	{ os_colour fill,bg_hint;
281	n/a	drawfile_text_style style;
282	n/a	int xsize,ysize,x,y;
283	n/a	int t1,t2,t3,t4,t5,t6;
284	n/a	int size,len;
285	n/a	char *text;
286	n/a	drawfile_diagram *diag;
287	n/a	drawfile_object *dobj;
288	n/a	drawfile_trfm_text *dtext;
289	n/a	os_box *box;
290	n/a	t1=1<<16;t2=0;
291	n/a	t3=0;t4=1<<16;
292	n/a	t5=t6=0;
293	n/a	if(!PyArg_ParseTuple(arg,"(ii)s(iiiii)\|(iiiiii)",&x,&y,&text,
294	n/a	(int)&fill,(int)&bg_hint,(int*)&style,&xsize,&ysize,&t1,&t2,&t3,&t4,&t5,&t6)) return NULL;
295	n/a	len=strlen(text);
296	n/a	size=((len+4)&(~3))+52+28;
297	n/a	diag=realloc(self->drawf,self->size+size);
298	n/a	if(!diag) return PyErr_NoMemory();
299	n/a	self->drawf=diag;
300	n/a	dobj=(drawfile_object)((char)diag+self->size);
301	n/a	dobj->type=drawfile_TYPE_TRFM_TEXT;
302	n/a	dobj->size=size;
303	n/a	dtext=&dobj->data.trfm_text;
304	n/a	self->size+=size;
305	n/a	self->nobjs++;
306	n/a	dtext->trfm.entries[0][0]=t1;
307	n/a	dtext->trfm.entries[0][1]=t2;
308	n/a	dtext->trfm.entries[1][0]=t3;
309	n/a	dtext->trfm.entries[1][1]=t4;
310	n/a	dtext->trfm.entries[2][0]=t5;
311	n/a	dtext->trfm.entries[2][1]=t6;
312	n/a	dtext->flags=0;
313	n/a	dtext->fill=fill;
314	n/a	dtext->bg_hint=bg_hint;
315	n/a	dtext->style=style;
316	n/a	dtext->xsize=xsize;
317	n/a	dtext->ysize=ysize;
318	n/a	dtext->base.x=x;
319	n/a	dtext->base.y=y;
320	n/a	memset(dtext->text,0,(len+4)&(~3));
321	n/a	sprintf(dtext->text,"%s",text);
322	n/a	box=&(dtext->bbox);
323	n/a	box->x0=x;box->y0=y;box->x1=x+len*xsize;box->y1=y+ysize;
324	n/a	extend(&(diag->bbox),box);
325	n/a	Py_INCREF(Py_None);return Py_None;
326	n/a	}
327	n/a
328	n/a	static PyObject DrawF_FontTable(PyDrawFObject self,PyObject *arg)
329	n/a	{ int size=8,n=0;
330	n/a	PyObject d,key,*value;
331	n/a	drawfile_diagram *diag;
332	n/a	drawfile_object *dobj;
333	n/a	char *dtable;
334	n/a	if(!PyArg_ParseTuple(arg,"O!",&PyDict_Type,&d)) return NULL;
335	n/a	while(PyDict_Next(d,&n,&key,&value))
336	n/a	{ int m=PyString_Size(value);
337	n/a	if(m<0\|\|!PyInt_Check(key)) return NULL;
338	n/a	size+=m+2;
339	n/a	}
340	n/a	size=(size+3)&(~3);
341	n/a	diag=realloc(self->drawf,self->size+size);
342	n/a	if(!diag) return PyErr_NoMemory();
343	n/a	self->drawf=diag;
344	n/a	dobj=(drawfile_object)((char)diag+self->size);
345	n/a	dobj->type=drawfile_TYPE_FONT_TABLE;
346	n/a	dobj->size=size;
347	n/a	dtable=(char*)(&dobj->data.font_table);
348	n/a	self->size+=size;
349	n/a	self->nobjs++;
350	n/a	memset(dtable,0,size-8);
351	n/a	n=0;
352	n/a	while(PyDict_Next(d,&n,&key,&value))
353	n/a	{ int m=PyString_Size(value);
354	n/a	*dtable=(char)PyInt_AsLong(key);
355	n/a	strcpy(dtable+1,PyString_AsString(value));
356	n/a	dtable+=m+2;
357	n/a	}
358	n/a	Py_INCREF(Py_None);return Py_None;
359	n/a	}
360	n/a
361	n/a	static PyObject DrawF_Group(PyDrawFObject self,PyObject *arg)
362	n/a	{ int size,n;
363	n/a	PyDrawFObject *g;
364	n/a	char *name="";
365	n/a	drawfile_diagram *diag;
366	n/a	drawfile_object *dobj;
367	n/a	drawfile_group *dgroup;
368	n/a	if(!PyArg_ParseTuple(arg,"O!\|s",&PyDrawFType,(PyObject*)&g,&name))
369	n/a	return NULL;
370	n/a	size=g->size-4;
371	n/a	diag=realloc(self->drawf,self->size+size);
372	n/a	if(!diag) return PyErr_NoMemory();
373	n/a	self->drawf=diag;
374	n/a	self->nobjs++;
375	n/a	dobj=(drawfile_object)((char)diag+self->size);
376	n/a	self->size+=size;
377	n/a	dobj->type=drawfile_TYPE_GROUP;
378	n/a	dobj->size=g->size-4;
379	n/a	dgroup=&dobj->data.group;
380	n/a	dgroup->bbox=g->drawf->bbox;
381	n/a	memset(dgroup->name,' ',12);
382	n/a	n=strlen(name);
383	n/a	if(n>12) n=12;
384	n/a	memcpy(dgroup->name,name,n);
385	n/a	memcpy((char)dgroup->objects,(char)g->drawf+40,g->size-40);
386	n/a	extend(&(diag->bbox),&(dgroup->bbox));
387	n/a	Py_INCREF(Py_None);return Py_None;
388	n/a	}
389	n/a
390	n/a	static PyObject DrawF_Find(PyDrawFObject self,PyObject *arg)
391	n/a	{ int x,y,n=0;
392	n/a	int r=-1;
393	n/a	drawfile_object *d;
394	n/a	if(!PyArg_ParseTuple(arg,"ii\|i",&x,&y,&n)) return NULL;
395	n/a	if(n<self->nobjs&&n>=0)
396	n/a	{ d=findobj(self,n);
397	n/a	while(n<self->nobjs)
398	n/a	{ if(x>=d->data.text.bbox.x0&&x<=d->data.text.bbox.x1&&
399	n/a	y>=d->data.text.bbox.y0&&y<=d->data.text.bbox.y1) { r=n;break;}
400	n/a	n++;
401	n/a	d=NEXT(d);
402	n/a	}
403	n/a	}
404	n/a	return PyInt_FromLong(r);
405	n/a	}
406	n/a
407	n/a
408	n/a	static PyObject DrawF_Box(PyDrawFObject self,PyObject *arg)
409	n/a	{ int n=-1;
410	n/a	os_box *box;
411	n/a	if(!PyArg_ParseTuple(arg,"\|i",&n)) return NULL;
412	n/a	if(n>=self->nobjs\|n<0) box=&(self->drawf->bbox);
413	n/a	else box=&(findobj(self,n)->data.text.bbox);
414	n/a	return Py_BuildValue("iiii",box->x0,box->y0,box->x1,box->y1);
415	n/a	}
416	n/a
417	n/a	static void SetBlock(drawfile_object *d,int size,int type,int offset,int value)
418	n/a	{ char end=(char)d+size;
419	n/a	printf("s%d t%d o%d v%d\n",size,type,offset,value);
420	n/a	for(;(char*)d<end;d=NEXT(d))
421	n/a	if(d->type==type) ((int*)(d))[offset]=value;
422	n/a	else if(d->type==drawfile_TYPE_GROUP)
423	n/a	SetBlock((drawfile_object*)&d->data.group.objects,
424	n/a	d->size,type,offset,value);
425	n/a	printf("SetBlock Done\n");
426	n/a	}
427	n/a
428	n/a	static PyObject SetWord(PyDrawFObject self,PyObject *arg,int type,int offset)
429	n/a	{ int n=PyTuple_Size(arg);
430	n/a	int m,value,q;
431	n/a	PyObject *par;
432	n/a	drawfile_object e,d=self->drawf->objects;
433	n/a	if(n==0) return drawf_error("Value Required");
434	n/a	par=PyTuple_GetItem(arg,0);
435	n/a	if(!PyInt_Check(par))
436	n/a	{ PyErr_SetString(PyExc_TypeError,"Int Required");
437	n/a	return 0;
438	n/a	}
439	n/a	value=(int)PyInt_AsLong(par);
440	n/a	if(n==1) SetBlock(d,self->size-HDRSIZE,type,offset,value);
441	n/a	else
442	n/a	{ for(m=1;m<n;m++)
443	n/a	{ par=PyTuple_GetItem(arg,m);
444	n/a	if(!PyInt_Check(par))
445	n/a	{ PyErr_SetString(PyExc_TypeError,"Int Required");
446	n/a	return 0;
447	n/a	}
448	n/a	q=(int)PyInt_AsLong(par);
449	n/a	if(q<0\|\|q>=self->nobjs)
450	n/a	{ PyErr_SetString(PyExc_ValueError,"Object out of range");
451	n/a	return 0;
452	n/a	}
453	n/a	e=d;
454	n/a	for(;q>0;q--) e=NEXT(e);
455	n/a	if(e->type==type)
456	n/a	{ ((int*)(e))[offset]=value;
457	n/a	}
458	n/a	else if(e->type==drawfile_TYPE_GROUP)
459	n/a	SetBlock((drawfile_object*)&e->data.group.objects,
460	n/a	e->size-GRPHDRSIZE,type,offset,value);
461	n/a	}
462	n/a	}
463	n/a	Py_INCREF(Py_None);return Py_None;
464	n/a	}
465	n/a
466	n/a	static PyObject DrawF_PathFill(PyDrawFObject self,PyObject *arg)
467	n/a	{ return SetWord(self,arg,drawfile_TYPE_PATH,6);
468	n/a	}
469	n/a
470	n/a	static PyObject DrawF_PathColour(PyDrawFObject self,PyObject *arg)
471	n/a	{ return SetWord(self,arg,drawfile_TYPE_PATH,7);
472	n/a	}
473	n/a
474	n/a	static PyObject DrawF_TextColour(PyDrawFObject self,PyObject *arg)
475	n/a	{ return SetWord(self,arg,drawfile_TYPE_TEXT,6);
476	n/a	}
477	n/a
478	n/a	static PyObject DrawF_TextBackground(PyDrawFObject self,PyObject *arg)
479	n/a	{ return SetWord(self,arg,drawfile_TYPE_TEXT,7);
480	n/a	}
481	n/a
482	n/a	static struct PyMethodDef PyDrawF_Methods[]=
483	n/a	{
484	n/a	{ "render",(PyCFunction)DrawF_Render,1},
485	n/a	{ "save",(PyCFunction)DrawF_Save,1},
486	n/a	{ "path",(PyCFunction)DrawF_Path,1},
487	n/a	{ "text",(PyCFunction)DrawF_Text,1},
488	n/a	{ "ttext",(PyCFunction)DrawF_TText,1},
489	n/a	{ "fonttable",(PyCFunction)DrawF_FontTable,1},
490	n/a	{ "group",(PyCFunction)DrawF_Group,1},
491	n/a	{ "find",(PyCFunction)DrawF_Find,1},
492	n/a	{ "box",(PyCFunction)DrawF_Box,1},
493	n/a	{ "pathfill",(PyCFunction)DrawF_PathFill,1},
494	n/a	{ "pathcolour",(PyCFunction)DrawF_PathColour,1},
495	n/a	{ "textcolour",(PyCFunction)DrawF_TextColour,1},
496	n/a	{ "textbackground",(PyCFunction)DrawF_TextBackground,1},
497	n/a	{ NULL,NULL} /* sentinel */
498	n/a	};
499	n/a
500	n/a	static int drawf_len(PyDrawFObject *b)
501	n/a	{ return b->nobjs;
502	n/a	}
503	n/a
504	n/a	static PyObject drawf_concat(PyDrawFObject b,PyDrawFObject *c)
505	n/a	{ int size=b->size+c->size-2*HDRSIZE;
506	n/a	PyDrawFObject *p=new(size);
507	n/a	drawfile_diagram *dd;
508	n/a	drawfile_object *d;
509	n/a	int n;
510	n/a	if(!p) return NULL;
511	n/a	dd=p->drawf;
512	n/a	d=(drawfile_object)((char)dd+b->size);
513	n/a	memcpy((char)dd,(char)(b->drawf),b->size);
514	n/a	memcpy(d,(char*)(c->drawf)+HDRSIZE,c->size-HDRSIZE);
515	n/a	p->nobjs=b->nobjs+c->nobjs;
516	n/a	for(n=c->nobjs;n>0;n--)
517	n/a	{ extend(&(dd->bbox),&(d->data.path.bbox));
518	n/a	d=NEXT(d);
519	n/a	}
520	n/a	return (PyObject*)p;
521	n/a	}
522	n/a
523	n/a	static PyObject drawf_repeat(PyDrawFObject b,Py_ssize_t i)
524	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf repetition not implemented");
525	n/a	return NULL;
526	n/a	}
527	n/a
528	n/a	static PyObject drawf_item(PyDrawFObject b,Py_ssize_t i)
529	n/a	{ PyDrawFObject *c;
530	n/a	Py_ssize_t size;
531	n/a	drawfile_diagram *dd;
532	n/a	drawfile_object *d;
533	n/a	if(i<0\|\|i>=b->nobjs)
534	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf index out of range");
535	n/a	return NULL;
536	n/a	}
537	n/a	d=findobj(b,i);
538	n/a	size=(char)findobj(b,i+1)-(char)d;
539	n/a	c=new(size);
540	n/a	if(!c) return NULL;
541	n/a	dd=c->drawf;
542	n/a	((dheader)dd)=header;
543	n/a	memcpy(dd->objects,d,size);
544	n/a	c->nobjs=1;
545	n/a	extend(&(dd->bbox),&(d->data.path.bbox));
546	n/a	return (PyObject*)c;
547	n/a	}
548	n/a
549	n/a	static PyObject drawf_slice(PyDrawFObject b,Py_ssize_t i,Py_ssize_t j)
550	n/a	{ PyDrawFObject *c;
551	n/a	Py_ssize_t size,n;
552	n/a	drawfile_diagram *dd;
553	n/a	drawfile_object *d;
554	n/a	if(i<0\|\|j>b->nobjs)
555	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf index out of range");
556	n/a	return NULL;
557	n/a	}
558	n/a	d=findobj(b,i);
559	n/a	size=(char)findobj(b,j)-(char)d;
560	n/a	c=new(size);
561	n/a	if(!c) return NULL;
562	n/a	dd=c->drawf;
563	n/a	((dheader)dd)=header;
564	n/a	memcpy(dd->objects,d,size);
565	n/a	c->nobjs=j-i;
566	n/a	for(n=j-i;n>0;n--)
567	n/a	{ extend(&(dd->bbox),&(d->data.path.bbox));
568	n/a	d=NEXT(d);
569	n/a	}
570	n/a	return (PyObject*)c;
571	n/a	}
572	n/a
573	n/a	static int drawf_ass_item(PyDrawFObject b,Py_ssize_t i,PyObject v)
574	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf ass not implemented");
575	n/a	return NULL;
576	n/a	}
577	n/a	/{ if(i<0\|\|4i>=b->length)
578	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf index out of range");
579	n/a	return -1;
580	n/a	}
581	n/a	if(!PyInt_Check(v))
582	n/a	{ PyErr_SetString(PyExc_TypeError,"drawf item must be integer");
583	n/a	return -1;
584	n/a	}
585	n/a	((long*)(b->drawf))[i]=PyInt_AsLong(v);
586	n/a	return 0;
587	n/a	}
588	n/a	*/
589	n/a
590	n/a	static int drawf_ass_slice(PyDrawFObject b,Py_ssize_t i,Py_ssize_t j,PyObject v)
591	n/a	{ PyErr_SetString(PyExc_IndexError,"drawf ass_slice not implemented");
592	n/a	return NULL;
593	n/a	}
594	n/a
595	n/a	static PySequenceMethods drawf_as_sequence=
596	n/a	{ (inquiry)drawf_len,
597	n/a	(binaryfunc)drawf_concat,
598	n/a	(ssizeargfunc)drawf_repeat,
599	n/a	(ssizeargfunc)drawf_item,
600	n/a	(ssizessizeargfunc)drawf_slice,
601	n/a	(ssizeobjargproc)drawf_ass_item,
602	n/a	(ssizessizeobjargproc)drawf_ass_slice,
603	n/a	};
604	n/a
605	n/a	static PyObject PyDrawF_GetAttr(PyDrawFObject s,char *name)
606	n/a	{
607	n/a	if (!strcmp(name, "size")) return PyInt_FromLong((long)s->size);
608	n/a	if (!strcmp(name, "start")) return PyInt_FromLong((long)s->drawf);
609	n/a	if (!strcmp(name, "__members__"))
610	n/a	{ PyObject *list = PyList_New(2);
611	n/a	if (list)
612	n/a	{ PyList_SetItem(list, 0, PyString_FromString("size"));
613	n/a	PyList_SetItem(list, 1, PyString_FromString("start"));
614	n/a	if (PyErr_Occurred()) { Py_DECREF(list);list = NULL;}
615	n/a	}
616	n/a	return list;
617	n/a	}
618	n/a	return Py_FindMethod(PyDrawF_Methods, (PyObject*) s,name);
619	n/a	}
620	n/a
621	n/a	static void PyDrawF_Dealloc(PyDrawFObject *b)
622	n/a	{
623	n/a	if (b->drawf)
624	n/a	;
625	n/a	else
626	n/a	PyMem_DEL(b->drawf);
627	n/a	PyMem_DEL(b);
628	n/a	}
629	n/a
630	n/a	static PyTypeObject PyDrawFType=
631	n/a	{ PyObject_HEAD_INIT(&PyType_Type)
632	n/a	0, /ob_size/
633	n/a	"drawf", /tp_name/
634	n/a	sizeof(PyDrawFObject), /tp_size/
635	n/a	0, /tp_itemsize/
636	n/a	/* methods */
637	n/a	(destructor)PyDrawF_Dealloc, /tp_dealloc/
638	n/a	0, /tp_print/
639	n/a	(getattrfunc)PyDrawF_GetAttr, /tp_getattr/
640	n/a	0, /tp_setattr/
641	n/a	0, /tp_compare/
642	n/a	0, /tp_repr/
643	n/a	0, /tp_as_number/
644	n/a	&drawf_as_sequence, /tp_as_sequence/
645	n/a	0, /tp_as_mapping/
646	n/a	0, /tp_hash/
647	n/a	};
648	n/a
649	n/a
650	n/a
651	n/a	static PyMethodDef DrawFMethods[]=
652	n/a	{
653	n/a	{ "load",DrawF_Load,1},
654	n/a	{ "new",DrawF_New,1},
655	n/a	{ NULL,NULL} /* Sentinel */
656	n/a	};
657	n/a
658	n/a	void initdrawf()
659	n/a	{ PyObject m, d;
660	n/a	m = Py_InitModule("drawf", DrawFMethods);
661	n/a	d = PyModule_GetDict(m);
662	n/a	DrawFError=PyString_FromString("drawf.error");
663	n/a	PyDict_SetItemString(d,"error",DrawFError);
664	n/a	}