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

Comparing ray/src/gen/mkillum.c (file contents):
Revision 1.3 by greg, Tue Jul 23 17:18:21 1991 UTC vs.
Revision 1.6 by greg, Thu Jul 25 10:59:05 1991 UTC

# Line 25 | Line 25 | static char SCCSid[] = "$SunId$ LBL";
25   #define  S_ALL          3               /* select all */
26  
27                                  /* rtrace command and defaults */
28 < char  *rtargv[64] = { "rtrace", "-dj", ".25", "-dr", "3", "-ab", "2",
29 <                "-ad", "256", "-as", "128", "-aa", ".15" };
30 < int  rtargc = 13;
28 > char  *rtargv[64] = { "rtrace", "-dj", ".25", "-dr", "3", "-di+",
29 >                "-ab", "2", "-ad", "256", "-as", "128", "-aa", ".15", };
30 > int  rtargc = 14;
31                                  /* overriding rtrace options */
32 < char  *myrtopts[] = { "-I-", "-i-", "-di+", "-ov", "-h-", "-fff", NULL };
32 > char  *myrtopts[] = { "-I-", "-i-", "-ov", "-h-", "-fff", NULL };
33  
34   struct rtproc   rt;             /* our rtrace process */
35  
# Line 58 | Line 58 | int    doneheader = 0;         /* printed header yet? */
58   int     warnings = 1;           /* print warnings? */
59  
60   extern char     *fgetline(), *fgetword(), *sskip(),
61 <                *atos(), *iskip(), *fskip();
61 >                *atos(), *iskip(), *fskip(), *strcpy();
62   extern FILE     *popen();
63  
64  
# Line 103 | Line 103 | char   *argv[];
103          init();
104          if (gargc+1 < argc)
105                  for (i = gargc+1; i < argc; i++) {
106 <                        if ((fp = fopen(argv[i], "r")) == NULL {
106 >                        if ((fp = fopen(argv[i], "r")) == NULL) {
107                                  sprintf(errmsg,
108                                  "cannot open scene file \"%s\"", argv[i]);
109                                  error(SYSTEM, errmsg);
# Line 135 | Line 135 | int  status;
135  
136   init()                          /* start rtrace and set up buffers */
137   {
138 <        extern int  o_face(), o_ring();
138 >        extern int  o_face(), o_sphere(), o_ring();
139          int     maxbytes;
140                                          /* set up object functions */
141          ofun[OBJ_FACE].funp = o_face;
142 +        ofun[OBJ_SPHERE].funp = o_sphere;
143          ofun[OBJ_RING].funp = o_ring;
144                                          /* set up signal handling */
145          signal(SIGPIPE, quit);
# Line 152 | Line 153 | init()                         /* start rtrace and set up buffers */
153          if (maxbytes < 0)
154                  error(SYSTEM, "cannot start rtrace process");
155          rt.bsiz = maxbytes/(6*sizeof(float));
156 <        rt.buf = (float *)malloc(rt.bsiz*(6*sizeof(float)));
157 <        if (rt.buf == NULL)
156 >        rt.buf = (float *)malloc(6*sizeof(float)*rt.bsiz--);
157 >        rt.dest = (float **)malloc(sizeof(float *)*rt.bsiz);
158 >        if (rt.buf == NULL || rt.dest == NULL)
159                  error(SYSTEM, "out of memory in init");
158 –        rt.bsiz--;                      /* allow for flush ray */
160          rt.nrays = 0;
161 +                                        /* set up urand */
162 +        initurand(2048);
163   }
164  
165  
# Line 252 | Line 255 | char   *nm;
255                          if (*++cp != '=')
256                                  break;
257                          if (!*++cp) {
258 +                                strcpy(thisillum.datafile,thisillum.matname);
259                                  thisillum.flags &= ~IL_DATCLB;
260                                  continue;
261                          }
# Line 262 | Line 266 | char   *nm;
266                          continue;
267                  case 'i':                       /* include material */
268                  case 'e':                       /* exclude material */
269 <                        matselect = (*cp == 'i') ? S_ELEM : S_COMPL;
266 <                        if (*++cp != '=')
269 >                        if (cp[1] != '=')
270                                  break;
271 +                        matselect = (*++cp == 'i') ? S_ELEM : S_COMPL;
272                          atos(matcheck, MAXSTR, ++cp);
273                          cp = sskip(cp);
274                          continue;
# Line 281 | Line 285 | char   *nm;
285                                  break;
286                          switch (*++cp) {
287                          case 'a':                       /* average */
288 <                                thisillum.flags |= IL_COLAVG;
289 <                                thisillum.flags &= ~IL_COLDST;
288 >                                thisillum.flags = (thisillum.flags|IL_COLAVG)
289 >                                                        & ~IL_COLDST;
290                                  break;
291                          case 'd':                       /* distribution */
292 <                                thisillum.flags |= IL_COLDST;
289 <                                thisillum.flags &= ~IL_COLAVG;
292 >                                thisillum.flags |= (IL_COLDST|IL_COLAVG);
293                                  break;
294                          case 'n':                       /* none */
295                                  thisillum.flags &= ~(IL_COLAVG|IL_COLDST);
# Line 313 | Line 316 | char   *nm;
316                          cp = sskip(cp);
317                          continue;
318                  case 'l':                       /* light sources */
319 <                        if (*++cp != '+' && *cp != '-')
320 <                                break;
318 <                        if (*cp++ == '+')
319 >                        cp++;
320 >                        if (*cp == '+')
321                                  thisillum.flags |= IL_LIGHT;
322 <                        else
322 >                        else if (*cp == '-')
323                                  thisillum.flags &= ~IL_LIGHT;
324 +                        else
325 +                                break;
326 +                        cp++;
327                          continue;
328                  case 'o':                       /* output file */
329                          if (*++cp != '=')
# Line 334 | Line 339 | char   *nm;
339                          }
340                          doneheader = 0;
341                          continue;
342 +                case '!':                       /* processed file! */
343 +                        sprintf(errmsg, "(%s): processed by mkillum already!",
344 +                                        nm);
345 +                        error(WARNING, errmsg);
346 +                        return;
347                  }
348          opterr:                                 /* skip faulty option */
349                  cp = sskip(cp);
# Line 351 | Line 361 | char   *nm;
361                                  progname, nerrs);
362          }
363                                                  /* print pure comment */
364 <        putchar('#'); putchar(' '); fputs(s+2, stdout);
364 >        printf("# %s", s+2);
365   }
366  
367  
# Line 364 | Line 374 | register char  **av;
374                  putchar(' ');
375                  fputs(*av++, stdout);
376          }
377 <        putchar('\n');
377 >        fputs("\n#@mkillum !\n", stdout);
378   }
379  
380  
# Line 387 | Line 397 | char  *nm;
397                  printf("\n%s %s %s", thisillum.altmat, ALIASID, str);
398                  if (fgetword(str, MAXSTR, fp) == NULL)
399                          goto readerr;
400 <                printf(" %s\n", str);
400 >                printf("\t%s\n", str);
401                  return;
402          }
403 <        thisobj.omod = OVOID;
403 >        thisobj.omod = OVOID;           /* unused field */
404          if ((thisobj.otype = otype(str)) < 0) {
405                  sprintf(errmsg, "(%s): unknown type \"%s\"", nm, str);
406                  error(USER, errmsg);
# Line 407 | Line 417 | char  *nm;
417                  doit = 0;
418                  break;
419          case S_ALL:
420 <                doit = issurface(thisobj.otype);
420 >                doit = 1;
421                  break;
422          case S_ELEM:
423                  doit = !strcmp(thisillum.altmat, matcheck);
# Line 416 | Line 426 | char  *nm;
426                  doit = strcmp(thisillum.altmat, matcheck);
427                  break;
428          }
429 <        if (doit && ofun[thisobj.otype].funp == o_default) {
420 <                sprintf(errmsg, "(%s): cannot make illum for %s \"%s\"",
421 <                                nm, ofun[thisobj.otype].funame, thisobj.oname);
422 <                error(WARNING, errmsg);
423 <                doit = 0;
424 <        }
429 >        doit = doit && issurface(thisobj.otype);
430                                                  /* print header? */
431          checkhead();
432                                                  /* process object */
433          if (doit)
434 <                (*ofun[thisobj.otype].funp)(&thisobj, &thisillum, &rt);
434 >                (*ofun[thisobj.otype].funp)(&thisobj, &thisillum, &rt, nm);
435          else
436                  printobj(thisillum.altmat, &thisobj);
437                                                  /* free arguments */
# Line 436 | Line 441 | readerr:
441          sprintf(errmsg, "(%s): error reading scene", nm);
442          error(USER, errmsg);
443   }
439 –
440 –
441 – int
442 – otype(ofname)                   /* get object function number from its name */
443 – char  *ofname;
444 – {
445 –        register int  i;
446 –
447 –        for (i = 0; i < NUMOTYPE; i++)
448 –                if (!strcmp(ofun[i].funame, ofname))
449 –                        return(i);
450 –
451 –        return(-1);             /* not found */
452 – }
453 –
454 –
455 – o_default() {}

Diff Legend

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