Blame


1 c66b5250 2006-06-25 devnull /*
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.
4 c66b5250 2006-06-25 devnull */
5 c66b5250 2006-06-25 devnull
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"
12 c66b5250 2006-06-25 devnull
13 c66b5250 2006-06-25 devnull extern void _flushmemscreen(Rectangle);
14 55905845 2012-11-26 rsc int forcedpi = 0;
15 d0e07019 2012-11-26 rsc int displaydpi = 100;
16 c66b5250 2006-06-25 devnull
17 c66b5250 2006-06-25 devnull #define NHASH (1<<5)
18 c66b5250 2006-06-25 devnull #define HASHMASK (NHASH-1)
19 c66b5250 2006-06-25 devnull
20 c66b5250 2006-06-25 devnull typedef struct Client Client;
21 c66b5250 2006-06-25 devnull typedef struct Draw Draw;
22 c66b5250 2006-06-25 devnull typedef struct DImage DImage;
23 c66b5250 2006-06-25 devnull typedef struct DScreen DScreen;
24 c66b5250 2006-06-25 devnull typedef struct CScreen CScreen;
25 c66b5250 2006-06-25 devnull typedef struct FChar FChar;
26 c66b5250 2006-06-25 devnull typedef struct Refresh Refresh;
27 c66b5250 2006-06-25 devnull typedef struct Refx Refx;
28 c66b5250 2006-06-25 devnull typedef struct DName DName;
29 c66b5250 2006-06-25 devnull
30 c66b5250 2006-06-25 devnull struct Draw
31 c66b5250 2006-06-25 devnull {
32 c66b5250 2006-06-25 devnull QLock lk;
33 c66b5250 2006-06-25 devnull int clientid;
34 c66b5250 2006-06-25 devnull int nclient;
35 c66b5250 2006-06-25 devnull Client* client[1];
36 c66b5250 2006-06-25 devnull int nname;
37 c66b5250 2006-06-25 devnull DName* name;
38 c66b5250 2006-06-25 devnull int vers;
39 c66b5250 2006-06-25 devnull int softscreen;
40 c66b5250 2006-06-25 devnull };
41 c66b5250 2006-06-25 devnull
42 c66b5250 2006-06-25 devnull struct Client
43 c66b5250 2006-06-25 devnull {
44 c66b5250 2006-06-25 devnull /*Ref r;*/
45 c66b5250 2006-06-25 devnull DImage* dimage[NHASH];
46 c66b5250 2006-06-25 devnull CScreen* cscreen;
47 c66b5250 2006-06-25 devnull Refresh* refresh;
48 c66b5250 2006-06-25 devnull Rendez refrend;
49 c66b5250 2006-06-25 devnull uchar* readdata;
50 c66b5250 2006-06-25 devnull int nreaddata;
51 c66b5250 2006-06-25 devnull int busy;
52 c66b5250 2006-06-25 devnull int clientid;
53 c66b5250 2006-06-25 devnull int slot;
54 c66b5250 2006-06-25 devnull int refreshme;
55 c66b5250 2006-06-25 devnull int infoid;
56 c66b5250 2006-06-25 devnull int op;
57 c66b5250 2006-06-25 devnull };
58 c66b5250 2006-06-25 devnull
59 c66b5250 2006-06-25 devnull struct Refresh
60 c66b5250 2006-06-25 devnull {
61 c66b5250 2006-06-25 devnull DImage* dimage;
62 c66b5250 2006-06-25 devnull Rectangle r;
63 c66b5250 2006-06-25 devnull Refresh* next;
64 c66b5250 2006-06-25 devnull };
65 c66b5250 2006-06-25 devnull
66 c66b5250 2006-06-25 devnull struct Refx
67 c66b5250 2006-06-25 devnull {
68 c66b5250 2006-06-25 devnull Client* client;
69 c66b5250 2006-06-25 devnull DImage* dimage;
70 c66b5250 2006-06-25 devnull };
71 c66b5250 2006-06-25 devnull
72 c66b5250 2006-06-25 devnull struct DName
73 c66b5250 2006-06-25 devnull {
74 c66b5250 2006-06-25 devnull char *name;
75 c66b5250 2006-06-25 devnull Client *client;
76 c66b5250 2006-06-25 devnull DImage* dimage;
77 c66b5250 2006-06-25 devnull int vers;
78 c66b5250 2006-06-25 devnull };
79 c66b5250 2006-06-25 devnull
80 c66b5250 2006-06-25 devnull struct FChar
81 c66b5250 2006-06-25 devnull {
82 c66b5250 2006-06-25 devnull int minx; /* left edge of bits */
83 c66b5250 2006-06-25 devnull int maxx; /* right edge of bits */
84 c66b5250 2006-06-25 devnull uchar miny; /* first non-zero scan-line */
85 c66b5250 2006-06-25 devnull uchar maxy; /* last non-zero scan-line + 1 */
86 c66b5250 2006-06-25 devnull schar left; /* offset of baseline */
87 c66b5250 2006-06-25 devnull uchar width; /* width of baseline */
88 c66b5250 2006-06-25 devnull };
89 c66b5250 2006-06-25 devnull
90 c66b5250 2006-06-25 devnull /*
91 c66b5250 2006-06-25 devnull * Reference counts in DImages:
92 c66b5250 2006-06-25 devnull * one per open by original client
93 c66b5250 2006-06-25 devnull * one per screen image or fill
94 c66b5250 2006-06-25 devnull * one per image derived from this one by name
95 c66b5250 2006-06-25 devnull */
96 c66b5250 2006-06-25 devnull struct DImage
97 c66b5250 2006-06-25 devnull {
98 c66b5250 2006-06-25 devnull int id;
99 c66b5250 2006-06-25 devnull int ref;
100 c66b5250 2006-06-25 devnull char *name;
101 c66b5250 2006-06-25 devnull int vers;
102 c66b5250 2006-06-25 devnull Memimage* image;
103 c66b5250 2006-06-25 devnull int ascent;
104 c66b5250 2006-06-25 devnull int nfchar;
105 c66b5250 2006-06-25 devnull FChar* fchar;
106 c66b5250 2006-06-25 devnull DScreen* dscreen; /* 0 if not a window */
107 c66b5250 2006-06-25 devnull DImage* fromname; /* image this one is derived from, by name */
108 c66b5250 2006-06-25 devnull DImage* next;
109 c66b5250 2006-06-25 devnull };
110 c66b5250 2006-06-25 devnull
111 c66b5250 2006-06-25 devnull struct CScreen
112 c66b5250 2006-06-25 devnull {
113 c66b5250 2006-06-25 devnull DScreen* dscreen;
114 c66b5250 2006-06-25 devnull CScreen* next;
115 c66b5250 2006-06-25 devnull };
116 c66b5250 2006-06-25 devnull
117 c66b5250 2006-06-25 devnull struct DScreen
118 c66b5250 2006-06-25 devnull {
119 c66b5250 2006-06-25 devnull int id;
120 c66b5250 2006-06-25 devnull int public;
121 c66b5250 2006-06-25 devnull int ref;
122 c66b5250 2006-06-25 devnull DImage *dimage;
123 c66b5250 2006-06-25 devnull DImage *dfill;
124 c66b5250 2006-06-25 devnull Memscreen* screen;
125 c66b5250 2006-06-25 devnull Client* owner;
126 c66b5250 2006-06-25 devnull DScreen* next;
127 c66b5250 2006-06-25 devnull };
128 c66b5250 2006-06-25 devnull
129 c66b5250 2006-06-25 devnull static Draw sdraw;
130 c66b5250 2006-06-25 devnull static Client *client0;
131 c66b5250 2006-06-25 devnull static Memimage *screenimage;
132 c66b5250 2006-06-25 devnull static Rectangle flushrect;
133 c66b5250 2006-06-25 devnull static int waste;
134 c66b5250 2006-06-25 devnull static DScreen* dscreen;
135 c66b5250 2006-06-25 devnull static int drawuninstall(Client*, int);
136 c66b5250 2006-06-25 devnull static Memimage* drawinstall(Client*, int, Memimage*, DScreen*);
137 c66b5250 2006-06-25 devnull static void drawfreedimage(DImage*);
138 c66b5250 2006-06-25 devnull
139 c66b5250 2006-06-25 devnull void
140 c66b5250 2006-06-25 devnull _initdisplaymemimage(Memimage *m)
141 c66b5250 2006-06-25 devnull {
142 c66b5250 2006-06-25 devnull screenimage = m;
143 c66b5250 2006-06-25 devnull m->screenref = 1;
144 c66b5250 2006-06-25 devnull client0 = mallocz(sizeof(Client), 1);
145 c66b5250 2006-06-25 devnull if(client0 == nil){
146 c66b5250 2006-06-25 devnull fprint(2, "initdraw: allocating client0: out of memory");
147 c66b5250 2006-06-25 devnull abort();
148 c66b5250 2006-06-25 devnull }
149 c66b5250 2006-06-25 devnull client0->slot = 0;
150 c66b5250 2006-06-25 devnull client0->clientid = ++sdraw.clientid;
151 c66b5250 2006-06-25 devnull client0->op = SoverD;
152 c66b5250 2006-06-25 devnull sdraw.client[0] = client0;
153 c66b5250 2006-06-25 devnull sdraw.nclient = 1;
154 c66b5250 2006-06-25 devnull sdraw.softscreen = 1;
155 c66b5250 2006-06-25 devnull }
156 c66b5250 2006-06-25 devnull
157 c66b5250 2006-06-25 devnull void
158 c66b5250 2006-06-25 devnull _drawreplacescreenimage(Memimage *m)
159 c66b5250 2006-06-25 devnull {
160 c66b5250 2006-06-25 devnull /*
161 c66b5250 2006-06-25 devnull * Replace the screen image because the screen
162 c66b5250 2006-06-25 devnull * was resized.
163 c66b5250 2006-06-25 devnull *
164 c66b5250 2006-06-25 devnull * In theory there should only be one reference
165 c66b5250 2006-06-25 devnull * to the current screen image, and that's through
166 c66b5250 2006-06-25 devnull * client0's image 0, installed a few lines above.
167 c66b5250 2006-06-25 devnull * Once the client drops the image, the underlying backing
168 c66b5250 2006-06-25 devnull * store freed properly. The client is being notified
169 c66b5250 2006-06-25 devnull * about the resize through external means, so all we
170 c66b5250 2006-06-25 devnull * need to do is this assignment.
171 c66b5250 2006-06-25 devnull */
172 c66b5250 2006-06-25 devnull Memimage *om;
173 c66b5250 2006-06-25 devnull
174 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
175 c66b5250 2006-06-25 devnull om = screenimage;
176 c66b5250 2006-06-25 devnull screenimage = m;
177 c66b5250 2006-06-25 devnull m->screenref = 1;
178 c66b5250 2006-06-25 devnull if(om && --om->screenref == 0){
179 c66b5250 2006-06-25 devnull _freememimage(om);
180 c66b5250 2006-06-25 devnull }
181 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
182 c66b5250 2006-06-25 devnull }
183 c66b5250 2006-06-25 devnull
184 c66b5250 2006-06-25 devnull static
185 c66b5250 2006-06-25 devnull void
186 c66b5250 2006-06-25 devnull drawrefreshscreen(DImage *l, Client *client)
187 c66b5250 2006-06-25 devnull {
188 c66b5250 2006-06-25 devnull while(l != nil && l->dscreen == nil)
189 c66b5250 2006-06-25 devnull l = l->fromname;
190 c66b5250 2006-06-25 devnull if(l != nil && l->dscreen->owner != client)
191 c66b5250 2006-06-25 devnull l->dscreen->owner->refreshme = 1;
192 c66b5250 2006-06-25 devnull }
193 c66b5250 2006-06-25 devnull
194 c66b5250 2006-06-25 devnull static
195 c66b5250 2006-06-25 devnull void
196 c66b5250 2006-06-25 devnull drawrefresh(Memimage *m, Rectangle r, void *v)
197 c66b5250 2006-06-25 devnull {
198 c66b5250 2006-06-25 devnull Refx *x;
199 c66b5250 2006-06-25 devnull DImage *d;
200 c66b5250 2006-06-25 devnull Client *c;
201 c66b5250 2006-06-25 devnull Refresh *ref;
202 c66b5250 2006-06-25 devnull
203 c66b5250 2006-06-25 devnull USED(m);
204 c66b5250 2006-06-25 devnull
205 c66b5250 2006-06-25 devnull if(v == 0)
206 c66b5250 2006-06-25 devnull return;
207 c66b5250 2006-06-25 devnull x = v;
208 c66b5250 2006-06-25 devnull c = x->client;
209 c66b5250 2006-06-25 devnull d = x->dimage;
210 c66b5250 2006-06-25 devnull for(ref=c->refresh; ref; ref=ref->next)
211 c66b5250 2006-06-25 devnull if(ref->dimage == d){
212 c66b5250 2006-06-25 devnull combinerect(&ref->r, r);
213 c66b5250 2006-06-25 devnull return;
214 c66b5250 2006-06-25 devnull }
215 c66b5250 2006-06-25 devnull ref = mallocz(sizeof(Refresh), 1);
216 c66b5250 2006-06-25 devnull if(ref){
217 c66b5250 2006-06-25 devnull ref->dimage = d;
218 c66b5250 2006-06-25 devnull ref->r = r;
219 c66b5250 2006-06-25 devnull ref->next = c->refresh;
220 c66b5250 2006-06-25 devnull c->refresh = ref;
221 c66b5250 2006-06-25 devnull }
222 c66b5250 2006-06-25 devnull }
223 c66b5250 2006-06-25 devnull
224 c66b5250 2006-06-25 devnull static void
225 c66b5250 2006-06-25 devnull addflush(Rectangle r)
226 c66b5250 2006-06-25 devnull {
227 c66b5250 2006-06-25 devnull int abb, ar, anbb;
228 c66b5250 2006-06-25 devnull Rectangle nbb;
229 c66b5250 2006-06-25 devnull
230 c66b5250 2006-06-25 devnull if(sdraw.softscreen==0 || !rectclip(&r, screenimage->r))
231 c66b5250 2006-06-25 devnull return;
232 c66b5250 2006-06-25 devnull
233 c66b5250 2006-06-25 devnull if(flushrect.min.x >= flushrect.max.x){
234 c66b5250 2006-06-25 devnull flushrect = r;
235 c66b5250 2006-06-25 devnull waste = 0;
236 c66b5250 2006-06-25 devnull return;
237 c66b5250 2006-06-25 devnull }
238 c66b5250 2006-06-25 devnull nbb = flushrect;
239 c66b5250 2006-06-25 devnull combinerect(&nbb, r);
240 c66b5250 2006-06-25 devnull ar = Dx(r)*Dy(r);
241 c66b5250 2006-06-25 devnull abb = Dx(flushrect)*Dy(flushrect);
242 c66b5250 2006-06-25 devnull anbb = Dx(nbb)*Dy(nbb);
243 c66b5250 2006-06-25 devnull /*
244 c66b5250 2006-06-25 devnull * Area of new waste is area of new bb minus area of old bb,
245 c66b5250 2006-06-25 devnull * less the area of the new segment, which we assume is not waste.
246 c66b5250 2006-06-25 devnull * This could be negative, but that's OK.
247 c66b5250 2006-06-25 devnull */
248 c66b5250 2006-06-25 devnull waste += anbb-abb - ar;
249 c66b5250 2006-06-25 devnull if(waste < 0)
250 c66b5250 2006-06-25 devnull waste = 0;
251 c66b5250 2006-06-25 devnull /*
252 c66b5250 2006-06-25 devnull * absorb if:
253 c66b5250 2006-06-25 devnull * total area is small
254 c66b5250 2006-06-25 devnull * waste is less than half total area
255 c66b5250 2006-06-25 devnull * rectangles touch
256 c66b5250 2006-06-25 devnull */
257 c66b5250 2006-06-25 devnull if(anbb<=1024 || waste*2<anbb || rectXrect(flushrect, r)){
258 c66b5250 2006-06-25 devnull flushrect = nbb;
259 c66b5250 2006-06-25 devnull return;
260 c66b5250 2006-06-25 devnull }
261 c66b5250 2006-06-25 devnull /* emit current state */
262 c66b5250 2006-06-25 devnull if(flushrect.min.x < flushrect.max.x)
263 c66b5250 2006-06-25 devnull _flushmemscreen(flushrect);
264 c66b5250 2006-06-25 devnull flushrect = r;
265 c66b5250 2006-06-25 devnull waste = 0;
266 c66b5250 2006-06-25 devnull }
267 c66b5250 2006-06-25 devnull
268 c66b5250 2006-06-25 devnull static
269 c66b5250 2006-06-25 devnull void
270 c66b5250 2006-06-25 devnull dstflush(int dstid, Memimage *dst, Rectangle r)
271 c66b5250 2006-06-25 devnull {
272 c66b5250 2006-06-25 devnull Memlayer *l;
273 c66b5250 2006-06-25 devnull
274 c66b5250 2006-06-25 devnull if(dstid == 0){
275 c66b5250 2006-06-25 devnull combinerect(&flushrect, r);
276 c66b5250 2006-06-25 devnull return;
277 c66b5250 2006-06-25 devnull }
278 c66b5250 2006-06-25 devnull /* how can this happen? -rsc, dec 12 2002 */
279 c66b5250 2006-06-25 devnull if(dst == 0){
280 2bdefab1 2006-07-05 devnull fprint(2, "nil dstflush\n");
281 c66b5250 2006-06-25 devnull return;
282 c66b5250 2006-06-25 devnull }
283 c66b5250 2006-06-25 devnull l = dst->layer;
284 c66b5250 2006-06-25 devnull if(l == nil)
285 c66b5250 2006-06-25 devnull return;
286 c66b5250 2006-06-25 devnull do{
287 c66b5250 2006-06-25 devnull if(l->screen->image->data != screenimage->data)
288 c66b5250 2006-06-25 devnull return;
289 c66b5250 2006-06-25 devnull r = rectaddpt(r, l->delta);
290 c66b5250 2006-06-25 devnull l = l->screen->image->layer;
291 c66b5250 2006-06-25 devnull }while(l);
292 c66b5250 2006-06-25 devnull addflush(r);
293 c66b5250 2006-06-25 devnull }
294 c66b5250 2006-06-25 devnull
295 c66b5250 2006-06-25 devnull static
296 c66b5250 2006-06-25 devnull void
297 c66b5250 2006-06-25 devnull drawflush(void)
298 c66b5250 2006-06-25 devnull {
299 9142d362 2008-06-30 rsc if(flushrect.min.x < flushrect.max.x)
300 9142d362 2008-06-30 rsc _flushmemscreen(flushrect);
301 c66b5250 2006-06-25 devnull flushrect = Rect(10000, 10000, -10000, -10000);
302 c66b5250 2006-06-25 devnull }
303 c66b5250 2006-06-25 devnull
304 c66b5250 2006-06-25 devnull static
305 c66b5250 2006-06-25 devnull int
306 c66b5250 2006-06-25 devnull drawcmp(char *a, char *b, int n)
307 c66b5250 2006-06-25 devnull {
308 c66b5250 2006-06-25 devnull if(strlen(a) != n)
309 c66b5250 2006-06-25 devnull return 1;
310 c66b5250 2006-06-25 devnull return memcmp(a, b, n);
311 c66b5250 2006-06-25 devnull }
312 c66b5250 2006-06-25 devnull
313 c66b5250 2006-06-25 devnull static
314 c66b5250 2006-06-25 devnull DName*
315 c66b5250 2006-06-25 devnull drawlookupname(int n, char *str)
316 c66b5250 2006-06-25 devnull {
317 c66b5250 2006-06-25 devnull DName *name, *ename;
318 c66b5250 2006-06-25 devnull
319 c66b5250 2006-06-25 devnull name = sdraw.name;
320 c66b5250 2006-06-25 devnull ename = &name[sdraw.nname];
321 c66b5250 2006-06-25 devnull for(; name<ename; name++)
322 c66b5250 2006-06-25 devnull if(drawcmp(name->name, str, n) == 0)
323 c66b5250 2006-06-25 devnull return name;
324 c66b5250 2006-06-25 devnull return 0;
325 c66b5250 2006-06-25 devnull }
326 c66b5250 2006-06-25 devnull
327 c66b5250 2006-06-25 devnull static
328 c66b5250 2006-06-25 devnull int
329 c66b5250 2006-06-25 devnull drawgoodname(DImage *d)
330 c66b5250 2006-06-25 devnull {
331 c66b5250 2006-06-25 devnull DName *n;
332 c66b5250 2006-06-25 devnull
333 c66b5250 2006-06-25 devnull /* if window, validate the screen's own images */
334 c66b5250 2006-06-25 devnull if(d->dscreen)
335 c66b5250 2006-06-25 devnull if(drawgoodname(d->dscreen->dimage) == 0
336 c66b5250 2006-06-25 devnull || drawgoodname(d->dscreen->dfill) == 0)
337 c66b5250 2006-06-25 devnull return 0;
338 c66b5250 2006-06-25 devnull if(d->name == nil)
339 c66b5250 2006-06-25 devnull return 1;
340 c66b5250 2006-06-25 devnull n = drawlookupname(strlen(d->name), d->name);
341 c66b5250 2006-06-25 devnull if(n==nil || n->vers!=d->vers)
342 c66b5250 2006-06-25 devnull return 0;
343 c66b5250 2006-06-25 devnull return 1;
344 c66b5250 2006-06-25 devnull }
345 c66b5250 2006-06-25 devnull
346 c66b5250 2006-06-25 devnull static
347 c66b5250 2006-06-25 devnull DImage*
348 c66b5250 2006-06-25 devnull drawlookup(Client *client, int id, int checkname)
349 c66b5250 2006-06-25 devnull {
350 c66b5250 2006-06-25 devnull DImage *d;
351 c66b5250 2006-06-25 devnull
352 c66b5250 2006-06-25 devnull d = client->dimage[id&HASHMASK];
353 c66b5250 2006-06-25 devnull while(d){
354 c66b5250 2006-06-25 devnull if(d->id == id){
355 c66b5250 2006-06-25 devnull /*
356 c66b5250 2006-06-25 devnull * BUG: should error out but too hard.
357 c66b5250 2006-06-25 devnull * Return 0 instead.
358 c66b5250 2006-06-25 devnull */
359 c66b5250 2006-06-25 devnull if(checkname && !drawgoodname(d))
360 c66b5250 2006-06-25 devnull return 0;
361 c66b5250 2006-06-25 devnull return d;
362 c66b5250 2006-06-25 devnull }
363 c66b5250 2006-06-25 devnull d = d->next;
364 c66b5250 2006-06-25 devnull }
365 c66b5250 2006-06-25 devnull return 0;
366 c66b5250 2006-06-25 devnull }
367 c66b5250 2006-06-25 devnull
368 c66b5250 2006-06-25 devnull static
369 c66b5250 2006-06-25 devnull DScreen*
370 c66b5250 2006-06-25 devnull drawlookupdscreen(int id)
371 c66b5250 2006-06-25 devnull {
372 c66b5250 2006-06-25 devnull DScreen *s;
373 c66b5250 2006-06-25 devnull
374 c66b5250 2006-06-25 devnull s = dscreen;
375 c66b5250 2006-06-25 devnull while(s){
376 c66b5250 2006-06-25 devnull if(s->id == id)
377 c66b5250 2006-06-25 devnull return s;
378 c66b5250 2006-06-25 devnull s = s->next;
379 c66b5250 2006-06-25 devnull }
380 c66b5250 2006-06-25 devnull return 0;
381 c66b5250 2006-06-25 devnull }
382 c66b5250 2006-06-25 devnull
383 c66b5250 2006-06-25 devnull static
384 c66b5250 2006-06-25 devnull DScreen*
385 c66b5250 2006-06-25 devnull drawlookupscreen(Client *client, int id, CScreen **cs)
386 c66b5250 2006-06-25 devnull {
387 c66b5250 2006-06-25 devnull CScreen *s;
388 c66b5250 2006-06-25 devnull
389 c66b5250 2006-06-25 devnull s = client->cscreen;
390 c66b5250 2006-06-25 devnull while(s){
391 c66b5250 2006-06-25 devnull if(s->dscreen->id == id){
392 c66b5250 2006-06-25 devnull *cs = s;
393 c66b5250 2006-06-25 devnull return s->dscreen;
394 c66b5250 2006-06-25 devnull }
395 c66b5250 2006-06-25 devnull s = s->next;
396 c66b5250 2006-06-25 devnull }
397 c66b5250 2006-06-25 devnull /* caller must check! */
398 c66b5250 2006-06-25 devnull return 0;
399 c66b5250 2006-06-25 devnull }
400 c66b5250 2006-06-25 devnull
401 c66b5250 2006-06-25 devnull static
402 c66b5250 2006-06-25 devnull Memimage*
403 c66b5250 2006-06-25 devnull drawinstall(Client *client, int id, Memimage *i, DScreen *dscreen)
404 c66b5250 2006-06-25 devnull {
405 c66b5250 2006-06-25 devnull DImage *d;
406 c66b5250 2006-06-25 devnull
407 c66b5250 2006-06-25 devnull d = mallocz(sizeof(DImage), 1);
408 c66b5250 2006-06-25 devnull if(d == 0)
409 c66b5250 2006-06-25 devnull return 0;
410 c66b5250 2006-06-25 devnull d->id = id;
411 c66b5250 2006-06-25 devnull d->ref = 1;
412 c66b5250 2006-06-25 devnull d->name = 0;
413 c66b5250 2006-06-25 devnull d->vers = 0;
414 c66b5250 2006-06-25 devnull d->image = i;
415 c66b5250 2006-06-25 devnull if(i->screenref)
416 c66b5250 2006-06-25 devnull ++i->screenref;
417 c66b5250 2006-06-25 devnull d->nfchar = 0;
418 c66b5250 2006-06-25 devnull d->fchar = 0;
419 c66b5250 2006-06-25 devnull d->fromname = 0;
420 c66b5250 2006-06-25 devnull d->dscreen = dscreen;
421 c66b5250 2006-06-25 devnull d->next = client->dimage[id&HASHMASK];
422 c66b5250 2006-06-25 devnull client->dimage[id&HASHMASK] = d;
423 c66b5250 2006-06-25 devnull return i;
424 c66b5250 2006-06-25 devnull }
425 c66b5250 2006-06-25 devnull
426 c66b5250 2006-06-25 devnull static
427 c66b5250 2006-06-25 devnull Memscreen*
428 c66b5250 2006-06-25 devnull drawinstallscreen(Client *client, DScreen *d, int id, DImage *dimage, DImage *dfill, int public)
429 c66b5250 2006-06-25 devnull {
430 c66b5250 2006-06-25 devnull Memscreen *s;
431 c66b5250 2006-06-25 devnull CScreen *c;
432 c66b5250 2006-06-25 devnull
433 c66b5250 2006-06-25 devnull c = mallocz(sizeof(CScreen), 1);
434 c66b5250 2006-06-25 devnull if(dimage && dimage->image && dimage->image->chan == 0){
435 2bdefab1 2006-07-05 devnull fprint(2, "bad image %p in drawinstallscreen", dimage->image);
436 c66b5250 2006-06-25 devnull abort();
437 c66b5250 2006-06-25 devnull }
438 c66b5250 2006-06-25 devnull
439 c66b5250 2006-06-25 devnull if(c == 0)
440 c66b5250 2006-06-25 devnull return 0;
441 c66b5250 2006-06-25 devnull if(d == 0){
442 c66b5250 2006-06-25 devnull d = mallocz(sizeof(DScreen), 1);
443 c66b5250 2006-06-25 devnull if(d == 0){
444 c66b5250 2006-06-25 devnull free(c);
445 c66b5250 2006-06-25 devnull return 0;
446 c66b5250 2006-06-25 devnull }
447 c66b5250 2006-06-25 devnull s = mallocz(sizeof(Memscreen), 1);
448 c66b5250 2006-06-25 devnull if(s == 0){
449 c66b5250 2006-06-25 devnull free(c);
450 c66b5250 2006-06-25 devnull free(d);
451 c66b5250 2006-06-25 devnull return 0;
452 c66b5250 2006-06-25 devnull }
453 c66b5250 2006-06-25 devnull s->frontmost = 0;
454 c66b5250 2006-06-25 devnull s->rearmost = 0;
455 c66b5250 2006-06-25 devnull d->dimage = dimage;
456 c66b5250 2006-06-25 devnull if(dimage){
457 c66b5250 2006-06-25 devnull s->image = dimage->image;
458 c66b5250 2006-06-25 devnull dimage->ref++;
459 c66b5250 2006-06-25 devnull }
460 c66b5250 2006-06-25 devnull d->dfill = dfill;
461 c66b5250 2006-06-25 devnull if(dfill){
462 c66b5250 2006-06-25 devnull s->fill = dfill->image;
463 c66b5250 2006-06-25 devnull dfill->ref++;
464 c66b5250 2006-06-25 devnull }
465 c66b5250 2006-06-25 devnull d->ref = 0;
466 c66b5250 2006-06-25 devnull d->id = id;
467 c66b5250 2006-06-25 devnull d->screen = s;
468 c66b5250 2006-06-25 devnull d->public = public;
469 c66b5250 2006-06-25 devnull d->next = dscreen;
470 c66b5250 2006-06-25 devnull d->owner = client;
471 c66b5250 2006-06-25 devnull dscreen = d;
472 c66b5250 2006-06-25 devnull }
473 c66b5250 2006-06-25 devnull c->dscreen = d;
474 c66b5250 2006-06-25 devnull d->ref++;
475 c66b5250 2006-06-25 devnull c->next = client->cscreen;
476 c66b5250 2006-06-25 devnull client->cscreen = c;
477 c66b5250 2006-06-25 devnull return d->screen;
478 c66b5250 2006-06-25 devnull }
479 c66b5250 2006-06-25 devnull
480 c66b5250 2006-06-25 devnull static
481 c66b5250 2006-06-25 devnull void
482 c66b5250 2006-06-25 devnull drawdelname(DName *name)
483 c66b5250 2006-06-25 devnull {
484 c66b5250 2006-06-25 devnull int i;
485 c66b5250 2006-06-25 devnull
486 c66b5250 2006-06-25 devnull i = name-sdraw.name;
487 c66b5250 2006-06-25 devnull memmove(name, name+1, (sdraw.nname-(i+1))*sizeof(DName));
488 c66b5250 2006-06-25 devnull sdraw.nname--;
489 c66b5250 2006-06-25 devnull }
490 c66b5250 2006-06-25 devnull
491 c66b5250 2006-06-25 devnull static
492 c66b5250 2006-06-25 devnull void
493 c66b5250 2006-06-25 devnull drawfreedscreen(DScreen *this)
494 c66b5250 2006-06-25 devnull {
495 c66b5250 2006-06-25 devnull DScreen *ds, *next;
496 c66b5250 2006-06-25 devnull
497 c66b5250 2006-06-25 devnull this->ref--;
498 c66b5250 2006-06-25 devnull if(this->ref < 0)
499 2bdefab1 2006-07-05 devnull fprint(2, "negative ref in drawfreedscreen\n");
500 c66b5250 2006-06-25 devnull if(this->ref > 0)
501 c66b5250 2006-06-25 devnull return;
502 c66b5250 2006-06-25 devnull ds = dscreen;
503 c66b5250 2006-06-25 devnull if(ds == this){
504 c66b5250 2006-06-25 devnull dscreen = this->next;
505 c66b5250 2006-06-25 devnull goto Found;
506 c66b5250 2006-06-25 devnull }
507 c66b5250 2006-06-25 devnull while(next = ds->next){ /* assign = */
508 c66b5250 2006-06-25 devnull if(next == this){
509 c66b5250 2006-06-25 devnull ds->next = this->next;
510 c66b5250 2006-06-25 devnull goto Found;
511 c66b5250 2006-06-25 devnull }
512 c66b5250 2006-06-25 devnull ds = next;
513 c66b5250 2006-06-25 devnull }
514 c66b5250 2006-06-25 devnull /*
515 c66b5250 2006-06-25 devnull * Should signal Enodrawimage, but too hard.
516 c66b5250 2006-06-25 devnull */
517 c66b5250 2006-06-25 devnull return;
518 c66b5250 2006-06-25 devnull
519 c66b5250 2006-06-25 devnull Found:
520 c66b5250 2006-06-25 devnull if(this->dimage)
521 c66b5250 2006-06-25 devnull drawfreedimage(this->dimage);
522 c66b5250 2006-06-25 devnull if(this->dfill)
523 c66b5250 2006-06-25 devnull drawfreedimage(this->dfill);
524 c66b5250 2006-06-25 devnull free(this->screen);
525 c66b5250 2006-06-25 devnull free(this);
526 c66b5250 2006-06-25 devnull }
527 c66b5250 2006-06-25 devnull
528 c66b5250 2006-06-25 devnull static
529 c66b5250 2006-06-25 devnull void
530 c66b5250 2006-06-25 devnull drawfreedimage(DImage *dimage)
531 c66b5250 2006-06-25 devnull {
532 c66b5250 2006-06-25 devnull int i;
533 c66b5250 2006-06-25 devnull Memimage *l;
534 c66b5250 2006-06-25 devnull DScreen *ds;
535 c66b5250 2006-06-25 devnull
536 c66b5250 2006-06-25 devnull dimage->ref--;
537 c66b5250 2006-06-25 devnull if(dimage->ref < 0)
538 2bdefab1 2006-07-05 devnull fprint(2, "negative ref in drawfreedimage\n");
539 c66b5250 2006-06-25 devnull if(dimage->ref > 0)
540 c66b5250 2006-06-25 devnull return;
541 c66b5250 2006-06-25 devnull
542 c66b5250 2006-06-25 devnull /* any names? */
543 c66b5250 2006-06-25 devnull for(i=0; i<sdraw.nname; )
544 c66b5250 2006-06-25 devnull if(sdraw.name[i].dimage == dimage)
545 c66b5250 2006-06-25 devnull drawdelname(sdraw.name+i);
546 c66b5250 2006-06-25 devnull else
547 c66b5250 2006-06-25 devnull i++;
548 c66b5250 2006-06-25 devnull if(dimage->fromname){ /* acquired by name; owned by someone else*/
549 c66b5250 2006-06-25 devnull drawfreedimage(dimage->fromname);
550 c66b5250 2006-06-25 devnull goto Return;
551 c66b5250 2006-06-25 devnull }
552 c66b5250 2006-06-25 devnull ds = dimage->dscreen;
553 c66b5250 2006-06-25 devnull l = dimage->image;
554 c66b5250 2006-06-25 devnull dimage->dscreen = nil; /* paranoia */
555 c66b5250 2006-06-25 devnull dimage->image = nil;
556 c66b5250 2006-06-25 devnull if(ds){
557 c66b5250 2006-06-25 devnull if(l->data == screenimage->data)
558 c66b5250 2006-06-25 devnull addflush(l->layer->screenr);
559 c66b5250 2006-06-25 devnull if(l->layer->refreshfn == drawrefresh) /* else true owner will clean up */
560 c66b5250 2006-06-25 devnull free(l->layer->refreshptr);
561 c66b5250 2006-06-25 devnull l->layer->refreshptr = nil;
562 c66b5250 2006-06-25 devnull if(drawgoodname(dimage))
563 c66b5250 2006-06-25 devnull memldelete(l);
564 c66b5250 2006-06-25 devnull else
565 c66b5250 2006-06-25 devnull memlfree(l);
566 c66b5250 2006-06-25 devnull drawfreedscreen(ds);
567 c66b5250 2006-06-25 devnull }else{
568 c66b5250 2006-06-25 devnull if(l->screenref==0)
569 c66b5250 2006-06-25 devnull freememimage(l);
570 c66b5250 2006-06-25 devnull else if(--l->screenref==0)
571 c66b5250 2006-06-25 devnull _freememimage(l);
572 c66b5250 2006-06-25 devnull }
573 c66b5250 2006-06-25 devnull Return:
574 c66b5250 2006-06-25 devnull free(dimage->fchar);
575 c66b5250 2006-06-25 devnull free(dimage);
576 c66b5250 2006-06-25 devnull }
577 c66b5250 2006-06-25 devnull
578 c66b5250 2006-06-25 devnull static
579 c66b5250 2006-06-25 devnull void
580 c66b5250 2006-06-25 devnull drawuninstallscreen(Client *client, CScreen *this)
581 c66b5250 2006-06-25 devnull {
582 c66b5250 2006-06-25 devnull CScreen *cs, *next;
583 c66b5250 2006-06-25 devnull
584 c66b5250 2006-06-25 devnull cs = client->cscreen;
585 c66b5250 2006-06-25 devnull if(cs == this){
586 c66b5250 2006-06-25 devnull client->cscreen = this->next;
587 c66b5250 2006-06-25 devnull drawfreedscreen(this->dscreen);
588 c66b5250 2006-06-25 devnull free(this);
589 c66b5250 2006-06-25 devnull return;
590 c66b5250 2006-06-25 devnull }
591 c66b5250 2006-06-25 devnull while(next = cs->next){ /* assign = */
592 c66b5250 2006-06-25 devnull if(next == this){
593 c66b5250 2006-06-25 devnull cs->next = this->next;
594 c66b5250 2006-06-25 devnull drawfreedscreen(this->dscreen);
595 c66b5250 2006-06-25 devnull free(this);
596 c66b5250 2006-06-25 devnull return;
597 c66b5250 2006-06-25 devnull }
598 c66b5250 2006-06-25 devnull cs = next;
599 c66b5250 2006-06-25 devnull }
600 c66b5250 2006-06-25 devnull }
601 c66b5250 2006-06-25 devnull
602 c66b5250 2006-06-25 devnull static
603 c66b5250 2006-06-25 devnull int
604 c66b5250 2006-06-25 devnull drawuninstall(Client *client, int id)
605 c66b5250 2006-06-25 devnull {
606 c66b5250 2006-06-25 devnull DImage *d, **l;
607 c66b5250 2006-06-25 devnull
608 c66b5250 2006-06-25 devnull for(l=&client->dimage[id&HASHMASK]; (d=*l) != nil; l=&d->next){
609 c66b5250 2006-06-25 devnull if(d->id == id){
610 c66b5250 2006-06-25 devnull *l = d->next;
611 c66b5250 2006-06-25 devnull drawfreedimage(d);
612 c66b5250 2006-06-25 devnull return 0;
613 c66b5250 2006-06-25 devnull }
614 c66b5250 2006-06-25 devnull }
615 c66b5250 2006-06-25 devnull return -1;
616 c66b5250 2006-06-25 devnull }
617 c66b5250 2006-06-25 devnull
618 c66b5250 2006-06-25 devnull static
619 c66b5250 2006-06-25 devnull int
620 c66b5250 2006-06-25 devnull drawaddname(Client *client, DImage *di, int n, char *str, char **err)
621 c66b5250 2006-06-25 devnull {
622 c66b5250 2006-06-25 devnull DName *name, *ename, *new, *t;
623 c66b5250 2006-06-25 devnull char *ns;
624 c66b5250 2006-06-25 devnull
625 c66b5250 2006-06-25 devnull name = sdraw.name;
626 c66b5250 2006-06-25 devnull ename = &name[sdraw.nname];
627 c66b5250 2006-06-25 devnull for(; name<ename; name++)
628 c66b5250 2006-06-25 devnull if(drawcmp(name->name, str, n) == 0){
629 c66b5250 2006-06-25 devnull *err = "image name in use";
630 c66b5250 2006-06-25 devnull return -1;
631 c66b5250 2006-06-25 devnull }
632 c66b5250 2006-06-25 devnull t = mallocz((sdraw.nname+1)*sizeof(DName), 1);
633 c66b5250 2006-06-25 devnull ns = malloc(n+1);
634 c66b5250 2006-06-25 devnull if(t == nil || ns == nil){
635 c66b5250 2006-06-25 devnull free(t);
636 c66b5250 2006-06-25 devnull free(ns);
637 c66b5250 2006-06-25 devnull *err = "out of memory";
638 c66b5250 2006-06-25 devnull return -1;
639 c66b5250 2006-06-25 devnull }
640 c66b5250 2006-06-25 devnull memmove(t, sdraw.name, sdraw.nname*sizeof(DName));
641 c66b5250 2006-06-25 devnull free(sdraw.name);
642 c66b5250 2006-06-25 devnull sdraw.name = t;
643 c66b5250 2006-06-25 devnull new = &sdraw.name[sdraw.nname++];
644 c66b5250 2006-06-25 devnull new->name = ns;
645 c66b5250 2006-06-25 devnull memmove(new->name, str, n);
646 c66b5250 2006-06-25 devnull new->name[n] = 0;
647 c66b5250 2006-06-25 devnull new->dimage = di;
648 c66b5250 2006-06-25 devnull new->client = client;
649 c66b5250 2006-06-25 devnull new->vers = ++sdraw.vers;
650 c66b5250 2006-06-25 devnull return 0;
651 c66b5250 2006-06-25 devnull }
652 c66b5250 2006-06-25 devnull
653 c66b5250 2006-06-25 devnull static int
654 c66b5250 2006-06-25 devnull drawclientop(Client *cl)
655 c66b5250 2006-06-25 devnull {
656 c66b5250 2006-06-25 devnull int op;
657 c66b5250 2006-06-25 devnull
658 c66b5250 2006-06-25 devnull op = cl->op;
659 c66b5250 2006-06-25 devnull cl->op = SoverD;
660 c66b5250 2006-06-25 devnull return op;
661 c66b5250 2006-06-25 devnull }
662 c66b5250 2006-06-25 devnull
663 c66b5250 2006-06-25 devnull static
664 c66b5250 2006-06-25 devnull Memimage*
665 c66b5250 2006-06-25 devnull drawimage(Client *client, uchar *a)
666 c66b5250 2006-06-25 devnull {
667 c66b5250 2006-06-25 devnull DImage *d;
668 c66b5250 2006-06-25 devnull
669 c66b5250 2006-06-25 devnull d = drawlookup(client, BGLONG(a), 1);
670 c66b5250 2006-06-25 devnull if(d == nil)
671 c66b5250 2006-06-25 devnull return nil; /* caller must check! */
672 c66b5250 2006-06-25 devnull return d->image;
673 c66b5250 2006-06-25 devnull }
674 c66b5250 2006-06-25 devnull
675 c66b5250 2006-06-25 devnull static
676 c66b5250 2006-06-25 devnull void
677 c66b5250 2006-06-25 devnull drawrectangle(Rectangle *r, uchar *a)
678 c66b5250 2006-06-25 devnull {
679 c66b5250 2006-06-25 devnull r->min.x = BGLONG(a+0*4);
680 c66b5250 2006-06-25 devnull r->min.y = BGLONG(a+1*4);
681 c66b5250 2006-06-25 devnull r->max.x = BGLONG(a+2*4);
682 c66b5250 2006-06-25 devnull r->max.y = BGLONG(a+3*4);
683 c66b5250 2006-06-25 devnull }
684 c66b5250 2006-06-25 devnull
685 c66b5250 2006-06-25 devnull static
686 c66b5250 2006-06-25 devnull void
687 c66b5250 2006-06-25 devnull drawpoint(Point *p, uchar *a)
688 c66b5250 2006-06-25 devnull {
689 c66b5250 2006-06-25 devnull p->x = BGLONG(a+0*4);
690 c66b5250 2006-06-25 devnull p->y = BGLONG(a+1*4);
691 c66b5250 2006-06-25 devnull }
692 c66b5250 2006-06-25 devnull
693 c66b5250 2006-06-25 devnull static
694 c66b5250 2006-06-25 devnull Point
695 c66b5250 2006-06-25 devnull drawchar(Memimage *dst, Point p, Memimage *src, Point *sp, DImage *font, int index, int op)
696 c66b5250 2006-06-25 devnull {
697 c66b5250 2006-06-25 devnull FChar *fc;
698 c66b5250 2006-06-25 devnull Rectangle r;
699 c66b5250 2006-06-25 devnull Point sp1;
700 c66b5250 2006-06-25 devnull
701 c66b5250 2006-06-25 devnull fc = &font->fchar[index];
702 c66b5250 2006-06-25 devnull r.min.x = p.x+fc->left;
703 c66b5250 2006-06-25 devnull r.min.y = p.y-(font->ascent-fc->miny);
704 c66b5250 2006-06-25 devnull r.max.x = r.min.x+(fc->maxx-fc->minx);
705 c66b5250 2006-06-25 devnull r.max.y = r.min.y+(fc->maxy-fc->miny);
706 c66b5250 2006-06-25 devnull sp1.x = sp->x+fc->left;
707 c66b5250 2006-06-25 devnull sp1.y = sp->y+fc->miny;
708 c66b5250 2006-06-25 devnull memdraw(dst, r, src, sp1, font->image, Pt(fc->minx, fc->miny), op);
709 c66b5250 2006-06-25 devnull p.x += fc->width;
710 c66b5250 2006-06-25 devnull sp->x += fc->width;
711 c66b5250 2006-06-25 devnull return p;
712 c66b5250 2006-06-25 devnull }
713 c66b5250 2006-06-25 devnull
714 c66b5250 2006-06-25 devnull static
715 c66b5250 2006-06-25 devnull uchar*
716 c66b5250 2006-06-25 devnull drawcoord(uchar *p, uchar *maxp, int oldx, int *newx)
717 c66b5250 2006-06-25 devnull {
718 c66b5250 2006-06-25 devnull int b, x;
719 c66b5250 2006-06-25 devnull
720 c66b5250 2006-06-25 devnull if(p >= maxp)
721 c66b5250 2006-06-25 devnull return nil;
722 c66b5250 2006-06-25 devnull b = *p++;
723 c66b5250 2006-06-25 devnull x = b & 0x7F;
724 c66b5250 2006-06-25 devnull if(b & 0x80){
725 c66b5250 2006-06-25 devnull if(p+1 >= maxp)
726 c66b5250 2006-06-25 devnull return nil;
727 c66b5250 2006-06-25 devnull x |= *p++ << 7;
728 c66b5250 2006-06-25 devnull x |= *p++ << 15;
729 c66b5250 2006-06-25 devnull if(x & (1<<22))
730 310ae033 2017-01-06 rsc x |= ~0U<<23;
731 c66b5250 2006-06-25 devnull }else{
732 c66b5250 2006-06-25 devnull if(b & 0x40)
733 310ae033 2017-01-06 rsc x |= ~0U<<7;
734 c66b5250 2006-06-25 devnull x += oldx;
735 c66b5250 2006-06-25 devnull }
736 c66b5250 2006-06-25 devnull *newx = x;
737 c66b5250 2006-06-25 devnull return p;
738 c66b5250 2006-06-25 devnull }
739 c66b5250 2006-06-25 devnull
740 c66b5250 2006-06-25 devnull int
741 c66b5250 2006-06-25 devnull _drawmsgread(void *a, int n)
742 c66b5250 2006-06-25 devnull {
743 c66b5250 2006-06-25 devnull Client *cl;
744 c66b5250 2006-06-25 devnull
745 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
746 c66b5250 2006-06-25 devnull cl = client0;
747 c66b5250 2006-06-25 devnull if(cl->readdata == nil){
748 c66b5250 2006-06-25 devnull werrstr("no draw data");
749 c66b5250 2006-06-25 devnull goto err;
750 c66b5250 2006-06-25 devnull }
751 c66b5250 2006-06-25 devnull if(n < cl->nreaddata){
752 c66b5250 2006-06-25 devnull werrstr("short read");
753 c66b5250 2006-06-25 devnull goto err;
754 c66b5250 2006-06-25 devnull }
755 c66b5250 2006-06-25 devnull n = cl->nreaddata;
756 c66b5250 2006-06-25 devnull memmove(a, cl->readdata, cl->nreaddata);
757 c66b5250 2006-06-25 devnull free(cl->readdata);
758 c66b5250 2006-06-25 devnull cl->readdata = nil;
759 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
760 c66b5250 2006-06-25 devnull return n;
761 c66b5250 2006-06-25 devnull
762 c66b5250 2006-06-25 devnull err:
763 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
764 c66b5250 2006-06-25 devnull return -1;
765 c66b5250 2006-06-25 devnull }
766 c66b5250 2006-06-25 devnull
767 c66b5250 2006-06-25 devnull int
768 c66b5250 2006-06-25 devnull _drawmsgwrite(void *v, int n)
769 c66b5250 2006-06-25 devnull {
770 c66b5250 2006-06-25 devnull char cbuf[40], *err, ibuf[12*12+1], *s;
771 c66b5250 2006-06-25 devnull int c, ci, doflush, dstid, e0, e1, esize, j, m;
772 c66b5250 2006-06-25 devnull int ni, nw, oesize, oldn, op, ox, oy, repl, scrnid, y;
773 c66b5250 2006-06-25 devnull uchar *a, refresh, *u;
774 c66b5250 2006-06-25 devnull u32int chan, value;
775 c66b5250 2006-06-25 devnull Client *client;
776 c66b5250 2006-06-25 devnull CScreen *cs;
777 c66b5250 2006-06-25 devnull DImage *di, *ddst, *dsrc, *font, *ll;
778 c66b5250 2006-06-25 devnull DName *dn;
779 c66b5250 2006-06-25 devnull DScreen *dscrn;
780 c66b5250 2006-06-25 devnull FChar *fc;
781 d0e07019 2012-11-26 rsc Fmt fmt;
782 c66b5250 2006-06-25 devnull Memimage *dst, *i, *l, **lp, *mask, *src;
783 c66b5250 2006-06-25 devnull Memscreen *scrn;
784 c66b5250 2006-06-25 devnull Point p, *pp, q, sp;
785 c66b5250 2006-06-25 devnull Rectangle clipr, r;
786 c66b5250 2006-06-25 devnull Refreshfn reffn;
787 c66b5250 2006-06-25 devnull Refx *refx;
788 c66b5250 2006-06-25 devnull
789 c66b5250 2006-06-25 devnull qlock(&sdraw.lk);
790 c66b5250 2006-06-25 devnull a = v;
791 c66b5250 2006-06-25 devnull m = 0;
792 c66b5250 2006-06-25 devnull oldn = n;
793 c66b5250 2006-06-25 devnull client = client0;
794 c66b5250 2006-06-25 devnull
795 c66b5250 2006-06-25 devnull while((n-=m) > 0){
796 c66b5250 2006-06-25 devnull a += m;
797 9142d362 2008-06-30 rsc /*fprint(2, "msgwrite %d(%d)...", n, *a); */
798 c66b5250 2006-06-25 devnull switch(*a){
799 c66b5250 2006-06-25 devnull default:
800 c66b5250 2006-06-25 devnull /*fprint(2, "bad command %d\n", *a); */
801 c66b5250 2006-06-25 devnull err = "bad draw command";
802 c66b5250 2006-06-25 devnull goto error;
803 c66b5250 2006-06-25 devnull
804 c66b5250 2006-06-25 devnull /* allocate: 'b' id[4] screenid[4] refresh[1] chan[4] repl[1]
805 c66b5250 2006-06-25 devnull R[4*4] clipR[4*4] rrggbbaa[4]
806 c66b5250 2006-06-25 devnull */
807 c66b5250 2006-06-25 devnull case 'b':
808 c66b5250 2006-06-25 devnull m = 1+4+4+1+4+1+4*4+4*4+4;
809 c66b5250 2006-06-25 devnull if(n < m)
810 c66b5250 2006-06-25 devnull goto Eshortdraw;
811 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
812 c66b5250 2006-06-25 devnull scrnid = BGSHORT(a+5);
813 c66b5250 2006-06-25 devnull refresh = a[9];
814 c66b5250 2006-06-25 devnull chan = BGLONG(a+10);
815 c66b5250 2006-06-25 devnull repl = a[14];
816 c66b5250 2006-06-25 devnull drawrectangle(&r, a+15);
817 c66b5250 2006-06-25 devnull drawrectangle(&clipr, a+31);
818 c66b5250 2006-06-25 devnull value = BGLONG(a+47);
819 c66b5250 2006-06-25 devnull if(drawlookup(client, dstid, 0))
820 c66b5250 2006-06-25 devnull goto Eimageexists;
821 c66b5250 2006-06-25 devnull if(scrnid){
822 c66b5250 2006-06-25 devnull dscrn = drawlookupscreen(client, scrnid, &cs);
823 c66b5250 2006-06-25 devnull if(!dscrn)
824 c66b5250 2006-06-25 devnull goto Enodrawscreen;
825 c66b5250 2006-06-25 devnull scrn = dscrn->screen;
826 c66b5250 2006-06-25 devnull if(repl || chan!=scrn->image->chan){
827 c66b5250 2006-06-25 devnull err = "image parameters incompatibile with screen";
828 c66b5250 2006-06-25 devnull goto error;
829 c66b5250 2006-06-25 devnull }
830 c66b5250 2006-06-25 devnull reffn = 0;
831 c66b5250 2006-06-25 devnull switch(refresh){
832 c66b5250 2006-06-25 devnull case Refbackup:
833 c66b5250 2006-06-25 devnull break;
834 c66b5250 2006-06-25 devnull case Refnone:
835 c66b5250 2006-06-25 devnull reffn = memlnorefresh;
836 c66b5250 2006-06-25 devnull break;
837 c66b5250 2006-06-25 devnull case Refmesg:
838 c66b5250 2006-06-25 devnull reffn = drawrefresh;
839 c66b5250 2006-06-25 devnull break;
840 c66b5250 2006-06-25 devnull default:
841 c66b5250 2006-06-25 devnull err = "unknown refresh method";
842 c66b5250 2006-06-25 devnull goto error;
843 c66b5250 2006-06-25 devnull }
844 c66b5250 2006-06-25 devnull l = memlalloc(scrn, r, reffn, 0, value);
845 c66b5250 2006-06-25 devnull if(l == 0)
846 c66b5250 2006-06-25 devnull goto Edrawmem;
847 c66b5250 2006-06-25 devnull addflush(l->layer->screenr);
848 c66b5250 2006-06-25 devnull l->clipr = clipr;
849 c66b5250 2006-06-25 devnull rectclip(&l->clipr, r);
850 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, l, dscrn) == 0){
851 c66b5250 2006-06-25 devnull memldelete(l);
852 c66b5250 2006-06-25 devnull goto Edrawmem;
853 c66b5250 2006-06-25 devnull }
854 c66b5250 2006-06-25 devnull dscrn->ref++;
855 c66b5250 2006-06-25 devnull if(reffn){
856 c66b5250 2006-06-25 devnull refx = nil;
857 c66b5250 2006-06-25 devnull if(reffn == drawrefresh){
858 c66b5250 2006-06-25 devnull refx = mallocz(sizeof(Refx), 1);
859 c66b5250 2006-06-25 devnull if(refx == 0){
860 c66b5250 2006-06-25 devnull if(drawuninstall(client, dstid) < 0)
861 c66b5250 2006-06-25 devnull goto Enodrawimage;
862 c66b5250 2006-06-25 devnull goto Edrawmem;
863 c66b5250 2006-06-25 devnull }
864 c66b5250 2006-06-25 devnull refx->client = client;
865 c66b5250 2006-06-25 devnull refx->dimage = drawlookup(client, dstid, 1);
866 c66b5250 2006-06-25 devnull }
867 c66b5250 2006-06-25 devnull memlsetrefresh(l, reffn, refx);
868 c66b5250 2006-06-25 devnull }
869 c66b5250 2006-06-25 devnull continue;
870 c66b5250 2006-06-25 devnull }
871 c66b5250 2006-06-25 devnull i = allocmemimage(r, chan);
872 c66b5250 2006-06-25 devnull if(i == 0)
873 c66b5250 2006-06-25 devnull goto Edrawmem;
874 c66b5250 2006-06-25 devnull if(repl)
875 c66b5250 2006-06-25 devnull i->flags |= Frepl;
876 c66b5250 2006-06-25 devnull i->clipr = clipr;
877 c66b5250 2006-06-25 devnull if(!repl)
878 c66b5250 2006-06-25 devnull rectclip(&i->clipr, r);
879 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, i, 0) == 0){
880 c66b5250 2006-06-25 devnull freememimage(i);
881 c66b5250 2006-06-25 devnull goto Edrawmem;
882 c66b5250 2006-06-25 devnull }
883 c66b5250 2006-06-25 devnull memfillcolor(i, value);
884 c66b5250 2006-06-25 devnull continue;
885 c66b5250 2006-06-25 devnull
886 c66b5250 2006-06-25 devnull /* allocate screen: 'A' id[4] imageid[4] fillid[4] public[1] */
887 c66b5250 2006-06-25 devnull case 'A':
888 c66b5250 2006-06-25 devnull m = 1+4+4+4+1;
889 c66b5250 2006-06-25 devnull if(n < m)
890 c66b5250 2006-06-25 devnull goto Eshortdraw;
891 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
892 c66b5250 2006-06-25 devnull if(dstid == 0)
893 c66b5250 2006-06-25 devnull goto Ebadarg;
894 c66b5250 2006-06-25 devnull if(drawlookupdscreen(dstid))
895 c66b5250 2006-06-25 devnull goto Escreenexists;
896 c66b5250 2006-06-25 devnull ddst = drawlookup(client, BGLONG(a+5), 1);
897 c66b5250 2006-06-25 devnull dsrc = drawlookup(client, BGLONG(a+9), 1);
898 c66b5250 2006-06-25 devnull if(ddst==0 || dsrc==0)
899 c66b5250 2006-06-25 devnull goto Enodrawimage;
900 c66b5250 2006-06-25 devnull if(drawinstallscreen(client, 0, dstid, ddst, dsrc, a[13]) == 0)
901 c66b5250 2006-06-25 devnull goto Edrawmem;
902 c66b5250 2006-06-25 devnull continue;
903 c66b5250 2006-06-25 devnull
904 c66b5250 2006-06-25 devnull /* set repl and clip: 'c' dstid[4] repl[1] clipR[4*4] */
905 c66b5250 2006-06-25 devnull case 'c':
906 c66b5250 2006-06-25 devnull m = 1+4+1+4*4;
907 c66b5250 2006-06-25 devnull if(n < m)
908 c66b5250 2006-06-25 devnull goto Eshortdraw;
909 c66b5250 2006-06-25 devnull ddst = drawlookup(client, BGLONG(a+1), 1);
910 c66b5250 2006-06-25 devnull if(ddst == nil)
911 c66b5250 2006-06-25 devnull goto Enodrawimage;
912 c66b5250 2006-06-25 devnull if(ddst->name){
913 c66b5250 2006-06-25 devnull err = "can't change repl/clipr of shared image";
914 c66b5250 2006-06-25 devnull goto error;
915 c66b5250 2006-06-25 devnull }
916 c66b5250 2006-06-25 devnull dst = ddst->image;
917 c66b5250 2006-06-25 devnull if(a[5])
918 c66b5250 2006-06-25 devnull dst->flags |= Frepl;
919 c66b5250 2006-06-25 devnull drawrectangle(&dst->clipr, a+6);
920 c66b5250 2006-06-25 devnull continue;
921 c66b5250 2006-06-25 devnull
922 c66b5250 2006-06-25 devnull /* draw: 'd' dstid[4] srcid[4] maskid[4] R[4*4] P[2*4] P[2*4] */
923 c66b5250 2006-06-25 devnull case 'd':
924 c66b5250 2006-06-25 devnull m = 1+4+4+4+4*4+2*4+2*4;
925 c66b5250 2006-06-25 devnull if(n < m)
926 c66b5250 2006-06-25 devnull goto Eshortdraw;
927 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
928 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
929 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
930 c66b5250 2006-06-25 devnull mask = drawimage(client, a+9);
931 c66b5250 2006-06-25 devnull if(!dst || !src || !mask)
932 c66b5250 2006-06-25 devnull goto Enodrawimage;
933 c66b5250 2006-06-25 devnull drawrectangle(&r, a+13);
934 c66b5250 2006-06-25 devnull drawpoint(&p, a+29);
935 c66b5250 2006-06-25 devnull drawpoint(&q, a+37);
936 c66b5250 2006-06-25 devnull op = drawclientop(client);
937 c66b5250 2006-06-25 devnull memdraw(dst, r, src, p, mask, q, op);
938 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
939 c66b5250 2006-06-25 devnull continue;
940 c66b5250 2006-06-25 devnull
941 c66b5250 2006-06-25 devnull /* toggle debugging: 'D' val[1] */
942 c66b5250 2006-06-25 devnull case 'D':
943 c66b5250 2006-06-25 devnull m = 1+1;
944 c66b5250 2006-06-25 devnull if(n < m)
945 c66b5250 2006-06-25 devnull goto Eshortdraw;
946 c66b5250 2006-06-25 devnull drawdebug = a[1];
947 c66b5250 2006-06-25 devnull continue;
948 c66b5250 2006-06-25 devnull
949 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]*/
950 c66b5250 2006-06-25 devnull case 'e':
951 c66b5250 2006-06-25 devnull case 'E':
952 c66b5250 2006-06-25 devnull m = 1+4+4+2*4+4+4+4+2*4+2*4;
953 c66b5250 2006-06-25 devnull if(n < m)
954 c66b5250 2006-06-25 devnull goto Eshortdraw;
955 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
956 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
957 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
958 c66b5250 2006-06-25 devnull if(!dst || !src)
959 c66b5250 2006-06-25 devnull goto Enodrawimage;
960 c66b5250 2006-06-25 devnull drawpoint(&p, a+9);
961 c66b5250 2006-06-25 devnull e0 = BGLONG(a+17);
962 c66b5250 2006-06-25 devnull e1 = BGLONG(a+21);
963 c66b5250 2006-06-25 devnull if(e0<0 || e1<0){
964 c66b5250 2006-06-25 devnull err = "invalid ellipse semidiameter";
965 c66b5250 2006-06-25 devnull goto error;
966 c66b5250 2006-06-25 devnull }
967 c66b5250 2006-06-25 devnull j = BGLONG(a+25);
968 c66b5250 2006-06-25 devnull if(j < 0){
969 c66b5250 2006-06-25 devnull err = "negative ellipse thickness";
970 c66b5250 2006-06-25 devnull goto error;
971 c66b5250 2006-06-25 devnull }
972 c66b5250 2006-06-25 devnull
973 c66b5250 2006-06-25 devnull drawpoint(&sp, a+29);
974 c66b5250 2006-06-25 devnull c = j;
975 c66b5250 2006-06-25 devnull if(*a == 'E')
976 c66b5250 2006-06-25 devnull c = -1;
977 c66b5250 2006-06-25 devnull ox = BGLONG(a+37);
978 c66b5250 2006-06-25 devnull oy = BGLONG(a+41);
979 c66b5250 2006-06-25 devnull op = drawclientop(client);
980 c66b5250 2006-06-25 devnull /* high bit indicates arc angles are present */
981 c66b5250 2006-06-25 devnull if(ox & ((ulong)1<<31)){
982 c66b5250 2006-06-25 devnull if((ox & ((ulong)1<<30)) == 0)
983 c66b5250 2006-06-25 devnull ox &= ~((ulong)1<<31);
984 c66b5250 2006-06-25 devnull memarc(dst, p, e0, e1, c, src, sp, ox, oy, op);
985 c66b5250 2006-06-25 devnull }else
986 c66b5250 2006-06-25 devnull memellipse(dst, p, e0, e1, c, src, sp, op);
987 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));
988 c66b5250 2006-06-25 devnull continue;
989 c66b5250 2006-06-25 devnull
990 c66b5250 2006-06-25 devnull /* free: 'f' id[4] */
991 c66b5250 2006-06-25 devnull case 'f':
992 c66b5250 2006-06-25 devnull m = 1+4;
993 c66b5250 2006-06-25 devnull if(n < m)
994 c66b5250 2006-06-25 devnull goto Eshortdraw;
995 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1), 0);
996 c66b5250 2006-06-25 devnull if(ll && ll->dscreen && ll->dscreen->owner != client)
997 c66b5250 2006-06-25 devnull ll->dscreen->owner->refreshme = 1;
998 c66b5250 2006-06-25 devnull if(drawuninstall(client, BGLONG(a+1)) < 0)
999 c66b5250 2006-06-25 devnull goto Enodrawimage;
1000 c66b5250 2006-06-25 devnull continue;
1001 c66b5250 2006-06-25 devnull
1002 c66b5250 2006-06-25 devnull /* free screen: 'F' id[4] */
1003 c66b5250 2006-06-25 devnull case 'F':
1004 c66b5250 2006-06-25 devnull m = 1+4;
1005 c66b5250 2006-06-25 devnull if(n < m)
1006 c66b5250 2006-06-25 devnull goto Eshortdraw;
1007 c66b5250 2006-06-25 devnull if(!drawlookupscreen(client, BGLONG(a+1), &cs))
1008 c66b5250 2006-06-25 devnull goto Enodrawscreen;
1009 c66b5250 2006-06-25 devnull drawuninstallscreen(client, cs);
1010 c66b5250 2006-06-25 devnull continue;
1011 c66b5250 2006-06-25 devnull
1012 c66b5250 2006-06-25 devnull /* initialize font: 'i' fontid[4] nchars[4] ascent[1] */
1013 c66b5250 2006-06-25 devnull case 'i':
1014 c66b5250 2006-06-25 devnull m = 1+4+4+1;
1015 c66b5250 2006-06-25 devnull if(n < m)
1016 c66b5250 2006-06-25 devnull goto Eshortdraw;
1017 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1018 c66b5250 2006-06-25 devnull if(dstid == 0){
1019 c66b5250 2006-06-25 devnull err = "can't use display as font";
1020 c66b5250 2006-06-25 devnull goto error;
1021 c66b5250 2006-06-25 devnull }
1022 c66b5250 2006-06-25 devnull font = drawlookup(client, dstid, 1);
1023 c66b5250 2006-06-25 devnull if(font == 0)
1024 c66b5250 2006-06-25 devnull goto Enodrawimage;
1025 c66b5250 2006-06-25 devnull if(font->image->layer){
1026 c66b5250 2006-06-25 devnull err = "can't use window as font";
1027 c66b5250 2006-06-25 devnull goto error;
1028 c66b5250 2006-06-25 devnull }
1029 c66b5250 2006-06-25 devnull ni = BGLONG(a+5);
1030 c66b5250 2006-06-25 devnull if(ni<=0 || ni>4096){
1031 c66b5250 2006-06-25 devnull err = "bad font size (4096 chars max)";
1032 c66b5250 2006-06-25 devnull goto error;
1033 c66b5250 2006-06-25 devnull }
1034 c66b5250 2006-06-25 devnull free(font->fchar); /* should we complain if non-zero? */
1035 c66b5250 2006-06-25 devnull font->fchar = mallocz(ni*sizeof(FChar), 1);
1036 c66b5250 2006-06-25 devnull if(font->fchar == 0){
1037 c66b5250 2006-06-25 devnull err = "no memory for font";
1038 c66b5250 2006-06-25 devnull goto error;
1039 c66b5250 2006-06-25 devnull }
1040 c66b5250 2006-06-25 devnull memset(font->fchar, 0, ni*sizeof(FChar));
1041 c66b5250 2006-06-25 devnull font->nfchar = ni;
1042 c66b5250 2006-06-25 devnull font->ascent = a[9];
1043 c66b5250 2006-06-25 devnull continue;
1044 c66b5250 2006-06-25 devnull
1045 c66b5250 2006-06-25 devnull /* set image 0 to screen image */
1046 c66b5250 2006-06-25 devnull case 'J':
1047 c66b5250 2006-06-25 devnull m = 1;
1048 c66b5250 2006-06-25 devnull if(n < m)
1049 c66b5250 2006-06-25 devnull goto Eshortdraw;
1050 c66b5250 2006-06-25 devnull if(drawlookup(client, 0, 0))
1051 c66b5250 2006-06-25 devnull goto Eimageexists;
1052 c66b5250 2006-06-25 devnull drawinstall(client, 0, screenimage, 0);
1053 c66b5250 2006-06-25 devnull client->infoid = 0;
1054 c66b5250 2006-06-25 devnull continue;
1055 c66b5250 2006-06-25 devnull
1056 c66b5250 2006-06-25 devnull /* get image info: 'I' */
1057 c66b5250 2006-06-25 devnull case 'I':
1058 c66b5250 2006-06-25 devnull m = 1;
1059 c66b5250 2006-06-25 devnull if(n < m)
1060 c66b5250 2006-06-25 devnull goto Eshortdraw;
1061 c66b5250 2006-06-25 devnull if(client->infoid < 0)
1062 c66b5250 2006-06-25 devnull goto Enodrawimage;
1063 c66b5250 2006-06-25 devnull if(client->infoid == 0){
1064 c66b5250 2006-06-25 devnull i = screenimage;
1065 c66b5250 2006-06-25 devnull if(i == nil)
1066 c66b5250 2006-06-25 devnull goto Enodrawimage;
1067 c66b5250 2006-06-25 devnull }else{
1068 c66b5250 2006-06-25 devnull di = drawlookup(client, client->infoid, 1);
1069 c66b5250 2006-06-25 devnull if(di == nil)
1070 c66b5250 2006-06-25 devnull goto Enodrawimage;
1071 c66b5250 2006-06-25 devnull i = di->image;
1072 c66b5250 2006-06-25 devnull }
1073 c66b5250 2006-06-25 devnull ni = sprint(ibuf, "%11d %11d %11s %11d %11d %11d %11d %11d"
1074 c66b5250 2006-06-25 devnull " %11d %11d %11d %11d ",
1075 c66b5250 2006-06-25 devnull client->clientid,
1076 c66b5250 2006-06-25 devnull client->infoid,
1077 c66b5250 2006-06-25 devnull chantostr(cbuf, i->chan),
1078 c66b5250 2006-06-25 devnull (i->flags&Frepl)==Frepl,
1079 c66b5250 2006-06-25 devnull i->r.min.x, i->r.min.y, i->r.max.x, i->r.max.y,
1080 c66b5250 2006-06-25 devnull i->clipr.min.x, i->clipr.min.y,
1081 c66b5250 2006-06-25 devnull i->clipr.max.x, i->clipr.max.y);
1082 c66b5250 2006-06-25 devnull free(client->readdata);
1083 c66b5250 2006-06-25 devnull client->readdata = malloc(ni);
1084 c66b5250 2006-06-25 devnull if(client->readdata == nil)
1085 c66b5250 2006-06-25 devnull goto Enomem;
1086 c66b5250 2006-06-25 devnull memmove(client->readdata, ibuf, ni);
1087 c66b5250 2006-06-25 devnull client->nreaddata = ni;
1088 c66b5250 2006-06-25 devnull client->infoid = -1;
1089 d0e07019 2012-11-26 rsc continue;
1090 d0e07019 2012-11-26 rsc
1091 d0e07019 2012-11-26 rsc /* query: 'Q' n[1] queryspec[n] */
1092 d0e07019 2012-11-26 rsc case 'q':
1093 d0e07019 2012-11-26 rsc if(n < 2)
1094 d0e07019 2012-11-26 rsc goto Eshortdraw;
1095 d0e07019 2012-11-26 rsc m = 1+1+a[1];
1096 d0e07019 2012-11-26 rsc if(n < m)
1097 d0e07019 2012-11-26 rsc goto Eshortdraw;
1098 d0e07019 2012-11-26 rsc fmtstrinit(&fmt);
1099 d0e07019 2012-11-26 rsc for(c=0; c<a[1]; c++) {
1100 d0e07019 2012-11-26 rsc switch(a[2+c]) {
1101 d0e07019 2012-11-26 rsc default:
1102 d0e07019 2012-11-26 rsc err = "unknown query";
1103 d0e07019 2012-11-26 rsc goto error;
1104 d0e07019 2012-11-26 rsc case 'd': /* dpi */
1105 55905845 2012-11-26 rsc if(forcedpi)
1106 55905845 2012-11-26 rsc fmtprint(&fmt, "%11d ", forcedpi);
1107 55905845 2012-11-26 rsc else
1108 55905845 2012-11-26 rsc fmtprint(&fmt, "%11d ", displaydpi);
1109 d0e07019 2012-11-26 rsc break;
1110 d0e07019 2012-11-26 rsc }
1111 d0e07019 2012-11-26 rsc }
1112 d0e07019 2012-11-26 rsc client->readdata = (uchar*)fmtstrflush(&fmt);
1113 d0e07019 2012-11-26 rsc if(client->readdata == nil)
1114 d0e07019 2012-11-26 rsc goto Enomem;
1115 d0e07019 2012-11-26 rsc client->nreaddata = strlen((char*)client->readdata);
1116 d0e07019 2012-11-26 rsc continue;
1117 c66b5250 2006-06-25 devnull
1118 c66b5250 2006-06-25 devnull /* load character: 'l' fontid[4] srcid[4] index[2] R[4*4] P[2*4] left[1] width[1] */
1119 c66b5250 2006-06-25 devnull case 'l':
1120 c66b5250 2006-06-25 devnull m = 1+4+4+2+4*4+2*4+1+1;
1121 c66b5250 2006-06-25 devnull if(n < m)
1122 c66b5250 2006-06-25 devnull goto Eshortdraw;
1123 c66b5250 2006-06-25 devnull font = drawlookup(client, BGLONG(a+1), 1);
1124 c66b5250 2006-06-25 devnull if(font == 0)
1125 c66b5250 2006-06-25 devnull goto Enodrawimage;
1126 c66b5250 2006-06-25 devnull if(font->nfchar == 0)
1127 c66b5250 2006-06-25 devnull goto Enotfont;
1128 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
1129 c66b5250 2006-06-25 devnull if(!src)
1130 c66b5250 2006-06-25 devnull goto Enodrawimage;
1131 c66b5250 2006-06-25 devnull ci = BGSHORT(a+9);
1132 c66b5250 2006-06-25 devnull if(ci >= font->nfchar)
1133 c66b5250 2006-06-25 devnull goto Eindex;
1134 c66b5250 2006-06-25 devnull drawrectangle(&r, a+11);
1135 c66b5250 2006-06-25 devnull drawpoint(&p, a+27);
1136 c66b5250 2006-06-25 devnull memdraw(font->image, r, src, p, memopaque, p, S);
1137 c66b5250 2006-06-25 devnull fc = &font->fchar[ci];
1138 c66b5250 2006-06-25 devnull fc->minx = r.min.x;
1139 c66b5250 2006-06-25 devnull fc->maxx = r.max.x;
1140 c66b5250 2006-06-25 devnull fc->miny = r.min.y;
1141 c66b5250 2006-06-25 devnull fc->maxy = r.max.y;
1142 c66b5250 2006-06-25 devnull fc->left = a[35];
1143 c66b5250 2006-06-25 devnull fc->width = a[36];
1144 c66b5250 2006-06-25 devnull continue;
1145 c66b5250 2006-06-25 devnull
1146 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] */
1147 c66b5250 2006-06-25 devnull case 'L':
1148 c66b5250 2006-06-25 devnull m = 1+4+2*4+2*4+4+4+4+4+2*4;
1149 c66b5250 2006-06-25 devnull if(n < m)
1150 c66b5250 2006-06-25 devnull goto Eshortdraw;
1151 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1152 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1153 c66b5250 2006-06-25 devnull drawpoint(&p, a+5);
1154 c66b5250 2006-06-25 devnull drawpoint(&q, a+13);
1155 c66b5250 2006-06-25 devnull e0 = BGLONG(a+21);
1156 c66b5250 2006-06-25 devnull e1 = BGLONG(a+25);
1157 c66b5250 2006-06-25 devnull j = BGLONG(a+29);
1158 c66b5250 2006-06-25 devnull if(j < 0){
1159 c66b5250 2006-06-25 devnull err = "negative line width";
1160 c66b5250 2006-06-25 devnull goto error;
1161 c66b5250 2006-06-25 devnull }
1162 c66b5250 2006-06-25 devnull src = drawimage(client, a+33);
1163 c66b5250 2006-06-25 devnull if(!dst || !src)
1164 c66b5250 2006-06-25 devnull goto Enodrawimage;
1165 c66b5250 2006-06-25 devnull drawpoint(&sp, a+37);
1166 c66b5250 2006-06-25 devnull op = drawclientop(client);
1167 c66b5250 2006-06-25 devnull memline(dst, p, q, e0, e1, j, src, sp, op);
1168 c66b5250 2006-06-25 devnull /* avoid memlinebbox if possible */
1169 c66b5250 2006-06-25 devnull if(dstid==0 || dst->layer!=nil){
1170 c66b5250 2006-06-25 devnull /* BUG: this is terribly inefficient: update maximal containing rect*/
1171 c66b5250 2006-06-25 devnull r = memlinebbox(p, q, e0, e1, j);
1172 c66b5250 2006-06-25 devnull dstflush(dstid, dst, insetrect(r, -(1+1+j)));
1173 c66b5250 2006-06-25 devnull }
1174 c66b5250 2006-06-25 devnull continue;
1175 c66b5250 2006-06-25 devnull
1176 c66b5250 2006-06-25 devnull /* create image mask: 'm' newid[4] id[4] */
1177 c66b5250 2006-06-25 devnull /*
1178 c66b5250 2006-06-25 devnull *
1179 c66b5250 2006-06-25 devnull case 'm':
1180 c66b5250 2006-06-25 devnull m = 4+4;
1181 c66b5250 2006-06-25 devnull if(n < m)
1182 c66b5250 2006-06-25 devnull goto Eshortdraw;
1183 c66b5250 2006-06-25 devnull break;
1184 c66b5250 2006-06-25 devnull *
1185 c66b5250 2006-06-25 devnull */
1186 c66b5250 2006-06-25 devnull
1187 c66b5250 2006-06-25 devnull /* attach to a named image: 'n' dstid[4] j[1] name[j] */
1188 c66b5250 2006-06-25 devnull case 'n':
1189 c66b5250 2006-06-25 devnull m = 1+4+1;
1190 c66b5250 2006-06-25 devnull if(n < m)
1191 c66b5250 2006-06-25 devnull goto Eshortdraw;
1192 c66b5250 2006-06-25 devnull j = a[5];
1193 c66b5250 2006-06-25 devnull if(j == 0) /* give me a non-empty name please */
1194 c66b5250 2006-06-25 devnull goto Eshortdraw;
1195 c66b5250 2006-06-25 devnull m += j;
1196 c66b5250 2006-06-25 devnull if(n < m)
1197 c66b5250 2006-06-25 devnull goto Eshortdraw;
1198 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1199 c66b5250 2006-06-25 devnull if(drawlookup(client, dstid, 0))
1200 c66b5250 2006-06-25 devnull goto Eimageexists;
1201 c66b5250 2006-06-25 devnull dn = drawlookupname(j, (char*)a+6);
1202 c66b5250 2006-06-25 devnull if(dn == nil)
1203 c66b5250 2006-06-25 devnull goto Enoname;
1204 c66b5250 2006-06-25 devnull s = malloc(j+1);
1205 c66b5250 2006-06-25 devnull if(s == nil)
1206 c66b5250 2006-06-25 devnull goto Enomem;
1207 c66b5250 2006-06-25 devnull if(drawinstall(client, dstid, dn->dimage->image, 0) == 0)
1208 c66b5250 2006-06-25 devnull goto Edrawmem;
1209 c66b5250 2006-06-25 devnull di = drawlookup(client, dstid, 0);
1210 c66b5250 2006-06-25 devnull if(di == 0)
1211 c66b5250 2006-06-25 devnull goto Eoldname;
1212 c66b5250 2006-06-25 devnull di->vers = dn->vers;
1213 c66b5250 2006-06-25 devnull di->name = s;
1214 c66b5250 2006-06-25 devnull di->fromname = dn->dimage;
1215 c66b5250 2006-06-25 devnull di->fromname->ref++;
1216 c66b5250 2006-06-25 devnull memmove(di->name, a+6, j);
1217 c66b5250 2006-06-25 devnull di->name[j] = 0;
1218 c66b5250 2006-06-25 devnull client->infoid = dstid;
1219 c66b5250 2006-06-25 devnull continue;
1220 c66b5250 2006-06-25 devnull
1221 c66b5250 2006-06-25 devnull /* name an image: 'N' dstid[4] in[1] j[1] name[j] */
1222 c66b5250 2006-06-25 devnull case 'N':
1223 c66b5250 2006-06-25 devnull m = 1+4+1+1;
1224 c66b5250 2006-06-25 devnull if(n < m)
1225 c66b5250 2006-06-25 devnull goto Eshortdraw;
1226 c66b5250 2006-06-25 devnull c = a[5];
1227 c66b5250 2006-06-25 devnull j = a[6];
1228 c66b5250 2006-06-25 devnull if(j == 0) /* give me a non-empty name please */
1229 c66b5250 2006-06-25 devnull goto Eshortdraw;
1230 c66b5250 2006-06-25 devnull m += j;
1231 c66b5250 2006-06-25 devnull if(n < m)
1232 c66b5250 2006-06-25 devnull goto Eshortdraw;
1233 c66b5250 2006-06-25 devnull di = drawlookup(client, BGLONG(a+1), 0);
1234 c66b5250 2006-06-25 devnull if(di == 0)
1235 c66b5250 2006-06-25 devnull goto Enodrawimage;
1236 c66b5250 2006-06-25 devnull if(di->name)
1237 c66b5250 2006-06-25 devnull goto Enamed;
1238 c66b5250 2006-06-25 devnull if(c)
1239 c66b5250 2006-06-25 devnull if(drawaddname(client, di, j, (char*)a+7, &err) < 0)
1240 c66b5250 2006-06-25 devnull goto error;
1241 c66b5250 2006-06-25 devnull else{
1242 c66b5250 2006-06-25 devnull dn = drawlookupname(j, (char*)a+7);
1243 c66b5250 2006-06-25 devnull if(dn == nil)
1244 c66b5250 2006-06-25 devnull goto Enoname;
1245 c66b5250 2006-06-25 devnull if(dn->dimage != di)
1246 c66b5250 2006-06-25 devnull goto Ewrongname;
1247 c66b5250 2006-06-25 devnull drawdelname(dn);
1248 c66b5250 2006-06-25 devnull }
1249 c66b5250 2006-06-25 devnull continue;
1250 c66b5250 2006-06-25 devnull
1251 c66b5250 2006-06-25 devnull /* position window: 'o' id[4] r.min [2*4] screenr.min [2*4] */
1252 c66b5250 2006-06-25 devnull case 'o':
1253 c66b5250 2006-06-25 devnull m = 1+4+2*4+2*4;
1254 c66b5250 2006-06-25 devnull if(n < m)
1255 c66b5250 2006-06-25 devnull goto Eshortdraw;
1256 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1257 c66b5250 2006-06-25 devnull if(!dst)
1258 c66b5250 2006-06-25 devnull goto Enodrawimage;
1259 c66b5250 2006-06-25 devnull if(dst->layer){
1260 c66b5250 2006-06-25 devnull drawpoint(&p, a+5);
1261 c66b5250 2006-06-25 devnull drawpoint(&q, a+13);
1262 c66b5250 2006-06-25 devnull r = dst->layer->screenr;
1263 c66b5250 2006-06-25 devnull ni = memlorigin(dst, p, q);
1264 c66b5250 2006-06-25 devnull if(ni < 0){
1265 c66b5250 2006-06-25 devnull err = "image origin failed";
1266 c66b5250 2006-06-25 devnull goto error;
1267 c66b5250 2006-06-25 devnull }
1268 c66b5250 2006-06-25 devnull if(ni > 0){
1269 c66b5250 2006-06-25 devnull addflush(r);
1270 c66b5250 2006-06-25 devnull addflush(dst->layer->screenr);
1271 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1), 1);
1272 c66b5250 2006-06-25 devnull drawrefreshscreen(ll, client);
1273 c66b5250 2006-06-25 devnull }
1274 c66b5250 2006-06-25 devnull }
1275 c66b5250 2006-06-25 devnull continue;
1276 c66b5250 2006-06-25 devnull
1277 c66b5250 2006-06-25 devnull /* set compositing operator for next draw operation: 'O' op */
1278 c66b5250 2006-06-25 devnull case 'O':
1279 c66b5250 2006-06-25 devnull m = 1+1;
1280 c66b5250 2006-06-25 devnull if(n < m)
1281 c66b5250 2006-06-25 devnull goto Eshortdraw;
1282 c66b5250 2006-06-25 devnull client->op = a[1];
1283 c66b5250 2006-06-25 devnull continue;
1284 c66b5250 2006-06-25 devnull
1285 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] */
1286 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] */
1287 c66b5250 2006-06-25 devnull case 'p':
1288 c66b5250 2006-06-25 devnull case 'P':
1289 c66b5250 2006-06-25 devnull m = 1+4+2+4+4+4+4+2*4;
1290 c66b5250 2006-06-25 devnull if(n < m)
1291 c66b5250 2006-06-25 devnull goto Eshortdraw;
1292 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1293 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1294 c66b5250 2006-06-25 devnull ni = BGSHORT(a+5);
1295 c66b5250 2006-06-25 devnull if(ni < 0){
1296 c66b5250 2006-06-25 devnull err = "negative cout in polygon";
1297 c66b5250 2006-06-25 devnull goto error;
1298 c66b5250 2006-06-25 devnull }
1299 c66b5250 2006-06-25 devnull e0 = BGLONG(a+7);
1300 c66b5250 2006-06-25 devnull e1 = BGLONG(a+11);
1301 c66b5250 2006-06-25 devnull j = 0;
1302 c66b5250 2006-06-25 devnull if(*a == 'p'){
1303 c66b5250 2006-06-25 devnull j = BGLONG(a+15);
1304 c66b5250 2006-06-25 devnull if(j < 0){
1305 c66b5250 2006-06-25 devnull err = "negative polygon line width";
1306 c66b5250 2006-06-25 devnull goto error;
1307 c66b5250 2006-06-25 devnull }
1308 c66b5250 2006-06-25 devnull }
1309 c66b5250 2006-06-25 devnull src = drawimage(client, a+19);
1310 c66b5250 2006-06-25 devnull if(!dst || !src)
1311 c66b5250 2006-06-25 devnull goto Enodrawimage;
1312 c66b5250 2006-06-25 devnull drawpoint(&sp, a+23);
1313 c66b5250 2006-06-25 devnull drawpoint(&p, a+31);
1314 c66b5250 2006-06-25 devnull ni++;
1315 c66b5250 2006-06-25 devnull pp = mallocz(ni*sizeof(Point), 1);
1316 c66b5250 2006-06-25 devnull if(pp == nil)
1317 c66b5250 2006-06-25 devnull goto Enomem;
1318 c66b5250 2006-06-25 devnull doflush = 0;
1319 c66b5250 2006-06-25 devnull if(dstid==0 || (dst->layer && dst->layer->screen->image->data == screenimage->data))
1320 c66b5250 2006-06-25 devnull doflush = 1; /* simplify test in loop */
1321 c66b5250 2006-06-25 devnull ox = oy = 0;
1322 c66b5250 2006-06-25 devnull esize = 0;
1323 c66b5250 2006-06-25 devnull u = a+m;
1324 c66b5250 2006-06-25 devnull for(y=0; y<ni; y++){
1325 c66b5250 2006-06-25 devnull q = p;
1326 c66b5250 2006-06-25 devnull oesize = esize;
1327 c66b5250 2006-06-25 devnull u = drawcoord(u, a+n, ox, &p.x);
1328 c66b5250 2006-06-25 devnull if(!u)
1329 c66b5250 2006-06-25 devnull goto Eshortdraw;
1330 c66b5250 2006-06-25 devnull u = drawcoord(u, a+n, oy, &p.y);
1331 c66b5250 2006-06-25 devnull if(!u)
1332 c66b5250 2006-06-25 devnull goto Eshortdraw;
1333 c66b5250 2006-06-25 devnull ox = p.x;
1334 c66b5250 2006-06-25 devnull oy = p.y;
1335 c66b5250 2006-06-25 devnull if(doflush){
1336 c66b5250 2006-06-25 devnull esize = j;
1337 c66b5250 2006-06-25 devnull if(*a == 'p'){
1338 c66b5250 2006-06-25 devnull if(y == 0){
1339 c66b5250 2006-06-25 devnull c = memlineendsize(e0);
1340 c66b5250 2006-06-25 devnull if(c > esize)
1341 c66b5250 2006-06-25 devnull esize = c;
1342 c66b5250 2006-06-25 devnull }
1343 c66b5250 2006-06-25 devnull if(y == ni-1){
1344 c66b5250 2006-06-25 devnull c = memlineendsize(e1);
1345 c66b5250 2006-06-25 devnull if(c > esize)
1346 c66b5250 2006-06-25 devnull esize = c;
1347 c66b5250 2006-06-25 devnull }
1348 c66b5250 2006-06-25 devnull }
1349 c66b5250 2006-06-25 devnull if(*a=='P' && e0!=1 && e0 !=~0)
1350 c66b5250 2006-06-25 devnull r = dst->clipr;
1351 c66b5250 2006-06-25 devnull else if(y > 0){
1352 c66b5250 2006-06-25 devnull r = Rect(q.x-oesize, q.y-oesize, q.x+oesize+1, q.y+oesize+1);
1353 c66b5250 2006-06-25 devnull combinerect(&r, Rect(p.x-esize, p.y-esize, p.x+esize+1, p.y+esize+1));
1354 c66b5250 2006-06-25 devnull }
1355 c66b5250 2006-06-25 devnull if(rectclip(&r, dst->clipr)) /* should perhaps be an arg to dstflush */
1356 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
1357 c66b5250 2006-06-25 devnull }
1358 c66b5250 2006-06-25 devnull pp[y] = p;
1359 c66b5250 2006-06-25 devnull }
1360 c66b5250 2006-06-25 devnull if(y == 1)
1361 c66b5250 2006-06-25 devnull dstflush(dstid, dst, Rect(p.x-esize, p.y-esize, p.x+esize+1, p.y+esize+1));
1362 c66b5250 2006-06-25 devnull op = drawclientop(client);
1363 c66b5250 2006-06-25 devnull if(*a == 'p')
1364 c66b5250 2006-06-25 devnull mempoly(dst, pp, ni, e0, e1, j, src, sp, op);
1365 c66b5250 2006-06-25 devnull else
1366 c66b5250 2006-06-25 devnull memfillpoly(dst, pp, ni, e0, src, sp, op);
1367 c66b5250 2006-06-25 devnull free(pp);
1368 c66b5250 2006-06-25 devnull m = u-a;
1369 c66b5250 2006-06-25 devnull continue;
1370 c66b5250 2006-06-25 devnull
1371 c66b5250 2006-06-25 devnull /* read: 'r' id[4] R[4*4] */
1372 c66b5250 2006-06-25 devnull case 'r':
1373 c66b5250 2006-06-25 devnull m = 1+4+4*4;
1374 c66b5250 2006-06-25 devnull if(n < m)
1375 c66b5250 2006-06-25 devnull goto Eshortdraw;
1376 c66b5250 2006-06-25 devnull i = drawimage(client, a+1);
1377 c66b5250 2006-06-25 devnull if(!i)
1378 c66b5250 2006-06-25 devnull goto Enodrawimage;
1379 c66b5250 2006-06-25 devnull drawrectangle(&r, a+5);
1380 c66b5250 2006-06-25 devnull if(!rectinrect(r, i->r))
1381 c66b5250 2006-06-25 devnull goto Ereadoutside;
1382 c66b5250 2006-06-25 devnull c = bytesperline(r, i->depth);
1383 c66b5250 2006-06-25 devnull c *= Dy(r);
1384 c66b5250 2006-06-25 devnull free(client->readdata);
1385 c66b5250 2006-06-25 devnull client->readdata = mallocz(c, 0);
1386 c66b5250 2006-06-25 devnull if(client->readdata == nil){
1387 c66b5250 2006-06-25 devnull err = "readimage malloc failed";
1388 c66b5250 2006-06-25 devnull goto error;
1389 c66b5250 2006-06-25 devnull }
1390 c66b5250 2006-06-25 devnull client->nreaddata = memunload(i, r, client->readdata, c);
1391 c66b5250 2006-06-25 devnull if(client->nreaddata < 0){
1392 c66b5250 2006-06-25 devnull free(client->readdata);
1393 c66b5250 2006-06-25 devnull client->readdata = nil;
1394 c66b5250 2006-06-25 devnull err = "bad readimage call";
1395 c66b5250 2006-06-25 devnull goto error;
1396 c66b5250 2006-06-25 devnull }
1397 c66b5250 2006-06-25 devnull continue;
1398 c66b5250 2006-06-25 devnull
1399 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]) */
1400 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]) */
1401 c66b5250 2006-06-25 devnull case 's':
1402 c66b5250 2006-06-25 devnull case 'x':
1403 c66b5250 2006-06-25 devnull m = 1+4+4+4+2*4+4*4+2*4+2;
1404 c66b5250 2006-06-25 devnull if(*a == 'x')
1405 c66b5250 2006-06-25 devnull m += 4+2*4;
1406 c66b5250 2006-06-25 devnull if(n < m)
1407 c66b5250 2006-06-25 devnull goto Eshortdraw;
1408 c66b5250 2006-06-25 devnull
1409 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1410 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1411 c66b5250 2006-06-25 devnull src = drawimage(client, a+5);
1412 c66b5250 2006-06-25 devnull if(!dst || !src)
1413 c66b5250 2006-06-25 devnull goto Enodrawimage;
1414 c66b5250 2006-06-25 devnull font = drawlookup(client, BGLONG(a+9), 1);
1415 c66b5250 2006-06-25 devnull if(font == 0)
1416 c66b5250 2006-06-25 devnull goto Enodrawimage;
1417 c66b5250 2006-06-25 devnull if(font->nfchar == 0)
1418 c66b5250 2006-06-25 devnull goto Enotfont;
1419 c66b5250 2006-06-25 devnull drawpoint(&p, a+13);
1420 c66b5250 2006-06-25 devnull drawrectangle(&r, a+21);
1421 c66b5250 2006-06-25 devnull drawpoint(&sp, a+37);
1422 c66b5250 2006-06-25 devnull ni = BGSHORT(a+45);
1423 c66b5250 2006-06-25 devnull u = a+m;
1424 c66b5250 2006-06-25 devnull m += ni*2;
1425 c66b5250 2006-06-25 devnull if(n < m)
1426 c66b5250 2006-06-25 devnull goto Eshortdraw;
1427 c66b5250 2006-06-25 devnull clipr = dst->clipr;
1428 c66b5250 2006-06-25 devnull dst->clipr = r;
1429 c66b5250 2006-06-25 devnull op = drawclientop(client);
1430 c66b5250 2006-06-25 devnull if(*a == 'x'){
1431 c66b5250 2006-06-25 devnull /* paint background */
1432 c66b5250 2006-06-25 devnull l = drawimage(client, a+47);
1433 c66b5250 2006-06-25 devnull if(!l)
1434 c66b5250 2006-06-25 devnull goto Enodrawimage;
1435 c66b5250 2006-06-25 devnull drawpoint(&q, a+51);
1436 c66b5250 2006-06-25 devnull r.min.x = p.x;
1437 c66b5250 2006-06-25 devnull r.min.y = p.y-font->ascent;
1438 c66b5250 2006-06-25 devnull r.max.x = p.x;
1439 c66b5250 2006-06-25 devnull r.max.y = r.min.y+Dy(font->image->r);
1440 c66b5250 2006-06-25 devnull j = ni;
1441 c66b5250 2006-06-25 devnull while(--j >= 0){
1442 c66b5250 2006-06-25 devnull ci = BGSHORT(u);
1443 c66b5250 2006-06-25 devnull if(ci<0 || ci>=font->nfchar){
1444 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1445 c66b5250 2006-06-25 devnull goto Eindex;
1446 c66b5250 2006-06-25 devnull }
1447 c66b5250 2006-06-25 devnull r.max.x += font->fchar[ci].width;
1448 c66b5250 2006-06-25 devnull u += 2;
1449 c66b5250 2006-06-25 devnull }
1450 c66b5250 2006-06-25 devnull memdraw(dst, r, l, q, memopaque, ZP, op);
1451 c66b5250 2006-06-25 devnull u -= 2*ni;
1452 c66b5250 2006-06-25 devnull }
1453 c66b5250 2006-06-25 devnull q = p;
1454 c66b5250 2006-06-25 devnull while(--ni >= 0){
1455 c66b5250 2006-06-25 devnull ci = BGSHORT(u);
1456 c66b5250 2006-06-25 devnull if(ci<0 || ci>=font->nfchar){
1457 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1458 c66b5250 2006-06-25 devnull goto Eindex;
1459 c66b5250 2006-06-25 devnull }
1460 c66b5250 2006-06-25 devnull q = drawchar(dst, q, src, &sp, font, ci, op);
1461 c66b5250 2006-06-25 devnull u += 2;
1462 c66b5250 2006-06-25 devnull }
1463 c66b5250 2006-06-25 devnull dst->clipr = clipr;
1464 c66b5250 2006-06-25 devnull p.y -= font->ascent;
1465 c66b5250 2006-06-25 devnull dstflush(dstid, dst, Rect(p.x, p.y, q.x, p.y+Dy(font->image->r)));
1466 c66b5250 2006-06-25 devnull continue;
1467 c66b5250 2006-06-25 devnull
1468 c66b5250 2006-06-25 devnull /* use public screen: 'S' id[4] chan[4] */
1469 c66b5250 2006-06-25 devnull case 'S':
1470 c66b5250 2006-06-25 devnull m = 1+4+4;
1471 c66b5250 2006-06-25 devnull if(n < m)
1472 c66b5250 2006-06-25 devnull goto Eshortdraw;
1473 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1474 c66b5250 2006-06-25 devnull if(dstid == 0)
1475 c66b5250 2006-06-25 devnull goto Ebadarg;
1476 c66b5250 2006-06-25 devnull dscrn = drawlookupdscreen(dstid);
1477 c66b5250 2006-06-25 devnull if(dscrn==0 || (dscrn->public==0 && dscrn->owner!=client))
1478 c66b5250 2006-06-25 devnull goto Enodrawscreen;
1479 c66b5250 2006-06-25 devnull if(dscrn->screen->image->chan != BGLONG(a+5)){
1480 c66b5250 2006-06-25 devnull err = "inconsistent chan";
1481 c66b5250 2006-06-25 devnull goto error;
1482 c66b5250 2006-06-25 devnull }
1483 c66b5250 2006-06-25 devnull if(drawinstallscreen(client, dscrn, 0, 0, 0, 0) == 0)
1484 c66b5250 2006-06-25 devnull goto Edrawmem;
1485 c66b5250 2006-06-25 devnull continue;
1486 c66b5250 2006-06-25 devnull
1487 c66b5250 2006-06-25 devnull /* top or bottom windows: 't' top[1] nw[2] n*id[4] */
1488 c66b5250 2006-06-25 devnull case 't':
1489 c66b5250 2006-06-25 devnull m = 1+1+2;
1490 c66b5250 2006-06-25 devnull if(n < m)
1491 c66b5250 2006-06-25 devnull goto Eshortdraw;
1492 c66b5250 2006-06-25 devnull nw = BGSHORT(a+2);
1493 c66b5250 2006-06-25 devnull if(nw < 0)
1494 c66b5250 2006-06-25 devnull goto Ebadarg;
1495 c66b5250 2006-06-25 devnull if(nw == 0)
1496 c66b5250 2006-06-25 devnull continue;
1497 c66b5250 2006-06-25 devnull m += nw*4;
1498 c66b5250 2006-06-25 devnull if(n < m)
1499 c66b5250 2006-06-25 devnull goto Eshortdraw;
1500 c66b5250 2006-06-25 devnull lp = mallocz(nw*sizeof(Memimage*), 1);
1501 c66b5250 2006-06-25 devnull if(lp == 0)
1502 c66b5250 2006-06-25 devnull goto Enomem;
1503 c66b5250 2006-06-25 devnull for(j=0; j<nw; j++){
1504 c66b5250 2006-06-25 devnull lp[j] = drawimage(client, a+1+1+2+j*4);
1505 c66b5250 2006-06-25 devnull if(lp[j] == nil){
1506 c66b5250 2006-06-25 devnull free(lp);
1507 c66b5250 2006-06-25 devnull goto Enodrawimage;
1508 c66b5250 2006-06-25 devnull }
1509 c66b5250 2006-06-25 devnull }
1510 c66b5250 2006-06-25 devnull if(lp[0]->layer == 0){
1511 c66b5250 2006-06-25 devnull err = "images are not windows";
1512 c66b5250 2006-06-25 devnull free(lp);
1513 c66b5250 2006-06-25 devnull goto error;
1514 c66b5250 2006-06-25 devnull }
1515 c66b5250 2006-06-25 devnull for(j=1; j<nw; j++)
1516 c66b5250 2006-06-25 devnull if(lp[j]->layer->screen != lp[0]->layer->screen){
1517 c66b5250 2006-06-25 devnull err = "images not on same screen";
1518 c66b5250 2006-06-25 devnull free(lp);
1519 c66b5250 2006-06-25 devnull goto error;
1520 c66b5250 2006-06-25 devnull }
1521 c66b5250 2006-06-25 devnull if(a[1])
1522 c66b5250 2006-06-25 devnull memltofrontn(lp, nw);
1523 c66b5250 2006-06-25 devnull else
1524 c66b5250 2006-06-25 devnull memltorearn(lp, nw);
1525 c66b5250 2006-06-25 devnull if(lp[0]->layer->screen->image->data == screenimage->data)
1526 c66b5250 2006-06-25 devnull for(j=0; j<nw; j++)
1527 c66b5250 2006-06-25 devnull addflush(lp[j]->layer->screenr);
1528 c66b5250 2006-06-25 devnull free(lp);
1529 c66b5250 2006-06-25 devnull ll = drawlookup(client, BGLONG(a+1+1+2), 1);
1530 c66b5250 2006-06-25 devnull drawrefreshscreen(ll, client);
1531 c66b5250 2006-06-25 devnull continue;
1532 c66b5250 2006-06-25 devnull
1533 c66b5250 2006-06-25 devnull /* visible: 'v' */
1534 c66b5250 2006-06-25 devnull case 'v':
1535 c66b5250 2006-06-25 devnull m = 1;
1536 c66b5250 2006-06-25 devnull drawflush();
1537 c66b5250 2006-06-25 devnull continue;
1538 c66b5250 2006-06-25 devnull
1539 c66b5250 2006-06-25 devnull /* write: 'y' id[4] R[4*4] data[x*1] */
1540 c66b5250 2006-06-25 devnull /* write from compressed data: 'Y' id[4] R[4*4] data[x*1] */
1541 c66b5250 2006-06-25 devnull case 'y':
1542 c66b5250 2006-06-25 devnull case 'Y':
1543 c66b5250 2006-06-25 devnull m = 1+4+4*4;
1544 c66b5250 2006-06-25 devnull if(n < m)
1545 c66b5250 2006-06-25 devnull goto Eshortdraw;
1546 c66b5250 2006-06-25 devnull dstid = BGLONG(a+1);
1547 c66b5250 2006-06-25 devnull dst = drawimage(client, a+1);
1548 c66b5250 2006-06-25 devnull if(!dst)
1549 c66b5250 2006-06-25 devnull goto Enodrawimage;
1550 c66b5250 2006-06-25 devnull drawrectangle(&r, a+5);
1551 c66b5250 2006-06-25 devnull if(!rectinrect(r, dst->r))
1552 c66b5250 2006-06-25 devnull goto Ewriteoutside;
1553 c66b5250 2006-06-25 devnull y = memload(dst, r, a+m, n-m, *a=='Y');
1554 c66b5250 2006-06-25 devnull if(y < 0){
1555 c66b5250 2006-06-25 devnull err = "bad writeimage call";
1556 c66b5250 2006-06-25 devnull goto error;
1557 c66b5250 2006-06-25 devnull }
1558 c66b5250 2006-06-25 devnull dstflush(dstid, dst, r);
1559 c66b5250 2006-06-25 devnull m += y;
1560 c66b5250 2006-06-25 devnull continue;
1561 c66b5250 2006-06-25 devnull }
1562 c66b5250 2006-06-25 devnull }
1563 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
1564 c66b5250 2006-06-25 devnull return oldn - n;
1565 c66b5250 2006-06-25 devnull
1566 c66b5250 2006-06-25 devnull Enodrawimage:
1567 c66b5250 2006-06-25 devnull err = "unknown id for draw image";
1568 c66b5250 2006-06-25 devnull goto error;
1569 c66b5250 2006-06-25 devnull Enodrawscreen:
1570 c66b5250 2006-06-25 devnull err = "unknown id for draw screen";
1571 c66b5250 2006-06-25 devnull goto error;
1572 c66b5250 2006-06-25 devnull Eshortdraw:
1573 c66b5250 2006-06-25 devnull err = "short draw message";
1574 c66b5250 2006-06-25 devnull goto error;
1575 c66b5250 2006-06-25 devnull /*
1576 c66b5250 2006-06-25 devnull Eshortread:
1577 c66b5250 2006-06-25 devnull err = "draw read too short";
1578 c66b5250 2006-06-25 devnull goto error;
1579 c66b5250 2006-06-25 devnull */
1580 c66b5250 2006-06-25 devnull Eimageexists:
1581 c66b5250 2006-06-25 devnull err = "image id in use";
1582 c66b5250 2006-06-25 devnull goto error;
1583 c66b5250 2006-06-25 devnull Escreenexists:
1584 c66b5250 2006-06-25 devnull err = "screen id in use";
1585 c66b5250 2006-06-25 devnull goto error;
1586 c66b5250 2006-06-25 devnull Edrawmem:
1587 c66b5250 2006-06-25 devnull err = "image memory allocation failed";
1588 c66b5250 2006-06-25 devnull goto error;
1589 c66b5250 2006-06-25 devnull Ereadoutside:
1590 c66b5250 2006-06-25 devnull err = "readimage outside image";
1591 c66b5250 2006-06-25 devnull goto error;
1592 c66b5250 2006-06-25 devnull Ewriteoutside:
1593 c66b5250 2006-06-25 devnull err = "writeimage outside image";
1594 c66b5250 2006-06-25 devnull goto error;
1595 c66b5250 2006-06-25 devnull Enotfont:
1596 c66b5250 2006-06-25 devnull err = "image not a font";
1597 c66b5250 2006-06-25 devnull goto error;
1598 c66b5250 2006-06-25 devnull Eindex:
1599 c66b5250 2006-06-25 devnull err = "character index out of range";
1600 c66b5250 2006-06-25 devnull goto error;
1601 c66b5250 2006-06-25 devnull /*
1602 c66b5250 2006-06-25 devnull Enoclient:
1603 c66b5250 2006-06-25 devnull err = "no such draw client";
1604 c66b5250 2006-06-25 devnull goto error;
1605 c66b5250 2006-06-25 devnull Edepth:
1606 c66b5250 2006-06-25 devnull err = "image has bad depth";
1607 c66b5250 2006-06-25 devnull goto error;
1608 c66b5250 2006-06-25 devnull Enameused:
1609 c66b5250 2006-06-25 devnull err = "image name in use";
1610 c66b5250 2006-06-25 devnull goto error;
1611 c66b5250 2006-06-25 devnull */
1612 c66b5250 2006-06-25 devnull Enoname:
1613 c66b5250 2006-06-25 devnull err = "no image with that name";
1614 c66b5250 2006-06-25 devnull goto error;
1615 c66b5250 2006-06-25 devnull Eoldname:
1616 c66b5250 2006-06-25 devnull err = "named image no longer valid";
1617 c66b5250 2006-06-25 devnull goto error;
1618 c66b5250 2006-06-25 devnull Enamed:
1619 c66b5250 2006-06-25 devnull err = "image already has name";
1620 c66b5250 2006-06-25 devnull goto error;
1621 c66b5250 2006-06-25 devnull Ewrongname:
1622 c66b5250 2006-06-25 devnull err = "wrong name for image";
1623 c66b5250 2006-06-25 devnull goto error;
1624 c66b5250 2006-06-25 devnull Enomem:
1625 c66b5250 2006-06-25 devnull err = "out of memory";
1626 c66b5250 2006-06-25 devnull goto error;
1627 c66b5250 2006-06-25 devnull Ebadarg:
1628 c66b5250 2006-06-25 devnull err = "bad argument in draw message";
1629 c66b5250 2006-06-25 devnull goto error;
1630 c66b5250 2006-06-25 devnull
1631 c66b5250 2006-06-25 devnull error:
1632 c66b5250 2006-06-25 devnull werrstr("%s", err);
1633 c66b5250 2006-06-25 devnull qunlock(&sdraw.lk);
1634 c66b5250 2006-06-25 devnull return -1;
1635 c66b5250 2006-06-25 devnull }
1636 c66b5250 2006-06-25 devnull
1637 c66b5250 2006-06-25 devnull