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.9 by greg, Fri Mar 2 10:08:01 1990 UTC vs.
Revision 2.20 by greg, Mon Oct 3 12:58:58 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 + #include  <fcntl.h>
17  
18   #include  <X11/Xlib.h>
19   #include  <X11/cursorfont.h>
# Line 21 | Line 22 | static char SCCSid[] = "$SunId$ LBL";
22   #include  "color.h"
23   #include  "driver.h"
24   #include  "x11twind.h"
25 + #include  "x11icon.h"
26  
27 < #define GAMMA           2.2             /* exponent for color correction */
27 > #define GAMMA           2.2             /* default exponent correction */
28  
29   #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
30 < #define MINHEIGHT       MINWIDTH        /* minimum graphics window height */
30 > #define MINHEIGHT       (MINWIDTH/2)    /* minimum graphics window height */
31  
32   #define BORWIDTH        5               /* border width */
33   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
# Line 37 | Line 39 | static char SCCSid[] = "$SunId$ LBL";
39  
40   #define  ourscreen      DefaultScreen(ourdisplay)
41   #define  ourroot        RootWindow(ourdisplay,ourscreen)
40 – #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
41 – #define  ourblack       BlackPixel(ourdisplay,ourscreen)
42  
43   #define  levptr(etype)  ((etype *)&currentevent)
44  
45   static XEvent  currentevent;            /* current event */
46  
47   static int  ncolors = 0;                /* color table size */
48 < static int  *pixval = NULL;             /* allocated pixels */
48 > static int  mapped = 0;                 /* window is mapped? */
49 > static unsigned long  *pixval = NULL;   /* allocated pixels */
50 > static unsigned long  ourblack=0, ourwhite=1;
51  
52   static Display  *ourdisplay = NULL;     /* our display */
53  
54 < static Visual  *ourvisual;              /* our visual structure */
54 > static XVisualInfo  ourvinfo;           /* our visual information */
55  
56   static Window  gwind = 0;               /* our graphics window */
57  
# Line 57 | Line 59 | static Cursor  pickcursor = 0;         /* cursor used for pic
59  
60   static int  gwidth, gheight;            /* graphics window size */
61  
62 + static int  comheight;                  /* desired comline height */
63   static TEXTWIND  *comline = NULL;       /* our command line */
64  
65   static char  c_queue[64];               /* input queue */
# Line 67 | Line 70 | static GC  ourgc = 0;                  /* our graphics context for dr
70  
71   static Colormap ourmap = 0;             /* our color map */
72  
73 < extern char  *malloc();
73 > #define IC_X11          0
74 > #define IC_IOCTL        1
75 > #define IC_READ         2
76  
77 < int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
77 > static int  inpcheck;                   /* whence to check input */
78 >
79 > extern char  *malloc(), *getcombuf();
80 >
81 > static int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
82                  x11_getcur(), x11_comout(), x11_comin(), x11_flush();
83  
84 + static int  std_comin(), std_comout();
85 +
86   static struct driver  x11_driver = {
87          x11_close, x11_clear, x11_paintr, x11_getcur,
88 <        x11_comout, x11_comin, x11_flush, 1.0
88 >        NULL, NULL, x11_flush, 1.0
89   };
90  
91 + static int  getpixels(), xnewcolr(), freepixels(), resizewindow(),
92 +                getevent(), getkey(), fixwindow(), x11_getc();
93 + static unsigned long  true_pixel();
94  
95 +
96   struct driver *
97   x11_init(name, id)              /* initialize driver */
98   char  *name, *id;
99   {
100 +        extern char  *getenv();
101 +        char  *gv;
102          int  nplanes;
103 <        XVisualInfo  ourvinfo;
103 >        XSetWindowAttributes    ourwinattr;
104          XWMHints  ourxwmhints;
105 <
105 >        XSizeHints      oursizhints;
106 >                                        /* open display server */
107          ourdisplay = XOpenDisplay(NULL);
108          if (ourdisplay == NULL) {
109                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
110                  return(NULL);
111          }
112 +                                        /* find a usable visual */
113          nplanes = DisplayPlanes(ourdisplay, ourscreen);
114 <        if (nplanes < 4) {
115 <                stderr_v("not enough colors\n");
116 <                return(NULL);
117 <        } else if (nplanes <= 12) {
114 >        if (XMatchVisualInfo(ourdisplay,ourscreen,
115 >                                24,TrueColor,&ourvinfo) ||
116 >                        XMatchVisualInfo(ourdisplay,ourscreen,
117 >                                24,DirectColor,&ourvinfo)) {
118 >                ourblack = 0;
119 >                ourwhite = ourvinfo.red_mask |
120 >                                ourvinfo.green_mask |
121 >                                ourvinfo.blue_mask ;
122 >        } else {
123 >                if (nplanes < 4) {
124 >                        stderr_v("not enough colors\n");
125 >                        return(NULL);
126 >                }
127                  if (!XMatchVisualInfo(ourdisplay,ourscreen,
128 <                                nplanes,PseudoColor,&ourvinfo)) {
129 <                        stderr_v("PseudoColor not supported\n");
128 >                                        nplanes,PseudoColor,&ourvinfo) &&
129 >                                !XMatchVisualInfo(ourdisplay,ourscreen,
130 >                                        nplanes,GrayScale,&ourvinfo)) {
131 >                        stderr_v("unsupported visual type\n");
132                          return(NULL);
133                  }
134 <        } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
135 <                        nplanes,TrueColor,&ourvinfo)) {
106 <                stderr_v("TrueColor not supported\n");
107 <                return(NULL);
134 >                ourblack = BlackPixel(ourdisplay,ourscreen);
135 >                ourwhite = WhitePixel(ourdisplay,ourscreen);
136          }
137 <        ourvisual = ourvinfo.visual;
138 <        make_gmap(GAMMA);
139 <        /* create a cursor */
140 <        pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
141 <        /* open window */
142 <        gwind = XCreateSimpleWindow(ourdisplay, ourroot, 0, 0,
137 >                                        /* set gamma */
138 >        if ((gv = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
139 >                        || (gv = getenv("DISPLAY_GAMMA")) != NULL)
140 >                make_gmap(atof(gv));
141 >        else
142 >                make_gmap(GAMMA);
143 >                                        /* X11 command line or no? */
144 >        if (!strcmp(name, "x11"))
145 >                comheight = COMHEIGHT;
146 >        else /* "x11d" */
147 >                comheight = 0;
148 >                                        /* open window */
149 >        ourwinattr.background_pixel = ourblack;
150 >        ourwinattr.border_pixel = ourblack;
151 >                                        /* this is stupid */
152 >        ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
153 >                                ourvinfo.visual, AllocNone);
154 >        gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
155                  DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
156                  DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
157 <                BORWIDTH, ourblack, ourwhite);
157 >                BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
158 >                CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
159          if (gwind == 0) {
160                  stderr_v("cannot create window\n");
161                  return(NULL);
162          }
163 <        XStoreName(ourdisplay, gwind, id);
163 >        XStoreName(ourdisplay, gwind, id);
164 >        /* create a cursor */
165 >        pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
166          ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
167 <        ourxwmhints.flags = InputHint;
167 >        ourxwmhints.flags = InputHint|IconPixmapHint;
168          ourxwmhints.input = True;
169 +        ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
170 +                        gwind, x11icon_bits, x11icon_width, x11icon_height);
171          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
172 +        oursizhints.min_width = MINWIDTH;
173 +        oursizhints.min_height = MINHEIGHT+comheight;
174 +        oursizhints.flags = PMinSize;
175 +        XSetNormalHints(ourdisplay, gwind, &oursizhints);
176          XSelectInput(ourdisplay, gwind, ExposureMask);
177          XMapWindow(ourdisplay, gwind);
178 <        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
178 >        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
179          gwidth = levptr(XExposeEvent)->width;
180 <        gheight = levptr(XExposeEvent)->height - COMHEIGHT;
180 >        gheight = levptr(XExposeEvent)->height - comheight;
181          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
182          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
183          x11_driver.inpready = 0;
184 <        cmdvec = x11_comout;                    /* set error vectors */
185 <        if (wrnvec != NULL)
186 <                wrnvec = x11_errout;
184 >        mapped = 1;
185 >                                        /* set i/o vectors */
186 >        if (comheight) {
187 >                x11_driver.comin = x11_comin;
188 >                x11_driver.comout = x11_comout;
189 >                cmdvec = x11_comout;
190 >                if (wrnvec != NULL)
191 >                        wrnvec = x11_errout;
192 >                inpcheck = IC_X11;
193 >        } else {
194 >                x11_driver.comin = std_comin;
195 >                x11_driver.comout = std_comout;
196 >                cmdvec = std_comout;
197 >                inpcheck = IC_IOCTL;
198 >        }
199          return(&x11_driver);
200   }
201  
# Line 166 | Line 227 | static
227   x11_clear(xres, yres)                   /* clear our display */
228   int  xres, yres;
229   {
230 <        if (xres != gwidth || yres != gheight) {        /* change window */
231 <                if (comline != NULL)
232 <                        xt_close(comline);
230 >                                                /* check limits */
231 >        if (xres < MINWIDTH)
232 >                xres = MINWIDTH;
233 >        if (yres < MINHEIGHT)
234 >                yres = MINHEIGHT;
235 >                                                /* resize window */
236 >        if (xres != gwidth || yres != gheight) {
237                  XSelectInput(ourdisplay, gwind, 0);
238 <                XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
174 <                comline = xt_open(ourdisplay,
175 <                                DefaultGC(ourdisplay,ourscreen),
176 <                                gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
177 <                if (comline == NULL) {
178 <                        stderr_v("Cannot open command line window\n");
179 <                        quit(1);
180 <                }
181 <                XSelectInput(ourdisplay, comline->w, ExposureMask);
238 >                XResizeWindow(ourdisplay, gwind, xres, yres+comheight);
239                  gwidth = xres;
240                  gheight = yres;
241                  XFlush(ourdisplay);
# Line 186 | Line 243 | int  xres, yres;
243                  XSync(ourdisplay, 1);           /* discard input */
244          }
245          XClearWindow(ourdisplay, gwind);
246 <        if (ourvisual->class == PseudoColor)    /* reinitialize color table */
246 >                                                /* reinitialize color table */
247 >        if (ourvinfo.class == PseudoColor || ourvinfo.class == GrayScale)
248                  if (getpixels() == 0)
249                          stderr_v("cannot allocate colors\n");
250                  else
251                          new_ctab(ncolors);
252 <
253 <        XSelectInput(ourdisplay, gwind,
252 >                                                /* get new command line */
253 >        if (comline != NULL)
254 >                xt_close(comline);
255 >        if (comheight) {
256 >                comline = xt_open(ourdisplay, gwind, 0, gheight, gwidth,
257 >                                comheight, 0, ourblack, ourwhite, COMFN);
258 >                if (comline == NULL) {
259 >                        stderr_v("Cannot open command line window\n");
260 >                        quit(1);
261 >                }
262 >                XSelectInput(ourdisplay, comline->w, ExposureMask);
263 >                                                /* remove earmuffs */
264 >                XSelectInput(ourdisplay, gwind,
265                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
266 +        } else                                  /* remove earmuffs */
267 +                XSelectInput(ourdisplay, gwind,
268 +                        StructureNotifyMask|ExposureMask|ButtonPressMask);
269   }
270  
271  
# Line 202 | Line 274 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
274   COLOR  col;
275   int  xmin, ymin, xmax, ymax;
276   {
205 –        extern int  xnewcolr();         /* pixel assignment routine */
206 –        extern unsigned long  true_pixel();
277          unsigned long  pixel;
278  
279 +        if (!mapped)
280 +                return;
281          if (ncolors > 0)
282                  pixel = pixval[get_pixel(col, xnewcolr)];
211 –        else if (ourvisual->class == TrueColor)
212 –                pixel = true_pixel(col);
283          else
284 <                return;
284 >                pixel = true_pixel(col);
285          XSetForeground(ourdisplay, ourgc, pixel);
286          XFillRectangle(ourdisplay, gwind,
287                  ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
# Line 221 | Line 291 | int  xmin, ymin, xmax, ymax;
291   static
292   x11_flush()                     /* flush output */
293   {
294 <        if (ncolors <= 0 && ourvisual->class != TrueColor)      /* dummy */
295 <                XFillRectangle(ourdisplay, gwind, ourgc, 0, 0, 1 ,1);
296 <        while (XPending(ourdisplay) > 0)
294 >        char    buf[256];
295 >        int     n;
296 >                                                /* check for input */
297 >        XNoOp(ourdisplay);
298 >        n = XPending(ourdisplay);                       /* from X server */
299 >        while (n-- > 0)
300                  getevent();
301 +        if (inpcheck == IC_IOCTL) {                     /* from stdin */
302 +                if (ioctl(fileno(stdin), FIONREAD, &n) < 0) {
303 +                        if (fcntl(fileno(stdin), F_SETFL, FNDELAY) < 0) {
304 +                                stderr_v("Cannot change input mode\n");
305 +                                quit(1);
306 +                        }
307 +                        inpcheck = IC_READ;
308 +                } else
309 +                        x11_driver.inpready += n;
310 +        }
311 +        if (inpcheck == IC_READ) {
312 +                n = read(fileno(stdin), buf, sizeof(buf)-1);
313 +                if (n > 0) {
314 +                        buf[n] = '\0';
315 +                        strcpy(getcombuf(&x11_driver), buf);
316 +                }
317 +        }
318   }
319  
320  
# Line 232 | Line 322 | static
322   x11_comin(inp, prompt)          /* read in a command line */
323   char  *inp, *prompt;
324   {
325 <        int  x11_getc(), x11_comout();
326 <
237 <        if (prompt != NULL)
325 >        if (prompt != NULL) {
326 >                x11_flush();            /* make sure we get everything */
327                  if (fromcombuf(inp, &x11_driver))
328                          return;
329 <                else
330 <                        xt_puts(prompt, comline);
329 >                xt_puts(prompt, comline);
330 >        }
331          xt_cursor(comline, TBLKCURS);
332          editline(inp, x11_getc, x11_comout);
333          xt_cursor(comline, TNOCURS);
# Line 246 | Line 335 | char  *inp, *prompt;
335  
336  
337   static
338 < x11_comout(out)                 /* output a string to command line */
339 < char  *out;
338 > x11_comout(outp)                /* output a string to command line */
339 > char  *outp;
340   {
341 <        if (comline != NULL)
342 <                xt_puts(out, comline);
341 >        if (comline == NULL)
342 >                return;
343 >        xt_puts(outp, comline);
344 >        if (outp[strlen(outp)-1] == '\n')
345 >                XFlush(ourdisplay);
346   }
347  
348  
# Line 260 | Line 352 | char  *msg;
352   {
353          stderr_v(msg);          /* send to stderr also! */
354          x11_comout(msg);
263 –        x11_flush();
355   }
356  
357  
358 + static
359 + std_comin(inp, prompt)          /* read in command line from stdin */
360 + char  *inp, *prompt;
361 + {
362 +        extern char     *gets();
363 +
364 +        if (prompt != NULL) {
365 +                if (fromcombuf(inp, &x11_driver))
366 +                        return;
367 +                if (!x11_driver.inpready)
368 +                        fputs(prompt, stdout);
369 +        }
370 +        if (gets(inp) == NULL) {
371 +                strcpy(inp, "quit");
372 +                return;
373 +        }
374 +        x11_driver.inpready -= strlen(inp) + 1;
375 +        if (x11_driver.inpready < 0)
376 +                x11_driver.inpready = 0;
377 + }
378 +
379 +
380 + static
381 + std_comout(outp)                /* write out string to stdout */
382 + char    *outp;
383 + {
384 +        fputs(outp, stdout);
385 +        fflush(stdout);
386 + }
387 +
388 +
389   static int
390   x11_getcur(xp, yp)              /* get cursor position */
391   int  *xp, *yp;
# Line 283 | Line 405 | int  *xp, *yp;
405          if (c_last > c_first)                   /* key pressed */
406                  return(x11_getc());
407                                                  /* button pressed */
408 <        if (levptr(XButtonPressedEvent)->button & Button1)
408 >        if (levptr(XButtonPressedEvent)->button == Button1)
409                  return(MB1);
410 <        if (levptr(XButtonPressedEvent)->button & Button2)
410 >        if (levptr(XButtonPressedEvent)->button == Button2)
411                  return(MB2);
412 <        if (levptr(XButtonPressedEvent)->button & Button3)
412 >        if (levptr(XButtonPressedEvent)->button == Button3)
413                  return(MB3);
292 –        if (levptr(XButtonPressedEvent)->button & (Button4|Button5))
293 –                return(MB1);
414          return(ABORT);
415   }
416  
# Line 315 | Line 435 | int  r, g, b;
435   static int
436   getpixels()                             /* get the color map */
437   {
438 +        XColor  thiscolor;
439 +        register int  i, j;
440 +
441          if (ncolors > 0)
442                  return(ncolors);
443 <        if (ourvisual == DefaultVisual(ourdisplay,ourscreen)) {
443 >        if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
444                  ourmap = DefaultColormap(ourdisplay,ourscreen);
445                  goto loop;
446          }
447   newmap:
448 <        ourmap = XCreateColormap(ourdisplay,gwind,ourvisual,AllocNone);
448 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
449   loop:
450 <        for (ncolors = ourvisual->map_entries;
451 <                        ncolors > ourvisual->map_entries/3;
450 >        for (ncolors = ourvinfo.colormap_size;
451 >                        ncolors > ourvinfo.colormap_size/3;
452                          ncolors = ncolors*.937) {
453 <                pixval = (int *)malloc(ncolors*sizeof(int));
453 >                pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
454                  if (pixval == NULL)
455                          return(ncolors = 0);
456 <                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
334 <                                pixval,ncolors) != 0)
456 >                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
457                          break;
458                  free((char *)pixval);
459                  pixval = NULL;
# Line 342 | Line 464 | loop:
464                  else
465                          return(ncolors = 0);    /* failed */
466          }
467 <        if (ourmap != DefaultColormap(ourdisplay,ourscreen)) {
468 <                XColor  thiscolor;
347 <                register int  i, j;
348 <                                                /* reset black and white */
349 <                for (i = 0; i < ncolors; i++) {
467 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
468 >                for (i = 0; i < ncolors; i++) { /* reset black and white */
469                          if (pixval[i] != ourblack && pixval[i] != ourwhite)
470                                  continue;
471                          thiscolor.pixel = pixval[i];
# Line 360 | Line 479 | loop:
479                          ncolors--;
480                          i--;
481                  }
363 –        }
482          XSetWindowColormap(ourdisplay, gwind, ourmap);
483          return(ncolors);
484   }
# Line 372 | Line 490 | freepixels()                           /* free our pixels */
490          if (ncolors == 0)
491                  return;
492          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
493 +        free((char *)pixval);
494 +        pixval = NULL;
495          ncolors = 0;
496          if (ourmap != DefaultColormap(ourdisplay,ourscreen))
497                  XFreeColormap(ourdisplay, ourmap);
# Line 387 | Line 507 | COLOR  col;
507          BYTE  rgb[3];
508  
509          map_color(rgb, col);
510 <        rval = ourvisual->red_mask*rgb[RED]/255 & ourvisual->red_mask;
511 <        rval |= ourvisual->green_mask*rgb[GRN]/255 & ourvisual->green_mask;
512 <        rval |= ourvisual->blue_mask*rgb[BLU]/255 & ourvisual->blue_mask;
510 >        rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
511 >        rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
512 >        rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
513          return(rval);
514   }
515  
# Line 415 | Line 535 | getevent()                     /* get next event */
535                  resizewindow(levptr(XConfigureEvent));
536                  break;
537          case UnmapNotify:
538 +                mapped = 0;
539                  freepixels();
540                  break;
541          case MapNotify:
542 <                if (ourvisual->class == PseudoColor)
542 >                if (ourvinfo.class == PseudoColor ||
543 >                                ourvinfo.class == GrayScale)
544                          if (getpixels() == 0)
545                                  stderr_v("Cannot allocate colors\n");
546                          else
547                                  new_ctab(ncolors);
548 +                mapped = 1;
549                  break;
550          case Expose:
551                  fixwindow(levptr(XExposeEvent));
# Line 468 | Line 591 | static
591   resizewindow(ersz)                      /* resize window */
592   register XConfigureEvent  *ersz;
593   {
594 <        if (ersz->width == gwidth && ersz->height-COMHEIGHT == gheight)
594 >        if (ersz->width == gwidth && ersz->height-comheight == gheight)
595                  return;
596  
597          gwidth = ersz->width;
598 <        gheight = ersz->height-COMHEIGHT;
598 >        gheight = ersz->height-comheight;
599          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
600          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
601  

Diff Legend

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