2 76193d7c 2003-09-30 devnull * Some of the stuff in this file is not X-dependent and should be elsewhere.
4 76193d7c 2003-09-30 devnull #include <u.h>
5 be22ae2d 2004-03-26 devnull #include "x11-inc.h"
6 76193d7c 2003-09-30 devnull #include <libc.h>
7 76193d7c 2003-09-30 devnull #include <draw.h>
8 76193d7c 2003-09-30 devnull #include <memdraw.h>
9 76193d7c 2003-09-30 devnull #include <keyboard.h>
10 76193d7c 2003-09-30 devnull #include <mouse.h>
11 76193d7c 2003-09-30 devnull #include <cursor.h>
12 76193d7c 2003-09-30 devnull #include "x11-memdraw.h"
14 be36ff68 2004-04-29 devnull char *winsize;
15 be36ff68 2004-04-29 devnull static int parsewinsize(char*, Rectangle*, int*);
17 76193d7c 2003-09-30 devnull static Memimage *xattach(char*);
18 76193d7c 2003-09-30 devnull static void plan9cmap(void);
19 76193d7c 2003-09-30 devnull static int setupcmap(XWindow);
20 d4853cf4 2003-10-01 devnull static int xreplacescreenimage(void);
21 76193d7c 2003-09-30 devnull static XGC xgc(XDrawable, int, int);
22 6325e032 2004-03-26 devnull static Image *getimage0(Display*, Image*);
24 76193d7c 2003-09-30 devnull Xprivate _x;
27 76193d7c 2003-09-30 devnull _initdisplay(void (*error)(Display*, char*), char *label)
29 76193d7c 2003-09-30 devnull Display *d;
30 76193d7c 2003-09-30 devnull Memimage *m;
33 f7012583 2003-11-25 devnull * This rfork(RFNOTEG) isn't exactly right,
34 f7012583 2003-11-25 devnull * but we need some way to signal window
35 f7012583 2003-11-25 devnull * closes. Right now we post a hangup
36 f7012583 2003-11-25 devnull * note to the note group, which kills a whole
37 f7012583 2003-11-25 devnull * lot more than just the current program
38 f7012583 2003-11-25 devnull * if we don't do this.
41 3151bc58 2004-04-21 devnull * Actually, I don't know what I changed but
42 3151bc58 2004-04-21 devnull * this appears not to be necessary anymore.
43 3151bc58 2004-04-21 devnull * I'll regret this probably.
44 f7012583 2003-11-25 devnull rfork(RFNOTEG);
46 76193d7c 2003-09-30 devnull memimageinit();
48 76193d7c 2003-09-30 devnull d = mallocz(sizeof(Display), 1);
49 76193d7c 2003-09-30 devnull if(d == nil)
50 76193d7c 2003-09-30 devnull return nil;
52 76193d7c 2003-09-30 devnull d->buf = malloc(16000+5);
53 76193d7c 2003-09-30 devnull d->obuf = malloc(16000);
54 76193d7c 2003-09-30 devnull if(d->buf == nil || d->obuf == nil){
55 76193d7c 2003-09-30 devnull free(d->buf);
56 76193d7c 2003-09-30 devnull free(d->obuf);
58 76193d7c 2003-09-30 devnull return nil;
60 76193d7c 2003-09-30 devnull d->bufsize = 16000;
61 76193d7c 2003-09-30 devnull d->obufsize = 16000;
62 76193d7c 2003-09-30 devnull d->bufp = d->buf;
63 76193d7c 2003-09-30 devnull d->obufp = d->obuf;
65 76193d7c 2003-09-30 devnull m = xattach(label);
66 76193d7c 2003-09-30 devnull if(m == nil){
68 76193d7c 2003-09-30 devnull return nil;
71 76193d7c 2003-09-30 devnull d->error = error;
72 76193d7c 2003-09-30 devnull _initdisplaymemimage(d, m);
73 6325e032 2004-03-26 devnull d->screenimage = getimage0(d, 0);
74 76193d7c 2003-09-30 devnull return d;
77 76193d7c 2003-09-30 devnull static Image*
78 6325e032 2004-03-26 devnull getimage0(Display *d, Image *image)
80 be22ae2d 2004-03-26 devnull char info[12*12+1];
81 be22ae2d 2004-03-26 devnull uchar *a;
83 6325e032 2004-03-26 devnull extern int _freeimage1(Image*);
86 6325e032 2004-03-26 devnull * If there's an old screen, it has id 0. The 'J' request below
87 6325e032 2004-03-26 devnull * will try to install the new screen as id 0, so the old one
88 6325e032 2004-03-26 devnull * must be freed first.
90 6325e032 2004-03-26 devnull if(image){
91 6325e032 2004-03-26 devnull _freeimage1(image);
92 6325e032 2004-03-26 devnull memset(image, 0, sizeof(Image));
95 76193d7c 2003-09-30 devnull a = bufimage(d, 2);
96 76193d7c 2003-09-30 devnull a[0] = 'J';
97 76193d7c 2003-09-30 devnull a[1] = 'I';
98 76193d7c 2003-09-30 devnull if(flushimage(d, 0) < 0){
99 76193d7c 2003-09-30 devnull fprint(2, "cannot read screen info: %r\n");
100 76193d7c 2003-09-30 devnull abort();
103 76193d7c 2003-09-30 devnull n = _drawmsgread(d, info, sizeof info);
104 76193d7c 2003-09-30 devnull if(n != 12*12){
105 76193d7c 2003-09-30 devnull fprint(2, "short screen info\n");
106 76193d7c 2003-09-30 devnull abort();
109 6325e032 2004-03-26 devnull if(image == nil){
110 6325e032 2004-03-26 devnull image = mallocz(sizeof(Image), 1);
111 6325e032 2004-03-26 devnull if(image == nil){
112 6325e032 2004-03-26 devnull fprint(2, "cannot allocate image: %r\n");
113 6325e032 2004-03-26 devnull abort();
117 76193d7c 2003-09-30 devnull image->display = d;
118 76193d7c 2003-09-30 devnull image->id = 0;
119 76193d7c 2003-09-30 devnull image->chan = strtochan(info+2*12);
120 76193d7c 2003-09-30 devnull image->depth = chantodepth(image->chan);
121 76193d7c 2003-09-30 devnull image->repl = atoi(info+3*12);
122 76193d7c 2003-09-30 devnull image->r.min.x = atoi(info+4*12);
123 76193d7c 2003-09-30 devnull image->r.min.y = atoi(info+5*12);
124 76193d7c 2003-09-30 devnull image->r.max.x = atoi(info+6*12);
125 76193d7c 2003-09-30 devnull image->r.max.y = atoi(info+7*12);
126 76193d7c 2003-09-30 devnull image->clipr.min.x = atoi(info+8*12);
127 76193d7c 2003-09-30 devnull image->clipr.min.y = atoi(info+9*12);
128 76193d7c 2003-09-30 devnull image->clipr.max.x = atoi(info+10*12);
129 76193d7c 2003-09-30 devnull image->clipr.max.y = atoi(info+11*12);
130 76193d7c 2003-09-30 devnull return image;
134 76193d7c 2003-09-30 devnull getwindow(Display *d, int ref)
136 76193d7c 2003-09-30 devnull Image *i;
137 6325e032 2004-03-26 devnull Image *oi;
139 16a70966 2003-11-23 devnull if(_x.destroyed)
140 16a70966 2003-11-23 devnull postnote(PNGROUP, getpgrp(), "hangup");
141 d4853cf4 2003-10-01 devnull if(xreplacescreenimage() == 0)
142 d4853cf4 2003-10-01 devnull return 0;
145 6325e032 2004-03-26 devnull * Libdraw promises not to change the value of "screen",
146 6325e032 2004-03-26 devnull * so we have to reuse the image structure
147 6325e032 2004-03-26 devnull * memory we already have.
149 6325e032 2004-03-26 devnull oi = d->screenimage;
150 6325e032 2004-03-26 devnull i = getimage0(d, oi);
151 76193d7c 2003-09-30 devnull screen = d->screenimage = d->image = i;
152 6325e032 2004-03-26 devnull // fprint(2, "getwindow %p -> %p\n", oi, i);
153 76193d7c 2003-09-30 devnull return 0;
156 76193d7c 2003-09-30 devnull static int
157 76193d7c 2003-09-30 devnull xerror(XDisplay *d, XErrorEvent *e)
159 76193d7c 2003-09-30 devnull char buf[200];
161 af78a4cd 2004-03-02 devnull if(e->request_code == 42) /* XSetInputFocus */
162 af78a4cd 2004-03-02 devnull return 0;
163 6b2d0fd9 2004-03-26 devnull if(e->request_code == 18) /* XChangeProperty */
164 6b2d0fd9 2004-03-26 devnull return 0;
166 161060a4 2003-10-11 devnull print("X error: error_code=%d, request_code=%d, minor=%d disp=%p\n",
167 161060a4 2003-10-11 devnull e->error_code, e->request_code, e->minor_code, d);
168 76193d7c 2003-09-30 devnull XGetErrorText(d, e->error_code, buf, sizeof buf);
169 76193d7c 2003-09-30 devnull print("%s\n", buf);
170 76193d7c 2003-09-30 devnull return 0;
173 76193d7c 2003-09-30 devnull static int
174 76193d7c 2003-09-30 devnull xioerror(XDisplay *d)
176 115d4c0a 2004-05-03 devnull //print("X I/O error\n");
177 115d4c0a 2004-05-03 devnull sysfatal("X I/O error\n");
178 16a70966 2003-11-23 devnull abort();
179 76193d7c 2003-09-30 devnull return -1;
183 76193d7c 2003-09-30 devnull static Memimage*
184 76193d7c 2003-09-30 devnull xattach(char *label)
186 76193d7c 2003-09-30 devnull char *argv[2], *disp;
187 dea58c42 2004-06-17 devnull int i, havemin, height, mask, n, width, x, xrootid, y;
188 76193d7c 2003-09-30 devnull Rectangle r;
189 76193d7c 2003-09-30 devnull XClassHint classhint;
190 76193d7c 2003-09-30 devnull XDrawable pmid;
191 76193d7c 2003-09-30 devnull XPixmapFormatValues *pfmt;
192 76193d7c 2003-09-30 devnull XScreen *xscreen;
193 76193d7c 2003-09-30 devnull XSetWindowAttributes attr;
194 76193d7c 2003-09-30 devnull XSizeHints normalhint;
195 76193d7c 2003-09-30 devnull XTextProperty name;
196 76193d7c 2003-09-30 devnull XVisualInfo xvi;
197 76193d7c 2003-09-30 devnull XWindow xrootwin;
198 ab5efca8 2003-12-02 devnull XWindowAttributes wattr;
199 76193d7c 2003-09-30 devnull XWMHints hint;
200 4f30f3b4 2004-03-30 devnull Atom atoms[2];
203 d4853cf4 2003-10-01 devnull if(XInitThreads() == 0){
204 d4853cf4 2003-10-01 devnull fprint(2, "XInitThreads failed\n");
205 d4853cf4 2003-10-01 devnull abort();
210 76193d7c 2003-09-30 devnull * Connect to X server.
212 76193d7c 2003-09-30 devnull _x.display = XOpenDisplay(NULL);
213 76193d7c 2003-09-30 devnull if(_x.display == nil){
214 76193d7c 2003-09-30 devnull disp = getenv("DISPLAY");
215 76193d7c 2003-09-30 devnull werrstr("XOpenDisplay %s: %r", disp ? disp : ":0");
216 76193d7c 2003-09-30 devnull free(disp);
217 76193d7c 2003-09-30 devnull return nil;
219 76193d7c 2003-09-30 devnull XSetErrorHandler(xerror);
220 76193d7c 2003-09-30 devnull XSetIOErrorHandler(xioerror);
221 76193d7c 2003-09-30 devnull xrootid = DefaultScreen(_x.display);
222 76193d7c 2003-09-30 devnull xrootwin = DefaultRootWindow(_x.display);
225 76193d7c 2003-09-30 devnull * Figure out underlying screen format.
227 76193d7c 2003-09-30 devnull if(XMatchVisualInfo(_x.display, xrootid, 16, TrueColor, &xvi)
228 76193d7c 2003-09-30 devnull || XMatchVisualInfo(_x.display, xrootid, 16, DirectColor, &xvi)){
229 76193d7c 2003-09-30 devnull _x.vis = xvi.visual;
230 76193d7c 2003-09-30 devnull _x.depth = 16;
233 161060a4 2003-10-11 devnull if(XMatchVisualInfo(_x.display, xrootid, 15, TrueColor, &xvi)
234 161060a4 2003-10-11 devnull || XMatchVisualInfo(_x.display, xrootid, 15, DirectColor, &xvi)){
235 161060a4 2003-10-11 devnull _x.vis = xvi.visual;
236 161060a4 2003-10-11 devnull _x.depth = 15;
239 76193d7c 2003-09-30 devnull if(XMatchVisualInfo(_x.display, xrootid, 24, TrueColor, &xvi)
240 76193d7c 2003-09-30 devnull || XMatchVisualInfo(_x.display, xrootid, 24, DirectColor, &xvi)){
241 76193d7c 2003-09-30 devnull _x.vis = xvi.visual;
242 76193d7c 2003-09-30 devnull _x.depth = 24;
245 76193d7c 2003-09-30 devnull if(XMatchVisualInfo(_x.display, xrootid, 8, PseudoColor, &xvi)
246 76193d7c 2003-09-30 devnull || XMatchVisualInfo(_x.display, xrootid, 8, StaticColor, &xvi)){
247 76193d7c 2003-09-30 devnull if(_x.depth > 8){
248 76193d7c 2003-09-30 devnull werrstr("can't deal with colormapped depth %d screens",
249 76193d7c 2003-09-30 devnull _x.depth);
250 76193d7c 2003-09-30 devnull goto err0;
252 76193d7c 2003-09-30 devnull _x.vis = xvi.visual;
253 76193d7c 2003-09-30 devnull _x.depth = 8;
256 8ad51794 2004-03-25 devnull _x.depth = DefaultDepth(_x.display, xrootid);
257 76193d7c 2003-09-30 devnull if(_x.depth != 8){
258 76193d7c 2003-09-30 devnull werrstr("can't understand depth %d screen", _x.depth);
259 76193d7c 2003-09-30 devnull goto err0;
261 76193d7c 2003-09-30 devnull _x.vis = DefaultVisual(_x.display, xrootid);
264 8ad51794 2004-03-25 devnull if(DefaultDepth(_x.display, xrootid) == _x.depth)
265 8ad51794 2004-03-25 devnull _x.usetable = 1;
268 76193d7c 2003-09-30 devnull * _x.depth is only the number of significant pixel bits,
269 76193d7c 2003-09-30 devnull * not the total number of pixel bits. We need to walk the
270 76193d7c 2003-09-30 devnull * display list to find how many actual bits are used
271 76193d7c 2003-09-30 devnull * per pixel.
273 76193d7c 2003-09-30 devnull _x.chan = 0;
274 76193d7c 2003-09-30 devnull pfmt = XListPixmapFormats(_x.display, &n);
275 76193d7c 2003-09-30 devnull for(i=0; i<n; i++){
276 76193d7c 2003-09-30 devnull if(pfmt[i].depth == _x.depth){
277 76193d7c 2003-09-30 devnull switch(pfmt[i].bits_per_pixel){
278 76193d7c 2003-09-30 devnull case 1: /* untested */
279 76193d7c 2003-09-30 devnull _x.chan = GREY1;
281 76193d7c 2003-09-30 devnull case 2: /* untested */
282 76193d7c 2003-09-30 devnull _x.chan = GREY2;
284 76193d7c 2003-09-30 devnull case 4: /* untested */
285 76193d7c 2003-09-30 devnull _x.chan = GREY4;
288 76193d7c 2003-09-30 devnull _x.chan = CMAP8;
290 161060a4 2003-10-11 devnull case 15:
291 161060a4 2003-10-11 devnull _x.chan = RGB15;
293 76193d7c 2003-09-30 devnull case 16: /* how to tell RGB15? */
294 76193d7c 2003-09-30 devnull _x.chan = RGB16;
296 76193d7c 2003-09-30 devnull case 24: /* untested (impossible?) */
297 76193d7c 2003-09-30 devnull _x.chan = RGB24;
299 76193d7c 2003-09-30 devnull case 32:
300 76193d7c 2003-09-30 devnull _x.chan = XRGB32;
305 76193d7c 2003-09-30 devnull if(_x.chan == 0){
306 76193d7c 2003-09-30 devnull werrstr("could not determine screen pixel format");
307 76193d7c 2003-09-30 devnull goto err0;
311 76193d7c 2003-09-30 devnull * Set up color map if necessary.
313 76193d7c 2003-09-30 devnull xscreen = DefaultScreenOfDisplay(_x.display);
314 76193d7c 2003-09-30 devnull _x.cmap = DefaultColormapOfScreen(xscreen);
315 76193d7c 2003-09-30 devnull if(_x.vis->class != StaticColor){
316 76193d7c 2003-09-30 devnull plan9cmap();
317 76193d7c 2003-09-30 devnull setupcmap(xrootwin);
321 76193d7c 2003-09-30 devnull * We get to choose the initial rectangle size.
322 76193d7c 2003-09-30 devnull * This is arbitrary. In theory we should read the
323 76193d7c 2003-09-30 devnull * command line and allow the traditional X options.
325 dea58c42 2004-06-17 devnull mask = 0;
328 be36ff68 2004-04-29 devnull if(winsize){
329 be36ff68 2004-04-29 devnull if(parsewinsize(winsize, &r, &havemin) < 0)
330 be36ff68 2004-04-29 devnull sysfatal("%r");
333 dea58c42 2004-06-17 devnull * Parse the various X resources. Thanks to Peter Canning.
335 dea58c42 2004-06-17 devnull char *screen_resources, *display_resources, *geom,
336 dea58c42 2004-06-17 devnull *geomrestype, *home, *file;
337 dea58c42 2004-06-17 devnull XrmDatabase database;
338 dea58c42 2004-06-17 devnull XrmValue geomres;
340 dea58c42 2004-06-17 devnull database = XrmGetDatabase(_x.display);
341 dea58c42 2004-06-17 devnull screen_resources = XScreenResourceString(xscreen);
342 dea58c42 2004-06-17 devnull if(screen_resources != nil){
343 dea58c42 2004-06-17 devnull XrmCombineDatabase(XrmGetStringDatabase(screen_resources), &database, False);
344 dea58c42 2004-06-17 devnull XFree(screen_resources);
347 dea58c42 2004-06-17 devnull display_resources = XResourceManagerString(_x.display);
348 dea58c42 2004-06-17 devnull if(display_resources == nil){
349 c8b6342d 2005-01-13 devnull home = getenv("HOME");
350 e915fe7c 2004-06-24 devnull if(home!=nil && (file=smprint("%s/.Xdefaults", home)) != nil){
351 dea58c42 2004-06-17 devnull XrmCombineFileDatabase(file, &database, False);
352 dea58c42 2004-06-17 devnull free(file);
354 dea58c42 2004-06-17 devnull free(home);
356 dea58c42 2004-06-17 devnull XrmCombineDatabase(XrmGetStringDatabase(display_resources), &database, False);
358 dea58c42 2004-06-17 devnull geom = smprint("%s.geometry", label);
359 dea58c42 2004-06-17 devnull if(geom && XrmGetResource(database, geom, nil, &geomrestype, &geomres))
360 1818ce0f 2005-01-04 devnull mask = XParseGeometry(geomres.addr, &x, &y, (uint*)&width, (uint*)&height);
361 dea58c42 2004-06-17 devnull free(geom);
363 dea58c42 2004-06-17 devnull if((mask & WidthValue) && (mask & HeightValue)){
364 dea58c42 2004-06-17 devnull r = Rect(0, 0, width, height);
366 dea58c42 2004-06-17 devnull r = Rect(0, 0, WidthOfScreen(xscreen)*3/4,
367 dea58c42 2004-06-17 devnull HeightOfScreen(xscreen)*3/4);
368 dea58c42 2004-06-17 devnull if(Dx(r) > Dy(r)*3/2)
369 dea58c42 2004-06-17 devnull r.max.x = r.min.x + Dy(r)*3/2;
370 dea58c42 2004-06-17 devnull if(Dy(r) > Dx(r)*3/2)
371 dea58c42 2004-06-17 devnull r.max.y = r.min.y + Dx(r)*3/2;
373 dea58c42 2004-06-17 devnull if(mask & XNegative){
374 dea58c42 2004-06-17 devnull x += WidthOfScreen(xscreen);
376 dea58c42 2004-06-17 devnull if(mask & YNegative){
377 dea58c42 2004-06-17 devnull y += HeightOfScreen(xscreen);
379 be36ff68 2004-04-29 devnull havemin = 0;
382 76193d7c 2003-09-30 devnull memset(&attr, 0, sizeof attr);
383 76193d7c 2003-09-30 devnull attr.colormap = _x.cmap;
384 161060a4 2003-10-11 devnull attr.background_pixel = ~0;
385 76193d7c 2003-09-30 devnull attr.border_pixel = 0;
386 76193d7c 2003-09-30 devnull _x.drawable = XCreateWindow(
387 76193d7c 2003-09-30 devnull _x.display, /* display */
388 76193d7c 2003-09-30 devnull xrootwin, /* parent */
389 dea58c42 2004-06-17 devnull x, /* x */
390 dea58c42 2004-06-17 devnull y, /* y */
391 76193d7c 2003-09-30 devnull Dx(r), /* width */
392 76193d7c 2003-09-30 devnull Dy(r), /* height */
393 76193d7c 2003-09-30 devnull 0, /* border width */
394 8ad51794 2004-03-25 devnull _x.depth, /* depth */
395 76193d7c 2003-09-30 devnull InputOutput, /* class */
396 76193d7c 2003-09-30 devnull _x.vis, /* visual */
397 76193d7c 2003-09-30 devnull /* valuemask */
398 76193d7c 2003-09-30 devnull CWBackPixel|CWBorderPixel|CWColormap,
399 76193d7c 2003-09-30 devnull &attr /* attributes (the above aren't?!) */
403 76193d7c 2003-09-30 devnull * Label and other properties required by ICCCCM.
405 76193d7c 2003-09-30 devnull memset(&name, 0, sizeof name);
406 76193d7c 2003-09-30 devnull if(label == nil)
407 76193d7c 2003-09-30 devnull label = "pjw-face-here";
408 76193d7c 2003-09-30 devnull name.value = (uchar*)label;
409 76193d7c 2003-09-30 devnull name.encoding = XA_STRING;
410 76193d7c 2003-09-30 devnull name.format = 8;
411 be22ae2d 2004-03-26 devnull name.nitems = strlen((char*)name.value);
413 76193d7c 2003-09-30 devnull memset(&normalhint, 0, sizeof normalhint);
414 be36ff68 2004-04-29 devnull normalhint.flags = PSize|PMaxSize;
415 be36ff68 2004-04-29 devnull if(winsize){
416 be36ff68 2004-04-29 devnull normalhint.flags &= ~PSize;
417 be36ff68 2004-04-29 devnull normalhint.flags |= USSize;
418 be36ff68 2004-04-29 devnull normalhint.width = Dx(r);
419 be36ff68 2004-04-29 devnull normalhint.height = Dy(r);
421 dea58c42 2004-06-17 devnull if((mask & WidthValue) && (mask & HeightValue)){
422 dea58c42 2004-06-17 devnull normalhint.flags &= ~PSize;
423 dea58c42 2004-06-17 devnull normalhint.flags |= USSize;
424 dea58c42 2004-06-17 devnull normalhint.width = width;
425 dea58c42 2004-06-17 devnull normalhint.height = height;
427 dea58c42 2004-06-17 devnull if((mask & WidthValue) && (mask & HeightValue)){
428 dea58c42 2004-06-17 devnull normalhint.flags |= USPosition;
429 dea58c42 2004-06-17 devnull normalhint.x = x;
430 dea58c42 2004-06-17 devnull normalhint.y = y;
434 76193d7c 2003-09-30 devnull normalhint.max_width = WidthOfScreen(xscreen);
435 76193d7c 2003-09-30 devnull normalhint.max_height = HeightOfScreen(xscreen);
437 76193d7c 2003-09-30 devnull memset(&hint, 0, sizeof hint);
438 76193d7c 2003-09-30 devnull hint.flags = InputHint|StateHint;
439 76193d7c 2003-09-30 devnull hint.input = 1;
440 76193d7c 2003-09-30 devnull hint.initial_state = NormalState;
442 76193d7c 2003-09-30 devnull memset(&classhint, 0, sizeof classhint);
443 76193d7c 2003-09-30 devnull classhint.res_name = label;
444 76193d7c 2003-09-30 devnull classhint.res_class = label;
446 76193d7c 2003-09-30 devnull argv[0] = label;
447 76193d7c 2003-09-30 devnull argv[1] = nil;
449 76193d7c 2003-09-30 devnull XSetWMProperties(
450 76193d7c 2003-09-30 devnull _x.display, /* display */
451 76193d7c 2003-09-30 devnull _x.drawable, /* window */
452 76193d7c 2003-09-30 devnull &name, /* XA_WM_NAME property */
453 76193d7c 2003-09-30 devnull &name, /* XA_WM_ICON_NAME property */
454 76193d7c 2003-09-30 devnull argv, /* XA_WM_COMMAND */
455 76193d7c 2003-09-30 devnull 1, /* argc */
456 76193d7c 2003-09-30 devnull &normalhint, /* XA_WM_NORMAL_HINTS */
457 76193d7c 2003-09-30 devnull &hint, /* XA_WM_HINTS */
458 76193d7c 2003-09-30 devnull &classhint /* XA_WM_CLASSHINTS */
460 76193d7c 2003-09-30 devnull XFlush(_x.display);
462 be36ff68 2004-04-29 devnull if(havemin){
463 be36ff68 2004-04-29 devnull XWindowChanges ch;
465 be36ff68 2004-04-29 devnull memset(&ch, 0, sizeof ch);
466 be36ff68 2004-04-29 devnull ch.x = r.min.x;
467 be36ff68 2004-04-29 devnull ch.y = r.min.y;
468 be36ff68 2004-04-29 devnull XConfigureWindow(_x.display, _x.drawable, CWX|CWY, &ch);
470 57d26136 2005-01-26 devnull * Must pretend origin is 0,0 for X.
472 57d26136 2005-01-26 devnull r = Rect(0,0,Dx(r),Dy(r));
475 4f30f3b4 2004-03-30 devnull * Look up clipboard atom.
477 4f30f3b4 2004-03-30 devnull _x.clipboard = XInternAtom(_x.display, "CLIPBOARD", False);
478 4f30f3b4 2004-03-30 devnull _x.utf8string = XInternAtom(_x.display, "UTF8_STRING", False);
479 4f30f3b4 2004-03-30 devnull _x.targets = XInternAtom(_x.display, "TARGETS", False);
480 4f30f3b4 2004-03-30 devnull _x.text = XInternAtom(_x.display, "TEXT", False);
481 4f30f3b4 2004-03-30 devnull _x.compoundtext = XInternAtom(_x.display, "COMPOUND_TEXT", False);
482 4f30f3b4 2004-03-30 devnull _x.takefocus = XInternAtom(_x.display, "WM_TAKE_FOCUS", False);
483 4f30f3b4 2004-03-30 devnull _x.losefocus = XInternAtom(_x.display, "_9WM_LOSE_FOCUS", False);
484 4f30f3b4 2004-03-30 devnull _x.wmprotos = XInternAtom(_x.display, "WM_PROTOCOLS", False);
486 4f30f3b4 2004-03-30 devnull atoms[0] = _x.takefocus;
487 4f30f3b4 2004-03-30 devnull atoms[1] = _x.losefocus;
488 4f30f3b4 2004-03-30 devnull XChangeProperty(_x.display, _x.drawable, _x.wmprotos, XA_ATOM, 32,
489 4f30f3b4 2004-03-30 devnull PropModeReplace, (uchar*)atoms, 2);
492 4f30f3b4 2004-03-30 devnull * Put the window on the screen, check to see what size we actually got.
494 4f30f3b4 2004-03-30 devnull XMapWindow(_x.display, _x.drawable);
495 4f30f3b4 2004-03-30 devnull XSync(_x.display, False);
497 4f30f3b4 2004-03-30 devnull if(!XGetWindowAttributes(_x.display, _x.drawable, &wattr))
498 4f30f3b4 2004-03-30 devnull fprint(2, "XGetWindowAttributes failed\n");
499 4f30f3b4 2004-03-30 devnull else if(wattr.width && wattr.height){
500 4f30f3b4 2004-03-30 devnull if(wattr.width != Dx(r) || wattr.height != Dy(r)){
501 4f30f3b4 2004-03-30 devnull r.max.x = wattr.width;
502 4f30f3b4 2004-03-30 devnull r.max.y = wattr.height;
505 1ed1c638 2004-03-31 devnull fprint(2, "XGetWindowAttributes: bad attrs\n");
508 76193d7c 2003-09-30 devnull * Allocate our local backing store.
510 76193d7c 2003-09-30 devnull _x.screenr = r;
511 76193d7c 2003-09-30 devnull _x.screenpm = XCreatePixmap(_x.display, _x.drawable, Dx(r), Dy(r), _x.depth);
512 161060a4 2003-10-11 devnull _x.nextscreenpm = _x.screenpm;
513 32f69c36 2003-12-11 devnull _x.screenimage = _xallocmemimage(r, _x.chan, _x.screenpm);
516 76193d7c 2003-09-30 devnull * Allocate some useful graphics contexts for the future.
518 76193d7c 2003-09-30 devnull _x.gcfill = xgc(_x.screenpm, FillSolid, -1);
519 76193d7c 2003-09-30 devnull _x.gccopy = xgc(_x.screenpm, -1, -1);
520 76193d7c 2003-09-30 devnull _x.gcsimplesrc = xgc(_x.screenpm, FillStippled, -1);
521 76193d7c 2003-09-30 devnull _x.gczero = xgc(_x.screenpm, -1, -1);
522 76193d7c 2003-09-30 devnull _x.gcreplsrc = xgc(_x.screenpm, FillTiled, -1);
524 76193d7c 2003-09-30 devnull pmid = XCreatePixmap(_x.display, _x.drawable, 1, 1, 1);
525 76193d7c 2003-09-30 devnull _x.gcfill0 = xgc(pmid, FillSolid, 0);
526 76193d7c 2003-09-30 devnull _x.gccopy0 = xgc(pmid, -1, -1);
527 76193d7c 2003-09-30 devnull _x.gcsimplesrc0 = xgc(pmid, FillStippled, -1);
528 76193d7c 2003-09-30 devnull _x.gczero0 = xgc(pmid, -1, -1);
529 76193d7c 2003-09-30 devnull _x.gcreplsrc0 = xgc(pmid, FillTiled, -1);
530 76193d7c 2003-09-30 devnull XFreePixmap(_x.display, pmid);
533 161060a4 2003-10-11 devnull * Lots of display connections for various procs.
535 76193d7c 2003-09-30 devnull _x.kbdcon = XOpenDisplay(NULL);
536 76193d7c 2003-09-30 devnull _x.mousecon = XOpenDisplay(NULL);
537 76193d7c 2003-09-30 devnull _x.snarfcon = XOpenDisplay(NULL);
539 161060a4 2003-10-11 devnull if(0) fprint(2, "x: display=%p kbd=%p mouse=%p snarf=%p\n",
540 161060a4 2003-10-11 devnull _x.display, _x.kbdcon, _x.mousecon, _x.snarfcon);
542 76193d7c 2003-09-30 devnull _x.black = xscreen->black_pixel;
543 76193d7c 2003-09-30 devnull _x.white = xscreen->white_pixel;
545 76193d7c 2003-09-30 devnull return _x.screenimage;
548 161060a4 2003-10-11 devnull fprint(2, "%r\n");
550 76193d7c 2003-09-30 devnull * Should do a better job of cleaning up here.
552 76193d7c 2003-09-30 devnull XCloseDisplay(_x.display);
553 76193d7c 2003-09-30 devnull return nil;
557 1818ce0f 2005-01-04 devnull drawsetlabel(char *label)
559 16a70966 2003-11-23 devnull XTextProperty name;
562 16a70966 2003-11-23 devnull * Label and other properties required by ICCCCM.
564 16a70966 2003-11-23 devnull memset(&name, 0, sizeof name);
565 16a70966 2003-11-23 devnull if(label == nil)
566 16a70966 2003-11-23 devnull label = "pjw-face-here";
567 16a70966 2003-11-23 devnull name.value = (uchar*)label;
568 16a70966 2003-11-23 devnull name.encoding = XA_STRING;
569 16a70966 2003-11-23 devnull name.format = 8;
570 be22ae2d 2004-03-26 devnull name.nitems = strlen((char*)name.value);
572 16a70966 2003-11-23 devnull XSetWMProperties(
573 16a70966 2003-11-23 devnull _x.display, /* display */
574 16a70966 2003-11-23 devnull _x.drawable, /* window */
575 16a70966 2003-11-23 devnull &name, /* XA_WM_NAME property */
576 16a70966 2003-11-23 devnull &name, /* XA_WM_ICON_NAME property */
577 931ba0b7 2005-01-07 devnull nil, /* XA_WM_COMMAND */
578 931ba0b7 2005-01-07 devnull 0, /* argc */
579 16a70966 2003-11-23 devnull nil, /* XA_WM_NORMAL_HINTS */
580 16a70966 2003-11-23 devnull nil, /* XA_WM_HINTS */
581 931ba0b7 2005-01-07 devnull nil /* XA_WM_CLASSHINTS */
583 16a70966 2003-11-23 devnull XFlush(_x.display);
584 16a70966 2003-11-23 devnull return 0;
588 76193d7c 2003-09-30 devnull * Create a GC with a particular fill style and XXX.
589 76193d7c 2003-09-30 devnull * Disable generation of GraphicsExpose/NoExpose events in the GC.
591 76193d7c 2003-09-30 devnull static XGC
592 76193d7c 2003-09-30 devnull xgc(XDrawable d, int fillstyle, int foreground)
595 76193d7c 2003-09-30 devnull XGCValues v;
597 76193d7c 2003-09-30 devnull memset(&v, 0, sizeof v);
598 76193d7c 2003-09-30 devnull v.function = GXcopy;
599 76193d7c 2003-09-30 devnull v.graphics_exposures = False;
600 76193d7c 2003-09-30 devnull gc = XCreateGC(_x.display, d, GCFunction|GCGraphicsExposures, &v);
601 76193d7c 2003-09-30 devnull if(fillstyle != -1)
602 76193d7c 2003-09-30 devnull XSetFillStyle(_x.display, gc, fillstyle);
603 76193d7c 2003-09-30 devnull if(foreground != -1)
604 76193d7c 2003-09-30 devnull XSetForeground(_x.display, gc, 0);
605 76193d7c 2003-09-30 devnull return gc;
610 76193d7c 2003-09-30 devnull * Initialize map with the Plan 9 rgbv color map.
612 76193d7c 2003-09-30 devnull static void
613 76193d7c 2003-09-30 devnull plan9cmap(void)
615 76193d7c 2003-09-30 devnull int r, g, b, cr, cg, cb, v, num, den, idx, v7, idx7;
616 76193d7c 2003-09-30 devnull static int once;
618 76193d7c 2003-09-30 devnull if(once)
620 76193d7c 2003-09-30 devnull once = 1;
622 76193d7c 2003-09-30 devnull for(r=0; r!=4; r++)
623 76193d7c 2003-09-30 devnull for(g = 0; g != 4; g++)
624 76193d7c 2003-09-30 devnull for(b = 0; b!=4; b++)
625 76193d7c 2003-09-30 devnull for(v = 0; v!=4; v++){
627 76193d7c 2003-09-30 devnull if(g > den)
629 76193d7c 2003-09-30 devnull if(b > den)
631 76193d7c 2003-09-30 devnull /* divide check -- pick grey shades */
632 76193d7c 2003-09-30 devnull if(den==0)
633 76193d7c 2003-09-30 devnull cr=cg=cb=v*17;
635 76193d7c 2003-09-30 devnull num=17*(4*den+v);
636 76193d7c 2003-09-30 devnull cr=r*num/den;
637 76193d7c 2003-09-30 devnull cg=g*num/den;
638 76193d7c 2003-09-30 devnull cb=b*num/den;
640 76193d7c 2003-09-30 devnull idx = r*64 + v*16 + ((g*4 + b + v - r) & 15);
641 76193d7c 2003-09-30 devnull _x.map[idx].red = cr*0x0101;
642 76193d7c 2003-09-30 devnull _x.map[idx].green = cg*0x0101;
643 76193d7c 2003-09-30 devnull _x.map[idx].blue = cb*0x0101;
644 76193d7c 2003-09-30 devnull _x.map[idx].pixel = idx;
645 76193d7c 2003-09-30 devnull _x.map[idx].flags = DoRed|DoGreen|DoBlue;
647 76193d7c 2003-09-30 devnull v7 = v >> 1;
648 76193d7c 2003-09-30 devnull idx7 = r*32 + v7*16 + g*4 + b;
649 76193d7c 2003-09-30 devnull if((v & 1) == v7){
650 76193d7c 2003-09-30 devnull _x.map7to8[idx7][0] = idx;
651 76193d7c 2003-09-30 devnull if(den == 0) { /* divide check -- pick grey shades */
652 76193d7c 2003-09-30 devnull cr = ((255.0/7.0)*v7)+0.5;
653 76193d7c 2003-09-30 devnull cg = cr;
654 76193d7c 2003-09-30 devnull cb = cr;
657 76193d7c 2003-09-30 devnull num=17*15*(4*den+v7*2)/14;
658 76193d7c 2003-09-30 devnull cr=r*num/den;
659 76193d7c 2003-09-30 devnull cg=g*num/den;
660 76193d7c 2003-09-30 devnull cb=b*num/den;
662 76193d7c 2003-09-30 devnull _x.map7[idx7].red = cr*0x0101;
663 76193d7c 2003-09-30 devnull _x.map7[idx7].green = cg*0x0101;
664 76193d7c 2003-09-30 devnull _x.map7[idx7].blue = cb*0x0101;
665 76193d7c 2003-09-30 devnull _x.map7[idx7].pixel = idx7;
666 76193d7c 2003-09-30 devnull _x.map7[idx7].flags = DoRed|DoGreen|DoBlue;
669 76193d7c 2003-09-30 devnull _x.map7to8[idx7][1] = idx;
674 76193d7c 2003-09-30 devnull * Initialize and install the rgbv color map as a private color map
675 76193d7c 2003-09-30 devnull * for this application. It gets the best colors when it has the
676 76193d7c 2003-09-30 devnull * cursor focus.
678 fff395d7 2004-03-26 devnull * We always choose the best depth possible, but that might not
679 fff395d7 2004-03-26 devnull * be the default depth. On such "suboptimal" systems, we have to allocate an
680 fff395d7 2004-03-26 devnull * empty color map anyway, according to Axel Belinfante.
682 76193d7c 2003-09-30 devnull static int
683 76193d7c 2003-09-30 devnull setupcmap(XWindow w)
685 76193d7c 2003-09-30 devnull char buf[30];
687 76193d7c 2003-09-30 devnull u32int p, pp;
688 76193d7c 2003-09-30 devnull XColor c;
690 76193d7c 2003-09-30 devnull if(_x.depth <= 1)
691 76193d7c 2003-09-30 devnull return 0;
693 76193d7c 2003-09-30 devnull if(_x.depth >= 24) {
694 fff395d7 2004-03-26 devnull if(_x.usetable == 0)
695 fff395d7 2004-03-26 devnull _x.cmap = XCreateColormap(_x.display, w, _x.vis, AllocNone);
698 76193d7c 2003-09-30 devnull * The pixel value returned from XGetPixel needs to
699 76193d7c 2003-09-30 devnull * be converted to RGB so we can call rgb2cmap()
700 76193d7c 2003-09-30 devnull * to translate between 24 bit X and our color. Unfortunately,
701 76193d7c 2003-09-30 devnull * the return value appears to be display server endian
702 76193d7c 2003-09-30 devnull * dependant. Therefore, we run some heuristics to later
703 76193d7c 2003-09-30 devnull * determine how to mask the int value correctly.
704 76193d7c 2003-09-30 devnull * Yeah, I know we can look at _x.vis->byte_order but
705 76193d7c 2003-09-30 devnull * some displays say MSB even though they run on LSB.
706 76193d7c 2003-09-30 devnull * Besides, this is more anal.
708 76193d7c 2003-09-30 devnull c = _x.map[19]; /* known to have different R, G, B values */
709 76193d7c 2003-09-30 devnull if(!XAllocColor(_x.display, _x.cmap, &c)){
710 76193d7c 2003-09-30 devnull werrstr("XAllocColor: %r");
711 76193d7c 2003-09-30 devnull return -1;
713 76193d7c 2003-09-30 devnull p = c.pixel;
714 76193d7c 2003-09-30 devnull pp = rgb2cmap((p>>16)&0xff,(p>>8)&0xff,p&0xff);
715 76193d7c 2003-09-30 devnull if(pp != _x.map[19].pixel) {
716 76193d7c 2003-09-30 devnull /* check if endian is other way */
717 76193d7c 2003-09-30 devnull pp = rgb2cmap(p&0xff,(p>>8)&0xff,(p>>16)&0xff);
718 76193d7c 2003-09-30 devnull if(pp != _x.map[19].pixel){
719 76193d7c 2003-09-30 devnull werrstr("cannot detect X server byte order");
720 76193d7c 2003-09-30 devnull return -1;
723 76193d7c 2003-09-30 devnull switch(_x.chan){
724 76193d7c 2003-09-30 devnull case RGB24:
725 76193d7c 2003-09-30 devnull _x.chan = BGR24;
727 76193d7c 2003-09-30 devnull case XRGB32:
728 76193d7c 2003-09-30 devnull _x.chan = XBGR32;
730 76193d7c 2003-09-30 devnull default:
731 76193d7c 2003-09-30 devnull werrstr("cannot byteswap channel %s",
732 76193d7c 2003-09-30 devnull chantostr(buf, _x.chan));
736 76193d7c 2003-09-30 devnull }else if(_x.vis->class == TrueColor || _x.vis->class == DirectColor){
738 76193d7c 2003-09-30 devnull * Do nothing. We have no way to express a
739 76193d7c 2003-09-30 devnull * mixed-endian 16-bit screen, so pretend they don't exist.
741 fff395d7 2004-03-26 devnull if(_x.usetable == 0)
742 fff395d7 2004-03-26 devnull _x.cmap = XCreateColormap(_x.display, w, _x.vis, AllocNone);
743 76193d7c 2003-09-30 devnull }else if(_x.vis->class == PseudoColor){
744 76193d7c 2003-09-30 devnull if(_x.usetable == 0){
745 76193d7c 2003-09-30 devnull _x.cmap = XCreateColormap(_x.display, w, _x.vis, AllocAll);
746 76193d7c 2003-09-30 devnull XStoreColors(_x.display, _x.cmap, _x.map, 256);
747 76193d7c 2003-09-30 devnull for(i = 0; i < 256; i++){
748 76193d7c 2003-09-30 devnull _x.tox11[i] = i;
749 76193d7c 2003-09-30 devnull _x.toplan9[i] = i;
752 76193d7c 2003-09-30 devnull for(i = 0; i < 128; i++){
753 76193d7c 2003-09-30 devnull c = _x.map7[i];
754 76193d7c 2003-09-30 devnull if(!XAllocColor(_x.display, _x.cmap, &c)){
755 76193d7c 2003-09-30 devnull werrstr("can't allocate colors in 7-bit map");
756 76193d7c 2003-09-30 devnull return -1;
758 76193d7c 2003-09-30 devnull _x.tox11[_x.map7to8[i][0]] = c.pixel;
759 76193d7c 2003-09-30 devnull _x.tox11[_x.map7to8[i][1]] = c.pixel;
760 76193d7c 2003-09-30 devnull _x.toplan9[c.pixel] = _x.map7to8[i][0];
764 76193d7c 2003-09-30 devnull werrstr("unsupported visual class %d", _x.vis->class);
765 76193d7c 2003-09-30 devnull return -1;
767 76193d7c 2003-09-30 devnull return 0;
771 1818ce0f 2005-01-04 devnull _flushmemscreen(Rectangle r)
773 161060a4 2003-10-11 devnull if(_x.nextscreenpm != _x.screenpm){
774 161060a4 2003-10-11 devnull qlock(&_x.screenlock);
775 161060a4 2003-10-11 devnull XSync(_x.display, False);
776 161060a4 2003-10-11 devnull XFreePixmap(_x.display, _x.screenpm);
777 161060a4 2003-10-11 devnull _x.screenpm = _x.nextscreenpm;
778 161060a4 2003-10-11 devnull qunlock(&_x.screenlock);
781 76193d7c 2003-09-30 devnull if(r.min.x >= r.max.x || r.min.y >= r.max.y)
783 76193d7c 2003-09-30 devnull XCopyArea(_x.display, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
784 76193d7c 2003-09-30 devnull Dx(r), Dy(r), r.min.x, r.min.y);
785 76193d7c 2003-09-30 devnull XFlush(_x.display);
789 32f69c36 2003-12-11 devnull _xexpose(XEvent *e, XDisplay *xd)
791 76193d7c 2003-09-30 devnull XExposeEvent *xe;
792 76193d7c 2003-09-30 devnull Rectangle r;
794 161060a4 2003-10-11 devnull qlock(&_x.screenlock);
795 161060a4 2003-10-11 devnull if(_x.screenpm != _x.nextscreenpm){
796 161060a4 2003-10-11 devnull qunlock(&_x.screenlock);
799 76193d7c 2003-09-30 devnull xe = (XExposeEvent*)e;
800 76193d7c 2003-09-30 devnull r.min.x = xe->x;
801 76193d7c 2003-09-30 devnull r.min.y = xe->y;
802 76193d7c 2003-09-30 devnull r.max.x = xe->x+xe->width;
803 76193d7c 2003-09-30 devnull r.max.y = xe->y+xe->height;
804 76193d7c 2003-09-30 devnull XCopyArea(xd, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
805 76193d7c 2003-09-30 devnull Dx(r), Dy(r), r.min.x, r.min.y);
806 161060a4 2003-10-11 devnull XSync(xd, False);
807 161060a4 2003-10-11 devnull qunlock(&_x.screenlock);
811 32f69c36 2003-12-11 devnull _xdestroy(XEvent *e, XDisplay *xd)
813 16a70966 2003-11-23 devnull XDestroyWindowEvent *xe;
815 16a70966 2003-11-23 devnull xe = (XDestroyWindowEvent*)e;
816 16a70966 2003-11-23 devnull if(xe->window == _x.drawable){
817 16a70966 2003-11-23 devnull _x.destroyed = 1;
818 16a70966 2003-11-23 devnull return 1;
820 16a70966 2003-11-23 devnull return 0;
824 32f69c36 2003-12-11 devnull _xconfigure(XEvent *e, XDisplay *xd)
826 161060a4 2003-10-11 devnull Rectangle r;
827 76193d7c 2003-09-30 devnull XConfigureEvent *xe = (XConfigureEvent*)e;
829 76193d7c 2003-09-30 devnull if(xe->width == Dx(_x.screenr) && xe->height == Dy(_x.screenr))
830 76193d7c 2003-09-30 devnull return 0;
831 161060a4 2003-10-11 devnull if(xe->width==0 || xe->height==0)
832 161060a4 2003-10-11 devnull fprint(2, "ignoring resize to %dx%d\n", xe->width, xe->height);
833 161060a4 2003-10-11 devnull r = Rect(0, 0, xe->width, xe->height);
834 161060a4 2003-10-11 devnull qlock(&_x.screenlock);
835 161060a4 2003-10-11 devnull if(_x.screenpm != _x.nextscreenpm){
836 161060a4 2003-10-11 devnull XCopyArea(xd, _x.screenpm, _x.drawable, _x.gccopy, r.min.x, r.min.y,
837 161060a4 2003-10-11 devnull Dx(r), Dy(r), r.min.x, r.min.y);
838 161060a4 2003-10-11 devnull XSync(xd, False);
840 161060a4 2003-10-11 devnull qunlock(&_x.screenlock);
841 161060a4 2003-10-11 devnull _x.newscreenr = r;
842 d4853cf4 2003-10-01 devnull return 1;
845 d4853cf4 2003-10-01 devnull static int
846 d4853cf4 2003-10-01 devnull xreplacescreenimage(void)
848 d4853cf4 2003-10-01 devnull Memimage *m;
849 d4853cf4 2003-10-01 devnull XDrawable pixmap;
850 d4853cf4 2003-10-01 devnull Rectangle r;
852 d4853cf4 2003-10-01 devnull r = _x.newscreenr;
853 d4853cf4 2003-10-01 devnull if(eqrect(_x.screenr, r))
854 d4853cf4 2003-10-01 devnull return 0;
856 d4853cf4 2003-10-01 devnull pixmap = XCreatePixmap(_x.display, _x.drawable, Dx(r), Dy(r), _x.depth);
857 32f69c36 2003-12-11 devnull m = _xallocmemimage(r, _x.chan, pixmap);
858 161060a4 2003-10-11 devnull if(_x.nextscreenpm != _x.screenpm)
859 161060a4 2003-10-11 devnull XFreePixmap(_x.display, _x.nextscreenpm);
860 161060a4 2003-10-11 devnull _x.nextscreenpm = pixmap;
861 d4853cf4 2003-10-01 devnull _x.screenr = r;
862 76193d7c 2003-09-30 devnull _drawreplacescreenimage(m);
863 76193d7c 2003-09-30 devnull return 1;
866 be36ff68 2004-04-29 devnull static int
867 be36ff68 2004-04-29 devnull parsewinsize(char *s, Rectangle *r, int *havemin)
869 be36ff68 2004-04-29 devnull char c, *os;
870 be36ff68 2004-04-29 devnull int i, j, k, l;
873 be36ff68 2004-04-29 devnull *havemin = 0;
874 be36ff68 2004-04-29 devnull *r = Rect(0,0,0,0);
875 be36ff68 2004-04-29 devnull if(!isdigit(*s))
876 be36ff68 2004-04-29 devnull goto oops;
877 be36ff68 2004-04-29 devnull i = strtol(s, &s, 0);
878 be36ff68 2004-04-29 devnull if(*s == 'x'){
880 be36ff68 2004-04-29 devnull if(!isdigit(*s))
881 be36ff68 2004-04-29 devnull goto oops;
882 be36ff68 2004-04-29 devnull j = strtol(s, &s, 0);
883 be36ff68 2004-04-29 devnull r->max.x = i;
884 be36ff68 2004-04-29 devnull r->max.y = j;
885 be36ff68 2004-04-29 devnull if(*s == 0)
886 be36ff68 2004-04-29 devnull return 0;
887 be36ff68 2004-04-29 devnull if(*s != '@')
888 be36ff68 2004-04-29 devnull goto oops;
891 be36ff68 2004-04-29 devnull if(!isdigit(*s))
892 be36ff68 2004-04-29 devnull goto oops;
893 be36ff68 2004-04-29 devnull i = strtol(s, &s, 0);
894 be36ff68 2004-04-29 devnull if(*s != ',' && *s != ' ')
895 be36ff68 2004-04-29 devnull goto oops;
897 be36ff68 2004-04-29 devnull if(!isdigit(*s))
898 be36ff68 2004-04-29 devnull goto oops;
899 be36ff68 2004-04-29 devnull j = strtol(s, &s, 0);
900 be36ff68 2004-04-29 devnull if(*s != 0)
901 be36ff68 2004-04-29 devnull goto oops;
902 be36ff68 2004-04-29 devnull *r = rectaddpt(*r, Pt(i,j));
903 be36ff68 2004-04-29 devnull *havemin = 1;
904 be36ff68 2004-04-29 devnull return 0;
908 be36ff68 2004-04-29 devnull if(c != ' ' && c != ',')
909 be36ff68 2004-04-29 devnull goto oops;
911 be36ff68 2004-04-29 devnull if(!isdigit(*s))
912 be36ff68 2004-04-29 devnull goto oops;
913 be36ff68 2004-04-29 devnull j = strtol(s, &s, 0);
914 be36ff68 2004-04-29 devnull if(*s != c)
915 be36ff68 2004-04-29 devnull goto oops;
917 be36ff68 2004-04-29 devnull if(!isdigit(*s))
918 be36ff68 2004-04-29 devnull goto oops;
919 be36ff68 2004-04-29 devnull k = strtol(s, &s, 0);
920 be36ff68 2004-04-29 devnull if(*s != c)
921 be36ff68 2004-04-29 devnull goto oops;
923 be36ff68 2004-04-29 devnull if(!isdigit(*s))
924 be36ff68 2004-04-29 devnull goto oops;
925 be36ff68 2004-04-29 devnull l = strtol(s, &s, 0);
926 be36ff68 2004-04-29 devnull if(*s != 0)
927 be36ff68 2004-04-29 devnull goto oops;
928 be36ff68 2004-04-29 devnull *r = Rect(i,j,k,l);
929 be36ff68 2004-04-29 devnull *havemin = 1;
930 be36ff68 2004-04-29 devnull return 0;
933 be36ff68 2004-04-29 devnull werrstr("bad syntax in window size '%s'", os);
934 be36ff68 2004-04-29 devnull return -1;
