ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/hd/rhd_x11.c
Revision: 3.14
Committed: Thu Dec 11 16:45:58 1997 UTC (26 years, 3 months ago) by gregl
Content type: text/plain
Branch: MAIN
Changes since 3.13: +10 -17 lines
Log Message:
normalized commands between driver and standard input

File Contents

# Content
1 /* Copyright (c) 1997 Silicon Graphics, Inc. */
2
3 #ifndef lint
4 static char SCCSid[] = "$SunId$ SGI";
5 #endif
6
7 /*
8 * X11 driver for holodeck display.
9 * Based on rview driver.
10 */
11
12 #include "standard.h"
13 #include "rhd_qtree.h"
14
15 #include <X11/Xlib.h>
16 #include <X11/cursorfont.h>
17 #include <X11/Xutil.h>
18
19 #include "x11icon.h"
20
21 #ifndef FEQ
22 #define FEQ(a,b) ((a)-(b) <= FTINY && (a)-(b) >= -FTINY)
23 #endif
24
25 #define GAMMA 2.2 /* default gamma correction */
26
27 #define MOVPCT 7 /* percent distance to move /frame */
28 #define MOVDIR(b) ((b)==Button1 ? 1 : (b)==Button2 ? 0 : -1)
29 #define MOVDEG (-5) /* degrees to orbit CW/down /frame */
30 #define MOVORB(s) ((s)&ShiftMask ? 1 : (s)&ControlMask ? -1 : 0)
31
32 #define MINWIDTH 480 /* minimum graphics window width */
33 #define MINHEIGHT 400 /* minimum graphics window height */
34
35 #define VIEWDIST 356 /* assumed viewing distance (mm) */
36
37 #define BORWIDTH 5 /* border width */
38
39 #define ourscreen DefaultScreen(ourdisplay)
40 #define ourroot RootWindow(ourdisplay,ourscreen)
41 #define ourmask (StructureNotifyMask|ExposureMask|KeyPressMask|\
42 ButtonPressMask|ButtonReleaseMask)
43
44 #define levptr(etype) ((etype *)&currentevent)
45
46 struct driver odev; /* global device driver structure */
47
48 static XEvent currentevent; /* current event */
49
50 static int ncolors = 0; /* color table size */
51 static int mapped = 0; /* window is mapped? */
52 static unsigned long *pixval = NULL; /* allocated pixels */
53 static unsigned long ourblack=0, ourwhite=1;
54
55 static Display *ourdisplay = NULL; /* our display */
56 static XVisualInfo ourvinfo; /* our visual information */
57 static Window gwind = 0; /* our graphics window */
58 static GC ourgc = 0; /* our graphics context for drawing */
59 static Colormap ourmap = 0; /* our color map */
60
61 static double pwidth, pheight; /* pixel dimensions (mm) */
62
63 static int inpresflags; /* input result flags */
64
65 static int headlocked = 0; /* lock vertical motion */
66
67 static int getpixels(), xnewcolr(), freepixels(), resizewindow(),
68 getevent(), getkey(), moveview(), getmove(), fixwindow();
69 static unsigned long true_pixel();
70
71
72 static int
73 mytmflags() /* figure out tone mapping flags */
74 {
75 extern char *progname;
76 register char *cp, *tail;
77 /* find basic name */
78 for (cp = tail = progname; *cp; cp++)
79 if (*cp == '/')
80 tail = cp+1;
81 for (cp = tail; *cp && *cp != '.'; cp++)
82 ;
83 if (cp-tail == 3 && !strncmp(tail, "x11", 3))
84 return(TM_F_CAMERA);
85 if (cp-tail == 4 && !strncmp(tail, "x11h", 4))
86 return(TM_F_HUMAN);
87 error(USER, "illegal driver name");
88 }
89
90
91 dev_open(id) /* initialize X11 driver */
92 char *id;
93 {
94 extern char *getenv();
95 char *gv;
96 double gamval = GAMMA;
97 int nplanes;
98 XSetWindowAttributes ourwinattr;
99 XWMHints ourxwmhints;
100 XSizeHints oursizhints;
101 /* set quadtree globals */
102 qtMinNodesiz = 2;
103 /* open display server */
104 ourdisplay = XOpenDisplay(NULL);
105 if (ourdisplay == NULL)
106 error(USER, "cannot open X-windows; DISPLAY variable set?\n");
107 /* find a usable visual */
108 nplanes = DisplayPlanes(ourdisplay, ourscreen);
109 if (XMatchVisualInfo(ourdisplay,ourscreen,
110 nplanes>12?nplanes:24,TrueColor,&ourvinfo) ||
111 XMatchVisualInfo(ourdisplay,ourscreen,
112 nplanes>12?nplanes:24,DirectColor,&ourvinfo)) {
113 ourblack = 0;
114 ourwhite = ourvinfo.red_mask |
115 ourvinfo.green_mask |
116 ourvinfo.blue_mask ;
117 } else {
118 if (nplanes < 4)
119 error(INTERNAL, "not enough colors\n");
120 if (!XMatchVisualInfo(ourdisplay,ourscreen,
121 nplanes,PseudoColor,&ourvinfo) &&
122 !XMatchVisualInfo(ourdisplay,ourscreen,
123 nplanes,GrayScale,&ourvinfo))
124 error(INTERNAL, "unsupported visual type\n");
125 ourblack = BlackPixel(ourdisplay,ourscreen);
126 ourwhite = WhitePixel(ourdisplay,ourscreen);
127 }
128 /* set gamma and tone mapping */
129 if ((gv = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
130 || (gv = getenv("DISPLAY_GAMMA")) != NULL)
131 gamval = atof(gv);
132 if (tmInit(mytmflags(), stdprims, gamval) == NULL)
133 error(SYSTEM, "not enough memory in dev_open");
134 /* open window */
135 ourwinattr.background_pixel = ourblack;
136 ourwinattr.border_pixel = ourblack;
137 ourwinattr.event_mask = ourmask;
138 /* this is stupid */
139 ourwinattr.colormap = XCreateColormap(ourdisplay, ourroot,
140 ourvinfo.visual, AllocNone);
141 gwind = XCreateWindow(ourdisplay, ourroot, 0, 0,
142 DisplayWidth(ourdisplay,ourscreen)-2*BORWIDTH,
143 DisplayHeight(ourdisplay,ourscreen)-2*BORWIDTH,
144 BORWIDTH, ourvinfo.depth, InputOutput, ourvinfo.visual,
145 CWBackPixel|CWBorderPixel|CWColormap|CWEventMask, &ourwinattr);
146 if (gwind == 0)
147 error(SYSTEM, "cannot create window\n");
148 XStoreName(ourdisplay, gwind, id);
149 /* get graphics context */
150 ourgc = XCreateGC(ourdisplay, gwind, 0, NULL);
151 /* set window manager hints */
152 ourxwmhints.flags = InputHint|IconPixmapHint;
153 ourxwmhints.input = True;
154 ourxwmhints.icon_pixmap = XCreateBitmapFromData(ourdisplay,
155 gwind, x11icon_bits, x11icon_width, x11icon_height);
156 XSetWMHints(ourdisplay, gwind, &ourxwmhints);
157 oursizhints.min_width = MINWIDTH;
158 oursizhints.min_height = MINHEIGHT;
159 oursizhints.flags = PMinSize;
160 XSetNormalHints(ourdisplay, gwind, &oursizhints);
161 /* map the window and get its size */
162 XMapWindow(ourdisplay, gwind);
163 dev_input();
164 /* allocate our leaf pile */
165 if (!qtAllocLeaves(DisplayWidth(ourdisplay,ourscreen) *
166 DisplayHeight(ourdisplay,ourscreen) /
167 (qtMinNodesiz*qtMinNodesiz)))
168 error(SYSTEM, "insufficient memory for leaf storage");
169
170 /* figure out sensible view */
171 pwidth = (double)DisplayWidthMM(ourdisplay, ourscreen) /
172 DisplayWidth(ourdisplay, ourscreen);
173 pheight = (double)DisplayHeightMM(ourdisplay, ourscreen) /
174 DisplayHeight(ourdisplay, ourscreen);
175 copystruct(&odev.v, &stdview);
176 odev.name = id;
177 odev.v.type = VT_PER;
178 odev.v.horiz = 2.*180./PI * atan(0.5/VIEWDIST*pwidth*odev.hres);
179 odev.v.vert = 2.*180./PI * atan(0.5/VIEWDIST*pheight*odev.vres);
180 odev.ifd = ConnectionNumber(ourdisplay);
181 }
182
183
184 dev_close() /* close our display */
185 {
186 freepixels();
187 XFreeGC(ourdisplay, ourgc);
188 XDestroyWindow(ourdisplay, gwind);
189 gwind = 0;
190 ourgc = 0;
191 XCloseDisplay(ourdisplay);
192 ourdisplay = NULL;
193 qtFreeLeaves();
194 tmDone(NULL);
195 odev.v.type = 0;
196 odev.hres = odev.vres = 0;
197 odev.ifd = -1;
198 }
199
200
201 int
202 dev_view(nv) /* assign new driver view */
203 VIEW *nv;
204 {
205 if (nv->type == VT_PAR || /* check view legality */
206 nv->horiz > 160. || nv->vert > 160.) {
207 error(COMMAND, "illegal view type/angle");
208 nv->type = VT_PER;
209 nv->horiz = odev.v.horiz;
210 nv->vert = odev.v.vert;
211 return(0);
212 }
213 if (nv->vfore > FTINY) {
214 error(COMMAND, "cannot handle fore clipping");
215 nv->vfore = 0.;
216 return(0);
217 }
218 if (nv != &odev.v) {
219 if (!FEQ(nv->horiz,odev.v.horiz) || /* resize window? */
220 !FEQ(nv->vert,odev.v.vert)) {
221 int dw = DisplayWidth(ourdisplay,ourscreen);
222 int dh = DisplayHeight(ourdisplay,ourscreen);
223
224 dw -= 25; /* for window frame */
225 dh -= 100;
226 odev.hres = 2.*VIEWDIST/pwidth *
227 tan(PI/180./2.*nv->horiz);
228 odev.vres = 2.*VIEWDIST/pheight *
229 tan(PI/180./2.*nv->vert);
230 if (odev.hres > dw) {
231 odev.vres = dw * odev.vres / odev.hres;
232 odev.hres = dw;
233 }
234 if (odev.vres > dh) {
235 odev.hres = dh * odev.hres / odev.vres;
236 odev.vres = dh;
237 }
238 XResizeWindow(ourdisplay, gwind, odev.hres, odev.vres);
239 }
240 copystruct(&odev.v, nv);
241 }
242 qtReplant();
243 return(1);
244 }
245
246
247 int
248 dev_input() /* get X11 input */
249 {
250 inpresflags = 0;
251
252 do
253 getevent();
254
255 while (XQLength(ourdisplay) > 0);
256
257 return(inpresflags);
258 }
259
260
261 dev_paintr(rgb, xmin, ymin, xmax, ymax) /* fill a rectangle */
262 BYTE rgb[3];
263 int xmin, ymin, xmax, ymax;
264 {
265 unsigned long pixel;
266
267 if (!mapped)
268 return;
269 if (ncolors > 0)
270 pixel = pixval[get_pixel(rgb, xnewcolr)];
271 else
272 pixel = true_pixel(rgb);
273 XSetForeground(ourdisplay, ourgc, pixel);
274 XFillRectangle(ourdisplay, gwind,
275 ourgc, xmin, odev.vres-ymax, xmax-xmin, ymax-ymin);
276 }
277
278
279 int
280 dev_flush() /* flush output */
281 {
282 qtUpdate();
283 return(XPending(ourdisplay));
284 }
285
286
287 static
288 xnewcolr(ndx, r, g, b) /* enter a color into hardware table */
289 int ndx;
290 int r, g, b;
291 {
292 XColor xcolor;
293
294 xcolor.pixel = pixval[ndx];
295 xcolor.red = r << 8;
296 xcolor.green = g << 8;
297 xcolor.blue = b << 8;
298 xcolor.flags = DoRed|DoGreen|DoBlue;
299
300 XStoreColor(ourdisplay, ourmap, &xcolor);
301 }
302
303
304 static int
305 getpixels() /* get the color map */
306 {
307 XColor thiscolor;
308 register int i, j;
309
310 if (ncolors > 0)
311 return(ncolors);
312 if (ourvinfo.visual == DefaultVisual(ourdisplay,ourscreen)) {
313 ourmap = DefaultColormap(ourdisplay,ourscreen);
314 goto loop;
315 }
316 newmap:
317 ourmap = XCreateColormap(ourdisplay,gwind,ourvinfo.visual,AllocNone);
318 loop:
319 for (ncolors = ourvinfo.colormap_size;
320 ncolors > ourvinfo.colormap_size/3;
321 ncolors = ncolors*.937) {
322 pixval = (unsigned long *)malloc(ncolors*sizeof(unsigned long));
323 if (pixval == NULL)
324 return(ncolors = 0);
325 if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors))
326 break;
327 free((char *)pixval);
328 pixval = NULL;
329 }
330 if (pixval == NULL) {
331 if (ourmap == DefaultColormap(ourdisplay,ourscreen))
332 goto newmap; /* try it with our map */
333 else
334 return(ncolors = 0); /* failed */
335 }
336 if (ourmap != DefaultColormap(ourdisplay,ourscreen))
337 for (i = 0; i < ncolors; i++) { /* reset black and white */
338 if (pixval[i] != ourblack && pixval[i] != ourwhite)
339 continue;
340 thiscolor.pixel = pixval[i];
341 thiscolor.flags = DoRed|DoGreen|DoBlue;
342 XQueryColor(ourdisplay,
343 DefaultColormap(ourdisplay,ourscreen),
344 &thiscolor);
345 XStoreColor(ourdisplay, ourmap, &thiscolor);
346 for (j = i; j+1 < ncolors; j++)
347 pixval[j] = pixval[j+1];
348 ncolors--;
349 i--;
350 }
351 XSetWindowColormap(ourdisplay, gwind, ourmap);
352 return(ncolors);
353 }
354
355
356 static
357 freepixels() /* free our pixels */
358 {
359 if (ncolors == 0)
360 return;
361 XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L);
362 free((char *)pixval);
363 pixval = NULL;
364 ncolors = 0;
365 if (ourmap != DefaultColormap(ourdisplay,ourscreen))
366 XFreeColormap(ourdisplay, ourmap);
367 ourmap = 0;
368 }
369
370
371 static unsigned long
372 true_pixel(rgb) /* return true pixel value for color */
373 register BYTE rgb[3];
374 {
375 register unsigned long rval;
376
377 rval = ourvinfo.red_mask*rgb[RED]/255 & ourvinfo.red_mask;
378 rval |= ourvinfo.green_mask*rgb[GRN]/255 & ourvinfo.green_mask;
379 rval |= ourvinfo.blue_mask*rgb[BLU]/255 & ourvinfo.blue_mask;
380 return(rval);
381 }
382
383
384 static
385 getevent() /* get next event */
386 {
387 XNextEvent(ourdisplay, levptr(XEvent));
388 switch (levptr(XEvent)->type) {
389 case ConfigureNotify:
390 resizewindow(levptr(XConfigureEvent));
391 break;
392 case UnmapNotify:
393 mapped = 0;
394 freepixels();
395 break;
396 case MapNotify:
397 if (ourvinfo.class == PseudoColor ||
398 ourvinfo.class == GrayScale) {
399 if (getpixels() == 0)
400 error(SYSTEM, "cannot allocate colors\n");
401 new_ctab(ncolors);
402 }
403 mapped = 1;
404 break;
405 case Expose:
406 fixwindow(levptr(XExposeEvent));
407 break;
408 case KeyPress:
409 getkey(levptr(XKeyPressedEvent));
410 break;
411 case ButtonPress:
412 getmove(levptr(XButtonPressedEvent));
413 break;
414 }
415 }
416
417
418 static
419 ilclip(dp, wp) /* clip world coordinates to device */
420 int dp[2][2];
421 FVECT wp[2];
422 {
423 static FVECT vmin = {0.,0.,0.}, vmax = {1.,1.,FHUGE};
424 FVECT ip[2];
425 /* not exactly right, but who cares? */
426 viewloc(ip[0], &odev.v, wp[0]);
427 viewloc(ip[1], &odev.v, wp[1]);
428 if (!clip(ip[0], ip[1], vmin, vmax))
429 return(0);
430 dp[0][0] = ip[0][0]*odev.hres;
431 dp[0][1] = ip[0][1]*odev.vres;
432 dp[1][0] = ip[1][0]*odev.hres;
433 dp[1][1] = ip[1][1]*odev.vres;
434 return(1);
435 }
436
437
438 static
439 draw3dline(wp) /* draw 3d line in world coordinates */
440 FVECT wp[2];
441 {
442 int dp[2][2];
443
444 if (!ilclip(dp, wp))
445 return;
446 XDrawLine(ourdisplay, gwind, ourgc,
447 dp[0][0], odev.vres-1 - dp[0][1],
448 dp[1][0], odev.vres-1 - dp[1][1]);
449 }
450
451
452 static
453 draw_grids() /* draw holodeck section grids */
454 {
455 static BYTE gridrgb[3] = {0x0, 0xff, 0xff};
456 unsigned long pixel;
457
458 if (!mapped || odev.v.type != VT_PER)
459 return;
460 if (ncolors > 0)
461 pixel = pixval[get_pixel(gridrgb, xnewcolr)];
462 else
463 pixel = true_pixel(gridrgb);
464 XSetForeground(ourdisplay, ourgc, pixel);
465 /* draw each grid line */
466 gridlines(draw3dline);
467 }
468
469
470 static
471 moveview(dx, dy, mov, orb) /* move our view */
472 int dx, dy, mov, orb;
473 {
474 VIEW nv;
475 FVECT v1;
476 double d;
477 register int li;
478 /* start with old view */
479 copystruct(&nv, &odev.v);
480 /* change view direction */
481 if (mov | orb) {
482 if ((li = qtFindLeaf(dx, dy)) < 0)
483 return(0); /* not on window */
484 VSUM(nv.vdir, qtL.wp[li], nv.vp, -1.);
485 } else {
486 if (viewray(nv.vp, nv.vdir, &odev.v,
487 (dx+.5)/odev.hres, (dy+.5)/odev.vres) < -FTINY)
488 return(0); /* outside view */
489 }
490 if (orb && mov) { /* orbit left/right */
491 spinvector(nv.vdir, nv.vdir, nv.vup, MOVDEG*PI/180.*mov);
492 VSUM(nv.vp, qtL.wp[li], nv.vdir, -1.);
493 } else if (orb) { /* orbit up/down */
494 fcross(v1, nv.vdir, nv.vup);
495 if (normalize(v1) == 0.)
496 return(0);
497 spinvector(nv.vdir, nv.vdir, v1, MOVDEG*PI/180.*orb);
498 VSUM(nv.vp, qtL.wp[li], nv.vdir, -1.);
499 } else if (mov) { /* move forward/backward */
500 d = MOVPCT/100. * mov;
501 VSUM(nv.vp, nv.vp, nv.vdir, d);
502 }
503 if (!mov ^ !orb && headlocked) { /* restore head height */
504 VSUM(v1, odev.v.vp, nv.vp, -1.);
505 d = DOT(v1, odev.v.vup);
506 VSUM(nv.vp, nv.vp, odev.v.vup, d);
507 }
508 if (setview(&nv) != NULL)
509 return(0); /* illegal view */
510 dev_view(&nv);
511 inpresflags |= DFL(DC_SETVIEW);
512 return(1);
513 }
514
515
516 static
517 getmove(ebut) /* get view change */
518 XButtonPressedEvent *ebut;
519 {
520 int movdir = MOVDIR(ebut->button);
521 int movorb = MOVORB(ebut->state);
522 int oldnodesiz = qtMinNodesiz;
523 Window rootw, childw;
524 int rootx, rooty, wx, wy;
525 unsigned int statemask;
526
527 qtMinNodesiz = 16; /* for quicker update */
528 XNoOp(ourdisplay);
529
530 while (!XCheckMaskEvent(ourdisplay,
531 ButtonReleaseMask, levptr(XEvent))) {
532
533 if (!XQueryPointer(ourdisplay, gwind, &rootw, &childw,
534 &rootx, &rooty, &wx, &wy, &statemask))
535 break; /* on another screen */
536
537 if (!moveview(wx, odev.vres-1-wy, movdir, movorb)) {
538 sleep(1);
539 continue;
540 }
541 XClearWindow(ourdisplay, gwind);
542 qtUpdate();
543 draw_grids();
544 }
545 if (!(inpresflags & DFL(DC_SETVIEW))) { /* do final motion */
546 movdir = MOVDIR(levptr(XButtonReleasedEvent)->button);
547 wx = levptr(XButtonReleasedEvent)->x;
548 wy = levptr(XButtonReleasedEvent)->y;
549 moveview(wx, odev.vres-1-wy, movdir, movorb);
550 }
551 dev_flush();
552
553 qtMinNodesiz = oldnodesiz; /* restore quadtree resolution */
554 }
555
556
557 static
558 getkey(ekey) /* get input key */
559 register XKeyPressedEvent *ekey;
560 {
561 int n;
562 char buf[8];
563
564 n = XLookupString(ekey, buf, sizeof(buf), NULL, NULL);
565 if (n != 1)
566 return;
567 switch (buf[0]) {
568 case 'h': /* turn on height motion lock */
569 headlocked = 1;
570 return;
571 case 'H': /* turn off height motion lock */
572 headlocked = 0;
573 return;
574 case 'l': /* retrieve last view */
575 inpresflags |= DFL(DC_LASTVIEW);
576 return;
577 case 'p': /* pause computation */
578 inpresflags |= DFL(DC_PAUSE);
579 return;
580 case 'v': /* spit out view */
581 inpresflags |= DFL(DC_GETVIEW);
582 return;
583 case '\n':
584 case '\r': /* resume computation */
585 inpresflags |= DFL(DC_RESUME);
586 return;
587 case CTRL('R'): /* redraw screen */
588 if (ncolors > 0)
589 new_ctab(ncolors);
590 qtRedraw(0, 0, odev.hres, odev.vres);
591 return;
592 case CTRL('L'): /* refresh from server */
593 if (inpresflags & DFL(DC_REDRAW))
594 return;
595 XClearWindow(ourdisplay, gwind);
596 draw_grids();
597 XFlush(ourdisplay);
598 qtCompost(100); /* unload the old tree */
599 if (ncolors > 0)
600 new_ctab(ncolors);
601 inpresflags |= DFL(DC_REDRAW); /* resend values from server */
602 return;
603 case 'q': /* quit the program */
604 inpresflags |= DFL(DC_QUIT);
605 return;
606 default:
607 XBell(ourdisplay, 0);
608 return;
609 }
610 }
611
612
613 static
614 fixwindow(eexp) /* repair damage to window */
615 register XExposeEvent *eexp;
616 {
617 if (odev.hres == 0 || odev.vres == 0) { /* first exposure */
618 odev.hres = eexp->width;
619 odev.vres = eexp->height;
620 }
621 qtRedraw(eexp->x, odev.vres - eexp->y - eexp->height,
622 eexp->x + eexp->width, odev.vres - eexp->y);
623 }
624
625
626 static
627 resizewindow(ersz) /* resize window */
628 register XConfigureEvent *ersz;
629 {
630 if (ersz->width == odev.hres && ersz->height == odev.vres)
631 return;
632
633 odev.hres = ersz->width;
634 odev.vres = ersz->height;
635
636 odev.v.horiz = 2.*180./PI * atan(0.5/VIEWDIST*pwidth*odev.hres);
637 odev.v.vert = 2.*180./PI * atan(0.5/VIEWDIST*pheight*odev.vres);
638
639 inpresflags |= DFL(DC_SETVIEW);
640 }