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

Comparing ray/src/cv/mgflib/context.c (file contents):
Revision 1.8 by greg, Sat Jun 25 11:55:45 1994 UTC vs.
Revision 1.12 by greg, Fri Jul 1 10:18:38 1994 UTC

# Line 26 | Line 26 | static C_VERTEX                c_unvertex = C_DEFVERTEX;
26  
27                                  /* the current contexts */
28   C_COLOR         *c_ccolor = &c_uncolor;
29 + char            *c_ccname = NULL;
30   C_MATERIAL      *c_cmaterial = &c_unmaterial;
31 + char            *c_cmname = NULL;
32   C_VERTEX        *c_cvertex = &c_unvertex;
33 + char            *c_cvname = NULL;
34  
35   static LUTAB    clr_tab = LU_SINIT(free,free);  /* color lookup table */
36   static LUTAB    mat_tab = LU_SINIT(free,free);  /* material lookup table */
# Line 58 | Line 61 | register char  **av;
61                  if (ac == 1) {          /* set unnamed color context */
62                          c_uncolor = c_dfcolor;
63                          c_ccolor = &c_uncolor;
64 +                        c_ccname = NULL;
65                          return(MG_OK);
66                  }
67                  lp = lu_find(&clr_tab, av[1]);  /* lookup context */
68                  if (lp == NULL)
69                          return(MG_EMEM);
70 +                c_ccolor = (C_COLOR *)lp->data;
71                  if (ac == 2) {          /* reestablish previous context */
72 <                        if (lp->data == NULL)
72 >                        if (c_ccolor == NULL)
73                                  return(MG_EUNDEF);
69 –                        c_ccolor = (C_COLOR *)lp->data;
74                          return(MG_OK);
75                  }
76                  if (av[2][0] != '=' || av[2][1])
77                          return(MG_ETYPE);
78 <                if (lp->key == NULL) {  /* create new color context */
78 >                if (c_ccolor == NULL) { /* create new color context */
79                          lp->key = (char *)malloc(strlen(av[1])+1);
80                          if (lp->key == NULL)
81                                  return(MG_EMEM);
# Line 79 | Line 83 | register char  **av;
83                          lp->data = (char *)malloc(sizeof(C_COLOR));
84                          if (lp->data == NULL)
85                                  return(MG_EMEM);
86 +                        c_ccolor = (C_COLOR *)lp->data;
87 +                        c_ccolor->clock = 0;
88                  }
89 <                c_ccolor = (C_COLOR *)lp->data;
89 >                c_ccname = lp->key;
90 >                i = c_ccolor->clock;
91                  if (ac == 3) {          /* use default template */
92                          *c_ccolor = c_dfcolor;
93 <                        c_ccolor->name = lp->key;
93 >                        c_ccolor->clock = i + 1;
94                          return(MG_OK);
95                  }
96                  lp = lu_find(&clr_tab, av[3]);  /* lookup template */
# Line 92 | Line 99 | register char  **av;
99                  if (lp->data == NULL)
100                          return(MG_EUNDEF);
101                  *c_ccolor = *(C_COLOR *)lp->data;
102 <                c_ccolor->name = lp->key;
96 <                c_ccolor->clock = 1;
97 <                if (ac > 4)
98 <                        return(MG_EARGC);
102 >                c_ccolor->clock = i + 1;
103                  return(MG_OK);
104          case MG_E_CXY:          /* assign CIE XY value */
105                  if (ac != 3)
# Line 144 | Line 148 | register char  **av;
148                                          w, (C_COLOR *)lp->data);
149                          wsum += w;
150                  }
151 +                c_ccolor->clock++;
152                  return(MG_OK);
153          }
154          return(MG_EUNK);
# Line 155 | Line 160 | c_hmaterial(ac, av)            /* handle material entity */
160   int     ac;
161   register char   **av;
162   {
163 +        int     i;
164          register LUENT  *lp;
165  
166          switch (mg_entity(av[0])) {
# Line 164 | Line 170 | register char  **av;
170                  if (ac == 1) {          /* set unnamed material context */
171                          c_unmaterial = c_dfmaterial;
172                          c_cmaterial = &c_unmaterial;
173 +                        c_cmname = NULL;
174                          return(MG_OK);
175                  }
176                  lp = lu_find(&mat_tab, av[1]);  /* lookup context */
177                  if (lp == NULL)
178                          return(MG_EMEM);
179 +                c_cmaterial = (C_MATERIAL *)lp->data;
180                  if (ac == 2) {          /* reestablish previous context */
181 <                        if (lp->data == NULL)
181 >                        if (c_cmaterial == NULL)
182                                  return(MG_EUNDEF);
175 –                        c_cmaterial = (C_MATERIAL *)lp->data;
183                          return(MG_OK);
184                  }
185                  if (av[2][0] != '=' || av[2][1])
186                          return(MG_ETYPE);
187 <                if (lp->key == NULL) {  /* create new material context */
187 >                if (c_cmaterial == NULL) {      /* create new material */
188                          lp->key = (char *)malloc(strlen(av[1])+1);
189                          if (lp->key == NULL)
190                                  return(MG_EMEM);
# Line 185 | Line 192 | register char  **av;
192                          lp->data = (char *)malloc(sizeof(C_MATERIAL));
193                          if (lp->data == NULL)
194                                  return(MG_EMEM);
195 +                        c_cmaterial = (C_MATERIAL *)lp->data;
196 +                        c_cmaterial->clock = 0;
197                  }
198 <                c_cmaterial = (C_MATERIAL *)lp->data;
198 >                c_cmname = lp->key;
199 >                i = c_cmaterial->clock;
200                  if (ac == 3) {          /* use default template */
201                          *c_cmaterial = c_dfmaterial;
202 <                        c_cmaterial->name = lp->key;
202 >                        c_cmaterial->clock = i + 1;
203                          return(MG_OK);
204                  }
205                  lp = lu_find(&mat_tab, av[3]);  /* lookup template */
# Line 198 | Line 208 | register char  **av;
208                  if (lp->data == NULL)
209                          return(MG_EUNDEF);
210                  *c_cmaterial = *(C_MATERIAL *)lp->data;
211 <                c_cmaterial->name = lp->key;
202 <                c_cmaterial->clock = 1;
203 <                if (ac > 4)
204 <                        return(MG_EARGC);
211 >                c_cmaterial->clock = i + 1;
212                  return(MG_OK);
213          case MG_E_RD:           /* set diffuse reflectance */
214                  if (ac != 2)
# Line 272 | Line 279 | c_hvertex(ac, av)              /* handle a vertex entity */
279   int     ac;
280   register char   **av;
281   {
282 +        int     i;
283          register LUENT  *lp;
284  
285          switch (mg_entity(av[0])) {
# Line 281 | Line 289 | register char  **av;
289                  if (ac == 1) {          /* set unnamed vertex context */
290                          c_unvertex = c_dfvertex;
291                          c_cvertex = &c_unvertex;
292 +                        c_cvname = NULL;
293                          return(MG_OK);
294                  }
295                  lp = lu_find(&vtx_tab, av[1]);  /* lookup context */
296                  if (lp == NULL)
297                          return(MG_EMEM);
298 +                c_cvertex = (C_VERTEX *)lp->data;
299                  if (ac == 2) {          /* reestablish previous context */
300 <                        if (lp->data == NULL)
300 >                        if (c_cvertex == NULL)
301                                  return(MG_EUNDEF);
292 –                        c_cvertex = (C_VERTEX *)lp->data;
302                          return(MG_OK);
303                  }
304                  if (av[2][0] != '=' || av[2][1])
305                          return(MG_ETYPE);
306 <                if (lp->key == NULL) {  /* create new vertex context */
306 >                if (c_cvertex == NULL) {        /* create new vertex context */
307                          lp->key = (char *)malloc(strlen(av[1])+1);
308                          if (lp->key == NULL)
309                                  return(MG_EMEM);
# Line 302 | Line 311 | register char  **av;
311                          lp->data = (char *)malloc(sizeof(C_VERTEX));
312                          if (lp->data == NULL)
313                                  return(MG_EMEM);
314 +                        c_cvertex = (C_VERTEX *)lp->data;
315                  }
316 <                c_cvertex = (C_VERTEX *)lp->data;
316 >                c_cvname = lp->key;
317 >                i = c_cvertex->clock;
318                  if (ac == 3) {          /* use default template */
319                          *c_cvertex = c_dfvertex;
320 <                        c_cvertex->name = lp->key
320 >                        c_cvertex->clock = i + 1;
321                          return(MG_OK);
322                  }
323                  lp = lu_find(&vtx_tab, av[3]);  /* lookup template */
# Line 315 | Line 326 | register char  **av;
326                  if (lp->data == NULL)
327                          return(MG_EUNDEF);
328                  *c_cvertex = *(C_VERTEX *)lp->data;
329 <                c_cvertex->name = lp->key
319 <                c_cvertex->clock = 1;
320 <                if (ac > 4)
321 <                        return(MG_EARGC);
329 >                c_cvertex->clock = i + 1;
330                  return(MG_OK);
331          case MG_E_POINT:        /* set point */
332                  if (ac != 4)
# Line 361 | Line 369 | c_clearall()                   /* empty context tables */
369   }
370  
371  
372 + C_MATERIAL *
373 + c_getmaterial(name)             /* get a named material */
374 + char    *name;
375 + {
376 +        register LUENT  *lp;
377 +
378 +        if ((lp = lu_find(&mat_tab, name)) == NULL)
379 +                return(NULL);
380 +        return((C_MATERIAL *)lp->data);
381 + }
382 +
383 +
384   C_VERTEX *
385   c_getvert(name)                 /* get a named vertex */
386   char    *name;
# Line 526 | Line 546 | double w1, w2;
546                  cres->cy = (w1 + w2) * scale;
547                  cres->flags = C_CDXY|C_CSXY;
548          }
529 –        cres->clock++;                  /* record the change */
549   }

Diff Legend

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