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.1 by greg, Thu Mar 1 13:18:22 1990 UTC vs.
Revision 1.5 by greg, Wed Mar 7 11:39:26 1990 UTC

# Line 43 | Line 43 | static char SCCSid[] = "$SunId$ LBL";
43   #define  ourroot        RootWindow(thedisplay,ourscreen)
44   #define  ourgc          DefaultGC(thedisplay,ourscreen)
45  
46 + #define  revline(x0,y0,x1,y1)   XDrawLine(thedisplay,wind,revgc,x0,y0,x1,y1)
47 +
48 + #define  redraw(x,y,w,h) patch_raster(wind,(x)-xoff,(y)-yoff,x,y,w,h,ourras)
49 +
50   double  gamcor = 2.2;                   /* gamma correction */
51  
52   int  dither = 1;                        /* dither colors? */
# Line 51 | Line 55 | int  fast = 0;                         /* keep picture in Pixmap? */
55   Window  wind = 0;                       /* our output window */
56   Font  fontid;                           /* our font */
57  
58 < long  maxcolors = 0;                    /* maximum colors */
58 > int  maxcolors = 0;                     /* maximum colors */
59   int  greyscale = 0;                     /* in grey */
60  
61   int  scale = 0;                         /* scalefactor; power of two */
# Line 73 | Line 77 | int  cury = 0;                         /* current scan location */
77  
78   double  exposure = 1.0;                 /* exposure compensation used */
79  
80 + GC      revgc;                          /* graphics context with GXinvert */
81 +
82   XRASTER *ourras;                        /* our stored image */
83   unsigned char   *ourdata;               /* our image data */
84  
# Line 135 | Line 141 | char  *argv[];
141                          default:
142                                  goto userr;
143                          }
144 +                else if (argv[i][0] == '=')
145 +                        geometry = argv[i];
146                  else
147                          break;
148  
149 <        if (argc-i == 1) {
149 >        if (i == argc-1) {
150                  fname = argv[i];
151                  fin = fopen(fname, "r");
152                  if (fin == NULL) {
153                          sprintf(errmsg, "can't open file \"%s\"", fname);
154                          quiterr(errmsg);
155                  }
156 <        }
156 >        } else if (i != argc)
157 >                goto userr;
158                                  /* get header */
159          getheader(fin, headline);
160                                  /* get picture dimensions */
# Line 175 | Line 184 | char  *s;
184          static char  *altname[] = {"rview","rpict","pinterp",VIEWSTR,NULL};
185          register char  **an;
186  
187 <        if (!strncmp(s, "EXPOSURE=", 9))
188 <                exposure *= atof(s+9);
187 >        if (isexpos(s))
188 >                exposure *= exposval(s);
189          else
190                  for (an = altname; *an != NULL; an++)
191                          if (!strncmp(*an, s, strlen(*an))) {
192 <                                if (sscanview(&ourview, s+strlen(*an)) == 0)
192 >                                if (sscanview(&ourview, s+strlen(*an)) > 0)
193                                          gotview++;
194                                  return;
195                          }
# Line 189 | Line 198 | char  *s;
198  
199   init()                  /* get data and open window */
200   {
201 +        XSetWindowAttributes    ourwinattr;
202          XSizeHints  oursizhints;
203          register int  i;
204          
# Line 201 | Line 211 | init()                 /* get data and open window */
211          }
212          if ((thedisplay = XOpenDisplay(NULL)) == NULL)
213                  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");
214          if (maxcolors == 0) {           /* get number of available colors */
215 <                maxcolors = 1<<DisplayPlanes(thedisplay,ourscreen);
215 >                i = DisplayPlanes(thedisplay,ourscreen);
216 >                maxcolors = i > 8 ? 256 : 1<<i;
217                  if (maxcolors > 4) maxcolors -= 2;
218          }
219 +                                /* store image */
220 +        getras();
221 +                                /* open window */
222 +        ourwinattr.border_pixel = ourblack;
223 +        ourwinattr.background_pixel = ourwhite;
224 +        wind = XCreateWindow(thedisplay, ourroot, 0, 0, xmax, ymax, BORWIDTH,
225 +                        0, InputOutput, ourras->visual,
226 +                        CWBackPixel|CWBorderPixel, &ourwinattr);
227 +        if (wind == 0)
228 +                quiterr("can't create window");
229 +        width = xmax;
230 +        height = ymax;
231          fontid = XLoadFont(thedisplay, FONTNAME);
232          if (fontid == 0)
233                  quiterr("can't get font");
234          XSetFont(thedisplay, ourgc, fontid);
235 +        revgc = XCreateGC(thedisplay, wind, 0, 0);
236 +        XSetFunction(thedisplay, revgc, GXinvert);
237          XStoreName(thedisplay, wind, fname == NULL ? progname : fname);
238          XDefineCursor(thedisplay, wind, XCreateFontCursor(thedisplay,
239                          XC_diamond_cross));
# Line 220 | Line 241 | init()                 /* get data and open window */
241                  bzero((char *)&oursizhints, sizeof(oursizhints));
242                  i = XParseGeometry(geometry, &oursizhints.x, &oursizhints.y,
243                                  &oursizhints.width, &oursizhints.height);
244 <                if (i & (XValue|YValue) == (XValue|YValue)) {
244 >                if ((i&(WidthValue|HeightValue)) == (WidthValue|HeightValue))
245 >                        oursizhints.flags |= USSize;
246 >                else {
247 >                        oursizhints.width = xmax;
248 >                        oursizhints.height = ymax;
249 >                        oursizhints.flags |= PSize;
250 >                }
251 >                if ((i&(XValue|YValue)) == (XValue|YValue)) {
252                          oursizhints.flags |= USPosition;
253                          if (i & XNegative)
254 <                                oursizhints.x += DisplayWidth(thedisplay,ourscreen)-1;
254 >                                oursizhints.x += DisplayWidth(thedisplay,
255 >                                ourscreen)-1-oursizhints.width-2*BORWIDTH;
256                          if (i & YNegative)
257 <                                oursizhints.y += DisplayHeight(thedisplay,ourscreen)-1;
257 >                                oursizhints.y += DisplayHeight(thedisplay,
258 >                                ourscreen)-1-oursizhints.height-2*BORWIDTH;
259                  }
230 –                if (i & (WidthValue|HeightValue) == (WidthValue|HeightValue))
231 –                        oursizhints.flags |= USSize;
260                  XSetNormalHints(thedisplay, wind, &oursizhints);
261          }
262 <                                /* store image */
263 <        getras();
264 <        XSelectInput(thedisplay, wind, ButtonPressMask|ButtonReleaseMask|
237 <                        StructureNotifyMask|ButtonMotionMask|
238 <                        KeyPressMask|ExposureMask);
262 >        XSelectInput(thedisplay, wind, ButtonPressMask|ButtonReleaseMask
263 >                        |ButtonMotionMask|StructureNotifyMask
264 >                        |KeyPressMask|ExposureMask);
265          XMapWindow(thedisplay, wind);
266          return;
267   memerr:
# Line 271 | Line 297 | int  code;
297   getras()                                /* get raster file */
298   {
299          colormap        ourmap;
274 –        unsigned char   rmap[256], gmap[256], bmap[256];
300          XVisualInfo     vinfo;
276 –        register int  i;
301  
302          if (maxcolors <= 2) {           /* monochrome */
303                  ourdata = (unsigned char *)malloc(ymax*((xmax+7)/8));
# Line 305 | Line 329 | getras()                               /* get raster file */
329                          biq(dither,maxcolors,1,ourmap);
330                  else
331                          ciq(dither,maxcolors,1,ourmap);
332 <                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)
332 >                if (init_rcolors(ourras, ourmap[0], ourmap[1], ourmap[2]) == 0)
333                          goto fail;
334          }
335          return;
# Line 359 | Line 378 | getevent()                             /* process the next event */
378   }
379  
380  
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 –
381   docom(ekey)                                     /* execute command */
382   XKeyPressedEvent  *ekey;
383   {
# Line 407 | Line 418 | XKeyPressedEvent  *ekey;
418                                          colval(cval,BLU)*comp);
419                          break;
420                  }
421 <                XDrawImageString(thedisplay, wind, ourgc, box.xmin, box.ymin,
422 <                                buf, strlen(buf));
421 >                XDrawImageString(thedisplay, wind, ourgc,
422 >                                box.xmin, box.ymin+box.ysiz, buf, strlen(buf));
423                  return(0);
424          case 'i':                               /* identify (contour) */
425                  if (ourras->pixels == NULL)
# Line 419 | Line 430 | XKeyPressedEvent  *ekey;
430                  cvx.red = random() & 65535;
431                  cvx.green = random() & 65535;
432                  cvx.blue = random() & 65535;
433 <                XStoreColors(thedisplay, ourras->cmap, &cvx, 1);
433 >                cvx.flags = DoRed|DoGreen|DoBlue;
434 >                XStoreColor(thedisplay, ourras->cmap, &cvx);
435                  return(0);
436          case 'p':                               /* position */
437                  sprintf(buf, "(%d,%d)", ekey->x-xoff, ymax-1-ekey->y+yoff);
# Line 447 | Line 459 | XKeyPressedEvent  *ekey;
459                  scale_rcolors(ourras, pow(2.0, (double)n));
460                  scale += n;
461                  sprintf(buf, "%+d", scale);
462 <                XDrawImageString(thedisplay, wind, ourgc, box.xmin, box.ymin,
463 <                                buf, strlen(buf));
462 >                XDrawImageString(thedisplay, wind, ourgc,
463 >                                box.xmin, box.ymin+box.ysiz, buf, strlen(buf));
464                  XFlush(thedisplay);
465                  free(ourdata);
466                  free_raster(ourras);
# Line 467 | Line 479 | XKeyPressedEvent  *ekey;
479                  redraw(box.xmin, box.ymin, box.xsiz, box.ysiz);
480                  return(0);
481          default:
482 <                XBell(0);
482 >                XBell(thedisplay, 0);
483                  return(-1);
484          }
485   }
486  
487  
488 < moveimage(ep)                           /* shift the image */
489 < XButtonPressedEvent  *ep;
488 > moveimage(ebut)                         /* shift the image */
489 > XButtonPressedEvent  *ebut;
490   {
491 <        XButtonPressedEvent  eb;
491 >        union {
492 >                XEvent  u;
493 >                XButtonReleasedEvent  b;
494 >                XPointerMovedEvent  m;
495 >        }  e;
496 >        int     mxo, myo;
497  
498 <        XMaskEvent(thedisplay, ButtonReleaseMask, &eb);
499 <        xoff += eb.x - ep->x;
500 <        yoff += eb.y - ep->y;
498 >        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.u);
499 >        while (e.u.type == MotionNotify) {
500 >                mxo = e.m.x;
501 >                myo = e.m.y;
502 >                revline(ebut->x, ebut->y, mxo, myo);
503 >                revbox(xoff+mxo-ebut->x, yoff+myo-ebut->y,
504 >                                xoff+mxo-ebut->x+xmax, yoff+myo-ebut->y+ymax);
505 >                XMaskEvent(thedisplay,ButtonReleaseMask|ButtonMotionMask,&e.u);
506 >                revline(ebut->x, ebut->y, mxo, myo);
507 >                revbox(xoff+mxo-ebut->x, yoff+myo-ebut->y,
508 >                                xoff+mxo-ebut->x+xmax, yoff+myo-ebut->y+ymax);
509 >        }
510 >        xoff += e.b.x - ebut->x;
511 >        yoff += e.b.y - ebut->y;
512          XClearWindow(thedisplay, wind);
513          redraw(0, 0, width, height);
486 –        return(0);
514   }
515  
516  
# Line 491 | Line 518 | getbox(ebut)                           /* get new box */
518   XButtonPressedEvent  *ebut;
519   {
520          union {
521 <                XEvent  e;
521 >                XEvent  u;
522                  XButtonReleasedEvent  b;
523                  XPointerMovedEvent  m;
524          }  e;
525  
526 <        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.e);
527 <        while (e.e.type == ButtonMotionMask) {
526 >        XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e.u);
527 >        while (e.u.type == MotionNotify) {
528                  revbox(ebut->x, ebut->y, box.xmin = e.m.x, box.ymin = e.m.y);
529 <                XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask,
503 <                                &e.e);
529 >                XMaskEvent(thedisplay,ButtonReleaseMask|ButtonMotionMask,&e.u);
530                  revbox(ebut->x, ebut->y, box.xmin, box.ymin);
531          }
532          box.xmin = e.b.x<0 ? 0 : (e.b.x>=width ? width-1 : e.b.x);
# Line 523 | Line 549 | XButtonPressedEvent  *ebut;
549   revbox(x0, y0, x1, y1)                  /* draw box with reversed lines */
550   int  x0, y0, x1, y1;
551   {
552 <        static GC       mygc = 0;
552 >        revline(x0, y0, x1, y0);
553 >        revline(x0, y1, x1, y1);
554 >        revline(x0, y0, x0, y1);
555 >        revline(x1, y0, x1, y1);
556 > }
557  
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 */
558  
539 –
559   avgbox(clr)                             /* average color over current box */
560   COLOR  clr;
561   {
# Line 599 | Line 618 | getmono()                      /* get monochrome data */
618                          if (err > 127)
619                                  err -= 255;
620                          else
621 <                                *dp |= 1<<(x&07);
621 >                                *dp |= 1<<(7-(x&07));
622                          cerr[x] = err >>= 1;
623                  }
624          }

Diff Legend

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