--- ray/src/hd/rhd_x11.c 1997/11/19 18:01:03 3.1 +++ ray/src/hd/rhd_x11.c 2003/07/21 22:30:18 3.34 @@ -1,25 +1,36 @@ -/* Copyright (c) 1997 Silicon Graphics, Inc. */ - #ifndef lint -static char SCCSid[] = "$SunId$ SGI"; +static const char RCSid[] = "$Id: rhd_x11.c,v 3.34 2003/07/21 22:30:18 schorsch Exp $"; #endif - /* * X11 driver for holodeck display. * Based on rview driver. */ #include "standard.h" -#include "rhd_qtree.h" - #include #include #include - +#include +#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 + #define GAMMA 2.2 /* default gamma correction */ +#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 */ @@ -30,12 +41,14 @@ static char SCCSid[] = "$SunId$ SGI"; #define ourscreen DefaultScreen(ourdisplay) #define ourroot RootWindow(ourdisplay,ourscreen) #define ourmask (StructureNotifyMask|ExposureMask|KeyPressMask|\ - ButtonPressMask) + ButtonPressMask|ButtonReleaseMask) #define levptr(etype) ((etype *)¤tevent) 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 */ @@ -44,23 +57,19 @@ static unsigned long *pixval = NULL; /* allocated pix static unsigned long ourblack=0, ourwhite=1; static Display *ourdisplay = NULL; /* our display */ - static XVisualInfo ourvinfo; /* our visual information */ - static Window gwind = 0; /* our graphics window */ - static GC ourgc = 0; /* our graphics context for drawing */ - static Colormap ourmap = 0; /* our color map */ static double pwidth, pheight; /* pixel dimensions (mm) */ static int inpresflags; /* input result flags */ -static int heightlocked = 0; /* lock vertical motion */ +static int headlocked = 0; /* lock vertical motion */ -static int getpixels(), xnewcolr(), freepixels(), resizewindow(), - getevent(), getkey(), fixwindow(); +static int getpixels(), xnewcolr(), freepixels(), resizewindow(), getframe(), + getevent(), getkey(), moveview(), getmove(), fixwindow(); static unsigned long true_pixel(); @@ -76,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"); } @@ -87,13 +96,16 @@ 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; - int n; XSetWindowAttributes ourwinattr; XWMHints ourxwmhints; XSizeHints oursizhints; + /* set quadtree globals */ + qtMinNodesiz = 2; /* open display server */ ourdisplay = XOpenDisplay(NULL); if (ourdisplay == NULL) @@ -120,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; @@ -152,26 +171,23 @@ 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(); /* 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 = stdview; 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); - odev.ifd = ConnectionNumber(ourdisplay); + /* map the window and get its size */ + XMapWindow(ourdisplay, gwind); + dev_input(); /* sets size and view angles */ /* allocate our leaf pile */ - qtDepthEps = 0.02; - n = odev.hres < odev.vres ? odev.hres : odev.vres; - qtMinNodesiz = 1; - if (!qtAllocLeaves(n*n/(qtMinNodesiz*qtMinNodesiz))) + 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); } @@ -192,24 +208,102 @@ 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) - copystruct(&odev.v, nv); + 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 */ + } + 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 */ { inpresflags = 0; + do getevent(); - while (XQLength(ourdisplay) > 0); + while (XPending(ourdisplay) > 0); + odev.inpready = 0; + return(inpresflags); } @@ -236,7 +330,8 @@ int dev_flush() /* flush output */ { qtUpdate(); - return(XPending(ourdisplay)); + rayqleft = RAYQLEN; + return(odev.inpready = XPending(ourdisplay)); } @@ -280,7 +375,7 @@ loop: return(ncolors = 0); if (XAllocColorCells(ourdisplay,ourmap,0,NULL,0,pixval,ncolors)) break; - free((char *)pixval); + free((void *)pixval); pixval = NULL; } if (pixval == NULL) { @@ -315,7 +410,7 @@ freepixels() /* free our pixels */ if (ncolors == 0) return; XFreeColors(ourdisplay,ourmap,pixval,ncolors,0L); - free((char *)pixval); + free((void *)pixval); pixval = NULL; ncolors = 0; if (ourmap != DefaultColormap(ourdisplay,ourscreen)) @@ -365,16 +460,212 @@ 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; } } static +ilclip(dp, wp) /* clip world coordinates to device */ +int dp[2][2]; +FVECT wp[2]; +{ + 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; + dp[0][1] = ip[0][1]*odev.vres; + dp[1][0] = ip[1][0]*odev.hres; + dp[1][1] = ip[1][1]*odev.vres; + return(1); +} + + +static +draw3dline(wp) /* draw 3d line in world coordinates */ +FVECT wp[2]; +{ + int dp[2][2]; + + if (!ilclip(dp, wp)) + return; + XDrawLine(ourdisplay, gwind, ourgc, + dp[0][0], odev.vres-1 - dp[0][1], + dp[1][0], odev.vres-1 - dp[1][1]); +} + + +static +draw_grids() /* draw holodeck section grids */ +{ + static BYTE gridrgb[3] = {0x0, 0xff, 0xff}; + unsigned long pixel; + + if (ncolors > 0) + pixel = pixval[get_pixel(gridrgb, xnewcolr)]; + else + pixel = true_pixel(gridrgb); + XSetForeground(ourdisplay, ourgc, pixel); + /* draw each grid line */ + gridlines(draw3dline); +} + + +static +moveview(dx, dy, mov, orb) /* move our view */ +int dx, dy, mov, orb; +{ + VIEW nv; + FVECT odir, v1; + double d; + register int li; + /* start with old view */ + nv = odev.v; + /* change view direction */ + if (mov | orb) { + if ((li = qtFindLeaf(dx, dy)) < 0) + return(0); /* not on window */ + 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(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 |= 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 +waitabit() /* pause a moment */ +{ + struct timespec ts; + ts.tv_sec = 0; + ts.tv_nsec = 50000000; + nanosleep(&ts, NULL); +} + + +static +getmove(ebut) /* get view change */ +XButtonPressedEvent *ebut; +{ + int movdir = MOVDIR(ebut->button); + int movorb = MOVORB(ebut->state); + int oldnodesiz = qtMinNodesiz; + Window rootw, childw; + int rootx, rooty, wx, wy; + unsigned int statemask; + + qtMinNodesiz = 16; /* for quicker update */ + XNoOp(ourdisplay); + + while (!XCheckMaskEvent(ourdisplay, + ButtonReleaseMask, levptr(XEvent))) { + waitabit(); + if (!XQueryPointer(ourdisplay, gwind, &rootw, &childw, + &rootx, &rooty, &wx, &wy, &statemask)) + break; /* on another screen */ + + if (!moveview(wx, odev.vres-1-wy, movdir, movorb)) { + sleep(1); + continue; + } + XClearWindow(ourdisplay, gwind); + qtUpdate(); + draw_grids(); + } + 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, movorb); + } + dev_flush(); + + qtMinNodesiz = oldnodesiz; /* restore quadtree resolution */ +} + + +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]; @@ -383,14 +674,64 @@ register XKeyPressedEvent *ekey; return; switch (buf[0]) { case 'h': /* turn on height motion lock */ - heightlocked = 1; + headlocked = 1; return; case 'H': /* turn off height motion lock */ - heightlocked = 0; + headlocked = 0; return; - case 'Q': + 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 |= DFL(DC_PAUSE); + return; + case 'v': /* spit out view */ + inpresflags |= DFL(DC_GETVIEW); + return; + case '\n': + case '\r': /* resume computation */ + inpresflags |= DFL(DC_RESUME); + return; + case CTRL('R'): /* redraw screen */ + if (ncolors > 0) + new_ctab(ncolors); + qtRedraw(0, 0, odev.hres, odev.vres); + return; + case CTRL('L'): /* refresh from server */ + if (inpresflags & DFL(DC_REDRAW)) + return; + XClearWindow(ourdisplay, gwind); + draw_grids(); + XFlush(ourdisplay); + qtCompost(100); /* unload the old tree */ + 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); + 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); @@ -404,10 +745,8 @@ fixwindow(eexp) /* repair damage to window */ register XExposeEvent *eexp; { if (odev.hres == 0 || odev.vres == 0) { /* first exposure */ -eputs("Resizing window in fixwindow\n"); 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); @@ -421,15 +760,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); }