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

Comparing ray/src/common/rglmat.c (file contents):
Revision 3.1 by gwlarson, Tue Jun 9 11:18:35 1998 UTC vs.
Revision 3.6 by schorsch, Fri Nov 14 17:22:06 2003 UTC

# Line 1 | Line 1
1 /* Copyright (c) 1998 Silicon Graphics, Inc. */
2
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ SGI";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6
4   /*
5   * Routines for Radiance -> OpenGL materials.
6   */
7  
8 + #include "copyright.h"
9 +
10   #include "radogl.h"
11  
13 extern int      free(), freemtl();
14
12   int     domats = 1;                     /* are we doing materials? */
13  
14   LUTAB   mtab = LU_SINIT(free,freemtl);
15  
16  
17 + void
18   rgl_matclear()                  /* clean up materials */
19   {
20          lu_done(&mtab);
# Line 38 | Line 36 | char   *nam;
36   }
37  
38  
39 + int
40   o_default(o)                    /* default object is non-material modifier */
41   register OBJREC *o;
42   {
# Line 58 | Line 57 | register OBJREC        *o;
57                  freemtl(lup->data);
58          if ((lup->data = o->os) != NULL)        /* make material reference */
59                  ((MATREC *)lup->data)->nlinks++;
60 <        return;
60 >        return(0);
61   memerr:
62          error(SYSTEM, "out of memory in o_default");
63 +        return(0);
64   }
65  
66  
67 + int
68 + o_unsupported(o)                /* unsupported object primitive */
69 + OBJREC  *o;
70 + {
71 +        objerror(o, WARNING, "unsupported type");
72 +        return(0);
73 + }
74 +
75 +
76   MATREC *
77   newmaterial(nam)                /* get an entry for a new material */
78   char    *nam;
# Line 86 | Line 95 | char   *nam;
95          return((MATREC *)lup->data);
96   memerr:
97          error(SYSTEM, "out of memory in newmaterial");
98 +        return NULL; /* pro forma return */
99   }
100  
101  
102 < freemtl(mp)                     /* free a material */
103 < register MATREC *mp;
102 > void
103 > freemtl(p)                      /* free a material */
104 > void    *p;
105   {
106 +        register MATREC *mp = (MATREC *)p;
107 +
108          if (!--mp->nlinks)
109 <                free((char *)mp);
109 >                free((void *)mp);
110   }
111  
112  
113 + int
114   m_normal(o)                     /* compute normal material parameters */
115   register OBJREC *o;
116   {
# Line 125 | Line 139 | register OBJREC        *o;
139                  m->u.m.specexp = 2./(o->oargs.farg[4]*o->oargs.farg[4]);
140          if (m->u.m.specexp > MAXSPECEXP)
141                  m->u.m.specexp = MAXSPECEXP;
142 +        return(0);
143   }
144  
145  
146 + int
147   m_aniso(o)                      /* anisotropic material */
148   register OBJREC *o;
149   {
# Line 156 | Line 172 | register OBJREC        *o;
172                  m->u.m.specexp = 2./(o->oargs.farg[4]*o->oargs.farg[5]);
173          if (m->u.m.specexp > MAXSPECEXP)
174                  m->u.m.specexp = MAXSPECEXP;
175 +        return(0);
176   }
177  
178  
179 + int
180   m_glass(o)                      /* glass material (hopeless) */
181   OBJREC  *o;
182   {
# Line 169 | Line 187 | OBJREC *o;
187          setcolor(m->u.m.ambdiff, 0., 0., 0.);
188          setcolor(m->u.m.specular, .08, .08, .08);
189          m->u.m.specexp = MAXSPECEXP;
190 +        return(0);
191   }
192  
193  
194 + int
195   m_brdf(o)                       /* convert functional material */
196   register OBJREC *o;
197   {
# Line 195 | Line 215 | register OBJREC        *o;
215                  scalecolor(m->u.m.ambdiff, 1.-o->oargs.farg[4]);
216          }
217          m->u.m.specexp = UNKSPECEXP;
218 +        return(0);
219   }
220  
221  
222 + int
223   m_brdf2(o)                      /* convert advanced functional material */
224   register OBJREC *o;
225   {
# Line 214 | Line 236 | register OBJREC        *o;
236                                          /* guess the rest */
237          setcolor(m->u.m.specular, .1, .1, .1);
238          m->u.m.specexp = UNKSPECEXP;
239 +        return(0);
240   }
241  
242  
243 + int
244   m_light(o)                      /* convert light type */
245   register OBJREC *o;
246   {
# Line 242 | Line 266 | register OBJREC        *o;
266                  m->u.l.spotdir[0] = m->u.l.spotdir[1] = 0.;
267                  m->u.l.spotdir[2] = -1.;
268          }
269 +        return(0);
270   }
271  
272  
273 + int
274   m_mirror(o)                     /* convert mirror type */
275   register OBJREC *o;
276   {
# Line 258 | Line 284 | register OBJREC        *o;
284          setcolor(m->u.m.specular, o->oargs.farg[0],
285                          o->oargs.farg[1], o->oargs.farg[2]);
286          m->u.m.specexp = MAXSPECEXP;
287 +        return(0);
288   }
289  
290  
291 + int
292   m_prism(o)                      /* convert prism type */
293   register OBJREC *o;
294   {
# Line 271 | Line 299 | register OBJREC        *o;
299          setcolor(m->u.m.ambdiff, 0.2, 0.2, 0.2);
300          setcolor(m->u.m.specular, 0.1, 0.1, 0.1);
301          m->u.m.specexp = UNKSPECEXP;
302 +        return(0);
303   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines