--- ray/src/hd/rhd_x11.c 1997/12/05 09:38:55 3.10 +++ ray/src/hd/rhd_x11.c 1998/12/18 11:56:10 3.31 @@ -1,4 +1,4 @@ -/* Copyright (c) 1997 Silicon Graphics, Inc. */ +/* Copyright (c) 1998 Silicon Graphics, Inc. */ #ifndef lint static char SCCSid[] = "$SunId$ SGI"; @@ -10,20 +10,28 @@ static char SCCSid[] = "$SunId$ SGI"; */ #include "standard.h" -#include "rhd_qtree.h" - #include #include #include - +#include "rhd_qtree.h" #include "x11icon.h" -#define CTRL(c) ((c)-'@') +#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 GAMMA 2.2 /* default gamma correction */ -#define MOVPCT 10 /* percent distance to move */ +#define FRAMESTATE(s) (((s)&(ShiftMask|ControlMask))==(ShiftMask|ControlMask)) + +#define MOVPCT 7 /* percent distance to move /frame */ #define MOVDIR(b) ((b)==Button1 ? 1 : (b)==Button2 ? 0 : -1) +#define MOVDEG (-5) /* degrees to orbit CW/down /frame */ +#define MOVORB(s) ((s)&ShiftMask ? 1 : (s)&ControlMask ? -1 : 0) #define MINWIDTH 480 /* minimum graphics window width */ #define MINHEIGHT 400 /* minimum graphics window height */ @@ -41,6 +49,8 @@ static char SCCSid[] = "$SunId$ SGI"; struct driver odev; /* global device driver structure */ +char odev_args[64]; /* command arguments */ + static XEvent currentevent; /* current event */ static int ncolors = 0; /* color table size */ @@ -60,7 +70,7 @@ static int inpresflags; /* input result flags */ static int headlocked = 0; /* lock vertical motion */ -static int getpixels(), xnewcolr(), freepixels(), resizewindow(), +static int getpixels(), xnewcolr(), freepixels(), resizewindow(), getframe(), getevent(), getkey(), moveview(), getmove(), fixwindow(); static unsigned long true_pixel(); @@ -77,9 +87,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"); } @@ -88,8 +98,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; @@ -122,10 +134,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; @@ -154,25 +173,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); } @@ -194,15 +210,90 @@ 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 != &odev.v) + if (nv->type == VT_PAR || /* check view legality */ + nv->horiz > 160. || nv->vert > 160.) { + error(COMMAND, "illegal view type/angle"); + nv->type = VT_PER; + nv->horiz = odev.v.horiz; + nv->vert = odev.v.vert; + return(0); + } + if (nv->vfore > FTINY) { + error(COMMAND, "cannot handle fore clipping"); + nv->vfore = 0.; + return(0); + } + if (nv != &odev.v) { + if (!FEQ(nv->horiz,odev.v.horiz) || /* resize window? */ + !FEQ(nv->vert,odev.v.vert)) { + int dw = DisplayWidth(ourdisplay,ourscreen); + int dh = DisplayHeight(ourdisplay,ourscreen); + + dw -= 25; /* for window frame */ + dh -= 50; + odev.hres = 2.*VIEWDIST/pwidth * + tan(PI/180./2.*nv->horiz); + odev.vres = 2.*VIEWDIST/pheight * + tan(PI/180./2.*nv->vert); + if (odev.hres > dw) { + odev.vres = dw * odev.vres / odev.hres; + odev.hres = dw; + } + if (odev.vres > dh) { + odev.hres = dh * odev.hres / odev.vres; + odev.vres = dh; + } + XResizeWindow(ourdisplay, gwind, odev.hres, odev.vres); + dev_input(); /* wait for resize event */ + } copystruct(&odev.v, nv); + } qtReplant(); + return(1); } +dev_section(ofn) /* add octree for geometry rendering */ +char *ofn; +{ + /* unimplemented */ +} + + +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 */ { @@ -211,8 +302,10 @@ dev_input() /* get X11 input */ do getevent(); - while (XQLength(ourdisplay) > 0); + while (XPending(ourdisplay) > 0); + odev.inpready = 0; + return(inpresflags); } @@ -239,7 +332,8 @@ int dev_flush() /* flush output */ { qtUpdate(); - return(XPending(ourdisplay)); + rayqleft = RAYQLEN; + return(odev.inpready = XPending(ourdisplay)); } @@ -368,7 +462,10 @@ getevent() /* get next event */ getkey(levptr(XKeyPressedEvent)); break; case ButtonPress: - getmove(levptr(XButtonPressedEvent)); + if (FRAMESTATE(levptr(XButtonPressedEvent)->state)) + getframe(levptr(XButtonPressedEvent)); + else + getmove(levptr(XButtonPressedEvent)); break; } } @@ -379,11 +476,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; @@ -414,8 +529,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 @@ -427,52 +540,82 @@ draw_grids() /* draw holodeck section grids */ static -moveview(dx, dy, move) /* move our view */ -int dx, dy, move; +moveview(dx, dy, mov, orb) /* move our view */ +int dx, dy, mov, orb; { VIEW nv; + FVECT odir, v1; double d; - register int i, li; + register int li; /* start with old view */ copystruct(&nv, &odev.v); /* change view direction */ - if (move) { + if (mov | orb) { if ((li = qtFindLeaf(dx, dy)) < 0) return(0); /* not on window */ - for (i = 0; i < 3; i++) - nv.vdir[i] = qtL.wp[li][i] - nv.vp[i]; + 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 */ } - /* move viewpoint */ - if (move > 0) - for (i = 0; i < 3; i++) - nv.vp[i] += MOVPCT/100. * nv.vdir[i]; - else if (move < 0) - for (i = 0; i < 3; i++) - nv.vp[i] -= MOVPCT/100. * nv.vdir[i]; - if (move && headlocked) { - d = 0; /* bring head back to same height */ - for (i = 0; i < 3; i++) - d += odev.v.vup[i] * (odev.v.vp[i] - nv.vp[i]); - for (i = 0; i < 3; i++) - nv.vp[i] += d * odev.v.vup[i]; + if (orb && mov) { /* orbit left/right */ + 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, odir, nv.vup); + if (normalize(v1) == 0.) + return(0); + 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, odir, d); } + if (!mov ^ !orb && headlocked) { /* restore head height */ + VSUM(v1, odev.v.vp, nv.vp, -1.); + d = DOT(v1, odev.v.vup); + VSUM(nv.vp, nv.vp, odev.v.vup, d); + } if (setview(&nv) != NULL) return(0); /* illegal view */ dev_view(&nv); - inpresflags |= DEV_NEWVIEW; + inpresflags |= DFL(DC_SETVIEW); return(1); } static +getframe(ebut) /* get focus frame */ +XButtonPressedEvent *ebut; +{ + int startx = ebut->x, starty = ebut->y; + int endx, endy; + + XMaskEvent(ourdisplay, ButtonReleaseMask, levptr(XEvent)); + endx = levptr(XButtonReleasedEvent)->x; + endy = levptr(XButtonReleasedEvent)->y; + if (endx == startx | endy == starty) { + XBell(ourdisplay, 0); + return; + } + if (endx < startx) {register int c = endx; endx = startx; startx = c;} + if (endy < starty) {register int c = endy; endy = starty; starty = c;} + sprintf(odev_args, "%.3f %.3f %.3f %.3f", + (startx+.5)/odev.hres, 1.-(endy+.5)/odev.vres, + (endx+.5)/odev.hres, 1.-(starty+.5)/odev.vres); + inpresflags |= DFL(DC_FOCUS); +} + + +static getmove(ebut) /* get view change */ XButtonPressedEvent *ebut; { - int whichbutton = ebut->button; + int movdir = MOVDIR(ebut->button); + int movorb = MOVORB(ebut->state); int oldnodesiz = qtMinNodesiz; Window rootw, childw; int rootx, rooty, wx, wy; @@ -488,7 +631,7 @@ XButtonPressedEvent *ebut; &rootx, &rooty, &wx, &wy, &statemask)) break; /* on another screen */ - if (!moveview(wx, odev.vres-1-wy, MOVDIR(whichbutton))) { + if (!moveview(wx, odev.vres-1-wy, movdir, movorb)) { sleep(1); continue; } @@ -496,11 +639,11 @@ XButtonPressedEvent *ebut; qtUpdate(); draw_grids(); } - if (!(inpresflags & DEV_NEWVIEW)) { /* do final motion */ - whichbutton = levptr(XButtonReleasedEvent)->button; + if (!(inpresflags & DFL(DC_SETVIEW))) { /* do final motion */ + movdir = MOVDIR(levptr(XButtonReleasedEvent)->button); wx = levptr(XButtonReleasedEvent)->x; wy = levptr(XButtonReleasedEvent)->y; - moveview(wx, odev.vres-1-wy, MOVDIR(whichbutton)); + moveview(wx, odev.vres-1-wy, movdir, movorb); } dev_flush(); @@ -512,6 +655,9 @@ static getkey(ekey) /* get input key */ register XKeyPressedEvent *ekey; { + Window rootw, childw; + int rootx, rooty, wx, wy; + unsigned int statemask; int n; char buf[8]; @@ -525,19 +671,30 @@ register XKeyPressedEvent *ekey; case 'H': /* turn off height motion lock */ headlocked = 0; return; - case CTRL('S'): + case 'l': /* retrieve last view */ + inpresflags |= DFL(DC_LASTVIEW); + return; + case 'f': /* frame view position */ + if (!XQueryPointer(ourdisplay, gwind, &rootw, &childw, + &rootx, &rooty, &wx, &wy, &statemask)) + return; /* on another screen */ + sprintf(odev_args, "%.4f %.4f", (wx+.5)/odev.hres, + 1.-(wy+.5)/odev.vres); + inpresflags |= DFL(DC_FOCUS); + return; + case 'F': /* unfocus */ + odev_args[0] = '\0'; + inpresflags |= DFL(DC_FOCUS); + return; case 'p': /* pause computation */ - inpresflags |= DEV_WAIT; + inpresflags |= DFL(DC_PAUSE); return; case 'v': /* spit out view */ - fputs(VIEWSTR, stderr); - fprintview(&odev.v, stderr); - fputc('\n', stderr); + 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) @@ -545,7 +702,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(); @@ -553,12 +710,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); @@ -574,7 +739,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); @@ -588,15 +752,11 @@ register XConfigureEvent *ersz; if (ersz->width == odev.hres && ersz->height == odev.vres) return; - if (odev.hres != 0 && odev.vres != 0) { - odev.v.horiz = 2.*180./PI * atan( - tan(PI/180./2.*odev.v.horiz) * ersz->width/odev.hres ); - odev.v.vert = 2.*180./PI * atan( - tan(PI/180./2.*odev.v.vert) * ersz->height/odev.vres ); - inpresflags |= DEV_NEWVIEW; - } odev.hres = ersz->width; odev.vres = ersz->height; - inpresflags |= DEV_NEWSIZE; + 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 |= DFL(DC_SETVIEW); }