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

Comparing ray/src/cv/obj2rad.c (file contents):
Revision 2.1 by greg, Tue Apr 12 17:12:42 1994 UTC vs.
Revision 2.6 by greg, Thu Apr 14 04:29:10 1994 UTC

# Line 7 | Line 7 | static char SCCSid[] = "$SunId$ LBL";
7   /*
8   * Convert a Wavefront .obj file to Radiance format.
9   *
10 < * Currently, we support only polygonal geometry, and faces
11 < * must be either quads or triangles for smoothing to work.
12 < * Also, texture indices only work for triangles, though
10 > * Currently, we support only polygonal geometry.  Non-planar
11 > * faces are broken rather haphazardly into triangles.
12 > * Also, texture map indices only work for triangles, though
13   * I'm not sure they work correctly.
14   */
15  
16   #include "standard.h"
17  
18 + #include "trans.h"
19 +
20   #include <ctype.h>
21  
20 #define VOIDID          "void"          /* this is defined in object.h */
21
22   #define TCALNAME        "tmesh.cal"     /* triangle interp. file */
23   #define QCALNAME        "surf.cal"      /* quad interp. file */
24   #define PATNAME         "M-pat"         /* mesh pattern name (reused) */
25   #define TEXNAME         "M-nor"         /* mesh texture name (reused) */
26 + #define DEFOBJ          "unnamed"       /* default object name */
27 + #define DEFMAT          "white"         /* default material name */
28  
29   #define  ABS(x)         ((x)>=0 ? (x) : -(x))
30  
# Line 32 | Line 34 | FVECT  *vlist;                 /* our vertex list */
34   int     nvs;                    /* number of vertices in our list */
35   FVECT   *vnlist;                /* vertex normal list */
36   int     nvns;
37 < FLOAT   (*vtlist)[2];           /* texture vertex list */
37 > FLOAT   (*vtlist)[2];           /* map vertex list */
38   int     nvts;
39  
40   typedef FLOAT   BARYCCM[3][4];  /* barycentric coordinate system */
41  
42 < typedef int     VNDX[3];        /* vertex index (point,texture,normal) */
42 > typedef int     VNDX[3];        /* vertex index (point,map,normal) */
43  
44 < #define CHUNKSIZ        128     /* vertex allocation chunk size */
44 > #define CHUNKSIZ        256     /* vertex allocation chunk size */
45  
46   #define MAXARG          64      /* maximum # arguments in a statement */
47  
48 < char    *defmat = VOIDID;       /* default (starting) material name */
49 < char    *defpat = "";           /* default (starting) picture name */
50 < char    *defobj = "F";          /* default (starting) object name */
48 >                                /* qualifiers */
49 > #define Q_MTL           0
50 > #define Q_MAP           1
51 > #define Q_GRP           2
52 > #define Q_OBJ           3
53 > #define Q_FAC           4
54 > #define NQUALS          5
55  
56 < char    picfile[128];           /* current picture file */
56 > char    *qname[NQUALS] = {
57 >        "Material",
58 >        "Map",
59 >        "Group",
60 >        "Object",
61 >        "Face",
62 > };
63 >
64 > QLIST   qlist = {NQUALS, qname};
65 >                                /* valid qualifier ids */
66 > IDLIST  qual[NQUALS];
67 >                                /* mapping rules */
68 > RULEHD  *ourmapping = NULL;
69 >
70 > char    *defmat = DEFMAT;       /* default (starting) material name */
71 > char    *defobj = DEFOBJ;       /* default (starting) object name */
72 >
73 > char    *getmtl(), *getonm();
74 >
75 > char    mapname[128];           /* current picture file */
76   char    matname[64];            /* current material name */
77 + char    group[16][32];          /* current group names */
78   char    objname[128];           /* current object name */
79 + char    *inpfile;               /* input file name */
80   int     lineno;                 /* current line number */
81 + int     faceno;                 /* current face number */
82  
55 int     nfaces;                 /* total number of faces output */
83  
84 <
58 < main(argc, argv)                /* read in T-mesh files and convert */
84 > main(argc, argv)                /* read in .obj file and convert */
85   int     argc;
86   char    *argv[];
87   {
88 <        FILE    *fp;
88 >        int     donames = 0;
89          int     i;
90  
91          for (i = 1; i < argc && argv[i][0] == '-'; i++)
# Line 67 | Line 93 | char   *argv[];
93                  case 'o':               /* object name */
94                          defobj = argv[++i];
95                          break;
96 <                case 'm':               /* default material */
97 <                        defmat = argv[++i];
96 >                case 'n':               /* just produce name list */
97 >                        donames++;
98                          break;
99 <                case 'p':               /* default picture */
100 <                        defpat = argv[++i];
99 >                case 'm':               /* use custom mapfile */
100 >                        ourmapping = getmapping(argv[++i], &qlist);
101                          break;
102                  default:
103 <                        fprintf(stderr,
78 <                        "Usage: %s [-o obj][-m mat][-p pic] [file ..]\n",
79 <                                        argv[0]);
80 <                        exit(1);
103 >                        goto userr;
104                  }
105 <        if (i >= argc)
106 <                convert("<stdin>", stdin);
107 <        else
108 <                for ( ; i < argc; i++) {
109 <                        if ((fp = fopen(argv[i], "r")) == NULL) {
110 <                                perror(argv[i]);
111 <                                exit(1);
105 >        if (i > argc | i < argc-1)
106 >                goto userr;
107 >        if (i == argc)
108 >                inpfile = "<stdin>";
109 >        else if (freopen(inpfile=argv[i], "r", stdin) == NULL) {
110 >                fprintf(stderr, "%s: cannot open\n", inpfile);
111 >                exit(1);
112 >        }
113 >        if (donames) {                          /* scan for ids */
114 >                getnames(stdin);
115 >                printf("filename \"%s\"\n", inpfile);
116 >                printf("filetype \"Wavefront\"\n");
117 >                write_quals(&qlist, qual, stdout);
118 >                printf("qualifier %s begin\n", qlist.qual[Q_FAC]);
119 >                printf("[%d:%d]\n", 1, faceno);
120 >                printf("end\n");
121 >        } else {                                /* translate file */
122 >                printf("# ");
123 >                printargs(argc, argv, stdout);
124 >                convert(stdin);
125 >        }
126 >        exit(0);
127 > userr:
128 >        fprintf(stderr, "Usage: %s [-o obj][-m mapping][-n] [file.obj]\n",
129 >                        argv[0]);
130 >        exit(1);
131 > }
132 >
133 >
134 > getnames(fp)                    /* get valid qualifier names */
135 > FILE    *fp;
136 > {
137 >        char    *argv[MAXARG];
138 >        int     argc;
139 >        ID      tmpid;
140 >        register int    i;
141 >
142 >        while (argc = getstmt(argv, fp))
143 >                switch (argv[0][0]) {
144 >                case 'f':                               /* face */
145 >                        if (!argv[0][1])
146 >                                faceno++;
147 >                        break;
148 >                case 'u':
149 >                        if (!strcmp(argv[0], "usemtl")) {       /* material */
150 >                                if (argc < 2)
151 >                                        break;          /* not fatal */
152 >                                tmpid.number = 0;
153 >                                tmpid.name = argv[1];
154 >                                findid(&qual[Q_MTL], &tmpid, 1);
155 >                        } else if (!strcmp(argv[0], "usemap")) {/* map */
156 >                                if (argc < 2 || !strcmp(argv[1], "off"))
157 >                                        break;          /* not fatal */
158 >                                tmpid.number = 0;
159 >                                tmpid.name = argv[1];
160 >                                findid(&qual[Q_MAP], &tmpid, 1);
161                          }
162 <                        convert(argv[i], fp);
163 <                        fclose(fp);
162 >                        break;
163 >                case 'o':               /* object name */
164 >                        if (argv[0][1] || argc < 2)
165 >                                break;
166 >                        tmpid.number = 0;
167 >                        tmpid.name = argv[1];
168 >                        findid(&qual[Q_OBJ], &tmpid, 1);
169 >                        break;
170 >                case 'g':               /* group name(s) */
171 >                        if (argv[0][1])
172 >                                break;
173 >                        tmpid.number = 0;
174 >                        for (i = 1; i < argc; i++) {
175 >                                tmpid.name = argv[i];
176 >                                findid(&qual[Q_GRP], &tmpid, 1);
177 >                        }
178 >                        break;
179                  }
93        exit(0);
180   }
181  
182  
183 < convert(fname, fp)              /* convert a T-mesh */
98 < char    *fname;
183 > convert(fp)                     /* convert a T-mesh */
184   FILE    *fp;
185   {
186          char    *argv[MAXARG];
187          int     argc;
188          int     nstats, nunknown;
189          register int    i;
105                                        /* start fresh */
106        freeverts();
107        strcpy(picfile, defpat);
108        strcpy(matname, defmat);
109        strcpy(objname, defobj);
110        lineno = 0;
111        nstats = nunknown = 0;
190  
191 <        printf("\n# Wavefront file read from: %s\n", fname);
191 >        nstats = nunknown = 0;
192                                          /* scan until EOF */
193          while (argc = getstmt(argv, fp)) {
194                  switch (argv[0][0]) {
# Line 118 | Line 196 | FILE   *fp;
196                          switch (argv[0][1]) {
197                          case '\0':                      /* point */
198                                  if (badarg(argc-1,argv+1,"fff"))
199 <                                        syntax(fname, lineno, "Bad vertex");
199 >                                        syntax("Bad vertex");
200                                  newv(atof(argv[1]), atof(argv[2]),
201                                                  atof(argv[3]));
202                                  break;
# Line 126 | Line 204 | FILE   *fp;
204                                  if (argv[0][2])
205                                          goto unknown;
206                                  if (badarg(argc-1,argv+1,"fff"))
207 <                                        syntax(fname, lineno, "Bad normal");
207 >                                        syntax("Bad normal");
208                                  if (!newvn(atof(argv[1]), atof(argv[2]),
209                                                  atof(argv[3])))
210 <                                        syntax(fname, lineno, "Zero normal");
210 >                                        syntax("Zero normal");
211                                  break;
212 <                        case 't':                       /* texture */
212 >                        case 't':                       /* texture map */
213                                  if (argv[0][2])
214                                          goto unknown;
215                                  if (badarg(argc-1,argv+1,"ff"))
# Line 145 | Line 223 | FILE   *fp;
223                  case 'f':                               /* face */
224                          if (argv[0][1])
225                                  goto unknown;
226 +                        faceno++;
227                          switch (argc-1) {
228                          case 0: case 1: case 2:
229 <                                syntax(fname, lineno, "Too few vertices");
229 >                                syntax("Too few vertices");
230                                  break;
231                          case 3:
232                                  if (!puttri(argv[1], argv[2], argv[3]))
233 <                                        syntax(fname, lineno, "Bad triangle");
233 >                                        syntax("Bad triangle");
234                                  break;
235                          case 4:
236                                  if (!putquad(argv[1], argv[2],
237                                                  argv[3], argv[4]))
238 <                                        syntax(fname, lineno, "Bad quad");
238 >                                        syntax("Bad quad");
239                                  break;
240                          default:
241                                  if (!putface(argc-1, argv+1))
242 <                                        syntax(fname, lineno, "Bad face");
242 >                                        syntax("Bad face");
243                                  break;
244                          }
245                          break;
# Line 173 | Line 252 | FILE   *fp;
252                                  if (argc < 2)
253                                          break;          /* not fatal */
254                                  if (!strcmp(argv[1], "off"))
255 <                                        picfile[0] = '\0';
255 >                                        mapname[0] = '\0';
256                                  else
257 <                                        strcpy(picfile, argv[1]);
257 >                                        strcpy(mapname, argv[1]);
258                          } else
259                                  goto unknown;
260                          break;
# Line 189 | Line 268 | FILE   *fp;
268                  case 'g':               /* group name(s) */
269                          if (argv[0][1])
270                                  goto unknown;
192                        if (argc < 2)
193                                break;          /* not fatal */
194                        objname[0] = '\0';
271                          for (i = 1; i < argc; i++)
272 <                                if (objname[0])
273 <                                        sprintf(objname+strlen(objname),
198 <                                                ".%s", argv[i]);
199 <                                else
200 <                                        strcpy(objname, argv[i]);
272 >                                strcpy(group[i-1], argv[i]);
273 >                        group[i-1][0] = '\0';
274                          break;
275                  case '#':               /* comment */
276                          break;
# Line 208 | Line 281 | FILE   *fp;
281                  }
282                  nstats++;
283          }
284 <        printf("# Done processing file: %s\n", fname);
284 >        printf("\n# Done processing file: %s\n", inpfile);
285          printf("# %d lines, %d statements, %d unrecognized\n",
286                          lineno, nstats, nunknown);
287   }
# Line 246 | Line 319 | FILE   *fp;
319  
320          return(i);
321   }
249                
322  
323 +
324 + char *
325 + getmtl()                                /* figure material for this face */
326 + {
327 +        register RULEHD *rp = ourmapping;
328 +
329 +        if (rp == NULL) {               /* no rule set */
330 +                if (matname[0])
331 +                        return(matname);
332 +                if (group[0][0])
333 +                        return(group[0]);
334 +                return(defmat);
335 +        }
336 +                                        /* check for match */
337 +        do {
338 +                if (matchrule(rp)) {
339 +                        if (!strcmp(rp->mnam, VOIDID))
340 +                                return(NULL);   /* match is null */
341 +                        return(rp->mnam);
342 +                }
343 +                rp = rp->next;
344 +        } while (rp != NULL);
345 +                                        /* no match found */
346 +        return(NULL);
347 + }
348 +
349 +
350 + char *
351 + getonm()                                /* invent a good name for object */
352 + {
353 +        static char     name[64];
354 +        register char   *cp1, *cp2;
355 +        register int    i;
356 +                                        /* check for preset */
357 +        if (objname[0])
358 +                return(objname);
359 +        if (!group[0][0])
360 +                return(defobj);
361 +        cp1 = name;                     /* else make name out of groups */
362 +        for (i = 0; group[i][0]; i++) {
363 +                cp2 = group[i];
364 +                if (cp1 > name)
365 +                        *cp1++ = '.';
366 +                while (*cp1 = *cp2++)
367 +                        if (++cp1 >= name+sizeof(name)-2) {
368 +                                *cp1 = '\0';
369 +                                return(name);
370 +                        }
371 +        }
372 +        return(name);
373 + }
374 +
375 +
376 + matchrule(rp)                           /* check for a match on this rule */
377 + register RULEHD *rp;
378 + {
379 +        ID      tmpid;
380 +        int     gotmatch;
381 +        register int    i;
382 +
383 +        if (rp->qflg & FL(Q_MTL)) {
384 +                if (!matname[0])
385 +                        return(0);
386 +                tmpid.number = 0;
387 +                tmpid.name = matname;
388 +                if (!matchid(&tmpid, &idm(rp)[Q_MTL]))
389 +                        return(0);
390 +        }
391 +        if (rp->qflg & FL(Q_MAP)) {
392 +                if (!mapname[0])
393 +                        return(0);
394 +                tmpid.number = 0;
395 +                tmpid.name = mapname;
396 +                if (!matchid(&tmpid, &idm(rp)[Q_MAP]))
397 +                        return(0);
398 +        }
399 +        if (rp->qflg & FL(Q_GRP)) {
400 +                tmpid.number = 0;
401 +                gotmatch = 0;
402 +                for (i = 0; group[i][0]; i++) {
403 +                        tmpid.name = group[i];
404 +                        gotmatch |= matchid(&tmpid, &idm(rp)[Q_GRP]);
405 +                }
406 +                if (!gotmatch)
407 +                        return(0);
408 +        }
409 +        if (rp->qflg & FL(Q_OBJ)) {
410 +                if (!objname[0])
411 +                        return(0);
412 +                tmpid.number = 0;
413 +                tmpid.name = objname;
414 +                if (!matchid(&tmpid, &idm(rp)[Q_OBJ]))
415 +                        return(0);
416 +        }
417 +        if (rp->qflg & FL(Q_FAC)) {
418 +                tmpid.name = NULL;
419 +                tmpid.number = faceno;
420 +                if (!matchid(&tmpid, &idm(rp)[Q_FAC]))
421 +                        return(0);
422 +        }
423 +        return(1);
424 + }
425 +
426 +
427   cvtndx(vi, vs)                          /* convert vertex string to index */
428   register VNDX   vi;
429   register char   *vs;
# Line 263 | Line 439 | register char  *vs;
439                          return(0);
440          } else
441                  return(0);
442 <                                        /* get texture */
442 >                                        /* get map */
443          while (*vs)
444                  if (*vs++ == '/')
445                          break;
# Line 295 | Line 471 | register char  *vs;
471   }
472  
473  
474 < putface(ac, av)                         /* put out an N-sided polygon */
474 > nonplanar(ac, av)                       /* are vertices are non-planar? */
475   register int    ac;
476   register char   **av;
477   {
478          VNDX    vi;
479 +        FLOAT   *p0, *p1;
480 +        FVECT   v1, v2, nsum, newn;
481 +        double  d;
482 +        register int    i;
483  
484 <        printf("\n%s polygon %s.%d\n", matname, objname, ++nfaces);
484 >        if (!cvtndx(vi, av[0]))
485 >                return(0);
486 >        if (vi[2] >= 0)
487 >                return(1);              /* has interpolated normals */
488 >        if (ac < 4)
489 >                return(0);              /* it's a triangle! */
490 >                                        /* set up */
491 >        p0 = vlist[vi[0]];
492 >        if (!cvtndx(vi, av[1]))
493 >                return(0);              /* error gets caught later */
494 >        nsum[0] = nsum[1] = nsum[2] = 0.;
495 >        p1 = vlist[vi[0]];
496 >        fvsum(v2, p1, p0, -1.0);
497 >        for (i = 2; i < ac; i++) {
498 >                VCOPY(v1, v2);
499 >                if (!cvtndx(vi, av[i]))
500 >                        return(0);
501 >                p1 = vlist[vi[0]];
502 >                fvsum(v2, p1, p0, -1.0);
503 >                fcross(newn, v1, v2);
504 >                if (normalize(newn) == 0.0) {
505 >                        if (i < 3)
506 >                                return(1);      /* can't deal with this */
507 >                        fvsum(nsum, nsum, nsum, 1./(i-2));
508 >                        continue;
509 >                }
510 >                d = fdot(newn,nsum);
511 >                if (d >= 0) {
512 >                        if (d < (1.0-FTINY)*(i-2))
513 >                                return(1);
514 >                        fvsum(nsum, nsum, newn, 1.0);
515 >                } else {
516 >                        if (d > -(1.0-FTINY)*(i-2))
517 >                                return(1);
518 >                        fvsum(nsum, nsum, newn, -1.0);
519 >                }
520 >        }
521 >        return(0);
522 > }
523 >
524 >
525 > putface(ac, av)                         /* put out an N-sided polygon */
526 > int     ac;
527 > register char   **av;
528 > {
529 >        VNDX    vi;
530 >        char    *mod;
531 >        register int    i;
532 >
533 >        if (nonplanar(ac, av)) {        /* break into quads and triangles */
534 >                while (ac > 3) {
535 >                        if (!putquad(av[0], av[1], av[2], av[3]))
536 >                                return(0);
537 >                                        /* remove two vertices & rotate */
538 >                        av[ac -= 2] = av[0];
539 >                        for (i = 0; i <= ac; i++)
540 >                                av[i] = av[i+2];
541 >                }
542 >                if (ac == 3 && !puttri(av[0], av[1], av[2]))
543 >                        return(0);
544 >                return(1);
545 >        }
546 >        if ((mod = getmtl()) == NULL)
547 >                return(-1);
548 >        printf("\n%s polygon %s.%d\n", mod, getonm(), faceno);
549          printf("0\n0\n%d\n", 3*ac);
550 <        while (ac--) {
551 <                if (!cvtndx(vi, *av++))
550 >        for (i = 0; i < ac; i++) {
551 >                if (!cvtndx(vi, av[i]))
552                          return(0);
553                  pvect(vlist[vi[0]]);
554          }
# Line 315 | Line 559 | register char  **av;
559   puttri(v1, v2, v3)                      /* put out a triangle */
560   char    *v1, *v2, *v3;
561   {
562 <        char    *mod = matname;
562 >        char    *mod;
563          VNDX    v1i, v2i, v3i;
564          BARYCCM bvecs;
565 +        int     texOK, patOK;
566  
567 +        if ((mod = getmtl()) == NULL)
568 +                return(-1);
569 +
570          if (!cvtndx(v1i, v1) || !cvtndx(v2i, v2) || !cvtndx(v3i, v3))
571                  return(0);
572                                          /* compute barycentric coordinates */
573 <        if ((v1i[2]>=0&&v2i[2]>=0&&v3i[2]>=0) ||
574 <                        (v1i[1]>=0&&v2i[1]>=0&&v3i[1]>=0))
573 >        texOK = (v1i[2]>=0 && v2i[2]>=0 && v3i[2]>=0);
574 >        patOK = mapname[0] && (v1i[1]>=0 && v2i[1]>=0 && v3i[1]>=0);
575 >        if (texOK | patOK)
576                  if (comp_baryc(bvecs, vlist[v1i[0]], vlist[v2i[0]],
577                                  vlist[v3i[0]]) < 0)
578 <                        return(0);
578 >                        return(-1);
579                                          /* put out texture (if any) */
580 <        if (v1i[2]>=0 && v2i[2]>=0 && v3i[2]>=0) {
580 >        if (texOK) {
581                  printf("\n%s texfunc %s\n", mod, TEXNAME);
582                  mod = TEXNAME;
583                  printf("4 dx dy dz %s\n", TCALNAME);
# Line 345 | Line 594 | char   *v1, *v2, *v3;
594                                  vnlist[v3i[2]][2]);
595          }
596                                          /* put out pattern (if any) */
597 <        if (picfile[0] && v1i[1]>=0 && v2i[1]>=0 && v3i[1]>=0) {
597 >        if (patOK) {
598                  printf("\n%s colorpict %s\n", mod, PATNAME);
599                  mod = PATNAME;
600 <                printf("7 noneg noneg noneg %s %s u v\n", picfile, TCALNAME);
600 >                printf("7 noneg noneg noneg %s %s u v\n", mapname, TCALNAME);
601                  printf("0\n18\n");
602                  put_baryc(bvecs);
603                  printf("\t%f %f %f\n", vtlist[v1i[1]][0],
# Line 357 | Line 606 | char   *v1, *v2, *v3;
606                                  vtlist[v2i[1]][1], vtlist[v3i[1]][1]);
607          }
608                                          /* put out triangle */
609 <        printf("\n%s polygon %s.%d\n", matname, objname, ++nfaces);
609 >        printf("\n%s polygon %s.%d\n", mod, getonm(), faceno);
610          printf("0\n0\n9\n");
611          pvect(vlist[v1i[0]]);
612          pvect(vlist[v2i[0]]);
# Line 417 | Line 666 | register BARYCCM       bcm;
666   }
667  
668  
669 < putquad(p0, p1, p2, p3)                 /* put out a quadrilateral */
670 < char  *p0, *p1, *p2, *p3;
669 > putquad(p0, p1, p3, p2)                 /* put out a quadrilateral */
670 > char  *p0, *p1, *p3, *p2;               /* names correspond to binary pos. */
671   {
672          VNDX  p0i, p1i, p2i, p3i;
673          FVECT  norm[4];
674 +        char  *mod, *name;
675          int  axis;
676          FVECT  v1, v2, vc1, vc2;
677          int  ok1, ok2;
678 +
679 +        if ((mod = getmtl()) == NULL)
680 +                return(-1);
681 +        name = getonm();
682                                          /* get actual indices */
683          if (!cvtndx(p0i,p0) || !cvtndx(p1i,p1) ||
684                          !cvtndx(p2i,p2) || !cvtndx(p3i,p3))
# Line 439 | Line 693 | char  *p0, *p1, *p2, *p3;
693          fcross(vc2, v1, v2);
694          ok2 = normalize(vc2) != 0.0;
695          if (!(ok1 | ok2))
696 <                return(0);
696 >                return(-1);
697                                          /* compute normal interpolation */
698          axis = norminterp(norm, p0i, p1i, p2i, p3i);
699  
700                                          /* put out quadrilateral? */
701 <        if (ok1 & ok2 && fdot(vc1,vc2) >= 1.0-FTINY*FTINY) {
702 <                printf("\n%s ", matname);
701 >        if (ok1 & ok2 && fabs(fdot(vc1,vc2)) >= 1.0-FTINY) {
702 >                printf("\n%s ", mod);
703                  if (axis != -1) {
704                          printf("texfunc %s\n", TEXNAME);
705                          printf("4 surf_dx surf_dy surf_dz %s\n", QCALNAME);
# Line 458 | Line 712 | char  *p0, *p1, *p2, *p3;
712                          pvect(v1);
713                          printf("\n%s ", TEXNAME);
714                  }
715 <                printf("polygon %s.%d\n", objname, ++nfaces);
715 >                printf("polygon %s.%d\n", name, faceno);
716                  printf("0\n0\n12\n");
717                  pvect(vlist[p0i[0]]);
718                  pvect(vlist[p1i[0]]);
# Line 468 | Line 722 | char  *p0, *p1, *p2, *p3;
722          }
723                                          /* put out triangles? */
724          if (ok1) {
725 <                printf("\n%s ", matname);
725 >                printf("\n%s ", mod);
726                  if (axis != -1) {
727                          printf("texfunc %s\n", TEXNAME);
728                          printf("4 surf_dx surf_dy surf_dz %s\n", QCALNAME);
# Line 480 | Line 734 | char  *p0, *p1, *p2, *p3;
734                          pvect(v1);
735                          printf("\n%s ", TEXNAME);
736                  }
737 <                printf("polygon %s.%d\n", objname, ++nfaces);
737 >                printf("polygon %s.%da\n", name, faceno);
738                  printf("0\n0\n9\n");
739                  pvect(vlist[p0i[0]]);
740                  pvect(vlist[p1i[0]]);
741                  pvect(vlist[p2i[0]]);
742          }
743          if (ok2) {
744 <                printf("\n%s ", matname);
744 >                printf("\n%s ", mod);
745                  if (axis != -1) {
746                          printf("texfunc %s\n", TEXNAME);
747                          printf("4 surf_dx surf_dy surf_dz %s\n", QCALNAME);
# Line 499 | Line 753 | char  *p0, *p1, *p2, *p3;
753                          pvect(v2);
754                          printf("\n%s ", TEXNAME);
755                  }
756 <                printf("polygon %s.%d\n", objname, ++nfaces);
756 >                printf("polygon %s.%db\n", name, faceno);
757                  printf("0\n0\n9\n");
758                  pvect(vlist[p2i[0]]);
759                  pvect(vlist[p1i[0]]);
# Line 633 | Line 887 | double x, y, z;
887  
888  
889   int
890 < newvt(x, y)                     /* create a new texture vertex */
890 > newvt(x, y)                     /* create a new texture map vertex */
891   double  x, y;
892   {
893          if (!(nvts%CHUNKSIZ)) {         /* allocate next block */
# Line 649 | Line 903 | double x, y;
903                          exit(1);
904                  }
905          }
906 <                                        /* assign new texture vertex */
906 >                                        /* assign new vertex */
907          vtlist[nvts][0] = x;
908          vtlist[nvts][1] = y;
909          return(++nvts);
910   }
911  
912  
913 < syntax(fn, ln, er)                      /* report syntax error and exit */
660 < char    *fn;
661 < int     ln;
913 > syntax(er)                      /* report syntax error and exit */
914   char    *er;
915   {
916          fprintf(stderr, "%s: Wavefront syntax error near line %d: %s\n",
917 <                        fn, ln, er);
917 >                        inpfile, lineno, er);
918          exit(1);
919   }

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines