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 1.12 by greg, Thu Mar 8 10:09:58 1990 UTC

# Line 24 | Line 24 | static char SCCSid[] = "$SunId$ LBL";
24  
25   #define GAMMA           2.2             /* exponent for color correction */
26  
27 < #define MINWIDTH        (4*COMCW)       /* minimum graphics window width */
28 < #define MINHEIGHT       16              /* minimum graphics window height */
27 > #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
28 > #define MINHEIGHT       MINWIDTH        /* minimum graphics window height */
29  
30   #define BORWIDTH        5               /* border width */
31   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
# Line 35 | 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
41 –
38   #define  ourscreen      DefaultScreen(ourdisplay)
39   #define  ourroot        RootWindow(ourdisplay,ourscreen)
40   #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
41   #define  ourblack       BlackPixel(ourdisplay,ourscreen)
42  
47 – #define  checkinp()     while (XPending(ourdisplay) > 0) getevent()
48 –
43   #define  levptr(etype)  ((etype *)&currentevent)
44  
45   static XEvent  currentevent;            /* current event */
# Line 55 | Line 49 | 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 */
# Line 69 | 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, 1.0
77 >        x11_comout, x11_comin, x11_flush, 1.0
78   };
79  
80  
# Line 86 | Line 82 | struct driver *
82   x11_init(name, id)              /* initialize driver */
83   char  *name, *id;
84   {
85 +        int  nplanes;
86 +        XVisualInfo  ourvinfo;
87 +        XSetWindowAttributes    ourwinattr;
88          XWMHints  ourxwmhints;
89 <        Pixmap  bmCursorSrc, bmCursorMsk;
89 >        XSizeHints      oursizhints;
90  
91          ourdisplay = XOpenDisplay(NULL);
92          if (ourdisplay == NULL) {
93                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
94                  return(NULL);
95          }
96 <        if (DisplayPlanes(ourdisplay, ourscreen) < 4) {
96 >        nplanes = DisplayPlanes(ourdisplay, ourscreen);
97 >        if (nplanes < 4) {
98                  stderr_v("not enough colors\n");
99                  return(NULL);
100 +        } else if (nplanes <= 12) {
101 +                if (!XMatchVisualInfo(ourdisplay,ourscreen,
102 +                                nplanes,PseudoColor,&ourvinfo)) {
103 +                        stderr_v("PseudoColor not supported\n");
104 +                        return(NULL);
105 +                }
106 +        } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
107 +                        nplanes,TrueColor,&ourvinfo)) {
108 +                stderr_v("TrueColor not supported\n");
109 +                return(NULL);
110          }
111 <        ourmap = DefaultColormap(ourdisplay,ourscreen);
112 <        make_gmap(GAMMA);                       /* make color map */
103 <        /* create a cursor */
104 <        pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
111 >        ourvisual = ourvinfo.visual;
112 >        make_gmap(GAMMA);
113          /* open window */
114 <        gwind = XCreateSimpleWindow(ourdisplay, ourroot, 0, 0,
114 >        ourwinattr.background_pixel = ourblack;
115 >        ourwinattr.border_pixel = ourblack;
116 >        gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
117                  DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
118                  DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
119 <                BORWIDTH, ourblack, ourwhite);
119 >                BORWIDTH, nplanes, InputOutput, ourvisual,
120 >                CWBackPixel|CWBorderPixel, &ourwinattr);
121          if (gwind == 0) {
122                  stderr_v("cannot create window\n");
123                  return(NULL);
124          }
125          XStoreName(ourdisplay, gwind, id);
126 +        /* create a cursor */
127 +        pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
128          ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
129          ourxwmhints.flags = InputHint;
130          ourxwmhints.input = True;
131          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
132 +        oursizhints.min_width = MINWIDTH;
133 +        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
134 +        oursizhints.flags = PMinSize;
135 +        XSetNormalHints(ourdisplay, gwind, &oursizhints);
136          XSelectInput(ourdisplay, gwind, ExposureMask);
137          XMapWindow(ourdisplay, gwind);
138          XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
# Line 143 | Line 160 | x11_close()                    /* close our display */
160                  xt_close(comline);
161                  comline = NULL;
162          }
146 –        if (gwind != 0) {
147 –                XFreeGC(ourdisplay, ourgc);
148 –                XDestroyWindow(ourdisplay, gwind);
149 –                gwind = 0;
150 –                ourgc = 0;
151 –        }
152 –        XFreeCursor(ourdisplay, pickcursor);
163          freepixels();
164 +        XFreeGC(ourdisplay, ourgc);
165 +        XDestroyWindow(ourdisplay, gwind);
166 +        gwind = 0;
167 +        ourgc = 0;
168 +        XFreeCursor(ourdisplay, pickcursor);
169          XCloseDisplay(ourdisplay);
170          ourdisplay = NULL;
171   }
# Line 160 | Line 175 | static
175   x11_clear(xres, yres)                   /* clear our display */
176   int  xres, yres;
177   {
178 <        if (xres != gwidth || yres != gheight) {        /* change window */
179 <                if (comline != NULL)
180 <                        xt_close(comline);
178 >                                                /* destroy command line */
179 >        if (comline != NULL)
180 >                xt_close(comline);
181 >                                                /* check limits */
182 >        if (xres < MINWIDTH)
183 >                xres = MINWIDTH;
184 >        if (yres < MINHEIGHT)
185 >                yres = MINHEIGHT;
186 >                                                /* resize window */
187 >        if (xres != gwidth || yres != gheight) {
188                  XSelectInput(ourdisplay, gwind, 0);
189                  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);
190                  gwidth = xres;
191                  gheight = yres;
192 <                XSync(ourdisplay, 1);           /* discard input */
192 >                XFlush(ourdisplay);
193                  sleep(2);                       /* wait for window manager */
194 +                XSync(ourdisplay, 1);           /* discard input */
195          }
196 +                                                /* get new command line */
197 +        comline = xt_open(ourdisplay,
198 +                        DefaultGC(ourdisplay,ourscreen),
199 +                        gwind, 0, gheight, gwidth, COMHEIGHT, 0, COMFN);
200 +        if (comline == NULL) {
201 +                stderr_v("Cannot open command line window\n");
202 +                quit(1);
203 +        }
204 +        XSelectInput(ourdisplay, comline->w, ExposureMask);
205 +                                                /* clear graphics window */
206          XClearWindow(ourdisplay, gwind);
207                                                  /* reinitialize color table */
208 <        if (getpixels() == 0)
209 <                stderr_v("cannot allocate colors\n");
210 <        else
211 <                new_ctab(ncolors);
212 <
208 >        if (ourvisual->class == PseudoColor)
209 >                if (getpixels() == 0)
210 >                        stderr_v("cannot allocate colors\n");
211 >                else
212 >                        new_ctab(ncolors);
213 >                                                /* remove earmuffs */
214          XSelectInput(ourdisplay, gwind,
215                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
216   }
# Line 195 | Line 221 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
221   COLOR  col;
222   int  xmin, ymin, xmax, ymax;
223   {
198 –        extern long  nrays;             /* global ray count */
224          extern int  xnewcolr();         /* pixel assignment routine */
225 <        static long  lastflush = 0;     /* ray count at last flush */
225 >        extern unsigned long  true_pixel();
226 >        unsigned long  pixel;
227  
228 <        if (ncolors > 0) {
229 <                XSetForeground(ourdisplay, ourgc,
230 <                                pixval[get_pixel(col, xnewcolr)]);
231 <                XFillRectangle(ourdisplay, gwind,
232 <                        ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
233 <        }
234 <        if (nrays - lastflush >= WFLUSH) {
235 <                if (ncolors <= 0)       /* output necessary for death */
236 <                        XFillRectangle(ourdisplay, gwind,
211 <                                        ourgc, 0, 0, 1 ,1);
212 <                checkinp();
213 <                lastflush = nrays;
214 <        }
228 >        if (ncolors > 0)
229 >                pixel = pixval[get_pixel(col, xnewcolr)];
230 >        else if (ourvisual->class == TrueColor)
231 >                pixel = true_pixel(col);
232 >        else
233 >                return;
234 >        XSetForeground(ourdisplay, ourgc, pixel);
235 >        XFillRectangle(ourdisplay, gwind,
236 >                ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
237   }
238  
239  
240   static
241 + x11_flush()                     /* flush output */
242 + {
243 +        XNoOp(ourdisplay);
244 +        while (XPending(ourdisplay) > 0)
245 +                getevent();
246 + }
247 +
248 +
249 + static
250   x11_comin(inp, prompt)          /* read in a command line */
251   char  *inp, *prompt;
252   {
# Line 236 | Line 267 | static
267   x11_comout(out)                 /* output a string to command line */
268   char  *out;
269   {
270 <        if (comline != NULL)
271 <                xt_puts(out, comline);
272 <        XFlush(ourdisplay);
270 >        if (comline == NULL)
271 >                return;
272 >        xt_puts(out, comline);
273 >        if (out[strlen(out)-1] == '\n')
274 >                XFlush(ourdisplay);
275   }
276  
277  
# Line 246 | Line 279 | static
279   x11_errout(msg)                 /* output an error message */
280   char  *msg;
281   {
249 –        x11_comout(msg);
282          stderr_v(msg);          /* send to stderr also! */
283 +        x11_comout(msg);
284   }
285  
286  
# Line 302 | Line 335 | int  r, g, b;
335   static int
336   getpixels()                             /* get the color map */
337   {
305 –        Visual  *ourvis = DefaultVisual(ourdisplay,ourscreen);
306 –
338          if (ncolors > 0)
339                  return(ncolors);
340 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
340 >        if (ourvisual == DefaultVisual(ourdisplay,ourscreen)) {
341 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
342 >                goto loop;
343 >        }
344 > newmap:
345 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvisual,AllocNone);
346 > loop:
347 >        for (ncolors = ourvisual->map_entries;
348 >                        ncolors > ourvisual->map_entries/3;
349 >                        ncolors = ncolors*.937) {
350                  pixval = (int *)malloc(ncolors*sizeof(int));
351                  if (pixval == NULL)
352 <                        break;
352 >                        return(ncolors = 0);
353                  if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
354                                  pixval,ncolors) != 0)
355 <                        return(ncolors);
355 >                        break;
356                  free((char *)pixval);
357 +                pixval = NULL;
358          }
359 <        return(ncolors = 0);
359 >        if (pixval == NULL) {
360 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
361 >                        goto newmap;            /* try it with our map */
362 >                else
363 >                        return(ncolors = 0);    /* failed */
364 >        }
365 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen)) {
366 >                XColor  thiscolor;
367 >                register int  i, j;
368 >                                                /* reset black and white */
369 >                for (i = 0; i < ncolors; i++) {
370 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
371 >                                continue;
372 >                        thiscolor.pixel = pixval[i];
373 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
374 >                        XQueryColor(ourdisplay,
375 >                                        DefaultColormap(ourdisplay,ourscreen),
376 >                                        &thiscolor);
377 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
378 >                        for (j = i; j+1 < ncolors; j++)
379 >                                pixval[j] = pixval[j+1];
380 >                        ncolors--;
381 >                        i--;
382 >                }
383 >        }
384 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
385 >        return(ncolors);
386   }
387  
388  
# Line 326 | Line 393 | freepixels()                           /* free our pixels */
393                  return;
394          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
395          ncolors = 0;
396 +        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
397 +                XFreeColormap(ourdisplay, ourmap);
398 +        ourmap = 0;
399   }
400  
401  
402 + static unsigned long
403 + true_pixel(col)                 /* return true pixel value for color */
404 + COLOR  col;
405 + {
406 +        unsigned long  rval;
407 +        BYTE  rgb[3];
408 +
409 +        map_color(rgb, col);
410 +        rval = ourvisual->red_mask*rgb[RED]/255 & ourvisual->red_mask;
411 +        rval |= ourvisual->green_mask*rgb[GRN]/255 & ourvisual->green_mask;
412 +        rval |= ourvisual->blue_mask*rgb[BLU]/255 & ourvisual->blue_mask;
413 +        return(rval);
414 + }
415 +
416 +
417   static int
418   x11_getc()                      /* get a command character */
419   {
# Line 353 | Line 438 | getevent()                     /* get next event */
438                  freepixels();
439                  break;
440          case MapNotify:
441 <                if (getpixels() == 0)
442 <                        stderr_v("Cannot allocate colors\n");
443 <                else
444 <                        new_ctab(ncolors);
441 >                if (ourvisual->class == PseudoColor)
442 >                        if (getpixels() == 0)
443 >                                stderr_v("Cannot allocate colors\n");
444 >                        else
445 >                                new_ctab(ncolors);
446                  break;
447          case Expose:
448                  fixwindow(levptr(XExposeEvent));
# Line 374 | Line 460 | static
460   getkey(ekey)                            /* get input key */
461   register XKeyPressedEvent  *ekey;
462   {
463 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
463 >        register int  n;
464 >
465 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
466                                  NULL, NULL);
467 <        x11_driver.inpready = c_last-c_first;
467 >        c_last += n;
468 >        x11_driver.inpready += n;
469   }
470  
471  

Diff Legend

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