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.1 by greg, Tue Dec 19 12:54:30 1989 UTC vs.
Revision 1.7 by greg, Fri Feb 23 14:50:38 1990 UTC

# Line 5 | Line 5 | static char SCCSid[] = "$SunId$ LBL";
5   /* Copyright (c) 1989 Regents of the University of California */
6  
7   /*
8 < *  x11.c - driver for X-windows version 11R4
8 > *  x11.c - driver for X-windows version 11.3
9   *
10 < *     1989
10 > *     Jan 1990
11   */
12  
13   #include  <stdio.h>
# Line 15 | Line 15 | static char SCCSid[] = "$SunId$ LBL";
15   #include  <sys/ioctl.h>
16  
17   #include  <X11/Xlib.h>
18 < #include <X11/cursorfont.h>
19 < #include <X11/Xutil.h>
20 < #ifdef notdef
21 < #include  "bcross.cursor"
22 < #include  "bcross_mask.cu"
23 < #endif
18 > #include  <X11/cursorfont.h>
19 > #include  <X11/Xutil.h>
20  
21   #include  "color.h"
26 –
22   #include  "driver.h"
28 –
23   #include  "x11twind.h"
24  
25   #define GAMMA           2.2             /* exponent for color correction */
26  
27 + #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
28 + #define MINHEIGHT       MINWIDTH        /* minimum graphics window height */
29 +
30   #define BORWIDTH        5               /* border width */
34 – #define BARHEIGHT       25              /* menu bar size */
31   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
32  
33   #define COMFN           "8x13"          /* command line font name */
# Line 39 | Line 35 | static char SCCSid[] = "$SunId$ LBL";
35   #define COMCW           8               /* approx. character width (pixels) */
36   #define COMCH           14              /* approx. character height (pixels) */
37  
38 < #ifndef WFLUSH
39 < #define WFLUSH          30              /* flush after this many rays */
40 < #endif
38 > #define  ourscreen      DefaultScreen(ourdisplay)
39 > #define  ourroot        RootWindow(ourdisplay,ourscreen)
40 > #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
41 > #define  ourblack       BlackPixel(ourdisplay,ourscreen)
42  
43 < #define  checkinp()     while (XPending(ourdisplay) > 0) getevent()
43 > #define  levptr(etype)  ((etype *)&currentevent)
44  
45 < #define  levptr(etype)  ((etype *)&thisevent)
45 > static XEvent  currentevent;            /* current event */
46  
50 – static char  *clientname;               /* calling client's name */
51 –
52 – static XEvent  thisevent;               /* current event */
53 –
47   static int  ncolors = 0;                /* color table size */
48   static int  *pixval = NULL;             /* allocated pixels */
49  
50   static Display  *ourdisplay = NULL;     /* our display */
51  
52 + static Visual  *ourvisual;              /* our visual structure */
53 +
54   static Window  gwind = 0;               /* our graphics window */
55  
56   static Cursor  pickcursor = 0;          /* cursor used for picking */
57  
58 < static int  gwidth = 0;                 /* graphics window width */
64 < static int  gheight = 0;                /* graphics window height */
58 > static int  gwidth, gheight;            /* graphics window size */
59  
60   static TEXTWIND  *comline = NULL;       /* our command line */
61  
# Line 71 | Line 65 | static int  c_last = 0;                        /* last character in queue *
65  
66   static GC  ourgc = 0;                   /* our graphics context for drawing */
67  
68 < static Colormap ourmap;                 /* our color map */
68 > static Colormap ourmap = 0;             /* our color map */
69  
70   extern char  *malloc();
71  
72   int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
73 <                x11_getcur(), x11_comout(), x11_comin();
73 >                x11_getcur(), x11_comout(), x11_comin(), x11_flush();
74  
75   static struct driver  x11_driver = {
76          x11_close, x11_clear, x11_paintr, x11_getcur,
77 <        x11_comout, x11_comin,
84 <        MAXRES, MAXRES
77 >        x11_comout, x11_comin, x11_flush, 1.0
78   };
79  
80  
# Line 89 | Line 82 | struct driver *
82   x11_init(name, id)              /* initialize driver */
83   char  *name, *id;
84   {
85 +        int  nplanes;
86 +        XVisualInfo  ourvinfo;
87 +        XWMHints  ourxwmhints;
88          Pixmap  bmCursorSrc, bmCursorMsk;
89  
90          ourdisplay = XOpenDisplay(NULL);
# Line 96 | Line 92 | char  *name, *id;
92                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
93                  return(NULL);
94          }
95 <        if (DisplayPlanes(ourdisplay, DefaultScreen(ourdisplay)) < 4) {
95 >        nplanes = DisplayPlanes(ourdisplay, ourscreen);
96 >        if (nplanes < 4) {
97                  stderr_v("not enough colors\n");
98                  return(NULL);
99 +        } else if (nplanes <= 12) {
100 +                if (!XMatchVisualInfo(ourdisplay,ourscreen,
101 +                                nplanes,PseudoColor,&ourvinfo)) {
102 +                        stderr_v("PseudoColor not supported\n");
103 +                        return(NULL);
104 +                }
105 +        } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
106 +                        nplanes,TrueColor,&ourvinfo)) {
107 +                stderr_v("TrueColor not supported\n");
108 +                return(NULL);
109          }
110 <        ourmap = DefaultColormap(ourdisplay,DefaultScreen(ourdisplay));
111 <        make_gmap(GAMMA);                       /* make color map */
105 <        /*
106 <        bmCursorSrc = XCreateBitmapFromData(ourdisplay,
107 <                        gwind, bcross_bits,
108 <                        bcross_width, bcross_height);
109 <        bmCursorMsk = XCreateBitmapFromData(ourdisplay,
110 <                        gwind, bcross_mask_bits,
111 <                        bcross_width, bcross_height);
112 <
113 <        pickcursor = XCreatePixmapCursor(ourdisplay,
114 <                        bmCursorSrc, bmCursorMsk,
115 <                        BlackPixel(ourdisplay,
116 <                        DefaultScreen(ourdisplay)),
117 <                        WhitePixel(ourdisplay,
118 <                        DefaultScreen(ourdisplay)),
119 <                        bcross_x_hot, bcross_y_hot);
120 <        XFreePixmap(ourdisplay, bmCursorSrc);
121 <        XFreePixmap(ourdisplay, bmCursorMsk);
122 <        */
110 >        ourvisual = ourvinfo.visual;
111 >        make_gmap(GAMMA);
112          /* create a cursor */
113          pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
114 <        /*  new */
115 <        clientname = id;
114 >        /* open window */
115 >        gwind = XCreateSimpleWindow(ourdisplay, ourroot, 0, 0,
116 >                DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
117 >                DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
118 >                BORWIDTH, ourblack, ourwhite);
119 >        if (gwind == 0) {
120 >                stderr_v("cannot create window\n");
121 >                return(NULL);
122 >        }
123 >        XStoreName(ourdisplay, gwind, id);
124 >        ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
125 >        ourxwmhints.flags = InputHint;
126 >        ourxwmhints.input = True;
127 >        XSetWMHints(ourdisplay, gwind, &ourxwmhints);
128 >        XSelectInput(ourdisplay, gwind, ExposureMask);
129 >        XMapWindow(ourdisplay, gwind);
130 >        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
131 >        gwidth = levptr(XExposeEvent)->width;
132 >        gheight = levptr(XExposeEvent)->height - COMHEIGHT;
133 >        x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
134 >        x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
135          x11_driver.inpready = 0;
136          cmdvec = x11_comout;                    /* set error vectors */
137          if (wrnvec != NULL)
# Line 145 | Line 153 | x11_close()                    /* close our display */
153                  comline = NULL;
154          }
155          if (gwind != 0) {
156 +                freepixels();
157                  XFreeGC(ourdisplay, ourgc);
158                  XDestroyWindow(ourdisplay, gwind);
159                  gwind = 0;
151 –                gwidth = gheight = 0;
160                  ourgc = 0;
161          }
162          XFreeCursor(ourdisplay, pickcursor);
155 –        freepixels();
163          XCloseDisplay(ourdisplay);
164          ourdisplay = NULL;
165   }
# Line 162 | Line 169 | static
169   x11_clear(xres, yres)                   /* clear our display */
170   int  xres, yres;
171   {
165 –        XWMHints  ourxwmhints;
166 –        XSetWindowAttributes ourwindowattr;
167 –
172          if (xres != gwidth || yres != gheight) {        /* change window */
173                  if (comline != NULL)
174                          xt_close(comline);
175 <                if (gwind == 0) {                       /* new window */
176 <                        ourwindowattr.backing_store = Always;
173 <                        ourwindowattr.background_pixel =
174 <                        WhitePixel(ourdisplay, DefaultScreen(ourdisplay));
175 <                        ourwindowattr.border_pixel =
176 <                        BlackPixel(ourdisplay, DefaultScreen(ourdisplay));
177 <                        gwind = XCreateWindow(ourdisplay,
178 <                                RootWindow(ourdisplay,
179 <                                DefaultScreen(ourdisplay)),
180 <                                0, 0, xres, yres+COMHEIGHT, BORWIDTH,
181 <                                0, InputOutput, CopyFromParent,
182 <                                CWBackingStore|CWBackPixel|CWBorderPixel,
183 <                                &ourwindowattr);
184 <                        if (gwind == 0)
185 <                                goto fail;
186 <                        XStoreName(ourdisplay, gwind, clientname);
187 <                        ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
188 <                        ourxwmhints.flags = InputHint;
189 <                        ourxwmhints.input = True;
190 <                        XSetWMHints(ourdisplay, gwind, &ourxwmhints);
191 <                        XSelectInput(ourdisplay, gwind,
192 <                                     KeyPressMask|ButtonPressMask);
193 <                        XMapWindow(ourdisplay, gwind);
194 <                } else                                  /* resize window */
195 <                        XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
175 >                XSelectInput(ourdisplay, gwind, 0);
176 >                XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
177                  comline = xt_open(ourdisplay,
178 <                                DefaultGC(ourdisplay,DefaultScreen(ourdisplay)),
178 >                                DefaultGC(ourdisplay,ourscreen),
179                                  gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
180 <                if (comline == NULL)
181 <                        goto fail;
180 >                if (comline == NULL) {
181 >                        stderr_v("Cannot open command line window\n");
182 >                        quit(1);
183 >                }
184 >                XSelectInput(ourdisplay, comline->w, ExposureMask);
185                  gwidth = xres;
186                  gheight = yres;
187 <                XFlush(ourdisplay);
188 <                sleep(10);
189 <        } else                                          /* just clear */
190 <                XClearWindow(ourdisplay, gwind);
191 <                                                /* reinitialize color table */
192 <        if (ncolors == 0 && getpixels() == 0)
193 <                stderr_v("cannot allocate colors\n");
194 <        else
195 <                new_ctab(ncolors);
196 <        return;
197 < fail:
198 <        stderr_v("Failure opening window in x11_clear\n");
215 <        quit(1);
187 >                XSync(ourdisplay, 1);           /* discard input */
188 >                sleep(2);                       /* wait for window manager */
189 >        }
190 >        XClearWindow(ourdisplay, gwind);
191 >        if (ourvisual->class == PseudoColor)    /* reinitialize color table */
192 >                if (getpixels() == 0)
193 >                        stderr_v("cannot allocate colors\n");
194 >                else
195 >                        new_ctab(ncolors);
196 >
197 >        XSelectInput(ourdisplay, gwind,
198 >                StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
199   }
200  
201  
# Line 221 | Line 204 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
204   COLOR  col;
205   int  xmin, ymin, xmax, ymax;
206   {
224 –        extern long  nrays;             /* global ray count */
207          extern int  xnewcolr();         /* pixel assignment routine */
208 <        static long  lastflush = 0;     /* ray count at last flush */
208 >        extern unsigned long  true_pixel();
209 >        unsigned long  pixel;
210  
211 <        if (ncolors > 0) {
212 <                XSetForeground(ourdisplay, ourgc,
213 <                                pixval[get_pixel(col, xnewcolr)]);
214 <                XFillRectangle(ourdisplay, gwind,
215 <                        ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
216 <        }
217 <        if (nrays - lastflush >= WFLUSH) {
218 <                if (ncolors <= 0)       /* output necessary for death */
219 <                        XFillRectangle(ourdisplay, gwind,
237 <                                        ourgc, 0, 0, 1 ,1);
238 <                checkinp();
239 <                lastflush = nrays;
240 <        }
211 >        if (ncolors > 0)
212 >                pixel = pixval[get_pixel(col, xnewcolr)];
213 >        else if (ourvisual->class == TrueColor)
214 >                pixel = true_pixel(col);
215 >        else
216 >                return;
217 >        XSetForeground(ourdisplay, ourgc, pixel);
218 >        XFillRectangle(ourdisplay, gwind,
219 >                ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
220   }
221  
222  
223   static
224 < x11_comin(inp)                  /* read in a command line */
246 < char  *inp;
224 > x11_flush()                     /* flush output */
225   {
226 +        if (ncolors <= 0)       /* output necessary for death */
227 +                XFillRectangle(ourdisplay, gwind, ourgc, 0, 0, 1 ,1);
228 +        while (XPending(ourdisplay) > 0)
229 +                getevent();
230 + }
231 +
232 +
233 + static
234 + x11_comin(inp, prompt)          /* read in a command line */
235 + char  *inp, *prompt;
236 + {
237          int  x11_getc(), x11_comout();
238  
239 +        if (prompt != NULL)
240 +                if (fromcombuf(inp, &x11_driver))
241 +                        return;
242 +                else
243 +                        xt_puts(prompt, comline);
244          xt_cursor(comline, TBLKCURS);
245          editline(inp, x11_getc, x11_comout);
246          xt_cursor(comline, TNOCURS);
# Line 323 | Line 317 | int  r, g, b;
317   static int
318   getpixels()                             /* get the color map */
319   {
320 <        Visual  *ourvis = DefaultVisual(ourdisplay,DefaultScreen(ourdisplay));
321 <
322 <        freepixels();
323 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
320 >        if (ncolors > 0)
321 >                return(ncolors);
322 >        if (ourvisual == DefaultVisual(ourdisplay,ourscreen)) {
323 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
324 >                goto loop;
325 >        }
326 > newmap:
327 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvisual,AllocNone);
328 > loop:
329 >        for (ncolors = ourvisual->map_entries;
330 >                        ncolors > ourvisual->map_entries/3;
331 >                        ncolors = ncolors*.937) {
332                  pixval = (int *)malloc(ncolors*sizeof(int));
333                  if (pixval == NULL)
334 <                        break;
334 >                        return(ncolors = 0);
335                  if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
336                                  pixval,ncolors) != 0)
337 <                        return(ncolors);
337 >                        break;
338                  free((char *)pixval);
339 +                pixval = NULL;
340          }
341 <        return(ncolors = 0);
341 >        if (pixval == NULL) {
342 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
343 >                        goto newmap;            /* try it with our map */
344 >                else
345 >                        return(ncolors = 0);    /* failed */
346 >        }
347 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen)) {
348 >                XColor  thiscolor;
349 >                register int  i, j;
350 >                                                /* reset black and white */
351 >                for (i = 0; i < ncolors; i++) {
352 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
353 >                                continue;
354 >                        thiscolor.pixel = pixval[i];
355 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
356 >                        XQueryColor(ourdisplay,
357 >                                        DefaultColormap(ourdisplay,ourscreen),
358 >                                        &thiscolor);
359 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
360 >                        for (j = i; j+1 < ncolors; j++)
361 >                                pixval[j] = pixval[j+1];
362 >                        ncolors--;
363 >                        i--;
364 >                }
365 >        }
366 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
367 >        return(ncolors);
368   }
369  
370  
# Line 346 | Line 375 | freepixels()                           /* free our pixels */
375                  return;
376          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
377          ncolors = 0;
378 +        if (ourmap != 0 && ourmap != DefaultColormap(ourdisplay,ourscreen))
379 +                XFreeColormap(ourdisplay, ourmap);
380 +        ourmap = 0;
381   }
382  
383  
384 + static unsigned long
385 + true_pixel(col)                 /* return true pixel value for color */
386 + COLOR  col;
387 + {
388 +        unsigned long  rval;
389 +        BYTE  rgb[3];
390 +
391 +        map_color(rgb, col);
392 +        rval = ourvisual->red_mask*rgb[RED]/255 & ourvisual->red_mask;
393 +        rval |= ourvisual->green_mask*rgb[GRN]/255 & ourvisual->green_mask;
394 +        rval |= ourvisual->blue_mask*rgb[BLU]/255 & ourvisual->blue_mask;
395 +        return(rval);
396 + }
397 +
398 +
399   static int
400   x11_getc()                      /* get a command character */
401   {
# Line 366 | Line 413 | getevent()                     /* get next event */
413   {
414          XNextEvent(ourdisplay, levptr(XEvent));
415          switch (levptr(XEvent)->type) {
416 +        case ConfigureNotify:
417 +                resizewindow(levptr(XConfigureEvent));
418 +                break;
419 +        case UnmapNotify:
420 +                freepixels();
421 +                break;
422 +        case MapNotify:
423 +                if (ourvisual->class == PseudoColor)
424 +                        if (getpixels() == 0)
425 +                                stderr_v("Cannot allocate colors\n");
426 +                        else
427 +                                new_ctab(ncolors);
428 +                break;
429 +        case Expose:
430 +                fixwindow(levptr(XExposeEvent));
431 +                break;
432          case KeyPress:
433                  getkey(levptr(XKeyPressedEvent));
434                  break;
# Line 379 | Line 442 | static
442   getkey(ekey)                            /* get input key */
443   register XKeyPressedEvent  *ekey;
444   {
445 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
445 >        int  n;
446 >
447 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
448                                  NULL, NULL);
449 <        x11_driver.inpready = c_last-c_first;
449 >        c_last += n;
450 >        x11_driver.inpready += n;
451   }
452  
453  
388 – #ifdef notdef
454   static
455   fixwindow(eexp)                         /* repair damage to window */
456   register XExposeEvent  *eexp;
457   {
458 <        if (eexp->subwindow == 0)
459 <                repaint(eexp->x, gheight - eexp->y - eexp->height,
458 >        if (eexp->window == gwind) {
459 >                sprintf(getcombuf(&x11_driver), "repaint %d %d %d %d\n",
460 >                        eexp->x, gheight - eexp->y - eexp->height,
461                          eexp->x + eexp->width, gheight - eexp->y);
462 <        else if (eexp->subwindow == comline->w)
463 <                xt_redraw(comline);
462 >        } else if (eexp->window == comline->w) {
463 >                if (eexp->count == 0)
464 >                        xt_redraw(comline);
465 >        }
466   }
467 < #endif
467 >
468 >
469 > static
470 > resizewindow(ersz)                      /* resize window */
471 > register XConfigureEvent  *ersz;
472 > {
473 >        if (ersz->width == gwidth && ersz->height-COMHEIGHT == gheight)
474 >                return;
475 >
476 >        gwidth = ersz->width;
477 >        gheight = ersz->height-COMHEIGHT;
478 >        x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
479 >        x11_driver.ysiz = gheight < MINHEIGHT ? MINHEIGHT : gheight;
480 >
481 >        strcpy(getcombuf(&x11_driver), "new\n");
482 > }

Diff Legend

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