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

Comparing ray/src/px/x11image.c (file contents):
Revision 1.8 by greg, Sat Oct 13 21:31:48 1990 UTC vs.
Revision 1.25 by greg, Mon Aug 26 10:15:01 1991 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1990 Regents of the University of California */
1 > /* Copyright (c) 1991 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# 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)
# Line 77 | 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 */
# Line 88 | 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 156 | Line 163 | char  *argv[];
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 183 | 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 (isexpos(s))
196                  exposure *= exposval(s);
197 <        else
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)
# Line 198 | 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;
# Line 234 | Line 246 | init()                 /* get data and open window */
246          XSetFont(thedisplay, ourgc, fontid);
247          revgc = XCreateGC(thedisplay, wind, 0, 0);
248          XSetFunction(thedisplay, revgc, GXinvert);
237 –        XStoreName(thedisplay, wind, fname == NULL ? progname : fname);
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);
255 >                                (unsigned *)&oursizhints.width,
256 >                                (unsigned *)&oursizhints.height);
257                  if ((i&(WidthValue|HeightValue)) == (WidthValue|HeightValue))
258                          oursizhints.flags |= USSize;
259                  else {
# Line 259 | Line 272 | init()                 /* get data and open window */
272                  }
273                  XSetNormalHints(thedisplay, wind, &oursizhints);
274          }
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);
# Line 336 | Line 354 | getras()                               /* get raster file */
354          }
355          return;
356   fail:
357 <        quit("could not create raster image");
357 >        quiterr("could not create raster image");
358   }
359  
360  
# Line 410 | 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 562 | Line 580 | int  x0, y0, x1, y1;
580   avgbox(clr)                             /* average color over current box */
581   COLOR  clr;
582   {
583 +        static COLOR  lc;
584 +        static int  ll, lr, lt, lb;
585          int  left, right, top, bottom;
586          int  y;
587          double  d;
# Line 585 | Line 605 | COLOR  clr;
605                  bottom = ymax;
606          if (top >= bottom)
607                  return(-1);
608 +        if (left == ll && right == lr && top == lt && bottom == lb) {
609 +                copycolor(clr, lc);
610 +                return;
611 +        }
612          for (y = top; y < bottom; y++) {
613                  if (getscan(y) == -1)
614                          return(-1);
# Line 595 | Line 619 | COLOR  clr;
619          }
620          d = 1.0/((right-left)*(bottom-top));
621          scalecolor(clr, d);
622 +        ll = left; lr = right; lt = top; lb = bottom;
623 +        copycolor(lc, clr);
624          return(0);
625   }
626  
# Line 603 | Line 629 | getmono()                      /* get monochrome data */
629   {
630          register unsigned char  *dp;
631          register int    x, err;
632 <        int     y;
607 <        rgbpixel        *inl;
632 >        int     y, errp;
633          short   *cerr;
634  
635 <        if ((inl = (rgbpixel *)malloc(xmax*sizeof(rgbpixel))) == NULL
636 <                        || (cerr = (short *)calloc(xmax,sizeof(short))) == NULL)
612 <                quit("out of memory in getmono");
635 >        if ((cerr = (short *)calloc(xmax,sizeof(short))) == NULL)
636 >                quiterr("out of memory in getmono");
637          dp = ourdata - 1;
638          for (y = 0; y < ymax; y++) {
639 <                picreadline3(y, inl);
639 >                if (getscan(y) < 0)
640 >                        quiterr("seek error in getmono");
641 >                normcolrs(scanline, xmax, scale);
642 >                add2icon(y, scanline);
643                  err = 0;
644                  for (x = 0; x < xmax; x++) {
645                          if (!(x&7))
646                                  *++dp = 0;
647 <                        err += rgb_bright(&inl[x]) + cerr[x];
647 >                        errp = err;
648 >                        err += normbright(scanline[x]) + cerr[x];
649                          if (err > 127)
650                                  err -= 255;
651                          else
652                                  *dp |= 1<<(7-(x&07));
653 <                        cerr[x] = err >>= 1;
653 >                        err /= 3;
654 >                        cerr[x] = err + errp;
655                  }
656          }
628 –        free((char *)inl);
657          free((char *)cerr);
658   }
659  
660  
661 + add2icon(y, scan)               /* add a scanline to our icon data */
662 + int  y;
663 + COLR  *scan;
664 + {
665 +        static short  cerr[ICONSIZ];
666 +        static int  ynext;
667 +        static char  *dp;
668 +        register int  err;
669 +        register int    x, ti;
670 +        int  errp;
671 +
672 +        if (iconheight == 0) {          /* initialize */
673 +                if (xmax <= ICONSIZ && ymax <= ICONSIZ) {
674 +                        iconwidth = xmax;
675 +                        iconheight = ymax;
676 +                } else if (xmax > ymax) {
677 +                        iconwidth = ICONSIZ;
678 +                        iconheight = ICONSIZ*ymax/xmax;
679 +                        if (iconheight < 1)
680 +                                iconheight = 1;
681 +                } else {
682 +                        iconwidth = ICONSIZ*xmax/ymax;
683 +                        if (iconwidth < 1)
684 +                                iconwidth = 1;
685 +                        iconheight = ICONSIZ;
686 +                }
687 +                ynext = 0;
688 +                dp = icondata - 1;
689 +        }
690 +        if (y < ynext*ymax/iconheight)  /* skip this one */
691 +                return;
692 +        err = 0;
693 +        for (x = 0; x < iconwidth; x++) {
694 +                if (!(x&7))
695 +                        *++dp = 0;
696 +                errp = err;
697 +                ti = x*xmax/iconwidth;
698 +                err += normbright(scan[ti]) + cerr[x];
699 +                if (err > 127)
700 +                        err -= 255;
701 +                else
702 +                        *dp |= 1<<(x&07);
703 +                err /= 3;
704 +                cerr[x] = err + errp;
705 +        }
706 +        ynext++;
707 + }
708 +
709 +
710   getfull()                       /* get full (24-bit) data */
711   {
712          int     y;
713 <
714 <        for (y = 0; y < ymax; y++)
715 <                picreadline3(y, (rgbpixel *)(ourdata+y*xmax*3));
713 >        register unsigned char  *dp;
714 >        register int    x;
715 >                                        /* set gamma correction */
716 >        setcolrgam(gamcor);
717 >                                        /* read and convert file */
718 >        dp = ourdata;
719 >        for (y = 0; y < ymax; y++) {
720 >                if (getscan(y) < 0)
721 >                        quiterr("seek error in getfull");
722 >                if (scale)
723 >                        shiftcolrs(scanline, xmax, scale);
724 >                colrs_gambs(scanline, xmax);
725 >                add2icon(y, scanline);
726 >                for (x = 0; x < xmax; x++) {
727 >                        *dp++ = scanline[x][RED];
728 >                        *dp++ = scanline[x][GRN];
729 >                        *dp++ = scanline[x][BLU];
730 >                }
731 >        }
732   }
733  
734  
# Line 674 | Line 767 | int  y;
767                  if (scanpos == NULL || scanpos[y] == -1)
768                          return(-1);
769                  if (fseek(fin, scanpos[y], 0) == -1)
770 <                        quit("fseek error");
770 >                        quiterr("fseek error");
771                  cury = y;
772          } else if (scanpos != NULL)
773                  scanpos[y] = ftell(fin);
# Line 697 | Line 790 | register rgbpixel  *l3;
790                  quiterr("cannot seek for picreadline");
791                                                          /* convert scanline */
792          normcolrs(scanline, xmax, scale);
793 +        add2icon(y, scanline);
794          for (i = 0; i < xmax; i++) {
795                  l3[i].r = scanline[i][RED];
796                  l3[i].g = scanline[i][GRN];
# Line 720 | Line 814 | colormap  map;
814          register int  i, val;
815  
816          for (i = 0; i < 256; i++) {
817 <                val = pow(i/256.0, 1.0/gamcor) * 256.0;
817 >                val = pow((i+0.5)/256.0, 1.0/gamcor) * 256.0;
818                  map[0][i] = map[1][i] = map[2][i] = val;
819          }
820   }

Diff Legend

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