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 2.2 by greg, Fri May 29 10:57:15 1992 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 35 | Line 36 | static char SCCSid[] = "$SunId$ LBL";
36   #define COMCW           8               /* approx. character width (pixels) */
37   #define COMCH           14              /* approx. character height (pixels) */
38  
38 #ifndef WFLUSH
39 #define WFLUSH          30              /* flush after this many rays */
40 #endif
41
39   #define  ourscreen      DefaultScreen(ourdisplay)
40   #define  ourroot        RootWindow(ourdisplay,ourscreen)
41   #define  ourwhite       WhitePixel(ourdisplay,ourscreen)
42   #define  ourblack       BlackPixel(ourdisplay,ourscreen)
43  
47 #define  checkinp()     while (XPending(ourdisplay) > 0) getevent()
48
44   #define  levptr(etype)  ((etype *)&currentevent)
45  
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 XVisualInfo  ourvinfo;           /* our visual information */
54 +
55   static Window  gwind = 0;               /* our graphics window */
56  
57   static Cursor  pickcursor = 0;          /* cursor used for picking */
# Line 69 | 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(),
74 <                x11_getcur(), x11_comout(), x11_comin();
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 = {
77          x11_close, x11_clear, x11_paintr, x11_getcur,
78 <        x11_comout, x11_comin, 1.0
78 >        x11_comout, x11_comin, x11_flush, 1.0
79   };
80  
81  
# Line 86 | Line 83 | struct driver *
83   x11_init(name, id)              /* initialize driver */
84   char  *name, *id;
85   {
86 +        int  nplanes;
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) {
97 <                stderr_v("not enough colors\n");
98 <                return(NULL);
99 <        }
100 <        ourmap = DefaultColormap(ourdisplay,ourscreen);
101 <        make_gmap(GAMMA);                       /* make color map */
102 <        /* create a cursor */
103 <        pickcursor = XCreateFontCursor (ourdisplay, XC_diamond_cross);
96 >                                        /* find a usable visual */
97 >        nplanes = DisplayPlanes(ourdisplay, ourscreen);
98 >        if (    !XMatchVisualInfo(ourdisplay,ourscreen,
99 >                        24,TrueColor,&ourvinfo) &&
100 >                !XMatchVisualInfo(ourdisplay,ourscreen,
101 >                        24,DirectColor,&ourvinfo)       )
102 >                if (nplanes < 4) {
103 >                        stderr_v("not enough colors\n");
104 >                        return(NULL);
105 >                } else if (!XMatchVisualInfo(ourdisplay,ourscreen,
106 >                                        nplanes,PseudoColor,&ourvinfo) &&
107 >                                !XMatchVisualInfo(ourdisplay,ourscreen,
108 >                                        nplanes,GrayScale,&ourvinfo)) {
109 >                        stderr_v("unsupported visual type\n");
110 >                        return(NULL);
111 >                }
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 >                                        /* this is a waste! */
117 >        ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
118 >                                ourvinfo.visual, AllocNone);
119 >        gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
120                  DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
121                  DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
122 <                BORWIDTH, ourblack, ourwhite);
122 >                BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
123 >                CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
124          if (gwind == 0) {
125                  stderr_v("cannot create window\n");
126                  return(NULL);
127          }
128          XStoreName(ourdisplay, gwind, id);
129 +        /* create a cursor */
130 +        pickcursor = XCreateFontCursor(ourdisplay, XC_diamond_cross);
131          ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
132 <        ourxwmhints.flags = InputHint;
132 >        ourxwmhints.flags = InputHint|IconPixmapHint;
133          ourxwmhints.input = True;
134 +        ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
135 +                        gwind, x11icon_bits, x11icon_width, x11icon_height);
136          XSetWMHints(ourdisplay, gwind, &ourxwmhints);
137 +        oursizhints.min_width = MINWIDTH;
138 +        oursizhints.min_height = MINHEIGHT+COMHEIGHT;
139 +        oursizhints.flags = PMinSize;
140 +        XSetNormalHints(ourdisplay, gwind, &oursizhints);
141          XSelectInput(ourdisplay, gwind, ExposureMask);
142          XMapWindow(ourdisplay, gwind);
143 <        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XExposeEvent));
143 >        XWindowEvent(ourdisplay, gwind, ExposureMask, levptr(XEvent));
144          gwidth = levptr(XExposeEvent)->width;
145          gheight = levptr(XExposeEvent)->height - COMHEIGHT;
146          x11_driver.xsiz = gwidth < MINWIDTH ? MINWIDTH : gwidth;
# Line 143 | Line 165 | x11_close()                    /* close our display */
165                  xt_close(comline);
166                  comline = NULL;
167          }
146        if (gwind != 0) {
147                XFreeGC(ourdisplay, ourgc);
148                XDestroyWindow(ourdisplay, gwind);
149                gwind = 0;
150                ourgc = 0;
151        }
152        XFreeCursor(ourdisplay, pickcursor);
168          freepixels();
169 +        XFreeGC(ourdisplay, ourgc);
170 +        XDestroyWindow(ourdisplay, gwind);
171 +        gwind = 0;
172 +        ourgc = 0;
173 +        XFreeCursor(ourdisplay, pickcursor);
174          XCloseDisplay(ourdisplay);
175          ourdisplay = NULL;
176   }
# Line 160 | Line 180 | static
180   x11_clear(xres, yres)                   /* clear our display */
181   int  xres, yres;
182   {
183 <        if (xres != gwidth || yres != gheight) {        /* change window */
184 <                if (comline != NULL)
185 <                        xt_close(comline);
183 >                                                /* check limits */
184 >        if (xres < MINWIDTH)
185 >                xres = MINWIDTH;
186 >        if (yres < MINHEIGHT)
187 >                yres = MINHEIGHT;
188 >                                                /* resize window */
189 >        if (xres != gwidth || yres != gheight) {
190                  XSelectInput(ourdisplay, gwind, 0);
191                  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);
192                  gwidth = xres;
193                  gheight = yres;
194 <                XSync(ourdisplay, 1);           /* discard input */
194 >                XFlush(ourdisplay);
195                  sleep(2);                       /* wait for window manager */
196 +                XSync(ourdisplay, 1);           /* discard input */
197          }
198          XClearWindow(ourdisplay, gwind);
199                                                  /* reinitialize color table */
200 <        if (getpixels() == 0)
201 <                stderr_v("cannot allocate colors\n");
202 <        else
203 <                new_ctab(ncolors);
204 <
200 >        if (ourvinfo.class == PseudoColor || ourvinfo.class == GrayScale)
201 >                if (getpixels() == 0)
202 >                        stderr_v("cannot allocate colors\n");
203 >                else
204 >                        new_ctab(ncolors);
205 >                                                /* get new command line */
206 >        if (comline != NULL)
207 >                xt_close(comline);
208 >        comline = xt_open(ourdisplay,
209 >                        DefaultGC(ourdisplay,ourscreen),
210 >                        gwind, 0, gheight, gwidth, COMHEIGHT, 0, COMFN);
211 >        if (comline == NULL) {
212 >                stderr_v("Cannot open command line window\n");
213 >                quit(1);
214 >        }
215 >        XSelectInput(ourdisplay, comline->w, ExposureMask);
216 >                                                /* remove earmuffs */
217          XSelectInput(ourdisplay, gwind,
218                  StructureNotifyMask|ExposureMask|KeyPressMask|ButtonPressMask);
219   }
# Line 195 | Line 224 | x11_paintr(col, xmin, ymin, xmax, ymax)                /* fill a rec
224   COLOR  col;
225   int  xmin, ymin, xmax, ymax;
226   {
198        extern long  nrays;             /* global ray count */
227          extern int  xnewcolr();         /* pixel assignment routine */
228 <        static long  lastflush = 0;     /* ray count at last flush */
228 >        extern unsigned long  true_pixel();
229 >        unsigned long  pixel;
230  
231 <        if (ncolors > 0) {
232 <                XSetForeground(ourdisplay, ourgc,
233 <                                pixval[get_pixel(col, xnewcolr)]);
234 <                XFillRectangle(ourdisplay, gwind,
235 <                        ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
236 <        }
237 <        if (nrays - lastflush >= WFLUSH) {
238 <                if (ncolors <= 0)       /* output necessary for death */
239 <                        XFillRectangle(ourdisplay, gwind,
211 <                                        ourgc, 0, 0, 1 ,1);
212 <                checkinp();
213 <                lastflush = nrays;
214 <        }
231 >        if (ncolors > 0)
232 >                pixel = pixval[get_pixel(col, xnewcolr)];
233 >        else if (ourvinfo.class == TrueColor || ourvinfo.class == DirectColor)
234 >                pixel = true_pixel(col);
235 >        else
236 >                return;
237 >        XSetForeground(ourdisplay, ourgc, pixel);
238 >        XFillRectangle(ourdisplay, gwind,
239 >                ourgc, xmin, gheight-ymax, xmax-xmin, ymax-ymin);
240   }
241  
242  
243   static
244 + x11_flush()                     /* flush output */
245 + {
246 +        XNoOp(ourdisplay);
247 +        while (XPending(ourdisplay) > 0)
248 +                getevent();
249 + }
250 +
251 +
252 + static
253   x11_comin(inp, prompt)          /* read in a command line */
254   char  *inp, *prompt;
255   {
256 <        int  x11_getc(), x11_comout();
256 >        extern int  x11_getc();
257  
258          if (prompt != NULL)
259                  if (fromcombuf(inp, &x11_driver))
# Line 236 | Line 270 | static
270   x11_comout(out)                 /* output a string to command line */
271   char  *out;
272   {
273 <        if (comline != NULL)
274 <                xt_puts(out, comline);
275 <        XFlush(ourdisplay);
273 >        if (comline == NULL)
274 >                return;
275 >        xt_puts(out, comline);
276 >        if (out[strlen(out)-1] == '\n')
277 >                XFlush(ourdisplay);
278   }
279  
280  
# Line 246 | Line 282 | static
282   x11_errout(msg)                 /* output an error message */
283   char  *msg;
284   {
249        x11_comout(msg);
285          stderr_v(msg);          /* send to stderr also! */
286 +        x11_comout(msg);
287   }
288  
289  
# Line 302 | Line 338 | int  r, g, b;
338   static int
339   getpixels()                             /* get the color map */
340   {
341 <        Visual  *ourvis = DefaultVisual(ourdisplay,ourscreen);
341 >        XColor  thiscolor;
342 >        register int  i, j;
343  
344          if (ncolors > 0)
345                  return(ncolors);
346 <        for (ncolors=(ourvis->map_entries)-3; ncolors>12; ncolors=ncolors*.937){
347 <                pixval = (int *)malloc(ncolors*sizeof(int));
346 >        if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
347 >                ourmap = DefaultColormap(ourdisplay,ourscreen);
348 >                goto loop;
349 >        }
350 > newmap:
351 >        ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
352 > loop:
353 >        for (ncolors = ourvinfo.colormap_size;
354 >                        ncolors > ourvinfo.colormap_size/3;
355 >                        ncolors = ncolors*.937) {
356 >                pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
357                  if (pixval == NULL)
358 <                        break;
358 >                        return(ncolors = 0);
359                  if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,
360                                  pixval,ncolors) != 0)
361 <                        return(ncolors);
361 >                        break;
362                  free((char *)pixval);
363 +                pixval = NULL;
364          }
365 <        return(ncolors = 0);
365 >        if (pixval == NULL) {
366 >                if (ourmap == DefaultColormap(ourdisplay,ourscreen))
367 >                        goto newmap;            /* try it with our map */
368 >                else
369 >                        return(ncolors = 0);    /* failed */
370 >        }
371 >        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
372 >                for (i = 0; i < ncolors; i++) { /* reset black and white */
373 >                        if (pixval[i] != ourblack && pixval[i] != ourwhite)
374 >                                continue;
375 >                        thiscolor.pixel = pixval[i];
376 >                        thiscolor.flags = DoRed|DoGreen|DoBlue;
377 >                        XQueryColor(ourdisplay,
378 >                                        DefaultColormap(ourdisplay,ourscreen),
379 >                                        &thiscolor);
380 >                        XStoreColor(ourdisplay, ourmap, &thiscolor);
381 >                        for (j = i; j+1 < ncolors; j++)
382 >                                pixval[j] = pixval[j+1];
383 >                        ncolors--;
384 >                        i--;
385 >                }
386 >        XSetWindowColormap(ourdisplay, gwind, ourmap);
387 >        return(ncolors);
388   }
389  
390  
# Line 326 | Line 395 | freepixels()                           /* free our pixels */
395                  return;
396          XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
397          ncolors = 0;
398 +        if (ourmap != DefaultColormap(ourdisplay,ourscreen))
399 +                XFreeColormap(ourdisplay, ourmap);
400 +        ourmap = 0;
401   }
402  
403  
404 + static unsigned long
405 + true_pixel(col)                 /* return true pixel value for color */
406 + COLOR  col;
407 + {
408 +        unsigned long  rval;
409 +        BYTE  rgb[3];
410 +
411 +        map_color(rgb, col);
412 +        rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
413 +        rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
414 +        rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
415 +        return(rval);
416 + }
417 +
418 +
419   static int
420   x11_getc()                      /* get a command character */
421   {
# Line 353 | Line 440 | getevent()                     /* get next event */
440                  freepixels();
441                  break;
442          case MapNotify:
443 <                if (getpixels() == 0)
444 <                        stderr_v("Cannot allocate colors\n");
445 <                else
446 <                        new_ctab(ncolors);
443 >                if (ourvinfo.class == PseudoColor ||
444 >                                ourvinfo.class == GrayScale)
445 >                        if (getpixels() == 0)
446 >                                stderr_v("Cannot allocate colors\n");
447 >                        else
448 >                                new_ctab(ncolors);
449                  break;
450          case Expose:
451                  fixwindow(levptr(XExposeEvent));
# Line 374 | Line 463 | static
463   getkey(ekey)                            /* get input key */
464   register XKeyPressedEvent  *ekey;
465   {
466 <        c_last += XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
466 >        register int  n;
467 >
468 >        n = XLookupString(ekey, c_queue+c_last, sizeof(c_queue)-c_last,
469                                  NULL, NULL);
470 <        x11_driver.inpready = c_last-c_first;
470 >        c_last += n;
471 >        x11_driver.inpready += n;
472   }
473  
474  

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines