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 2.6 by greg, Wed May 27 14:28:50 1992 UTC vs.
Revision 2.19 by greg, Thu Feb 4 21:00:32 1993 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1991 Regents of the University of California */
1 > /* Copyright (c) 1992 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 27 | Line 27 | static char SCCSid[] = "$SunId$ LBL";
27  
28   #include  "color.h"
29   #include  "view.h"
30 #include  "pic.h"
30   #include  "x11raster.h"
31   #include  "random.h"
32   #include  "resolu.h"
# Line 41 | Line 40 | static char SCCSid[] = "$SunId$ LBL";
40   #define  ICONSIZ        (8*10)          /* maximum icon dimension (even 8) */
41  
42   #define  ourscreen      DefaultScreen(thedisplay)
44 #define  ourblack       BlackPixel(thedisplay,ourscreen)
45 #define  ourwhite       WhitePixel(thedisplay,ourscreen)
43   #define  ourroot        RootWindow(thedisplay,ourscreen)
44  
45   #define  revline(x0,y0,x1,y1)   XDrawLine(thedisplay,wind,revgc,x0,y0,x1,y1)
# Line 57 | Line 54 | int  fast = 0;                         /* keep picture in Pixmap? */
54   char    *dispname = NULL;               /* our display name */
55  
56   Window  wind = 0;                       /* our output window */
57 + unsigned long  ourblack=0, ourwhite=1;  /* black and white for this visual */
58   Font  fontid;                           /* our font */
59  
60   int  maxcolors = 0;                     /* maximum colors */
# Line 105 | Line 103 | char  *progname;
103  
104   char  errmsg[128];
105  
106 + extern BYTE  clrtab[256][3];            /* global color map */
107 +
108   extern long  ftell();
109  
110   extern char  *malloc(), *calloc();
111  
112 extern double  pow(), log();
113
112   Display  *thedisplay;
113  
114 +
115   main(argc, argv)
116   int  argc;
117   char  *argv[];
118   {
119 +        extern char  *getenv();
120 +        char  *gv;
121          int  headline();
122          int  i;
123          
124          progname = argv[0];
125 +        if ((gv = getenv("GAMMA")) != NULL)
126 +                gamcor = atof(gv);
127  
128          for (i = 1; i < argc; i++)
129                  if (argv[i][0] == '-')
# Line 135 | Line 138 | char  *argv[];
138                                  maxcolors = 2;
139                                  break;
140                          case 'd':
141 <                                if (argv[i][2] == 'i') {
141 >                                if (argv[i][2] == 'i')
142                                          dispname = argv[++i];
143 <                                        break;
144 <                                }
142 <                                dither = !dither;
143 >                                else
144 >                                        dither = !dither;
145                                  break;
146                          case 'f':
147                                  fast = !fast;
# Line 150 | Line 152 | char  *argv[];
152                                  scale = atoi(argv[++i]);
153                                  break;
154                          case 'g':
155 <                                if (!strcmp(argv[i], "-geometry"))
155 >                                if (argv[i][2] == 'e')
156                                          geometry = argv[++i];
157                                  else
158                                          gamcor = atof(argv[++i]);
# Line 191 | Line 193 | char  *argv[];
193                  getevent();             /* main loop */
194   userr:
195          fprintf(stderr,
196 <        "Usage: %s [-geometry spec][-b][-m][-d][-f][-c ncolors][-e +/-stops] file\n",
196 >        "Usage: %s [-display disp][-geometry spec][-b][-m][-d][-f][-c ncolors][-e +/-stops] file\n",
197                          progname);
198          quit(1);
199   }
# Line 242 | Line 244 | init()                 /* get data and open window */
244                          CWBackPixel|CWBorderPixel|CWColormap, &ourwinattr);
245          if (wind == 0)
246                  quiterr("cannot create window");
247 +        XFreeColormap(thedisplay, ourwinattr.colormap);
248          width = xmax;
249          height = ymax;
250          ourgc = XCreateGC(thedisplay, wind, 0, 0);
251 <        XSetState(thedisplay, ourgc, BlackPixel(thedisplay,ourscreen),
249 <                        WhitePixel(thedisplay,ourscreen), GXcopy, AllPlanes);
251 >        XSetState(thedisplay, ourgc, ourblack, ourwhite, GXcopy, AllPlanes);
252          revgc = XCreateGC(thedisplay, wind, 0, 0);
253          XSetFunction(thedisplay, revgc, GXinvert);
254          fontid = XLoadFont(thedisplay, FONTNAME);
# Line 305 | Line 307 | char  *err;
307   }
308  
309  
308 eputs(s)
309 char    *s;
310 {
311        fputs(s, stderr);
312 }
313
314
315 quit(code)
316 int  code;
317 {
318        exit(code);
319 }
320
321
310   static int
311   viscmp(v1,v2)           /* compare visual to see which is better, descending */
312   register XVisualInfo    *v1, *v2;
# Line 362 | Line 350 | register XVisualInfo   *v1, *v2;
350  
351   getbestvis()                    /* get the best visual for this screen */
352   {
353 + #ifdef DEBUG
354   static char  vistype[][12] = {
355                  "StaticGray",
356                  "GrayScale",
# Line 370 | Line 359 | static char  vistype[][12] = {
359                  "TrueColor",
360                  "DirectColor"
361   };
362 + #endif
363          static int      rankings[3][6] = {
364                  {TrueColor,DirectColor,PseudoColor,GrayScale,StaticGray,-1},
365 <                {PseudoColor,GrayScale,-1},
366 <                {PseudoColor,GrayScale,-1}
365 >                {PseudoColor,GrayScale,StaticGray,-1},
366 >                {PseudoColor,GrayScale,StaticGray,-1}
367          };
368          XVisualInfo     *xvi;
369          int     vismatched;
# Line 393 | Line 383 | static char  vistype[][12] = {
383          xvi = XGetVisualInfo(thedisplay,VisualScreenMask,&ourvis,&vismatched);
384          if (xvi == NULL)
385                  quiterr("no visuals for this screen!");
386 < for (i = 0; i < vismatched; i++)
387 < fprintf(stderr, "Type %s, depth %d\n", vistype[xvi[i].class], xvi[i].depth);
386 > #ifdef DEBUG
387 >        fprintf(stderr, "Supported visuals:\n");
388 >        for (i = 0; i < vismatched; i++)
389 >                fprintf(stderr, "\ttype %s, depth %d\n",
390 >                                vistype[xvi[i].class], xvi[i].depth);
391 > #endif
392          for (i = 0, j = 1; j < vismatched; j++)
393                  if (viscmp(&xvi[i],&xvi[j]) > 0)
394                          i = j;
# Line 407 | Line 401 | fprintf(stderr, "Type %s, depth %d\n", vistype[xvi[i].
401                  quiterr("inadequate visuals on this screen");
402                                          /* OK, we'll use it */
403          copystruct(&ourvis, &xvi[i]);
404 < fprintf(stderr, "Selected visual type %s, depth %d\n", vistype[ourvis.class],
405 < ourvis.depth);
404 > #ifdef DEBUG
405 >        fprintf(stderr, "Selected visual type %s, depth %d\n",
406 >                        vistype[ourvis.class], ourvis.depth);
407 > #endif
408 >                                        /* make appropriate adjustments */
409          if (ourvis.class == GrayScale || ourvis.class == StaticGray)
410                  greyscale = 1;
411 <        if (1<<ourvis.depth < maxcolors)
412 <                maxcolors = 1<<ourvis.depth;
413 <        if (maxcolors > 4)
414 <                maxcolors -= 2;
411 >        if (ourvis.depth <= 8 && ourvis.colormap_size < maxcolors)
412 >                maxcolors = ourvis.colormap_size;
413 >        if (ourvis.class == StaticGray) {
414 >                ourblack = 0;
415 >                ourwhite = 255;
416 >        } else if (ourvis.class == PseudoColor) {
417 >                ourblack = BlackPixel(thedisplay,ourscreen);
418 >                ourwhite = WhitePixel(thedisplay,ourscreen);
419 >                if ((ourblack|ourwhite) & ~255L) {
420 >                        ourblack = 0;
421 >                        ourwhite = 1;
422 >                }
423 >                if (maxcolors > 4)
424 >                        maxcolors -= 2;
425 >        } else {
426 >                ourblack = 0;
427 >                ourwhite = ourvis.red_mask|ourvis.green_mask|ourvis.blue_mask;
428 >        }
429          XFree((char *)xvi);
430   }
431  
432  
433   getras()                                /* get raster file */
434   {
424        colormap        ourmap;
435          XVisualInfo     vinfo;
436  
437          if (maxcolors <= 2) {           /* monochrome */
# Line 433 | Line 443 | getras()                               /* get raster file */
443                  if (ourras == NULL)
444                          goto fail;
445                  getmono();
446 <        } else if (ourvis.class == TrueColor || ourvis.class == DirectColor) {
446 >        } else if (ourvis.class == TrueColor | ourvis.class == DirectColor) {
447                  ourdata = (unsigned char *)malloc(4*xmax*ymax);
448                  if (ourdata == NULL)
449                          goto fail;
# Line 450 | Line 460 | getras()                               /* get raster file */
460                                  xmax, ymax, 8);
461                  if (ourras == NULL)
462                          goto fail;
463 <                if (greyscale)
464 <                        biq(dither,maxcolors,1,ourmap);
463 >                if (greyscale | ourvis.class == StaticGray)
464 >                        getgrey();
465                  else
466 <                        ciq(dither,maxcolors,1,ourmap);
467 <                if (init_rcolors(ourras, ourmap[0], ourmap[1], ourmap[2]) == 0)
466 >                        getmapped();
467 >                if (ourvis.class != StaticGray && !init_rcolors(ourras,clrtab))
468                          goto fail;
469          }
470          return;
# Line 488 | Line 498 | getevent()                             /* process the next event */
498                          make_rpixmap(ourras, wind);
499                  break;
500          case UnmapNotify:
501 <                unmap_rcolors(ourras);
501 >                if (!fast)
502 >                        unmap_rcolors(ourras);
503                  break;
504          case Expose:
505                  redraw(e.e.x, e.e.y, e.e.width, e.e.height);
# Line 600 | Line 611 | XKeyPressedEvent  *ekey;
611                  XClearWindow(thedisplay, wind);
612                  map_rcolors(ourras, wind);
613                  if (fast)
614 <                        make_rpixmap(ourras);
614 >                        make_rpixmap(ourras, wind);
615                  redraw(0, 0, width, height);
616                  return(0);
617 +        case '0':                               /* recenter origin */
618 +                if (xoff == 0 & yoff == 0)
619 +                        return(0);
620 +                xoff = yoff = 0;
621 +                XClearWindow(thedisplay, wind);
622 +                redraw(0, 0, width, height);
623 +                return(0);
624          case ' ':                               /* clear */
625                  redraw(box.xmin, box.ymin, box.xsiz, box.ysiz);
626                  return(0);
# Line 714 | Line 732 | COLOR  clr;
732                  return(-1);
733          if (left == ll && right == lr && top == lt && bottom == lb) {
734                  copycolor(clr, lc);
735 <                return;
735 >                return(0);
736          }
737          for (y = top; y < bottom; y++) {
738                  if (getscan(y) == -1)
# Line 743 | Line 761 | getmono()                      /* get monochrome data */
761                  quiterr("out of memory in getmono");
762          dp = ourdata - 1;
763          for (y = 0; y < ymax; y++) {
764 <                if (getscan(y) < 0)
747 <                        quiterr("seek error in getmono");
748 <                normcolrs(scanline, xmax, scale);
764 >                getscan(y);
765                  add2icon(y, scanline);
766 +                normcolrs(scanline, xmax, scale);
767                  err = 0;
768                  for (x = 0; x < xmax; x++) {
769                          if (!(x&7))
# Line 772 | Line 789 | COLR  *scan;
789          static short  cerr[ICONSIZ];
790          static int  ynext;
791          static char  *dp;
792 +        COLR  clr;
793          register int  err;
794          register int    x, ti;
795          int  errp;
# Line 802 | Line 820 | COLR  *scan;
820                          *++dp = 0;
821                  errp = err;
822                  ti = x*xmax/iconwidth;
823 <                err += normbright(scan[ti]) + cerr[x];
823 >                copycolr(clr, scan[ti]);
824 >                normcolrs(clr, 1, scale);
825 >                err += normbright(clr) + cerr[x];
826                  if (err > 127)
827                          err -= 255;
828                  else
# Line 824 | Line 844 | getfull()                      /* get full (24-bit) data */
844                                          /* read and convert file */
845          dp = (unsigned long *)ourdata;
846          for (y = 0; y < ymax; y++) {
847 <                if (getscan(y) < 0)
848 <                        quiterr("seek error in getfull");
847 >                getscan(y);
848 >                add2icon(y, scanline);
849                  if (scale)
850                          shiftcolrs(scanline, xmax, scale);
851                  colrs_gambs(scanline, xmax);
832                add2icon(y, scanline);
852                  if (ourras->image->blue_mask & 1)
853                          for (x = 0; x < xmax; x++)
854                                  *dp++ = scanline[x][RED] << 16 |
# Line 844 | Line 863 | getfull()                      /* get full (24-bit) data */
863   }
864  
865  
866 + getgrey()                       /* get greyscale data */
867 + {
868 +        int     y;
869 +        register unsigned char  *dp;
870 +        register int    x;
871 +                                        /* set gamma correction */
872 +        setcolrgam(gamcor);
873 +                                        /* read and convert file */
874 +        dp = ourdata;
875 +        for (y = 0; y < ymax; y++) {
876 +                getscan(y);
877 +                add2icon(y, scanline);
878 +                if (scale)
879 +                        shiftcolrs(scanline, xmax, scale);
880 +                for (x = 0; x < xmax; x++)
881 +                        scanline[x][GRN] = normbright(scanline[x]);
882 +                colrs_gambs(scanline, xmax);
883 +                if (maxcolors < 256)
884 +                        for (x = 0; x < xmax; x++)
885 +                                *dp++ = ((long)scanline[x][GRN] *
886 +                                        maxcolors + maxcolors/2) >> 8;
887 +                else
888 +                        for (x = 0; x < xmax; x++)
889 +                                *dp++ = scanline[x][GRN];
890 +        }
891 +        for (x = 0; x < maxcolors; x++)
892 +                clrtab[x][RED] = clrtab[x][GRN] =
893 +                        clrtab[x][BLU] = ((long)x*256 + 128)/maxcolors;
894 + }
895 +
896 +
897 + getmapped()                     /* get color-mapped data */
898 + {
899 +        int     y;
900 +                                        /* set gamma correction */
901 +        setcolrgam(gamcor);
902 +                                        /* make histogram */
903 +        new_histo();
904 +        for (y = 0; y < ymax; y++) {
905 +                if (getscan(y) < 0)
906 +                        quiterr("seek error in getmapped");
907 +                add2icon(y, scanline);
908 +                if (scale)
909 +                        shiftcolrs(scanline, xmax, scale);
910 +                colrs_gambs(scanline, xmax);
911 +                cnt_colrs(scanline, xmax);
912 +        }
913 +                                        /* map pixels */
914 +        if (!new_clrtab(maxcolors))
915 +                quiterr("cannot create color map");
916 +        for (y = 0; y < ymax; y++) {
917 +                if (getscan(y) < 0)
918 +                        quiterr("seek error in getmapped");
919 +                if (scale)
920 +                        shiftcolrs(scanline, xmax, scale);
921 +                colrs_gambs(scanline, xmax);
922 +                if (dither)
923 +                        dith_colrs(ourdata+y*xmax, scanline, xmax);
924 +                else
925 +                        map_colrs(ourdata+y*xmax, scanline, xmax);
926 +        }
927 + }
928 +
929 +
930   scale_rcolors(xr, sf)                   /* scale color map */
931   register XRASTER        *xr;
932   double  sf;
# Line 881 | Line 964 | int  y;
964                  if (fseek(fin, scanpos[y], 0) == -1)
965                          quiterr("fseek error");
966                  cury = y;
967 <        } else if (scanpos != NULL)
967 >        } else if (scanpos != NULL && scanpos[y] == -1)
968                  scanpos[y] = ftell(fin);
969  
970          if (freadcolrs(scanline, xmax, fin) < 0)
# Line 889 | Line 972 | int  y;
972  
973          cury++;
974          return(0);
892 }
893
894
895 picreadline3(y, l3)                     /* read in 3-byte scanline */
896 int  y;
897 register rgbpixel  *l3;
898 {
899        register int    i;
900                                                        /* read scanline */
901        if (getscan(y) < 0)
902                quiterr("cannot seek for picreadline");
903                                                        /* convert scanline */
904        normcolrs(scanline, xmax, scale);
905        add2icon(y, scanline);
906        for (i = 0; i < xmax; i++) {
907                l3[i].r = scanline[i][RED];
908                l3[i].g = scanline[i][GRN];
909                l3[i].b = scanline[i][BLU];
910        }
911 }
912
913
914 picwriteline(y, l)              /* add 8-bit scanline to image */
915 int  y;
916 pixel  *l;
917 {
918        bcopy((char *)l, (char *)ourdata+y*xmax, xmax);
919 }
920
921
922 picreadcm(map)                  /* do gamma correction */
923 colormap  map;
924 {
925        extern double  pow();
926        register int  i, val;
927
928        for (i = 0; i < 256; i++) {
929                val = pow((i+0.5)/256.0, 1.0/gamcor) * 256.0;
930                map[0][i] = map[1][i] = map[2][i] = val;
931        }
932 }
933
934
935 picwritecm(map)                 /* handled elsewhere */
936 colormap  map;
937 {
938 #ifdef DEBUG
939        register int i;
940
941        for (i = 0; i < 256; i++)
942                printf("%d %d %d\n", map[0][i],map[1][i],map[2][i]);
943 #endif
975   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines