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

Comparing ray/src/ot/wfconv.c (file contents):
Revision 2.1 by greg, Tue Mar 11 17:08:55 2003 UTC vs.
Revision 2.8 by schorsch, Sat Mar 27 12:41:45 2004 UTC

# Line 11 | Line 11 | static const char RCSid[] = "$Id$";
11   #include "cvmesh.h"
12   #include <ctype.h>
13  
14 – FVECT   *vlist;                 /* our vertex list */
15 – int     nvs;                    /* number of vertices in our list */
16 – FVECT   *vnlist;                /* vertex normal list */
17 – int     nvns;
18 – FLOAT   (*vtlist)[2];           /* map vertex list */
19 – int     nvts;
20 –
14   typedef int     VNDX[3];        /* vertex index (point,map,normal) */
15  
16   #define CHUNKSIZ        1024    /* vertex allocation chunk size */
17  
18   #define MAXARG          64      /* maximum # arguments in a statement */
19  
20 < char    *inpfile;               /* input file name */
21 < int     lineno;                 /* current line number */
22 < int     faceno;                 /* current face number */
20 > static FVECT    *vlist;         /* our vertex list */
21 > static int      nvs;            /* number of vertices in our list */
22 > static FVECT    *vnlist;        /* vertex normal list */
23 > static int      nvns;
24 > static RREAL    (*vtlist)[2];   /* map vertex list */
25 > static int      nvts;
26  
27 + static char     *inpfile;       /* input file name */
28 + static int      havemats;       /* materials available? */
29 + static char     material[64];   /* current material name */
30 + static char     group[64];      /* current group name */
31 + static int      lineno;         /* current line number */
32 + static int      faceno;         /* current face number */
33  
34 < wfreadobj(objfn)                /* read in .OBJ file and convert */
35 < char    *objfn;
34 > static int getstmt(char *av[MAXARG], FILE       *fp);
35 > static int cvtndx(VNDX  vi, char        *vs);
36 > static int putface(int  ac, char        **av);
37 > static OBJECT getmod(void);
38 > static int puttri(char  *v1, char       *v2, char       *v3);
39 > static void freeverts(void);
40 > static int newv(double  x, double       y, double       z);
41 > static int newvn(double x, double       y, double       z);
42 > static int newvt(double x, double       y);
43 > static void syntax(char *er);
44 >
45 >
46 > void
47 > wfreadobj(              /* read in .OBJ file and convert */
48 >        char    *objfn
49 > )
50   {
51          FILE    *fp;
52          char    *argv[MAXARG];
53          int     argc;
54          int     nstats, nunknown;
39 –        int     i;
55  
56          if (objfn == NULL) {
57                  inpfile = "<stdin>";
# Line 45 | Line 60 | char   *objfn;
60                  sprintf(errmsg, "cannot open \"%s\"", inpfile);
61                  error(USER, errmsg);
62          }
63 +        havemats = (nobjects > 0);
64          nstats = nunknown = 0;
65 +        material[0] = '\0';
66 +        group[0] = '\0';
67          lineno = 0; faceno = 0;
68                                          /* scan until EOF */
69 <        while (argc = getstmt(argv, fp)) {
69 >        while ( (argc = getstmt(argv, fp)) ) {
70                  switch (argv[0][0]) {
71                  case 'v':               /* vertex */
72                          switch (argv[0][1]) {
73                          case '\0':                      /* point */
74                                  if (badarg(argc-1,argv+1,"fff"))
75 <                                        syntax("Bad vertex");
75 >                                        syntax("bad vertex");
76                                  newv(atof(argv[1]), atof(argv[2]),
77                                                  atof(argv[3]));
78                                  break;
# Line 62 | Line 80 | char   *objfn;
80                                  if (argv[0][2])
81                                          goto unknown;
82                                  if (badarg(argc-1,argv+1,"fff"))
83 <                                        syntax("Bad normal");
83 >                                        syntax("bad normal");
84                                  if (!newvn(atof(argv[1]), atof(argv[2]),
85                                                  atof(argv[3])))
86 <                                        syntax("Zero normal");
86 >                                        syntax("zero normal");
87                                  break;
88 <                        case 't':                       /* texture map */
88 >                        case 't':                       /* coordinate */
89                                  if (argv[0][2])
90                                          goto unknown;
91                                  if (badarg(argc-1,argv+1,"ff"))
# Line 84 | Line 102 | char   *objfn;
102                          faceno++;
103                          switch (argc-1) {
104                          case 0: case 1: case 2:
105 <                                syntax("Too few vertices");
105 >                                syntax("too few vertices");
106                                  break;
107                          case 3:
108                                  if (!puttri(argv[1], argv[2], argv[3]))
109 <                                        syntax("Bad triangle");
109 >                                        syntax("bad triangle");
110                                  break;
111                          default:
112                                  if (!putface(argc-1, argv+1))
113 <                                        syntax("Bad face");
113 >                                        syntax("bad face");
114                                  break;
115                          }
116                          break;
117 <                case 'u':
118 <                        if (strcmp(argv[0], "usemtl") &&
119 <                                        strcmp(argv[0], "usemap"))
117 >                case 'u':                               /* usemtl/usemap */
118 >                        if (!strcmp(argv[0], "usemap"))
119 >                                break;
120 >                        if (strcmp(argv[0], "usemtl"))
121                                  goto unknown;
122 +                        if (argc > 1)
123 +                                strcpy(material, argv[1]);
124 +                        else
125 +                                material[0] = '\0';
126                          break;
127                  case 'o':               /* object name */
128                          if (argv[0][1])
129                                  goto unknown;
130                          break;
131 <                case 'g':               /* group name(s) */
131 >                case 'g':               /* group name */
132                          if (argv[0][1])
133                                  goto unknown;
134 +                        if (argc > 1)
135 +                                strcpy(group, argv[1]);
136 +                        else
137 +                                group[0] = '\0';
138                          break;
139                  case '#':               /* comment */
140                          break;
# Line 129 | Line 156 | char   *objfn;
156   }
157  
158  
159 < int
160 < getstmt(av, fp)                         /* read the next statement from fp */
161 < register char   *av[MAXARG];
162 < FILE    *fp;
159 > static int
160 > getstmt(                                /* read the next statement from fp */
161 >        register char   *av[MAXARG],
162 >        FILE    *fp
163 > )
164   {
165 <        static char     sbuf[MAXARG*10];
165 >        static char     sbuf[MAXARG*16];
166          register char   *cp;
167          register int    i;
168  
# Line 162 | Line 190 | FILE   *fp;
190   }
191  
192  
193 < cvtndx(vi, vs)                          /* convert vertex string to index */
194 < register VNDX   vi;
195 < register char   *vs;
193 > static int
194 > cvtndx(                         /* convert vertex string to index */
195 >        register VNDX   vi,
196 >        register char   *vs
197 > )
198   {
199                                          /* get point */
200          vi[0] = atoi(vs);
# Line 209 | Line 239 | register char  *vs;
239   }
240  
241  
242 < putface(ac, av)                         /* put out an N-sided polygon */
243 < int     ac;
244 < register char   **av;
242 > static int
243 > putface(                                /* put out an N-sided polygon */
244 >        int     ac,
245 >        register char   **av
246 > )
247   {
216 –        VNDX            vi;
248          char            *cp;
249          register int    i;
250  
251          while (ac > 3) {                /* break into triangles */
252                  if (!puttri(av[0], av[1], av[2]))
222 –                        {
223 –                        fprintf(stderr, "f %s %s %s\n", av[0], av[1], av[2]);
253                          return(0);
225 –                        }
254                  ac--;                   /* remove vertex & rotate */
255                  cp = av[0];
256                  for (i = 0; i < ac-1; i++)
# Line 233 | Line 261 | register char  **av;
261   }
262  
263  
264 < puttri(v1, v2, v3)                      /* convert a triangle */
265 < char    *v1, *v2, *v3;
264 > static OBJECT
265 > getmod(void)                            /* get current modifier ID */
266   {
267 <        VNDX    v1i, v2i, v3i;
268 <        FLOAT   *v1c, *v2c, *v3c;
241 <        FLOAT   *v1n, *v2n, *v3n;
267 >        char    *mnam;
268 >        OBJECT  mod;
269  
270 <        if (!cvtndx(v1i, v1) || !cvtndx(v2i, v2) || !cvtndx(v3i, v3))
271 <                return(0);
270 >        if (!havemats)
271 >                return(OVOID);
272 >        if (!strcmp(material, VOIDID))
273 >                return(OVOID);
274 >        if (material[0])                /* prefer usemtl statements */
275 >                mnam = material;
276 >        else if (group[0])              /* else use group name */
277 >                mnam = group;
278 >        else
279 >                return(OVOID);
280 >        mod = modifier(mnam);
281 >        if (mod == OVOID) {
282 >                sprintf(errmsg, "%s: undefined modifier \"%s\"",
283 >                                inpfile, mnam);
284 >                error(USER, errmsg);
285 >        }
286 >        return(mod);
287 > }
288  
289 +
290 + static int
291 + puttri(                 /* convert a triangle */
292 +        char    *v1,
293 +        char    *v2,
294 +        char    *v3
295 + )
296 + {
297 +        VNDX    v1i, v2i, v3i;
298 +        RREAL   *v1c, *v2c, *v3c;
299 +        RREAL   *v1n, *v2n, *v3n;
300 +        
301 +        if (!cvtndx(v1i, v1) || !cvtndx(v2i, v2) || !cvtndx(v3i, v3)) {
302 +                error(WARNING, "bad vertex reference");
303 +                return(0);
304 +        }
305          if (v1i[1]>=0 && v2i[1]>=0 && v3i[1]>=0) {
306                  v1c = vtlist[v1i[1]];
307                  v2c = vtlist[v2i[1]];
# Line 257 | Line 316 | char   *v1, *v2, *v3;
316          } else
317                  v1n = v2n = v3n = NULL;
318          
319 <        return(cvtri(vlist[v1i[0]], vlist[v2i[0]], vlist[v3i[0]],
319 >        return(cvtri(getmod(), vlist[v1i[0]], vlist[v2i[0]], vlist[v3i[0]],
320                          v1n, v2n, v3n, v1c, v2c, v3c) >= 0);
321   }
322  
323  
324 < freeverts()                     /* free all vertices */
324 > static void
325 > freeverts(void)                 /* free all vertices */
326   {
327          if (nvs) {
328                  free((void *)vlist);
# Line 279 | Line 339 | freeverts()                    /* free all vertices */
339   }
340  
341  
342 < int
343 < newv(x, y, z)                   /* create a new vertex */
344 < double  x, y, z;
342 > static int
343 > newv(                   /* create a new vertex */
344 >        double  x,
345 >        double  y,
346 >        double  z
347 > )
348   {
349          if (!(nvs%CHUNKSIZ)) {          /* allocate next block */
350                  if (nvs == 0)
351                          vlist = (FVECT *)malloc(CHUNKSIZ*sizeof(FVECT));
352                  else
353 <                        vlist = (FVECT *)realloc((char *)vlist,
353 >                        vlist = (FVECT *)realloc((void *)vlist,
354                                          (nvs+CHUNKSIZ)*sizeof(FVECT));
355 <                if (vlist == NULL) {
356 <                        fprintf(stderr,
294 <                        "Out of memory while allocating vertex %d\n", nvs);
295 <                        exit(1);
296 <                }
355 >                if (vlist == NULL)
356 >                        error(SYSTEM, "out of memory in newv");
357          }
358                                          /* assign new vertex */
359          vlist[nvs][0] = x;
# Line 303 | Line 363 | double x, y, z;
363   }
364  
365  
366 < int
367 < newvn(x, y, z)                  /* create a new vertex normal */
368 < double  x, y, z;
366 > static int
367 > newvn(                  /* create a new vertex normal */
368 >        double  x,
369 >        double  y,
370 >        double  z
371 > )
372   {
373          if (!(nvns%CHUNKSIZ)) {         /* allocate next block */
374                  if (nvns == 0)
375                          vnlist = (FVECT *)malloc(CHUNKSIZ*sizeof(FVECT));
376                  else
377 <                        vnlist = (FVECT *)realloc((char *)vnlist,
377 >                        vnlist = (FVECT *)realloc((void *)vnlist,
378                                          (nvns+CHUNKSIZ)*sizeof(FVECT));
379 <                if (vnlist == NULL) {
380 <                        fprintf(stderr,
318 <                        "Out of memory while allocating normal %d\n", nvns);
319 <                        exit(1);
320 <                }
379 >                if (vnlist == NULL)
380 >                        error(SYSTEM, "out of memory in newvn");
381          }
382                                          /* assign new normal */
383          vnlist[nvns][0] = x;
# Line 329 | Line 389 | double x, y, z;
389   }
390  
391  
392 < int
393 < newvt(x, y)                     /* create a new texture map vertex */
394 < double  x, y;
392 > static int
393 > newvt(                  /* create a new texture map vertex */
394 >        double  x,
395 >        double  y
396 > )
397   {
398          if (!(nvts%CHUNKSIZ)) {         /* allocate next block */
399                  if (nvts == 0)
400 <                        vtlist = (FLOAT (*)[2])malloc(CHUNKSIZ*2*sizeof(FLOAT));
400 >                        vtlist = (RREAL (*)[2])malloc(CHUNKSIZ*2*sizeof(RREAL));
401                  else
402 <                        vtlist = (FLOAT (*)[2])realloc((char *)vtlist,
403 <                                        (nvts+CHUNKSIZ)*2*sizeof(FLOAT));
404 <                if (vtlist == NULL) {
405 <                        fprintf(stderr,
344 <                        "Out of memory while allocating texture vertex %d\n",
345 <                                        nvts);
346 <                        exit(1);
347 <                }
402 >                        vtlist = (RREAL (*)[2])realloc((void *)vtlist,
403 >                                        (nvts+CHUNKSIZ)*2*sizeof(RREAL));
404 >                if (vtlist == NULL)
405 >                        error(SYSTEM, "out of memory in newvt");
406          }
407                                          /* assign new vertex */
408          vtlist[nvts][0] = x;
# Line 353 | Line 411 | double x, y;
411   }
412  
413  
414 < syntax(er)                      /* report syntax error and exit */
415 < char    *er;
414 > static void
415 > syntax(                 /* report syntax error and exit */
416 >        char    *er
417 > )
418   {
419 <        fprintf(stderr, "%s: Wavefront syntax error near line %d: %s\n",
419 >        sprintf(errmsg, "%s: Wavefront syntax error near line %d: %s\n",
420                          inpfile, lineno, er);
421 <        exit(1);
421 >        error(USER, errmsg);
422   }

Diff Legend

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