![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to showimg.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [CSRG BSD Unix] / 43BSDTahoe / new / X / showimg|
Return to showimg.c CVS log | Up to [CSRG BSD Unix] / 43BSDTahoe / new / X / showimg |
1.1 root 1: /* Program to display images on uVax II/GPX under the X window system.
2: *
3: * Bill Wyatt and Jim Gettys, Feb. 12 1986 et. seq.
4: *
5: * 4/23/86 WFW
6: * Added FITS file reading capability, selected via -fits option.
7: *
8: * 7/86 WFW
9: * Added disk fits format via -dfits option, for not swapping bytes,
10: * but file otherwise in disk format.
11: *
12: * 7/86 WFW
13: * Added palette subwindow, zoomx4 window, independently resizeable.
14: *
15: * 8/11/86 WFW
16: * If the palette window needs to be independent instead of a subwindow,
17: * then compile with PALWIND defined.
18: *
19: * 8/13/86 WFW
20: * Added ifdef support from Eric Mandel for ROSAT & Einstein images
21: */
22:
23: #include <stdio.h>
24: #include <sys/file.h>
25: #include <X/Xlib.h>
26: #include <X/XMenu.h>
27: #include <X/Xkeyboard.h>
28:
29: #ifdef MC68000
30: #include <sys/types.h>
31: #endif
32:
33: #include "show.icon.ic"
34:
35: #include "shimg.h"
36: #include "shopt.h"
37:
38: #define TESTDEFAULT "=512x512+100+134"
39: #define PICTDEFAULT "+50+100"
40: #define TESTNROWS 512
41:
42: #define MIN(a,b) (((a) < (b)) ? (a) : (b))
43: #define MAX(a,b) (((a) > (b)) ? (a) : (b))
44:
45: main(argc, argv)
46: int argc;
47: char **argv;
48: {
49: struct windmain maininfo;
50: struct colorwind colorinfo;
51: struct imagewind imageinfo;
52:
53: Window wind, subwind, palwind, wzoom;
54: Window iconwindow, iconwzoom;
55: #ifdef PALWIND
56: Window iconpalwind; /* palette window is independent, needs icon */
57: #endif
58: WindowInfo winfo, palwinfo, wzoominfo;
59:
60:
61: Cursor imcursor, pancursor, printcursor, zoom2cursor, zoom4cursor;
62: Cursor palcursor;
63: int xcenter = -1;
64: int ycenter = -1; /* nominal center of displayed image */
65: int xtempzero, ytempzero;
66: int xzoomsize = 124, yzoomsize = 124;
67: XMenu *showmenu, *menusetup();
68: int XMenuSetFreeze(), XMenuActivate();
69: int *currentflags;
70: int pane = 0, sel = 0;
71: int lastpane = 0, lastsel = 0;
72: unsigned char palette[2048]; /* palette window array */
73: short *readheader(), *readpict();
74: int scalepict();
75: int zoomfactor = 0; /* replication factor for pixel display */
76: int oldzoomfactor = 0;
77: int fd, open(), close(), ipow();
78: int w_mapped = 1;
79: int rshift = 0;
80: int keycode = 0;
81: int xbut, ybut;
82: char *malloc();
83: char *keystring;
84: int j, k, l;
85:
86: XEvent event, peekevent;
87: XExposeEvent *expw = (XExposeEvent *)&event;
88: register XKeyOrButtonEvent *but = (XButtonEvent *)&event;
89: register XMouseMovedEvent *mouse = (XMouseMovedEvent *)&event;
90:
91: register int downbutton = -1; /* mouse button flag */
92: register int xzero, yzero; /* image coordinates of window(0,0) */
93: register int i;
94:
95:
96: /* **** MAIN EXECUTION CODE STARTS HERE **** */
97:
98: maininfo.display = NULL;
99: colorinfo.nplanes = -1;
100: imageinfo.pmin = 70000;
101: imageinfo.pmax = -3000;
102: imageinfo.headskip = 0;
103: imageinfo.calibration = 0;
104: imageinfo.fitsflag = 0;
105:
106: #ifdef XRAY
107: imageinfo.ein = 0;
108: imageinfo.ros = 0;
109: #endif
110:
111: imageinfo.VOP_Flags = VOP_GrayScale | VOP_Initialize;
112: imageinfo.SOP_Flags = SOP_Linear;
113: imageinfo.COP_Flags = 0;
114: imageinfo.FOP_Flags = 0;
115:
116: shgetopt(argc, argv, &maininfo, &colorinfo, &imageinfo);
117:
118: /* create the cursors */
119: make_cursors(&imcursor,&pancursor,&printcursor,
120: &zoom2cursor, &zoom4cursor, &palcursor);
121:
122: /* try for 8 planes (probably only gets 6) */
123: if (colorinfo.nplanes < 0)
124: colorinfo.nplanes = MAX(DisplayPlanes()-4,8);
125:
126: /* iterate until cells allocated. Check if enough */
127: if (XGetColorCells(1, 1, colorinfo.nplanes,
128: &colorinfo.planes, &(colorinfo.pixels[0])) == 0)
129: {
130: while(--colorinfo.nplanes > 2)
131: if(XGetColorCells(1,1,colorinfo.nplanes,
132: &colorinfo.planes,
133: &(colorinfo.pixels[0])) != 0) break;
134: if(colorinfo.nplanes <= 2) {
135: fprintf(stderr,"Insufficient color planes resource!\n");
136: exit(1);
137: }
138: if(colorinfo.nplanes < 6)
139: fprintf(stderr, "Allocated %d planes\n",colorinfo.nplanes);
140: }
141:
142: colorinfo.ncolors = ipow(2, colorinfo.nplanes);
143:
144: /* figure out how many bits we have to left shift the pixels */
145: colorinfo.shift = 0;
146: i = colorinfo.pixels[0] | colorinfo.planes;
147: while (((i >>= 1) & 1) == 0) colorinfo.shift++;
148:
149: /* get the menu selections ready */
150: showmenu = menusetup(argv[0]);
151:
152: if(imageinfo.calibration) { /** GENERATE TEST SCREEN */
153: imageinfo.ncols = imageinfo.nrows = TESTNROWS;
154: rshift = DisplayPlanes() - colorinfo.nplanes - colorinfo.shift;
155: if((imageinfo.image =
156: (unsigned char *)malloc(imageinfo.nrows*imageinfo.ncols))
157: == NULL) {
158: fprintf(stderr,"Can't allocate test image!\n");
159: exit(1);
160: }
161: for (j = 0; j < imageinfo.nrows; j++)
162: for (i = 0; i < imageinfo.ncols; i++)
163: *(imageinfo.image + j*imageinfo.ncols + i) =
164: ((((i + j)&255) >> rshift) & colorinfo.planes)
165: + colorinfo.pixels[0];
166:
167: wind = XCreate(argv[0], argv[0],
168: maininfo.geometry, TESTDEFAULT, &maininfo.frame,
169: 100, 134);
170: }
171: else { /** READ IN IMAGE **/
172:
173: #ifdef XRAY
174: /* code and conditional added by egm */
175:
176: if( imageinfo.ein == 1 ){
177: eimgopen(imageinfo.ict, imageinfo.filename);
178: }
179: else if( imageinfo.ros == 1 ){
180: strcpy(imageinfo.poename, imageinfo.filename);
181: strcat(imageinfo.poename, ".poe");
182: strcpy(imageinfo.hdrname, imageinfo.filename);
183: strcat(imageinfo.hdrname, ".hdr");
184: openpoe(imageinfo.muthict, imageinfo.poename, imageinfo.hdrname);
185: }
186: else {
187: #endif
188:
189: if((fd = open(imageinfo.filename,O_RDONLY,0)) < 0) {
190: fprintf(stderr,"Error opening file %s\n",imageinfo.filename);
191: exit(1);
192: }
193: if((imageinfo.header =
194: readheader(fd,imageinfo.headskip,
195: &imageinfo.nrows,&imageinfo.ncols,
196: imageinfo.fitsflag))
197: == NULL) {
198: fprintf(stderr,"Error reading header of file %s\n",
199: imageinfo.filename);
200: exit(1);
201: }
202:
203: #ifdef PALWIND
204: sprintf(maininfo.filegeometry,"=%dx%d%s",imageinfo.ncols,
205: imageinfo.nrows, PICTDEFAULT);
206: #else
207: sprintf(maininfo.filegeometry,"=%dx%d%s",imageinfo.ncols,
208: imageinfo.nrows+PALHEIGHT+2*PALBORDER, PICTDEFAULT);
209: #endif
210:
211: #ifdef XRAY
212: } /* end of conditional code added by egm */
213: #endif
214:
215: if((imageinfo.image =
216: (unsigned char *)malloc(imageinfo.nrows*imageinfo.ncols))
217: == NULL) {
218: fprintf(stderr,"Can't allocate byte image?\n");
219: exit(1);
220: }
221:
222: #ifdef XRAY
223: /* conditional added by egm */
224:
225: if( imageinfo.ein == 1 ) { /* Einstein XRAY image */
226: if((imageinfo.picture =
227: (short *)malloc(imageinfo.nrows*imageinfo.ncols*2)) == NULL) {
228: fprintf(stderr,"Can't allocate xray image?\n");
229: exit(1);
230: }
231: eimgread(imageinfo.ict,imageinfo.picture,
232: imageinfo.ncols, imageinfo.nrows,
233: imageinfo.iy, imageinfo.iz,
234: imageinfo.zoom,imageinfo.zoom, imageinfo.energy);
235: }
236: else if( imageinfo.ros == 1) { /* ROSAT XRAY image */
237: selectcenter(imageinfo.muthict, imageinfo.iy, imageinfo.iz);
238: selectres(imageinfo.muthict, imageinfo.zoom, imageinfo.zoom);
239: if((imageinfo.picture =
240: (short *)malloc(imageinfo.nrows*imageinfo.ncols*2)) == NULL) {
241: fprintf(stderr,"Can't allocate xray image?\n");
242: exit(1);
243: }
244: readpoe(imageinfo.muthict, imageinfo.picture,
245: imageinfo.ncols, imageinfo.nrows);
246: }
247: else {
248: #endif
249: /* SAOCCD or FITS image */
250: if((imageinfo.picture =
251: readpict(fd,imageinfo.nrows,imageinfo.ncols,
252: imageinfo.fitsflag)) == NULL) {
253: fprintf(stderr,"Error reading file %s\n",imageinfo.filename);
254: exit(1);
255: }
256: close(fd);
257:
258: #ifdef XRAY
259: } /* end of conditional added by egm */
260: #endif
261:
262: if(imageinfo.pmin == 70000 && imageinfo.pmax == -3000)
263: maxminpict(imageinfo.picture, imageinfo.nrows, imageinfo.ncols,
264: &imageinfo.pmax, &imageinfo.pmin);
265: scalepict(imageinfo.image, imageinfo.picture,
266: imageinfo.pmax, imageinfo.pmin,
267: colorinfo.ncolors, colorinfo.pixels[0], colorinfo.shift,
268: imageinfo.nrows, imageinfo.ncols, imageinfo.SOP_Flags);
269: wind = XCreate(argv[0], argv[0],
270: maininfo.geometry, maininfo.filegeometry,
271: &maininfo.frame, 100, 100);
272: }
273: if (wind == 0) {
274: fprintf(stderr, "XCreate on root failed\n");
275: exit(1);
276: }
277:
278: /* get current info so as to be ready for subwindow placing */
279: XQueryWindow(wind, &winfo);
280:
281: if((iconwindow =
282: XCreateWindow(RootWindow, 0, 0,
283: show_width, show_height, 0, 0, 0)) == 0)
284: {
285: fprintf(stderr, "XCreateWindow on iconwindow failed\n");
286: exit(1);
287: }
288: XSetIconWindow(wind, iconwindow);
289:
290: #ifdef PALWIND
291: if((palwind = XCreateWindow(RootWindow, winfo.x,
292: winfo.y+winfo.height,
293: winfo.width,
294: PALHEIGHT, border_width,
295: maininfo.frame.border, BlackPixmap))
296: == 0) {
297: fprintf(stderr, "XCreateWindow on palwind failed\n");
298: exit(1);
299: }
300: XStoreName(palwind, argv[0]);
301: #else
302: if((palwind = XCreateWindow(wind, 0,
303: winfo.height-PALHEIGHT-2*PALBORDER,
304: winfo.width-2*PALBORDER,
305: PALHEIGHT, PALBORDER,
306: WhitePixmap, BlackPixmap)) == 0) {
307: fprintf(stderr, "XCreateWindow on palwind failed\n");
308: exit(1);
309: }
310: #endif
311: if((wzoom = XCreateWindow(RootWindow,
312: winfo.x+winfo.width+
313: maininfo.frame.bdrwidth,
314: winfo.y,
315: xzoomsize, yzoomsize,
316: maininfo.frame.bdrwidth,
317: maininfo.frame.border, BlackPixmap)) == 0)
318: {
319: fprintf(stderr, "XCreateWindow on wzoom failed\n");
320: exit(1);
321: }
322: XStoreName(wzoom, argv[0]);
323:
324: if((iconwzoom = XCreateWindow(RootWindow, 0, 0,
325: show_width, show_height, 0, 0, 0)) == 0) {
326: fprintf(stderr, "XCreateWindow on iconwzoom failed\n");
327: exit(1);
328: }
329: XSetIconWindow(wzoom, iconwzoom);
330:
331: #ifdef PALWIND
332: if((iconpalwind = XCreateWindow(RootWindow, 0, 0,
333: show_width, show_height, 0, 0, 0)) == 0) {
334: fprintf(stderr, "XCreateWindow on iconpalwind failed\n");
335: exit(1);
336: }
337: XSetIconWindow(palwind, iconpalwind);
338: #endif
339:
340: /* define the cursors */
341: XUndefineCursor(wind);
342: XDefineCursor(wind,imcursor);
343:
344: XUndefineCursor(palwind);
345: XDefineCursor(palwind,palcursor);
346:
347: /* assume we display center of image in center of window */
348: if(xcenter < 0) xcenter = imageinfo.ncols>>1;
349: if(ycenter < 0) ycenter = imageinfo.nrows>>1;
350:
351: XSelectInput(wind, ButtonPressed | ButtonReleased | MouseMoved |
352: KeyPressed |
353: ExposeRegion | ExposeWindow | ExposeCopy | UnmapWindow);
354: XSelectInput(iconwindow, ExposeWindow);
355:
356: XSelectInput(wzoom, ExposeWindow | UnmapWindow);
357: XSelectInput(iconwzoom, ExposeWindow);
358:
359: #ifdef PALWIND
360: XSelectInput(palwind, ExposeWindow | UnmapWindow);
361: XSelectInput(iconpalwind, ExposeWindow);
362: #else
363: XSelectInput(palwind, ExposeWindow);
364: #endif
365:
366: XMapWindow(wind);
367: XMapWindow(wzoom);
368:
369: #ifdef PALWIND
370: XMapWindow(palwind);
371: #else
372: XMapSubwindows(wind);
373: #endif
374:
375: XFlush();
376:
377: while(1) {
378: if(imageinfo.VOP_Flags & VOP_Initialize) {
379: initcmap(colorinfo.ncolors,colorinfo.cmap,
380: colorinfo.pixels[0],colorinfo.nplanes,
381: imageinfo.VOP_Flags);
382: XStoreColors(colorinfo.ncolors, colorinfo.cmap);
383: imageinfo.VOP_Flags &= ~(VOP_Initialize);
384: }
385:
386: XNextEvent(&event);
387:
388: #ifdef GLOPEROO
389: describe_XEvent(event.type, event.window, but->detail,
390: wind, palwind, wzoom);
391: #endif
392: switch((int)event.type) {
393: case KeyPressed:
394:
395: #ifdef VAX
396: keycode = but->detail & 0x00ff;
397: if(IsCursorKey(keycode)) {
398: XUpdateMouse(wind,&mouse->x,&mouse->y,&subwind);
399: i = 1<<zoomfactor;
400: if(keycode == KC_CURSOR_UP) mouse->y -= i;
401: if(keycode == KC_CURSOR_DOWN) mouse->y += i;
402: if(keycode == KC_CURSOR_RIGHT) mouse->x += i;
403: if(keycode == KC_CURSOR_LEFT) mouse->x -= i;
404: if(mouse->x < 0) mouse->x = 0;
405: if(mouse->y < 0) mouse->y = 0;
406: if(mouse->x >= winfo.width) mouse->x = winfo.width-1;
407: if(mouse->y >= winfo.height-PALHEIGHT-2*PALBORDER)
408: mouse->y = winfo.height-PALHEIGHT-2*PALBORDER-1;
409: XWarpMouse(wind,(int)mouse->x,(int)mouse->y);
410: }
411: #else
412: keystring = XLookupMapping(but, &j);
413: /* ANSI cursor keys are esc. seq. */
414: if(j > 0 && *keystring == '\033') {
415: i = 1<<zoomfactor;
416: if(strcmp(keystring,"\033[A") == 0) mouse->y -= i; /* up */
417: if(strcmp(keystring,"\033[B") == 0) mouse->y += i; /* down */
418: if(strcmp(keystring,"\033[C") == 0) mouse->x += i; /* right */
419: if(strcmp(keystring,"\033[D") == 0) mouse->x -= i; /* left */
420: if(mouse->x < 0) mouse->x = 0;
421: if(mouse->y < 0) mouse->y = 0;
422: if(mouse->x >= winfo.width) mouse->x = winfo.width-1;
423: if(mouse->y >= winfo.height-PALHEIGHT-2*PALBORDER)
424: XWarpMouse(wind,(int)mouse->x,(int)mouse->y);
425: }
426: #endif
427: break;
428:
429: case ButtonPressed: /* Activate Menu ? */
430: if((but->detail &
431: (ControlMask | MetaMask | ShiftMask | ShiftLockMask))
432: == ControlMask)
433: {
434: XQueryWindow(wind, &winfo);
435: XMenuSetFreeze(showmenu);
436: pane = lastpane;
437: sel = lastsel;
438: if(XMenuActivate(showmenu,&pane,&sel,
439: but->x + winfo.x, but->y + winfo.y,
440: ButtonReleased, ¤tflags)
441: == XM_SUCCESS) { /* check out the selection */
442: lastpane = pane;
443: lastsel = sel;
444:
445: switch(*currentflags & PANEMASK) {
446: /* EXIT */
447: case 0:
448: exit(0); /* normal exit */
449:
450: /* Set `viewing mode' - manipulation of color map */
451: case VOP:
452: imageinfo.VOP_Flags &= ~(currentflags[1]);
453: imageinfo.VOP_Flags |=
454: (*currentflags & SELMASK);
455: XUndefineCursor(wind);
456: XDefineCursor(wind, imcursor);
457: imageinfo.COP_Flags = 0;
458: break;
459:
460: /* Set cursor mode - other uses than above */
461: case COP:
462: /* if in test mode, disable all but viewing */
463: if(imageinfo.calibration) break;
464: imageinfo.COP_Flags &= ~(currentflags[1]);
465: imageinfo.COP_Flags |=
466: (*currentflags & SELMASK);
467: if(imageinfo.COP_Flags & COP_Print) {
468: XUndefineCursor(wind);
469: XDefineCursor(wind, printcursor);
470: } else if(imageinfo.COP_Flags & COP_Pan) {
471: XUndefineCursor(wind);
472: XDefineCursor(wind, pancursor);
473: } else if(imageinfo.COP_Flags & COP_Zoom2) {
474: XUndefineCursor(wind);
475: XDefineCursor(wind, zoom2cursor);
476: } else if(imageinfo.COP_Flags & COP_Zoom4) {
477: XUndefineCursor(wind);
478: XDefineCursor(wind, zoom4cursor);
479: }
480: break;
481:
482: /* set picture scaling mode */
483: case SOP:
484: /* if in test mode, disable all but viewing */
485: if(imageinfo.calibration) break;
486: /* first, see if any different */
487: if((imageinfo.SOP_Flags &
488: (*currentflags & SELMASK)) == 0)
489: {
490: imageinfo.SOP_Flags &=
491: ~(currentflags[1]);
492: imageinfo.SOP_Flags |=
493: (*currentflags & SELMASK);
494: scalepict(imageinfo.image,
495: imageinfo.picture,
496: imageinfo.pmax, imageinfo.pmin,
497: colorinfo.ncolors,
498: colorinfo.pixels[0],
499: colorinfo.shift,
500: imageinfo.nrows,
501: imageinfo.ncols,
502: imageinfo.SOP_Flags);
503: writepix( wind, imageinfo.image,
504: imageinfo.ncols,
505: imageinfo.nrows,
506: zoomfactor, 0, 0,
507: winfo.width, winfo.height,
508: xzero, yzero, 0, GXcopy,
509: AllPlanes);
510: }
511: break;
512:
513: case FOP:
514: /* if in test mode, disable all but viewing */
515: if(imageinfo.calibration) break;
516: break;
517:
518: default:
519: fprintf(stderr,"Unknown menu pane %d\n",
520: *currentflags>>16);
521: }
522: }
523: break;
524: }
525: else if((but->detail &
526: (ControlMask | MetaMask | ShiftMask |
527: ShiftLockMask)) == 0)
528: {
529: /* check if viewing or cursor operation selected */
530: if(imageinfo.COP_Flags) break;
531: downbutton = but->detail &
532: (RightButton | MiddleButton | LeftButton);
533: CalcMap(&winfo,colorinfo.cmap,(int)but->x,(int)but->y,
534: colorinfo.ncolors, imageinfo.VOP_Flags,
535: downbutton);
536: XStoreColors(colorinfo.ncolors,colorinfo.cmap);
537: break;
538: }
539: break;
540:
541: case ButtonReleased:
542: /* check if viewing or cursor operation selected */
543: if(imageinfo.COP_Flags) {
544: if(imageinfo.COP_Flags & COP_Print) {
545: /* print 11x11 picture region */
546: prpict(imageinfo.picture, but->x>>zoomfactor,
547: but->y>>zoomfactor, xzero, yzero,
548: imageinfo.ncols, imageinfo.nrows, 11, 11);
549: }
550: /* recenter (pan) on cursor position */
551: if(imageinfo.COP_Flags &
552: (COP_Pan | COP_Zoom2 | COP_Zoom4)) {
553:
554: xcenter = xzero + (but->x >> zoomfactor);
555: ycenter = yzero + (but->y >> zoomfactor);
556:
557: /* alter zoomfactor to reflect new zoom */
558: if(imageinfo.COP_Flags & COP_Pan) zoomfactor = 0;
559: if(imageinfo.COP_Flags & COP_Zoom2) zoomfactor = 1;
560: if(imageinfo.COP_Flags & COP_Zoom4) zoomfactor = 2;
561:
562: xtempzero =
563: MAX( 0, MIN(imageinfo.ncols -
564: (winfo.width>>zoomfactor),
565: xcenter - (winfo.width>>(zoomfactor+1))));
566:
567: #ifdef PALWIND
568: ytempzero =
569: MAX( 0, MIN(imageinfo.nrows-
570: (winfo.height>>zoomfactor),
571: ycenter - (winfo.height>>(zoomfactor+1))));
572: #else
573: ytempzero =
574: MAX( 0, MIN(imageinfo.nrows-
575: ((winfo.height-PALHEIGHT-2*PALBORDER)
576: >>zoomfactor),
577: ycenter - ((winfo.height-
578: PALHEIGHT-2*PALBORDER)
579: >>(zoomfactor+1))));
580: #endif
581: if(xzero != xtempzero || yzero != ytempzero ||
582: oldzoomfactor != zoomfactor)
583: {
584: xzero = xtempzero;
585: yzero = ytempzero;
586: writepix( wind, imageinfo.image,
587: imageinfo.ncols, imageinfo.nrows,
588: zoomfactor, 0, 0,
589: winfo.width, winfo.height,
590: xzero, yzero, 0, GXcopy, AllPlanes);
591: XWarpMouse(wind, (xcenter-xzero)<<zoomfactor,
592: (ycenter-yzero)<<zoomfactor);
593: }
594: /* COP_OldFlags = imageinfo.COP_Flags; */
595: oldzoomfactor = zoomfactor;
596: }
597: break;
598: }
599: if(downbutton < 0) break;
600: CalcMap(&winfo,colorinfo.cmap,(int)but->x,(int)but->y,
601: colorinfo.ncolors, imageinfo.VOP_Flags,
602: downbutton);
603: XStoreColors(colorinfo.ncolors,colorinfo.cmap);
604: downbutton = -1;
605: break;
606:
607: case MouseMoved:
608: XUpdateMouse(wind, &xbut, &ybut, &subwind);
609: XQueryMouseButtons(wind, &xbut, &ybut,
610: &subwind, &mouse->detail);
611:
612: if(subwind == 0 && downbutton >= 0) {
613: CalcMap(&winfo,colorinfo.cmap,xbut,ybut,
614: colorinfo.ncolors,
615: imageinfo.VOP_Flags,downbutton);
616: XStoreColors(colorinfo.ncolors,colorinfo.cmap);
617: }
618: else {
619: updatezoom(wzoom, xzoomsize, yzoomsize,
620: (xzero + (but->x >> zoomfactor)),
621: (yzero + (but->y >> zoomfactor)),
622: imageinfo.ncols, imageinfo.nrows,
623: imageinfo.image, (1<<zoomfactor));
624: }
625: break;
626:
627: /* On ExposeWindow events, recalculate the image center and
628: * coordinates of upper left hand corner of window.
629: */
630: case ExposeCopy:
631: case ExposeWindow:
632: if(QLength() > 0) {
633: XPeekEvent(&peekevent);
634: if(peekevent.type == ExposeWindow &&
635: peekevent.window == expw->window) break;
636: }
637:
638: if(expw->window == iconwindow) {
639: XBitmapBitsPut(iconwindow, 0, 0,
640: show_width, show_height, show_bits,
641: WhitePixel, BlackPixel, 0,
642: GXcopy, AllPlanes);
643: break;
644: }
645:
646: #ifdef PALWIND
647: if(expw->window == iconpalwind) {
648: XBitmapBitsPut(iconpalwind, 0, 0,
649: show_width, show_height, show_bits,
650: WhitePixel, BlackPixel, 0,
651: GXcopy, AllPlanes);
652: break;
653: }
654: #endif
655: if(expw->window == iconwzoom) {
656: XBitmapBitsPut(iconwzoom, 0, 0,
657: show_width, show_height, show_bits,
658: WhitePixel, BlackPixel, 0,
659: GXcopy, AllPlanes);
660: break;
661: }
662:
663: if(w_mapped == 0) { /* check if to remap windows */
664: #ifdef PALWIND
665: if(expw->window != palwind) XMapWindow(palwind);
666: #endif
667: if(expw->window != wind) XMapWindow(wind);
668: if(expw->window != wzoom) XMapWindow(wzoom);
669: w_mapped++;
670: }
671:
672: XQueryWindow(wind,&winfo);
673:
674: if(expw->window == wind) {
675: XQueryWindow(palwind,&palwinfo);
676: #ifdef PALWIND
677: XConfigureWindow(palwind, winfo.x,
678: winfo.y+winfo.height+
679: maininfo.frame.bdrwidth,
680: winfo.width, PALHEIGHT);
681: #else
682: XConfigureWindow(palwind, 0,
683: winfo.height-PALHEIGHT-2*PALBORDER,
684: winfo.width-2*PALBORDER,
685: PALHEIGHT);
686: #endif
687: XQueryWindow(wzoom,&wzoominfo);
688: xzoomsize = wzoominfo.width;
689: yzoomsize = wzoominfo.height;
690: XConfigureWindow(wzoom,
691: winfo.x+winfo.width+
692: maininfo.frame.bdrwidth,
693: winfo.y, wzoominfo.width,
694: wzoominfo.height);
695:
696: xzero = MAX( 0,
697: MIN(imageinfo.ncols-(winfo.width>>zoomfactor),
698: xcenter -
699: (winfo.width>>(zoomfactor+1))));
700: #ifdef PALWIND
701: yzero = MAX( 0,
702: MIN(nrows-
703: (winfo.height>>zoomfactor),
704: ycenter -
705: (winfo.height>>(zoomfactor+1))));
706: #else
707: yzero = MAX( 0,
708: MIN(imageinfo.nrows-
709: ((winfo.height-PALHEIGHT-2*PALBORDER)
710: >>zoomfactor),
711: ycenter - ((winfo.height -
712: PALHEIGHT-2*PALBORDER)
713: >>(zoomfactor+1))));
714: #endif
715: }
716:
717: if(event.type == ExposeCopy) break;
718:
719: /* drop through to ExposeRegion to draw the window, and
720: * redraw the supporting windows */
721:
722: case ExposeRegion:
723: if(expw->window == palwind) {
724: XQueryWindow(palwind,&palwinfo);
725: for(i=0; i<palwinfo.width; i++)
726: palette[i] =
727: ((colorinfo.ncolors * i)/palwinfo.width) +
728: colorinfo.pixels[0];
729: for(i=0; i<palwinfo.height; i++)
730: XPixmapBitsPutZ(palwind, 0, i,
731: palwinfo.width, 1,
732: palette, 0, GXcopy, AllPlanes);
733: }
734: else if(expw->window == wzoom) {
735: XQueryWindow(wzoom,&wzoominfo);
736: xzoomsize = wzoominfo.width;
737: yzoomsize = wzoominfo.height;
738: updatezoom(wzoom, xzoomsize, yzoomsize,
739: xcenter, ycenter,
740: imageinfo.ncols, imageinfo.nrows,
741: imageinfo.image, (1<<zoomfactor));
742: }
743: else {
744: if( expw->x > imageinfo.ncols<<zoomfactor ||
745: expw->y > imageinfo.nrows<<zoomfactor)
746: break;
747:
748: writepix( wind, imageinfo.image,
749: imageinfo.ncols, imageinfo.nrows,
750: zoomfactor, expw->x, expw->y,
751: expw->width, expw->height,
752: xzero, yzero, 0, GXcopy, AllPlanes);
753: }
754: break;
755:
756: /* If any window is unmapped, all three are unmapped */
757:
758: case UnmapWindow:
759:
760: #ifdef PALWIND
761: if(event.window != palwind) XUnmapWindow(palwind);
762: #endif
763: if(event.window != wzoom) XUnmapWindow(wzoom);
764: if(event.window != wind) XUnmapWindow(wind);
765: w_mapped = 0;
766: break;
767: }
768: }
769: }
770:
771:
772: #ifdef GLOPEROO
773: describe_XEvent(etype, ewindow, detail, wind, palwind, wzoom)
774: unsigned long etype;
775: unsigned short detail;
776: Window ewindow, wind, palwind, wzoom;
777: {
778: fprintf(stderr,"Window ");
779: if(ewindow == wind) {
780: fprintf(stderr,"wind, ");
781: } else if(ewindow == palwind) {
782: fprintf(stderr,"palwind, ");
783: } else if(ewindow == wzoom) {
784: fprintf(stderr,"wzoom, ");
785: } else {
786: fprintf("ERROR %d\n", ewindow);
787: }
788: switch((int)etype) {
789: case KeyPressed: fprintf(stderr,"KeyPressed");
790: fprintf(stderr," detail = %x", detail);
791: break;
792: case KeyReleased: fprintf(stderr,"KeyReleased");
793: fprintf(stderr," detail = %x", detail);
794: break;
795: case ButtonPressed: fprintf(stderr,"ButtonPressed");
796: fprintf(stderr," detail = %x", detail);
797: break;
798: case ButtonReleased: fprintf(stderr,"ButtonReleased");
799: fprintf(stderr," detail = %x", detail);
800: break;
801: case EnterWindow: fprintf(stderr,"EnterWindow");
802: fprintf(stderr," detail = %x", detail);
803: break;
804: case LeaveWindow: fprintf(stderr,"LeaveWindow");
805: fprintf(stderr," detail = %x", detail);
806: break;
807: case MouseMoved: fprintf(stderr,"MouseMoved");
808: fprintf(stderr," detail = %x", detail);
809: break;
810: case ExposeWindow: fprintf(stderr,"ExposeWindow"); break;
811: case ExposeRegion: fprintf(stderr,"ExposeRegion"); break;
812: case ExposeCopy: fprintf(stderr,"ExposeCopy"); break;
813: case UnmapWindow: fprintf(stderr,"UnmapWindow"); break;
814: case FocusChange: fprintf(stderr,"FocusChange"); break;
815: default: fprintf(stderr,"ERROR %d", etype);
816: }
817: fprintf(stderr,"\n");
818: fflush(stderr);
819: }
820: #endif
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.