| 1 | greg | 2.5 | /* Copyright (c) 1992 Regents of the University of California */ | 
| 2 | greg | 1.1 |  | 
| 3 |  |  | #ifndef lint | 
| 4 |  |  | static char SCCSid[] = "$SunId$ LBL"; | 
| 5 |  |  | #endif | 
| 6 |  |  |  | 
| 7 |  |  | /* | 
| 8 |  |  | *  pvalue.c - program to print pixel values. | 
| 9 |  |  | * | 
| 10 |  |  | *     4/23/86 | 
| 11 |  |  | */ | 
| 12 |  |  |  | 
| 13 | greg | 1.8 | #include  "standard.h" | 
| 14 | greg | 1.1 |  | 
| 15 |  |  | #include  "color.h" | 
| 16 |  |  |  | 
| 17 | greg | 1.8 | #include  "resolu.h" | 
| 18 |  |  |  | 
| 19 | greg | 2.5 | #define  min(a,b)               ((a)<(b)?(a):(b)) | 
| 20 | greg | 1.1 |  | 
| 21 | greg | 2.10 | /* what to put out (also RED, GRN, BLU) */ | 
| 22 |  |  | #define  ALL            3 | 
| 23 |  |  | #define  BRIGHT         4 | 
| 24 |  |  |  | 
| 25 |  |  | #define  brightonly     (putprim==BRIGHT) | 
| 26 |  |  |  | 
| 27 | greg | 2.5 | RESOLU  picres;                 /* resolution of picture */ | 
| 28 | greg | 1.1 |  | 
| 29 | greg | 1.6 | int  uniq = 0;                  /* print only unique values? */ | 
| 30 | greg | 1.1 |  | 
| 31 | greg | 2.7 | int  doexposure = 0;            /* exposure change? (>100 to print) */ | 
| 32 | greg | 1.1 |  | 
| 33 |  |  | int  dataonly = 0;              /* data only format? */ | 
| 34 |  |  |  | 
| 35 | greg | 2.10 | int  putprim = ALL;             /* what to put out */ | 
| 36 | greg | 1.1 |  | 
| 37 |  |  | int  reverse = 0;               /* reverse conversion? */ | 
| 38 |  |  |  | 
| 39 |  |  | int  format = 'a';              /* input/output format */ | 
| 40 | greg | 1.6 | char  *fmtid = "ascii";         /* format identifier for header */ | 
| 41 | greg | 1.1 |  | 
| 42 | greg | 2.3 | int  header = 1;                /* do header? */ | 
| 43 | greg | 1.1 |  | 
| 44 | greg | 2.10 | long  skipbytes = 0;            /* skip bytes in input? */ | 
| 45 |  |  |  | 
| 46 | greg | 2.3 | int  resolution = 1;            /* put/get resolution string? */ | 
| 47 |  |  |  | 
| 48 | greg | 2.7 | int  original = 0;              /* convert to original values? */ | 
| 49 |  |  |  | 
| 50 | greg | 1.6 | int  wrongformat = 0;           /* wrong input format? */ | 
| 51 |  |  |  | 
| 52 | greg | 2.5 | double  gamcor = 1.0;           /* gamma correction */ | 
| 53 | greg | 1.7 |  | 
| 54 | greg | 2.4 | int  ord[3] = {RED, GRN, BLU};  /* RGB ordering */ | 
| 55 |  |  | int  rord[4];                   /* reverse ordering */ | 
| 56 |  |  |  | 
| 57 | greg | 1.5 | COLOR  exposure = WHTCOLOR; | 
| 58 | greg | 1.1 |  | 
| 59 |  |  | char  *progname; | 
| 60 |  |  |  | 
| 61 |  |  | FILE  *fin; | 
| 62 | greg | 2.10 | FILE  *fin2 = NULL, *fin3 = NULL;       /* for other color channels */ | 
| 63 | greg | 1.1 |  | 
| 64 |  |  | int  (*getval)(), (*putval)(); | 
| 65 |  |  |  | 
| 66 |  |  |  | 
| 67 |  |  | main(argc, argv) | 
| 68 |  |  | int  argc; | 
| 69 |  |  | char  **argv; | 
| 70 |  |  | { | 
| 71 |  |  | extern int  checkhead(); | 
| 72 | greg | 2.10 | extern long  atol(); | 
| 73 | greg | 2.7 | double  d, expval = 1.0; | 
| 74 | greg | 1.1 | int  i; | 
| 75 |  |  |  | 
| 76 |  |  | progname = argv[0]; | 
| 77 |  |  |  | 
| 78 |  |  | for (i = 1; i < argc; i++) | 
| 79 | greg | 1.8 | if (argv[i][0] == '-' || argv[i][0] == '+') | 
| 80 | greg | 1.1 | switch (argv[i][1]) { | 
| 81 | greg | 1.8 | case 'h':               /* header */ | 
| 82 |  |  | header = argv[i][0] == '+'; | 
| 83 | greg | 1.1 | break; | 
| 84 | greg | 2.3 | case 'H':               /* resolution string */ | 
| 85 |  |  | resolution = argv[i][0] == '+'; | 
| 86 |  |  | break; | 
| 87 | greg | 2.10 | case 's':               /* skip bytes in header */ | 
| 88 |  |  | skipbytes = atol(argv[++i]); | 
| 89 |  |  | break; | 
| 90 | greg | 1.1 | case 'u':               /* unique values */ | 
| 91 | greg | 1.8 | uniq = argv[i][0] == '-'; | 
| 92 | greg | 1.1 | break; | 
| 93 |  |  | case 'o':               /* original values */ | 
| 94 | greg | 1.8 | original = argv[i][0] == '-'; | 
| 95 | greg | 1.1 | break; | 
| 96 | greg | 1.7 | case 'g':               /* gamma correction */ | 
| 97 | greg | 2.7 | gamcor = atof(argv[i+1]); | 
| 98 | greg | 1.8 | if (argv[i][0] == '+') | 
| 99 |  |  | gamcor = 1.0/gamcor; | 
| 100 | greg | 2.7 | i++; | 
| 101 | greg | 1.7 | break; | 
| 102 | greg | 2.7 | case 'e':               /* exposure correction */ | 
| 103 |  |  | d = atof(argv[i+1]); | 
| 104 |  |  | if (argv[i+1][0] == '-' || argv[i+1][0] == '+') | 
| 105 |  |  | d = pow(2.0, d); | 
| 106 |  |  | if (argv[i][0] == '-') | 
| 107 | greg | 2.9 | expval *= d; | 
| 108 | greg | 2.7 | scalecolor(exposure, d); | 
| 109 |  |  | doexposure++; | 
| 110 |  |  | i++; | 
| 111 |  |  | break; | 
| 112 | greg | 2.4 | case 'R':               /* reverse byte sequence */ | 
| 113 |  |  | if (argv[i][0] == '-') { | 
| 114 |  |  | ord[0]=BLU; ord[1]=GRN; ord[2]=RED; | 
| 115 |  |  | } else { | 
| 116 |  |  | ord[0]=RED; ord[1]=GRN; ord[2]=BLU; | 
| 117 |  |  | } | 
| 118 |  |  | break; | 
| 119 | greg | 1.1 | case 'r':               /* reverse conversion */ | 
| 120 | greg | 1.8 | reverse = argv[i][0] == '-'; | 
| 121 | greg | 1.1 | break; | 
| 122 |  |  | case 'b':               /* brightness values */ | 
| 123 | greg | 2.10 | putprim = argv[i][0] == '-' ? BRIGHT : ALL; | 
| 124 | greg | 1.1 | break; | 
| 125 | greg | 2.10 | case 'p':               /* put primary */ | 
| 126 |  |  | switch (argv[i][2]) { | 
| 127 |  |  | case 'r': case 'R': putprim = RED; break; | 
| 128 |  |  | case 'g': case 'G': putprim = GRN; break; | 
| 129 |  |  | case 'b': case 'B': putprim = BLU; break; | 
| 130 |  |  | default: goto unkopt; | 
| 131 |  |  | } | 
| 132 |  |  | break; | 
| 133 | greg | 1.1 | case 'd':               /* data only (no indices) */ | 
| 134 | greg | 1.8 | dataonly = argv[i][0] == '-'; | 
| 135 | greg | 1.1 | switch (argv[i][2]) { | 
| 136 |  |  | case '\0': | 
| 137 |  |  | case 'a':               /* ascii */ | 
| 138 |  |  | format = 'a'; | 
| 139 | greg | 1.6 | fmtid = "ascii"; | 
| 140 | greg | 1.1 | break; | 
| 141 |  |  | case 'i':               /* integer */ | 
| 142 | greg | 1.6 | format = 'i'; | 
| 143 |  |  | fmtid = "ascii"; | 
| 144 |  |  | break; | 
| 145 | greg | 1.1 | case 'b':               /* byte */ | 
| 146 | greg | 1.8 | dataonly = 1; | 
| 147 | greg | 1.6 | format = 'b'; | 
| 148 |  |  | fmtid = "byte"; | 
| 149 |  |  | break; | 
| 150 | greg | 1.1 | case 'f':               /* float */ | 
| 151 | greg | 1.8 | dataonly = 1; | 
| 152 | greg | 1.6 | format = 'f'; | 
| 153 |  |  | fmtid = "float"; | 
| 154 |  |  | break; | 
| 155 | greg | 1.1 | case 'd':               /* double */ | 
| 156 | greg | 1.8 | dataonly = 1; | 
| 157 | greg | 1.6 | format = 'd'; | 
| 158 |  |  | fmtid = "double"; | 
| 159 | greg | 1.1 | break; | 
| 160 |  |  | default: | 
| 161 |  |  | goto unkopt; | 
| 162 |  |  | } | 
| 163 |  |  | break; | 
| 164 |  |  | case 'x':               /* x resolution */ | 
| 165 | greg | 2.6 | case 'X':               /* x resolution */ | 
| 166 | greg | 2.3 | resolution = 0; | 
| 167 | greg | 1.8 | if (argv[i][0] == '-') | 
| 168 |  |  | picres.or |= XDECR; | 
| 169 |  |  | picres.xr = atoi(argv[++i]); | 
| 170 | greg | 1.1 | break; | 
| 171 |  |  | case 'y':               /* y resolution */ | 
| 172 | greg | 2.6 | case 'Y':               /* y resolution */ | 
| 173 | greg | 2.3 | resolution = 0; | 
| 174 | greg | 1.8 | if (argv[i][0] == '-') | 
| 175 |  |  | picres.or |= YDECR; | 
| 176 |  |  | if (picres.xr == 0) | 
| 177 |  |  | picres.or |= YMAJOR; | 
| 178 |  |  | picres.yr = atoi(argv[++i]); | 
| 179 | greg | 1.1 | break; | 
| 180 |  |  | default: | 
| 181 |  |  | unkopt: | 
| 182 |  |  | fprintf(stderr, "%s: unknown option: %s\n", | 
| 183 |  |  | progname, argv[i]); | 
| 184 |  |  | quit(1); | 
| 185 |  |  | break; | 
| 186 |  |  | } | 
| 187 |  |  | else | 
| 188 |  |  | break; | 
| 189 | greg | 1.6 | /* recognize special formats */ | 
| 190 |  |  | if (dataonly && format == 'b') | 
| 191 |  |  | if (brightonly) | 
| 192 |  |  | fmtid = "8-bit_grey"; | 
| 193 |  |  | else | 
| 194 |  |  | fmtid = "24-bit_rgb"; | 
| 195 | greg | 2.4 | /* assign reverse ordering */ | 
| 196 |  |  | rord[ord[0]] = 0; | 
| 197 |  |  | rord[ord[1]] = 1; | 
| 198 |  |  | rord[ord[2]] = 2; | 
| 199 |  |  | /* get input */ | 
| 200 | greg | 1.1 | if (i == argc) { | 
| 201 |  |  | fin = stdin; | 
| 202 | greg | 2.10 | } else if (i < argc) { | 
| 203 | greg | 1.1 | if ((fin = fopen(argv[i], "r")) == NULL) { | 
| 204 |  |  | fprintf(stderr, "%s: can't open file \"%s\"\n", | 
| 205 |  |  | progname, argv[i]); | 
| 206 |  |  | quit(1); | 
| 207 |  |  | } | 
| 208 | greg | 2.10 | if (skipbytes && fseek(fin, skipbytes, 0)) | 
| 209 |  |  | goto seekerr; | 
| 210 |  |  | if (reverse && !brightonly && i == argc-3) { | 
| 211 |  |  | if ((fin2 = fopen(argv[i+1], "r")) == NULL) { | 
| 212 |  |  | fprintf(stderr, "%s: can't open file \"%s\"\n", | 
| 213 |  |  | progname, argv[i+1]); | 
| 214 |  |  | quit(1); | 
| 215 |  |  | } | 
| 216 |  |  | if ((fin3 = fopen(argv[i+2], "r")) == NULL) { | 
| 217 |  |  | fprintf(stderr, "%s: can't open file \"%s\"\n", | 
| 218 |  |  | progname, argv[i+2]); | 
| 219 |  |  | quit(1); | 
| 220 |  |  | } | 
| 221 |  |  | if (skipbytes && (fseek(fin2, skipbytes, 0) || | 
| 222 |  |  | fseek(fin3, skipbytes, 0))) | 
| 223 |  |  | goto seekerr; | 
| 224 |  |  | } else if (i != argc-1) | 
| 225 |  |  | fin = NULL; | 
| 226 |  |  | } | 
| 227 |  |  | if (fin == NULL) { | 
| 228 | greg | 1.1 | fprintf(stderr, "%s: bad # file arguments\n", progname); | 
| 229 |  |  | quit(1); | 
| 230 |  |  | } | 
| 231 |  |  |  | 
| 232 |  |  | set_io(); | 
| 233 |  |  |  | 
| 234 |  |  | if (reverse) { | 
| 235 | greg | 2.5 | #ifdef MSDOS | 
| 236 |  |  | setmode(fileno(stdout), O_BINARY); | 
| 237 |  |  | if (format != 'a' && format != 'i') | 
| 238 |  |  | setmode(fileno(fin), O_BINARY); | 
| 239 |  |  | #endif | 
| 240 | greg | 1.6 | /* get header */ | 
| 241 | greg | 2.8 | if (header) { | 
| 242 |  |  | if (checkheader(fin, fmtid, stdout) < 0) { | 
| 243 |  |  | fprintf(stderr, "%s: wrong input format\n", | 
| 244 |  |  | progname); | 
| 245 |  |  | quit(1); | 
| 246 |  |  | } | 
| 247 | greg | 2.10 | if (fin2 != NULL) { | 
| 248 |  |  | getheader(fin2, NULL, NULL); | 
| 249 |  |  | getheader(fin3, NULL, NULL); | 
| 250 |  |  | } | 
| 251 | greg | 2.8 | } else | 
| 252 |  |  | newheader("RADIANCE", stdout); | 
| 253 | greg | 2.3 | /* get resolution */ | 
| 254 |  |  | if ((resolution && !fgetsresolu(&picres, fin)) || | 
| 255 |  |  | picres.xr <= 0 || picres.yr <= 0) { | 
| 256 |  |  | fprintf(stderr, "%s: missing resolution\n", progname); | 
| 257 |  |  | quit(1); | 
| 258 |  |  | } | 
| 259 | greg | 2.10 | if (resolution && fin2 != NULL) { | 
| 260 |  |  | RESOLU  pres2; | 
| 261 |  |  | if (!fgetsresolu(&pres2, fin2) || | 
| 262 |  |  | pres2.or != picres.or || | 
| 263 |  |  | pres2.xr != picres.xr || | 
| 264 |  |  | pres2.yr != picres.yr || | 
| 265 |  |  | !fgetsresolu(&pres2, fin3) || | 
| 266 |  |  | pres2.or != picres.or || | 
| 267 |  |  | pres2.xr != picres.xr || | 
| 268 |  |  | pres2.yr != picres.yr) { | 
| 269 |  |  | fprintf(stderr, "%s: resolution mismatch\n", | 
| 270 |  |  | progname); | 
| 271 |  |  | quit(1); | 
| 272 |  |  | } | 
| 273 |  |  | } | 
| 274 | greg | 1.6 | /* add to header */ | 
| 275 |  |  | printargs(i, argv, stdout); | 
| 276 | greg | 2.9 | if (expval < .99 || expval > 1.01) | 
| 277 | greg | 2.7 | fputexpos(expval, stdout); | 
| 278 | greg | 1.6 | fputformat(COLRFMT, stdout); | 
| 279 | greg | 1.8 | putchar('\n'); | 
| 280 | greg | 2.3 | fputsresolu(&picres, stdout);   /* always put resolution */ | 
| 281 | greg | 1.1 | valtopix(); | 
| 282 |  |  | } else { | 
| 283 | greg | 2.5 | #ifdef MSDOS | 
| 284 |  |  | setmode(fileno(fin), O_BINARY); | 
| 285 |  |  | if (format != 'a' && format != 'i') | 
| 286 |  |  | setmode(fileno(stdout), O_BINARY); | 
| 287 |  |  | #endif | 
| 288 | greg | 1.1 | /* get header */ | 
| 289 | greg | 1.6 | getheader(fin, checkhead, NULL); | 
| 290 |  |  | if (wrongformat) { | 
| 291 |  |  | fprintf(stderr, "%s: input not a Radiance picture\n", | 
| 292 |  |  | progname); | 
| 293 |  |  | quit(1); | 
| 294 |  |  | } | 
| 295 | greg | 2.3 | if (!fgetsresolu(&picres, fin)) { | 
| 296 |  |  | fprintf(stderr, "%s: missing resolution\n", progname); | 
| 297 |  |  | quit(1); | 
| 298 |  |  | } | 
| 299 | greg | 1.1 | if (header) { | 
| 300 |  |  | printargs(i, argv, stdout); | 
| 301 | greg | 2.9 | if (expval < .99 || expval > 1.01) | 
| 302 | greg | 2.7 | fputexpos(expval, stdout); | 
| 303 | greg | 1.6 | fputformat(fmtid, stdout); | 
| 304 | greg | 1.8 | putchar('\n'); | 
| 305 | greg | 1.1 | } | 
| 306 | greg | 2.3 | if (resolution)                 /* put resolution */ | 
| 307 |  |  | fputsresolu(&picres, stdout); | 
| 308 | greg | 1.1 | pixtoval(); | 
| 309 |  |  | } | 
| 310 |  |  |  | 
| 311 |  |  | quit(0); | 
| 312 | greg | 2.10 | seekerr: | 
| 313 |  |  | fprintf(stderr, "%s: cannot skip %ld bytes on input\n", | 
| 314 |  |  | progname, skipbytes); | 
| 315 |  |  | quit(1); | 
| 316 | greg | 1.1 | } | 
| 317 |  |  |  | 
| 318 |  |  |  | 
| 319 |  |  | checkhead(line)                         /* deal with line from header */ | 
| 320 |  |  | char  *line; | 
| 321 |  |  | { | 
| 322 | greg | 1.6 | char    fmt[32]; | 
| 323 | greg | 1.5 | double  d; | 
| 324 |  |  | COLOR   ctmp; | 
| 325 |  |  |  | 
| 326 | greg | 2.8 | if (formatval(fmt, line)) | 
| 327 | greg | 1.6 | wrongformat = strcmp(fmt, COLRFMT); | 
| 328 | greg | 2.8 | else if (original && isexpos(line)) { | 
| 329 | greg | 1.5 | d = 1.0/exposval(line); | 
| 330 |  |  | scalecolor(exposure, d); | 
| 331 | greg | 2.7 | doexposure++; | 
| 332 | greg | 1.6 | } else if (original && iscolcor(line)) { | 
| 333 | greg | 1.5 | colcorval(ctmp, line); | 
| 334 | greg | 1.7 | setcolor(exposure, colval(exposure,RED)/colval(ctmp,RED), | 
| 335 |  |  | colval(exposure,GRN)/colval(ctmp,GRN), | 
| 336 |  |  | colval(exposure,BLU)/colval(ctmp,BLU)); | 
| 337 | greg | 2.7 | doexposure++; | 
| 338 | greg | 1.6 | } else if (header) | 
| 339 |  |  | fputs(line, stdout); | 
| 340 | greg | 1.1 | } | 
| 341 |  |  |  | 
| 342 |  |  |  | 
| 343 |  |  | pixtoval()                              /* convert picture to values */ | 
| 344 |  |  | { | 
| 345 | greg | 2.5 | register COLOR  *scanln; | 
| 346 | greg | 1.7 | int  dogamma; | 
| 347 | greg | 1.1 | COLOR  lastc; | 
| 348 | greg | 1.8 | FLOAT  hv[2]; | 
| 349 | greg | 1.1 | int  y; | 
| 350 |  |  | register int  x; | 
| 351 |  |  |  | 
| 352 | greg | 1.8 | scanln = (COLOR *)malloc(scanlen(&picres)*sizeof(COLOR)); | 
| 353 | greg | 1.1 | if (scanln == NULL) { | 
| 354 |  |  | fprintf(stderr, "%s: out of memory\n", progname); | 
| 355 |  |  | quit(1); | 
| 356 |  |  | } | 
| 357 | greg | 1.8 | dogamma = gamcor < .95 || gamcor > 1.05; | 
| 358 | greg | 1.1 | setcolor(lastc, 0.0, 0.0, 0.0); | 
| 359 | greg | 1.8 | for (y = 0; y < numscans(&picres); y++) { | 
| 360 |  |  | if (freadscan(scanln, scanlen(&picres), fin) < 0) { | 
| 361 | greg | 1.1 | fprintf(stderr, "%s: read error\n", progname); | 
| 362 |  |  | quit(1); | 
| 363 |  |  | } | 
| 364 | greg | 1.8 | for (x = 0; x < scanlen(&picres); x++) { | 
| 365 | greg | 1.1 | if (uniq) | 
| 366 | greg | 1.7 | if (    colval(scanln[x],RED) == | 
| 367 |  |  | colval(lastc,RED) && | 
| 368 |  |  | colval(scanln[x],GRN) == | 
| 369 |  |  | colval(lastc,GRN) && | 
| 370 |  |  | colval(scanln[x],BLU) == | 
| 371 |  |  | colval(lastc,BLU)       ) | 
| 372 | greg | 1.1 | continue; | 
| 373 |  |  | else | 
| 374 |  |  | copycolor(lastc, scanln[x]); | 
| 375 | greg | 2.7 | if (doexposure) | 
| 376 | greg | 1.5 | multcolor(scanln[x], exposure); | 
| 377 | greg | 1.7 | if (dogamma) | 
| 378 |  |  | setcolor(scanln[x], | 
| 379 | greg | 1.8 | pow(colval(scanln[x],RED), 1.0/gamcor), | 
| 380 |  |  | pow(colval(scanln[x],GRN), 1.0/gamcor), | 
| 381 |  |  | pow(colval(scanln[x],BLU), 1.0/gamcor)); | 
| 382 |  |  | if (!dataonly) { | 
| 383 |  |  | pix2loc(hv, &picres, x, y); | 
| 384 |  |  | printf("%7d %7d ", (int)(hv[0]*picres.xr), | 
| 385 |  |  | (int)(hv[1]*picres.yr)); | 
| 386 |  |  | } | 
| 387 | greg | 1.1 | if ((*putval)(scanln[x], stdout) < 0) { | 
| 388 |  |  | fprintf(stderr, "%s: write error\n", progname); | 
| 389 |  |  | quit(1); | 
| 390 |  |  | } | 
| 391 |  |  | } | 
| 392 |  |  | } | 
| 393 |  |  | free((char *)scanln); | 
| 394 |  |  | } | 
| 395 |  |  |  | 
| 396 |  |  |  | 
| 397 |  |  | valtopix()                      /* convert values to a pixel file */ | 
| 398 |  |  | { | 
| 399 | greg | 1.7 | int  dogamma; | 
| 400 | greg | 2.5 | register COLOR  *scanln; | 
| 401 | greg | 1.1 | int  y; | 
| 402 |  |  | register int  x; | 
| 403 |  |  |  | 
| 404 | greg | 1.8 | scanln = (COLOR *)malloc(scanlen(&picres)*sizeof(COLOR)); | 
| 405 | greg | 1.1 | if (scanln == NULL) { | 
| 406 |  |  | fprintf(stderr, "%s: out of memory\n", progname); | 
| 407 |  |  | quit(1); | 
| 408 |  |  | } | 
| 409 | greg | 1.8 | dogamma = gamcor < .95 || gamcor > 1.05; | 
| 410 |  |  | for (y = 0; y < numscans(&picres); y++) { | 
| 411 |  |  | for (x = 0; x < scanlen(&picres); x++) { | 
| 412 | greg | 2.10 | if (!dataonly) { | 
| 413 | greg | 1.1 | fscanf(fin, "%*d %*d"); | 
| 414 | greg | 2.10 | if (fin2 != NULL) { | 
| 415 |  |  | fscanf(fin2, "%*d %*d"); | 
| 416 |  |  | fscanf(fin3, "%*d %*d"); | 
| 417 |  |  | } | 
| 418 |  |  | } | 
| 419 |  |  | if ((*getval)(scanln[x], fin, fin2, fin3) < 0) { | 
| 420 | greg | 1.1 | fprintf(stderr, "%s: read error\n", progname); | 
| 421 |  |  | quit(1); | 
| 422 |  |  | } | 
| 423 | greg | 1.7 | if (dogamma) | 
| 424 |  |  | setcolor(scanln[x], | 
| 425 | greg | 1.8 | pow(colval(scanln[x],RED), gamcor), | 
| 426 |  |  | pow(colval(scanln[x],GRN), gamcor), | 
| 427 |  |  | pow(colval(scanln[x],BLU), gamcor)); | 
| 428 | greg | 2.7 | if (doexposure) | 
| 429 |  |  | multcolor(scanln[x], exposure); | 
| 430 | greg | 1.1 | } | 
| 431 | greg | 1.8 | if (fwritescan(scanln, scanlen(&picres), stdout) < 0) { | 
| 432 | greg | 1.1 | fprintf(stderr, "%s: write error\n", progname); | 
| 433 |  |  | quit(1); | 
| 434 |  |  | } | 
| 435 |  |  | } | 
| 436 |  |  | free((char *)scanln); | 
| 437 |  |  | } | 
| 438 |  |  |  | 
| 439 |  |  |  | 
| 440 |  |  | quit(code) | 
| 441 |  |  | int  code; | 
| 442 |  |  | { | 
| 443 |  |  | exit(code); | 
| 444 |  |  | } | 
| 445 |  |  |  | 
| 446 |  |  |  | 
| 447 | greg | 2.10 | getcascii(col, f1, f2, f3)      /* get an ascii color value from stream(s) */ | 
| 448 | greg | 1.1 | COLOR  col; | 
| 449 | greg | 2.10 | FILE  *f1, *f2, *f3; | 
| 450 | greg | 1.1 | { | 
| 451 | greg | 2.5 | double  vd[3]; | 
| 452 | greg | 1.1 |  | 
| 453 | greg | 2.10 | if (f2 == NULL) { | 
| 454 |  |  | if (fscanf(f1, "%lf %lf %lf", &vd[0], &vd[1], &vd[2]) != 3) | 
| 455 |  |  | return(-1); | 
| 456 |  |  | } else { | 
| 457 |  |  | if (fscanf(f1, "%lf", &vd[0]) != 1 || | 
| 458 |  |  | fscanf(f2, "%lf", &vd[1]) != 1 || | 
| 459 |  |  | fscanf(f3, "%lf", &vd[2]) != 1) | 
| 460 |  |  | return(-1); | 
| 461 |  |  | } | 
| 462 | greg | 2.4 | setcolor(col, vd[rord[RED]], vd[rord[GRN]], vd[rord[BLU]]); | 
| 463 | greg | 1.1 | return(0); | 
| 464 |  |  | } | 
| 465 |  |  |  | 
| 466 |  |  |  | 
| 467 | greg | 2.10 | getcdouble(col, f1, f2, f3)     /* get a double color value from stream(s) */ | 
| 468 | greg | 1.1 | COLOR  col; | 
| 469 | greg | 2.10 | FILE  *f1, *f2, *f3; | 
| 470 | greg | 1.1 | { | 
| 471 | greg | 2.5 | double  vd[3]; | 
| 472 | greg | 1.1 |  | 
| 473 | greg | 2.10 | if (f2 == NULL) { | 
| 474 |  |  | if (fread((char *)vd, sizeof(double), 3, f1) != 3) | 
| 475 |  |  | return(-1); | 
| 476 |  |  | } else { | 
| 477 |  |  | if (fread((char *)vd, sizeof(double), 1, f1) != 1 || | 
| 478 |  |  | fread((char *)(vd+1), sizeof(double), 1, f2) != 1 || | 
| 479 |  |  | fread((char *)(vd+2), sizeof(double), 1, f3) != 1) | 
| 480 |  |  | return(-1); | 
| 481 |  |  | } | 
| 482 | greg | 2.4 | setcolor(col, vd[rord[RED]], vd[rord[GRN]], vd[rord[BLU]]); | 
| 483 | greg | 1.1 | return(0); | 
| 484 |  |  | } | 
| 485 |  |  |  | 
| 486 |  |  |  | 
| 487 | greg | 2.10 | getcfloat(col, f1, f2, f3)      /* get a float color value from stream(s) */ | 
| 488 | greg | 1.1 | COLOR  col; | 
| 489 | greg | 2.10 | FILE  *f1, *f2, *f3; | 
| 490 | greg | 1.1 | { | 
| 491 |  |  | float  vf[3]; | 
| 492 |  |  |  | 
| 493 | greg | 2.10 | if (f2 == NULL) { | 
| 494 |  |  | if (fread((char *)vf, sizeof(float), 3, f1) != 3) | 
| 495 |  |  | return(-1); | 
| 496 |  |  | } else { | 
| 497 |  |  | if (fread((char *)vf, sizeof(float), 1, f1) != 1 || | 
| 498 |  |  | fread((char *)(vf+1), sizeof(float), 1, f2) != 1 || | 
| 499 |  |  | fread((char *)(vf+2), sizeof(float), 1, f3) != 1) | 
| 500 |  |  | return(-1); | 
| 501 |  |  | } | 
| 502 | greg | 2.4 | setcolor(col, vf[rord[RED]], vf[rord[GRN]], vf[rord[BLU]]); | 
| 503 | greg | 1.1 | return(0); | 
| 504 |  |  | } | 
| 505 |  |  |  | 
| 506 |  |  |  | 
| 507 | greg | 2.10 | getcint(col, f1, f2, f3)        /* get an int color value from stream(s) */ | 
| 508 | greg | 1.1 | COLOR  col; | 
| 509 | greg | 2.10 | FILE  *f1, *f2, *f3; | 
| 510 | greg | 1.1 | { | 
| 511 |  |  | int  vi[3]; | 
| 512 |  |  |  | 
| 513 | greg | 2.10 | if (f2 == NULL) { | 
| 514 |  |  | if (fscanf(f1, "%d %d %d", &vi[0], &vi[1], &vi[2]) != 3) | 
| 515 |  |  | return(-1); | 
| 516 |  |  | } else { | 
| 517 |  |  | if (fscanf(f1, "%d", &vi[0]) != 1 || | 
| 518 |  |  | fscanf(f2, "%d", &vi[1]) != 1 || | 
| 519 |  |  | fscanf(f3, "%d", &vi[2]) != 1) | 
| 520 |  |  | return(-1); | 
| 521 |  |  | } | 
| 522 | greg | 2.4 | setcolor(col, (vi[rord[RED]]+.5)/256., | 
| 523 |  |  | (vi[rord[GRN]]+.5)/256., (vi[rord[BLU]]+.5)/256.); | 
| 524 | greg | 1.1 | return(0); | 
| 525 |  |  | } | 
| 526 |  |  |  | 
| 527 |  |  |  | 
| 528 | greg | 2.10 | getcbyte(col, f1, f2, f3)       /* get a byte color value from stream(s) */ | 
| 529 | greg | 1.1 | COLOR  col; | 
| 530 | greg | 2.10 | FILE  *f1, *f2, *f3; | 
| 531 | greg | 1.1 | { | 
| 532 |  |  | BYTE  vb[3]; | 
| 533 |  |  |  | 
| 534 | greg | 2.10 | if (f2 == NULL) { | 
| 535 |  |  | if (fread((char *)vb, sizeof(BYTE), 3, f1) != 3) | 
| 536 |  |  | return(-1); | 
| 537 |  |  | } else { | 
| 538 |  |  | if (fread((char *)vb, sizeof(BYTE), 1, f1) != 1 || | 
| 539 |  |  | fread((char *)(vb+1), sizeof(BYTE), 1, f2) != 1 || | 
| 540 |  |  | fread((char *)(vb+2), sizeof(BYTE), 1, f3) != 1) | 
| 541 |  |  | return(-1); | 
| 542 |  |  | } | 
| 543 | greg | 2.4 | setcolor(col, (vb[rord[RED]]+.5)/256., | 
| 544 |  |  | (vb[rord[GRN]]+.5)/256., (vb[rord[BLU]]+.5)/256.); | 
| 545 | greg | 1.1 | return(0); | 
| 546 |  |  | } | 
| 547 |  |  |  | 
| 548 |  |  |  | 
| 549 |  |  | getbascii(col, fp)              /* get an ascii brightness value from fp */ | 
| 550 |  |  | COLOR  col; | 
| 551 |  |  | FILE  *fp; | 
| 552 |  |  | { | 
| 553 | greg | 2.5 | double  vd; | 
| 554 | greg | 1.1 |  | 
| 555 |  |  | if (fscanf(fp, "%lf", &vd) != 1) | 
| 556 |  |  | return(-1); | 
| 557 |  |  | setcolor(col, vd, vd, vd); | 
| 558 |  |  | return(0); | 
| 559 |  |  | } | 
| 560 |  |  |  | 
| 561 |  |  |  | 
| 562 |  |  | getbdouble(col, fp)             /* get a double brightness value from fp */ | 
| 563 |  |  | COLOR  col; | 
| 564 |  |  | FILE  *fp; | 
| 565 |  |  | { | 
| 566 | greg | 2.5 | double  vd; | 
| 567 | greg | 1.1 |  | 
| 568 | greg | 1.4 | if (fread((char *)&vd, sizeof(double), 1, fp) != 1) | 
| 569 | greg | 1.1 | return(-1); | 
| 570 |  |  | setcolor(col, vd, vd, vd); | 
| 571 |  |  | return(0); | 
| 572 |  |  | } | 
| 573 |  |  |  | 
| 574 |  |  |  | 
| 575 |  |  | getbfloat(col, fp)              /* get a float brightness value from fp */ | 
| 576 |  |  | COLOR  col; | 
| 577 |  |  | FILE  *fp; | 
| 578 |  |  | { | 
| 579 |  |  | float  vf; | 
| 580 |  |  |  | 
| 581 | greg | 1.4 | if (fread((char *)&vf, sizeof(float), 1, fp) != 1) | 
| 582 | greg | 1.1 | return(-1); | 
| 583 |  |  | setcolor(col, vf, vf, vf); | 
| 584 |  |  | return(0); | 
| 585 |  |  | } | 
| 586 |  |  |  | 
| 587 |  |  |  | 
| 588 |  |  | getbint(col, fp)                /* get an int brightness value from fp */ | 
| 589 |  |  | COLOR  col; | 
| 590 |  |  | FILE  *fp; | 
| 591 |  |  | { | 
| 592 |  |  | int  vi; | 
| 593 | greg | 2.5 | double  d; | 
| 594 | greg | 1.1 |  | 
| 595 |  |  | if (fscanf(fp, "%d", &vi) != 1) | 
| 596 |  |  | return(-1); | 
| 597 |  |  | d = (vi+.5)/256.; | 
| 598 |  |  | setcolor(col, d, d, d); | 
| 599 |  |  | return(0); | 
| 600 |  |  | } | 
| 601 |  |  |  | 
| 602 |  |  |  | 
| 603 |  |  | getbbyte(col, fp)               /* get a byte brightness value from fp */ | 
| 604 |  |  | COLOR  col; | 
| 605 |  |  | FILE  *fp; | 
| 606 |  |  | { | 
| 607 |  |  | BYTE  vb; | 
| 608 | greg | 2.5 | double  d; | 
| 609 | greg | 1.1 |  | 
| 610 | greg | 1.4 | if (fread((char *)&vb, sizeof(BYTE), 1, fp) != 1) | 
| 611 | greg | 1.1 | return(-1); | 
| 612 |  |  | d = (vb+.5)/256.; | 
| 613 |  |  | setcolor(col, d, d, d); | 
| 614 |  |  | return(0); | 
| 615 |  |  | } | 
| 616 |  |  |  | 
| 617 |  |  |  | 
| 618 |  |  | putcascii(col, fp)                      /* put an ascii color to fp */ | 
| 619 |  |  | COLOR  col; | 
| 620 |  |  | FILE  *fp; | 
| 621 |  |  | { | 
| 622 |  |  | fprintf(fp, "%15.3e %15.3e %15.3e\n", | 
| 623 | greg | 2.4 | colval(col,ord[0]), | 
| 624 |  |  | colval(col,ord[1]), | 
| 625 |  |  | colval(col,ord[2])); | 
| 626 | greg | 1.1 |  | 
| 627 |  |  | return(ferror(fp) ? -1 : 0); | 
| 628 |  |  | } | 
| 629 |  |  |  | 
| 630 |  |  |  | 
| 631 |  |  | putcfloat(col, fp)                      /* put a float color to fp */ | 
| 632 |  |  | COLOR  col; | 
| 633 |  |  | FILE  *fp; | 
| 634 |  |  | { | 
| 635 |  |  | float  vf[3]; | 
| 636 |  |  |  | 
| 637 | greg | 2.4 | vf[0] = colval(col,ord[0]); | 
| 638 |  |  | vf[1] = colval(col,ord[1]); | 
| 639 |  |  | vf[2] = colval(col,ord[2]); | 
| 640 | greg | 1.4 | fwrite((char *)vf, sizeof(float), 3, fp); | 
| 641 | greg | 1.1 |  | 
| 642 |  |  | return(ferror(fp) ? -1 : 0); | 
| 643 |  |  | } | 
| 644 |  |  |  | 
| 645 |  |  |  | 
| 646 |  |  | putcdouble(col, fp)                     /* put a double color to fp */ | 
| 647 |  |  | COLOR  col; | 
| 648 |  |  | FILE  *fp; | 
| 649 |  |  | { | 
| 650 | greg | 2.5 | double  vd[3]; | 
| 651 | greg | 1.1 |  | 
| 652 | greg | 2.4 | vd[0] = colval(col,ord[0]); | 
| 653 |  |  | vd[1] = colval(col,ord[1]); | 
| 654 |  |  | vd[2] = colval(col,ord[2]); | 
| 655 | greg | 1.4 | fwrite((char *)vd, sizeof(double), 3, fp); | 
| 656 | greg | 1.1 |  | 
| 657 |  |  | return(ferror(fp) ? -1 : 0); | 
| 658 |  |  | } | 
| 659 |  |  |  | 
| 660 |  |  |  | 
| 661 |  |  | putcint(col, fp)                        /* put an int color to fp */ | 
| 662 |  |  | COLOR  col; | 
| 663 |  |  | FILE  *fp; | 
| 664 |  |  | { | 
| 665 |  |  | fprintf(fp, "%d %d %d\n", | 
| 666 | greg | 2.4 | (int)(colval(col,ord[0])*256.), | 
| 667 |  |  | (int)(colval(col,ord[1])*256.), | 
| 668 |  |  | (int)(colval(col,ord[2])*256.)); | 
| 669 | greg | 1.1 |  | 
| 670 |  |  | return(ferror(fp) ? -1 : 0); | 
| 671 |  |  | } | 
| 672 |  |  |  | 
| 673 |  |  |  | 
| 674 |  |  | putcbyte(col, fp)                       /* put a byte color to fp */ | 
| 675 |  |  | COLOR  col; | 
| 676 |  |  | FILE  *fp; | 
| 677 |  |  | { | 
| 678 |  |  | register int  i; | 
| 679 |  |  | BYTE  vb[3]; | 
| 680 |  |  |  | 
| 681 | greg | 2.4 | i = colval(col,ord[0])*256.; | 
| 682 | greg | 1.1 | vb[0] = min(i,255); | 
| 683 | greg | 2.4 | i = colval(col,ord[1])*256.; | 
| 684 | greg | 1.1 | vb[1] = min(i,255); | 
| 685 | greg | 2.4 | i = colval(col,ord[2])*256.; | 
| 686 | greg | 1.1 | vb[2] = min(i,255); | 
| 687 | greg | 1.4 | fwrite((char *)vb, sizeof(BYTE), 3, fp); | 
| 688 | greg | 1.1 |  | 
| 689 |  |  | return(ferror(fp) ? -1 : 0); | 
| 690 |  |  | } | 
| 691 |  |  |  | 
| 692 |  |  |  | 
| 693 |  |  | putbascii(col, fp)                      /* put an ascii brightness to fp */ | 
| 694 |  |  | COLOR  col; | 
| 695 |  |  | FILE  *fp; | 
| 696 |  |  | { | 
| 697 |  |  | fprintf(fp, "%15.3e\n", bright(col)); | 
| 698 |  |  |  | 
| 699 |  |  | return(ferror(fp) ? -1 : 0); | 
| 700 |  |  | } | 
| 701 |  |  |  | 
| 702 |  |  |  | 
| 703 |  |  | putbfloat(col, fp)                      /* put a float brightness to fp */ | 
| 704 |  |  | COLOR  col; | 
| 705 |  |  | FILE  *fp; | 
| 706 |  |  | { | 
| 707 |  |  | float  vf; | 
| 708 |  |  |  | 
| 709 |  |  | vf = bright(col); | 
| 710 | greg | 1.4 | fwrite((char *)&vf, sizeof(float), 1, fp); | 
| 711 | greg | 1.1 |  | 
| 712 |  |  | return(ferror(fp) ? -1 : 0); | 
| 713 |  |  | } | 
| 714 |  |  |  | 
| 715 |  |  |  | 
| 716 |  |  | putbdouble(col, fp)                     /* put a double brightness to fp */ | 
| 717 |  |  | COLOR  col; | 
| 718 |  |  | FILE  *fp; | 
| 719 |  |  | { | 
| 720 | greg | 2.5 | double  vd; | 
| 721 | greg | 1.1 |  | 
| 722 |  |  | vd = bright(col); | 
| 723 | greg | 1.4 | fwrite((char *)&vd, sizeof(double), 1, fp); | 
| 724 | greg | 1.1 |  | 
| 725 |  |  | return(ferror(fp) ? -1 : 0); | 
| 726 |  |  | } | 
| 727 |  |  |  | 
| 728 |  |  |  | 
| 729 |  |  | putbint(col, fp)                        /* put an int brightness to fp */ | 
| 730 |  |  | COLOR  col; | 
| 731 |  |  | FILE  *fp; | 
| 732 |  |  | { | 
| 733 |  |  | fprintf(fp, "%d\n", (int)(bright(col)*256.)); | 
| 734 |  |  |  | 
| 735 |  |  | return(ferror(fp) ? -1 : 0); | 
| 736 |  |  | } | 
| 737 |  |  |  | 
| 738 |  |  |  | 
| 739 |  |  | putbbyte(col, fp)                       /* put a byte brightness to fp */ | 
| 740 |  |  | COLOR  col; | 
| 741 |  |  | FILE  *fp; | 
| 742 |  |  | { | 
| 743 |  |  | register int  i; | 
| 744 |  |  | BYTE  vb; | 
| 745 |  |  |  | 
| 746 |  |  | i = bright(col)*256.; | 
| 747 |  |  | vb = min(i,255); | 
| 748 | greg | 1.4 | fwrite((char *)&vb, sizeof(BYTE), 1, fp); | 
| 749 | greg | 1.1 |  | 
| 750 |  |  | return(ferror(fp) ? -1 : 0); | 
| 751 |  |  | } | 
| 752 |  |  |  | 
| 753 |  |  |  | 
| 754 | greg | 2.10 | putpascii(col, fp)                      /* put an ascii primary to fp */ | 
| 755 |  |  | COLOR  col; | 
| 756 |  |  | FILE  *fp; | 
| 757 |  |  | { | 
| 758 |  |  | fprintf(fp, "%15.3e\n", colval(col,putprim)); | 
| 759 |  |  |  | 
| 760 |  |  | return(ferror(fp) ? -1 : 0); | 
| 761 |  |  | } | 
| 762 |  |  |  | 
| 763 |  |  |  | 
| 764 |  |  | putpfloat(col, fp)                      /* put a float primary to fp */ | 
| 765 |  |  | COLOR  col; | 
| 766 |  |  | FILE  *fp; | 
| 767 |  |  | { | 
| 768 |  |  | float  vf; | 
| 769 |  |  |  | 
| 770 |  |  | vf = colval(col,putprim); | 
| 771 |  |  | fwrite((char *)&vf, sizeof(float), 1, fp); | 
| 772 |  |  |  | 
| 773 |  |  | return(ferror(fp) ? -1 : 0); | 
| 774 |  |  | } | 
| 775 |  |  |  | 
| 776 |  |  |  | 
| 777 |  |  | putpdouble(col, fp)                     /* put a double primary to fp */ | 
| 778 |  |  | COLOR  col; | 
| 779 |  |  | FILE  *fp; | 
| 780 |  |  | { | 
| 781 |  |  | double  vd; | 
| 782 |  |  |  | 
| 783 |  |  | vd = colval(col,putprim); | 
| 784 |  |  | fwrite((char *)&vd, sizeof(double), 1, fp); | 
| 785 |  |  |  | 
| 786 |  |  | return(ferror(fp) ? -1 : 0); | 
| 787 |  |  | } | 
| 788 |  |  |  | 
| 789 |  |  |  | 
| 790 |  |  | putpint(col, fp)                        /* put an int primary to fp */ | 
| 791 |  |  | COLOR  col; | 
| 792 |  |  | FILE  *fp; | 
| 793 |  |  | { | 
| 794 |  |  | fprintf(fp, "%d\n", (int)(colval(col,putprim)*256.)); | 
| 795 |  |  |  | 
| 796 |  |  | return(ferror(fp) ? -1 : 0); | 
| 797 |  |  | } | 
| 798 |  |  |  | 
| 799 |  |  |  | 
| 800 |  |  | putpbyte(col, fp)                       /* put a byte primary to fp */ | 
| 801 |  |  | COLOR  col; | 
| 802 |  |  | FILE  *fp; | 
| 803 |  |  | { | 
| 804 |  |  | register int  i; | 
| 805 |  |  | BYTE  vb; | 
| 806 |  |  |  | 
| 807 |  |  | i = colval(col,putprim)*256.; | 
| 808 |  |  | vb = min(i,255); | 
| 809 |  |  | fwrite((char *)&vb, sizeof(BYTE), 1, fp); | 
| 810 |  |  |  | 
| 811 |  |  | return(ferror(fp) ? -1 : 0); | 
| 812 |  |  | } | 
| 813 |  |  |  | 
| 814 |  |  |  | 
| 815 | greg | 1.1 | set_io()                        /* set put and get functions */ | 
| 816 |  |  | { | 
| 817 |  |  | switch (format) { | 
| 818 |  |  | case 'a':                                       /* ascii */ | 
| 819 | greg | 2.10 | if (putprim == BRIGHT) { | 
| 820 | greg | 1.1 | getval = getbascii; | 
| 821 |  |  | putval = putbascii; | 
| 822 | greg | 2.10 | } else if (putprim != ALL) { | 
| 823 |  |  | getval = getbascii; | 
| 824 |  |  | putval = putpascii; | 
| 825 | greg | 1.1 | } else { | 
| 826 |  |  | getval = getcascii; | 
| 827 |  |  | putval = putcascii; | 
| 828 |  |  | } | 
| 829 |  |  | return; | 
| 830 |  |  | case 'f':                                       /* binary float */ | 
| 831 | greg | 2.10 | if (putprim == BRIGHT) { | 
| 832 | greg | 1.1 | getval = getbfloat; | 
| 833 |  |  | putval = putbfloat; | 
| 834 | greg | 2.10 | } else if (putprim != ALL) { | 
| 835 |  |  | getval = getbfloat; | 
| 836 |  |  | putval = putpfloat; | 
| 837 | greg | 1.1 | } else { | 
| 838 |  |  | getval = getcfloat; | 
| 839 |  |  | putval = putcfloat; | 
| 840 |  |  | } | 
| 841 |  |  | return; | 
| 842 |  |  | case 'd':                                       /* binary double */ | 
| 843 | greg | 2.10 | if (putprim == BRIGHT) { | 
| 844 | greg | 1.1 | getval = getbdouble; | 
| 845 |  |  | putval = putbdouble; | 
| 846 | greg | 2.10 | } else if (putprim != ALL) { | 
| 847 |  |  | getval = getbdouble; | 
| 848 |  |  | putval = putpdouble; | 
| 849 | greg | 1.1 | } else { | 
| 850 |  |  | getval = getcdouble; | 
| 851 |  |  | putval = putcdouble; | 
| 852 |  |  | } | 
| 853 |  |  | return; | 
| 854 |  |  | case 'i':                                       /* integer */ | 
| 855 | greg | 2.10 | if (putprim == BRIGHT) { | 
| 856 | greg | 1.1 | getval = getbint; | 
| 857 |  |  | putval = putbint; | 
| 858 | greg | 2.10 | } else if (putprim != ALL) { | 
| 859 |  |  | getval = getbint; | 
| 860 |  |  | putval = putpint; | 
| 861 | greg | 1.1 | } else { | 
| 862 |  |  | getval = getcint; | 
| 863 |  |  | putval = putcint; | 
| 864 |  |  | } | 
| 865 |  |  | return; | 
| 866 |  |  | case 'b':                                       /* byte */ | 
| 867 | greg | 2.10 | if (putprim == BRIGHT) { | 
| 868 | greg | 1.1 | getval = getbbyte; | 
| 869 |  |  | putval = putbbyte; | 
| 870 | greg | 2.10 | } else if (putprim != ALL) { | 
| 871 |  |  | getval = getbbyte; | 
| 872 |  |  | putval = putpbyte; | 
| 873 | greg | 1.1 | } else { | 
| 874 |  |  | getval = getcbyte; | 
| 875 |  |  | putval = putcbyte; | 
| 876 |  |  | } | 
| 877 |  |  | return; | 
| 878 |  |  | } | 
| 879 |  |  | } |