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

Comparing ray/src/rt/rcontrib.c (file contents):
Revision 2.28 by greg, Wed Apr 27 21:11:32 2016 UTC vs.
Revision 2.42 by greg, Mon Feb 6 22:40:21 2023 UTC

# Line 21 | Line 21 | int    dimlist[MAXDIM];                /* sampling dimensions */
21   int     ndims = 0;                      /* number of sampling dimensions */
22   int     samplendx = 0;                  /* index for this sample */
23  
24 < static void     trace_contrib(RAY *r);  /* our trace callback */
25 < void    (*trace)() = trace_contrib;
24 > void    (*trace)() = NULL;              /* trace call (NULL before rcinit) */
25  
26   int     do_irrad = 0;                   /* compute irradiance? */
27  
28   int     rand_samp = 1;                  /* pure Monte Carlo sampling? */
29  
30   double  dstrsrc = 0.9;                  /* square source distribution */
31 < double  shadthresh = .03;               /* shadow threshold */
31 > double  shadthresh = 0.;                /* shadow threshold */
32   double  shadcert = .75;                 /* shadow certainty */
33   int     directrelay = 3;                /* number of source relays */
34   int     vspretest = 512;                /* virtual source pretest density */
# Line 41 | Line 40 | COLOR  salbedo = BLKCOLOR;             /* global scattering albedo
40   double  seccg = 0.;                     /* global scattering eccentricity */
41   double  ssampdist = 0.;                 /* scatter sampling distance */
42  
43 < double  specthresh = .15;               /* specular sampling threshold */
43 > double  specthresh = .02;               /* specular sampling threshold */
44   double  specjitter = 1.;                /* specular sampling jitter */
45  
46   int     backvis = 1;                    /* back face visibility */
# Line 52 | Line 51 | double minweight = 2e-3;               /* minimum ray weight */
51   char    *ambfile = NULL;                /* ambient file name */
52   COLOR   ambval = BLKCOLOR;              /* ambient value */
53   int     ambvwt = 0;                     /* initial weight for ambient value */
54 < double  ambacc = 0;                     /* ambient accuracy */
54 > double  ambacc = 0.;                    /* ambient accuracy */
55   int     ambres = 256;                   /* ambient resolution */
56   int     ambdiv = 350;                   /* ambient divisions */
57   int     ambssamp = 0;                   /* ambient super-samples */
# Line 67 | Line 66 | long   waitflush;                      /* how long until next flush */
66   RNUMBER lastray = 0;                    /* last ray number sent */
67   RNUMBER lastdone = 0;                   /* last ray output */
68  
69 + static void     trace_contrib(RAY *r);  /* our trace callback */
70 +
71   static void mcfree(void *p) { epfree((*(MODCONT *)p).binv); free(p); }
72  
73   LUTAB   modconttab = LU_SINIT(NULL,mcfree);     /* modifier lookup table */
74  
75   /************************** INITIALIZATION ROUTINES ***********************/
76  
77 < char *
77 > const char *
78   formstr(                                /* return format identifier */
79          int  f
80   )
# Line 101 | Line 102 | addmodifier(char *modn, char *outf, char *prms, char *
102                  sprintf(errmsg, "duplicate modifier '%s'", modn);
103                  error(USER, errmsg);
104          }
104 –        if (nmods >= MAXMODLIST) {
105 –                sprintf(errmsg, "too many modifiers (%d limit)", MAXMODLIST);
106 –                error(INTERNAL, errmsg);
107 –        }
105          if (!strcmp(modn, VOIDID)) {
106                  sprintf(errmsg, "cannot track '%s' modifier", VOIDID);
107                  error(USER, errmsg);
108          }
109 +        if (nmods >= modasiz) {         /* need bigger modifier array */
110 +                modasiz += modasiz/2 + 64;
111 +                if (modname == NULL)
112 +                        modname = (char **)malloc(modasiz*sizeof(char *));
113 +                else
114 +                        modname = (char **)realloc(modname, modasiz*sizeof(char *));
115 +                if (modname == NULL)
116 +                        error(SYSTEM, "Out of memory in addmodifier()");
117 +        }
118          modname[nmods++] = modn;        /* XXX assumes static string */
119          lep->key = modn;                /* XXX assumes static string */
120          if (binv == NULL)
# Line 135 | Line 141 | addmodifier(char *modn, char *outf, char *prms, char *
141          mp->modname = modn;             /* XXX assumes static string */
142          mp->params = prms;              /* XXX assumes static string */
143          mp->binv = ebinv;
144 +        mp->bin0 = 0;
145          mp->nbins = bincnt;
146          memset(mp->cbin, 0, sizeof(DCOLOR)*bincnt);
147 <                                        /* allocate output streams */
148 <        for (i = bincnt; i-- > 0; )
149 <                getostream(mp->outspec, mp->modname, i, 1);
147 >                                        /* figure out starting bin */
148 >        while (!getostream(mp->outspec, mp->modname, mp->bin0, 1))
149 >                mp->bin0++;
150 >                                        /* allocate other output streams */
151 >        for (i = 0; ++i < mp->nbins; )
152 >                getostream(mp->outspec, mp->modname, mp->bin0+i, 1);
153          lep->data = (char *)mp;
154          return(mp);
155   }
# Line 149 | Line 159 | addmodifier(char *modn, char *outf, char *prms, char *
159   void
160   addmodfile(char *fname, char *outf, char *prms, char *binv, int bincnt)
161   {
162 <        char    *mname[MAXMODLIST];
163 <        int     i;
164 <                                        /* find the file & store strings */
165 <        i = wordfile(mname, MAXMODLIST, getpath(fname, getrlibpath(), R_OK));
166 <        if (i < 0) {
167 <                sprintf(errmsg, "cannot find modifier file '%s'", fname);
162 >        char    *path = getpath(fname, getrlibpath(), R_OK);
163 >        char    mod[MAXSTR];
164 >        FILE    *fp;
165 >
166 >        if (path == NULL || (fp = fopen(path, "r")) == NULL) {
167 >                if (path == NULL)
168 >                        sprintf(errmsg, "cannot find modifier file '%s'", fname);
169 >                else
170 >                        sprintf(errmsg, "cannot load modifier file '%s'", path);
171                  error(SYSTEM, errmsg);
172          }
173 <        if (i >= MAXMODLIST-1) {
174 <                sprintf(errmsg, "too many modifiers (%d limit) in file '%s'",
175 <                                MAXMODLIST-1, fname);
176 <                error(INTERNAL, errmsg);
173 >        while (fgetword(mod, sizeof(mod), fp) != NULL)
174 >                addmodifier(savqstr(mod), outf, prms, binv, bincnt);
175 >        fclose(fp);
176 > }
177 >
178 >
179 > /* Check if we have any more rays left (and report progress) */
180 > int
181 > morays(void)
182 > {
183 >        static RNUMBER  total_rays;
184 >        static time_t   tstart, last_report;
185 >        time_t          tnow;
186 >
187 >        if (!raysleft)
188 >                return(1);      /* unknown total, so nothing to do or say */
189 >
190 >        if (report_intvl > 0 && (tnow = time(0)) >= last_report+report_intvl) {
191 >                if (!total_rays) {
192 >                        total_rays = raysleft;
193 >                        tstart = tnow;
194 >                } else {
195 >                        sprintf(errmsg, "%.2f%% done after %.3f hours\n",
196 >                                        100.-100.*raysleft/total_rays,
197 >                                        (1./3600.)*(tnow - tstart));
198 >                        eputs(errmsg);
199 >                }
200 >                last_report = tnow;
201          }
202 <        for (i = 0; mname[i]; i++)      /* add each one */
166 <                addmodifier(mname[i], outf, prms, binv, bincnt);
202 >        return(--raysleft);
203   }
204  
205  
206 + /* Quit program */
207   void
208 < quit(                   /* quit program */
208 > quit(
209          int  code
210   )
211   {
212          if (nchild > 0)         /* close children if any */
213                  end_children(code != 0);
214 +        else if (nchild < 0)
215 +                _exit(code);    /* avoid flush() in child */
216          exit(code);
217   }
218  
# Line 192 | Line 231 | rcinit(void)
231                                          /* set shared memory boundary */
232                  shm_boundary = strcpy((char *)malloc(16), "SHM_BOUNDARY");
233          }
234 +        trace = trace_contrib;          /* set up trace call-back */
235          for (i = 0; i < nsources; i++)  /* tracing to sources as well */
236                  source[i].sflags |= SFOLLOW;
237          if (yres > 0) {                 /* set up flushing & ray counts */
# Line 275 | Line 315 | eval_irrad(FVECT org, FVECT dir)
315          thisray.rmax = 0.0;
316          rayorigin(&thisray, PRIMARY, NULL, NULL);
317                                          /* pretend we hit surface */
318 <        thisray.rt = thisray.rot = 1e-5;
318 >        thisray.rxt = thisray.rot = 1e-5;
319          thisray.rod = 1.0;
320          VCOPY(thisray.ron, dir);
321          VSUM(thisray.rop, org, dir, 1e-4);
# Line 356 | Line 396 | rcontrib(void)
396                  }
397                  done_contrib();         /* accumulate/output */
398                  ++lastdone;
399 <                if (raysleft && !--raysleft)
399 >                if (!morays())
400                          break;          /* preemptive EOI */
401          }
402          if (nchild != -1 && (accumulate <= 0) | (account < accumulate)) {

Diff Legend

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