ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/x11.c
Revision: 2.8
Committed: Wed Sep 16 16:15:42 1992 UTC (31 years, 7 months ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 2.7: +8 -5 lines
Log Message:
test for unmapped window in 24-bit mode

File Contents

# Content
1 /* Copyright (c) 1992 Regents of the University of California */
2
3 #ifndef lint
4 static char SCCSid[] = "$SunId$ LBL";
5 #endif
6
7 /*
8 * x11.c - driver for X-windows version 11
9 *
10 * Jan 1990
11 */
12
13 #include <stdio.h>
14
15 #include <sys/ioctl.h>
16
17 #include <X11/Xlib.h>
18 #include <X11/cursorfont.h>
19 #include <X11/Xutil.h>
20
21 #include "color.h"
22 #include "driver.h"
23 #include "x11twind.h"
24 #include "x11icon.h"
25
26 #define GAMMA 2.2 /* default exponent correction */
27
28 #define MINWIDTH (32*COMCW) /* minimum graphics window width */
29 #define MINHEIGHT MINWIDTH /* minimum graphics window height */
30
31 #define BORWIDTH 5 /* border width */
32 #define COMHEIGHT (COMLH*COMCH) /* command line height (pixels) */
33
34 #define COMFN "8x13" /* command line font name */
35 #define COMLH 3 /* number of command lines */
36 #define COMCW 8 /* approx. character width (pixels) */
37 #define COMCH 14 /* approx. character height (pixels) */
38
39 #define ourscreen DefaultScreen(ourdisplay)
40 #define ourroot RootWindow(ourdisplay,ourscreen)
41
42 #define levptr(etype) ((etype *)&currentevent)
43
44 static XEvent currentevent; /* current event */
45
46 static int ncolors = 0; /* color table size */
47 static int mapped = 0; /* window is mapped? */
48 static unsigned long *pixval = NULL; /* allocated pixels */
49 static unsigned long ourblack=0, ourwhite=1;
50
51 static Display *ourdisplay = NULL; /* our display */
52
53 static XVisualInfo ourvinfo; /* our visual information */
54
55 static Window gwind = 0; /* our graphics window */
56
57 static Cursor pickcursor = 0; /* cursor used for picking */
58
59 static int gwidth, gheight; /* graphics window size */
60
61 static TEXTWIND *comline = NULL; /* our command line */
62
63 static char c_queue[64]; /* input queue */
64 static int c_first = 0; /* first character in queue */
65 static int c_last = 0; /* last character in queue */
66
67 static GC ourgc = 0; /* our graphics context for drawing */
68
69 static Colormap ourmap = 0; /* our color map */
70
71 extern char *malloc(), *getcombuf();
72
73 static int x11_close(), x11_clear(), x11_paintr(), x11_errout(),
74 x11_getcur(), x11_comout(), x11_comin(), x11_flush();
75
76 static struct driver x11_driver = {
77 x11_close, x11_clear, x11_paintr, x11_getcur,
78 x11_comout, x11_comin, x11_flush, 1.0
79 };
80
81
82 struct driver *
83 x11_init(name, id) /* initialize driver */
84 char *name, *id;
85 {
86 extern char *getenv();
87 char *gv;
88 int nplanes;
89 XSetWindowAttributes ourwinattr;
90 XWMHints ourxwmhints;
91 XSizeHints oursizhints;
92
93 ourdisplay = XOpenDisplay(NULL);
94 if (ourdisplay == NULL) {
95 stderr_v("cannot open X-windows; DISPLAY variable set?\n");
96 return(NULL);
97 }
98 /* find a usable visual */
99 nplanes = DisplayPlanes(ourdisplay, ourscreen);
100 if (XMatchVisualInfo(ourdisplay,ourscreen,
101 24,TrueColor,&ourvinfo) ||
102 XMatchVisualInfo(ourdisplay,ourscreen,
103 24,DirectColor,&ourvinfo)) {
104 ourblack = 0;
105 ourwhite = ourvinfo.red_mask |
106 ourvinfo.green_mask |
107 ourvinfo.blue_mask ;
108 } else {
109 if (nplanes < 4) {
110 stderr_v("not enough colors\n");
111 return(NULL);
112 }
113 if (!XMatchVisualInfo(ourdisplay,ourscreen,
114 nplanes,PseudoColor,&ourvinfo) &&
115 !XMatchVisualInfo(ourdisplay,ourscreen,
116 nplanes,GrayScale,&ourvinfo)) {
117 stderr_v("unsupported visual type\n");
118 return(NULL);
119 }
120 ourblack = BlackPixel(ourdisplay,ourscreen);
121 ourwhite = WhitePixel(ourdisplay,ourscreen);
122 }
123 /* set gamma */
124 if ((gv = getenv("GAMMA")) != NULL)
125 make_gmap(atof(gv));
126 else
127 make_gmap(GAMMA);
128 /* open window */
129 ourwinattr.background_pixel = ourblack;
130 ourwinattr.border_pixel = ourblack;
131 /* this is stupid */
132 ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
133 ourvinfo.visual, AllocNone);
134 gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
135 DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
136 DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
137 BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
138 CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
139 if (gwind == 0) {
140 stderr_v("cannot create window\n");
141 return(NULL);
142 }
143 XStoreName(ourdisplay, gwind, id);
144 /* create a cursor */
145 pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
146 ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
147 ourxwmhints.flags = InputHint|IconPixmapHint;
148 ourxwmhints.input = True;
149 ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
150 gwind, x11icon_bits, x11icon_width, x11icon_height);
151 XSetWMHints(ourdisplay, gwind, &ourxwmhints);
152 oursizhints.min_width = MINWIDTH;
153 oursizhints.min_height = MINHEIGHT+COMHEIGHT;
154 oursizhints.flags = PMinSize;
155 XSetNormalHints(ourdisplay, gwind, &oursizhints);
156 XSelectInput(ourdisplay, gwind, ExposureMask);
157 XMapWindow(ourdisplay, gwind);
158 XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
159 gwidth = levptr(XExposeEvent)->width;
160 gheight = levptr(XExposeEvent)->height - COMHEIGHT;
161 x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
162 x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
163 x11_driver.inpready = 0;
164 mapped = 1;
165 cmdvec = x11_comout; /* set error vectors */
166 if (wrnvec != NULL)
167 wrnvec = x11_errout;
168 return(&x11_driver);
169 }
170
171
172 static
173 x11_close() /* close our display */
174 {
175 cmdvec = NULL; /* reset error vectors */
176 if (wrnvec != NULL)
177 wrnvec = stderr_v;
178 if (ourdisplay == NULL)
179 return;
180 if (comline != NULL) {
181 xt_close(comline);
182 comline = NULL;
183 }
184 freepixels();
185 XFreeGC(ourdisplay, ourgc);
186 XDestroyWindow(ourdisplay, gwind);
187 gwind = 0;
188 ourgc = 0;
189 XFreeCursor(ourdisplay, pickcursor);
190 XCloseDisplay(ourdisplay);
191 ourdisplay = NULL;
192 }
193
194
195 static
196 x11_clear(xres, yres) /* clear our display */
197 int xres, yres;
198 {
199 /* check limits */
200 if (xres < MINWIDTH)
201 xres = MINWIDTH;
202 if (yres < MINHEIGHT)
203 yres = MINHEIGHT;
204 /* resize window */
205 if (xres != gwidth || yres != gheight) {
206 XSelectInput(ourdisplay, gwind, 0);
207 XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
208 gwidth = xres;
209 gheight = yres;
210 XFlush(ourdisplay);
211 sleep(2); /* wait for window manager */
212 XSync(ourdisplay, 1); /* discard input */
213 }
214 XClearWindow(ourdisplay, gwind);
215 /* reinitialize color table */
216 if (ourvinfo.class == PseudoColor || ourvinfo.class == GrayScale)
217 if (getpixels() == 0)
218 stderr_v("cannot allocate colors\n");
219 else
220 new_ctab(ncolors);
221 /* get new command line */
222 if (comline != NULL)
223 xt_close(comline);
224 comline = xt_open(ourdisplay, gwind, 0, gheight,
225 gwidth, COMHEIGHT, 0, ourblack, ourwhite, COMFN);
226 if (comline == NULL) {
227 stderr_v("Cannot open command line window\n");
228 quit(1);
229 }
230 XSelectInput(ourdisplay, comline->w, ExposureMask);
231 /* remove earmuffs */
232 XSelectInput(ourdisplay, gwind,
233 StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
234 }
235
236
237 static
238 x11_paintr(col, xmin, ymin, xmax, ymax) /* fill a rectangle */
239 COLOR col;
240 int xmin, ymin, xmax, ymax;
241 {
242 extern int xnewcolr(); /* pixel assignment routine */
243 extern unsigned long true_pixel();
244 unsigned long pixel;
245
246 if (!mapped)
247 return;
248 if (ncolors > 0)
249 pixel = pixval[get_pixel(col, xnewcolr)];
250 else
251 pixel = true_pixel(col);
252 XSetForeground(ourdisplay, ourgc, pixel);
253 XFillRectangle(ourdisplay, gwind,
254 ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
255 }
256
257
258 static
259 x11_flush() /* flush output */
260 {
261 XNoOp(ourdisplay);
262 while (XPending(ourdisplay) > 0)
263 getevent();
264 }
265
266
267 static
268 x11_comin(inp, prompt) /* read in a command line */
269 char *inp, *prompt;
270 {
271 extern int x11_getc();
272
273 if (prompt != NULL)
274 if (fromcombuf(inp, &x11_driver))
275 return;
276 else
277 xt_puts(prompt, comline);
278 xt_cursor(comline, TBLKCURS);
279 editline(inp, x11_getc, x11_comout);
280 xt_cursor(comline, TNOCURS);
281 }
282
283
284 static
285 x11_comout(out) /* output a string to command line */
286 char *out;
287 {
288 if (comline == NULL)
289 return;
290 xt_puts(out, comline);
291 if (out[strlen(out)-1] == '\n')
292 XFlush(ourdisplay);
293 }
294
295
296 static
297 x11_errout(msg) /* output an error message */
298 char *msg;
299 {
300 stderr_v(msg); /* send to stderr also! */
301 x11_comout(msg);
302 }
303
304
305 static int
306 x11_getcur(xp, yp) /* get cursor position */
307 int *xp, *yp;
308 {
309 while (XGrabPointer(ourdisplay, gwind, True, ButtonPressMask,
310 GrabModeAsync, GrabModeAsync, None, pickcursor,
311 CurrentTime) != GrabSuccess)
312 sleep(2);
313
314 do
315 getevent();
316 while (c_last <= c_first && levptr(XEvent)->type != ButtonPress);
317 *xp = levptr(XButtonPressedEvent)->x;
318 *yp = gheight-1 - levptr(XButtonPressedEvent)->y;
319 XUngrabPointer(ourdisplay, CurrentTime);
320 XFlush(ourdisplay); /* insure release */
321 if (c_last > c_first) /* key pressed */
322 return(x11_getc());
323 /* button pressed */
324 if (levptr(XButtonPressedEvent)->button & Button1)
325 return(MB1);
326 if (levptr(XButtonPressedEvent)->button & Button2)
327 return(MB2);
328 if (levptr(XButtonPressedEvent)->button & Button3)
329 return(MB3);
330 if (levptr(XButtonPressedEvent)->button & (Button4|Button5))
331 return(MB1);
332 return(ABORT);
333 }
334
335
336 static
337 xnewcolr(ndx, r, g, b) /* enter a color into hardware table */
338 int ndx;
339 int r, g, b;
340 {
341 XColor xcolor;
342
343 xcolor.pixel = pixval[ndx];
344 xcolor.red = r << 8;
345 xcolor.green = g << 8;
346 xcolor.blue = b << 8;
347 xcolor.flags = DoRed|DoGreen|DoBlue;
348
349 XStoreColor(ourdisplay, ourmap, &xcolor);
350 }
351
352
353 static int
354 getpixels() /* get the color map */
355 {
356 XColor thiscolor;
357 register int i, j;
358
359 if (ncolors > 0)
360 return(ncolors);
361 if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
362 ourmap = DefaultColormap(ourdisplay,ourscreen);
363 goto loop;
364 }
365 newmap:
366 ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
367 loop:
368 for (ncolors = ourvinfo.colormap_size;
369 ncolors > ourvinfo.colormap_size/3;
370 ncolors = ncolors*.937) {
371 pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
372 if (pixval == NULL)
373 return(ncolors = 0);
374 if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
375 break;
376 free((char *)pixval);
377 pixval = NULL;
378 }
379 if (pixval == NULL) {
380 if (ourmap == DefaultColormap(ourdisplay,ourscreen))
381 goto newmap; /* try it with our map */
382 else
383 return(ncolors = 0); /* failed */
384 }
385 if (ourmap != DefaultColormap(ourdisplay,ourscreen))
386 for (i = 0; i < ncolors; i++) { /* reset black and white */
387 if (pixval[i] != ourblack && pixval[i] != ourwhite)
388 continue;
389 thiscolor.pixel = pixval[i];
390 thiscolor.flags = DoRed|DoGreen|DoBlue;
391 XQueryColor(ourdisplay,
392 DefaultColormap(ourdisplay,ourscreen),
393 &thiscolor);
394 XStoreColor(ourdisplay, ourmap, &thiscolor);
395 for (j = i; j+1 < ncolors; j++)
396 pixval[j] = pixval[j+1];
397 ncolors--;
398 i--;
399 }
400 XSetWindowColormap(ourdisplay, gwind, ourmap);
401 return(ncolors);
402 }
403
404
405 static
406 freepixels() /* free our pixels */
407 {
408 if (ncolors == 0)
409 return;
410 XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
411 free((char *)pixval);
412 pixval = NULL;
413 ncolors = 0;
414 if (ourmap != DefaultColormap(ourdisplay,ourscreen))
415 XFreeColormap(ourdisplay, ourmap);
416 ourmap = 0;
417 }
418
419
420 static unsigned long
421 true_pixel(col) /* return true pixel value for color */
422 COLOR col;
423 {
424 unsigned long rval;
425 BYTE rgb[3];
426
427 map_color(rgb, col);
428 rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
429 rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
430 rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
431 return(rval);
432 }
433
434
435 static int
436 x11_getc() /* get a command character */
437 {
438 while (c_last <= c_first) {
439 c_first = c_last = 0; /* reset */
440 getevent(); /* wait for key */
441 }
442 x11_driver.inpready--;
443 return(c_queue[c_first++]);
444 }
445
446
447 static
448 getevent() /* get next event */
449 {
450 XNextEvent(ourdisplay, levptr(XEvent));
451 switch (levptr(XEvent)->type) {
452 case ConfigureNotify:
453 resizewindow(levptr(XConfigureEvent));
454 break;
455 case UnmapNotify:
456 mapped = 0;
457 freepixels();
458 break;
459 case MapNotify:
460 if (ourvinfo.class == PseudoColor ||
461 ourvinfo.class == GrayScale)
462 if (getpixels() == 0)
463 stderr_v("Cannot allocate colors\n");
464 else
465 new_ctab(ncolors);
466 mapped = 1;
467 break;
468 case Expose:
469 fixwindow(levptr(XExposeEvent));
470 break;
471 case KeyPress:
472 getkey(levptr(XKeyPressedEvent));
473 break;
474 case ButtonPress:
475 break;
476 }
477 }
478
479
480 static
481 getkey(ekey) /* get input key */
482 register XKeyPressedEvent *ekey;
483 {
484 register int n;
485
486 n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
487 NULL, NULL);
488 c_last += n;
489 x11_driver.inpready += n;
490 }
491
492
493 static
494 fixwindow(eexp) /* repair damage to window */
495 register XExposeEvent *eexp;
496 {
497 if (eexp->window == gwind) {
498 sprintf(getcombuf(&x11_driver), "repaint %d %d %d %d\n",
499 eexp->x, gheight - eexp->y - eexp->height,
500 eexp->x + eexp->width, gheight - eexp->y);
501 } else if (eexp->window == comline->w) {
502 if (eexp->count == 0)
503 xt_redraw(comline);
504 }
505 }
506
507
508 static
509 resizewindow(ersz) /* resize window */
510 register XConfigureEvent *ersz;
511 {
512 if (ersz->width == gwidth && ersz->height-COMHEIGHT == gheight)
513 return;
514
515 gwidth = ersz->width;
516 gheight = ersz->height-COMHEIGHT;
517 x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
518 x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
519
520 strcpy(getcombuf(&x11_driver), "new\n");
521 }