ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/px/x11image.c
(Generate patch)

Comparing ray/src/px/x11image.c (file contents):
Revision 1.1 by greg, Thu Mar 1 13:18:22 1990 UTC vs.
Revision 1.24 by greg, Thu May 23 12:00:38 1991 UTC

# Line 37 | Line 37 | static char SCCSid[] = "$SunId$ LBL";
37  
38   #define  BORWIDTH       5               /* border width */
39  
40 + #define  ICONSIZ        (8*10)          /* maximum icon dimension (even 8) */
41 +
42   #define  ourscreen      DefaultScreen(thedisplay)
43   #define  ourblack       BlackPixel(thedisplay,ourscreen)
44   #define  ourwhite       WhitePixel(thedisplay,ourscreen)
45   #define  ourroot        RootWindow(thedisplay,ourscreen)
46   #define  ourgc          DefaultGC(thedisplay,ourscreen)
47  
48 + #define  revline(x0,y0,x1,y1)   XDrawLine(thedisplay,wind,revgc,x0,y0,x1,y1)
49 +
50 + #define  redraw(x,y,w,h) patch_raster(wind,(x)-xoff,(y)-yoff,x,y,w,h,ourras)
51 +
52   double  gamcor = 2.2;                   /* gamma correction */
53  
54   int  dither = 1;                        /* dither colors? */
# Line 51 | Line 57 | int  fast = 0;                         /* keep picture in Pixmap? */
57   Window  wind = 0;                       /* our output window */
58   Font  fontid;                           /* our font */
59  
60 < long  maxcolors = 0;                    /* maximum colors */
60 > int  maxcolors = 0;                     /* maximum colors */
61   int  greyscale = 0;                     /* in grey */
62  
63   int  scale = 0;                         /* scalefactor; power of two */
# Line 73 | Line 79 | int  cury = 0;                         /* current scan location */
79  
80   double  exposure = 1.0;                 /* exposure compensation used */
81  
82 + int  wrongformat = 0;                   /* input in another format? */
83 +
84 + GC      revgc;                          /* graphics context with GXinvert */
85 +
86   XRASTER *ourras;                        /* our stored image */
87   unsigned char   *ourdata;               /* our image data */
88  
# Line 82 | Line 92 | struct {
92  
93   char  *geometry = NULL;                 /* geometry specification */
94  
95 + char  icondata[ICONSIZ*ICONSIZ/8];      /* icon bitmap data */
96 + int  iconwidth = 0, iconheight = 0;
97 +
98   char  *progname;
99  
100   char  errmsg[128];
# Line 135 | Line 148 | char  *argv[];
148                          default:
149                                  goto userr;
150                          }
151 +                else if (argv[i][0] == '=')
152 +                        geometry = argv[i];
153                  else
154                          break;
155  
156 <        if (argc-i == 1) {
156 >        if (i == argc-1) {
157                  fname = argv[i];
158                  fin = fopen(fname, "r");
159                  if (fin == NULL) {
160                          sprintf(errmsg, "can't open file \"%s\"", fname);
161                          quiterr(errmsg);
162                  }
163 <        }
163 >        } else if (i != argc)
164 >                goto userr;
165                                  /* get header */
166 <        getheader(fin, headline);
166 >        getheader(fin, headline, NULL);
167                                  /* get picture dimensions */
168 <        if (fgetresolu(&xmax, &ymax, fin) != (YMAJOR|YDECR))
169 <                quiterr("bad picture size");
168 >        if (wrongformat || fgetresolu(&xmax, &ymax, fin) != (YMAJOR|YDECR))
169 >                quiterr("bad picture format");
170                                  /* set view parameters */
171          if (gotview && setview(&ourview) != NULL)
172                  gotview = 0;
# Line 174 | Line 190 | char  *s;
190   {
191          static char  *altname[] = {"rview","rpict","pinterp",VIEWSTR,NULL};
192          register char  **an;
193 +        char  fmt[32];
194  
195 <        if (!strncmp(s, "EXPOSURE=", 9))
196 <                exposure *= atof(s+9);
197 <        else
195 >        if (isexpos(s))
196 >                exposure *= exposval(s);
197 >        else if (isformat(s)) {
198 >                formatval(fmt, s);
199 >                wrongformat = strcmp(fmt, COLRFMT);
200 >        } else
201                  for (an = altname; *an != NULL; an++)
202                          if (!strncmp(*an, s, strlen(*an))) {
203 <                                if (sscanview(&ourview, s+strlen(*an)) == 0)
203 >                                if (sscanview(&ourview, s+strlen(*an)) > 0)
204                                          gotview++;
205                                  return;
206                          }
# Line 189 | Line 209 | char  *s;
209  
210   init()                  /* get data and open window */
211   {
212 +        XWMHints        ourxwmhints;
213 +        XSetWindowAttributes    ourwinattr;
214          XSizeHints  oursizhints;
215          register int  i;
216          
# Line 201 | Line 223 | init()                 /* get data and open window */
223          }
224          if ((thedisplay = XOpenDisplay(NULL)) == NULL)
225                  quiterr("can't open display; DISPLAY variable set?");
204 –        wind = XCreateSimpleWindow(thedisplay,
205 –                ourroot, 0, 0, xmax, ymax, BORWIDTH, ourblack, ourwhite);
206 –        if (wind == 0)
207 –                quiterr("can't create window");
226          if (maxcolors == 0) {           /* get number of available colors */
227 <                maxcolors = 1<<DisplayPlanes(thedisplay,ourscreen);
227 >                i = DisplayPlanes(thedisplay,ourscreen);
228 >                maxcolors = i > 8 ? 256 : 1<<i;
229                  if (maxcolors > 4) maxcolors -= 2;
230          }
231 +                                /* store image */
232 +        getras();
233 +                                /* open window */
234 +        ourwinattr.border_pixel = ourblack;
235 +        ourwinattr.background_pixel = ourwhite;
236 +        wind = XCreateWindow(thedisplay, ourroot, 0, 0, xmax, ymax, BORWIDTH,
237 +                        0, InputOutput, ourras->visual,
238 +                        CWBackPixel|CWBorderPixel, &ourwinattr);
239 +        if (wind == 0)
240 +                quiterr("can't create window");
241 +        width = xmax;
242 +        height = ymax;
243          fontid = XLoadFont(thedisplay, FONTNAME);
244          if (fontid == 0)
245                  quiterr("can't get font");
246          XSetFont(thedisplay, ourgc, fontid);
247 <        XStoreName(thedisplay, wind, fname == NULL ? progname : fname);
247 >        revgc = XCreateGC(thedisplay, wind, 0, 0);
248 >        XSetFunction(thedisplay, revgc, GXinvert);
249          XDefineCursor(thedisplay, wind, XCreateFontCursor(thedisplay,
250                          XC_diamond_cross));
251 +        XStoreName(thedisplay, wind, fname == NULL ? progname : fname);
252          if (geometry != NULL) {
253                  bzero((char *)&oursizhints, sizeof(oursizhints));
254                  i = XParseGeometry(geometry, &oursizhints.x, &oursizhints.y,
255 <                                &oursizhints.width, &oursizhints.height);
256 <                if (i & (XValue|YValue) == (XValue|YValue)) {
255 >                                (unsigned *)&oursizhints.width,
256 >                                (unsigned *)&oursizhints.height);
257 >                if ((i&(WidthValue|HeightValue)) == (WidthValue|HeightValue))
258 >                        oursizhints.flags |= USSize;
259 >                else {
260 >                        oursizhints.width = xmax;
261 >                        oursizhints.height = ymax;
262 >                        oursizhints.flags |= PSize;
263 >                }
264 >                if ((i&(XValue|YValue)) == (XValue|YValue)) {
265                          oursizhints.flags |= USPosition;
266                          if (i & XNegative)
267 <                                oursizhints.x += DisplayWidth(thedisplay,ourscreen)-1;
267 >                                oursizhints.x += DisplayWidth(thedisplay,
268 >                                ourscreen)-1-oursizhints.width-2*BORWIDTH;
269                          if (i & YNegative)
270 <                                oursizhints.y += DisplayHeight(thedisplay,ourscreen)-1;
270 >                                oursizhints.y += DisplayHeight(thedisplay,
271 >                                ourscreen)-1-oursizhints.height-2*BORWIDTH;
272                  }
230 –                if (i & (WidthValue|HeightValue) == (WidthValue|HeightValue))
231 –                        oursizhints.flags |= USSize;
273                  XSetNormalHints(thedisplay, wind, &oursizhints);
274          }
275 <                                /* store image */
276 <        getras();
277 <        XSelectInput(thedisplay, wind, ButtonPressMask|ButtonReleaseMask|
278 <                        StructureNotifyMask|ButtonMotionMask|
279 <                        KeyPressMask|ExposureMask);
275 >        ourxwmhints.flags = InputHint|IconPixmapHint;
276 >        ourxwmhints.input = True;
277 >        ourxwmhints.icon_pixmap = XCreateBitmapFromData(thedisplay,
278 >                        wind, icondata, iconwidth, iconheight);
279 >        XSetWMHints(thedisplay, wind, &ourxwmhints);
280 >        XSelectInput(thedisplay, wind, ButtonPressMask|ButtonReleaseMask
281 >                        |ButtonMotionMask|StructureNotifyMask
282 >                        |KeyPressMask|ExposureMask);
283          XMapWindow(thedisplay, wind);
284          return;
285   memerr:
# Line 271 | Line 315 | int  code;
315   getras()                                /* get raster file */
316   {
317          colormap        ourmap;
274 –        unsigned char   rmap[256], gmap[256], bmap[256];
318          XVisualInfo     vinfo;
276 –        register int  i;
319  
320          if (maxcolors <= 2) {           /* monochrome */
321                  ourdata = (unsigned char *)malloc(ymax*((xmax+7)/8));
# Line 284 | Line 326 | getras()                               /* get raster file */
326                  if (ourras == NULL)
327                          goto fail;
328                  getmono();
329 <        } else if (XMatchVisualInfo(thedisplay,ourscreen,24,TrueColor,&vinfo)) {
329 >        } else if (XMatchVisualInfo(thedisplay,ourscreen,24,TrueColor,&vinfo)
330 >                                                /* kludge for DirectColor */
331 >        || XMatchVisualInfo(thedisplay,ourscreen,24,DirectColor,&vinfo)) {
332                  ourdata = (unsigned char *)malloc(xmax*ymax*3);
333                  if (ourdata == NULL)
334                          goto fail;
# Line 305 | Line 349 | getras()                               /* get raster file */
349                          biq(dither,maxcolors,1,ourmap);
350                  else
351                          ciq(dither,maxcolors,1,ourmap);
352 <                for (i = 0; i < 256; i++) {
309 <                        rmap[i] = ourmap[0][i];
310 <                        gmap[i] = ourmap[1][i];
311 <                        bmap[i] = ourmap[2][i];
312 <                }
313 <                if (init_rcolors(ourras, rmap, gmap, bmap) == 0)
352 >                if (init_rcolors(ourras, ourmap[0], ourmap[1], ourmap[2]) == 0)
353                          goto fail;
354          }
355          return;
356   fail:
357 <        quit("could not create raster image");
357 >        quiterr("could not create raster image");
358   }
359  
360  
# Line 359 | Line 398 | getevent()                             /* process the next event */
398   }
399  
400  
362 – redraw(x, y, w, h)                      /* redraw section of window */
363 – int  x, y;
364 – int  w, h;
365 – {
366 –        patch_raster(wind,x-xoff,y-yoff,x,y,w,h,ourras);
367 – }
368 –
369 –
401   docom(ekey)                                     /* execute command */
402   XKeyPressedEvent  *ekey;
403   {
# Line 397 | Line 428 | XKeyPressedEvent  *ekey;
428                          sprintf(buf, "%.3f", intens(cval)/exposure);
429                          break;
430                  case 'l':                               /* luminance */
431 <                        sprintf(buf, "%.0fn", bright(cval)*683.0/exposure);
431 >                        sprintf(buf, "%.0fL", luminance(cval)/exposure);
432                          break;
433                  case 'c':                               /* color */
434                          comp = pow(2.0, (double)scale);
# Line 407 | Line 438 | XKeyPressedEvent  *ekey;
438                                          colval(cval,BLU)*comp);
439                          break;
440                  }
441 <                XDrawImageString(thedisplay, wind, ourgc, box.xmin, box.ymin,
442 <                                buf, strlen(buf));
441 >                XDrawImageString(thedisplay, wind, ourgc,
442 >                                box.xmin, box.ymin+box.ysiz, buf, strlen(buf));
443                  return(0);
444          case 'i':                               /* identify (contour) */
445                  if (ourras->pixels == NULL)
# Line 419 | Line 450 | XKeyPressedEvent  *ekey;
450                  cvx.red = random() & 65535;
451                  cvx.green = random() & 65535;
452                  cvx.blue = random() & 65535;
453 <                XStoreColors(thedisplay, ourras->cmap, &cvx, 1);
453 >                cvx.flags = DoRed|DoGreen|DoBlue;
454 >                XStoreColor(thedisplay, ourras->cmap, &cvx);
455                  return(0);
456          case 'p':                               /* position */
457                  sprintf(buf, "(%d,%d)", ekey->x-xoff, ymax-1-ekey->y+yoff);
# Line 431 | Line 463 | XKeyPressedEvent  *ekey;
463                          XBell(thedisplay, 0);
464                          return(-1);
465                  }
466 <                viewray(rorg, rdir, &ourview,
466 >                if (viewray(rorg, rdir, &ourview,
467                                  (ekey->x-xoff+.5)/xmax,
468 <                                (ymax-1-ekey->y+yoff+.5)/ymax);
468 >                                (ymax-1-ekey->y+yoff+.5)/ymax) < 0)
469 >                        return(-1);
470                  printf("%e %e %e ", rorg[0], rorg[1], rorg[2]);
471                  printf("%e %e %e\n", rdir[0], rdir[1], rdir[2]);
472                  fflush(stdout);
# Line 447 | Line 480 | XKeyPressedEvent  *ekey;
480                  scale_rcolors(ourras, pow(2.0, (double)n));
481                  scale += n;
482                  sprintf(buf, "%+d", scale);
483 <                XDrawImageString(thedisplay, wind, ourgc, box.xmin, box.ymin,
484 <                                buf, strlen(buf));
483 >                XDrawImageString(thedisplay, wind, ourgc,
484 >                                box.xmin, box.ymin+box.ysiz, buf, strlen(buf));
485                  XFlush(thedisplay);
486                  free(ourdata);
487                  free_raster(ourras);
# Line 467 | Line 500 | XKeyPressedEvent  *ekey;
500                  redraw(box.xmin, box.ymin, box.xsiz, box.ysiz);
501                  return(0);
502          default:
503 <                XBell(0);
503 >                XBell(thedisplay, 0);
504                  return(-1);
505          }
506   }
507  
508  
509 < moveimage(ep)                           /* shift the image */
510 < XButtonPressedEvent  *ep;
509 > moveimage(ebut)                         /* shift the image */
510 > XButtonPressedEvent  *ebut;
511   {
512 <        XButtonPressedEvent  eb;
512 >        union {
513 >                XEvent  u;
514 >                XButtonReleasedEvent  b;
515 >                XPointerMovedEvent  m;
516 >        }  e;
517 >        int     mxo, myo;
518  
519 <        XMaskEvent(thedisplay, ButtonReleaseMask, &eb);
520 <        xoff += eb.x - ep->x;
521 <        yoff += eb.y - ep->y;
519 >        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.u);
520 >        while (e.u.type == MotionNotify) {
521 >                mxo = e.m.x;
522 >                myo = e.m.y;
523 >                revline(ebut->x, ebut->y, mxo, myo);
524 >                revbox(xoff+mxo-ebut->x, yoff+myo-ebut->y,
525 >                                xoff+mxo-ebut->x+xmax, yoff+myo-ebut->y+ymax);
526 >                XMaskEvent(thedisplay,ButtonReleaseMask|ButtonMotionMask,&e.u);
527 >                revline(ebut->x, ebut->y, mxo, myo);
528 >                revbox(xoff+mxo-ebut->x, yoff+myo-ebut->y,
529 >                                xoff+mxo-ebut->x+xmax, yoff+myo-ebut->y+ymax);
530 >        }
531 >        xoff += e.b.x - ebut->x;
532 >        yoff += e.b.y - ebut->y;
533          XClearWindow(thedisplay, wind);
534          redraw(0, 0, width, height);
486 –        return(0);
535   }
536  
537  
# Line 491 | Line 539 | getbox(ebut)                           /* get new box */
539   XButtonPressedEvent  *ebut;
540   {
541          union {
542 <                XEvent  e;
542 >                XEvent  u;
543                  XButtonReleasedEvent  b;
544                  XPointerMovedEvent  m;
545          }  e;
546  
547 <        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.e);
548 <        while (e.e.type == ButtonMotionMask) {
547 >        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.u);
548 >        while (e.u.type == MotionNotify) {
549                  revbox(ebut->x, ebut->y, box.xmin = e.m.x, box.ymin = e.m.y);
550 <                XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask,
503 <                                &e.e);
550 >                XMaskEvent(thedisplay,ButtonReleaseMask|ButtonMotionMask,&e.u);
551                  revbox(ebut->x, ebut->y, box.xmin, box.ymin);
552          }
553          box.xmin = e.b.x<0 ? 0 : (e.b.x>=width ? width-1 : e.b.x);
# Line 523 | Line 570 | XButtonPressedEvent  *ebut;
570   revbox(x0, y0, x1, y1)                  /* draw box with reversed lines */
571   int  x0, y0, x1, y1;
572   {
573 <        static GC       mygc = 0;
573 >        revline(x0, y0, x1, y0);
574 >        revline(x0, y1, x1, y1);
575 >        revline(x0, y0, x0, y1);
576 >        revline(x1, y0, x1, y1);
577 > }
578  
528 –        if (mygc == 0) {
529 –                mygc = XCreateGC(thedisplay, wind, 0, 0);
530 –                XSetPlaneMask(thedisplay, mygc, ~0L);
531 –                XSetFunction(thedisplay, mygc, GXinvert);
532 –        }
533 –        XDrawLine(thedisplay, wind, mygc, x0, y0, x1, y0);
534 –        XDrawLine(thedisplay, wind, mygc, x0, y1, x1, y1);
535 –        XDrawLine(thedisplay, wind, mygc, x0, y0, x0, y1);
536 –        XDrawLine(thedisplay, wind, mygc, x1, y0, x1, y1);
537 – } /* end of revbox */
579  
539 –
580   avgbox(clr)                             /* average color over current box */
581   COLOR  clr;
582   {
# Line 581 | Line 621 | getmono()                      /* get monochrome data */
621   {
622          register unsigned char  *dp;
623          register int    x, err;
624 <        int     y;
585 <        rgbpixel        *inline;
624 >        int     y, errp;
625          short   *cerr;
626  
627 <        if ((inline = (rgbpixel *)malloc(xmax*sizeof(rgbpixel))) == NULL
628 <                        || (cerr = (short *)calloc(xmax,sizeof(short))) == NULL)
590 <                quit("out of memory in getmono");
627 >        if ((cerr = (short *)calloc(xmax,sizeof(short))) == NULL)
628 >                quiterr("out of memory in getmono");
629          dp = ourdata - 1;
630          for (y = 0; y < ymax; y++) {
631 <                picreadline3(y, inline);
631 >                if (getscan(y) < 0)
632 >                        quiterr("seek error in getmono");
633 >                normcolrs(scanline, xmax, scale);
634 >                add2icon(y, scanline);
635                  err = 0;
636                  for (x = 0; x < xmax; x++) {
637                          if (!(x&7))
638                                  *++dp = 0;
639 <                        err += rgb_bright(&inline[x]) + cerr[x];
639 >                        errp = err;
640 >                        err += normbright(scanline[x]) + cerr[x];
641                          if (err > 127)
642                                  err -= 255;
643                          else
644 <                                *dp |= 1<<(x&07);
645 <                        cerr[x] = err >>= 1;
644 >                                *dp |= 1<<(7-(x&07));
645 >                        err /= 3;
646 >                        cerr[x] = err + errp;
647                  }
648          }
606 –        free((char *)inline);
649          free((char *)cerr);
650   }
651  
652  
653 + add2icon(y, scan)               /* add a scanline to our icon data */
654 + int  y;
655 + COLR  *scan;
656 + {
657 +        static short  cerr[ICONSIZ];
658 +        static int  ynext;
659 +        static char  *dp;
660 +        register int  err;
661 +        register int    x, ti;
662 +        int  errp;
663 +
664 +        if (iconheight == 0) {          /* initialize */
665 +                if (xmax <= ICONSIZ && ymax <= ICONSIZ) {
666 +                        iconwidth = xmax;
667 +                        iconheight = ymax;
668 +                } else if (xmax > ymax) {
669 +                        iconwidth = ICONSIZ;
670 +                        iconheight = ICONSIZ*ymax/xmax;
671 +                        if (iconheight < 1)
672 +                                iconheight = 1;
673 +                } else {
674 +                        iconwidth = ICONSIZ*xmax/ymax;
675 +                        if (iconwidth < 1)
676 +                                iconwidth = 1;
677 +                        iconheight = ICONSIZ;
678 +                }
679 +                ynext = 0;
680 +                dp = icondata - 1;
681 +        }
682 +        if (y < ynext*ymax/iconheight)  /* skip this one */
683 +                return;
684 +        err = 0;
685 +        for (x = 0; x < iconwidth; x++) {
686 +                if (!(x&7))
687 +                        *++dp = 0;
688 +                errp = err;
689 +                ti = x*xmax/iconwidth;
690 +                err += normbright(scan[ti]) + cerr[x];
691 +                if (err > 127)
692 +                        err -= 255;
693 +                else
694 +                        *dp |= 1<<(x&07);
695 +                err /= 3;
696 +                cerr[x] = err + errp;
697 +        }
698 +        ynext++;
699 + }
700 +
701 +
702   getfull()                       /* get full (24-bit) data */
703   {
704          int     y;
705 <
706 <        for (y = 0; y < ymax; y++)
707 <                picreadline3(y, (rgbpixel *)(ourdata+y*xmax*3));
705 >        register unsigned char  *dp;
706 >        register int    x;
707 >                                        /* set gamma correction */
708 >        setcolrgam(gamcor);
709 >                                        /* read and convert file */
710 >        dp = ourdata;
711 >        for (y = 0; y < ymax; y++) {
712 >                if (getscan(y) < 0)
713 >                        quiterr("seek error in getfull");
714 >                if (scale)
715 >                        shiftcolrs(scanline, xmax, scale);
716 >                colrs_gambs(scanline, xmax);
717 >                add2icon(y, scanline);
718 >                for (x = 0; x < xmax; x++) {
719 >                        *dp++ = scanline[x][RED];
720 >                        *dp++ = scanline[x][GRN];
721 >                        *dp++ = scanline[x][BLU];
722 >                }
723 >        }
724   }
725  
726  
# Line 652 | Line 759 | int  y;
759                  if (scanpos == NULL || scanpos[y] == -1)
760                          return(-1);
761                  if (fseek(fin, scanpos[y], 0) == -1)
762 <                        quit("fseek error");
762 >                        quiterr("fseek error");
763                  cury = y;
764          } else if (scanpos != NULL)
765                  scanpos[y] = ftell(fin);
# Line 675 | Line 782 | register rgbpixel  *l3;
782                  quiterr("cannot seek for picreadline");
783                                                          /* convert scanline */
784          normcolrs(scanline, xmax, scale);
785 +        add2icon(y, scanline);
786          for (i = 0; i < xmax; i++) {
787                  l3[i].r = scanline[i][RED];
788                  l3[i].g = scanline[i][GRN];
# Line 698 | Line 806 | colormap  map;
806          register int  i, val;
807  
808          for (i = 0; i < 256; i++) {
809 <                val = pow(i/256.0, 1.0/gamcor) * 256.0;
809 >                val = pow((i+0.5)/256.0, 1.0/gamcor) * 256.0;
810                  map[0][i] = map[1][i] = map[2][i] = val;
811          }
812   }

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines