2 c66b5250 2006-06-25 devnull * /dev/draw simulator -- handles the messages prepared by the draw library.
3 c66b5250 2006-06-25 devnull * Doesn't simulate the file system part, just the messages.
6 c66b5250 2006-06-25 devnull #include <u.h>
7 c66b5250 2006-06-25 devnull #include <libc.h>
8 c66b5250 2006-06-25 devnull #include <draw.h>
9 c66b5250 2006-06-25 devnull #include <memdraw.h>
10 c66b5250 2006-06-25 devnull #include <memlayer.h>
11 c66b5250 2006-06-25 devnull #include "devdraw.h"
13 c66b5250 2006-06-25 devnull extern void _flushmemscreen(Rectangle);
15 c66b5250 2006-06-25 devnull #define NHASH (1<<5)
16 c66b5250 2006-06-25 devnull #define HASHMASK (NHASH-1)
18 c66b5250 2006-06-25 devnull typedef struct Client Client;
19 c66b5250 2006-06-25 devnull typedef struct Draw Draw;
20 c66b5250 2006-06-25 devnull typedef struct DImage DImage;
21 c66b5250 2006-06-25 devnull typedef struct DScreen DScreen;
22 c66b5250 2006-06-25 devnull typedef struct CScreen CScreen;
23 c66b5250 2006-06-25 devnull typedef struct FChar FChar;
24 c66b5250 2006-06-25 devnull typedef struct Refresh Refresh;
25 c66b5250 2006-06-25 devnull typedef struct Refx Refx;
26 c66b5250 2006-06-25 devnull typedef struct DName DName;
28 c66b5250 2006-06-25 devnull struct Draw
30 c66b5250 2006-06-25 devnull QLock lk;
31 c66b5250 2006-06-25 devnull int clientid;
32 c66b5250 2006-06-25 devnull int nclient;
33 c66b5250 2006-06-25 devnull Client* client[1];
34 c66b5250 2006-06-25 devnull int nname;
35 c66b5250 2006-06-25 devnull DName* name;
36 c66b5250 2006-06-25 devnull int vers;
37 c66b5250 2006-06-25 devnull int softscreen;
40 c66b5250 2006-06-25 devnull struct Client
42 c66b5250 2006-06-25 devnull /*Ref r;*/
43 c66b5250 2006-06-25 devnull DImage* dimage[NHASH];
44 c66b5250 2006-06-25 devnull CScreen* cscreen;
45 c66b5250 2006-06-25 devnull Refresh* refresh;
46 c66b5250 2006-06-25 devnull Rendez refrend;
47 c66b5250 2006-06-25 devnull uchar* readdata;
48 c66b5250 2006-06-25 devnull int nreaddata;
49 c66b5250 2006-06-25 devnull int busy;
50 c66b5250 2006-06-25 devnull int clientid;
51 c66b5250 2006-06-25 devnull int slot;
52 c66b5250 2006-06-25 devnull int refreshme;
53 c66b5250 2006-06-25 devnull int infoid;
57 c66b5250 2006-06-25 devnull struct Refresh
59 c66b5250 2006-06-25 devnull DImage* dimage;
60 c66b5250 2006-06-25 devnull Rectangle r;
61 c66b5250 2006-06-25 devnull Refresh* next;
64 c66b5250 2006-06-25 devnull struct Refx
66 c66b5250 2006-06-25 devnull Client* client;
67 c66b5250 2006-06-25 devnull DImage* dimage;
70 c66b5250 2006-06-25 devnull struct DName
72 c66b5250 2006-06-25 devnull char *name;
73 c66b5250 2006-06-25 devnull Client *client;
74 c66b5250 2006-06-25 devnull DImage* dimage;
75 c66b5250 2006-06-25 devnull int vers;
78 c66b5250 2006-06-25 devnull struct FChar
80 c66b5250 2006-06-25 devnull int minx; /* left edge of bits */
81 c66b5250 2006-06-25 devnull int maxx; /* right edge of bits */
82 c66b5250 2006-06-25 devnull uchar miny; /* first non-zero scan-line */
83 c66b5250 2006-06-25 devnull uchar maxy; /* last non-zero scan-line + 1 */
84 c66b5250 2006-06-25 devnull schar left; /* offset of baseline */
85 c66b5250 2006-06-25 devnull uchar width; /* width of baseline */
89 c66b5250 2006-06-25 devnull * Reference counts in DImages:
90 c66b5250 2006-06-25 devnull * one per open by original client
91 c66b5250 2006-06-25 devnull * one per screen image or fill
92 c66b5250 2006-06-25 devnull * one per image derived from this one by name
94 c66b5250 2006-06-25 devnull struct DImage
98 c66b5250 2006-06-25 devnull char *name;
99 c66b5250 2006-06-25 devnull int vers;
100 c66b5250 2006-06-25 devnull Memimage* image;
101 c66b5250 2006-06-25 devnull int ascent;
102 c66b5250 2006-06-25 devnull int nfchar;
103 c66b5250 2006-06-25 devnull FChar* fchar;
104 c66b5250 2006-06-25 devnull DScreen* dscreen; /* 0 if not a window */
105 c66b5250 2006-06-25 devnull DImage* fromname; /* image this one is derived from, by name */
106 c66b5250 2006-06-25 devnull DImage* next;
109 c66b5250 2006-06-25 devnull struct CScreen
111 c66b5250 2006-06-25 devnull DScreen* dscreen;
112 c66b5250 2006-06-25 devnull CScreen* next;
115 c66b5250 2006-06-25 devnull struct DScreen
118 c66b5250 2006-06-25 devnull int public;
119 c66b5250 2006-06-25 devnull int ref;
120 c66b5250 2006-06-25 devnull DImage *dimage;
121 c66b5250 2006-06-25 devnull DImage *dfill;
122 c66b5250 2006-06-25 devnull Memscreen* screen;
123 c66b5250 2006-06-25 devnull Client* owner;
124 c66b5250 2006-06-25 devnull DScreen* next;
127 c66b5250 2006-06-25 devnull static Draw sdraw;
128 c66b5250 2006-06-25 devnull static Client *client0;
129 c66b5250 2006-06-25 devnull static Memimage *screenimage;
130 c66b5250 2006-06-25 devnull static Rectangle flushrect;
131 c66b5250 2006-06-25 devnull static int waste;
132 c66b5250 2006-06-25 devnull static DScreen* dscreen;
133 c66b5250 2006-06-25 devnull static int drawuninstall(Client*, int);
134 c66b5250 2006-06-25 devnull static Memimage* drawinstall(Client*, int, Memimage*, DScreen*);
135 c66b5250 2006-06-25 devnull static void drawfreedimage(DImage*);
138 c66b5250 2006-06-25 devnull _initdisplaymemimage(Memimage *m)
140 c66b5250 2006-06-25 devnull screenimage = m;
141 c66b5250 2006-06-25 devnull m->screenref = 1;
142 c66b5250 2006-06-25 devnull client0 = mallocz(sizeof(Client), 1);
143 c66b5250 2006-06-25 devnull if(client0 == nil){
144 c66b5250 2006-06-25 devnull fprint(2, "initdraw: allocating client0: out of memory");
145 c66b5250 2006-06-25 devnull abort();
147 c66b5250 2006-06-25 devnull client0->slot = 0;
148 c66b5250 2006-06-25 devnull client0->clientid = ++sdraw.clientid;
149 c66b5250 2006-06-25 devnull client0->op = SoverD;
150 c66b5250 2006-06-25 devnull sdraw.client[0] = client0;
151 c66b5250 2006-06-25 devnull sdraw.nclient = 1;
152 c66b5250 2006-06-25 devnull sdraw.softscreen = 1;
156 c66b5250 2006-06-25 devnull _drawreplacescreenimage(Memimage *m)
159 c66b5250 2006-06-25 devnull * Replace the screen image because the screen
160 c66b5250 2006-06-25 devnull * was resized.
162 c66b5250 2006-06-25 devnull * In theory there should only be one reference
163 c66b5250 2006-06-25 devnull * to the current screen image, and that's through
164 c66b5250 2006-06-25 devnull * client0's image 0, installed a few lines above.
165 c66b5250 2006-06-25 devnull * Once the client drops the image, the underlying backing
166 c66b5250 2006-06-25 devnull * store freed properly. The client is being notified
167 c66b5250 2006-06-25 devnull * about the resize through external means, so all we
168 c66b5250 2006-06-25 devnull * need to do is this assignment.
170 c66b5250 2006-06-25 devnull Memimage *om;
172 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
173 c66b5250 2006-06-25 devnull om = screenimage;
174 c66b5250 2006-06-25 devnull screenimage = m;
175 c66b5250 2006-06-25 devnull m->screenref = 1;
176 c66b5250 2006-06-25 devnull if(om && --om->screenref == 0){
177 c66b5250 2006-06-25 devnull _freememimage(om);
179 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
184 c66b5250 2006-06-25 devnull drawrefreshscreen(DImage *l, Client *client)
186 c66b5250 2006-06-25 devnull while(l != nil && l->dscreen == nil)
187 c66b5250 2006-06-25 devnull l = l->fromname;
188 c66b5250 2006-06-25 devnull if(l != nil && l->dscreen->owner != client)
189 c66b5250 2006-06-25 devnull l->dscreen->owner->refreshme = 1;
194 c66b5250 2006-06-25 devnull drawrefresh(Memimage *m, Rectangle r, void *v)
196 c66b5250 2006-06-25 devnull Refx *x;
197 c66b5250 2006-06-25 devnull DImage *d;
198 c66b5250 2006-06-25 devnull Client *c;
199 c66b5250 2006-06-25 devnull Refresh *ref;
201 c66b5250 2006-06-25 devnull USED(m);
203 c66b5250 2006-06-25 devnull if(v == 0)
206 c66b5250 2006-06-25 devnull c = x->client;
207 c66b5250 2006-06-25 devnull d = x->dimage;
208 c66b5250 2006-06-25 devnull for(ref=c->refresh; ref; ref=ref->next)
209 c66b5250 2006-06-25 devnull if(ref->dimage == d){
210 c66b5250 2006-06-25 devnull combinerect(&ref->r, r);
213 c66b5250 2006-06-25 devnull ref = mallocz(sizeof(Refresh), 1);
214 c66b5250 2006-06-25 devnull if(ref){
215 c66b5250 2006-06-25 devnull ref->dimage = d;
216 c66b5250 2006-06-25 devnull ref->r = r;
217 c66b5250 2006-06-25 devnull ref->next = c->refresh;
218 c66b5250 2006-06-25 devnull c->refresh = ref;
222 c66b5250 2006-06-25 devnull static void
223 c66b5250 2006-06-25 devnull addflush(Rectangle r)
225 c66b5250 2006-06-25 devnull int abb, ar, anbb;
226 c66b5250 2006-06-25 devnull Rectangle nbb;
228 c66b5250 2006-06-25 devnull if(sdraw.softscreen==0 || !rectclip(&r, screenimage->r))
231 c66b5250 2006-06-25 devnull if(flushrect.min.x >= flushrect.max.x){
232 c66b5250 2006-06-25 devnull flushrect = r;
233 c66b5250 2006-06-25 devnull waste = 0;
236 c66b5250 2006-06-25 devnull nbb = flushrect;
237 c66b5250 2006-06-25 devnull combinerect(&nbb, r);
238 c66b5250 2006-06-25 devnull ar = Dx(r)*Dy(r);
239 c66b5250 2006-06-25 devnull abb = Dx(flushrect)*Dy(flushrect);
240 c66b5250 2006-06-25 devnull anbb = Dx(nbb)*Dy(nbb);
242 c66b5250 2006-06-25 devnull * Area of new waste is area of new bb minus area of old bb,
243 c66b5250 2006-06-25 devnull * less the area of the new segment, which we assume is not waste.
244 c66b5250 2006-06-25 devnull * This could be negative, but that's OK.
246 c66b5250 2006-06-25 devnull waste += anbb-abb - ar;
247 c66b5250 2006-06-25 devnull if(waste < 0)
248 c66b5250 2006-06-25 devnull waste = 0;
250 c66b5250 2006-06-25 devnull * absorb if:
251 c66b5250 2006-06-25 devnull * total area is small
252 c66b5250 2006-06-25 devnull * waste is less than half total area
253 c66b5250 2006-06-25 devnull * rectangles touch
255 c66b5250 2006-06-25 devnull if(anbb<=1024 || waste*2<anbb || rectXrect(flushrect, r)){
256 c66b5250 2006-06-25 devnull flushrect = nbb;
259 c66b5250 2006-06-25 devnull /* emit current state */
260 c66b5250 2006-06-25 devnull if(flushrect.min.x < flushrect.max.x)
261 c66b5250 2006-06-25 devnull _flushmemscreen(flushrect);
262 c66b5250 2006-06-25 devnull flushrect = r;
263 c66b5250 2006-06-25 devnull waste = 0;
268 c66b5250 2006-06-25 devnull dstflush(int dstid, Memimage *dst, Rectangle r)
270 c66b5250 2006-06-25 devnull Memlayer *l;
272 c66b5250 2006-06-25 devnull if(dstid == 0){
273 c66b5250 2006-06-25 devnull combinerect(&flushrect, r);
276 c66b5250 2006-06-25 devnull /* how can this happen? -rsc, dec 12 2002 */
277 c66b5250 2006-06-25 devnull if(dst == 0){
278 2bdefab1 2006-07-05 devnull fprint(2, "nil dstflush\n");
281 c66b5250 2006-06-25 devnull l = dst->layer;
282 c66b5250 2006-06-25 devnull if(l == nil)
285 c66b5250 2006-06-25 devnull if(l->screen->image->data != screenimage->data)
287 c66b5250 2006-06-25 devnull r = rectaddpt(r, l->delta);
288 c66b5250 2006-06-25 devnull l = l->screen->image->layer;
289 c66b5250 2006-06-25 devnull }while(l);
290 c66b5250 2006-06-25 devnull addflush(r);
295 c66b5250 2006-06-25 devnull drawflush(void)
297 c66b5250 2006-06-25 devnull if(flushrect.min.x < flushrect.max.x)
298 c66b5250 2006-06-25 devnull _flushmemscreen(flushrect);
299 c66b5250 2006-06-25 devnull flushrect = Rect(10000, 10000, -10000, -10000);
304 c66b5250 2006-06-25 devnull drawcmp(char *a, char *b, int n)
306 c66b5250 2006-06-25 devnull if(strlen(a) != n)
307 c66b5250 2006-06-25 devnull return 1;
308 c66b5250 2006-06-25 devnull return memcmp(a, b, n);
313 c66b5250 2006-06-25 devnull drawlookupname(int n, char *str)
315 c66b5250 2006-06-25 devnull DName *name, *ename;
317 c66b5250 2006-06-25 devnull name = sdraw.name;
318 c66b5250 2006-06-25 devnull ename = &name[sdraw.nname];
319 c66b5250 2006-06-25 devnull for(; name<ename; name++)
320 c66b5250 2006-06-25 devnull if(drawcmp(name->name, str, n) == 0)
321 c66b5250 2006-06-25 devnull return name;
322 c66b5250 2006-06-25 devnull return 0;
327 c66b5250 2006-06-25 devnull drawgoodname(DImage *d)
329 c66b5250 2006-06-25 devnull DName *n;
331 c66b5250 2006-06-25 devnull /* if window, validate the screen's own images */
332 c66b5250 2006-06-25 devnull if(d->dscreen)
333 c66b5250 2006-06-25 devnull if(drawgoodname(d->dscreen->dimage) == 0
334 c66b5250 2006-06-25 devnull || drawgoodname(d->dscreen->dfill) == 0)
335 c66b5250 2006-06-25 devnull return 0;
336 c66b5250 2006-06-25 devnull if(d->name == nil)
337 c66b5250 2006-06-25 devnull return 1;
338 c66b5250 2006-06-25 devnull n = drawlookupname(strlen(d->name), d->name);
339 c66b5250 2006-06-25 devnull if(n==nil || n->vers!=d->vers)
340 c66b5250 2006-06-25 devnull return 0;
341 c66b5250 2006-06-25 devnull return 1;
346 c66b5250 2006-06-25 devnull drawlookup(Client *client, int id, int checkname)
348 c66b5250 2006-06-25 devnull DImage *d;
350 c66b5250 2006-06-25 devnull d = client->dimage[id&HASHMASK];
351 c66b5250 2006-06-25 devnull while(d){
352 c66b5250 2006-06-25 devnull if(d->id == id){
354 c66b5250 2006-06-25 devnull * BUG: should error out but too hard.
355 c66b5250 2006-06-25 devnull * Return 0 instead.
357 c66b5250 2006-06-25 devnull if(checkname && !drawgoodname(d))
358 c66b5250 2006-06-25 devnull return 0;
359 c66b5250 2006-06-25 devnull return d;
361 c66b5250 2006-06-25 devnull d = d->next;
363 c66b5250 2006-06-25 devnull return 0;
367 c66b5250 2006-06-25 devnull DScreen*
368 c66b5250 2006-06-25 devnull drawlookupdscreen(int id)
370 c66b5250 2006-06-25 devnull DScreen *s;
372 c66b5250 2006-06-25 devnull s = dscreen;
373 c66b5250 2006-06-25 devnull while(s){
374 c66b5250 2006-06-25 devnull if(s->id == id)
375 c66b5250 2006-06-25 devnull return s;
376 c66b5250 2006-06-25 devnull s = s->next;
378 c66b5250 2006-06-25 devnull return 0;
382 c66b5250 2006-06-25 devnull DScreen*
383 c66b5250 2006-06-25 devnull drawlookupscreen(Client *client, int id, CScreen **cs)
385 c66b5250 2006-06-25 devnull CScreen *s;
387 c66b5250 2006-06-25 devnull s = client->cscreen;
388 c66b5250 2006-06-25 devnull while(s){
389 c66b5250 2006-06-25 devnull if(s->dscreen->id == id){
390 c66b5250 2006-06-25 devnull *cs = s;
391 c66b5250 2006-06-25 devnull return s->dscreen;
393 c66b5250 2006-06-25 devnull s = s->next;
395 c66b5250 2006-06-25 devnull /* caller must check! */
396 c66b5250 2006-06-25 devnull return 0;
400 c66b5250 2006-06-25 devnull Memimage*
401 c66b5250 2006-06-25 devnull drawinstall(Client *client, int id, Memimage *i, DScreen *dscreen)
403 c66b5250 2006-06-25 devnull DImage *d;
405 c66b5250 2006-06-25 devnull d = mallocz(sizeof(DImage), 1);
406 c66b5250 2006-06-25 devnull if(d == 0)
407 c66b5250 2006-06-25 devnull return 0;
408 c66b5250 2006-06-25 devnull d->id = id;
409 c66b5250 2006-06-25 devnull d->ref = 1;
410 c66b5250 2006-06-25 devnull d->name = 0;
411 c66b5250 2006-06-25 devnull d->vers = 0;
412 c66b5250 2006-06-25 devnull d->image = i;
413 c66b5250 2006-06-25 devnull if(i->screenref)
414 c66b5250 2006-06-25 devnull ++i->screenref;
415 c66b5250 2006-06-25 devnull d->nfchar = 0;
416 c66b5250 2006-06-25 devnull d->fchar = 0;
417 c66b5250 2006-06-25 devnull d->fromname = 0;
418 c66b5250 2006-06-25 devnull d->dscreen = dscreen;
419 c66b5250 2006-06-25 devnull d->next = client->dimage[id&HASHMASK];
420 c66b5250 2006-06-25 devnull client->dimage[id&HASHMASK] = d;
421 c66b5250 2006-06-25 devnull return i;
425 c66b5250 2006-06-25 devnull Memscreen*
426 c66b5250 2006-06-25 devnull drawinstallscreen(Client *client, DScreen *d, int id, DImage *dimage, DImage *dfill, int public)
428 c66b5250 2006-06-25 devnull Memscreen *s;
429 c66b5250 2006-06-25 devnull CScreen *c;
431 c66b5250 2006-06-25 devnull c = mallocz(sizeof(CScreen), 1);
432 c66b5250 2006-06-25 devnull if(dimage && dimage->image && dimage->image->chan == 0){
433 2bdefab1 2006-07-05 devnull fprint(2, "bad image %p in drawinstallscreen", dimage->image);
434 c66b5250 2006-06-25 devnull abort();
437 c66b5250 2006-06-25 devnull if(c == 0)
438 c66b5250 2006-06-25 devnull return 0;
439 c66b5250 2006-06-25 devnull if(d == 0){
440 c66b5250 2006-06-25 devnull d = mallocz(sizeof(DScreen), 1);
441 c66b5250 2006-06-25 devnull if(d == 0){
442 c66b5250 2006-06-25 devnull free(c);
443 c66b5250 2006-06-25 devnull return 0;
445 c66b5250 2006-06-25 devnull s = mallocz(sizeof(Memscreen), 1);
446 c66b5250 2006-06-25 devnull if(s == 0){
447 c66b5250 2006-06-25 devnull free(c);
448 c66b5250 2006-06-25 devnull free(d);
449 c66b5250 2006-06-25 devnull return 0;
451 c66b5250 2006-06-25 devnull s->frontmost = 0;
452 c66b5250 2006-06-25 devnull s->rearmost = 0;
453 c66b5250 2006-06-25 devnull d->dimage = dimage;
454 c66b5250 2006-06-25 devnull if(dimage){
455 c66b5250 2006-06-25 devnull s->image = dimage->image;
456 c66b5250 2006-06-25 devnull dimage->ref++;
458 c66b5250 2006-06-25 devnull d->dfill = dfill;
459 c66b5250 2006-06-25 devnull if(dfill){
460 c66b5250 2006-06-25 devnull s->fill = dfill->image;
461 c66b5250 2006-06-25 devnull dfill->ref++;
463 c66b5250 2006-06-25 devnull d->ref = 0;
464 c66b5250 2006-06-25 devnull d->id = id;
465 c66b5250 2006-06-25 devnull d->screen = s;
466 c66b5250 2006-06-25 devnull d->public = public;
467 c66b5250 2006-06-25 devnull d->next = dscreen;
468 c66b5250 2006-06-25 devnull d->owner = client;
469 c66b5250 2006-06-25 devnull dscreen = d;
471 c66b5250 2006-06-25 devnull c->dscreen = d;
472 c66b5250 2006-06-25 devnull d->ref++;
473 c66b5250 2006-06-25 devnull c->next = client->cscreen;
474 c66b5250 2006-06-25 devnull client->cscreen = c;
475 c66b5250 2006-06-25 devnull return d->screen;
480 c66b5250 2006-06-25 devnull drawdelname(DName *name)
484 c66b5250 2006-06-25 devnull i = name-sdraw.name;
485 c66b5250 2006-06-25 devnull memmove(name, name+1, (sdraw.nname-(i+1))*sizeof(DName));
486 c66b5250 2006-06-25 devnull sdraw.nname--;
491 c66b5250 2006-06-25 devnull drawfreedscreen(DScreen *this)
493 c66b5250 2006-06-25 devnull DScreen *ds, *next;
495 c66b5250 2006-06-25 devnull this->ref--;
496 c66b5250 2006-06-25 devnull if(this->ref < 0)
497 2bdefab1 2006-07-05 devnull fprint(2, "negative ref in drawfreedscreen\n");
498 c66b5250 2006-06-25 devnull if(this->ref > 0)
500 c66b5250 2006-06-25 devnull ds = dscreen;
501 c66b5250 2006-06-25 devnull if(ds == this){
502 c66b5250 2006-06-25 devnull dscreen = this->next;
503 c66b5250 2006-06-25 devnull goto Found;
505 c66b5250 2006-06-25 devnull while(next = ds->next){ /* assign = */
506 c66b5250 2006-06-25 devnull if(next == this){
507 c66b5250 2006-06-25 devnull ds->next = this->next;
508 c66b5250 2006-06-25 devnull goto Found;
510 c66b5250 2006-06-25 devnull ds = next;
513 c66b5250 2006-06-25 devnull * Should signal Enodrawimage, but too hard.
518 c66b5250 2006-06-25 devnull if(this->dimage)
519 c66b5250 2006-06-25 devnull drawfreedimage(this->dimage);
520 c66b5250 2006-06-25 devnull if(this->dfill)
521 c66b5250 2006-06-25 devnull drawfreedimage(this->dfill);
522 c66b5250 2006-06-25 devnull free(this->screen);
523 c66b5250 2006-06-25 devnull free(this);
528 c66b5250 2006-06-25 devnull drawfreedimage(DImage *dimage)
531 c66b5250 2006-06-25 devnull Memimage *l;
532 c66b5250 2006-06-25 devnull DScreen *ds;
534 c66b5250 2006-06-25 devnull dimage->ref--;
535 c66b5250 2006-06-25 devnull if(dimage->ref < 0)
536 2bdefab1 2006-07-05 devnull fprint(2, "negative ref in drawfreedimage\n");
537 c66b5250 2006-06-25 devnull if(dimage->ref > 0)
540 c66b5250 2006-06-25 devnull /* any names? */
541 c66b5250 2006-06-25 devnull for(i=0; i<sdraw.nname; )
542 c66b5250 2006-06-25 devnull if(sdraw.name[i].dimage == dimage)
543 c66b5250 2006-06-25 devnull drawdelname(sdraw.name+i);
546 c66b5250 2006-06-25 devnull if(dimage->fromname){ /* acquired by name; owned by someone else*/
547 c66b5250 2006-06-25 devnull drawfreedimage(dimage->fromname);
548 c66b5250 2006-06-25 devnull goto Return;
550 c66b5250 2006-06-25 devnull ds = dimage->dscreen;
551 c66b5250 2006-06-25 devnull l = dimage->image;
552 c66b5250 2006-06-25 devnull dimage->dscreen = nil; /* paranoia */
553 c66b5250 2006-06-25 devnull dimage->image = nil;
555 c66b5250 2006-06-25 devnull if(l->data == screenimage->data)
556 c66b5250 2006-06-25 devnull addflush(l->layer->screenr);
557 c66b5250 2006-06-25 devnull if(l->layer->refreshfn == drawrefresh) /* else true owner will clean up */
558 c66b5250 2006-06-25 devnull free(l->layer->refreshptr);
559 c66b5250 2006-06-25 devnull l->layer->refreshptr = nil;
560 c66b5250 2006-06-25 devnull if(drawgoodname(dimage))
561 c66b5250 2006-06-25 devnull memldelete(l);
563 c66b5250 2006-06-25 devnull memlfree(l);
564 c66b5250 2006-06-25 devnull drawfreedscreen(ds);
566 c66b5250 2006-06-25 devnull if(l->screenref==0)
567 c66b5250 2006-06-25 devnull freememimage(l);
568 c66b5250 2006-06-25 devnull else if(--l->screenref==0)
569 c66b5250 2006-06-25 devnull _freememimage(l);
572 c66b5250 2006-06-25 devnull free(dimage->fchar);
573 c66b5250 2006-06-25 devnull free(dimage);
578 c66b5250 2006-06-25 devnull drawuninstallscreen(Client *client, CScreen *this)
580 c66b5250 2006-06-25 devnull CScreen *cs, *next;
582 c66b5250 2006-06-25 devnull cs = client->cscreen;
583 c66b5250 2006-06-25 devnull if(cs == this){
584 c66b5250 2006-06-25 devnull client->cscreen = this->next;
585 c66b5250 2006-06-25 devnull drawfreedscreen(this->dscreen);
586 c66b5250 2006-06-25 devnull free(this);
589 c66b5250 2006-06-25 devnull while(next = cs->next){ /* assign = */
590 c66b5250 2006-06-25 devnull if(next == this){
591 c66b5250 2006-06-25 devnull cs->next = this->next;
592 c66b5250 2006-06-25 devnull drawfreedscreen(this->dscreen);
593 c66b5250 2006-06-25 devnull free(this);
596 c66b5250 2006-06-25 devnull cs = next;
602 c66b5250 2006-06-25 devnull drawuninstall(Client *client, int id)
604 c66b5250 2006-06-25 devnull DImage *d, **l;
606 c66b5250 2006-06-25 devnull for(l=&client->dimage[id&HASHMASK]; (d=*l) != nil; l=&d->next){
607 c66b5250 2006-06-25 devnull if(d->id == id){
608 c66b5250 2006-06-25 devnull *l = d->next;
609 c66b5250 2006-06-25 devnull drawfreedimage(d);
610 c66b5250 2006-06-25 devnull return 0;
613 c66b5250 2006-06-25 devnull return -1;
618 c66b5250 2006-06-25 devnull drawaddname(Client *client, DImage *di, int n, char *str, char **err)
620 c66b5250 2006-06-25 devnull DName *name, *ename, *new, *t;
621 c66b5250 2006-06-25 devnull char *ns;
623 c66b5250 2006-06-25 devnull name = sdraw.name;
624 c66b5250 2006-06-25 devnull ename = &name[sdraw.nname];
625 c66b5250 2006-06-25 devnull for(; name<ename; name++)
626 c66b5250 2006-06-25 devnull if(drawcmp(name->name, str, n) == 0){
627 c66b5250 2006-06-25 devnull *err = "image name in use";
628 c66b5250 2006-06-25 devnull return -1;
630 c66b5250 2006-06-25 devnull t = mallocz((sdraw.nname+1)*sizeof(DName), 1);
631 c66b5250 2006-06-25 devnull ns = malloc(n+1);
632 c66b5250 2006-06-25 devnull if(t == nil || ns == nil){
633 c66b5250 2006-06-25 devnull free(t);
634 c66b5250 2006-06-25 devnull free(ns);
635 c66b5250 2006-06-25 devnull *err = "out of memory";
636 c66b5250 2006-06-25 devnull return -1;
638 c66b5250 2006-06-25 devnull memmove(t, sdraw.name, sdraw.nname*sizeof(DName));
639 c66b5250 2006-06-25 devnull free(sdraw.name);
640 c66b5250 2006-06-25 devnull sdraw.name = t;
641 c66b5250 2006-06-25 devnull new = &sdraw.name[sdraw.nname++];
642 c66b5250 2006-06-25 devnull new->name = ns;
643 c66b5250 2006-06-25 devnull memmove(new->name, str, n);
644 c66b5250 2006-06-25 devnull new->name[n] = 0;
645 c66b5250 2006-06-25 devnull new->dimage = di;
646 c66b5250 2006-06-25 devnull new->client = client;
647 c66b5250 2006-06-25 devnull new->vers = ++sdraw.vers;
648 c66b5250 2006-06-25 devnull return 0;
651 c66b5250 2006-06-25 devnull static int
652 c66b5250 2006-06-25 devnull drawclientop(Client *cl)
656 c66b5250 2006-06-25 devnull op = cl->op;
657 c66b5250 2006-06-25 devnull cl->op = SoverD;
658 c66b5250 2006-06-25 devnull return op;
662 c66b5250 2006-06-25 devnull Memimage*
663 c66b5250 2006-06-25 devnull drawimage(Client *client, uchar *a)
665 c66b5250 2006-06-25 devnull DImage *d;
667 c66b5250 2006-06-25 devnull d = drawlookup(client, BGLONG(a), 1);
668 c66b5250 2006-06-25 devnull if(d == nil)
669 c66b5250 2006-06-25 devnull return nil; /* caller must check! */
670 c66b5250 2006-06-25 devnull return d->image;
675 c66b5250 2006-06-25 devnull drawrectangle(Rectangle *r, uchar *a)
677 c66b5250 2006-06-25 devnull r->min.x = BGLONG(a+0*4);
678 c66b5250 2006-06-25 devnull r->min.y = BGLONG(a+1*4);
679 c66b5250 2006-06-25 devnull r->max.x = BGLONG(a+2*4);
680 c66b5250 2006-06-25 devnull r->max.y = BGLONG(a+3*4);
685 c66b5250 2006-06-25 devnull drawpoint(Point *p, uchar *a)
687 c66b5250 2006-06-25 devnull p->x = BGLONG(a+0*4);
688 c66b5250 2006-06-25 devnull p->y = BGLONG(a+1*4);
693 c66b5250 2006-06-25 devnull drawchar(Memimage *dst, Point p, Memimage *src, Point *sp, DImage *font, int index, int op)
695 c66b5250 2006-06-25 devnull FChar *fc;
696 c66b5250 2006-06-25 devnull Rectangle r;
697 c66b5250 2006-06-25 devnull Point sp1;
699 c66b5250 2006-06-25 devnull fc = &font->fchar[index];
700 c66b5250 2006-06-25 devnull r.min.x = p.x+fc->left;
701 c66b5250 2006-06-25 devnull r.min.y = p.y-(font->ascent-fc->miny);
702 c66b5250 2006-06-25 devnull r.max.x = r.min.x+(fc->maxx-fc->minx);
703 c66b5250 2006-06-25 devnull r.max.y = r.min.y+(fc->maxy-fc->miny);
704 c66b5250 2006-06-25 devnull sp1.x = sp->x+fc->left;
705 c66b5250 2006-06-25 devnull sp1.y = sp->y+fc->miny;
706 c66b5250 2006-06-25 devnull memdraw(dst, r, src, sp1, font->image, Pt(fc->minx, fc->miny), op);
707 c66b5250 2006-06-25 devnull p.x += fc->width;
708 c66b5250 2006-06-25 devnull sp->x += fc->width;
709 c66b5250 2006-06-25 devnull return p;
714 c66b5250 2006-06-25 devnull drawcoord(uchar *p, uchar *maxp, int oldx, int *newx)
716 c66b5250 2006-06-25 devnull int b, x;
718 c66b5250 2006-06-25 devnull if(p >= maxp)
719 c66b5250 2006-06-25 devnull return nil;
720 c66b5250 2006-06-25 devnull b = *p++;
721 c66b5250 2006-06-25 devnull x = b & 0x7F;
722 c66b5250 2006-06-25 devnull if(b & 0x80){
723 c66b5250 2006-06-25 devnull if(p+1 >= maxp)
724 c66b5250 2006-06-25 devnull return nil;
725 c66b5250 2006-06-25 devnull x |= *p++ << 7;
726 c66b5250 2006-06-25 devnull x |= *p++ << 15;
727 c66b5250 2006-06-25 devnull if(x & (1<<22))
728 c66b5250 2006-06-25 devnull x |= ~0<<23;
730 c66b5250 2006-06-25 devnull if(b & 0x40)
731 c66b5250 2006-06-25 devnull x |= ~0<<7;
732 c66b5250 2006-06-25 devnull x += oldx;
734 c66b5250 2006-06-25 devnull *newx = x;
735 c66b5250 2006-06-25 devnull return p;
739 c66b5250 2006-06-25 devnull _drawmsgread(void *a, int n)
741 c66b5250 2006-06-25 devnull Client *cl;
743 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
744 c66b5250 2006-06-25 devnull cl = client0;
745 c66b5250 2006-06-25 devnull if(cl->readdata == nil){
746 c66b5250 2006-06-25 devnull werrstr("no draw data");
747 c66b5250 2006-06-25 devnull goto err;
749 c66b5250 2006-06-25 devnull if(n < cl->nreaddata){
750 c66b5250 2006-06-25 devnull werrstr("short read");
751 c66b5250 2006-06-25 devnull goto err;
753 c66b5250 2006-06-25 devnull n = cl->nreaddata;
754 c66b5250 2006-06-25 devnull memmove(a, cl->readdata, cl->nreaddata);
755 c66b5250 2006-06-25 devnull free(cl->readdata);
756 c66b5250 2006-06-25 devnull cl->readdata = nil;
757 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
758 c66b5250 2006-06-25 devnull return n;
761 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
762 c66b5250 2006-06-25 devnull return -1;
766 c66b5250 2006-06-25 devnull _drawmsgwrite(void *v, int n)
768 c66b5250 2006-06-25 devnull char cbuf[40], *err, ibuf[12*12+1], *s;
769 c66b5250 2006-06-25 devnull int c, ci, doflush, dstid, e0, e1, esize, j, m;
770 c66b5250 2006-06-25 devnull int ni, nw, oesize, oldn, op, ox, oy, repl, scrnid, y;
771 c66b5250 2006-06-25 devnull uchar *a, refresh, *u;
772 c66b5250 2006-06-25 devnull u32int chan, value;
773 c66b5250 2006-06-25 devnull Client *client;
774 c66b5250 2006-06-25 devnull CScreen *cs;
775 c66b5250 2006-06-25 devnull DImage *di, *ddst, *dsrc, *font, *ll;
776 c66b5250 2006-06-25 devnull DName *dn;
777 c66b5250 2006-06-25 devnull DScreen *dscrn;
778 c66b5250 2006-06-25 devnull FChar *fc;
779 c66b5250 2006-06-25 devnull Memimage *dst, *i, *l, **lp, *mask, *src;
780 c66b5250 2006-06-25 devnull Memscreen *scrn;
781 c66b5250 2006-06-25 devnull Point p, *pp, q, sp;
782 c66b5250 2006-06-25 devnull Rectangle clipr, r;
783 c66b5250 2006-06-25 devnull Refreshfn reffn;
784 c66b5250 2006-06-25 devnull Refx *refx;
786 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
789 c66b5250 2006-06-25 devnull oldn = n;
790 c66b5250 2006-06-25 devnull client = client0;
792 c66b5250 2006-06-25 devnull while((n-=m) > 0){
794 c66b5250 2006-06-25 devnull /*fprint(2, "msgwrite %d(%d)...", n, *a); */
795 c66b5250 2006-06-25 devnull switch(*a){
796 c66b5250 2006-06-25 devnull default:
797 c66b5250 2006-06-25 devnull /*fprint(2, "bad command %d\n", *a); */
798 c66b5250 2006-06-25 devnull err = "bad draw command";
799 c66b5250 2006-06-25 devnull goto error;
801 c66b5250 2006-06-25 devnull /* allocate: 'b' id[4] screenid[4] refresh[1] chan[4] repl[1]
802 c66b5250 2006-06-25 devnull R[4*4] clipR[4*4] rrggbbaa[4]
804 c66b5250 2006-06-25 devnull case 'b':
805 c66b5250 2006-06-25 devnull m = 1+4+4+1+4+1+4*4+4*4+4;
806 c66b5250 2006-06-25 devnull if(n < m)
807 c66b5250 2006-06-25 devnull goto Eshortdraw;
808 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
809 c66b5250 2006-06-25 devnull scrnid = BGSHORT(a+5);
810 c66b5250 2006-06-25 devnull refresh = a[9];
811 c66b5250 2006-06-25 devnull chan = BGLONG(a+10);
812 c66b5250 2006-06-25 devnull repl = a[14];
813 c66b5250 2006-06-25 devnull drawrectangle(&r, a+15);
814 c66b5250 2006-06-25 devnull drawrectangle(&clipr, a+31);
815 c66b5250 2006-06-25 devnull value = BGLONG(a+47);
816 c66b5250 2006-06-25 devnull if(drawlookup(client, dstid, 0))
817 c66b5250 2006-06-25 devnull goto Eimageexists;
818 c66b5250 2006-06-25 devnull if(scrnid){
819 c66b5250 2006-06-25 devnull dscrn = drawlookupscreen(client, scrnid, &cs);
820 c66b5250 2006-06-25 devnull if(!dscrn)
821 c66b5250 2006-06-25 devnull goto Enodrawscreen;
822 c66b5250 2006-06-25 devnull scrn = dscrn->screen;
823 c66b5250 2006-06-25 devnull if(repl || chan!=scrn->image->chan){
824 c66b5250 2006-06-25 devnull err = "image parameters incompatibile with screen";
825 c66b5250 2006-06-25 devnull goto error;
827 c66b5250 2006-06-25 devnull reffn = 0;
828 c66b5250 2006-06-25 devnull switch(refresh){
829 c66b5250 2006-06-25 devnull case Refbackup:
831 c66b5250 2006-06-25 devnull case Refnone:
832 c66b5250 2006-06-25 devnull reffn = memlnorefresh;
834 c66b5250 2006-06-25 devnull case Refmesg:
835 c66b5250 2006-06-25 devnull reffn = drawrefresh;
837 c66b5250 2006-06-25 devnull default:
838 c66b5250 2006-06-25 devnull err = "unknown refresh method";
839 c66b5250 2006-06-25 devnull goto error;
841 c66b5250 2006-06-25 devnull l = memlalloc(scrn, r, reffn, 0, value);
842 c66b5250 2006-06-25 devnull if(l == 0)
843 c66b5250 2006-06-25 devnull goto Edrawmem;
844 c66b5250 2006-06-25 devnull addflush(l->layer->screenr);
845 c66b5250 2006-06-25 devnull l->clipr = clipr;
846 c66b5250 2006-06-25 devnull rectclip(&l->clipr, r);
847 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, l, dscrn) == 0){
848 c66b5250 2006-06-25 devnull memldelete(l);
849 c66b5250 2006-06-25 devnull goto Edrawmem;
851 c66b5250 2006-06-25 devnull dscrn->ref++;
852 c66b5250 2006-06-25 devnull if(reffn){
853 c66b5250 2006-06-25 devnull refx = nil;
854 c66b5250 2006-06-25 devnull if(reffn == drawrefresh){
855 c66b5250 2006-06-25 devnull refx = mallocz(sizeof(Refx), 1);
856 c66b5250 2006-06-25 devnull if(refx == 0){
857 c66b5250 2006-06-25 devnull if(drawuninstall(client, dstid) < 0)
858 c66b5250 2006-06-25 devnull goto Enodrawimage;
859 c66b5250 2006-06-25 devnull goto Edrawmem;
861 c66b5250 2006-06-25 devnull refx->client = client;
862 c66b5250 2006-06-25 devnull refx->dimage = drawlookup(client, dstid, 1);
864 c66b5250 2006-06-25 devnull memlsetrefresh(l, reffn, refx);
866 c66b5250 2006-06-25 devnull continue;
868 c66b5250 2006-06-25 devnull i = allocmemimage(r, chan);
869 c66b5250 2006-06-25 devnull if(i == 0)
870 c66b5250 2006-06-25 devnull goto Edrawmem;
871 c66b5250 2006-06-25 devnull if(repl)
872 c66b5250 2006-06-25 devnull i->flags |= Frepl;
873 c66b5250 2006-06-25 devnull i->clipr = clipr;
874 c66b5250 2006-06-25 devnull if(!repl)
875 c66b5250 2006-06-25 devnull rectclip(&i->clipr, r);
876 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, i, 0) == 0){
877 c66b5250 2006-06-25 devnull freememimage(i);
878 c66b5250 2006-06-25 devnull goto Edrawmem;
880 c66b5250 2006-06-25 devnull memfillcolor(i, value);
881 c66b5250 2006-06-25 devnull continue;
883 c66b5250 2006-06-25 devnull /* allocate screen: 'A' id[4] imageid[4] fillid[4] public[1] */
884 c66b5250 2006-06-25 devnull case 'A':
885 c66b5250 2006-06-25 devnull m = 1+4+4+4+1;
886 c66b5250 2006-06-25 devnull if(n < m)
887 c66b5250 2006-06-25 devnull goto Eshortdraw;
888 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
889 c66b5250 2006-06-25 devnull if(dstid == 0)
890 c66b5250 2006-06-25 devnull goto Ebadarg;
891 c66b5250 2006-06-25 devnull if(drawlookupdscreen(dstid))
892 c66b5250 2006-06-25 devnull goto Escreenexists;
893 c66b5250 2006-06-25 devnull ddst = drawlookup(client, BGLONG(a+5), 1);
894 c66b5250 2006-06-25 devnull dsrc = drawlookup(client, BGLONG(a+9), 1);
895 c66b5250 2006-06-25 devnull if(ddst==0 || dsrc==0)
896 c66b5250 2006-06-25 devnull goto Enodrawimage;
897 c66b5250 2006-06-25 devnull if(drawinstallscreen(client, 0, dstid, ddst, dsrc, a[13]) == 0)
898 c66b5250 2006-06-25 devnull goto Edrawmem;
899 c66b5250 2006-06-25 devnull continue;
901 c66b5250 2006-06-25 devnull /* set repl and clip: 'c' dstid[4] repl[1] clipR[4*4] */
902 c66b5250 2006-06-25 devnull case 'c':
903 c66b5250 2006-06-25 devnull m = 1+4+1+4*4;
904 c66b5250 2006-06-25 devnull if(n < m)
905 c66b5250 2006-06-25 devnull goto Eshortdraw;
906 c66b5250 2006-06-25 devnull ddst = drawlookup(client, BGLONG(a+1), 1);
907 c66b5250 2006-06-25 devnull if(ddst == nil)
908 c66b5250 2006-06-25 devnull goto Enodrawimage;
909 c66b5250 2006-06-25 devnull if(ddst->name){
910 c66b5250 2006-06-25 devnull err = "can't change repl/clipr of shared image";
911 c66b5250 2006-06-25 devnull goto error;
913 c66b5250 2006-06-25 devnull dst = ddst->image;
914 c66b5250 2006-06-25 devnull if(a[5])
915 c66b5250 2006-06-25 devnull dst->flags |= Frepl;
916 c66b5250 2006-06-25 devnull drawrectangle(&dst->clipr, a+6);
917 c66b5250 2006-06-25 devnull continue;
919 c66b5250 2006-06-25 devnull /* draw: 'd' dstid[4] srcid[4] maskid[4] R[4*4] P[2*4] P[2*4] */
920 c66b5250 2006-06-25 devnull case 'd':
921 c66b5250 2006-06-25 devnull m = 1+4+4+4+4*4+2*4+2*4;
922 c66b5250 2006-06-25 devnull if(n < m)
923 c66b5250 2006-06-25 devnull goto Eshortdraw;
924 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
925 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
926 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
927 c66b5250 2006-06-25 devnull mask = drawimage(client, a+9);
928 c66b5250 2006-06-25 devnull if(!dst || !src || !mask)
929 c66b5250 2006-06-25 devnull goto Enodrawimage;
930 c66b5250 2006-06-25 devnull drawrectangle(&r, a+13);
931 c66b5250 2006-06-25 devnull drawpoint(&p, a+29);
932 c66b5250 2006-06-25 devnull drawpoint(&q, a+37);
933 c66b5250 2006-06-25 devnull op = drawclientop(client);
934 c66b5250 2006-06-25 devnull memdraw(dst, r, src, p, mask, q, op);
935 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
936 c66b5250 2006-06-25 devnull continue;
938 c66b5250 2006-06-25 devnull /* toggle debugging: 'D' val[1] */
939 c66b5250 2006-06-25 devnull case 'D':
940 c66b5250 2006-06-25 devnull m = 1+1;
941 c66b5250 2006-06-25 devnull if(n < m)
942 c66b5250 2006-06-25 devnull goto Eshortdraw;
943 c66b5250 2006-06-25 devnull drawdebug = a[1];
944 c66b5250 2006-06-25 devnull continue;
946 c66b5250 2006-06-25 devnull /* ellipse: 'e' dstid[4] srcid[4] center[2*4] a[4] b[4] thick[4] sp[2*4] alpha[4] phi[4]*/
947 c66b5250 2006-06-25 devnull case 'e':
948 c66b5250 2006-06-25 devnull case 'E':
949 c66b5250 2006-06-25 devnull m = 1+4+4+2*4+4+4+4+2*4+2*4;
950 c66b5250 2006-06-25 devnull if(n < m)
951 c66b5250 2006-06-25 devnull goto Eshortdraw;
952 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
953 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
954 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
955 c66b5250 2006-06-25 devnull if(!dst || !src)
956 c66b5250 2006-06-25 devnull goto Enodrawimage;
957 c66b5250 2006-06-25 devnull drawpoint(&p, a+9);
958 c66b5250 2006-06-25 devnull e0 = BGLONG(a+17);
959 c66b5250 2006-06-25 devnull e1 = BGLONG(a+21);
960 c66b5250 2006-06-25 devnull if(e0<0 || e1<0){
961 c66b5250 2006-06-25 devnull err = "invalid ellipse semidiameter";
962 c66b5250 2006-06-25 devnull goto error;
964 c66b5250 2006-06-25 devnull j = BGLONG(a+25);
965 c66b5250 2006-06-25 devnull if(j < 0){
966 c66b5250 2006-06-25 devnull err = "negative ellipse thickness";
967 c66b5250 2006-06-25 devnull goto error;
970 c66b5250 2006-06-25 devnull drawpoint(&sp, a+29);
972 c66b5250 2006-06-25 devnull if(*a == 'E')
974 c66b5250 2006-06-25 devnull ox = BGLONG(a+37);
975 c66b5250 2006-06-25 devnull oy = BGLONG(a+41);
976 c66b5250 2006-06-25 devnull op = drawclientop(client);
977 c66b5250 2006-06-25 devnull /* high bit indicates arc angles are present */
978 c66b5250 2006-06-25 devnull if(ox & ((ulong)1<<31)){
979 c66b5250 2006-06-25 devnull if((ox & ((ulong)1<<30)) == 0)
980 c66b5250 2006-06-25 devnull ox &= ~((ulong)1<<31);
981 c66b5250 2006-06-25 devnull memarc(dst, p, e0, e1, c, src, sp, ox, oy, op);
983 c66b5250 2006-06-25 devnull memellipse(dst, p, e0, e1, c, src, sp, op);
984 c66b5250 2006-06-25 devnull dstflush(dstid, dst, Rect(p.x-e0-j, p.y-e1-j, p.x+e0+j+1, p.y+e1+j+1));
985 c66b5250 2006-06-25 devnull continue;
987 c66b5250 2006-06-25 devnull /* free: 'f' id[4] */
988 c66b5250 2006-06-25 devnull case 'f':
989 c66b5250 2006-06-25 devnull m = 1+4;
990 c66b5250 2006-06-25 devnull if(n < m)
991 c66b5250 2006-06-25 devnull goto Eshortdraw;
992 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1), 0);
993 c66b5250 2006-06-25 devnull if(ll && ll->dscreen && ll->dscreen->owner != client)
994 c66b5250 2006-06-25 devnull ll->dscreen->owner->refreshme = 1;
995 c66b5250 2006-06-25 devnull if(drawuninstall(client, BGLONG(a+1)) < 0)
996 c66b5250 2006-06-25 devnull goto Enodrawimage;
997 c66b5250 2006-06-25 devnull continue;
999 c66b5250 2006-06-25 devnull /* free screen: 'F' id[4] */
1000 c66b5250 2006-06-25 devnull case 'F':
1001 c66b5250 2006-06-25 devnull m = 1+4;
1002 c66b5250 2006-06-25 devnull if(n < m)
1003 c66b5250 2006-06-25 devnull goto Eshortdraw;
1004 c66b5250 2006-06-25 devnull if(!drawlookupscreen(client, BGLONG(a+1), &cs))
1005 c66b5250 2006-06-25 devnull goto Enodrawscreen;
1006 c66b5250 2006-06-25 devnull drawuninstallscreen(client, cs);
1007 c66b5250 2006-06-25 devnull continue;
1009 c66b5250 2006-06-25 devnull /* initialize font: 'i' fontid[4] nchars[4] ascent[1] */
1010 c66b5250 2006-06-25 devnull case 'i':
1011 c66b5250 2006-06-25 devnull m = 1+4+4+1;
1012 c66b5250 2006-06-25 devnull if(n < m)
1013 c66b5250 2006-06-25 devnull goto Eshortdraw;
1014 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1015 c66b5250 2006-06-25 devnull if(dstid == 0){
1016 c66b5250 2006-06-25 devnull err = "can't use display as font";
1017 c66b5250 2006-06-25 devnull goto error;
1019 c66b5250 2006-06-25 devnull font = drawlookup(client, dstid, 1);
1020 c66b5250 2006-06-25 devnull if(font == 0)
1021 c66b5250 2006-06-25 devnull goto Enodrawimage;
1022 c66b5250 2006-06-25 devnull if(font->image->layer){
1023 c66b5250 2006-06-25 devnull err = "can't use window as font";
1024 c66b5250 2006-06-25 devnull goto error;
1026 c66b5250 2006-06-25 devnull ni = BGLONG(a+5);
1027 c66b5250 2006-06-25 devnull if(ni<=0 || ni>4096){
1028 c66b5250 2006-06-25 devnull err = "bad font size (4096 chars max)";
1029 c66b5250 2006-06-25 devnull goto error;
1031 c66b5250 2006-06-25 devnull free(font->fchar); /* should we complain if non-zero? */
1032 c66b5250 2006-06-25 devnull font->fchar = mallocz(ni*sizeof(FChar), 1);
1033 c66b5250 2006-06-25 devnull if(font->fchar == 0){
1034 c66b5250 2006-06-25 devnull err = "no memory for font";
1035 c66b5250 2006-06-25 devnull goto error;
1037 c66b5250 2006-06-25 devnull memset(font->fchar, 0, ni*sizeof(FChar));
1038 c66b5250 2006-06-25 devnull font->nfchar = ni;
1039 c66b5250 2006-06-25 devnull font->ascent = a[9];
1040 c66b5250 2006-06-25 devnull continue;
1042 c66b5250 2006-06-25 devnull /* set image 0 to screen image */
1043 c66b5250 2006-06-25 devnull case 'J':
1045 c66b5250 2006-06-25 devnull if(n < m)
1046 c66b5250 2006-06-25 devnull goto Eshortdraw;
1047 c66b5250 2006-06-25 devnull if(drawlookup(client, 0, 0))
1048 c66b5250 2006-06-25 devnull goto Eimageexists;
1049 c66b5250 2006-06-25 devnull drawinstall(client, 0, screenimage, 0);
1050 c66b5250 2006-06-25 devnull client->infoid = 0;
1051 c66b5250 2006-06-25 devnull continue;
1053 c66b5250 2006-06-25 devnull /* get image info: 'I' */
1054 c66b5250 2006-06-25 devnull case 'I':
1056 c66b5250 2006-06-25 devnull if(n < m)
1057 c66b5250 2006-06-25 devnull goto Eshortdraw;
1058 c66b5250 2006-06-25 devnull if(client->infoid < 0)
1059 c66b5250 2006-06-25 devnull goto Enodrawimage;
1060 c66b5250 2006-06-25 devnull if(client->infoid == 0){
1061 c66b5250 2006-06-25 devnull i = screenimage;
1062 c66b5250 2006-06-25 devnull if(i == nil)
1063 c66b5250 2006-06-25 devnull goto Enodrawimage;
1065 c66b5250 2006-06-25 devnull di = drawlookup(client, client->infoid, 1);
1066 c66b5250 2006-06-25 devnull if(di == nil)
1067 c66b5250 2006-06-25 devnull goto Enodrawimage;
1068 c66b5250 2006-06-25 devnull i = di->image;
1070 c66b5250 2006-06-25 devnull ni = sprint(ibuf, "%11d %11d %11s %11d %11d %11d %11d %11d"
1071 c66b5250 2006-06-25 devnull " %11d %11d %11d %11d ",
1072 c66b5250 2006-06-25 devnull client->clientid,
1073 c66b5250 2006-06-25 devnull client->infoid,
1074 c66b5250 2006-06-25 devnull chantostr(cbuf, i->chan),
1075 c66b5250 2006-06-25 devnull (i->flags&Frepl)==Frepl,
1076 c66b5250 2006-06-25 devnull i->r.min.x, i->r.min.y, i->r.max.x, i->r.max.y,
1077 c66b5250 2006-06-25 devnull i->clipr.min.x, i->clipr.min.y,
1078 c66b5250 2006-06-25 devnull i->clipr.max.x, i->clipr.max.y);
1079 c66b5250 2006-06-25 devnull free(client->readdata);
1080 c66b5250 2006-06-25 devnull client->readdata = malloc(ni);
1081 c66b5250 2006-06-25 devnull if(client->readdata == nil)
1082 c66b5250 2006-06-25 devnull goto Enomem;
1083 c66b5250 2006-06-25 devnull memmove(client->readdata, ibuf, ni);
1084 c66b5250 2006-06-25 devnull client->nreaddata = ni;
1085 c66b5250 2006-06-25 devnull client->infoid = -1;
1086 c66b5250 2006-06-25 devnull continue;
1088 c66b5250 2006-06-25 devnull /* load character: 'l' fontid[4] srcid[4] index[2] R[4*4] P[2*4] left[1] width[1] */
1089 c66b5250 2006-06-25 devnull case 'l':
1090 c66b5250 2006-06-25 devnull m = 1+4+4+2+4*4+2*4+1+1;
1091 c66b5250 2006-06-25 devnull if(n < m)
1092 c66b5250 2006-06-25 devnull goto Eshortdraw;
1093 c66b5250 2006-06-25 devnull font = drawlookup(client, BGLONG(a+1), 1);
1094 c66b5250 2006-06-25 devnull if(font == 0)
1095 c66b5250 2006-06-25 devnull goto Enodrawimage;
1096 c66b5250 2006-06-25 devnull if(font->nfchar == 0)
1097 c66b5250 2006-06-25 devnull goto Enotfont;
1098 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
1099 c66b5250 2006-06-25 devnull if(!src)
1100 c66b5250 2006-06-25 devnull goto Enodrawimage;
1101 c66b5250 2006-06-25 devnull ci = BGSHORT(a+9);
1102 c66b5250 2006-06-25 devnull if(ci >= font->nfchar)
1103 c66b5250 2006-06-25 devnull goto Eindex;
1104 c66b5250 2006-06-25 devnull drawrectangle(&r, a+11);
1105 c66b5250 2006-06-25 devnull drawpoint(&p, a+27);
1106 c66b5250 2006-06-25 devnull memdraw(font->image, r, src, p, memopaque, p, S);
1107 c66b5250 2006-06-25 devnull fc = &font->fchar[ci];
1108 c66b5250 2006-06-25 devnull fc->minx = r.min.x;
1109 c66b5250 2006-06-25 devnull fc->maxx = r.max.x;
1110 c66b5250 2006-06-25 devnull fc->miny = r.min.y;
1111 c66b5250 2006-06-25 devnull fc->maxy = r.max.y;
1112 c66b5250 2006-06-25 devnull fc->left = a[35];
1113 c66b5250 2006-06-25 devnull fc->width = a[36];
1114 c66b5250 2006-06-25 devnull continue;
1116 c66b5250 2006-06-25 devnull /* draw line: 'L' dstid[4] p0[2*4] p1[2*4] end0[4] end1[4] radius[4] srcid[4] sp[2*4] */
1117 c66b5250 2006-06-25 devnull case 'L':
1118 c66b5250 2006-06-25 devnull m = 1+4+2*4+2*4+4+4+4+4+2*4;
1119 c66b5250 2006-06-25 devnull if(n < m)
1120 c66b5250 2006-06-25 devnull goto Eshortdraw;
1121 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1122 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1123 c66b5250 2006-06-25 devnull drawpoint(&p, a+5);
1124 c66b5250 2006-06-25 devnull drawpoint(&q, a+13);
1125 c66b5250 2006-06-25 devnull e0 = BGLONG(a+21);
1126 c66b5250 2006-06-25 devnull e1 = BGLONG(a+25);
1127 c66b5250 2006-06-25 devnull j = BGLONG(a+29);
1128 c66b5250 2006-06-25 devnull if(j < 0){
1129 c66b5250 2006-06-25 devnull err = "negative line width";
1130 c66b5250 2006-06-25 devnull goto error;
1132 c66b5250 2006-06-25 devnull src = drawimage(client, a+33);
1133 c66b5250 2006-06-25 devnull if(!dst || !src)
1134 c66b5250 2006-06-25 devnull goto Enodrawimage;
1135 c66b5250 2006-06-25 devnull drawpoint(&sp, a+37);
1136 c66b5250 2006-06-25 devnull op = drawclientop(client);
1137 c66b5250 2006-06-25 devnull memline(dst, p, q, e0, e1, j, src, sp, op);
1138 c66b5250 2006-06-25 devnull /* avoid memlinebbox if possible */
1139 c66b5250 2006-06-25 devnull if(dstid==0 || dst->layer!=nil){
1140 c66b5250 2006-06-25 devnull /* BUG: this is terribly inefficient: update maximal containing rect*/
1141 c66b5250 2006-06-25 devnull r = memlinebbox(p, q, e0, e1, j);
1142 c66b5250 2006-06-25 devnull dstflush(dstid, dst, insetrect(r, -(1+1+j)));
1144 c66b5250 2006-06-25 devnull continue;
1146 c66b5250 2006-06-25 devnull /* create image mask: 'm' newid[4] id[4] */
1149 c66b5250 2006-06-25 devnull case 'm':
1150 c66b5250 2006-06-25 devnull m = 4+4;
1151 c66b5250 2006-06-25 devnull if(n < m)
1152 c66b5250 2006-06-25 devnull goto Eshortdraw;
1157 c66b5250 2006-06-25 devnull /* attach to a named image: 'n' dstid[4] j[1] name[j] */
1158 c66b5250 2006-06-25 devnull case 'n':
1159 c66b5250 2006-06-25 devnull m = 1+4+1;
1160 c66b5250 2006-06-25 devnull if(n < m)
1161 c66b5250 2006-06-25 devnull goto Eshortdraw;
1162 c66b5250 2006-06-25 devnull j = a[5];
1163 c66b5250 2006-06-25 devnull if(j == 0) /* give me a non-empty name please */
1164 c66b5250 2006-06-25 devnull goto Eshortdraw;
1165 c66b5250 2006-06-25 devnull m += j;
1166 c66b5250 2006-06-25 devnull if(n < m)
1167 c66b5250 2006-06-25 devnull goto Eshortdraw;
1168 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1169 c66b5250 2006-06-25 devnull if(drawlookup(client, dstid, 0))
1170 c66b5250 2006-06-25 devnull goto Eimageexists;
1171 c66b5250 2006-06-25 devnull dn = drawlookupname(j, (char*)a+6);
1172 c66b5250 2006-06-25 devnull if(dn == nil)
1173 c66b5250 2006-06-25 devnull goto Enoname;
1174 c66b5250 2006-06-25 devnull s = malloc(j+1);
1175 c66b5250 2006-06-25 devnull if(s == nil)
1176 c66b5250 2006-06-25 devnull goto Enomem;
1177 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, dn->dimage->image, 0) == 0)
1178 c66b5250 2006-06-25 devnull goto Edrawmem;
1179 c66b5250 2006-06-25 devnull di = drawlookup(client, dstid, 0);
1180 c66b5250 2006-06-25 devnull if(di == 0)
1181 c66b5250 2006-06-25 devnull goto Eoldname;
1182 c66b5250 2006-06-25 devnull di->vers = dn->vers;
1183 c66b5250 2006-06-25 devnull di->name = s;
1184 c66b5250 2006-06-25 devnull di->fromname = dn->dimage;
1185 c66b5250 2006-06-25 devnull di->fromname->ref++;
1186 c66b5250 2006-06-25 devnull memmove(di->name, a+6, j);
1187 c66b5250 2006-06-25 devnull di->name[j] = 0;
1188 c66b5250 2006-06-25 devnull client->infoid = dstid;
1189 c66b5250 2006-06-25 devnull continue;
1191 c66b5250 2006-06-25 devnull /* name an image: 'N' dstid[4] in[1] j[1] name[j] */
1192 c66b5250 2006-06-25 devnull case 'N':
1193 c66b5250 2006-06-25 devnull m = 1+4+1+1;
1194 c66b5250 2006-06-25 devnull if(n < m)
1195 c66b5250 2006-06-25 devnull goto Eshortdraw;
1196 c66b5250 2006-06-25 devnull c = a[5];
1197 c66b5250 2006-06-25 devnull j = a[6];
1198 c66b5250 2006-06-25 devnull if(j == 0) /* give me a non-empty name please */
1199 c66b5250 2006-06-25 devnull goto Eshortdraw;
1200 c66b5250 2006-06-25 devnull m += j;
1201 c66b5250 2006-06-25 devnull if(n < m)
1202 c66b5250 2006-06-25 devnull goto Eshortdraw;
1203 c66b5250 2006-06-25 devnull di = drawlookup(client, BGLONG(a+1), 0);
1204 c66b5250 2006-06-25 devnull if(di == 0)
1205 c66b5250 2006-06-25 devnull goto Enodrawimage;
1206 c66b5250 2006-06-25 devnull if(di->name)
1207 c66b5250 2006-06-25 devnull goto Enamed;
1209 c66b5250 2006-06-25 devnull if(drawaddname(client, di, j, (char*)a+7, &err) < 0)
1210 c66b5250 2006-06-25 devnull goto error;
1212 c66b5250 2006-06-25 devnull dn = drawlookupname(j, (char*)a+7);
1213 c66b5250 2006-06-25 devnull if(dn == nil)
1214 c66b5250 2006-06-25 devnull goto Enoname;
1215 c66b5250 2006-06-25 devnull if(dn->dimage != di)
1216 c66b5250 2006-06-25 devnull goto Ewrongname;
1217 c66b5250 2006-06-25 devnull drawdelname(dn);
1219 c66b5250 2006-06-25 devnull continue;
1221 c66b5250 2006-06-25 devnull /* position window: 'o' id[4] r.min [2*4] screenr.min [2*4] */
1222 c66b5250 2006-06-25 devnull case 'o':
1223 c66b5250 2006-06-25 devnull m = 1+4+2*4+2*4;
1224 c66b5250 2006-06-25 devnull if(n < m)
1225 c66b5250 2006-06-25 devnull goto Eshortdraw;
1226 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1227 c66b5250 2006-06-25 devnull if(!dst)
1228 c66b5250 2006-06-25 devnull goto Enodrawimage;
1229 c66b5250 2006-06-25 devnull if(dst->layer){
1230 c66b5250 2006-06-25 devnull drawpoint(&p, a+5);
1231 c66b5250 2006-06-25 devnull drawpoint(&q, a+13);
1232 c66b5250 2006-06-25 devnull r = dst->layer->screenr;
1233 c66b5250 2006-06-25 devnull ni = memlorigin(dst, p, q);
1234 c66b5250 2006-06-25 devnull if(ni < 0){
1235 c66b5250 2006-06-25 devnull err = "image origin failed";
1236 c66b5250 2006-06-25 devnull goto error;
1238 c66b5250 2006-06-25 devnull if(ni > 0){
1239 c66b5250 2006-06-25 devnull addflush(r);
1240 c66b5250 2006-06-25 devnull addflush(dst->layer->screenr);
1241 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1), 1);
1242 c66b5250 2006-06-25 devnull drawrefreshscreen(ll, client);
1245 c66b5250 2006-06-25 devnull continue;
1247 c66b5250 2006-06-25 devnull /* set compositing operator for next draw operation: 'O' op */
1248 c66b5250 2006-06-25 devnull case 'O':
1249 c66b5250 2006-06-25 devnull m = 1+1;
1250 c66b5250 2006-06-25 devnull if(n < m)
1251 c66b5250 2006-06-25 devnull goto Eshortdraw;
1252 c66b5250 2006-06-25 devnull client->op = a[1];
1253 c66b5250 2006-06-25 devnull continue;
1255 c66b5250 2006-06-25 devnull /* filled polygon: 'P' dstid[4] n[2] wind[4] ignore[2*4] srcid[4] sp[2*4] p0[2*4] dp[2*2*n] */
1256 c66b5250 2006-06-25 devnull /* polygon: 'p' dstid[4] n[2] end0[4] end1[4] radius[4] srcid[4] sp[2*4] p0[2*4] dp[2*2*n] */
1257 c66b5250 2006-06-25 devnull case 'p':
1258 c66b5250 2006-06-25 devnull case 'P':
1259 c66b5250 2006-06-25 devnull m = 1+4+2+4+4+4+4+2*4;
1260 c66b5250 2006-06-25 devnull if(n < m)
1261 c66b5250 2006-06-25 devnull goto Eshortdraw;
1262 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1263 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1264 c66b5250 2006-06-25 devnull ni = BGSHORT(a+5);
1265 c66b5250 2006-06-25 devnull if(ni < 0){
1266 c66b5250 2006-06-25 devnull err = "negative cout in polygon";
1267 c66b5250 2006-06-25 devnull goto error;
1269 c66b5250 2006-06-25 devnull e0 = BGLONG(a+7);
1270 c66b5250 2006-06-25 devnull e1 = BGLONG(a+11);
1272 c66b5250 2006-06-25 devnull if(*a == 'p'){
1273 c66b5250 2006-06-25 devnull j = BGLONG(a+15);
1274 c66b5250 2006-06-25 devnull if(j < 0){
1275 c66b5250 2006-06-25 devnull err = "negative polygon line width";
1276 c66b5250 2006-06-25 devnull goto error;
1279 c66b5250 2006-06-25 devnull src = drawimage(client, a+19);
1280 c66b5250 2006-06-25 devnull if(!dst || !src)
1281 c66b5250 2006-06-25 devnull goto Enodrawimage;
1282 c66b5250 2006-06-25 devnull drawpoint(&sp, a+23);
1283 c66b5250 2006-06-25 devnull drawpoint(&p, a+31);
1285 c66b5250 2006-06-25 devnull pp = mallocz(ni*sizeof(Point), 1);
1286 c66b5250 2006-06-25 devnull if(pp == nil)
1287 c66b5250 2006-06-25 devnull goto Enomem;
1288 c66b5250 2006-06-25 devnull doflush = 0;
1289 c66b5250 2006-06-25 devnull if(dstid==0 || (dst->layer && dst->layer->screen->image->data == screenimage->data))
1290 c66b5250 2006-06-25 devnull doflush = 1; /* simplify test in loop */
1291 c66b5250 2006-06-25 devnull ox = oy = 0;
1292 c66b5250 2006-06-25 devnull esize = 0;
1293 c66b5250 2006-06-25 devnull u = a+m;
1294 c66b5250 2006-06-25 devnull for(y=0; y<ni; y++){
1296 c66b5250 2006-06-25 devnull oesize = esize;
1297 c66b5250 2006-06-25 devnull u = drawcoord(u, a+n, ox, &p.x);
1299 c66b5250 2006-06-25 devnull goto Eshortdraw;
1300 c66b5250 2006-06-25 devnull u = drawcoord(u, a+n, oy, &p.y);
1302 c66b5250 2006-06-25 devnull goto Eshortdraw;
1303 c66b5250 2006-06-25 devnull ox = p.x;
1304 c66b5250 2006-06-25 devnull oy = p.y;
1305 c66b5250 2006-06-25 devnull if(doflush){
1306 c66b5250 2006-06-25 devnull esize = j;
1307 c66b5250 2006-06-25 devnull if(*a == 'p'){
1308 c66b5250 2006-06-25 devnull if(y == 0){
1309 c66b5250 2006-06-25 devnull c = memlineendsize(e0);
1310 c66b5250 2006-06-25 devnull if(c > esize)
1311 c66b5250 2006-06-25 devnull esize = c;
1313 c66b5250 2006-06-25 devnull if(y == ni-1){
1314 c66b5250 2006-06-25 devnull c = memlineendsize(e1);
1315 c66b5250 2006-06-25 devnull if(c > esize)
1316 c66b5250 2006-06-25 devnull esize = c;
1319 c66b5250 2006-06-25 devnull if(*a=='P' && e0!=1 && e0 !=~0)
1320 c66b5250 2006-06-25 devnull r = dst->clipr;
1321 c66b5250 2006-06-25 devnull else if(y > 0){
1322 c66b5250 2006-06-25 devnull r = Rect(q.x-oesize, q.y-oesize, q.x+oesize+1, q.y+oesize+1);
1323 c66b5250 2006-06-25 devnull combinerect(&r, Rect(p.x-esize, p.y-esize, p.x+esize+1, p.y+esize+1));
1325 c66b5250 2006-06-25 devnull if(rectclip(&r, dst->clipr)) /* should perhaps be an arg to dstflush */
1326 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
1328 c66b5250 2006-06-25 devnull pp[y] = p;
1330 c66b5250 2006-06-25 devnull if(y == 1)
1331 c66b5250 2006-06-25 devnull dstflush(dstid, dst, Rect(p.x-esize, p.y-esize, p.x+esize+1, p.y+esize+1));
1332 c66b5250 2006-06-25 devnull op = drawclientop(client);
1333 c66b5250 2006-06-25 devnull if(*a == 'p')
1334 c66b5250 2006-06-25 devnull mempoly(dst, pp, ni, e0, e1, j, src, sp, op);
1336 c66b5250 2006-06-25 devnull memfillpoly(dst, pp, ni, e0, src, sp, op);
1337 c66b5250 2006-06-25 devnull free(pp);
1338 c66b5250 2006-06-25 devnull m = u-a;
1339 c66b5250 2006-06-25 devnull continue;
1341 c66b5250 2006-06-25 devnull /* read: 'r' id[4] R[4*4] */
1342 c66b5250 2006-06-25 devnull case 'r':
1343 c66b5250 2006-06-25 devnull m = 1+4+4*4;
1344 c66b5250 2006-06-25 devnull if(n < m)
1345 c66b5250 2006-06-25 devnull goto Eshortdraw;
1346 c66b5250 2006-06-25 devnull i = drawimage(client, a+1);
1348 c66b5250 2006-06-25 devnull goto Enodrawimage;
1349 c66b5250 2006-06-25 devnull drawrectangle(&r, a+5);
1350 c66b5250 2006-06-25 devnull if(!rectinrect(r, i->r))
1351 c66b5250 2006-06-25 devnull goto Ereadoutside;
1352 c66b5250 2006-06-25 devnull c = bytesperline(r, i->depth);
1353 c66b5250 2006-06-25 devnull c *= Dy(r);
1354 c66b5250 2006-06-25 devnull free(client->readdata);
1355 c66b5250 2006-06-25 devnull client->readdata = mallocz(c, 0);
1356 c66b5250 2006-06-25 devnull if(client->readdata == nil){
1357 c66b5250 2006-06-25 devnull err = "readimage malloc failed";
1358 c66b5250 2006-06-25 devnull goto error;
1360 c66b5250 2006-06-25 devnull client->nreaddata = memunload(i, r, client->readdata, c);
1361 c66b5250 2006-06-25 devnull if(client->nreaddata < 0){
1362 c66b5250 2006-06-25 devnull free(client->readdata);
1363 c66b5250 2006-06-25 devnull client->readdata = nil;
1364 c66b5250 2006-06-25 devnull err = "bad readimage call";
1365 c66b5250 2006-06-25 devnull goto error;
1367 c66b5250 2006-06-25 devnull continue;
1369 c66b5250 2006-06-25 devnull /* string: 's' dstid[4] srcid[4] fontid[4] P[2*4] clipr[4*4] sp[2*4] ni[2] ni*(index[2]) */
1370 c66b5250 2006-06-25 devnull /* stringbg: 'x' dstid[4] srcid[4] fontid[4] P[2*4] clipr[4*4] sp[2*4] ni[2] bgid[4] bgpt[2*4] ni*(index[2]) */
1371 c66b5250 2006-06-25 devnull case 's':
1372 c66b5250 2006-06-25 devnull case 'x':
1373 c66b5250 2006-06-25 devnull m = 1+4+4+4+2*4+4*4+2*4+2;
1374 c66b5250 2006-06-25 devnull if(*a == 'x')
1375 c66b5250 2006-06-25 devnull m += 4+2*4;
1376 c66b5250 2006-06-25 devnull if(n < m)
1377 c66b5250 2006-06-25 devnull goto Eshortdraw;
1379 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1380 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1381 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
1382 c66b5250 2006-06-25 devnull if(!dst || !src)
1383 c66b5250 2006-06-25 devnull goto Enodrawimage;
1384 c66b5250 2006-06-25 devnull font = drawlookup(client, BGLONG(a+9), 1);
1385 c66b5250 2006-06-25 devnull if(font == 0)
1386 c66b5250 2006-06-25 devnull goto Enodrawimage;
1387 c66b5250 2006-06-25 devnull if(font->nfchar == 0)
1388 c66b5250 2006-06-25 devnull goto Enotfont;
1389 c66b5250 2006-06-25 devnull drawpoint(&p, a+13);
1390 c66b5250 2006-06-25 devnull drawrectangle(&r, a+21);
1391 c66b5250 2006-06-25 devnull drawpoint(&sp, a+37);
1392 c66b5250 2006-06-25 devnull ni = BGSHORT(a+45);
1393 c66b5250 2006-06-25 devnull u = a+m;
1394 c66b5250 2006-06-25 devnull m += ni*2;
1395 c66b5250 2006-06-25 devnull if(n < m)
1396 c66b5250 2006-06-25 devnull goto Eshortdraw;
1397 c66b5250 2006-06-25 devnull clipr = dst->clipr;
1398 c66b5250 2006-06-25 devnull dst->clipr = r;
1399 c66b5250 2006-06-25 devnull op = drawclientop(client);
1400 c66b5250 2006-06-25 devnull if(*a == 'x'){
1401 c66b5250 2006-06-25 devnull /* paint background */
1402 c66b5250 2006-06-25 devnull l = drawimage(client, a+47);
1404 c66b5250 2006-06-25 devnull goto Enodrawimage;
1405 c66b5250 2006-06-25 devnull drawpoint(&q, a+51);
1406 c66b5250 2006-06-25 devnull r.min.x = p.x;
1407 c66b5250 2006-06-25 devnull r.min.y = p.y-font->ascent;
1408 c66b5250 2006-06-25 devnull r.max.x = p.x;
1409 c66b5250 2006-06-25 devnull r.max.y = r.min.y+Dy(font->image->r);
1410 c66b5250 2006-06-25 devnull j = ni;
1411 c66b5250 2006-06-25 devnull while(--j >= 0){
1412 c66b5250 2006-06-25 devnull ci = BGSHORT(u);
1413 c66b5250 2006-06-25 devnull if(ci<0 || ci>=font->nfchar){
1414 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1415 c66b5250 2006-06-25 devnull goto Eindex;
1417 c66b5250 2006-06-25 devnull r.max.x += font->fchar[ci].width;
1418 c66b5250 2006-06-25 devnull u += 2;
1420 c66b5250 2006-06-25 devnull memdraw(dst, r, l, q, memopaque, ZP, op);
1421 c66b5250 2006-06-25 devnull u -= 2*ni;
1424 c66b5250 2006-06-25 devnull while(--ni >= 0){
1425 c66b5250 2006-06-25 devnull ci = BGSHORT(u);
1426 c66b5250 2006-06-25 devnull if(ci<0 || ci>=font->nfchar){
1427 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1428 c66b5250 2006-06-25 devnull goto Eindex;
1430 c66b5250 2006-06-25 devnull q = drawchar(dst, q, src, &sp, font, ci, op);
1431 c66b5250 2006-06-25 devnull u += 2;
1433 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1434 c66b5250 2006-06-25 devnull p.y -= font->ascent;
1435 c66b5250 2006-06-25 devnull dstflush(dstid, dst, Rect(p.x, p.y, q.x, p.y+Dy(font->image->r)));
1436 c66b5250 2006-06-25 devnull continue;
1438 c66b5250 2006-06-25 devnull /* use public screen: 'S' id[4] chan[4] */
1439 c66b5250 2006-06-25 devnull case 'S':
1440 c66b5250 2006-06-25 devnull m = 1+4+4;
1441 c66b5250 2006-06-25 devnull if(n < m)
1442 c66b5250 2006-06-25 devnull goto Eshortdraw;
1443 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1444 c66b5250 2006-06-25 devnull if(dstid == 0)
1445 c66b5250 2006-06-25 devnull goto Ebadarg;
1446 c66b5250 2006-06-25 devnull dscrn = drawlookupdscreen(dstid);
1447 c66b5250 2006-06-25 devnull if(dscrn==0 || (dscrn->public==0 && dscrn->owner!=client))
1448 c66b5250 2006-06-25 devnull goto Enodrawscreen;
1449 c66b5250 2006-06-25 devnull if(dscrn->screen->image->chan != BGLONG(a+5)){
1450 c66b5250 2006-06-25 devnull err = "inconsistent chan";
1451 c66b5250 2006-06-25 devnull goto error;
1453 c66b5250 2006-06-25 devnull if(drawinstallscreen(client, dscrn, 0, 0, 0, 0) == 0)
1454 c66b5250 2006-06-25 devnull goto Edrawmem;
1455 c66b5250 2006-06-25 devnull continue;
1457 c66b5250 2006-06-25 devnull /* top or bottom windows: 't' top[1] nw[2] n*id[4] */
1458 c66b5250 2006-06-25 devnull case 't':
1459 c66b5250 2006-06-25 devnull m = 1+1+2;
1460 c66b5250 2006-06-25 devnull if(n < m)
1461 c66b5250 2006-06-25 devnull goto Eshortdraw;
1462 c66b5250 2006-06-25 devnull nw = BGSHORT(a+2);
1463 c66b5250 2006-06-25 devnull if(nw < 0)
1464 c66b5250 2006-06-25 devnull goto Ebadarg;
1465 c66b5250 2006-06-25 devnull if(nw == 0)
1466 c66b5250 2006-06-25 devnull continue;
1467 c66b5250 2006-06-25 devnull m += nw*4;
1468 c66b5250 2006-06-25 devnull if(n < m)
1469 c66b5250 2006-06-25 devnull goto Eshortdraw;
1470 c66b5250 2006-06-25 devnull lp = mallocz(nw*sizeof(Memimage*), 1);
1471 c66b5250 2006-06-25 devnull if(lp == 0)
1472 c66b5250 2006-06-25 devnull goto Enomem;
1473 c66b5250 2006-06-25 devnull for(j=0; j<nw; j++){
1474 c66b5250 2006-06-25 devnull lp[j] = drawimage(client, a+1+1+2+j*4);
1475 c66b5250 2006-06-25 devnull if(lp[j] == nil){
1476 c66b5250 2006-06-25 devnull free(lp);
1477 c66b5250 2006-06-25 devnull goto Enodrawimage;
1480 c66b5250 2006-06-25 devnull if(lp[0]->layer == 0){
1481 c66b5250 2006-06-25 devnull err = "images are not windows";
1482 c66b5250 2006-06-25 devnull free(lp);
1483 c66b5250 2006-06-25 devnull goto error;
1485 c66b5250 2006-06-25 devnull for(j=1; j<nw; j++)
1486 c66b5250 2006-06-25 devnull if(lp[j]->layer->screen != lp[0]->layer->screen){
1487 c66b5250 2006-06-25 devnull err = "images not on same screen";
1488 c66b5250 2006-06-25 devnull free(lp);
1489 c66b5250 2006-06-25 devnull goto error;
1491 c66b5250 2006-06-25 devnull if(a[1])
1492 c66b5250 2006-06-25 devnull memltofrontn(lp, nw);
1494 c66b5250 2006-06-25 devnull memltorearn(lp, nw);
1495 c66b5250 2006-06-25 devnull if(lp[0]->layer->screen->image->data == screenimage->data)
1496 c66b5250 2006-06-25 devnull for(j=0; j<nw; j++)
1497 c66b5250 2006-06-25 devnull addflush(lp[j]->layer->screenr);
1498 c66b5250 2006-06-25 devnull free(lp);
1499 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1+1+2), 1);
1500 c66b5250 2006-06-25 devnull drawrefreshscreen(ll, client);
1501 c66b5250 2006-06-25 devnull continue;
1503 c66b5250 2006-06-25 devnull /* visible: 'v' */
1504 c66b5250 2006-06-25 devnull case 'v':
1506 c66b5250 2006-06-25 devnull drawflush();
1507 c66b5250 2006-06-25 devnull continue;
1509 c66b5250 2006-06-25 devnull /* write: 'y' id[4] R[4*4] data[x*1] */
1510 c66b5250 2006-06-25 devnull /* write from compressed data: 'Y' id[4] R[4*4] data[x*1] */
1511 c66b5250 2006-06-25 devnull case 'y':
1512 c66b5250 2006-06-25 devnull case 'Y':
1513 c66b5250 2006-06-25 devnull m = 1+4+4*4;
1514 c66b5250 2006-06-25 devnull if(n < m)
1515 c66b5250 2006-06-25 devnull goto Eshortdraw;
1516 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1517 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1518 c66b5250 2006-06-25 devnull if(!dst)
1519 c66b5250 2006-06-25 devnull goto Enodrawimage;
1520 c66b5250 2006-06-25 devnull drawrectangle(&r, a+5);
1521 c66b5250 2006-06-25 devnull if(!rectinrect(r, dst->r))
1522 c66b5250 2006-06-25 devnull goto Ewriteoutside;
1523 c66b5250 2006-06-25 devnull y = memload(dst, r, a+m, n-m, *a=='Y');
1524 c66b5250 2006-06-25 devnull if(y < 0){
1525 c66b5250 2006-06-25 devnull err = "bad writeimage call";
1526 c66b5250 2006-06-25 devnull goto error;
1528 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
1529 c66b5250 2006-06-25 devnull m += y;
1530 c66b5250 2006-06-25 devnull continue;
1533 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
1534 c66b5250 2006-06-25 devnull return oldn - n;
1536 c66b5250 2006-06-25 devnull Enodrawimage:
1537 c66b5250 2006-06-25 devnull err = "unknown id for draw image";
1538 c66b5250 2006-06-25 devnull goto error;
1539 c66b5250 2006-06-25 devnull Enodrawscreen:
1540 c66b5250 2006-06-25 devnull err = "unknown id for draw screen";
1541 c66b5250 2006-06-25 devnull goto error;
1542 c66b5250 2006-06-25 devnull Eshortdraw:
1543 c66b5250 2006-06-25 devnull err = "short draw message";
1544 c66b5250 2006-06-25 devnull goto error;
1546 c66b5250 2006-06-25 devnull Eshortread:
1547 c66b5250 2006-06-25 devnull err = "draw read too short";
1548 c66b5250 2006-06-25 devnull goto error;
1550 c66b5250 2006-06-25 devnull Eimageexists:
1551 c66b5250 2006-06-25 devnull err = "image id in use";
1552 c66b5250 2006-06-25 devnull goto error;
1553 c66b5250 2006-06-25 devnull Escreenexists:
1554 c66b5250 2006-06-25 devnull err = "screen id in use";
1555 c66b5250 2006-06-25 devnull goto error;
1556 c66b5250 2006-06-25 devnull Edrawmem:
1557 c66b5250 2006-06-25 devnull err = "image memory allocation failed";
1558 c66b5250 2006-06-25 devnull goto error;
1559 c66b5250 2006-06-25 devnull Ereadoutside:
1560 c66b5250 2006-06-25 devnull err = "readimage outside image";
1561 c66b5250 2006-06-25 devnull goto error;
1562 c66b5250 2006-06-25 devnull Ewriteoutside:
1563 c66b5250 2006-06-25 devnull err = "writeimage outside image";
1564 c66b5250 2006-06-25 devnull goto error;
1565 c66b5250 2006-06-25 devnull Enotfont:
1566 c66b5250 2006-06-25 devnull err = "image not a font";
1567 c66b5250 2006-06-25 devnull goto error;
1568 c66b5250 2006-06-25 devnull Eindex:
1569 c66b5250 2006-06-25 devnull err = "character index out of range";
1570 c66b5250 2006-06-25 devnull goto error;
1572 c66b5250 2006-06-25 devnull Enoclient:
1573 c66b5250 2006-06-25 devnull err = "no such draw client";
1574 c66b5250 2006-06-25 devnull goto error;
1575 c66b5250 2006-06-25 devnull Edepth:
1576 c66b5250 2006-06-25 devnull err = "image has bad depth";
1577 c66b5250 2006-06-25 devnull goto error;
1578 c66b5250 2006-06-25 devnull Enameused:
1579 c66b5250 2006-06-25 devnull err = "image name in use";
1580 c66b5250 2006-06-25 devnull goto error;
1582 c66b5250 2006-06-25 devnull Enoname:
1583 c66b5250 2006-06-25 devnull err = "no image with that name";
1584 c66b5250 2006-06-25 devnull goto error;
1585 c66b5250 2006-06-25 devnull Eoldname:
1586 c66b5250 2006-06-25 devnull err = "named image no longer valid";
1587 c66b5250 2006-06-25 devnull goto error;
1588 c66b5250 2006-06-25 devnull Enamed:
1589 c66b5250 2006-06-25 devnull err = "image already has name";
1590 c66b5250 2006-06-25 devnull goto error;
1591 c66b5250 2006-06-25 devnull Ewrongname:
1592 c66b5250 2006-06-25 devnull err = "wrong name for image";
1593 c66b5250 2006-06-25 devnull goto error;
1594 c66b5250 2006-06-25 devnull Enomem:
1595 c66b5250 2006-06-25 devnull err = "out of memory";
1596 c66b5250 2006-06-25 devnull goto error;
1597 c66b5250 2006-06-25 devnull Ebadarg:
1598 c66b5250 2006-06-25 devnull err = "bad argument in draw message";
1599 c66b5250 2006-06-25 devnull goto error;
1602 c66b5250 2006-06-25 devnull werrstr("%s", err);
1603 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
1604 c66b5250 2006-06-25 devnull return -1;
