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.12 by greg, Fri Jun 4 14:48:52 1993 UTC vs.
Revision 2.38 by greg, Tue Dec 3 19:36:58 2024 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1992 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   *  x11.c - driver for X-windows version 11
9 – *
10 – *     Jan 1990
6   */
7  
8 < #include  <stdio.h>
9 < #include  <math.h>
8 > #include "copyright.h"
9 >
10 > #include  "standard.h"
11   #include  <sys/ioctl.h>
12 + #if  !defined(FNDELAY) && defined(O_NONBLOCK)
13 + #define  FNDELAY  O_NONBLOCK
14 + #endif
15  
16   #include  <X11/Xlib.h>
17   #include  <X11/cursorfont.h>
18   #include  <X11/Xutil.h>
19  
20 + #include  "platform.h"
21   #include  "color.h"
22   #include  "driver.h"
23   #include  "x11twind.h"
# Line 58 | Line 58 | static Cursor  pickcursor = 0;         /* cursor used for pic
58  
59   static int  gwidth, gheight;            /* graphics window size */
60  
61 + static int  comheight;                  /* desired comline height */
62   static TEXTWIND  *comline = NULL;       /* our command line */
63  
64   static char  c_queue[64];               /* input queue */
# Line 68 | Line 69 | static GC  ourgc = 0;                  /* our graphics context for dr
69  
70   static Colormap ourmap = 0;             /* our color map */
71  
72 < extern char  *malloc(), *getcombuf();
72 > #define IC_X11          0
73 > #define IC_IOCTL        1
74 > #define IC_READ         2
75  
76 < static int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
74 <                x11_getcur(), x11_comout(), x11_comin(), x11_flush();
76 > static int  inpcheck;                   /* whence to check input */
77  
78 + static void x11_errout(char  *msg);
79 +
80 + static dr_closef_t x11_close;
81 + static dr_clearf_t x11_clear;
82 + static dr_paintrf_t x11_paintr;
83 + static dr_getcurf_t x11_getcur;
84 + static dr_comoutf_t x11_comout;
85 + static dr_cominf_t x11_comin;
86 + static dr_flushf_t x11_flush;
87 +
88 + static dr_cominf_t std_comin;
89 + static dr_comoutf_t std_comout;
90 +
91   static struct driver  x11_driver = {
92          x11_close, x11_clear, x11_paintr, x11_getcur,
93 <        x11_comout, x11_comin, x11_flush, 1.0
93 >        NULL, NULL, x11_flush, 1.0
94   };
95  
96 < static int  getpixels(), xnewcolr(), freepixels(),
82 <                getevent(), getkey(), fixwindow();
83 < static unsigned long  true_pixel();
96 > static dr_getchf_t x11_getc;
97  
98 + static void freepixels(void);
99 + static int getpixels(void);
100 + static dr_newcolrf_t xnewcolr;
101 + static unsigned long true_pixel(COLOR  col);
102 + static void getevent(void);
103 + static void getkey(XKeyPressedEvent  *ekey);
104 + static void fixwindow(XExposeEvent  *eexp);
105 + static void resizewindow(XConfigureEvent  *ersz);
106  
107 < struct driver *
108 < x11_init(name, id)              /* initialize driver */
109 < char  *name, *id;
107 > extern dr_initf_t x11_init; /* XXX this should be in a seperate header file */
108 >
109 >
110 > extern struct driver *
111 > x11_init(               /* initialize driver */
112 >        char  *name,
113 >        char  *id
114 > )
115   {
90 –        extern char  *getenv();
116          char  *gv;
117          int  nplanes;
118          XSetWindowAttributes    ourwinattr;
119          XWMHints  ourxwmhints;
120          XSizeHints      oursizhints;
121 <
121 >                                        /* open display server */
122          ourdisplay = XOpenDisplay(NULL);
123          if (ourdisplay == NULL) {
124 <                stderr_v("cannot open X-windows; DISPLAY variable set?\n");
124 >                eputs("cannot open X-windows; DISPLAY variable set?\n");
125                  return(NULL);
126          }
127                                          /* find a usable visual */
128          nplanes = DisplayPlanes(ourdisplay, ourscreen);
129          if (XMatchVisualInfo(ourdisplay,ourscreen,
130 <                                24,TrueColor,&ourvinfo) ||
130 >                                nplanes>12?nplanes:24,TrueColor,&ourvinfo) ||
131                          XMatchVisualInfo(ourdisplay,ourscreen,
132 <                                24,DirectColor,&ourvinfo)) {
132 >                                nplanes>12?nplanes:24,DirectColor,&ourvinfo)) {
133                  ourblack = 0;
134                  ourwhite = ourvinfo.red_mask |
135                                  ourvinfo.green_mask |
136                                  ourvinfo.blue_mask ;
137          } else {
138                  if (nplanes < 4) {
139 <                        stderr_v("not enough colors\n");
139 >                        eputs("not enough colors\n");
140                          return(NULL);
141                  }
142                  if (!XMatchVisualInfo(ourdisplay,ourscreen,
143                                          nplanes,PseudoColor,&ourvinfo) &&
144                                  !XMatchVisualInfo(ourdisplay,ourscreen,
145                                          nplanes,GrayScale,&ourvinfo)) {
146 <                        stderr_v("unsupported visual type\n");
146 >                        eputs("unsupported visual type\n");
147                          return(NULL);
148                  }
149                  ourblack = BlackPixel(ourdisplay,ourscreen);
150                  ourwhite = WhitePixel(ourdisplay,ourscreen);
151          }
152                                          /* set gamma */
153 <        if ((gv = getenv("GAMMA")) != NULL)
153 >        if ((gv = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
154 >                        || (gv = getenv("DISPLAY_GAMMA")) != NULL)
155                  make_gmap(atof(gv));
156          else
157                  make_gmap(GAMMA);
158 +                                        /* X11 command line or no? */
159 +        if (!strcmp(name, "x11"))
160 +                comheight = COMHEIGHT;
161 +        else /* "x11d" */ {
162 +                comheight = 0;
163 + #ifndef  FNDELAY
164 +                eputs("warning: x11d driver not fully functional on this machine\n");
165 + #endif
166 +        }
167                                          /* open window */
168          ourwinattr.background_pixel = ourblack;
169          ourwinattr.border_pixel = ourblack;
# Line 141 | Line 176 | char  *name, *id;
176                  BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
177                  CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
178          if (gwind == 0) {
179 <                stderr_v("cannot create window\n");
179 >                eputs("cannot create window\n");
180                  return(NULL);
181          }
182          XStoreName(ourdisplay, gwind, id);
# Line 154 | Line 189 | char  *name, *id;
189                          gwind, x11icon_bits, x11icon_width, x11icon_height);
190          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
191          oursizhints.min_width = MINWIDTH;
192 <        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
192 >        oursizhints.min_height = MINHEIGHT+comheight;
193          oursizhints.flags = PMinSize;
194          XSetNormalHints(ourdisplay, gwind, &oursizhints);
195          XSelectInput(ourdisplay, gwind, ExposureMask);
196          XMapWindow(ourdisplay, gwind);
197          XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
198          gwidth = levptr(XExposeEvent)->width;
199 <        gheight = levptr(XExposeEvent)->height - COMHEIGHT;
199 >        gheight = levptr(XExposeEvent)->height - comheight;
200          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
201          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
202          x11_driver.inpready = 0;
203          mapped = 1;
204 <        cmdvec = x11_comout;                    /* set error vectors */
205 <        if (wrnvec != NULL)
206 <                wrnvec = x11_errout;
204 >                                        /* set i/o vectors */
205 >        if (comheight) {
206 >                x11_driver.comin = x11_comin;
207 >                x11_driver.comout = x11_comout;
208 >                erract[COMMAND].pf = x11_comout;
209 >                /*                      doesn't work with raypcalls.c
210 >                if (erract[WARNING].pf != NULL)
211 >                        erract[WARNING].pf = x11_errout;
212 >                */
213 >                inpcheck = IC_X11;
214 >        } else {
215 >                x11_driver.comin = std_comin;
216 >                x11_driver.comout = std_comout;
217 >                erract[COMMAND].pf = std_comout;
218 >                inpcheck = IC_IOCTL;
219 >        }
220          return(&x11_driver);
221   }
222  
223  
224 < static
225 < x11_close()                     /* close our display */
224 > static void
225 > x11_close(void)                 /* close our display */
226   {
227 <        cmdvec = NULL;                          /* reset error vectors */
228 <        if (wrnvec != NULL)
229 <                wrnvec = stderr_v;
227 >        erract[COMMAND].pf = NULL;              /* reset error vectors */
228 >        if (erract[WARNING].pf != NULL)
229 >                erract[WARNING].pf = wputs;
230          if (ourdisplay == NULL)
231                  return;
232          if (comline != NULL) {
# Line 196 | Line 244 | x11_close()                    /* close our display */
244   }
245  
246  
247 < static
248 < x11_clear(xres, yres)                   /* clear our display */
249 < int  xres, yres;
247 > static void
248 > x11_clear(                      /* clear our display */
249 >        int  xres,
250 >        int  yres
251 > )
252   {
253                                                  /* check limits */
254          if (xres < MINWIDTH)
# Line 206 | Line 256 | int  xres, yres;
256          if (yres < MINHEIGHT)
257                  yres = MINHEIGHT;
258                                                  /* resize window */
259 <        if (xres != gwidth || yres != gheight) {
259 >        if ((xres != gwidth) | (yres != gheight)) {
260                  XSelectInput(ourdisplay, gwind, 0);
261 <                XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
261 >                XResizeWindow(ourdisplay, gwind, xres, yres+comheight);
262                  gwidth = xres;
263                  gheight = yres;
264                  XFlush(ourdisplay);
# Line 217 | Line 267 | int  xres, yres;
267          }
268          XClearWindow(ourdisplay, gwind);
269                                                  /* reinitialize color table */
270 <        if (ourvinfo.class == PseudoColor || ourvinfo.class == GrayScale)
270 >        if ((ourvinfo.class == PseudoColor) | (ourvinfo.class == GrayScale)) {
271                  if (getpixels() == 0)
272 <                        stderr_v("cannot allocate colors\n");
272 >                        eputs("cannot allocate colors\n");
273                  else
274                          new_ctab(ncolors);
275 +        }
276                                                  /* get new command line */
277          if (comline != NULL)
278                  xt_close(comline);
279 <        comline = xt_open(ourdisplay, gwind, 0, gheight,
280 <                        gwidth, COMHEIGHT, 0, ourblack, ourwhite, COMFN);
281 <        if (comline == NULL) {
282 <                stderr_v("Cannot open command line window\n");
283 <                quit(1);
284 <        }
285 <        XSelectInput(ourdisplay, comline->w, ExposureMask);
279 >        if (comheight) {
280 >                comline = xt_open(ourdisplay, gwind, 0, gheight, gwidth,
281 >                                comheight, 0, ourblack, ourwhite, COMFN);
282 >                if (comline == NULL) {
283 >                        eputs("cannot open command line window\n");
284 >                        quit(1);
285 >                }
286 >                XSelectInput(ourdisplay, comline->w, ExposureMask);
287                                                  /* remove earmuffs */
288 <        XSelectInput(ourdisplay, gwind,
288 >                XSelectInput(ourdisplay, gwind,
289                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
290 +        } else                                  /* remove earmuffs */
291 +                XSelectInput(ourdisplay, gwind,
292 +                        StructureNotifyMask|ExposureMask|ButtonPressMask);
293   }
294  
295  
296 < static
297 < x11_paintr(col, xmin, ymin, xmax, ymax)         /* fill a rectangle */
298 < COLOR  col;
299 < int  xmin, ymin, xmax, ymax;
296 > static void
297 > x11_paintr(             /* fill a rectangle */
298 >        COLOR  col,
299 >        int  xmin,
300 >        int  ymin,
301 >        int  xmax,
302 >        int  ymax
303 > )
304   {
305          unsigned long  pixel;
306  
# Line 257 | Line 316 | int  xmin, ymin, xmax, ymax;
316   }
317  
318  
319 < static
320 < x11_flush()                     /* flush output */
319 > static void
320 > x11_flush(void)                 /* flush output */
321   {
322 +        char    buf[256];
323 +        int     n;
324 +                                                /* check for input */
325          XNoOp(ourdisplay);
326 <        while (XPending(ourdisplay) > 0)
326 >        n = XPending(ourdisplay);                       /* from X server */
327 >        while (n-- > 0)
328                  getevent();
329 + #ifdef FNDELAY
330 +        if (inpcheck == IC_IOCTL) {                     /* from stdin */
331 + #ifdef FIONREAD
332 +                if (ioctl(fileno(stdin), FIONREAD, &n) < 0) {
333 + #else
334 +                if (1) {
335 + #endif
336 +                        if (fcntl(fileno(stdin), F_SETFL, FNDELAY) < 0) {
337 +                                eputs("cannot change input mode\n");
338 +                                quit(1);
339 +                        }
340 +                        inpcheck = IC_READ;
341 +                } else
342 +                        x11_driver.inpready += n;
343 +        }
344 +        if (inpcheck == IC_READ) {
345 +                n = read(fileno(stdin), buf, sizeof(buf)-1);
346 +                if (n > 0) {
347 +                        buf[n] = '\0';
348 +                        tocombuf(buf, &x11_driver);
349 +                }
350 +        }
351 + #endif
352   }
353  
354  
355 < static
356 < x11_comin(inp, prompt)          /* read in a command line */
357 < char  *inp, *prompt;
355 > static void
356 > x11_comin(              /* read in a command line */
357 >        char  *inp,
358 >        char  *prompt
359 > )
360   {
361 <        extern int  x11_getc();
362 <
275 <        if (prompt != NULL)
361 >        if (prompt != NULL) {
362 >                x11_flush();            /* make sure we get everything */
363                  if (fromcombuf(inp, &x11_driver))
364                          return;
365 <                else
366 <                        xt_puts(prompt, comline);
365 >                xt_puts(prompt, comline);
366 >        }
367          xt_cursor(comline, TBLKCURS);
368          editline(inp, x11_getc, x11_comout);
369          xt_cursor(comline, TNOCURS);
370   }
371  
372  
373 < static
374 < x11_comout(out)                 /* output a string to command line */
375 < char  *out;
373 > static void
374 > x11_comout(             /* output a string to command line */
375 >        const char  *outp
376 > )
377   {
378 <        if (comline == NULL)
378 >        if ((comline == NULL) | (outp == NULL) || !outp[0])
379                  return;
380 <        xt_puts(out, comline);
381 <        if (out[strlen(out)-1] == '\n')
380 >        xt_puts(outp, comline);
381 >        if (outp[strlen(outp)-1] == '\n')
382                  XFlush(ourdisplay);
383   }
384  
385  
386 < static
387 < x11_errout(msg)                 /* output an error message */
388 < char  *msg;
386 > static void
387 > x11_errout(                     /* output an error message */
388 >        char  *msg
389 > )
390   {
391 <        stderr_v(msg);          /* send to stderr also! */
391 >        eputs(msg);             /* send to stderr also! */
392          x11_comout(msg);
393   }
394  
395  
396 + static void
397 + std_comin(              /* read in command line from stdin */
398 +        char  *inp,
399 +        char  *prompt
400 + )
401 + {
402 +        int     n, c;
403 +
404 +        if (prompt != NULL) {
405 +                if (fromcombuf(inp, &x11_driver))
406 +                        return;
407 +                if (!x11_driver.inpready)
408 +                        std_comout(prompt);
409 +        }
410 + #ifdef FNDELAY
411 +        if (inpcheck == IC_READ) {      /* turn off FNDELAY */
412 +                if (fcntl(fileno(stdin), F_SETFL, 0) < 0) {
413 +                        eputs("cannot change input mode\n");
414 +                        quit(1);
415 +                }
416 +                inpcheck = IC_IOCTL;
417 +        }
418 + #endif
419 +        n = 0;          /* gets() no longer exists... */
420 +        while ((c = getchar()) != EOF && c != '\n')
421 +                inp[n++] = c;
422 +
423 +        if (!n & (c == EOF)) {
424 +                strcpy(inp, "quit");
425 +                return;
426 +        }
427 +        inp[n] = '\0';
428 +        x11_driver.inpready -= n + 1;
429 +        x11_driver.inpready *= (x11_driver.inpready > 0);
430 + }
431 +
432 +
433 + static void
434 + std_comout(             /* write out string to stdout */
435 +        const char      *outp
436 + )
437 + {
438 +        fputs(outp, stdout);
439 +        fflush(stdout);
440 + }
441 +
442 +
443   static int
444 < x11_getcur(xp, yp)              /* get cursor position */
445 < int  *xp, *yp;
444 > x11_getcur(             /* get cursor position */
445 >        int  *xp,
446 >        int  *yp
447 > )
448   {
449          while (XGrabPointer(ourdisplay, gwind, True, ButtonPressMask,
450                          GrabModeAsync, GrabModeAsync, None, pickcursor,
# Line 333 | Line 471 | int  *xp, *yp;
471   }
472  
473  
474 < static
475 < xnewcolr(ndx, r, g, b)          /* enter a color into hardware table */
476 < int  ndx;
477 < int  r, g, b;
474 > static void
475 > xnewcolr(               /* enter a color into hardware table */
476 >        int  ndx,
477 >        int  r,
478 >        int  g,
479 >        int  b
480 > )
481   {
482          XColor  xcolor;
483  
# Line 351 | Line 492 | int  r, g, b;
492  
493  
494   static int
495 < getpixels()                             /* get the color map */
495 > getpixels(void)                         /* get the color map */
496   {
497          XColor  thiscolor;
498          register int  i, j;
# Line 373 | Line 514 | loop:
514                          return(ncolors = 0);
515                  if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
516                          break;
517 <                free((char *)pixval);
517 >                free((void *)pixval);
518                  pixval = NULL;
519          }
520          if (pixval == NULL) {
# Line 402 | Line 543 | loop:
543   }
544  
545  
546 < static
547 < freepixels()                            /* free our pixels */
546 > static void
547 > freepixels(void)                                /* free our pixels */
548   {
549          if (ncolors == 0)
550                  return;
551          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
552 <        free((char *)pixval);
552 >        free((void *)pixval);
553          pixval = NULL;
554          ncolors = 0;
555          if (ourmap != DefaultColormap(ourdisplay,ourscreen))
# Line 418 | Line 559 | freepixels()                           /* free our pixels */
559  
560  
561   static unsigned long
562 < true_pixel(col)                 /* return true pixel value for color */
563 < COLOR  col;
562 > true_pixel(                     /* return true pixel value for color */
563 >        COLOR  col
564 > )
565   {
566          unsigned long  rval;
567 <        BYTE  rgb[3];
567 >        uby8  rgb[3];
568  
569          map_color(rgb, col);
570          rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
# Line 433 | Line 575 | COLOR  col;
575  
576  
577   static int
578 < x11_getc()                      /* get a command character */
578 > x11_getc(void)                  /* get a command character */
579   {
580          while (c_last <= c_first) {
581                  c_first = c_last = 0;           /* reset */
# Line 444 | Line 586 | x11_getc()                     /* get a command character */
586   }
587  
588  
589 < static
590 < getevent()                      /* get next event */
589 > static void
590 > getevent(void)                  /* get next event */
591   {
592          XNextEvent(ourdisplay, levptr(XEvent));
593          switch (levptr(XEvent)->type) {
# Line 458 | Line 600 | getevent()                     /* get next event */
600                  break;
601          case MapNotify:
602                  if (ourvinfo.class == PseudoColor ||
603 <                                ourvinfo.class == GrayScale)
603 >                                ourvinfo.class == GrayScale) {
604                          if (getpixels() == 0)
605 <                                stderr_v("Cannot allocate colors\n");
605 >                                eputs("cannot allocate colors\n");
606                          else
607                                  new_ctab(ncolors);
608 +                }
609                  mapped = 1;
610                  break;
611          case Expose:
# Line 477 | Line 620 | getevent()                     /* get next event */
620   }
621  
622  
623 < static
624 < getkey(ekey)                            /* get input key */
625 < register XKeyPressedEvent  *ekey;
623 > static void
624 > getkey(                         /* get input key */
625 >        register XKeyPressedEvent  *ekey
626 > )
627   {
628          register int  n;
629  
# Line 490 | Line 634 | register XKeyPressedEvent  *ekey;
634   }
635  
636  
637 < static
638 < fixwindow(eexp)                         /* repair damage to window */
639 < register XExposeEvent  *eexp;
637 > static void
638 > fixwindow(                              /* repair damage to window */
639 >        register XExposeEvent  *eexp
640 > )
641   {
642 +        char  buf[80];
643 +
644          if (eexp->window == gwind) {
645 <                sprintf(getcombuf(&x11_driver), "repaint %d %d %d %d\n",
645 >                sprintf(buf, "repaint %d %d %d %d\n",
646                          eexp->x, gheight - eexp->y - eexp->height,
647                          eexp->x + eexp->width, gheight - eexp->y);
648 +                tocombuf(buf, &x11_driver);
649          } else if (eexp->window == comline->w) {
650                  if (eexp->count == 0)
651                          xt_redraw(comline);
# Line 505 | Line 653 | register XExposeEvent  *eexp;
653   }
654  
655  
656 < static
657 < resizewindow(ersz)                      /* resize window */
658 < register XConfigureEvent  *ersz;
656 > static void
657 > resizewindow(                   /* resize window */
658 >        register XConfigureEvent  *ersz
659 > )
660   {
661 <        if (ersz->width == gwidth && ersz->height-COMHEIGHT == gheight)
661 >        if (ersz->width == gwidth && ersz->height-comheight == gheight)
662                  return;
663  
664          gwidth = ersz->width;
665 <        gheight = ersz->height-COMHEIGHT;
665 >        gheight = ersz->height-comheight;
666          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
667          x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
668  
669 <        strcpy(getcombuf(&x11_driver), "new\n");
669 >        tocombuf("new\n", &x11_driver);
670   }

Diff Legend

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