--- ray/src/hd/rhd_x11.c	1997/12/24 14:04:22	3.18
+++ ray/src/hd/rhd_x11.c	1998/11/13 14:25:52	3.29
@@ -1,4 +1,4 @@
-/* Copyright (c) 1997 Silicon Graphics, Inc. */
+/* Copyright (c) 1998 Silicon Graphics, Inc. */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ SGI";
@@ -10,14 +10,16 @@ static char SCCSid[] = "$SunId$ SGI";
  */
 
 #include "standard.h"
-#include "rhd_qtree.h"
-
 #include  <X11/Xlib.h>
 #include  <X11/cursorfont.h>
 #include  <X11/Xutil.h>
-
+#include "rhd_qtree.h"
 #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
@@ -81,9 +83,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");
 }
 
@@ -92,8 +94,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;
@@ -126,10 +130,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;
@@ -170,8 +181,8 @@ char  *id;
 	dev_input();			/* sets size and view angles */
 					/* allocate our leaf pile */
 	if (!qtAllocLeaves(DisplayWidth(ourdisplay,ourscreen) *
-			DisplayHeight(ourdisplay,ourscreen) /
-			(qtMinNodesiz*qtMinNodesiz)))
+			DisplayHeight(ourdisplay,ourscreen) * 3 /
+			(qtMinNodesiz*qtMinNodesiz*2)))
 		error(SYSTEM, "insufficient memory for leaf storage");
 	odev.name = id;
 	odev.ifd = ConnectionNumber(ourdisplay);
@@ -195,6 +206,16 @@ 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;
@@ -242,6 +263,26 @@ VIEW	*nv;
 }
 
 
+dev_auxcom(cmd, args)		/* process an auxiliary command */
+char	*cmd, *args;
+{
+	sprintf(errmsg, "%s: unknown command", cmd);
+	error(COMMAND, errmsg);
+}
+
+
+VIEW *
+dev_auxview(n, hvres)		/* return nth auxiliary view */
+int	n;
+int	hvres[2];
+{
+	if (n)
+		return(NULL);
+	hvres[0] = odev.hres; hvres[1] = odev.vres;
+	return(&odev.v);
+}
+
+
 int
 dev_input()			/* get X11 input */
 {
@@ -250,8 +291,10 @@ dev_input()			/* get X11 input */
 	do
 		getevent();
 
-	while (XQLength(ourdisplay) > 0);
+	while (XPending(ourdisplay) > 0);
 
+	odev.inpready = 0;
+
 	return(inpresflags);
 }
 
@@ -278,7 +321,8 @@ int
 dev_flush()			/* flush output */
 {
 	qtUpdate();
-	return(XPending(ourdisplay));
+	rayqleft = RAYQLEN;
+	return(odev.inpready = XPending(ourdisplay));
 }
 
 
@@ -418,11 +462,29 @@ ilclip(dp, wp)			/* clip world coordinates to device *
 int	dp[2][2];
 FVECT	wp[2];
 {
-	static FVECT	vmin = {0.,0.,0.}, vmax = {1.,1.,FHUGE};
-	FVECT	ip[2];
-				/* not exactly right, but who cares? */
-	viewloc(ip[0], &odev.v, wp[0]);
-	viewloc(ip[1], &odev.v, wp[1]);
+	static FVECT	vmin = {0.,0.,0.}, vmax = {1.-FTINY,1.-FTINY,FHUGE};
+	FVECT	wpc[2], ip[2];
+	double	d, d0, d1;
+				/* check for points behind view */
+	d = DOT(odev.v.vp, odev.v.vdir);
+	d0 = DOT(wp[0], odev.v.vdir) - d;
+	d1 = DOT(wp[1], odev.v.vdir) - d;
+				/* work on copy of world points */
+	if (d0 <= d1) {
+		VCOPY(wpc[0], wp[0]); VCOPY(wpc[1], wp[1]);
+	} else {
+		d = d0; d0 = d1; d1 = d;
+		VCOPY(wpc[1], wp[0]); VCOPY(wpc[0], wp[1]);
+	}
+	if (d0 <= FTINY) {
+		if (d1 <= FTINY) return(0);
+		VSUB(wpc[0], wpc[0], wpc[1]);
+		d = .99*d1/(d1-d0);
+		VSUM(wpc[0], wpc[1], wpc[0], d);
+	}
+				/* get view coordinates and clip to window */
+	viewloc(ip[0], &odev.v, wpc[0]);
+	viewloc(ip[1], &odev.v, wpc[1]);
 	if (!clip(ip[0], ip[1], vmin, vmax))
 		return(0);
 	dp[0][0] = ip[0][0]*odev.hres;
@@ -453,8 +515,6 @@ draw_grids()			/* draw holodeck section grids */
 	static BYTE	gridrgb[3] = {0x0, 0xff, 0xff};
 	unsigned long  pixel;
 
-	if (!mapped || odev.v.type != VT_PER)
-		return;
 	if (ncolors > 0)
 		pixel = pixval[get_pixel(gridrgb, xnewcolr)];
 	else
@@ -599,6 +659,7 @@ register XKeyPressedEvent  *ekey;
 		if (ncolors > 0)
 			new_ctab(ncolors);
 		inpresflags |= DFL(DC_REDRAW);	/* resend values from server */
+		rayqleft = 0;			/* hold off update */
 		return;
 	case 'K':			/* kill rtrace process(es) */
 		inpresflags |= DFL(DC_KILL);