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

Comparing src/gen/xform.c (file contents):
Revision 2.13 by greg, Tue Jun 18 21:12:51 1996 UTC vs.
Revision 2.19 by gwlarson, Fri Jun 4 16:00:27 1999 UTC

# Line 47 | Line 47 | short  tinvers[NUMOTYPE];              /* inverse types for surfac
47  
48   int  nrept = 1;                         /* number of array repetitions */
49  
50 < extern char  *malloc(), *fgetword();
50 > int stdinused = 0;                      /* stdin has been used by -f option? */
51  
52 < char  *mainfn[MAXPATH];                 /* main file name */
52 > extern char  *malloc(), *fgets(), *fgetword();
53 >
54 > char  mainfn[MAXPATH];                  /* main file name */
55   FILE  *mainfp = NULL;                   /* main file pointer */
56  
57   #define  progname  (xav[0])
# Line 61 | Line 63 | char  *argv[];
63   {
64          char  *fname;
65          int  a;
66 <                                        /* check for array */
66 >                                        /* check for argument list file */
67          for (a = 1; a < argc; a++)
68 +                if (!strcmp(argv[a], "-f"))
69 +                        return(doargf(argc, argv, a));
70 +                                        /* check for regular array */
71 +        for (a = 1; a < argc; a++)
72                  if (!strcmp(argv[a], "-a"))
73                          return(doarray(argc, argv, a));
74  
# Line 124 | Line 130 | char  *argv[];
130          putchar('\n');
131                                          /* transform input */
132          if (xac == argc) {
133 +                if (stdinused) {
134 +                        fprintf(stderr, "%s: cannot use stdin more than once\n",
135 +                                        argv[0]);
136 +                        exit(1);
137 +                }
138                  openmain(NULL);
139                  xform(mainfn, mainfp);
140          } else
# Line 136 | Line 147 | char  *argv[];
147   }
148  
149  
150 + doargf(ac, av, fi)                      /* take argument list from file */
151 + char  **av;
152 + int  ac, fi;
153 + {
154 +        char  *newav[256], **avp;
155 +        char  argbuf[2048];
156 +        char  newid[128];
157 +        char  *oldid;
158 +        register char   *cp;
159 +        FILE    *argfp;
160 +        int  n, i, k, newac, err;
161 +        
162 +        if (fi >= ac-1 || (av[fi+1][0] == '-' && av[fi+1][1] != '\0')) {
163 +                fprintf(stderr, "%s: missing file for -f option\n", av[0]);
164 +                exit(1);
165 +        }
166 +        if (av[fi+1][0] == '-' && av[fi+1][1] == '\0') {
167 +                if (stdinused++) {
168 +                        fprintf(stderr, "%s: cannot use stdin more than once\n",
169 +                                        av[0]);
170 +                        exit(1);
171 +                }
172 +                argfp = stdin;
173 +                n = 100;                /* we just don't know! */
174 +        } else {
175 +                if ((argfp = fopen(av[fi+1], "r")) == NULL) {
176 +                        fprintf(stderr, "%s: cannot open argument file \"%s\"\n",
177 +                                        av[0], av[fi+1]);
178 +                        exit(1);
179 +                }
180 +                n = 0;                  /* count number of lines in file */
181 +                while (fgets(argbuf,sizeof(argbuf),argfp) != NULL)
182 +                        n += argbuf[0] != '\n' & argbuf[0] != '#';
183 +                if (!n) {
184 +                        fprintf(stderr, "%s: empty argument file \"%s\"\n",
185 +                                        av[0], av[fi+1]);
186 +                        exit(1);
187 +                }
188 +                nrept *= n;
189 +                rewind(argfp);
190 +        }
191 +        err = 0; k = 0;                 /* read each arg list and call main */
192 +        while (fgets(argbuf,sizeof(argbuf),argfp) != NULL) {
193 +                if (argbuf[0] == '\n' | argbuf[0] == '#')
194 +                        continue;
195 +                avp = newav+2;
196 +                avp[0] = av[0];
197 +                for (i = 1; i < fi; i++)
198 +                        avp[i] = av[i];
199 +                newac = i;
200 +                cp = argbuf;            /* parse new words */
201 +                if (*cp == '!') cp++;
202 +                if (!strncmp(cp, "xform ", 6)) cp += 6;
203 +                for ( ; ; ) {
204 +                        while (isspace(*cp))    /* nullify spaces */
205 +                                *cp++ = '\0';
206 +                        if (!*cp)               /* all done? */
207 +                                break;
208 +                        avp[newac++] = cp;      /* add argument to list */
209 +                        while (*++cp && !isspace(*cp))
210 +                                ;
211 +                }
212 +                for (i = fi+2; i < ac; i++)
213 +                        avp[newac++] = av[i];
214 +                avp[newac] = NULL;
215 +                oldid = NULL;
216 +                for (i = 2; i < newac; i++)
217 +                        if (!strcmp(avp[i-1], "-n")) {
218 +                                oldid = avp[i];
219 +                                avp[i] = newid;
220 +                                break;
221 +                        }
222 +                if (oldid == NULL) {
223 +                        newav[0] = av[0];
224 +                        newav[1] = "-n";
225 +                        newav[2] = newid;
226 +                        avp = newav;
227 +                        newac += 2;
228 +                }
229 +                if (oldid == NULL)
230 +                        sprintf(newid, "i%d", k);
231 +                else
232 +                        sprintf(newid, "%s.%d", oldid, k);
233 +                err |= main(newac, avp);
234 +                k++;
235 +        }
236 +        fclose(argfp);
237 +        return(err);
238 + }
239 +
240 +
241   doarray(ac, av, ai)                     /* make array */
242   char  **av;
243   int  ac, ai;
# Line 145 | Line 247 | int  ac, ai;
247          char  *oldid = NULL;
248          int  n, i, err;
249          
250 +        if (ai >= ac-1 || (n = atoi(av[ai+1])) <= 0) {
251 +                fprintf(stderr, "%s: missing count for -a option\n", av[0]);
252 +                exit(1);
253 +        }
254 +        nrept *= n;
255          avp = newav+2;
256          avp[0] = av[0];
257          for (i = 1; i < ac; i++)
# Line 163 | Line 270 | int  ac, ai;
270                  avp = newav;
271                  ac += 2;
272          }
166 –        nrept *= n = atoi(av[ai+1]);
273          err = 0;
274          for (i = 0; i < n; i++) {
275                  if (oldid == NULL)
# Line 420 | Line 526 | FILE  *fin;
526  
527          if (readfargs(&fa, fin) != 1)
528                  return(-1);
529 <        if (fa.nfargs > 5)
529 >        if (fa.nfargs > 7)
530                  return(-1);
531          printf("%d", fa.nsargs);
532          if (idprefix == NULL)
# Line 446 | Line 552 | FILE  *fin;
552          if (fa.nfargs > 2)
553                  printf(" %12.6g %12.6g %12.6g", fa.farg[0]/tot.sca,
554                                  fa.farg[1]/tot.sca, fa.farg[2]/tot.sca);
555 <        if (fa.nfargs > 3)
556 <                printf(" %12.6g", fa.farg[3]);
451 <        if (fa.nfargs > 4)
452 <                printf(" %12.6g", fa.farg[4]);
555 >        for (i = 3; i < fa.nfargs; i++)
556 >                printf(" %12.6g", fa.farg[i]);
557          printf("\n");
558          freefargs(&fa);
559          return(0);

Diff Legend

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