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.4 by greg, Thu Feb 22 10:22:01 1990 UTC vs.
Revision 2.14 by greg, Mon Nov 22 11:33:02 1993 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 35 | Line 36 | static char SCCSid[] = "$SunId$ LBL";
36   #define COMCW           8               /* approx. character width (pixels) */
37   #define COMCH           14              /* approx. character height (pixels) */
38  
38 – #ifndef WFLUSH
39 – #define WFLUSH          30              /* flush after this many rays */
40 – #endif
41 –
39   #define  ourscreen      DefaultScreen(ourdisplay)
40   #define  ourroot        RootWindow(ourdisplay,ourscreen)
44 – #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
45 – #define  ourblack       BlackPixel(ourdisplay,ourscreen)
41  
47 – #define  checkinp()     while (XPending(ourdisplay) > 0) getevent()
48 –
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 69 | 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(),
74 <                x11_getcur(), x11_comout(), x11_comin();
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, 1.0
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 143 | Line 186 | x11_close()                    /* close our display */
186                  xt_close(comline);
187                  comline = NULL;
188          }
146 –        if (gwind != 0) {
147 –                XFreeGC(ourdisplay, ourgc);
148 –                XDestroyWindow(ourdisplay, gwind);
149 –                gwind = 0;
150 –                ourgc = 0;
151 –        }
152 –        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 160 | 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);
168 –                comline = xt_open(ourdisplay,
169 –                                DefaultGC(ourdisplay,ourscreen),
170 –                                gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
171 –                if (comline == NULL) {
172 –                        stderr_v("Cannot open command line window\n");
173 –                        quit(1);
174 –                }
175 –                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 195 | Line 244 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
244   COLOR  col;
245   int  xmin, ymin, xmax, ymax;
246   {
247 <        extern long  nrays;             /* global ray count */
199 <        extern int  xnewcolr();         /* pixel assignment routine */
200 <        static long  lastflush = 0;     /* ray count at last flush */
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 <        }
255 <        if (nrays - lastflush >= WFLUSH) {
256 <                if (ncolors <= 0)       /* output necessary for death */
257 <                        XFillRectangle(ourdisplay, gwind,
211 <                                        ourgc, 0, 0, 1 ,1);
212 <                checkinp();
213 <                lastflush = nrays;
214 <        }
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 +        XNoOp(ourdisplay);
265 +        while (XPending(ourdisplay) > 0)
266 +                getevent();
267 + }
268 +
269 +
270 + static
271   x11_comin(inp, prompt)          /* read in a command line */
272   char  *inp, *prompt;
273   {
222 –        int  x11_getc(), x11_comout();
223 –
274          if (prompt != NULL)
275                  if (fromcombuf(inp, &x11_driver))
276                          return;
# Line 236 | Line 286 | static
286   x11_comout(out)                 /* output a string to command line */
287   char  *out;
288   {
289 <        if (comline != NULL)
290 <                xt_puts(out, comline);
291 <        XFlush(ourdisplay);
289 >        if (comline == NULL)
290 >                return;
291 >        xt_puts(out, comline);
292 >        if (out[strlen(out)-1] == '\n')
293 >                XFlush(ourdisplay);
294   }
295  
296  
# Line 246 | Line 298 | static
298   x11_errout(msg)                 /* output an error message */
299   char  *msg;
300   {
249 –        x11_comout(msg);
301          stderr_v(msg);          /* send to stderr also! */
302 +        x11_comout(msg);
303   }
304  
305  
# Line 270 | Line 322 | int  *xp, *yp;
322          if (c_last > c_first)                   /* key pressed */
323                  return(x11_getc());
324                                                  /* button pressed */
325 <        if (levptr(XButtonPressedEvent)->button & Button1)
325 >        if (levptr(XButtonPressedEvent)->button == Button1)
326                  return(MB1);
327 <        if (levptr(XButtonPressedEvent)->button & Button2)
327 >        if (levptr(XButtonPressedEvent)->button == Button2)
328                  return(MB2);
329 <        if (levptr(XButtonPressedEvent)->button & Button3)
329 >        if (levptr(XButtonPressedEvent)->button == Button3)
330                  return(MB3);
279 –        if (levptr(XButtonPressedEvent)->button & (Button4|Button5))
280 –                return(MB1);
331          return(ABORT);
332   }
333  
# Line 302 | Line 352 | int  r, g, b;
352   static int
353   getpixels()                             /* get the color map */
354   {
355 <        Visual  *ourvis = DefaultVisual(ourdisplay,ourscreen);
355 >        XColor  thiscolor;
356 >        register int  i, j;
357  
358          if (ncolors > 0)
359                  return(ncolors);
360 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
361 <                pixval = (int *)malloc(ncolors*sizeof(int));
360 >        if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
361 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
362 >                goto loop;
363 >        }
364 > newmap:
365 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
366 > loop:
367 >        for (ncolors = ourvinfo.colormap_size;
368 >                        ncolors > ourvinfo.colormap_size/3;
369 >                        ncolors = ncolors*.937) {
370 >                pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
371                  if (pixval == NULL)
372 +                        return(ncolors = 0);
373 +                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
374                          break;
313 –                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
314 –                                pixval,ncolors) != 0)
315 –                        return(ncolors);
375                  free((char *)pixval);
376 +                pixval = NULL;
377          }
378 <        return(ncolors = 0);
378 >        if (pixval == NULL) {
379 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
380 >                        goto newmap;            /* try it with our map */
381 >                else
382 >                        return(ncolors = 0);    /* failed */
383 >        }
384 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
385 >                for (i = 0; i < ncolors; i++) { /* reset black and white */
386 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
387 >                                continue;
388 >                        thiscolor.pixel = pixval[i];
389 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
390 >                        XQueryColor(ourdisplay,
391 >                                        DefaultColormap(ourdisplay,ourscreen),
392 >                                        &thiscolor);
393 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
394 >                        for (j = i; j+1 < ncolors; j++)
395 >                                pixval[j] = pixval[j+1];
396 >                        ncolors--;
397 >                        i--;
398 >                }
399 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
400 >        return(ncolors);
401   }
402  
403  
# Line 325 | Line 407 | freepixels()                           /* free our pixels */
407          if (ncolors == 0)
408                  return;
409          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
410 +        free((char *)pixval);
411 +        pixval = NULL;
412          ncolors = 0;
413 +        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
414 +                XFreeColormap(ourdisplay, ourmap);
415 +        ourmap = 0;
416   }
417  
418  
419 + static unsigned long
420 + true_pixel(col)                 /* return true pixel value for color */
421 + COLOR  col;
422 + {
423 +        unsigned long  rval;
424 +        BYTE  rgb[3];
425 +
426 +        map_color(rgb, col);
427 +        rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
428 +        rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
429 +        rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
430 +        return(rval);
431 + }
432 +
433 +
434   static int
435   x11_getc()                      /* get a command character */
436   {
# Line 350 | Line 452 | getevent()                     /* get next event */
452                  resizewindow(levptr(XConfigureEvent));
453                  break;
454          case UnmapNotify:
455 +                mapped = 0;
456                  freepixels();
457                  break;
458          case MapNotify:
459 <                if (getpixels() == 0)
460 <                        stderr_v("Cannot allocate colors\n");
461 <                else
462 <                        new_ctab(ncolors);
459 >                if (ourvinfo.class == PseudoColor ||
460 >                                ourvinfo.class == GrayScale)
461 >                        if (getpixels() == 0)
462 >                                stderr_v("Cannot allocate colors\n");
463 >                        else
464 >                                new_ctab(ncolors);
465 >                mapped = 1;
466                  break;
467          case Expose:
468                  fixwindow(levptr(XExposeEvent));
# Line 374 | Line 480 | static
480   getkey(ekey)                            /* get input key */
481   register XKeyPressedEvent  *ekey;
482   {
483 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
483 >        register int  n;
484 >
485 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
486                                  NULL, NULL);
487 <        x11_driver.inpready = c_last-c_first;
487 >        c_last += n;
488 >        x11_driver.inpready += n;
489   }
490  
491  

Diff Legend

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