1 |
– |
/* Copyright (c) 1999 Regents of the University of California */ |
2 |
– |
|
1 |
|
#ifndef lint |
2 |
< |
static char SCCSid[] = "$SunId$ SGI"; |
2 |
> |
static const char RCSid[] = "$Id"; |
3 |
|
#endif |
6 |
– |
|
4 |
|
/* |
5 |
|
* x11image.c - driver for X-windows |
6 |
|
* |
18 |
|
|
19 |
|
#include "standard.h" |
20 |
|
|
21 |
+ |
#include <string.h> |
22 |
|
#include <signal.h> |
23 |
|
#include <X11/Xlib.h> |
24 |
|
#include <X11/cursorfont.h> |
25 |
|
#include <X11/Xutil.h> |
26 |
|
#include <X11/Xatom.h> |
27 |
|
|
30 |
– |
#undef NOPROTO |
31 |
– |
#define NOPROTO 1 |
28 |
|
#include "color.h" |
29 |
|
#include "tonemap.h" |
30 |
|
#include "view.h" |
31 |
|
#include "x11raster.h" |
32 |
|
#include "random.h" |
37 |
– |
#include "resolu.h" |
33 |
|
|
34 |
|
#define FONTNAME "8x13" /* text font we'll use */ |
35 |
|
|
104 |
|
|
105 |
|
struct { |
106 |
|
int xmin, ymin, xsiz, ysiz; |
107 |
< |
} box = {0, 0, 0, 0}; /* current box */ |
107 |
> |
} bbox = {0, 0, 0, 0}; /* current bbox */ |
108 |
|
|
109 |
|
char *geometry = NULL; /* geometry specification */ |
110 |
|
|
126 |
|
|
127 |
|
int sigrecv; |
128 |
|
|
129 |
< |
int onsig() { sigrecv++; } |
129 |
> |
void onsig(int i) { sigrecv++; } |
130 |
|
|
131 |
|
|
132 |
|
main(argc, argv) |
538 |
|
goto fail; |
539 |
|
getmono(); |
540 |
|
} else if (ourvis.class == TrueColor | ourvis.class == DirectColor) { |
541 |
< |
int datsiz = ourvis.depth>16 ? sizeof(int4) : sizeof(int2); |
541 |
> |
int datsiz = ourvis.depth>16 ? sizeof(int32) : sizeof(int16); |
542 |
|
ourdata = (unsigned char *)malloc(datsiz*xmax*ymax); |
543 |
|
if (ourdata == NULL) |
544 |
|
goto fail; |
626 |
|
traceray(xpos, ypos) /* print requested pixel data */ |
627 |
|
int xpos, ypos; |
628 |
|
{ |
629 |
< |
extern char *index(); |
635 |
< |
FLOAT hv[2]; |
629 |
> |
RREAL hv[2]; |
630 |
|
FVECT rorg, rdir; |
631 |
|
COLOR cval; |
632 |
|
register char *cp; |
633 |
|
|
634 |
< |
box.xmin = xpos; box.xsiz = 1; |
635 |
< |
box.ymin = ypos; box.ysiz = 1; |
634 |
> |
bbox.xmin = xpos; bbox.xsiz = 1; |
635 |
> |
bbox.ymin = ypos; bbox.ysiz = 1; |
636 |
|
avgbox(cval); |
637 |
|
scalecolor(cval, 1./exposure); |
638 |
|
pix2loc(hv, &inpres, xpos-xoff, ypos-yoff); |
674 |
|
XColor cvx; |
675 |
|
int com, n; |
676 |
|
double comp; |
677 |
< |
FLOAT hv[2]; |
677 |
> |
RREAL hv[2]; |
678 |
|
|
679 |
|
n = XLookupString(ekey, buf, sizeof(buf), NULL, NULL); |
680 |
|
if (n == 0) |
697 |
|
sprintf(buf, "%.3f", intens(cval)/exposure); |
698 |
|
break; |
699 |
|
case 'l': /* luminance */ |
700 |
< |
sprintf(buf, "%.0fL", luminance(cval)/exposure); |
700 |
> |
sprintf(buf, "%.1fL", luminance(cval)/exposure); |
701 |
|
break; |
702 |
|
case 'c': /* color */ |
703 |
|
comp = pow(2.0, (double)scale); |
708 |
|
break; |
709 |
|
} |
710 |
|
XDrawImageString(thedisplay, wind, ourgc, |
711 |
< |
box.xmin, box.ymin+box.ysiz, buf, strlen(buf)); |
711 |
> |
bbox.xmin, bbox.ymin+bbox.ysiz, buf, strlen(buf)); |
712 |
|
return(0); |
713 |
|
case 'i': /* identify (contour) */ |
714 |
|
if (ourras->pixels == NULL) |
770 |
|
sprintf(buf, "%+d", scale); |
771 |
|
remap: |
772 |
|
XDrawImageString(thedisplay, wind, ourgc, |
773 |
< |
box.xmin, box.ymin+box.ysiz, buf, strlen(buf)); |
773 |
> |
bbox.xmin, bbox.ymin+bbox.ysiz, buf, strlen(buf)); |
774 |
|
XFlush(thedisplay); |
775 |
< |
free(ourdata); |
775 |
> |
/* free(ourdata); This is done in XDestroyImage()! */ |
776 |
|
free_raster(ourras); |
777 |
|
getras(); |
778 |
|
/* fall through */ |
801 |
|
redraw(0, 0, width, height); |
802 |
|
return(0); |
803 |
|
case ' ': /* clear */ |
804 |
< |
redraw(box.xmin, box.ymin, box.xsiz, box.ysiz); |
804 |
> |
redraw(bbox.xmin, bbox.ymin, bbox.xsiz, bbox.ysiz); |
805 |
|
return(0); |
806 |
|
default: |
807 |
|
XBell(thedisplay, 0); |
835 |
|
} |
836 |
|
|
837 |
|
|
838 |
< |
getbox(ebut) /* get new box */ |
838 |
> |
getbox(ebut) /* get new bbox */ |
839 |
|
XButtonPressedEvent *ebut; |
840 |
|
{ |
841 |
|
XEvent e; |
842 |
|
|
843 |
|
XMaskEvent(thedisplay, ButtonReleaseMask|ButtonMotionMask, &e); |
844 |
|
while (e.type == MotionNotify) { |
845 |
< |
revbox(ebut->x, ebut->y, box.xmin = e.xmotion.x, box.ymin = e.xmotion.y); |
845 |
> |
revbox(ebut->x, ebut->y, bbox.xmin = e.xmotion.x, bbox.ymin = e.xmotion.y); |
846 |
|
XMaskEvent(thedisplay,ButtonReleaseMask|ButtonMotionMask,&e); |
847 |
< |
revbox(ebut->x, ebut->y, box.xmin, box.ymin); |
847 |
> |
revbox(ebut->x, ebut->y, bbox.xmin, bbox.ymin); |
848 |
|
} |
849 |
< |
box.xmin = e.xbutton.x<0 ? 0 : (e.xbutton.x>=width ? width-1 : e.xbutton.x); |
850 |
< |
box.ymin = e.xbutton.y<0 ? 0 : (e.xbutton.y>=height ? height-1 : e.xbutton.y); |
851 |
< |
if (box.xmin > ebut->x) { |
852 |
< |
box.xsiz = box.xmin - ebut->x + 1; |
853 |
< |
box.xmin = ebut->x; |
849 |
> |
bbox.xmin = e.xbutton.x<0 ? 0 : (e.xbutton.x>=width ? width-1 : e.xbutton.x); |
850 |
> |
bbox.ymin = e.xbutton.y<0 ? 0 : (e.xbutton.y>=height ? height-1 : e.xbutton.y); |
851 |
> |
if (bbox.xmin > ebut->x) { |
852 |
> |
bbox.xsiz = bbox.xmin - ebut->x + 1; |
853 |
> |
bbox.xmin = ebut->x; |
854 |
|
} else { |
855 |
< |
box.xsiz = ebut->x - box.xmin + 1; |
855 |
> |
bbox.xsiz = ebut->x - bbox.xmin + 1; |
856 |
|
} |
857 |
< |
if (box.ymin > ebut->y) { |
858 |
< |
box.ysiz = box.ymin - ebut->y + 1; |
859 |
< |
box.ymin = ebut->y; |
857 |
> |
if (bbox.ymin > ebut->y) { |
858 |
> |
bbox.ysiz = bbox.ymin - ebut->y + 1; |
859 |
> |
bbox.ymin = ebut->y; |
860 |
|
} else { |
861 |
< |
box.ysiz = ebut->y - box.ymin + 1; |
861 |
> |
bbox.ysiz = ebut->y - bbox.ymin + 1; |
862 |
|
} |
863 |
|
} |
864 |
|
|
882 |
|
} |
883 |
|
|
884 |
|
|
885 |
< |
revbox(x0, y0, x1, y1) /* draw box with reversed lines */ |
885 |
> |
revbox(x0, y0, x1, y1) /* draw bbox with reversed lines */ |
886 |
|
int x0, y0, x1, y1; |
887 |
|
{ |
888 |
|
revline(x0, y0, x1, y0); |
892 |
|
} |
893 |
|
|
894 |
|
|
895 |
< |
int |
895 |
> |
void |
896 |
|
colavg(scn, n, cavg) |
897 |
|
register COLR *scn; |
898 |
|
register int n; |
901 |
|
COLOR col; |
902 |
|
|
903 |
|
while (n--) { |
904 |
< |
colr_color(col, scn++); |
904 |
> |
colr_color(col, *scn++); |
905 |
|
addcolor(cavg, col); |
906 |
|
} |
907 |
|
} |
908 |
|
|
909 |
|
|
910 |
|
int |
911 |
< |
avgbox(cavg) /* average color over current box */ |
911 |
> |
avgbox(cavg) /* average color over current bbox */ |
912 |
|
COLOR cavg; |
913 |
|
{ |
914 |
|
double d; |
925 |
|
|
926 |
|
|
927 |
|
int |
928 |
< |
dobox(f, p) /* run function over box */ |
929 |
< |
int (*f)(); /* function to call for each subscan */ |
928 |
> |
dobox(f, p) /* run function over bbox */ |
929 |
> |
void (*f)(); /* function to call for each subscan */ |
930 |
|
char *p; /* pointer to private data */ |
931 |
|
{ |
932 |
|
int left, right, top, bottom; |
933 |
|
int y; |
934 |
|
|
935 |
< |
left = box.xmin - xoff; |
936 |
< |
right = left + box.xsiz; |
935 |
> |
left = bbox.xmin - xoff; |
936 |
> |
right = left + bbox.xsiz; |
937 |
|
if (left < 0) |
938 |
|
left = 0; |
939 |
|
if (right > xmax) |
940 |
|
right = xmax; |
941 |
|
if (left >= right) |
942 |
|
return(0); |
943 |
< |
top = box.ymin - yoff; |
944 |
< |
bottom = top + box.ysiz; |
943 |
> |
top = bbox.ymin - yoff; |
944 |
> |
bottom = top + bbox.ysiz; |
945 |
|
if (top < 0) |
946 |
|
top = 0; |
947 |
|
if (bottom > ymax) |
957 |
|
} |
958 |
|
|
959 |
|
|
960 |
< |
int |
960 |
> |
void |
961 |
|
addfix(scn, n) /* add fixation points to histogram */ |
962 |
|
COLR *scn; |
963 |
|
int n; |
1094 |
|
cerr[x] = err + errp; |
1095 |
|
} |
1096 |
|
} |
1097 |
< |
free((char *)cerr); |
1097 |
> |
free((void *)cerr); |
1098 |
|
} |
1099 |
|
|
1100 |
|
|
1137 |
|
errp = err; |
1138 |
|
ti = x*xmax/iconwidth; |
1139 |
|
copycolr(clr, scan[ti]); |
1140 |
< |
normcolrs(clr, 1, scale); |
1140 |
> |
normcolrs(&clr, 1, scale); |
1141 |
|
err += normbright(clr) + cerr[x]; |
1142 |
|
if (err > 127) |
1143 |
|
err -= 255; |
1153 |
|
getfull() /* get full (24-bit) data */ |
1154 |
|
{ |
1155 |
|
int y; |
1156 |
< |
register unsigned int4 *dp; |
1157 |
< |
register unsigned int2 *dph; |
1156 |
> |
register uint32 *dp; |
1157 |
> |
register uint16 *dph; |
1158 |
|
register int x; |
1159 |
|
/* initialize tone mapping */ |
1160 |
|
make_tonemap(); |
1161 |
|
/* read and convert file */ |
1162 |
< |
dp = (unsigned int4 *)ourdata; |
1163 |
< |
dph = (unsigned int2 *)ourdata; |
1162 |
> |
dp = (uint32 *)ourdata; |
1163 |
> |
dph = (uint16 *)ourdata; |
1164 |
|
for (y = 0; y < ymax; y++) { |
1165 |
|
getscan(y); |
1166 |
|
add2icon(y, scanline); |
1168 |
|
switch (ourras->image->blue_mask) { |
1169 |
|
case 0xff: /* 24-bit RGB */ |
1170 |
|
for (x = 0; x < xmax; x++) |
1171 |
< |
*dp++ = (unsigned int4)scanline[x][RED] << 16 | |
1172 |
< |
(unsigned int4)scanline[x][GRN] << 8 | |
1173 |
< |
(unsigned int4)scanline[x][BLU] ; |
1171 |
> |
*dp++ = (uint32)scanline[x][RED] << 16 | |
1172 |
> |
(uint32)scanline[x][GRN] << 8 | |
1173 |
> |
(uint32)scanline[x][BLU] ; |
1174 |
|
break; |
1175 |
|
case 0xff0000: /* 24-bit BGR */ |
1176 |
|
for (x = 0; x < xmax; x++) |
1177 |
< |
*dp++ = (unsigned int4)scanline[x][RED] | |
1178 |
< |
(unsigned int4)scanline[x][GRN] << 8 | |
1179 |
< |
(unsigned int4)scanline[x][BLU] << 16 ; |
1177 |
> |
*dp++ = (uint32)scanline[x][RED] | |
1178 |
> |
(uint32)scanline[x][GRN] << 8 | |
1179 |
> |
(uint32)scanline[x][BLU] << 16 ; |
1180 |
|
break; |
1181 |
|
#if 0 |
1182 |
|
case 0x1f: /* 15-bit RGB */ |
1232 |
|
tmap_colrs(scanline, xmax); |
1233 |
|
if (maxcolors < 256) |
1234 |
|
for (x = 0; x < xmax; x++) |
1235 |
< |
*dp++ = ((int4)scanline[x][GRN] * |
1235 |
> |
*dp++ = ((int32)scanline[x][GRN] * |
1236 |
|
maxcolors + maxcolors/2) >> 8; |
1237 |
|
else |
1238 |
|
for (x = 0; x < xmax; x++) |
1240 |
|
} |
1241 |
|
for (x = 0; x < maxcolors; x++) |
1242 |
|
clrtab[x][RED] = clrtab[x][GRN] = |
1243 |
< |
clrtab[x][BLU] = ((int4)x*256 + 128)/maxcolors; |
1243 |
> |
clrtab[x][BLU] = ((int32)x*256 + 128)/maxcolors; |
1244 |
|
} |
1245 |
|
|
1246 |
|
|
1253 |
|
/* initialize tone mapping */ |
1254 |
|
make_tonemap(); |
1255 |
|
/* make histogram */ |
1256 |
< |
if (new_histo((int4)xmax*ymax) == -1) |
1256 |
> |
if (new_histo((int32)xmax*ymax) == -1) |
1257 |
|
quiterr("cannot initialize histogram"); |
1258 |
|
for (y = 0; y < ymax; y++) { |
1259 |
|
if (getscan(y) < 0) |
1310 |
|
static int trunced = -1; /* truncated file? */ |
1311 |
|
skipit: |
1312 |
|
if (trunced >= 0 && y >= trunced) { |
1313 |
< |
bzero(scanline, xmax*sizeof(COLR)); |
1313 |
> |
memset(scanline, '\0', xmax*sizeof(COLR)); |
1314 |
|
return(-1); |
1315 |
|
} |
1316 |
|
if (y != cury) { |