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 2.2 by greg, Fri May 29 10:57:15 1992 UTC vs.
Revision 2.19 by greg, Mon Oct 3 11:01:23 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 23 | Line 24 | static char SCCSid[] = "$SunId$ LBL";
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 38 | Line 39 | static char SCCSid[] = "$SunId$ LBL";
39  
40   #define  ourscreen      DefaultScreen(ourdisplay)
41   #define  ourroot        RootWindow(ourdisplay,ourscreen)
41 – #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
42 – #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  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  
# Line 58 | 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 68 | Line 70 | static GC  ourgc = 0;                  /* our graphics context for dr
70  
71   static Colormap ourmap = 0;             /* our color map */
72  
73 + #define IC_X11          0
74 + #define IC_IOCTL        1
75 + #define IC_READ         2
76 +
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          XSetWindowAttributes    ourwinattr;
104          XWMHints  ourxwmhints;
105          XSizeHints      oursizhints;
106 <
106 >                                        /* open display server */
107          ourdisplay = XOpenDisplay(NULL);
108          if (ourdisplay == NULL) {
109                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
# Line 95 | Line 111 | char  *name, *id;
111          }
112                                          /* find a usable visual */
113          nplanes = DisplayPlanes(ourdisplay, ourscreen);
114 <        if (    !XMatchVisualInfo(ourdisplay,ourscreen,
115 <                        24,TrueColor,&ourvinfo) &&
116 <                !XMatchVisualInfo(ourdisplay,ourscreen,
117 <                        24,DirectColor,&ourvinfo)       )
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 <                } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
126 >                }
127 >                if (!XMatchVisualInfo(ourdisplay,ourscreen,
128                                          nplanes,PseudoColor,&ourvinfo) &&
129                                  !XMatchVisualInfo(ourdisplay,ourscreen,
130                                          nplanes,GrayScale,&ourvinfo)) {
131                          stderr_v("unsupported visual type\n");
132                          return(NULL);
133                  }
134 <        make_gmap(GAMMA);
135 <        /* open window */
134 >                ourblack = BlackPixel(ourdisplay,ourscreen);
135 >                ourwhite = WhitePixel(ourdisplay,ourscreen);
136 >        }
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 a waste! */
151 >                                        /* this is stupid */
152          ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
153                                  ourvinfo.visual, AllocNone);
154          gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
# Line 125 | Line 160 | char  *name, *id;
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);
# Line 135 | Line 170 | char  *name, *id;
170                          gwind, x11icon_bits, x11icon_width, x11icon_height);
171          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
172          oursizhints.min_width = MINWIDTH;
173 <        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
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(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 188 | Line 235 | int  xres, yres;
235                                                  /* resize window */
236          if (xres != gwidth || yres != gheight) {
237                  XSelectInput(ourdisplay, gwind, 0);
238 <                XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
238 >                XResizeWindow(ourdisplay, gwind, xres, yres+comheight);
239                  gwidth = xres;
240                  gheight = yres;
241                  XFlush(ourdisplay);
# Line 205 | Line 252 | int  xres, yres;
252                                                  /* get new command line */
253          if (comline != NULL)
254                  xt_close(comline);
255 <        comline = xt_open(ourdisplay,
256 <                        DefaultGC(ourdisplay,ourscreen),
257 <                        gwind, 0, gheight, gwidth, COMHEIGHT, 0, COMFN);
258 <        if (comline == NULL) {
259 <                stderr_v("Cannot open command line window\n");
260 <                quit(1);
261 <        }
262 <        XSelectInput(ourdisplay, comline->w, ExposureMask);
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,
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 224 | Line 274 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
274   COLOR  col;
275   int  xmin, ymin, xmax, ymax;
276   {
227 –        extern int  xnewcolr();         /* pixel assignment routine */
228 –        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)];
233 –        else if (ourvinfo.class == TrueColor || ourvinfo.class == DirectColor)
234 –                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 243 | Line 291 | int  xmin, ymin, xmax, ymax;
291   static
292   x11_flush()                     /* flush output */
293   {
294 +        char    buf[256];
295 +        int     n;
296 +                                                /* check for input */
297          XNoOp(ourdisplay);
298 <        while (XPending(ourdisplay) > 0)
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 253 | Line 322 | static
322   x11_comin(inp, prompt)          /* read in a command line */
323   char  *inp, *prompt;
324   {
325 <        extern int  x11_getc();
326 <
258 <        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 267 | 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                  return;
343 <        xt_puts(out, comline);
344 <        if (out[strlen(out)-1] == '\n')
343 >        xt_puts(outp, comline);
344 >        if (outp[strlen(outp)-1] == '\n')
345                  XFlush(ourdisplay);
346   }
347  
# Line 287 | Line 355 | char  *msg;
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 + }
386 +
387 +
388   static int
389   x11_getcur(xp, yp)              /* get cursor position */
390   int  *xp, *yp;
# Line 306 | Line 404 | int  *xp, *yp;
404          if (c_last > c_first)                   /* key pressed */
405                  return(x11_getc());
406                                                  /* button pressed */
407 <        if (levptr(XButtonPressedEvent)->button & Button1)
407 >        if (levptr(XButtonPressedEvent)->button == Button1)
408                  return(MB1);
409 <        if (levptr(XButtonPressedEvent)->button & Button2)
409 >        if (levptr(XButtonPressedEvent)->button == Button2)
410                  return(MB2);
411 <        if (levptr(XButtonPressedEvent)->button & Button3)
411 >        if (levptr(XButtonPressedEvent)->button == Button3)
412                  return(MB3);
315 –        if (levptr(XButtonPressedEvent)->button & (Button4|Button5))
316 –                return(MB1);
413          return(ABORT);
414   }
415  
# Line 356 | Line 452 | loop:
452                  pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
453                  if (pixval == NULL)
454                          return(ncolors = 0);
455 <                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
360 <                                pixval,ncolors) != 0)
455 >                if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
456                          break;
457                  free((char *)pixval);
458                  pixval = NULL;
# Line 394 | Line 489 | freepixels()                           /* free our pixels */
489          if (ncolors == 0)
490                  return;
491          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
492 +        free((char *)pixval);
493 +        pixval = NULL;
494          ncolors = 0;
495          if (ourmap != DefaultColormap(ourdisplay,ourscreen))
496                  XFreeColormap(ourdisplay, ourmap);
# Line 437 | Line 534 | getevent()                     /* get next event */
534                  resizewindow(levptr(XConfigureEvent));
535                  break;
536          case UnmapNotify:
537 +                mapped = 0;
538                  freepixels();
539                  break;
540          case MapNotify:
# Line 446 | Line 544 | getevent()                     /* get next event */
544                                  stderr_v("Cannot allocate colors\n");
545                          else
546                                  new_ctab(ncolors);
547 +                mapped = 1;
548                  break;
549          case Expose:
550                  fixwindow(levptr(XExposeEvent));
# Line 491 | Line 590 | static
590   resizewindow(ersz)                      /* resize window */
591   register XConfigureEvent  *ersz;
592   {
593 <        if (ersz->width == gwidth && ersz->height-COMHEIGHT == gheight)
593 >        if (ersz->width == gwidth && ersz->height-comheight == gheight)
594                  return;
595  
596          gwidth = ersz->width;
597 <        gheight = ersz->height-COMHEIGHT;
597 >        gheight = ersz->height-comheight;
598          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
599          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
600  

Diff Legend

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