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

Comparing ray/src/util/rad.c (file contents):
Revision 2.14 by greg, Thu Jul 15 18:32:57 1993 UTC vs.
Revision 2.25 by greg, Wed Sep 15 15:11:47 1993 UTC

# Line 110 | Line 110 | long   matdate;                /* date of latest material file */
110   int     explicate = 0;          /* explicate variables */
111   int     silent = 0;             /* do work silently */
112   int     noaction = 0;           /* don't do anything */
113 + int     sayview = 0;            /* print view out */
114   char    *rvdevice = NULL;       /* rview output device */
115   char    *viewselect = NULL;     /* specific view only */
116  
117   int     overture = 0;           /* overture calculation needed */
118  
119   char    *progname;              /* global argv[0] */
120 + char    *rifname;               /* global rad input file name */
121  
122   char    radname[MAXPATH];       /* root Radiance file name */
123  
# Line 143 | Line 145 | char   *argv[];
145                  case 'o':
146                          rvdevice = argv[++i];
147                          break;
148 +                case 'V':
149 +                        sayview++;
150 +                        break;
151                  case 'v':
152                          viewselect = argv[++i];
153                          break;
# Line 151 | Line 156 | char   *argv[];
156                  }
157          if (i >= argc)
158                  goto userr;
159 +        rifname = argv[i];
160                                  /* assign Radiance root file name */
161 <        rootname(radname, argv[i]);
161 >        rootname(radname, rifname);
162                                  /* load variable values */
163 <        load(argv[i]);
163 >        load(rifname);
164                                  /* get any additional assignments */
165          for (i++; i < argc; i++)
166                  setvariable(argv[i]);
# Line 202 | Line 208 | register char  *rn, *fn;
208   }
209  
210  
211 + #define NOCHAR  127             /* constant for character to delete */
212 +
213 +
214   load(rfname)                    /* load Radiance simulation file */
215   char    *rfname;
216   {
# Line 217 | Line 226 | char   *rfname;
226                  for (cp = buf; *cp; cp++) {
227                          switch (*cp) {
228                          case '\\':
229 <                        case '\n':
221 <                                *cp = ' ';
229 >                                *cp++ = NOCHAR;
230                                  continue;
231                          case '#':
232                                  *cp = '\0';
# Line 238 | Line 246 | setvariable(ass)               /* assign variable according to stri
246   register char   *ass;
247   {
248          char    varname[32];
249 +        char    varval[512];
250 +        int     n;
251          register char   *cp;
252          register VARIABLE       *vp;
253          register int    i;
244 –        int     n;
254  
255          while (isspace(*ass))           /* skip leading space */
256                  ass++;
# Line 255 | Line 264 | register char  *ass;
264                                          /* trim value */
265          while (isspace(*ass) || *ass == '=')
266                  ass++;
267 <        cp = ass + strlen(ass);
268 <        do
269 <                *cp-- = '\0';
261 <        while (cp >= ass && isspace(*cp));
262 <        n = cp - ass + 1;
267 >        for (n = strlen(ass); n > 0; n--)
268 >                if (!isspace(ass[n-1]))
269 >                        break;
270          if (!n) {
271                  fprintf(stderr, "%s: warning - missing value for variable '%s'\n",
272                                  progname, varname);
# Line 284 | Line 291 | register char  *ass;
291                  vp->value = malloc(n+1);
292          if (vp->value == NULL)
293                  syserr(progname);
294 <        strcpy(vp->value+i, ass);
294 >        cp = vp->value+i;               /* copy value, squeezing spaces */
295 >        *cp = *ass;
296 >        for (i = 1; i <= n; i++) {
297 >                if (ass[i] == NOCHAR)
298 >                        continue;
299 >                if (isspace(*cp))
300 >                        while (isspace(ass[i]))
301 >                                i++;
302 >                *++cp = ass[i];
303 >        }
304 >        *++cp = '\0';
305          vp->nass++;
306   }
307  
# Line 310 | Line 327 | register int   n;
327   {
328          register char   *cp;
329  
330 <        if (vp == NULL || n < 0 || n >= vp->nass)
330 >        if (vp == NULL | n < 0 | n >= vp->nass)
331                  return(NULL);
332          cp = vp->value;
333          while (n--)
# Line 578 | Line 595 | double
595   ambval()                                /* compute ambient value */
596   {
597          if (vdef(EXPOSURE)) {
598 +                if (!isflt(vval(EXPOSURE)))
599 +                        badvalue(EXPOSURE);
600                  if (vval(EXPOSURE)[0] == '+' || vval(EXPOSURE)[0] == '-')
601                          return(.5/pow(2.,atof(vval(EXPOSURE))));
602 <                if (isdigit(vval(EXPOSURE)[0]) || vval(EXPOSURE)[0] == '.')
584 <                        return(.5/atof(vval(EXPOSURE)));
585 <                badvalue(EXPOSURE);
602 >                return(.5/atof(vval(EXPOSURE)));
603          }
604          if (vlet(ZONE) == 'E')
605                  return(10.);
# Line 606 | Line 623 | register char  *op;
623          d *= 3./(siz[0]+siz[1]+siz[2]);
624          switch (vscale(DETAIL)) {
625          case LOW:
626 <                op = addarg(op, "-ps 16 -dp 16");
626 >                op = addarg(op, "-ps 16 -dp 64");
627                  sprintf(op, " -ar %d", (int)(4*d));
628                  op += strlen(op);
629                  break;
630          case MEDIUM:
631 <                op = addarg(op, "-ps 8 -dp 32");
631 >                op = addarg(op, "-ps 8 -dp 128");
632                  sprintf(op, " -ar %d", (int)(8*d));
633                  op += strlen(op);
634                  break;
635          case HIGH:
636 <                op = addarg(op, "-ps 4 -dp 64");
636 >                op = addarg(op, "-ps 4 -dp 256");
637                  sprintf(op, " -ar %d", (int)(16*d));
638                  op += strlen(op);
639                  break;
# Line 626 | Line 643 | register char  *op;
643                  op = addarg(op, "-ds .4");
644          else
645                  op = addarg(op, "-ds 0");
646 <        op = addarg(op, "-dt .2 -dc .25 -dr 0 -sj 0 -st .7");
646 >        op = addarg(op, "-dt .2 -dc .25 -dr 0 -sj 0 -st .5");
647          if (vdef(AMBFILE)) {
648                  sprintf(op, " -af %s", vval(AMBFILE));
649                  op += strlen(op);
# Line 634 | Line 651 | register char  *op;
651                  overture = 0;
652          switch (vscale(VARIABILITY)) {
653          case LOW:
654 <                op = addarg(op, "-aa .4 -ad 32");
654 >                op = addarg(op, "-aa .4 -ad 64");
655                  break;
656          case MEDIUM:
657 <                op = addarg(op, "-aa .3 -ad 64");
657 >                op = addarg(op, "-aa .3 -ad 128");
658                  break;
659          case HIGH:
660 <                op = addarg(op, "-aa .25 -ad 128");
660 >                op = addarg(op, "-aa .25 -ad 256");
661                  break;
662          }
663          op = addarg(op, "-as 0");
# Line 668 | Line 685 | register char  *op;
685          switch (vscale(DETAIL)) {
686          case LOW:
687                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 4" : "-ps 8");
688 <                op = addarg(op, "-dp 64");
688 >                op = addarg(op, "-dp 256");
689                  sprintf(op, " -ar %d", (int)(8*d));
690                  op += strlen(op);
691                  break;
692          case MEDIUM:
693                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 3" : "-ps 6");
694 <                op = addarg(op, "-dp 128");
694 >                op = addarg(op, "-dp 512");
695                  sprintf(op, " -ar %d", (int)(16*d));
696                  op += strlen(op);
697                  break;
698          case HIGH:
699                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 2" : "-ps 4");
700 <                op = addarg(op, "-dp 256");
700 >                op = addarg(op, "-dp 1024");
701                  sprintf(op, " -ar %d", (int)(32*d));
702                  op += strlen(op);
703                  break;
# Line 690 | Line 707 | register char  *op;
707                  op = addarg(op, "-ds .2 -dj .35");
708          else
709                  op = addarg(op, "-ds .3");
710 <        op = addarg(op, "-dt .1 -dc .5 -dr 1 -sj .7 -st .15");
710 >        op = addarg(op, "-dt .1 -dc .5 -dr 1 -sj .7 -st .1");
711          if (overture = vint(INDIRECT)) {
712                  sprintf(op, " -ab %d", overture);
713                  op += strlen(op);
# Line 702 | Line 719 | register char  *op;
719                  overture = 0;
720          switch (vscale(VARIABILITY)) {
721          case LOW:
722 <                op = addarg(op, "-aa .25 -ad 128 -as 0");
722 >                op = addarg(op, "-aa .25 -ad 196 -as 0");
723                  break;
724          case MEDIUM:
725 <                op = addarg(op, "-aa .2 -ad 300 -as 64");
725 >                op = addarg(op, "-aa .2 -ad 400 -as 64");
726                  break;
727          case HIGH:
728 <                op = addarg(op, "-aa .15 -ad 500 -as 128");
728 >                op = addarg(op, "-aa .15 -ad 768 -as 196");
729                  break;
730          }
731          d = ambval();
# Line 735 | Line 752 | register char  *op;
752          switch (vscale(DETAIL)) {
753          case LOW:
754                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 1" : "-ps 8");
755 <                op = addarg(op, "-dp 256");
755 >                op = addarg(op, "-dp 1024");
756                  sprintf(op, " -ar %d", (int)(16*d));
757                  op += strlen(op);
758                  break;
759          case MEDIUM:
760                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 1" : "-ps 5");
761 <                op = addarg(op, "-dp 512");
761 >                op = addarg(op, "-dp 2048");
762                  sprintf(op, " -ar %d", (int)(32*d));
763                  op += strlen(op);
764                  break;
765          case HIGH:
766                  op = addarg(op, vbool(PENUMBRAS) ? "-ps 1" : "-ps 3");
767 <                op = addarg(op, "-dp 1024");
767 >                op = addarg(op, "-dp 4096");
768                  sprintf(op, " -ar %d", (int)(64*d));
769                  op += strlen(op);
770                  break;
# Line 757 | Line 774 | register char  *op;
774                  op = addarg(op, "-ds .1 -dj .7");
775          else
776                  op = addarg(op, "-ds .2");
777 <        op = addarg(op, "-dt .05 -dc .75 -dr 3 -sj 1 -st .03");
777 >        op = addarg(op, "-dt .05 -dc .75 -dr 3 -sj 1 -st .01");
778          sprintf(op, " -ab %d", overture=vint(INDIRECT)+1);
779          op += strlen(op);
780          if (vdef(AMBFILE)) {
# Line 767 | Line 784 | register char  *op;
784                  overture = 0;
785          switch (vscale(VARIABILITY)) {
786          case LOW:
787 <                op = addarg(op, "-aa .15 -ad 200 -as 0");
787 >                op = addarg(op, "-aa .15 -ad 256 -as 0");
788                  break;
789          case MEDIUM:
790 <                op = addarg(op, "-aa .125 -ad 512 -as 128");
790 >                op = addarg(op, "-aa .125 -ad 512 -as 256");
791                  break;
792          case HIGH:
793 <                op = addarg(op, "-aa .08 -ad 850 -as 256");
793 >                op = addarg(op, "-aa .08 -ad 1024 -as 512");
794                  break;
795          }
796          d = ambval();
# Line 804 | Line 821 | char   *ro;
821                  fd = open(vval(OPTFILE), O_WRONLY|O_CREAT|O_TRUNC, 0666);
822                  if (fd < 0 || write(fd, ro, n) != n || close(fd) < 0)
823                          syserr(vval(OPTFILE));
824 <                sprintf(ro, " \"^%s\"", vval(OPTFILE));
824 >                sprintf(ro, " @%s", vval(OPTFILE));
825          }
826   #ifdef MSDOS
827          else if (n > 50) {
# Line 970 | Line 987 | getview(n, vn)                         /* get view n, or NULL if none */
987   int     n;
988   char    *vn;            /* returned view name */
989   {
990 <        register char   *mv = NULL;
990 >        register char   *mv;
991  
992          if (viewselect != NULL) {               /* command-line selected */
993                  if (n)                          /* only do one */
# Line 985 | Line 1002 | char   *vn;            /* returned view name */
1002                                  ;
1003                          *vn = '\0';
1004                  }
1005 +                                                /* view number? */
1006 +                if (isint(viewselect))
1007 +                        return(specview(nvalue(vv+VIEW, atoi(viewselect)-1)));
1008                                                  /* check list */
1009                  while ((mv = nvalue(vv+VIEW, n++)) != NULL)
1010                          if (matchword(viewselect, mv))
# Line 993 | Line 1013 | char   *vn;            /* returned view name */
1013          }
1014          mv = nvalue(vv+VIEW, n);                /* use view n */
1015          if (vn != NULL & mv != NULL) {
1016 <                if (*mv != '-')
1017 <                        while (*mv && !isspace(*mv))
1018 <                                *vn++ = *mv++;
1016 >                register char   *mv2 = mv;
1017 >                if (*mv2 != '-')
1018 >                        while (*mv2 && !isspace(*mv2))
1019 >                                *vn++ = *mv2++;
1020                  *vn = '\0';
1021          }
1022          return(specview(mv));
1023   }
1024  
1025  
1026 + printview(vopts)                        /* print out selected view */
1027 + register char   *vopts;
1028 + {
1029 +        extern char     *atos(), *getenv();
1030 +        char    buf[256];
1031 +        FILE    *fp;
1032 +        register char   *cp;
1033 +
1034 +        if (vopts == NULL)
1035 +                return(-1);
1036 +        fputs("VIEW=", stdout);
1037 +        do {
1038 +                if (matchword(vopts, "-vf")) {          /* expand view file */
1039 +                        vopts = sskip(vopts);
1040 +                        if (!*atos(buf, sizeof(buf), vopts))
1041 +                                return(-1);
1042 +                        if ((fp = fopen(buf, "r")) == NULL)
1043 +                                return(-1);
1044 +                        for (buf[sizeof(buf)-2] = '\n';
1045 +                                        fgets(buf, sizeof(buf), fp) != NULL &&
1046 +                                                buf[0] != '\n';
1047 +                                        buf[sizeof(buf)-2] = '\n') {
1048 +                                if (buf[sizeof(buf)-2] != '\n') {
1049 +                                        ungetc(buf[sizeof(buf)-2], fp);
1050 +                                        buf[sizeof(buf)-2] = '\0';
1051 +                                }
1052 +                                if (matchword(buf, "VIEW=") ||
1053 +                                                matchword(buf, "rview")) {
1054 +                                        for (cp = sskip(buf); *cp && *cp != '\n'; cp++)
1055 +                                                putchar(*cp);
1056 +                                }
1057 +                        }
1058 +                        fclose(fp);
1059 +                        vopts = sskip(vopts);
1060 +                } else {
1061 +                        while (isspace(*vopts))
1062 +                                vopts++;
1063 +                        putchar(' ');
1064 + #ifdef MSDOS
1065 +                        if (*vopts == '$') {            /* expand env. var. */
1066 +                                if (!*atos(buf, sizeof(buf), vopts+1))
1067 +                                        return(-1);
1068 +                                if ((cp = getenv(buf)) == NULL)
1069 +                                        return(-1);
1070 +                                fputs(cp, stdout);
1071 +                                vopts = sskip(vopts);
1072 +                        } else
1073 + #endif
1074 +                                while (*vopts && !isspace(*vopts))
1075 +                                        putchar(*vopts++);
1076 +                }
1077 +        } while (*vopts++);
1078 +        putchar('\n');
1079 +        return(0);
1080 + }
1081 +
1082 +
1083   rview(opts)                             /* run rview with first view */
1084   char    *opts;
1085   {
1086 +        char    *vw;
1087          char    combuf[512];
1088                                          /* build command */
1089 <        sprintf(combuf, "rview %s%s ", getview(0, NULL), opts);
1089 >        if ((vw = getview(0, NULL)) == NULL)
1090 >                return;
1091 >        if (sayview)
1092 >                printview(vw);
1093 >        sprintf(combuf, "rview %s%s -R %s ", vw, opts, rifname);
1094          if (rvdevice != NULL)
1095                  sprintf(combuf+strlen(combuf), "-o %s ", rvdevice);
1096          strcat(combuf, vval(OCTREE));
# Line 1062 | Line 1145 | char   *opts;
1145                                          /* do each view */
1146          vn = 0;
1147          while ((vw = getview(vn++, vs)) != NULL) {
1148 +                if (sayview)
1149 +                        printview(vw);
1150                  if (!vs[0])
1151                          sprintf(vs, "%d", vn);
1152                  sprintf(picfile, "%s_%s.pic", vval(PICTURE), vs);

Diff Legend

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