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

Comparing src/common/modobject.c (file contents):
Revision 2.15 by greg, Sun Dec 8 19:25:36 2013 UTC vs.
Revision 2.21 by greg, Fri Dec 6 20:30:15 2024 UTC

# Line 29 | Line 29 | objndx(                                /* get object number from pointer */
29          OBJREC  *op
30   )
31   {
32 <        int  i, j;
32 >        int     i;
33 >        ssize_t j;
34  
35 <        for (i = nobjects>>OBJBLKSHFT; i >= 0; i--) {
35 >        for (i = (nobjects-1)>>OBJBLKSHFT; i >= 0; i--) {
36                  j = op - objblock[i];
37 <                if ((j >= 0) & (j < OBJBLKSIZ))
38 <                        return((i<<OBJBLKSHFT) + j);
37 >                if ((0 <= j) & (j < OBJBLKSIZ))
38 >                        return(((OBJECT)i<<OBJBLKSHFT) + (OBJECT)j);
39          }
40 <        return(OVOID);
40 >        return(OVOID);          /* not in our array -- may still be valid */
41   }
42  
43  
# Line 107 | Line 108 | eqobjects(                     /* check if two objects are equal */
108   )
109   {
110          OBJREC  *op1, *op2;
111 <        int     i;
111 >        int     i, n;
112  
113          while (obj1 != obj2) {
114                  if (obj1 == OVOID)
# Line 132 | Line 133 | eqobjects(                     /* check if two objects are equal */
133                  for (i = op1->oargs.nfargs; i-- > 0; )
134                          if (!eqreal(op1->oargs.farg[i], op2->oargs.farg[i]))
135                                  return(0);
136 <                for (i = op1->oargs.nsargs; i-- > 0; )
136 >                n = 0;
137 >                switch (op1->otype) {   /* special cases (KEEP CONSISTENT!) */
138 >                case MOD_ALIAS:
139 >                case MAT_ILLUM:
140 >                case MAT_MIRROR:
141 >                        n = (op1->oargs.nsargs > 0);
142 >                        break;
143 >                case MIX_FUNC:
144 >                case MIX_DATA:
145 >                case MIX_TEXT:
146 >                case MIX_PICT:
147 >                        n = 2*(op1->oargs.nsargs >= 2);
148 >                        break;
149 >                case MAT_CLIP:
150 >                        n = op1->oargs.nsargs;
151 >                        break;
152 >                }
153 >                                        /* check other string arguments */
154 >                for (i = op1->oargs.nsargs; i-- > n; )
155                          if (strcmp(op1->oargs.sarg[i], op2->oargs.sarg[i]))
156                                  return(0);
157 +                while (n-- > 0)         /* check modifier references */
158 +                        if (!eqobjects( lastmod(obj1, op1->oargs.sarg[n]),
159 +                                        lastmod(obj2, op2->oargs.sarg[n]) ))
160 +                                return(0);
161                  obj1 = op1->omod;
162                  obj2 = op2->omod;
163          }
# Line 152 | Line 175 | insertobject(                  /* insert new object into our list */
175          if (ismodifier(objptr(obj)->otype)) {
176                  i = otndx(objptr(obj)->oname, &modtab);
177                  if (eqobjects(obj, modtab.htab[i]))
178 <                        return;
178 >                        return; /* don't index if same as earlier def. */
179                  modtab.htab[i] = obj;
180          }
181   #ifdef  GETOBJ
# Line 167 | Line 190 | insertobject(                  /* insert new object into our list */
190  
191  
192   void
193 < clearobjndx(void)               /* clear object hash tables */
193 > truncobjndx(void)               /* remove bogus table entries past end */
194   {
195 <        if (modtab.htab != NULL) {
196 <                free((void *)modtab.htab);
197 <                modtab.htab = NULL;
198 <                modtab.hsiz = 100;
195 >        int     ndx;
196 >
197 >        if (nobjects <= 0) {
198 >                if (modtab.htab != NULL) {
199 >                        free((void *)modtab.htab);
200 >                        modtab.htab = NULL;
201 >                        modtab.hsiz = 100;
202 >                }
203 >                if (objtab.htab != NULL) {
204 >                        free((void *)objtab.htab);
205 >                        objtab.htab = NULL;
206 >                        objtab.hsiz = 100;
207 >                }
208 >                return;
209          }
210 <        if (objtab.htab != NULL) {
211 <                free((void *)objtab.htab);
212 <                objtab.htab = NULL;
213 <                objtab.hsiz = 100;
214 <        }
210 >        for (ndx = modtab.hsiz*(modtab.htab != NULL); ndx--; )
211 >                if (modtab.htab[ndx] >= nobjects)
212 >                        modtab.htab[ndx] = OVOID;
213 >
214 >        for (ndx = objtab.hsiz*(objtab.htab != NULL); ndx--; )
215 >                if (objtab.htab[ndx] >= nobjects)
216 >                        objtab.htab[ndx] = OVOID;
217   }
218  
219  
# Line 188 | Line 223 | nexthsiz(                      /* return next hash table size */
223   )
224   {
225          static int  hsiztab[] = {
226 <                251, 509, 1021, 2039, 4093, 8191, 16381, 0
226 >                251, 509, 1021, 2039, 4093, 8191, 16381,
227 >                32749, 65521, 131071, 262139, 0
228          };
229          int  *hsp;
230  
# Line 205 | Line 241 | otndx(                         /* get object table index for name */
241          struct ohtab  *tab
242   )
243   {
244 +        char    *onm;
245          OBJECT  *oldhtab;
246          int  hval, i;
247          int  ndx;
# Line 223 | Line 260 | otndx(                         /* get object table index for name */
260   tryagain:
261          for (i = 0; i < tab->hsiz; i++) {
262                  ndx = (hval + (unsigned long)i*i) % tab->hsiz;
263 <                if (tab->htab[ndx] == OVOID ||
227 <                                !strcmp(objptr(tab->htab[ndx])->oname, name))
263 >                if (tab->htab[ndx] == OVOID)
264                          return(ndx);
265 +                onm = objptr(tab->htab[ndx])->oname;
266 +                if (onm != NULL && !strcmp(onm, name))
267 +                        return(ndx);
268          }
269                                          /* table is full, reallocate */
270          oldhtab = tab->htab;
# Line 233 | Line 272 | tryagain:
272          tab->htab = NULL;
273          while (ndx--)
274                  if (oldhtab[ndx] != OVOID) {
275 <                        i = otndx(objptr(oldhtab[ndx])->oname, tab);
275 >                        onm = objptr(oldhtab[ndx])->oname;
276 >                        if (onm == NULL)
277 >                                continue;
278 >                        i = otndx(onm, tab);
279                          tab->htab[i] = oldhtab[ndx];
280                  }
281          free((void *)oldhtab);

Diff Legend

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