ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/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.24 by schorsch, Sun Jul 27 22:12:03 2003 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  "color.h"
19 + #include  "resolu.h"
20  
21 + #define  MAXFILE        64
22  
23 < #define  MAXFILE        32
23 > #define  HASMIN         1
24 > #define  HASMAX         2
25  
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 –
26                                          /* output picture size */
27   int  xsiz = 0;
28   int  ysiz = 0;
# Line 32 | Line 34 | int  ymax = 0;
34  
35   COLR  bgcolr = BLKCOLR;                 /* background color */
36  
37 + int  labelht = 24;                      /* label height */
38 +
39   int  checkthresh = 0;                   /* check threshold value */
40  
41 + char  Command[] = "<Command>";
42 + char  Label[] = "<Label>";
43 +
44   char  *progname;
45  
46   struct {
# Line 41 | Line 48 | struct {
48          FILE  *fp;                      /* stream pointer */
49          int  xres, yres;                /* picture size */
50          int  xloc, yloc;                /* anchor point */
51 <        int  hasmin, hasmax;            /* has threshold values */
51 >        int  flags;                     /* HASMIN, HASMAX */
52          COLR  thmin, thmax;             /* thresholds */
53   } input[MAXFILE];               /* our input files */
54  
55   int  nfile;                     /* number of files */
56  
57 + char  ourfmt[LPICFMT+1] = PICFMT;
58   int  wrongformat = 0;
59  
60 < char  tmpbuf[128];
60 > FILE  *lblopen();
61 > void  quit();
62  
54 – FILE  *popen();
63  
56 –
64   tabputs(s)                      /* print line preceded by a tab */
65   char  *s;
66   {
67          char  fmt[32];
68  
69 <        if (isformat(s)) {
70 <                formatval(fmt, s);
71 <                wrongformat = strcmp(fmt, COLRFMT);
69 >        if (isheadid(s))
70 >                return(0);
71 >        if (formatval(fmt, s)) {
72 >                if (globmatch(ourfmt, fmt)) {
73 >                        wrongformat = 0;
74 >                        strcpy(ourfmt, fmt);
75 >                } else
76 >                        wrongformat = 1;
77          } else {
78                  putc('\t', stdout);
79                  fputs(s, stdout);
80          }
81 +        return(0);
82   }
83  
84  
# Line 73 | Line 86 | main(argc, argv)
86   int  argc;
87   char  *argv[];
88   {
76 –        double  atof();
89          int  ncolumns = 0;
90 <        int  dolabels = 0;
91 <        int  curcol = 0, curx = 0, cury = 0;
90 >        int  autolabel = 0;
91 >        int  curcol = 0, x0 = 0, curx = 0, cury = 0, spacing = 0;
92 >        int  xsgn, ysgn;
93 >        char  *thislabel;
94          int  an;
95 <
95 >        SET_DEFAULT_BINARY();
96 >        SET_FILE_BINARY(stdin);
97 >        SET_FILE_BINARY(stdout);
98          progname = argv[0];
99  
100          for (an = 1; an < argc && argv[an][0] == '-'; an++)
101                  switch (argv[an][1]) {
102                  case 'x':
103 <                        xmax = xsiz = atoi(argv[++an]);
103 >                        xsiz = atoi(argv[++an]);
104                          break;
105                  case 'y':
106 <                        ymax = ysiz = atoi(argv[++an]);
106 >                        ysiz = atoi(argv[++an]);
107                          break;
108                  case 'b':
109                          setcolr(bgcolr, atof(argv[an+1]),
# Line 98 | Line 114 | char  *argv[];
114                  case 'a':
115                          ncolumns = atoi(argv[++an]);
116                          break;
117 +                case 's':
118 +                        spacing = atoi(argv[++an]);
119 +                        break;
120 +                case 'o':
121 +                        curx = x0 = atoi(argv[++an]);
122 +                        cury = atoi(argv[++an]);
123 +                        break;
124                  case 'l':
125 <                        dolabels++;
125 >                        switch (argv[an][2]) {
126 >                        case 'a':
127 >                                autolabel++;
128 >                                break;
129 >                        case 'h':
130 >                                labelht = atoi(argv[++an]);
131 >                                break;
132 >                        case '\0':
133 >                                goto dofiles;
134 >                        default:
135 >                                goto userr;
136 >                        }
137                          break;
138                  case '\0':
139                  case 't':
# Line 108 | Line 142 | char  *argv[];
142                          goto userr;
143                  }
144   dofiles:
145 +        newheader("RADIANCE", stdout);
146 +        fputnow(stdout);
147          for (nfile = 0; an < argc; nfile++) {
148 <                if (dolabels) {
149 <                        if (nfile >= MAXFILE-1) {
150 <                                fprintf(stderr,
151 <                                "%s: only %d files allowed with labels\n",
152 <                                        progname, MAXFILE/2);
153 <                        }
154 <                } 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] == '+'))
148 >                if (nfile >= MAXFILE)
149 >                        goto toomany;
150 >                thislabel = NULL;
151 >                input[nfile].flags = 0;
152 >                xsgn = ysgn = '-';
153 >                while (an < argc && (argv[an][0] == '-' || argv[an][0] == '+'
154 >                                || argv[an][0] == '=')) {
155                          switch (argv[an][1]) {
156                          case 't':
157                                  checkthresh = 1;
158                                  if (argv[an][0] == '-') {
159 <                                        input[nfile].hasmin = 1;
159 >                                        input[nfile].flags |= HASMIN;
160                                          setcolr(input[nfile].thmin,
161                                                          atof(argv[an+1]),
162                                                          atof(argv[an+1]),
163                                                          atof(argv[an+1]));
164 <                                } else {
165 <                                        input[nfile].hasmax = 1;
164 >                                } else if (argv[an][0] == '+') {
165 >                                        input[nfile].flags |= HASMAX;
166                                          setcolr(input[nfile].thmax,
167                                                          atof(argv[an+1]),
168                                                          atof(argv[an+1]),
169                                                          atof(argv[an+1]));
170 <                                }
171 <                                an += 2;
170 >                                } else
171 >                                        goto userr;
172 >                                an++;
173                                  break;
174 +                        case 'l':
175 +                                if (strcmp(argv[an], "-l"))
176 +                                        goto userr;
177 +                                thislabel = argv[++an];
178 +                                break;
179 +                        case '+':
180 +                        case '-':
181 +                        case '0':
182 +                                if (argv[an][0] != '=')
183 +                                        goto userr;
184 +                                xsgn = argv[an][1];
185 +                                ysgn = argv[an][2];
186 +                                if (ysgn != '+' && ysgn != '-' && ysgn != '0')
187 +                                        goto userr;
188 +                                break;
189                          case '\0':
190                                  if (argv[an][0] == '-')
191                                          goto getfile;
192 <                        /* fall through */
192 >                                goto userr;
193                          default:
194                                  goto userr;
195                          }
196 +                        an++;
197 +                }
198   getfile:
199                  if (argc-an < (ncolumns ? 1 : 3))
200                          goto userr;
201 +                if (autolabel && thislabel == NULL)
202 +                        thislabel = argv[an];
203                  if (!strcmp(argv[an], "-")) {
204                          input[nfile].name = "<stdin>";
205                          input[nfile].fp = stdin;
206                  } else {
207 <                        input[nfile].name = argv[an];
208 <                        if ((input[nfile].fp = argv[an][0] == '!' ?
209 <                                        popen(argv[an]+1, "r") :
210 <                                        fopen(argv[an], "r")) == NULL) {
207 >                        if (argv[an][0] == '!') {
208 >                                input[nfile].name = Command;
209 >                                input[nfile].fp = popen(argv[an]+1, "r");
210 >                        } else {
211 >                                input[nfile].name = argv[an];
212 >                                input[nfile].fp = fopen(argv[an], "r");
213 >                        }
214 >                        if (input[nfile].fp == NULL) {
215                                  perror(argv[an]);
216                                  quit(1);
217                          }
# Line 173 | Line 221 | getfile:
221                  printf("%s:\n", input[nfile].name);
222                  getheader(input[nfile].fp, tabputs, NULL);
223                  if (wrongformat) {
224 <                        fprintf(stderr, "%s: not a Radiance picture\n",
224 >                        fprintf(stderr, "%s: incompatible input format\n",
225                                          input[nfile].name);
226                          quit(1);
227                  }
228                                                  /* get picture size */
229                  if (fgetresolu(&input[nfile].xres, &input[nfile].yres,
230 <                                input[nfile].fp) != (YMAJOR|YDECR)) {
230 >                                input[nfile].fp) < 0) {
231                          fprintf(stderr, "%s: bad picture size\n",
232                                          input[nfile].name);
233                          quit(1);
234                  }
235                  if (ncolumns > 0) {
236                          if (curcol >= ncolumns) {
237 <                                cury = ymax;
238 <                                curx = 0;
237 >                                cury = ymax + spacing;
238 >                                curx = x0;
239                                  curcol = 0;
240                          }
241                          input[nfile].xloc = curx;
242                          input[nfile].yloc = cury;
243 <                        curx += input[nfile].xres;
243 >                        curx += input[nfile].xres + spacing;
244                          curcol++;
245                  } else {
246                          input[nfile].xloc = atoi(argv[an++]);
247 +                        if (xsgn == '+')
248 +                                input[nfile].xloc -= input[nfile].xres;
249 +                        else if (xsgn == '0')
250 +                                input[nfile].xloc -= input[nfile].xres/2;
251                          input[nfile].yloc = atoi(argv[an++]);
252 +                        if (ysgn == '+')
253 +                                input[nfile].yloc -= input[nfile].yres;
254 +                        else if (ysgn == '0')
255 +                                input[nfile].yloc -= input[nfile].yres/2;
256                  }
257                  if (input[nfile].xloc < xmin)
258                          xmin = input[nfile].xloc;
# Line 206 | Line 262 | getfile:
262                          xmax = input[nfile].xloc+input[nfile].xres;
263                  if (input[nfile].yloc+input[nfile].yres > ymax)
264                          ymax = input[nfile].yloc+input[nfile].yres;
265 <                if (dolabels) {
266 <                        input[++nfile].name = "<Label>";
267 <                        setpscom(tmpbuf, input[nfile-1].name);
268 <                        if ((input[nfile].fp = popen(tmpbuf, "r")) == NULL)
265 >                if (thislabel != NULL) {
266 >                        if (++nfile >= MAXFILE)
267 >                                goto toomany;
268 >                        input[nfile].name = Label;
269 >                        input[nfile].flags = 0;
270 >                        input[nfile].xres = input[nfile-1].xres;
271 >                        input[nfile].yres = labelht;
272 >                        if ((input[nfile].fp = lblopen(thislabel,
273 >                                        &input[nfile].xres,
274 >                                        &input[nfile].yres)) == NULL)
275                                  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;
276                          input[nfile].xloc = input[nfile-1].xloc;
277                          input[nfile].yloc = input[nfile-1].yloc +
278 <                                        input[nfile-1].yres - SIGNHT;
222 <                        input[nfile].hasmin = input[nfile].hasmax = 0;
278 >                                        input[nfile-1].yres-input[nfile].yres;
279                  }
280          }
281          if (xsiz <= 0)
282                  xsiz = xmax;
283 +        else if (xsiz > xmax)
284 +                xmax = xsiz;
285          if (ysiz <= 0)
286                  ysiz = ymax;
287 +        else if (ysiz > ymax)
288 +                ymax = ysiz;
289                                          /* add new header info. */
290          printargs(argc, argv, stdout);
291 <        fputformat(COLRFMT, stdout);
292 <        printf("\n-Y %d +X %d\n", ysiz, xsiz);
291 >        if (strcmp(ourfmt, PICFMT))
292 >                fputformat(ourfmt, stdout);     /* print format if known */
293 >        putchar('\n');
294 >        fprtresolu(xsiz, ysiz, stdout);
295  
296          compos();
297          
298          quit(0);
299   userr:
300 <        fprintf(stderr, "Usage: %s [-x xres][-y yres][-b r g b] ", progname);
301 <        fprintf(stderr, "[-t min1][+t max1] file1 x1 y1 ..\n");
300 >        fprintf(stderr,
301 >        "Usage: %s [-x xr][-y yr][-b r g b][-a n][-s p][-o x0 y0][-la][-lh h] ",
302 >                        progname);
303 >        fprintf(stderr, "[-t min1][+t max1][-l lab][=SS] pic1 x1 y1 ..\n");
304          quit(1);
305 + toomany:
306 +        fprintf(stderr, "%s: only %d files and labels allowed\n",
307 +                        progname, MAXFILE);
308 +        quit(1);
309   labelerr:
310          fprintf(stderr, "%s: error opening label\n", progname);
311          quit(1);
# Line 281 | Line 349 | compos()                               /* composite pictures */
349                                  if (x > xsiz)
350                                          x = xsiz;
351                                  for (x--; x >= 0 && x >= input[i].xloc; x--) {
352 <                                        if (input[i].hasmin &&
352 >                                        if (input[i].flags & HASMIN &&
353                                          cmpcolr(scanin[x], input[i].thmin) <= 0)
354                                                  continue;
355 <                                        if (input[i].hasmax &&
355 >                                        if (input[i].flags & HASMAX &&
356                                          cmpcolr(scanin[x], input[i].thmax) >= 0)
357                                                  continue;
358                                          copycolr(scanout[x], scanin[x]);
# Line 313 | Line 381 | register COLR  c1, c2;
381  
382          j = 4;                          /* check exponents first! */
383          while (j--)
384 <                if (i = c1[j] - c2[j])
384 >                if ( (i = c1[j] - c2[j]) )
385                          return(i);
386          return(0);
387   }
388  
389  
390 + FILE *
391 + lblopen(s, xp, yp)              /* open pipe to label generator */
392 + char  *s;
393 + int  *xp, *yp;
394 + {
395 +        char  com[128];
396 +        FILE  *fp;
397 +
398 +        sprintf(com, "psign -s -.15 -a 2 -x %d -y %d '%.90s'", *xp, *yp, s);
399 +        if ((fp = popen(com, "r")) == NULL)
400 +                return(NULL);
401 +        if (checkheader(fp, COLRFMT, NULL) < 0)
402 +                goto err;
403 +        if (fgetresolu(xp, yp, fp) < 0)
404 +                goto err;
405 +        return(fp);
406 + err:
407 +        pclose(fp);
408 +        return(NULL);
409 + }
410 +
411 +
412 + void
413   quit(code)              /* exit gracefully */
414   int  code;
415   {
416 +        register int  i;
417 +                                /* close input files */
418 +        for (i = 0; i < nfile; i++)
419 +                if (input[i].name == Command || input[i].name == Label)
420 +                        pclose(input[i].fp);
421 +                else
422 +                        fclose(input[i].fp);
423          exit(code);
424   }

Diff Legend

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