ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/rt/x11.c
(Generate patch)

Comparing ray/src/rt/x11.c (file contents):
Revision 1.5 by greg, Thu Feb 22 11:46:26 1990 UTC vs.
Revision 2.15 by greg, Fri Sep 9 16:16:06 1994 UTC

# Line 1 | Line 1
1 + /* Copyright (c) 1992 Regents of the University of California */
2 +
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
5   #endif
6  
5 – /* Copyright (c) 1989 Regents of the University of California */
6 –
7   /*
8 < *  x11.c - driver for X-windows version 11.3
8 > *  x11.c - driver for X-windows version 11
9   *
10   *     Jan 1990
11   */
12  
13   #include  <stdio.h>
14 <
14 > #include  <math.h>
15   #include  <sys/ioctl.h>
16  
17   #include  <X11/Xlib.h>
# Line 21 | Line 21 | static char SCCSid[] = "$SunId$ LBL";
21   #include  "color.h"
22   #include  "driver.h"
23   #include  "x11twind.h"
24 + #include  "x11icon.h"
25  
26 < #define GAMMA           2.2             /* exponent for color correction */
26 > #define GAMMA           2.2             /* default exponent correction */
27  
28 < #define MINWIDTH        (4*COMCW)       /* minimum graphics window width */
29 < #define MINHEIGHT       16              /* minimum graphics window height */
28 > #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
29 > #define MINHEIGHT       (MINWIDTH/2)    /* minimum graphics window height */
30  
31   #define BORWIDTH        5               /* border width */
32   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
# Line 37 | Line 38 | static char SCCSid[] = "$SunId$ LBL";
38  
39   #define  ourscreen      DefaultScreen(ourdisplay)
40   #define  ourroot        RootWindow(ourdisplay,ourscreen)
40 – #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
41 – #define  ourblack       BlackPixel(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  *pixval = NULL;             /* allocated pixels */
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 */
# Line 63 | Line 66 | 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;                 /* our color map */
69 > static Colormap ourmap = 0;             /* our color map */
70  
71 < extern char  *malloc();
71 > extern char  *malloc(), *getcombuf();
72  
73 < int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
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 = {
# Line 75 | Line 78 | static struct driver  x11_driver = {
78          x11_comout, x11_comin, x11_flush, 1.0
79   };
80  
81 + static int  getpixels(), xnewcolr(), freepixels(), resizewindow(),
82 +                getevent(), getkey(), fixwindow(), x11_getc();
83 + static unsigned long  true_pixel();
84  
85 +
86   struct driver *
87   x11_init(name, id)              /* initialize driver */
88   char  *name, *id;
89   {
90 +        extern char  *getenv();
91 +        char  *gv;
92 +        int  nplanes;
93 +        XSetWindowAttributes    ourwinattr;
94          XWMHints  ourxwmhints;
95 <        Pixmap  bmCursorSrc, bmCursorMsk;
95 >        XSizeHints      oursizhints;
96  
97          ourdisplay = XOpenDisplay(NULL);
98          if (ourdisplay == NULL) {
99                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
100                  return(NULL);
101          }
102 <        if (DisplayPlanes(ourdisplay, ourscreen) < 4) {
103 <                stderr_v("not enough colors\n");
104 <                return(NULL);
102 >                                        /* find a usable visual */
103 >        nplanes = DisplayPlanes(ourdisplay, ourscreen);
104 >        if (XMatchVisualInfo(ourdisplay,ourscreen,
105 >                                24,TrueColor,&ourvinfo) ||
106 >                        XMatchVisualInfo(ourdisplay,ourscreen,
107 >                                24,DirectColor,&ourvinfo)) {
108 >                ourblack = 0;
109 >                ourwhite = ourvinfo.red_mask |
110 >                                ourvinfo.green_mask |
111 >                                ourvinfo.blue_mask ;
112 >        } else {
113 >                if (nplanes < 4) {
114 >                        stderr_v("not enough colors\n");
115 >                        return(NULL);
116 >                }
117 >                if (!XMatchVisualInfo(ourdisplay,ourscreen,
118 >                                        nplanes,PseudoColor,&ourvinfo) &&
119 >                                !XMatchVisualInfo(ourdisplay,ourscreen,
120 >                                        nplanes,GrayScale,&ourvinfo)) {
121 >                        stderr_v("unsupported visual type\n");
122 >                        return(NULL);
123 >                }
124 >                ourblack = BlackPixel(ourdisplay,ourscreen);
125 >                ourwhite = WhitePixel(ourdisplay,ourscreen);
126          }
127 <        ourmap = DefaultColormap(ourdisplay,ourscreen);
128 <        make_gmap(GAMMA);                       /* make color map */
129 <        /* create a cursor */
130 <        pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
131 <        /* open window */
132 <        gwind = XCreateSimpleWindow(ourdisplay, ourroot, 0, 0,
127 >                                        /* set gamma */
128 >        if ((gv = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
129 >                        || (gv = getenv("GAMMA")) != NULL)
130 >                make_gmap(atof(gv));
131 >        else
132 >                make_gmap(GAMMA);
133 >                                        /* open window */
134 >        ourwinattr.background_pixel = ourblack;
135 >        ourwinattr.border_pixel = ourblack;
136 >                                        /* this is stupid */
137 >        ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
138 >                                ourvinfo.visual, AllocNone);
139 >        gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
140                  DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
141                  DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
142 <                BORWIDTH, ourblack, ourwhite);
142 >                BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
143 >                CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
144          if (gwind == 0) {
145                  stderr_v("cannot create window\n");
146                  return(NULL);
147          }
148 <        XStoreName(ourdisplay, gwind, id);
148 >        XStoreName(ourdisplay, gwind, id);
149 >        /* create a cursor */
150 >        pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
151          ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
152 <        ourxwmhints.flags = InputHint;
152 >        ourxwmhints.flags = InputHint|IconPixmapHint;
153          ourxwmhints.input = True;
154 +        ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
155 +                        gwind, x11icon_bits, x11icon_width, x11icon_height);
156          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
157 +        oursizhints.min_width = MINWIDTH;
158 +        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
159 +        oursizhints.flags = PMinSize;
160 +        XSetNormalHints(ourdisplay, gwind, &oursizhints);
161          XSelectInput(ourdisplay, gwind, ExposureMask);
162          XMapWindow(ourdisplay, gwind);
163 <        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
163 >        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
164          gwidth = levptr(XExposeEvent)->width;
165          gheight = levptr(XExposeEvent)->height - COMHEIGHT;
166          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
167          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
168          x11_driver.inpready = 0;
169 +        mapped = 1;
170          cmdvec = x11_comout;                    /* set error vectors */
171          if (wrnvec != NULL)
172                  wrnvec = x11_errout;
# Line 137 | Line 186 | x11_close()                    /* close our display */
186                  xt_close(comline);
187                  comline = NULL;
188          }
140 –        if (gwind != 0) {
141 –                XFreeGC(ourdisplay, ourgc);
142 –                XDestroyWindow(ourdisplay, gwind);
143 –                gwind = 0;
144 –                ourgc = 0;
145 –        }
146 –        XFreeCursor(ourdisplay, pickcursor);
189          freepixels();
190 +        XFreeGC(ourdisplay, ourgc);
191 +        XDestroyWindow(ourdisplay, gwind);
192 +        gwind = 0;
193 +        ourgc = 0;
194 +        XFreeCursor(ourdisplay, pickcursor);
195          XCloseDisplay(ourdisplay);
196          ourdisplay = NULL;
197   }
# Line 154 | Line 201 | static
201   x11_clear(xres, yres)                   /* clear our display */
202   int  xres, yres;
203   {
204 <        if (xres != gwidth || yres != gheight) {        /* change window */
205 <                if (comline != NULL)
206 <                        xt_close(comline);
204 >                                                /* check limits */
205 >        if (xres < MINWIDTH)
206 >                xres = MINWIDTH;
207 >        if (yres < MINHEIGHT)
208 >                yres = MINHEIGHT;
209 >                                                /* resize window */
210 >        if (xres != gwidth || yres != gheight) {
211                  XSelectInput(ourdisplay, gwind, 0);
212                  XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
162 –                comline = xt_open(ourdisplay,
163 –                                DefaultGC(ourdisplay,ourscreen),
164 –                                gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
165 –                if (comline == NULL) {
166 –                        stderr_v("Cannot open command line window\n");
167 –                        quit(1);
168 –                }
169 –                XSelectInput(ourdisplay, comline->w, ExposureMask);
213                  gwidth = xres;
214                  gheight = yres;
215 <                XSync(ourdisplay, 1);           /* discard input */
215 >                XFlush(ourdisplay);
216                  sleep(2);                       /* wait for window manager */
217 +                XSync(ourdisplay, 1);           /* discard input */
218          }
219          XClearWindow(ourdisplay, gwind);
220                                                  /* reinitialize color table */
221 <        if (getpixels() == 0)
222 <                stderr_v("cannot allocate colors\n");
223 <        else
224 <                new_ctab(ncolors);
225 <
221 >        if (ourvinfo.class == PseudoColor || ourvinfo.class == GrayScale)
222 >                if (getpixels() == 0)
223 >                        stderr_v("cannot allocate colors\n");
224 >                else
225 >                        new_ctab(ncolors);
226 >                                                /* get new command line */
227 >        if (comline != NULL)
228 >                xt_close(comline);
229 >        comline = xt_open(ourdisplay, gwind, 0, gheight,
230 >                        gwidth, COMHEIGHT, 0, ourblack, ourwhite, COMFN);
231 >        if (comline == NULL) {
232 >                stderr_v("Cannot open command line window\n");
233 >                quit(1);
234 >        }
235 >        XSelectInput(ourdisplay, comline->w, ExposureMask);
236 >                                                /* remove earmuffs */
237          XSelectInput(ourdisplay, gwind,
238                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
239   }
# Line 189 | Line 244 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
244   COLOR  col;
245   int  xmin, ymin, xmax, ymax;
246   {
247 <        extern int  xnewcolr();         /* pixel assignment routine */
247 >        unsigned long  pixel;
248  
249 <        if (ncolors > 0) {
250 <                XSetForeground(ourdisplay, ourgc,
251 <                                pixval[get_pixel(col, xnewcolr)]);
252 <                XFillRectangle(ourdisplay, gwind,
253 <                        ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
254 <        }
249 >        if (!mapped)
250 >                return;
251 >        if (ncolors > 0)
252 >                pixel = pixval[get_pixel(col, xnewcolr)];
253 >        else
254 >                pixel = true_pixel(col);
255 >        XSetForeground(ourdisplay, ourgc, pixel);
256 >        XFillRectangle(ourdisplay, gwind,
257 >                ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
258   }
259  
260  
261   static
262   x11_flush()                     /* flush output */
263   {
264 <        if (ncolors <= 0)       /* output necessary for death */
265 <                XFillRectangle(ourdisplay, gwind, ourgc, 0, 0, 1 ,1);
264 >        int     n;
265 >        register char   *buf;
266 >
267 >        XNoOp(ourdisplay);
268          while (XPending(ourdisplay) > 0)
269                  getevent();
270 + #ifdef FIONREAD
271 +        if (ioctl(0, FIONREAD, &n) == 0 && n) {         /* from stdin */
272 +                buf = getcombuf(&x11_driver);
273 +                n = read(0, buf, n);
274 +                buf[n] = '\0';
275 +        }
276 + #endif
277   }
278  
279  
# Line 214 | Line 281 | static
281   x11_comin(inp, prompt)          /* read in a command line */
282   char  *inp, *prompt;
283   {
284 <        int  x11_getc(), x11_comout();
285 <
219 <        if (prompt != NULL)
284 >        if (prompt != NULL) {
285 >                x11_flush();            /* make sure we get everything */
286                  if (fromcombuf(inp, &x11_driver))
287                          return;
288 <                else
289 <                        xt_puts(prompt, comline);
288 >                xt_puts(prompt, comline);
289 >        }
290          xt_cursor(comline, TBLKCURS);
291          editline(inp, x11_getc, x11_comout);
292          xt_cursor(comline, TNOCURS);
# Line 231 | Line 297 | static
297   x11_comout(out)                 /* output a string to command line */
298   char  *out;
299   {
300 <        if (comline != NULL)
301 <                xt_puts(out, comline);
302 <        XFlush(ourdisplay);
300 >        if (comline == NULL)
301 >                return;
302 >        xt_puts(out, comline);
303 >        if (out[strlen(out)-1] == '\n')
304 >                XFlush(ourdisplay);
305   }
306  
307  
# Line 241 | Line 309 | static
309   x11_errout(msg)                 /* output an error message */
310   char  *msg;
311   {
244 –        x11_comout(msg);
312          stderr_v(msg);          /* send to stderr also! */
313 +        x11_comout(msg);
314   }
315  
316  
# Line 265 | Line 333 | int  *xp, *yp;
333          if (c_last > c_first)                   /* key pressed */
334                  return(x11_getc());
335                                                  /* button pressed */
336 <        if (levptr(XButtonPressedEvent)->button & Button1)
336 >        if (levptr(XButtonPressedEvent)->button == Button1)
337                  return(MB1);
338 <        if (levptr(XButtonPressedEvent)->button & Button2)
338 >        if (levptr(XButtonPressedEvent)->button == Button2)
339                  return(MB2);
340 <        if (levptr(XButtonPressedEvent)->button & Button3)
340 >        if (levptr(XButtonPressedEvent)->button == Button3)
341                  return(MB3);
274 –        if (levptr(XButtonPressedEvent)->button & (Button4|Button5))
275 –                return(MB1);
342          return(ABORT);
343   }
344  
# Line 297 | Line 363 | int  r, g, b;
363   static int
364   getpixels()                             /* get the color map */
365   {
366 <        Visual  *ourvis = DefaultVisual(ourdisplay,ourscreen);
366 >        XColor  thiscolor;
367 >        register int  i, j;
368  
369          if (ncolors > 0)
370                  return(ncolors);
371 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
372 <                pixval = (int *)malloc(ncolors*sizeof(int));
371 >        if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
372 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
373 >                goto loop;
374 >        }
375 > newmap:
376 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
377 > loop:
378 >        for (ncolors = ourvinfo.colormap_size;
379 >                        ncolors > ourvinfo.colormap_size/3;
380 >                        ncolors = ncolors*.937) {
381 >                pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
382                  if (pixval == NULL)
383 +                        return(ncolors = 0);
384 +                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
385                          break;
308 –                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
309 –                                pixval,ncolors) != 0)
310 –                        return(ncolors);
386                  free((char *)pixval);
387 +                pixval = NULL;
388          }
389 <        return(ncolors = 0);
389 >        if (pixval == NULL) {
390 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
391 >                        goto newmap;            /* try it with our map */
392 >                else
393 >                        return(ncolors = 0);    /* failed */
394 >        }
395 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
396 >                for (i = 0; i < ncolors; i++) { /* reset black and white */
397 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
398 >                                continue;
399 >                        thiscolor.pixel = pixval[i];
400 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
401 >                        XQueryColor(ourdisplay,
402 >                                        DefaultColormap(ourdisplay,ourscreen),
403 >                                        &thiscolor);
404 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
405 >                        for (j = i; j+1 < ncolors; j++)
406 >                                pixval[j] = pixval[j+1];
407 >                        ncolors--;
408 >                        i--;
409 >                }
410 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
411 >        return(ncolors);
412   }
413  
414  
# Line 320 | Line 418 | freepixels()                           /* free our pixels */
418          if (ncolors == 0)
419                  return;
420          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
421 +        free((char *)pixval);
422 +        pixval = NULL;
423          ncolors = 0;
424 +        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
425 +                XFreeColormap(ourdisplay, ourmap);
426 +        ourmap = 0;
427   }
428  
429  
430 + static unsigned long
431 + true_pixel(col)                 /* return true pixel value for color */
432 + COLOR  col;
433 + {
434 +        unsigned long  rval;
435 +        BYTE  rgb[3];
436 +
437 +        map_color(rgb, col);
438 +        rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
439 +        rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
440 +        rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
441 +        return(rval);
442 + }
443 +
444 +
445   static int
446   x11_getc()                      /* get a command character */
447   {
# Line 345 | Line 463 | getevent()                     /* get next event */
463                  resizewindow(levptr(XConfigureEvent));
464                  break;
465          case UnmapNotify:
466 +                mapped = 0;
467                  freepixels();
468                  break;
469          case MapNotify:
470 <                if (getpixels() == 0)
471 <                        stderr_v("Cannot allocate colors\n");
472 <                else
473 <                        new_ctab(ncolors);
470 >                if (ourvinfo.class == PseudoColor ||
471 >                                ourvinfo.class == GrayScale)
472 >                        if (getpixels() == 0)
473 >                                stderr_v("Cannot allocate colors\n");
474 >                        else
475 >                                new_ctab(ncolors);
476 >                mapped = 1;
477                  break;
478          case Expose:
479                  fixwindow(levptr(XExposeEvent));
# Line 369 | Line 491 | static
491   getkey(ekey)                            /* get input key */
492   register XKeyPressedEvent  *ekey;
493   {
494 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
494 >        register int  n;
495 >
496 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
497                                  NULL, NULL);
498 <        x11_driver.inpready = c_last-c_first;
498 >        c_last += n;
499 >        x11_driver.inpready += n;
500   }
501  
502  

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines