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

Comparing ray/src/px/pcompos.c (file contents):
Revision 1.7 by greg, Thu May 30 09:44:36 1991 UTC vs.
Revision 2.30 by greg, Wed May 25 04:44:26 2005 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1991 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   *  pcompos.c - program to composite pictures.
6   *
# Line 11 | Line 8 | static char SCCSid[] = "$SunId$ LBL";
8   */
9  
10   #include  <stdio.h>
11 + #include  <math.h>
12 + #include  <time.h>
13 + #include  <string.h>
14  
15 + #include "copyright.h"
16 +
17 + #include  "platform.h"
18 + #include  "rtprocess.h"
19 + #include  "rterror.h"
20   #include  "color.h"
21 + #include  "resolu.h"
22  
23 + #define  MAXFILE        512
24  
25 < #define  MAXFILE        32
25 > #define  HASMIN         1
26 > #define  HASMAX         2
27  
20 – #define  SIGNHT         24
21 – #define  setpscom(b,n)  sprintf(b, "psign -h %d '%.30s'|pfilt -1 -x /2 -y /2",\
22 –                                2*SIGNHT, n)
23 –
28                                          /* output picture size */
29   int  xsiz = 0;
30   int  ysiz = 0;
# Line 32 | Line 36 | int  ymax = 0;
36  
37   COLR  bgcolr = BLKCOLR;                 /* background color */
38  
39 + int  labelht = 24;                      /* label height */
40 +
41   int  checkthresh = 0;                   /* check threshold value */
42  
43 + char  StandardInput[] = "<stdin>";
44 + char  Command[] = "<Command>";
45 + char  Label[] = "<Label>";
46 +
47   char  *progname;
48  
49   struct {
# Line 41 | Line 51 | struct {
51          FILE  *fp;                      /* stream pointer */
52          int  xres, yres;                /* picture size */
53          int  xloc, yloc;                /* anchor point */
54 <        int  hasmin, hasmax;            /* has threshold values */
54 >        int  flags;                     /* HASMIN, HASMAX */
55          COLR  thmin, thmax;             /* thresholds */
56   } input[MAXFILE];               /* our input files */
57  
58   int  nfile;                     /* number of files */
59  
60 + char  ourfmt[LPICFMT+1] = PICFMT;
61   int  wrongformat = 0;
62  
52 – char  tmpbuf[128];
63  
64 < FILE  *popen();
64 > static gethfunc tabputs;
65 > static void compos(void);
66 > static int cmpcolr(COLR  c1, COLR  c2);
67 > static FILE * lblopen(char  *s, int  *xp, int  *yp);
68  
69  
70 < tabputs(s)                      /* print line preceded by a tab */
71 < char  *s;
70 >
71 > static int
72 > tabputs(                        /* print line preceded by a tab */
73 >        char    *s,
74 >        void    *p
75 > )
76   {
77          char  fmt[32];
78  
79 <        if (isformat(s)) {
80 <                formatval(fmt, s);
81 <                wrongformat = strcmp(fmt, COLRFMT);
79 >        if (isheadid(s))
80 >                return(0);
81 >        if (formatval(fmt, s)) {
82 >                if (globmatch(ourfmt, fmt)) {
83 >                        wrongformat = 0;
84 >                        strcpy(ourfmt, fmt);
85 >                } else
86 >                        wrongformat = 1;
87          } else {
88                  putc('\t', stdout);
89                  fputs(s, stdout);
90          }
91 +        return(0);
92   }
93  
94  
95 < main(argc, argv)
96 < int  argc;
97 < char  *argv[];
95 > int
96 > main(
97 >        int  argc,
98 >        char  *argv[]
99 > )
100   {
76 –        double  atof();
101          int  ncolumns = 0;
102 <        int  dolabels = 0;
103 <        int  curcol = 0, curx = 0, cury = 0;
102 >        int  autolabel = 0;
103 >        int  curcol = 0, x0 = 0, curx = 0, cury = 0, spacing = 0;
104 >        int  xsgn, ysgn;
105 >        char  *thislabel;
106          int  an;
107 <
107 >        SET_DEFAULT_BINARY();
108 >        SET_FILE_BINARY(stdin);
109 >        SET_FILE_BINARY(stdout);
110          progname = argv[0];
111  
112          for (an = 1; an < argc && argv[an][0] == '-'; an++)
113                  switch (argv[an][1]) {
114                  case 'x':
115 <                        xmax = xsiz = atoi(argv[++an]);
115 >                        xsiz = atoi(argv[++an]);
116                          break;
117                  case 'y':
118 <                        ymax = ysiz = atoi(argv[++an]);
118 >                        ysiz = atoi(argv[++an]);
119                          break;
120                  case 'b':
121                          setcolr(bgcolr, atof(argv[an+1]),
# Line 98 | Line 126 | char  *argv[];
126                  case 'a':
127                          ncolumns = atoi(argv[++an]);
128                          break;
129 +                case 's':
130 +                        spacing = atoi(argv[++an]);
131 +                        break;
132 +                case 'o':
133 +                        curx = x0 = atoi(argv[++an]);
134 +                        cury = atoi(argv[++an]);
135 +                        break;
136                  case 'l':
137 <                        dolabels++;
137 >                        switch (argv[an][2]) {
138 >                        case 'a':
139 >                                autolabel++;
140 >                                break;
141 >                        case 'h':
142 >                                labelht = atoi(argv[++an]);
143 >                                break;
144 >                        case '\0':
145 >                                goto dofiles;
146 >                        default:
147 >                                goto userr;
148 >                        }
149                          break;
150                  case '\0':
151                  case 't':
# Line 108 | Line 154 | char  *argv[];
154                          goto userr;
155                  }
156   dofiles:
157 +        newheader("RADIANCE", stdout);
158 +        fputnow(stdout);
159          for (nfile = 0; an < argc; nfile++) {
160 <                if (dolabels) {
161 <                        if (nfile >= MAXFILE-1) {
162 <                                fprintf(stderr,
163 <                                "%s: only %d files allowed with labels\n",
164 <                                        progname, MAXFILE/2);
165 <                        }
166 <                } else {
119 <                        if (nfile >= MAXFILE) {
120 <                                fprintf(stderr, "%s: only %d files allowed\n",
121 <                                                progname, MAXFILE);
122 <                                quit(1);
123 <                        }
124 <                }
125 <                if (nfile >= (dolabels ? MAXFILE-1 : MAXFILE)) {
126 <                        fprintf(stderr, "%s: too many files\n", progname);
127 <                        quit(1);
128 <                }
129 <                input[nfile].hasmin = input[nfile].hasmax = 0;
130 <                while (an < argc && (argv[an][0] == '-' || argv[an][0] == '+'))
160 >                if (nfile >= MAXFILE)
161 >                        goto toomany;
162 >                thislabel = NULL;
163 >                input[nfile].flags = 0;
164 >                xsgn = ysgn = '-';
165 >                while (an < argc && (argv[an][0] == '-' || argv[an][0] == '+'
166 >                                || argv[an][0] == '=')) {
167                          switch (argv[an][1]) {
168                          case 't':
169                                  checkthresh = 1;
170                                  if (argv[an][0] == '-') {
171 <                                        input[nfile].hasmin = 1;
171 >                                        input[nfile].flags |= HASMIN;
172                                          setcolr(input[nfile].thmin,
173                                                          atof(argv[an+1]),
174                                                          atof(argv[an+1]),
175                                                          atof(argv[an+1]));
176 <                                } else {
177 <                                        input[nfile].hasmax = 1;
176 >                                } else if (argv[an][0] == '+') {
177 >                                        input[nfile].flags |= HASMAX;
178                                          setcolr(input[nfile].thmax,
179                                                          atof(argv[an+1]),
180                                                          atof(argv[an+1]),
181                                                          atof(argv[an+1]));
182 <                                }
183 <                                an += 2;
182 >                                } else
183 >                                        goto userr;
184 >                                an++;
185                                  break;
186 +                        case 'l':
187 +                                if (strcmp(argv[an], "-l"))
188 +                                        goto userr;
189 +                                thislabel = argv[++an];
190 +                                break;
191 +                        case '+':
192 +                        case '-':
193 +                        case '0':
194 +                                if (argv[an][0] != '=')
195 +                                        goto userr;
196 +                                xsgn = argv[an][1];
197 +                                ysgn = argv[an][2];
198 +                                if (ysgn != '+' && ysgn != '-' && ysgn != '0')
199 +                                        goto userr;
200 +                                break;
201                          case '\0':
202                                  if (argv[an][0] == '-')
203                                          goto getfile;
204 <                        /* fall through */
204 >                                goto userr;
205                          default:
206                                  goto userr;
207                          }
208 +                        an++;
209 +                }
210   getfile:
211                  if (argc-an < (ncolumns ? 1 : 3))
212                          goto userr;
213 +                if (autolabel && thislabel == NULL)
214 +                        thislabel = argv[an];
215                  if (!strcmp(argv[an], "-")) {
216 <                        input[nfile].name = "<stdin>";
216 >                        input[nfile].name = StandardInput;
217                          input[nfile].fp = stdin;
218                  } else {
219 <                        input[nfile].name = argv[an];
220 <                        if ((input[nfile].fp = argv[an][0] == '!' ?
221 <                                        popen(argv[an]+1, "r") :
222 <                                        fopen(argv[an], "r")) == NULL) {
219 >                        if (argv[an][0] == '!') {
220 >                                input[nfile].name = Command;
221 >                                input[nfile].fp = popen(argv[an]+1, "r");
222 >                        } else {
223 >                                input[nfile].name = argv[an];
224 >                                input[nfile].fp = fopen(argv[an], "r");
225 >                        }
226 >                        if (input[nfile].fp == NULL) {
227                                  perror(argv[an]);
228                                  quit(1);
229                          }
# Line 173 | Line 233 | getfile:
233                  printf("%s:\n", input[nfile].name);
234                  getheader(input[nfile].fp, tabputs, NULL);
235                  if (wrongformat) {
236 <                        fprintf(stderr, "%s: not a Radiance picture\n",
236 >                        fprintf(stderr, "%s: incompatible input format\n",
237                                          input[nfile].name);
238                          quit(1);
239                  }
240                                                  /* get picture size */
241                  if (fgetresolu(&input[nfile].xres, &input[nfile].yres,
242 <                                input[nfile].fp) != (YMAJOR|YDECR)) {
242 >                                input[nfile].fp) < 0) {
243                          fprintf(stderr, "%s: bad picture size\n",
244                                          input[nfile].name);
245                          quit(1);
246                  }
247                  if (ncolumns > 0) {
248                          if (curcol >= ncolumns) {
249 <                                cury = ymax;
250 <                                curx = 0;
249 >                                cury = ymax + spacing;
250 >                                curx = x0;
251                                  curcol = 0;
252                          }
253                          input[nfile].xloc = curx;
254                          input[nfile].yloc = cury;
255 <                        curx += input[nfile].xres;
255 >                        curx += input[nfile].xres + spacing;
256                          curcol++;
257                  } else {
258                          input[nfile].xloc = atoi(argv[an++]);
259 +                        if (xsgn == '+')
260 +                                input[nfile].xloc -= input[nfile].xres;
261 +                        else if (xsgn == '0')
262 +                                input[nfile].xloc -= input[nfile].xres/2;
263                          input[nfile].yloc = atoi(argv[an++]);
264 +                        if (ysgn == '+')
265 +                                input[nfile].yloc -= input[nfile].yres;
266 +                        else if (ysgn == '0')
267 +                                input[nfile].yloc -= input[nfile].yres/2;
268                  }
269                  if (input[nfile].xloc < xmin)
270                          xmin = input[nfile].xloc;
# Line 206 | Line 274 | getfile:
274                          xmax = input[nfile].xloc+input[nfile].xres;
275                  if (input[nfile].yloc+input[nfile].yres > ymax)
276                          ymax = input[nfile].yloc+input[nfile].yres;
277 <                if (dolabels) {
278 <                        input[++nfile].name = "<Label>";
279 <                        setpscom(tmpbuf, input[nfile-1].name);
280 <                        if ((input[nfile].fp = popen(tmpbuf, "r")) == NULL)
277 >                if (thislabel != NULL) {
278 >                        if (++nfile >= MAXFILE)
279 >                                goto toomany;
280 >                        input[nfile].name = Label;
281 >                        input[nfile].flags = 0;
282 >                        input[nfile].xres = input[nfile-1].xres;
283 >                        input[nfile].yres = labelht;
284 >                        if ((input[nfile].fp = lblopen(thislabel,
285 >                                        &input[nfile].xres,
286 >                                        &input[nfile].yres)) == NULL)
287                                  goto labelerr;
214 –                        if (checkheader(input[nfile].fp, COLRFMT, NULL) < 0)
215 –                                goto labelerr;
216 –                        if (fgetresolu(&input[nfile].xres, &input[nfile].yres,
217 –                                        input[nfile].fp) != (YMAJOR|YDECR))
218 –                                goto labelerr;
288                          input[nfile].xloc = input[nfile-1].xloc;
289                          input[nfile].yloc = input[nfile-1].yloc +
290 <                                        input[nfile-1].yres - SIGNHT;
222 <                        input[nfile].hasmin = input[nfile].hasmax = 0;
290 >                                        input[nfile-1].yres-input[nfile].yres;
291                  }
292          }
293          if (xsiz <= 0)
294                  xsiz = xmax;
295 +        else if (xsiz > xmax)
296 +                xmax = xsiz;
297          if (ysiz <= 0)
298                  ysiz = ymax;
299 +        else if (ysiz > ymax)
300 +                ymax = ysiz;
301                                          /* add new header info. */
302          printargs(argc, argv, stdout);
303 <        fputformat(COLRFMT, stdout);
304 <        printf("\n-Y %d +X %d\n", ysiz, xsiz);
303 >        if (strcmp(ourfmt, PICFMT))
304 >                fputformat(ourfmt, stdout);     /* print format if known */
305 >        putchar('\n');
306 >        fprtresolu(xsiz, ysiz, stdout);
307  
308          compos();
309          
310          quit(0);
311   userr:
312 <        fprintf(stderr, "Usage: %s [-x xres][-y yres][-b r g b] ", progname);
313 <        fprintf(stderr, "[-t min1][+t max1] file1 x1 y1 ..\n");
312 >        fprintf(stderr,
313 >        "Usage: %s [-x xr][-y yr][-b r g b][-a n][-s p][-o x0 y0][-la][-lh h] ",
314 >                        progname);
315 >        fprintf(stderr, "[-t min1][+t max1][-l lab][=SS] pic1 x1 y1 ..\n");
316          quit(1);
317 + toomany:
318 +        fprintf(stderr, "%s: only %d files and labels allowed\n",
319 +                        progname, MAXFILE);
320 +        quit(1);
321   labelerr:
322          fprintf(stderr, "%s: error opening label\n", progname);
323          quit(1);
324 +        return 1; /* pro forma return */
325   }
326  
327  
328 < compos()                                /* composite pictures */
328 > static void
329 > compos(void)                            /* composite pictures */
330   {
331          COLR  *scanin, *scanout;
332          int  y;
# Line 281 | Line 363 | compos()                               /* composite pictures */
363                                  if (x > xsiz)
364                                          x = xsiz;
365                                  for (x--; x >= 0 && x >= input[i].xloc; x--) {
366 <                                        if (input[i].hasmin &&
366 >                                        if (input[i].flags & HASMIN &&
367                                          cmpcolr(scanin[x], input[i].thmin) <= 0)
368                                                  continue;
369 <                                        if (input[i].hasmax &&
369 >                                        if (input[i].flags & HASMAX &&
370                                          cmpcolr(scanin[x], input[i].thmax) >= 0)
371                                                  continue;
372                                          copycolr(scanout[x], scanin[x]);
# Line 298 | Line 380 | compos()                               /* composite pictures */
380                          quit(1);
381                  }
382          }
383 +                                        /* read remainders from streams */
384 +        for (i = 0; i < nfile; i++)
385 +                if (input[i].name[0] == '<')
386 +                        while (getc(input[i].fp) != EOF)
387 +                                ;
388          return;
389   memerr:
390          perror(progname);
# Line 305 | Line 392 | memerr:
392   }
393  
394  
395 < int
396 < cmpcolr(c1, c2)                 /* compare two colr's (improvisation) */
397 < register COLR  c1, c2;
395 > static int
396 > cmpcolr(                        /* compare two colr's (improvisation) */
397 >        register COLR  c1,
398 >        register COLR  c2
399 > )
400   {
401          register int  i, j;
402  
403          j = 4;                          /* check exponents first! */
404          while (j--)
405 <                if (i = c1[j] - c2[j])
405 >                if ( (i = c1[j] - c2[j]) )
406                          return(i);
407          return(0);
408   }
409  
410  
411 + static FILE *
412 + lblopen(                /* open pipe to label generator */
413 +        char  *s,
414 +        int  *xp,
415 +        int  *yp
416 + )
417 + {
418 +        char  com[PATH_MAX];
419 +        FILE  *fp;
420 +
421 +        sprintf(com, "psign -s -.15 -a 2 -x %d -y %d '%.90s'", *xp, *yp, s);
422 +        if ((fp = popen(com, "r")) == NULL)
423 +                return(NULL);
424 +        if (checkheader(fp, COLRFMT, NULL) < 0)
425 +                goto err;
426 +        if (fgetresolu(xp, yp, fp) < 0)
427 +                goto err;
428 +        return(fp);
429 + err:
430 +        pclose(fp);
431 +        return(NULL);
432 + }
433 +
434 +
435 + void
436   quit(code)              /* exit gracefully */
437   int  code;
438   {
439 +        register int  i;
440 +                                /* close input files */
441 +        for (i = 0; i < nfile; i++)
442 +                if (input[i].name == Command || input[i].name == Label)
443 +                        pclose(input[i].fp);
444 +                else
445 +                        fclose(input[i].fp);
446          exit(code);
447   }

Diff Legend

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