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.5 by greg, Thu Feb 22 11:46:26 1990 UTC vs.
Revision 1.18 by greg, Fri Apr 19 15:02:54 1991 UTC

# Line 21 | Line 21 | static char SCCSid[] = "$SunId$ LBL";
21   #include  "color.h"
22   #include  "driver.h"
23   #include  "x11twind.h"
24 + #include  "x11icon.h"
25  
26   #define GAMMA           2.2             /* exponent for color correction */
27  
28 < #define MINWIDTH        (4*COMCW)       /* minimum graphics window width */
29 < #define MINHEIGHT       16              /* minimum graphics window height */
28 > #define MINWIDTH        (32*COMCW)      /* minimum graphics window width */
29 > #define MINHEIGHT       MINWIDTH        /* minimum graphics window height */
30  
31   #define BORWIDTH        5               /* border width */
32   #define COMHEIGHT       (COMLH*COMCH)   /* command line height (pixels) */
# Line 45 | Line 46 | static char SCCSid[] = "$SunId$ LBL";
46   static XEvent  currentevent;            /* current event */
47  
48   static int  ncolors = 0;                /* color table size */
49 < static int  *pixval = NULL;             /* allocated pixels */
49 > static unsigned long  *pixval = NULL;   /* allocated pixels */
50  
51   static Display  *ourdisplay = NULL;     /* our display */
52  
53 + static Visual  *ourvisual;              /* our visual structure */
54 +
55   static Window  gwind = 0;               /* our graphics window */
56  
57   static Cursor  pickcursor = 0;          /* cursor used for picking */
# Line 63 | Line 66 | static int  c_last = 0;                        /* last character in queue *
66  
67   static GC  ourgc = 0;                   /* our graphics context for drawing */
68  
69 < static Colormap ourmap;                 /* our color map */
69 > static Colormap ourmap = 0;             /* our color map */
70  
71 < extern char  *malloc();
71 > extern char  *malloc(), *getcombuf();
72  
73 < int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
73 > static int  x11_close(), x11_clear(), x11_paintr(), x11_errout(),
74                  x11_getcur(), x11_comout(), x11_comin(), x11_flush();
75  
76   static struct driver  x11_driver = {
# Line 80 | Line 83 | struct driver *
83   x11_init(name, id)              /* initialize driver */
84   char  *name, *id;
85   {
86 +        int  nplanes;
87 +        XVisualInfo  ourvinfo;
88 +        XSetWindowAttributes    ourwinattr;
89          XWMHints  ourxwmhints;
90 <        Pixmap  bmCursorSrc, bmCursorMsk;
90 >        XSizeHints      oursizhints;
91  
92          ourdisplay = XOpenDisplay(NULL);
93          if (ourdisplay == NULL) {
94                  stderr_v("cannot open X-windows; DISPLAY variable set?\n");
95                  return(NULL);
96          }
97 <        if (DisplayPlanes(ourdisplay, ourscreen) < 4) {
97 >        nplanes = DisplayPlanes(ourdisplay, ourscreen);
98 >        if (nplanes < 4) {
99                  stderr_v("not enough colors\n");
100                  return(NULL);
101 +        } else if (nplanes <= 12) {
102 +                if (!XMatchVisualInfo(ourdisplay,ourscreen,
103 +                                nplanes,PseudoColor,&ourvinfo)) {
104 +                        stderr_v("PseudoColor server required\n");
105 +                        return(NULL);
106 +                }
107 +        } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
108 +                        nplanes,TrueColor,&ourvinfo) &&
109 +                                                /* kludge for DirectColor */
110 +                        !XMatchVisualInfo(ourdisplay,ourscreen,
111 +                        nplanes,DirectColor,&ourvinfo)) {
112 +                stderr_v("TrueColor server required\n");
113 +                return(NULL);
114          }
115 <        ourmap = DefaultColormap(ourdisplay,ourscreen);
116 <        make_gmap(GAMMA);                       /* make color map */
97 <        /* create a cursor */
98 <        pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
115 >        ourvisual = ourvinfo.visual;
116 >        make_gmap(GAMMA);
117          /* open window */
118 <        gwind = XCreateSimpleWindow(ourdisplay, ourroot, 0, 0,
118 >        ourwinattr.background_pixel = ourblack;
119 >        ourwinattr.border_pixel = ourblack;
120 >        gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
121                  DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
122                  DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
123 <                BORWIDTH, ourblack, ourwhite);
123 >                BORWIDTH, nplanes, InputOutput, ourvisual,
124 >                CWBackPixel|CWBorderPixel, &ourwinattr);
125          if (gwind == 0) {
126                  stderr_v("cannot create window\n");
127                  return(NULL);
128          }
129          XStoreName(ourdisplay, gwind, id);
130 +        /* create a cursor */
131 +        pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
132          ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
133 <        ourxwmhints.flags = InputHint;
133 >        ourxwmhints.flags = InputHint|IconPixmapHint;
134          ourxwmhints.input = True;
135 +        ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
136 +                        gwind, x11icon_bits, x11icon_width, x11icon_height);
137          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
138 +        oursizhints.min_width = MINWIDTH;
139 +        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
140 +        oursizhints.flags = PMinSize;
141 +        XSetNormalHints(ourdisplay, gwind, &oursizhints);
142          XSelectInput(ourdisplay, gwind, ExposureMask);
143          XMapWindow(ourdisplay, gwind);
144 <        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
144 >        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
145          gwidth = levptr(XExposeEvent)->width;
146          gheight = levptr(XExposeEvent)->height - COMHEIGHT;
147          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
# Line 137 | Line 166 | x11_close()                    /* close our display */
166                  xt_close(comline);
167                  comline = NULL;
168          }
140 –        if (gwind != 0) {
141 –                XFreeGC(ourdisplay, ourgc);
142 –                XDestroyWindow(ourdisplay, gwind);
143 –                gwind = 0;
144 –                ourgc = 0;
145 –        }
146 –        XFreeCursor(ourdisplay, pickcursor);
169          freepixels();
170 +        XFreeGC(ourdisplay, ourgc);
171 +        XDestroyWindow(ourdisplay, gwind);
172 +        gwind = 0;
173 +        ourgc = 0;
174 +        XFreeCursor(ourdisplay, pickcursor);
175          XCloseDisplay(ourdisplay);
176          ourdisplay = NULL;
177   }
# Line 154 | Line 181 | static
181   x11_clear(xres, yres)                   /* clear our display */
182   int  xres, yres;
183   {
184 <        if (xres != gwidth || yres != gheight) {        /* change window */
185 <                if (comline != NULL)
186 <                        xt_close(comline);
184 >                                                /* check limits */
185 >        if (xres < MINWIDTH)
186 >                xres = MINWIDTH;
187 >        if (yres < MINHEIGHT)
188 >                yres = MINHEIGHT;
189 >                                                /* resize window */
190 >        if (xres != gwidth || yres != gheight) {
191                  XSelectInput(ourdisplay, gwind, 0);
192                  XResizeWindow(ourdisplay, gwind, xres, yres+COMHEIGHT);
162 –                comline = xt_open(ourdisplay,
163 –                                DefaultGC(ourdisplay,ourscreen),
164 –                                gwind, 0, yres, xres, COMHEIGHT, 0, COMFN);
165 –                if (comline == NULL) {
166 –                        stderr_v("Cannot open command line window\n");
167 –                        quit(1);
168 –                }
169 –                XSelectInput(ourdisplay, comline->w, ExposureMask);
193                  gwidth = xres;
194                  gheight = yres;
195 <                XSync(ourdisplay, 1);           /* discard input */
195 >                XFlush(ourdisplay);
196                  sleep(2);                       /* wait for window manager */
197 +                XSync(ourdisplay, 1);           /* discard input */
198          }
199          XClearWindow(ourdisplay, gwind);
200                                                  /* reinitialize color table */
201 <        if (getpixels() == 0)
202 <                stderr_v("cannot allocate colors\n");
203 <        else
204 <                new_ctab(ncolors);
205 <
201 >        if (ourvisual->class == PseudoColor)
202 >                if (getpixels() == 0)
203 >                        stderr_v("cannot allocate colors\n");
204 >                else
205 >                        new_ctab(ncolors);
206 >                                                /* get new command line */
207 >        if (comline != NULL)
208 >                xt_close(comline);
209 >        comline = xt_open(ourdisplay,
210 >                        DefaultGC(ourdisplay,ourscreen),
211 >                        gwind, 0, gheight, gwidth, COMHEIGHT, 0, COMFN);
212 >        if (comline == NULL) {
213 >                stderr_v("Cannot open command line window\n");
214 >                quit(1);
215 >        }
216 >        XSelectInput(ourdisplay, comline->w, ExposureMask);
217 >                                                /* remove earmuffs */
218          XSelectInput(ourdisplay, gwind,
219                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
220   }
# Line 190 | Line 226 | COLOR  col;
226   int  xmin, ymin, xmax, ymax;
227   {
228          extern int  xnewcolr();         /* pixel assignment routine */
229 +        extern unsigned long  true_pixel();
230 +        unsigned long  pixel;
231  
232 <        if (ncolors > 0) {
233 <                XSetForeground(ourdisplay, ourgc,
234 <                                pixval[get_pixel(col, xnewcolr)]);
235 <                XFillRectangle(ourdisplay, gwind,
236 <                        ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
237 <        }
232 >        if (ncolors > 0)
233 >                pixel = pixval[get_pixel(col, xnewcolr)];
234 >        else if (ourvisual->class != PseudoColor)
235 >                pixel = true_pixel(col);
236 >        else
237 >                return;
238 >        XSetForeground(ourdisplay, ourgc, pixel);
239 >        XFillRectangle(ourdisplay, gwind,
240 >                ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
241   }
242  
243  
244   static
245   x11_flush()                     /* flush output */
246   {
247 <        if (ncolors <= 0)       /* output necessary for death */
207 <                XFillRectangle(ourdisplay, gwind, ourgc, 0, 0, 1 ,1);
247 >        XNoOp(ourdisplay);
248          while (XPending(ourdisplay) > 0)
249                  getevent();
250   }
# Line 214 | Line 254 | static
254   x11_comin(inp, prompt)          /* read in a command line */
255   char  *inp, *prompt;
256   {
257 <        int  x11_getc(), x11_comout();
257 >        extern int  x11_getc();
258  
259          if (prompt != NULL)
260                  if (fromcombuf(inp, &x11_driver))
# Line 231 | Line 271 | static
271   x11_comout(out)                 /* output a string to command line */
272   char  *out;
273   {
274 <        if (comline != NULL)
275 <                xt_puts(out, comline);
276 <        XFlush(ourdisplay);
274 >        if (comline == NULL)
275 >                return;
276 >        xt_puts(out, comline);
277 >        if (out[strlen(out)-1] == '\n')
278 >                XFlush(ourdisplay);
279   }
280  
281  
# Line 241 | Line 283 | static
283   x11_errout(msg)                 /* output an error message */
284   char  *msg;
285   {
244 –        x11_comout(msg);
286          stderr_v(msg);          /* send to stderr also! */
287 +        x11_comout(msg);
288   }
289  
290  
# Line 297 | Line 339 | int  r, g, b;
339   static int
340   getpixels()                             /* get the color map */
341   {
342 <        Visual  *ourvis = DefaultVisual(ourdisplay,ourscreen);
342 >        XColor  thiscolor;
343 >        register int  i, j;
344  
345          if (ncolors > 0)
346 <                return(ncolors);
347 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
348 <                pixval = (int *)malloc(ncolors*sizeof(int));
346 >                goto donecolors;
347 >        if (ourvisual == DefaultVisual(ourdisplay,ourscreen)) {
348 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
349 >                goto loop;
350 >        }
351 > newmap:
352 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvisual,AllocNone);
353 > loop:
354 >        for (ncolors = ourvisual->map_entries;
355 >                        ncolors > ourvisual->map_entries/3;
356 >                        ncolors = ncolors*.937) {
357 >                pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
358                  if (pixval == NULL)
359 <                        break;
359 >                        return(ncolors = 0);
360                  if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
361                                  pixval,ncolors) != 0)
362 <                        return(ncolors);
362 >                        break;
363                  free((char *)pixval);
364 +                pixval = NULL;
365          }
366 <        return(ncolors = 0);
366 >        if (pixval == NULL) {
367 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
368 >                        goto newmap;            /* try it with our map */
369 >                else
370 >                        return(ncolors = 0);    /* failed */
371 >        }
372 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
373 >                for (i = 0; i < ncolors; i++) { /* reset black and white */
374 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
375 >                                continue;
376 >                        thiscolor.pixel = pixval[i];
377 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
378 >                        XQueryColor(ourdisplay,
379 >                                        DefaultColormap(ourdisplay,ourscreen),
380 >                                        &thiscolor);
381 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
382 >                        for (j = i; j+1 < ncolors; j++)
383 >                                pixval[j] = pixval[j+1];
384 >                        ncolors--;
385 >                        i--;
386 >                }
387 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
388 > donecolors:
389 > #ifdef  DEBUG
390 >        thiscolor.flags = DoRed|DoGreen|DoBlue;
391 >        thiscolor.red = thiscolor.green = thiscolor.blue = 0;
392 >        for (i = 0; i < ncolors; i++) {
393 >                thiscolor.pixel = pixval[i];
394 >                XStoreColor(ourdisplay, ourmap, &thiscolor);
395 >        }
396 > #endif
397 >        return(ncolors);
398   }
399  
400  
# Line 321 | Line 405 | freepixels()                           /* free our pixels */
405                  return;
406          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
407          ncolors = 0;
408 +        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
409 +                XFreeColormap(ourdisplay, ourmap);
410 +        ourmap = 0;
411   }
412  
413  
414 + static unsigned long
415 + true_pixel(col)                 /* return true pixel value for color */
416 + COLOR  col;
417 + {
418 +        unsigned long  rval;
419 +        BYTE  rgb[3];
420 +
421 +        map_color(rgb, col);
422 +        rval = ourvisual->red_mask*rgb[RED]/255 & ourvisual->red_mask;
423 +        rval |= ourvisual->green_mask*rgb[GRN]/255 & ourvisual->green_mask;
424 +        rval |= ourvisual->blue_mask*rgb[BLU]/255 & ourvisual->blue_mask;
425 +        return(rval);
426 + }
427 +
428 +
429   static int
430   x11_getc()                      /* get a command character */
431   {
# Line 348 | Line 450 | getevent()                     /* get next event */
450                  freepixels();
451                  break;
452          case MapNotify:
453 <                if (getpixels() == 0)
454 <                        stderr_v("Cannot allocate colors\n");
455 <                else
456 <                        new_ctab(ncolors);
453 >                if (ourvisual->class == PseudoColor)
454 >                        if (getpixels() == 0)
455 >                                stderr_v("Cannot allocate colors\n");
456 >                        else
457 >                                new_ctab(ncolors);
458                  break;
459          case Expose:
460                  fixwindow(levptr(XExposeEvent));
# Line 369 | Line 472 | static
472   getkey(ekey)                            /* get input key */
473   register XKeyPressedEvent  *ekey;
474   {
475 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
475 >        register int  n;
476 >
477 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
478                                  NULL, NULL);
479 <        x11_driver.inpready = c_last-c_first;
479 >        c_last += n;
480 >        x11_driver.inpready += n;
481   }
482  
483  

Diff Legend

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