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.5 by greg, Thu Sep 14 09:20:36 1989 UTC vs.
Revision 2.16 by greg, Fri Jun 4 14:47:01 1993 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1987 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 + #include  <math.h>
16 +
17 + #ifdef MSDOS
18 + #include  <fcntl.h>
19 + #endif
20 +
21   #include  "color.h"
22  
23 + #include  "resolu.h"
24  
25 < #define  MAXFILE        32
25 > #define  MAXFILE        64
26  
27                                          /* output picture size */
28   int  xsiz = 0;
# Line 28 | Line 35 | int  ymax = 0;
35  
36   COLR  bgcolr = BLKCOLR;                 /* background color */
37  
38 + int  labelht = 24;                      /* label height */
39 +
40   int  checkthresh = 0;                   /* check threshold value */
41  
42 + char  Command[] = "<Command>";
43 + char  Label[] = "<Label>";
44 +
45   char  *progname;
46  
47   struct {
48 <        char  *name;                    /* file name */
48 >        char  *name;                    /* file or command name */
49          FILE  *fp;                      /* stream pointer */
50          int  xres, yres;                /* picture size */
51          int  xloc, yloc;                /* anchor point */
# Line 43 | Line 55 | struct {
55  
56   int  nfile;                     /* number of files */
57  
58 + int  wrongformat = 0;
59  
60 + FILE  *popen(), *lblopen();
61 +
62 + extern char  *malloc();
63 +
64 +
65   tabputs(s)                      /* print line preceded by a tab */
66   char  *s;
67   {
68 <        putc('\t', stdout);
69 <        fputs(s, stdout);
68 >        char  fmt[32];
69 >
70 >        if (isformat(s)) {
71 >                formatval(fmt, s);
72 >                wrongformat = strcmp(fmt, COLRFMT);
73 >        } else {
74 >                putc('\t', stdout);
75 >                fputs(s, stdout);
76 >        }
77   }
78  
79  
# Line 56 | Line 81 | main(argc, argv)
81   int  argc;
82   char  *argv[];
83   {
84 <        double  atof();
84 >        int  ncolumns = 0;
85 >        int  autolabel = 0;
86 >        int  curcol = 0, x0 = 0, curx = 0, cury = 0, spacing = 0;
87 >        char  *thislabel;
88          int  an;
89 <
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          progname = argv[0];
96  
97          for (an = 1; an < argc && argv[an][0] == '-'; an++)
98                  switch (argv[an][1]) {
99                  case 'x':
100 <                        xmax = xsiz = atoi(argv[++an]);
100 >                        xsiz = atoi(argv[++an]);
101                          break;
102                  case 'y':
103 <                        ymax = ysiz = atoi(argv[++an]);
103 >                        ysiz = atoi(argv[++an]);
104                          break;
105                  case 'b':
106                          setcolr(bgcolr, atof(argv[an+1]),
# Line 75 | Line 108 | char  *argv[];
108                                          atof(argv[an+3]));
109                          an += 3;
110                          break;
111 +                case 'a':
112 +                        ncolumns = atoi(argv[++an]);
113 +                        break;
114 +                case 's':
115 +                        spacing = atoi(argv[++an]);
116 +                        break;
117 +                case 'o':
118 +                        curx = x0 = atoi(argv[++an]);
119 +                        cury = atoi(argv[++an]);
120 +                        break;
121 +                case 'l':
122 +                        switch (argv[an][2]) {
123 +                        case 'a':
124 +                                autolabel++;
125 +                                break;
126 +                        case 'h':
127 +                                labelht = atoi(argv[++an]);
128 +                                break;
129 +                        case '\0':
130 +                                goto dofiles;
131 +                        default:
132 +                                goto userr;
133 +                        }
134 +                        break;
135                  case '\0':
136                  case 't':
137                          goto dofiles;
# Line 83 | Line 140 | char  *argv[];
140                  }
141   dofiles:
142          for (nfile = 0; an < argc; nfile++) {
143 <                if (nfile >= MAXFILE) {
144 <                        fprintf(stderr, "%s: too many files\n", progname);
145 <                        quit(1);
89 <                }
143 >                if (nfile >= MAXFILE)
144 >                        goto toomany;
145 >                thislabel = NULL;
146                  input[nfile].hasmin = input[nfile].hasmax = 0;
147                  while (an < argc && (argv[an][0] == '-' || argv[an][0] == '+'))
148                          switch (argv[an][1]) {
# Line 107 | Line 163 | dofiles:
163                                  }
164                                  an += 2;
165                                  break;
166 +                        case 'l':
167 +                                if (strcmp(argv[an], "-l"))
168 +                                        goto userr;
169 +                                thislabel = argv[an+1];
170 +                                an += 2;
171 +                                break;
172                          case '\0':
173                                  if (argv[an][0] == '-')
174                                          goto getfile;
175 <                        /* fall through */
175 >                                goto userr;
176                          default:
177                                  goto userr;
178                          }
179   getfile:
180 <                if (argc-an < 3)
180 >                if (argc-an < (ncolumns ? 1 : 3))
181                          goto userr;
182 +                if (autolabel && thislabel == NULL)
183 +                        thislabel = argv[an];
184                  if (!strcmp(argv[an], "-")) {
185                          input[nfile].name = "<stdin>";
186                          input[nfile].fp = stdin;
187                  } else {
188 <                        input[nfile].name = argv[an];
189 <                        if ((input[nfile].fp = fopen(argv[an], "r")) == NULL) {
188 >                        if (argv[an][0] == '!') {
189 >                                input[nfile].name = Command;
190 >                                input[nfile].fp = popen(argv[an]+1, "r");
191 >                        } else {
192 >                                input[nfile].name = argv[an];
193 >                                input[nfile].fp = fopen(argv[an], "r");
194 >                        }
195 >                        if (input[nfile].fp == NULL) {
196                                  perror(argv[an]);
197                                  quit(1);
198                          }
# Line 130 | Line 200 | getfile:
200                  an++;
201                                                  /* get header */
202                  printf("%s:\n", input[nfile].name);
203 <                getheader(input[nfile].fp, tabputs);
203 >                getheader(input[nfile].fp, tabputs, NULL);
204 >                if (wrongformat) {
205 >                        fprintf(stderr, "%s: not a Radiance picture\n",
206 >                                        input[nfile].name);
207 >                        quit(1);
208 >                }
209                                                  /* get picture size */
210                  if (fgetresolu(&input[nfile].xres, &input[nfile].yres,
211 <                                input[nfile].fp) != (YMAJOR|YDECR)) {
211 >                                input[nfile].fp) < 0) {
212                          fprintf(stderr, "%s: bad picture size\n",
213                                          input[nfile].name);
214                          quit(1);
215                  }
216 <                input[nfile].xloc = atoi(argv[an++]);
217 <                input[nfile].yloc = atoi(argv[an++]);
216 >                if (ncolumns > 0) {
217 >                        if (curcol >= ncolumns) {
218 >                                cury = ymax + spacing;
219 >                                curx = x0;
220 >                                curcol = 0;
221 >                        }
222 >                        input[nfile].xloc = curx;
223 >                        input[nfile].yloc = cury;
224 >                        curx += input[nfile].xres + spacing;
225 >                        curcol++;
226 >                } else {
227 >                        input[nfile].xloc = atoi(argv[an++]);
228 >                        input[nfile].yloc = atoi(argv[an++]);
229 >                }
230                  if (input[nfile].xloc < xmin)
231                          xmin = input[nfile].xloc;
232                  if (input[nfile].yloc < ymin)
# Line 148 | Line 235 | getfile:
235                          xmax = input[nfile].xloc+input[nfile].xres;
236                  if (input[nfile].yloc+input[nfile].yres > ymax)
237                          ymax = input[nfile].yloc+input[nfile].yres;
238 +                if (thislabel != NULL) {
239 +                        if (++nfile >= MAXFILE)
240 +                                goto toomany;
241 +                        input[nfile].name = Label;
242 +                        input[nfile].hasmin = input[nfile].hasmax = 0;
243 +                        input[nfile].xres = input[nfile-1].xres;
244 +                        input[nfile].yres = labelht;
245 +                        if ((input[nfile].fp = lblopen(thislabel,
246 +                                        &input[nfile].xres,
247 +                                        &input[nfile].yres)) == NULL)
248 +                                goto labelerr;
249 +                        input[nfile].xloc = input[nfile-1].xloc;
250 +                        input[nfile].yloc = input[nfile-1].yloc +
251 +                                        input[nfile-1].yres-input[nfile].yres;
252 +                }
253          }
254          if (xsiz <= 0)
255                  xsiz = xmax;
256 +        else if (xsiz > xmax)
257 +                xmax = xsiz;
258          if (ysiz <= 0)
259                  ysiz = ymax;
260 +        else if (ysiz > ymax)
261 +                ymax = ysiz;
262                                          /* add new header info. */
263          printargs(argc, argv, stdout);
264 <        printf("\n-Y %d +X %d\n", ysiz, xsiz);
264 >        fputformat(COLRFMT, stdout);
265 >        putchar('\n');
266 >        fprtresolu(xsiz, ysiz, stdout);
267  
268          compos();
269          
270          quit(0);
271   userr:
272 <        fprintf(stderr, "Usage: %s [-x xres][-y yres][-b r g b] ", progname);
273 <        fprintf(stderr, "[-t min1][+t max1] file1 x1 y1 ..\n");
272 >        fprintf(stderr,
273 >        "Usage: %s [-x xr][-y yr][-b r g b][-a n][-s p][-o x0 y0][-la][-lh h] ",
274 >                        progname);
275 >        fprintf(stderr, "[-t min1][+t max1][-l lab] pic1 x1 y1 ..\n");
276          quit(1);
277 + toomany:
278 +        fprintf(stderr, "%s: only %d files and labels allowed\n",
279 +                        progname, MAXFILE);
280 +        quit(1);
281 + labelerr:
282 +        fprintf(stderr, "%s: error opening label\n", progname);
283 +        quit(1);
284   }
285  
286  
# Line 242 | Line 359 | register COLR  c1, c2;
359   }
360  
361  
362 + FILE *
363 + lblopen(s, xp, yp)              /* open pipe to label generator */
364 + char  *s;
365 + int  *xp, *yp;
366 + {
367 +        char  com[128];
368 +        FILE  *fp;
369 +
370 +        sprintf(com, "psign -s -.15 -a 2 -x %d -y %d '%.90s'", *xp, *yp, s);
371 +        if ((fp = popen(com, "r")) == NULL)
372 +                return(NULL);
373 +        if (checkheader(fp, COLRFMT, NULL) < 0)
374 +                goto err;
375 +        if (fgetresolu(xp, yp, fp) < 0)
376 +                goto err;
377 +        return(fp);
378 + err:
379 +        pclose(fp);
380 +        return(NULL);
381 + }
382 +
383 +
384   quit(code)              /* exit gracefully */
385   int  code;
386   {
387 +        register int  i;
388 +                                /* close input files */
389 +        for (i = 0; i < nfile; i++)
390 +                if (input[i].name == Command || input[i].name == Label)
391 +                        pclose(input[i].fp);
392 +                else
393 +                        fclose(input[i].fp);
394          exit(code);
395   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines