ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/src/px/pfilt.c
(Generate patch)

Comparing src/px/pfilt.c (file contents):
Revision 1.9 by greg, Tue Jan 9 17:58:35 1990 UTC vs.
Revision 2.4 by greg, Mon Sep 21 12:14:17 1992 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1986 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 12 | Line 12 | static char SCCSid[] = "$SunId$ LBL";
12  
13   #include  <stdio.h>
14  
15 + #ifdef MSDOS
16 + #include  <fcntl.h>
17 + #endif
18 +
19   #include  <signal.h>
20  
21   #include  "color.h"
22  
23 + #include  "resolu.h"
24 +
25 + #include  "paths.h"
26 +
27   extern char  *malloc();
28 + extern float  *matchlamp();
29  
30 < #define  CHECKRAD       1.5     /* radius to check for filtering */
30 > #define  FEQ(a,b)       ((a) >= .98*(b) && (a) <= 1.02*(b))
31  
32 + #define  CHECKRAD       1.5     /* radius to check for filtering */
33 +
34   COLOR  exposure = WHTCOLOR;     /* exposure for the frame */
35  
36 < double  rad = 0.0;              /* output pixel radius for filtering */
36 > double  rad = 0.0;              /* output pixel radius for filtering */
37  
38   int  nrows = 0;                 /* number of rows for output */
39   int  ncols = 0;                 /* number of columns for output */
40  
41 < double  x_c = 1.0;              /* ratio of output x size to input */
42 < double  y_r = 1.0;              /* ratio of output y size to input */
41 > double  x_c = 1.0;              /* ratio of output x size to input */
42 > double  y_r = 1.0;              /* ratio of output y size to input */
43  
44   int  singlepass = 0;            /* true means skip first pass */
45  
46   int  avghot = 0;                /* true means average in bright spots */
47  
48 < double  hotlvl = 1000.0;        /* level considered "hot" */
48 > double  hotlvl = 1000.0;        /* level considered "hot" */
49  
50   int  npts = 0;                  /* (half) number of points for stars */
51  
52 < double  spread = 1e-4;          /* spread for star points */
52 > double  spread = 1e-4;          /* spread for star points */
53  
43 – #define  TEMPLATE       "/usr/tmp/pfXXXXXX"
44 –
54   char  *tfname = NULL;
55  
56 + char  *lampdat = "lamp.tab";    /* lamp data file */
57 +
58 + int  order;                     /* scanline ordering of input */
59   int  xres, yres;                /* resolution of input */
60 < double  inpaspect = 1.0;        /* pixel aspect ratio of input */
60 > double  inpaspect = 1.0;        /* pixel aspect ratio of input */
61 > int  correctaspect = 0;         /* aspect ratio correction? */
62  
63 + int  wrongformat = 0;
64 +
65   int  xrad;                      /* x window size */
66   int  yrad;                      /* y window size */
67  
# Line 61 | Line 76 | main(argc, argv)
76   int  argc;
77   char  **argv;
78   {
79 <        extern char  *mktemp();
65 <        extern double  atof(), pow();
79 >        extern double  pow();
80          extern long  ftell();
81          extern int  quit(), headline();
82          FILE  *fin;
83 +        float  *lampcolor;
84 +        char  *lamptype = NULL;
85          long  fpos;
86 <        double  outaspect = 0.0;
87 <        double  d;
88 <        int  i;
89 <
86 >        double  outaspect = 0.0;
87 >        double  d;
88 >        int  i, j;
89 > #ifdef MSDOS
90 >        extern int  _fmode;
91 >        _fmode = O_BINARY;
92 >        setmode(fileno(stdin), O_BINARY);
93 >        setmode(fileno(stdout), O_BINARY);
94 > #endif
95          if (signal(SIGINT, quit) == SIG_IGN)
96                  signal(SIGINT, SIG_IGN);
97          if (signal(SIGHUP, quit) == SIG_IGN)
98                  signal(SIGINT, SIG_IGN);
99          signal(SIGTERM, quit);
100          signal(SIGPIPE, quit);
101 < #ifdef  SIGXCPU
101 > #ifdef  SIGXCPU
102          signal(SIGXCPU, quit);
103          signal(SIGXFSZ, quit);
104   #endif
# Line 103 | Line 124 | char  **argv;
124                                  } else
125                                          nrows = atoi(argv[i]);
126                                  break;
127 +                        case 'c':
128 +                                correctaspect = !correctaspect;
129 +                                break;
130                          case 'p':
131                                  i++;
132                                  outaspect = atof(argv[i]);
# Line 112 | Line 136 | char  **argv;
136                                          d = pow(2.0, atof(argv[i+1]));
137                                  else
138                                          d = atof(argv[i+1]);
139 +                                if (d < 1e-20 || d > 1e20) {
140 +                                        fprintf(stderr,
141 +                                                "%s: exposure out of range\n",
142 +                                                        argv[0]);
143 +                                        exit(1);
144 +                                }
145                                  switch (argv[i][2]) {
146                                  case '\0':
147                                          scalecolor(exposure, d);
# Line 130 | Line 160 | char  **argv;
160                                  }
161                                  i++;
162                                  break;
163 +                        case 'f':
164 +                                lampdat = argv[++i];
165 +                                break;
166 +                        case 't':
167 +                                lamptype = argv[++i];
168 +                                break;
169                          case '1':
170                                  singlepass = 1;
171                                  break;
# Line 163 | Line 199 | char  **argv;
199                          }
200                  else
201                          break;
202 <                        
202 >                                        /* get lamp data (if necessary) */
203 >        if (lamptype != NULL) {
204 >                if (loadlamps(lampdat) < 0)
205 >                        quit(1);
206 >                if ((lampcolor = matchlamp(lamptype)) == NULL) {
207 >                        fprintf(stderr, "%s: unknown lamp type\n", lamptype);
208 >                        quit(1);
209 >                }
210 >                for (i = 0; i < 3; i++)
211 >                        if (lampcolor[i] > 1e-4)
212 >                                colval(exposure,i) /= lampcolor[i];
213 >                freelamps();
214 >        }
215 >                                        /* open input file */
216          if (i == argc) {
217                  if (singlepass)
218                          fin = stdin;
# Line 191 | Line 240 | char  **argv;
240                  quit(1);
241          }
242                                          /* get header */
243 <        getheader(fin, headline);
243 >        getheader(fin, headline, NULL);
244 >        if (wrongformat) {
245 >                fprintf(stderr, "%s: input must be a Radiance picture\n",
246 >                                progname);
247 >                quit(1);
248 >        }
249                                          /* add new header info. */
250          printargs(i, argv, stdout);
251                                          /* get picture size */
252 <        if (fgetresolu(&xres, &yres, fin) != (YMAJOR|YDECR)) {
252 >        if ((order = fgetresolu(&xres, &yres, fin)) < 0) {
253                  fprintf(stderr, "%s: bad picture size\n", progname);
254                  quit(1);
255          }
256 +        if (!(order & YMAJOR))
257 +                inpaspect = 1.0/inpaspect;
258                                          /* compute output resolution */
259          if (ncols <= 0)
260                  ncols = x_c*xres + .5;
# Line 237 | Line 293 | char  **argv;
293   headline(s)                             /* process line from header */
294   char  *s;
295   {
296 +        char  fmt[32];
297 +
298          fputs(s, stdout);               /* copy to output */
299          if (isaspect(s))                /* get aspect ratio */
300                  inpaspect *= aspectval(s);
301 +        else if (isformat(s)) {
302 +                formatval(fmt, s);
303 +                wrongformat = strcmp(fmt, COLRFMT);
304 +        }
305   }
306  
307  
# Line 281 | Line 343 | FILE  *in;
343                          fprintf(stderr, "%s: warning - partial frame (%d%%)\n",
344                                          progname, 100*i/yres);
345                          yres = i;
346 +                        y_r = (double)nrows/yres;
347                          break;
348                  }
349                  pass1scan(scan, i);
# Line 295 | Line 358 | FILE  *in;
358          int  yread;
359          int  ycent, xcent;
360          int  r, c;
361 <        
361 >        
362          pass2init();
363          scan2init();
364          yread = 0;
# Line 326 | Line 389 | FILE  *in;
389                          quit(1);
390                  }
391          }
392 +                                        /* skip leftovers */
393 +        while (yread < yres) {
394 +                if (freadscan(scanin[0], xres, in) < 0)
395 +                        break;
396 +                yread++;
397 +        }
398   }
399  
400  
401   scan2init()                     /* prepare scanline arrays */
402   {
403 <        double  d;
403 >        COLOR   ctmp;
404 >        double  d;
405          register int  i;
406  
407          if (rad <= 0.0) {
# Line 346 | Line 416 | scan2init()                    /* prepare scanline arrays */
416  
417                  initmask();             /* initialize filter table */
418          }
419 <        barsize = 2 * yrad;
419 >        barsize = 2*yrad + 1;
420          scanin = (COLOR **)malloc(barsize*sizeof(COLOR *));
421          for (i = 0; i < barsize; i++) {
422                  scanin[i] = (COLOR *)malloc(xres*sizeof(COLOR));
# Line 360 | Line 430 | scan2init()                    /* prepare scanline arrays */
430                  fprintf(stderr, "%s: out of memory\n", progname);
431                  quit(1);
432          }
433 <                                        /* record pixel aspect and exposure */
434 <        d = x_c / y_r;
435 <        if (d < .99 || d > 1.01)
436 <                fputaspect(d, stdout);
433 >                                        /* record pixel aspect ratio */
434 >        if (!correctaspect) {
435 >                d = order & YMAJOR ? x_c/y_r : y_r/x_c ;
436 >                if (!FEQ(d,1.0))
437 >                        fputaspect(d, stdout);
438 >        }
439 >                                        /* record exposure */
440          d = bright(exposure);
441 <        if (d < .995 || d > 1.005)
441 >        if (!FEQ(d,1.0))
442                  fputexpos(d, stdout);
443 +                                        /* record color correction */
444 +        copycolor(ctmp, exposure);
445 +        scalecolor(ctmp, 1.0/d);
446 +        if (!FEQ(colval(ctmp,RED),colval(ctmp,GRN)) ||
447 +                        !FEQ(colval(ctmp,GRN),colval(ctmp,BLU)))
448 +                fputcolcor(ctmp, stdout);
449          printf("\n");
450 <        fputresolu(YMAJOR|YDECR, ncols, nrows, stdout); /* resolution */
450 >                                        /* write out resolution */
451 >        fputresolu(order, ncols, nrows, stdout);
452   }
453  
454  

Diff Legend

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