--- ray/src/hd/rhd_x11.c	1997/12/11 09:37:43	3.13
+++ ray/src/hd/rhd_x11.c	1998/01/06 13:07:57	3.24
@@ -18,12 +18,14 @@ static char SCCSid[] = "$SunId$ SGI";
 
 #include  "x11icon.h"
 
+#ifndef RAYQLEN
+#define RAYQLEN		50000		/* max. rays to queue before flush */
+#endif
+
 #ifndef FEQ
 #define FEQ(a,b)	((a)-(b) <= FTINY && (a)-(b) >= -FTINY)
 #endif
 
-#define	CTRL(c)		((c)-'@')
-
 #define GAMMA		2.2		/* default gamma correction */
 
 #define MOVPCT		7		/* percent distance to move /frame */
@@ -83,9 +85,9 @@ mytmflags()			/* figure out tone mapping flags */
 	for (cp = tail; *cp && *cp != '.'; cp++)
 		;
 	if (cp-tail == 3 && !strncmp(tail, "x11", 3))
-		return(TM_F_CAMERA);
+		return(TM_F_CAMERA|TM_F_NOSTDERR);
 	if (cp-tail == 4 && !strncmp(tail, "x11h", 4))
-		return(TM_F_HUMAN);
+		return(TM_F_HUMAN|TM_F_NOSTDERR);
 	error(USER, "illegal driver name");
 }
 
@@ -94,8 +96,10 @@ dev_open(id)			/* initialize X11 driver */
 char  *id;
 {
 	extern char  *getenv();
-	char  *gv;
+	static RGBPRIMS	myprims = STDPRIMS;
+	char  *ev;
 	double	gamval = GAMMA;
+	RGBPRIMP	dpri = stdprims;
 	int  nplanes;
 	XSetWindowAttributes	ourwinattr;
 	XWMHints  ourxwmhints;
@@ -128,10 +132,17 @@ char  *id;
 		ourwhite = WhitePixel(ourdisplay,ourscreen);
 	}
 					/* set gamma and tone mapping */
-	if ((gv = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
-			|| (gv = getenv("DISPLAY_GAMMA")) != NULL)
-		gamval = atof(gv);
-	if (tmInit(mytmflags(), stdprims, gamval) == NULL)
+	if ((ev = XGetDefault(ourdisplay, "radiance", "gamma")) != NULL
+			|| (ev = getenv("DISPLAY_GAMMA")) != NULL)
+		gamval = atof(ev);
+	if ((ev = getenv("DISPLAY_PRIMARIES")) != NULL &&
+			sscanf(ev, "%f %f %f %f %f %f %f %f",
+				&myprims[RED][CIEX],&myprims[RED][CIEY],
+				&myprims[GRN][CIEX],&myprims[GRN][CIEY],
+				&myprims[BLU][CIEX],&myprims[BLU][CIEY],
+				&myprims[WHT][CIEX],&myprims[WHT][CIEY]) >= 6)
+		dpri = myprims;
+	if (tmInit(mytmflags(), dpri, gamval) == NULL)
 		error(SYSTEM, "not enough memory in dev_open");
 					/* open window */
 	ourwinattr.background_pixel = ourblack;
@@ -160,25 +171,22 @@ char  *id;
 	oursizhints.min_height = MINHEIGHT;
 	oursizhints.flags = PMinSize;
 	XSetNormalHints(ourdisplay, gwind, &oursizhints);
-					/* map the window and get its size */
-	XMapWindow(ourdisplay, gwind);
-	dev_input();
-					/* allocate our leaf pile */
-	if (!qtAllocLeaves(DisplayWidth(ourdisplay,ourscreen) *
-			DisplayHeight(ourdisplay,ourscreen) /
-			(qtMinNodesiz*qtMinNodesiz)))
-		error(SYSTEM, "insufficient memory for leaf storage");
-
 					/* figure out sensible view */
 	pwidth = (double)DisplayWidthMM(ourdisplay, ourscreen) /
 			DisplayWidth(ourdisplay, ourscreen);
 	pheight = (double)DisplayHeightMM(ourdisplay, ourscreen) /
 			DisplayHeight(ourdisplay, ourscreen);
 	copystruct(&odev.v, &stdview);
-	odev.name = id;
 	odev.v.type = VT_PER;
-	odev.v.horiz = 2.*180./PI * atan(0.5/VIEWDIST*pwidth*odev.hres);
-	odev.v.vert = 2.*180./PI * atan(0.5/VIEWDIST*pheight*odev.vres);
+					/* map the window and get its size */
+	XMapWindow(ourdisplay, gwind);
+	dev_input();			/* sets size and view angles */
+					/* allocate our leaf pile */
+	if (!qtAllocLeaves(DisplayWidth(ourdisplay,ourscreen) *
+			DisplayHeight(ourdisplay,ourscreen) * 3 /
+			(qtMinNodesiz*qtMinNodesiz*2)))
+		error(SYSTEM, "insufficient memory for leaf storage");
+	odev.name = id;
 	odev.ifd = ConnectionNumber(ourdisplay);
 }
 
@@ -200,12 +208,22 @@ dev_close()			/* close our display */
 }
 
 
+
+dev_clear()			/* clear our quadtree */
+{
+	qtCompost(100);
+	if (ncolors > 0)
+		new_ctab(ncolors);
+	rayqleft = 0;			/* hold off update */
+}
+
+
 int
 dev_view(nv)			/* assign new driver view */
 VIEW	*nv;
 {
 	if (nv->type == VT_PAR ||		/* check view legality */
-		nv->horiz > 160. || nv->vert > 160.) {
+			nv->horiz > 160. || nv->vert > 160.) {
 		error(COMMAND, "illegal view type/angle");
 		nv->type = VT_PER;
 		nv->horiz = odev.v.horiz;
@@ -224,7 +242,7 @@ VIEW	*nv;
 			int	dh = DisplayHeight(ourdisplay,ourscreen);
 
 			dw -= 25;	/* for window frame */
-			dh -= 100;
+			dh -= 50;
 			odev.hres = 2.*VIEWDIST/pwidth *
 					tan(PI/180./2.*nv->horiz);
 			odev.vres = 2.*VIEWDIST/pheight *
@@ -238,6 +256,7 @@ VIEW	*nv;
 				odev.vres = dh;
 			}
 			XResizeWindow(ourdisplay, gwind, odev.hres, odev.vres);
+			dev_input();	/* wait for resize event */
 		}
 		copystruct(&odev.v, nv);
 	}
@@ -282,6 +301,7 @@ int
 dev_flush()			/* flush output */
 {
 	qtUpdate();
+	rayqleft = RAYQLEN;
 	return(XPending(ourdisplay));
 }
 
@@ -457,7 +477,7 @@ draw_grids()			/* draw holodeck section grids */
 	static BYTE	gridrgb[3] = {0x0, 0xff, 0xff};
 	unsigned long  pixel;
 
-	if (!mapped || odev.v.type != VT_PER)
+	if (!mapped)
 		return;
 	if (ncolors > 0)
 		pixel = pixval[get_pixel(gridrgb, xnewcolr)];
@@ -474,7 +494,7 @@ moveview(dx, dy, mov, orb)	/* move our view */
 int	dx, dy, mov, orb;
 {
 	VIEW	nv;
-	FVECT	v1;
+	FVECT	odir, v1;
 	double	d;
 	register int	li;
 				/* start with old view */
@@ -483,24 +503,26 @@ int	dx, dy, mov, orb;
 	if (mov | orb) {
 		if ((li = qtFindLeaf(dx, dy)) < 0)
 			return(0);	/* not on window */
-		VSUM(nv.vdir, qtL.wp[li], nv.vp, -1.);
+		VSUM(odir, qtL.wp[li], nv.vp, -1.);
 	} else {
 		if (viewray(nv.vp, nv.vdir, &odev.v,
 				(dx+.5)/odev.hres, (dy+.5)/odev.vres) < -FTINY)
 			return(0);	/* outside view */
 	}
 	if (orb && mov) {		/* orbit left/right */
-		spinvector(nv.vdir, nv.vdir, nv.vup, MOVDEG*PI/180.*mov);
-		VSUM(nv.vp, qtL.wp[li], nv.vdir, -1.);
+		spinvector(odir, odir, nv.vup, d=MOVDEG*PI/180.*mov);
+		VSUM(nv.vp, qtL.wp[li], odir, -1.);
+		spinvector(nv.vdir, nv.vdir, nv.vup, d);
 	} else if (orb) {		/* orbit up/down */
-		fcross(v1, nv.vdir, nv.vup);
+		fcross(v1, odir, nv.vup);
 		if (normalize(v1) == 0.)
 			return(0);
-		spinvector(nv.vdir, nv.vdir, v1, MOVDEG*PI/180.*orb);
-		VSUM(nv.vp, qtL.wp[li], nv.vdir, -1.);
+		spinvector(odir, odir, v1, d=MOVDEG*PI/180.*orb);
+		VSUM(nv.vp, qtL.wp[li], odir, -1.);
+		spinvector(nv.vdir, nv.vdir, v1, d);
 	} else if (mov) {		/* move forward/backward */
 		d = MOVPCT/100. * mov;
-		VSUM(nv.vp, nv.vp, nv.vdir, d);
+		VSUM(nv.vp, nv.vp, odir, d);
 	}
 	if (!mov ^ !orb && headlocked) {	/* restore head height */
 		VSUM(v1, odev.v.vp, nv.vp, -1.);
@@ -510,7 +532,7 @@ int	dx, dy, mov, orb;
 	if (setview(&nv) != NULL)
 		return(0);	/* illegal view */
 	dev_view(&nv);
-	inpresflags |= DEV_NEWVIEW;
+	inpresflags |= DFL(DC_SETVIEW);
 	return(1);
 }
 
@@ -544,7 +566,7 @@ XButtonPressedEvent	*ebut;
 		qtUpdate();
 		draw_grids();
 	}
-	if (!(inpresflags & DEV_NEWVIEW)) {	/* do final motion */
+	if (!(inpresflags & DFL(DC_SETVIEW))) {	/* do final motion */
 		movdir = MOVDIR(levptr(XButtonReleasedEvent)->button);
 		wx = levptr(XButtonReleasedEvent)->x;
 		wy = levptr(XButtonReleasedEvent)->y;
@@ -574,19 +596,17 @@ register XKeyPressedEvent  *ekey;
 		headlocked = 0;
 		return;
 	case 'l':			/* retrieve last view */
-		inpresflags |= DEV_LASTVIEW;
+		inpresflags |= DFL(DC_LASTVIEW);
 		return;
-	case CTRL('S'):
 	case 'p':			/* pause computation */
-		inpresflags |= DEV_WAIT;
+		inpresflags |= DFL(DC_PAUSE);
 		return;
 	case 'v':			/* spit out view */
-		inpresflags |= DEV_PUTVIEW;
+		inpresflags |= DFL(DC_GETVIEW);
 		return;
-	case CTRL('Q'):
 	case '\n':
 	case '\r':			/* resume computation */
-		inpresflags |= DEV_RESUME;
+		inpresflags |= DFL(DC_RESUME);
 		return;
 	case CTRL('R'):			/* redraw screen */
 		if (ncolors > 0)
@@ -594,7 +614,7 @@ register XKeyPressedEvent  *ekey;
 		qtRedraw(0, 0, odev.hres, odev.vres);
 		return;
 	case CTRL('L'):			/* refresh from server */
-		if (inpresflags & DEV_REDRAW)
+		if (inpresflags & DFL(DC_REDRAW))
 			return;
 		XClearWindow(ourdisplay, gwind);
 		draw_grids();
@@ -602,12 +622,20 @@ register XKeyPressedEvent  *ekey;
 		qtCompost(100);			/* unload the old tree */
 		if (ncolors > 0)
 			new_ctab(ncolors);
-		inpresflags |= DEV_REDRAW;	/* resend values from server */
+		inpresflags |= DFL(DC_REDRAW);	/* resend values from server */
+		rayqleft = 0;			/* hold off update */
 		return;
-	case CTRL('D'):
-	case 'Q':
+	case 'K':			/* kill rtrace process(es) */
+		inpresflags |= DFL(DC_KILL);
+		break;
+	case 'R':			/* restart rtrace */
+		inpresflags |= DFL(DC_RESTART);
+		break;
+	case 'C':			/* clobber holodeck */
+		inpresflags |= DFL(DC_CLOBBER);
+		break;
 	case 'q':			/* quit the program */
-		inpresflags |= DEV_SHUTDOWN;
+		inpresflags |= DFL(DC_QUIT);
 		return;
 	default:
 		XBell(ourdisplay, 0);
@@ -623,7 +651,6 @@ register XExposeEvent  *eexp;
 	if (odev.hres == 0 || odev.vres == 0) {	/* first exposure */
 		odev.hres = eexp->width;
 		odev.vres = eexp->height;
-		inpresflags |= DEV_NEWSIZE;
 	}
 	qtRedraw(eexp->x, odev.vres - eexp->y - eexp->height,
 			eexp->x + eexp->width, odev.vres - eexp->y);
@@ -643,5 +670,5 @@ register XConfigureEvent  *ersz;
 	odev.v.horiz = 2.*180./PI * atan(0.5/VIEWDIST*pwidth*odev.hres);
 	odev.v.vert = 2.*180./PI * atan(0.5/VIEWDIST*pheight*odev.vres);
 
-	inpresflags |= DEV_NEWSIZE|DEV_NEWVIEW;
+	inpresflags |= DFL(DC_SETVIEW);
 }