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

Comparing src/cv/tmesh2rad.c (file contents):
Revision 2.7 by greg, Wed Jun 15 19:06:02 1994 UTC vs.
Revision 2.18 by greg, Thu Apr 15 23:51:04 2021 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1994 Regents of the University of California */
2 –
1   #ifndef lint
2 < static char SCCSid[] = "$SunId$ LBL";
2 > static const char       RCSid[] = "$Id$";
3   #endif
6 –
4   /*
5   * Convert a trianglular mesh into a Radiance description.
6   *
# Line 32 | Line 29 | static char SCCSid[] = "$SunId$ LBL";
29   * It is not necessary for the normal vectors to have unit length.
30   */
31  
32 < #include "standard.h"
32 > #include <stdlib.h>
33 > #include <stdio.h>
34  
35 < #define  ABS(x)         ((x)>=0 ? (x) : -(x))
35 > #include "rtmath.h"
36  
37 + #include "tmesh.h"
38 +
39   #define VOIDID          "void"          /* this is defined in object.h */
40  
41 – #define CALNAME         "tmesh.cal"     /* the name of our auxiliary file */
41   #define PATNAME         "T-pat"         /* triangle pattern name (reused) */
42   #define TEXNAME         "T-nor"         /* triangle texture name (reused) */
43  
# Line 56 | Line 55 | typedef struct {
55   VERTEX  *vlist = NULL;          /* our vertex list */
56   int     nverts = 0;             /* number of vertices in our list */
57  
58 < typedef struct {
60 <        int     ax;             /* major axis */
61 <        FLOAT   tm[2][3];       /* transformation */
62 < } BARYCCM;
58 > #define novert(i)       (((i)<0)|((i)>=nverts) || !(vlist[i].flags&V_DEFINED))
59  
64 – #define novert(i)       ((i)<0|(i)>=nverts || !(vlist[i].flags&V_DEFINED))
65 –
60   #define CHUNKSIZ        128     /* vertex allocation chunk size */
61  
62   extern VERTEX   *vnew();        /* allocate a vertex (never freed) */
# Line 71 | Line 65 | char   *defmat = VOIDID;       /* default (starting) material
65   char    *defpat = "";           /* default (starting) picture name */
66   char    *defobj = "T";          /* default (starting) object name */
67  
68 + void convert(char *fname, FILE *fp);
69 + void triangle(char *pn,char *mod,char *obj, VERTEX *v1,VERTEX *v2,VERTEX *v3);
70 + VERTEX *vnew(int id, double x, double y, double z);
71 + void syntax(char *fn, FILE *fp, char *er);
72  
73 < main(argc, argv)                /* read in T-mesh files and convert */
74 < int     argc;
75 < char    *argv[];
73 >
74 > int
75 > main(           /* read in T-mesh files and convert */
76 >        int     argc,
77 >        char    *argv[]
78 > )
79   {
80          FILE    *fp;
81          int     i;
# Line 92 | Line 93 | char   *argv[];
93                          break;
94                  default:
95                          fprintf(stderr,
96 <                        "Usage: %s [-o obj][-m mat][-p pic] [file ..]\n",
96 >                        "Usage: %s [-o obj][-m mat][-p hdr] [file ..]\n",
97                                          argv[0]);
98                          exit(1);
99                  }
# Line 111 | Line 112 | char   *argv[];
112   }
113  
114  
115 < convert(fname, fp)              /* convert a T-mesh */
116 < char    *fname;
117 < FILE    *fp;
115 > void
116 > convert(                /* convert a T-mesh */
117 >        char    *fname,
118 >        FILE    *fp
119 > )
120   {
121          char    typ[4];
122          int     id[3];
# Line 121 | Line 124 | FILE   *fp;
124          char    picfile[128];
125          char    matname[64];
126          char    objname[64];
127 <        register int    i;
128 <        register VERTEX *lastv;
127 >        int     i;
128 >        VERTEX  *lastv;
129                                          /* start fresh */
130          i = nverts;
131          lastv = vlist;
# Line 204 | Line 207 | FILE   *fp;
207   }
208  
209  
210 < triangle(pn, mod, obj, v1, v2, v3)      /* put out a triangle */
211 < char    *pn, *mod, *obj;
212 < register VERTEX *v1, *v2, *v3;
210 > void
211 > triangle(       /* put out a triangle */
212 >        char    *pn,
213 >        char    *mod,
214 >        char    *obj,
215 >        VERTEX  *v1,
216 >        VERTEX  *v2,
217 >        VERTEX  *v3
218 > )
219   {
220 +        static char     vfmt[] = "%18.12g %18.12g %18.12g\n";
221          static int      ntri = 0;
222 +        int             flatness = ISFLAT;
223          BARYCCM bvecs;
224 <        FLOAT   bvm[3][3];
225 <        register int    i;
224 >        RREAL   bvm[3][3];
225 >        int     i;
226                                          /* compute barycentric coordinates */
227          if (v1->flags & v2->flags & v3->flags & (V_HASINDX|V_HASNORM))
228                  if (comp_baryc(&bvecs, v1->pos, v2->pos, v3->pos) < 0)
229                          return;
230 <                                        /* put out texture (if any) */
230 >                                        /* check flatness */
231          if (v1->flags & v2->flags & v3->flags & V_HASNORM) {
232 +                flatness = flat_tri(v1->pos, v2->pos, v3->pos,
233 +                                        v1->nor, v2->nor, v3->nor);
234 +                if (flatness == DEGEN)
235 +                        return;
236 +        }
237 +                                        /* put out texture (if any) */
238 +        if (flatness == ISBENT || flatness == RVBENT) {
239                  printf("\n%s texfunc %s\n", mod, TEXNAME);
240                  mod = TEXNAME;
241 <                printf("4 dx dy dz %s\n", CALNAME);
241 >                printf("4 dx dy dz %s\n", TCALNAME);
242                  printf("0\n");
243                  for (i = 0; i < 3; i++) {
244                          bvm[i][0] = v1->nor[i];
245                          bvm[i][1] = v2->nor[i];
246                          bvm[i][2] = v3->nor[i];
247                  }
248 <                put_baryc(&bvecs, bvm, 3);
248 >                fput_baryc(&bvecs, bvm, 3, stdout);
249          }
250                                          /* put out pattern (if any) */
251          if (*pn && (v1->flags & v2->flags & v3->flags & V_HASINDX)) {
252                  printf("\n%s colorpict %s\n", mod, PATNAME);
253                  mod = PATNAME;
254 <                printf("7 noneg noneg noneg %s %s u v\n", pn, CALNAME);
254 >                printf("7 noneg noneg noneg %s %s u v\n", pn, TCALNAME);
255                  printf("0\n");
256                  for (i = 0; i < 2; i++) {
257                          bvm[i][0] = v1->ndx[i];
258                          bvm[i][1] = v2->ndx[i];
259                          bvm[i][2] = v3->ndx[i];
260                  }
261 <                put_baryc(&bvecs, bvm, 2);
261 >                fput_baryc(&bvecs, bvm, 2, stdout);
262          }
263 <                                        /* put out triangle */
263 >                                        /* put out (reversed) triangle */
264          printf("\n%s polygon %s.%d\n", mod, obj, ++ntri);
265          printf("0\n0\n9\n");
266 <        printf("%18.12g %18.12g %18.12g\n", v1->pos[0],v1->pos[1],v1->pos[2]);
267 <        printf("%18.12g %18.12g %18.12g\n", v2->pos[0],v2->pos[1],v2->pos[2]);
268 <        printf("%18.12g %18.12g %18.12g\n", v3->pos[0],v3->pos[1],v3->pos[2]);
269 < }
270 <
271 <
272 < int
273 < comp_baryc(bcm, v1, v2, v3)             /* compute barycentric vectors */
256 < register BARYCCM        *bcm;
257 < FLOAT   *v1, *v2, *v3;
258 < {
259 <        FLOAT   *vt;
260 <        FVECT   va, vab, vcb;
261 <        double  d;
262 <        int     ax0, ax1;
263 <        register int    i, j;
264 <                                        /* compute major axis */
265 <        for (i = 0; i < 3; i++) {
266 <                vab[i] = v1[i] - v2[i];
267 <                vcb[i] = v3[i] - v2[i];
266 >        if (flatness == RVFLAT || flatness == RVBENT) {
267 >                printf(vfmt, v3->pos[0],v3->pos[1],v3->pos[2]);
268 >                printf(vfmt, v2->pos[0],v2->pos[1],v2->pos[2]);
269 >                printf(vfmt, v1->pos[0],v1->pos[1],v1->pos[2]);
270 >        } else {
271 >                printf(vfmt, v1->pos[0],v1->pos[1],v1->pos[2]);
272 >                printf(vfmt, v2->pos[0],v2->pos[1],v2->pos[2]);
273 >                printf(vfmt, v3->pos[0],v3->pos[1],v3->pos[2]);
274          }
269 –        fcross(va, vab, vcb);
270 –        bcm->ax = ABS(va[0]) > ABS(va[1]) ? 0 : 1;
271 –        bcm->ax = ABS(va[bcm->ax]) > ABS(va[2]) ? bcm->ax : 2;
272 –        ax0 = (bcm->ax + 1) % 3;
273 –        ax1 = (bcm->ax + 2) % 3;
274 –        for (j = 0; j < 2; j++) {
275 –                vab[0] = v1[ax0] - v2[ax0];
276 –                vcb[0] = v3[ax0] - v2[ax0];
277 –                vab[1] = v1[ax1] - v2[ax1];
278 –                vcb[1] = v3[ax1] - v2[ax1];
279 –                d = vcb[0]*vcb[0] + vcb[1]*vcb[1];
280 –                if (d <= FTINY)
281 –                        return(-1);
282 –                d = (vcb[0]*vab[0]+vcb[1]*vab[1])/d;
283 –                va[0] = vab[0] - vcb[0]*d;
284 –                va[1] = vab[1] - vcb[1]*d;
285 –                d = va[0]*va[0] + va[1]*va[1];
286 –                if (d <= FTINY)
287 –                        return(-1);
288 –                bcm->tm[j][0] = va[0] /= d;
289 –                bcm->tm[j][1] = va[1] /= d;
290 –                bcm->tm[j][2] = -(v2[ax0]*va[0]+v2[ax1]*va[1]);
291 –                                        /* rotate vertices */
292 –                vt = v1;
293 –                v1 = v2;
294 –                v2 = v3;
295 –                v3 = vt;
296 –        }
297 –        return(0);
275   }
276  
277  
301 – put_baryc(bcm, com, n)                  /* put barycentric coord. vectors */
302 – register BARYCCM        *bcm;
303 – register FLOAT  com[][3];
304 – int     n;
305 – {
306 –        double  a, b;
307 –        register int    i, j;
308 –
309 –        printf("%d\t%d\n", 1+3*n, bcm->ax);
310 –        for (i = 0; i < n; i++) {
311 –                a = com[i][0] - com[i][2];
312 –                b = com[i][1] - com[i][2];
313 –                printf("%14.8f %14.8f %14.8f\n",
314 –                        bcm->tm[0][0]*a + bcm->tm[1][0]*b,
315 –                        bcm->tm[0][1]*a + bcm->tm[1][1]*b,
316 –                        bcm->tm[0][2]*a + bcm->tm[1][2]*b + com[i][2]);
317 –        }
318 – }
319 –
320 –
278   VERTEX *
279 < vnew(id, x, y, z)                       /* create a new vertex */
280 < register int    id;
281 < double  x, y, z;
279 > vnew(                   /* create a new vertex */
280 >        int     id,
281 >        double  x,
282 >        double  y,
283 >        double  z
284 > )
285   {
286 <        register int    i;
286 >        int     i;
287  
288          if (id >= nverts) {             /* get some more */
289                  i = nverts;
# Line 331 | Line 291 | double x, y, z;
291                  if (vlist == NULL)
292                          vlist = (VERTEX *)malloc(nverts*sizeof(VERTEX));
293                  else
294 <                        vlist = (VERTEX *)realloc((char *)vlist,
294 >                        vlist = (VERTEX *)realloc((void *)vlist,
295                                          nverts*sizeof(VERTEX));
296                  if (vlist == NULL) {
297                          fprintf(stderr,
# Line 351 | Line 311 | double x, y, z;
311   }
312  
313  
314 < syntax(fn, fp, er)                      /* report syntax error and exit */
315 < char    *fn;
316 < register FILE   *fp;
317 < char    *er;
314 > void
315 > syntax(                 /* report syntax error and exit */
316 >        char    *fn,
317 >        FILE    *fp,
318 >        char    *er
319 > )
320   {
321          extern long     ftell();
322 <        register long   cpos;
323 <        register int    c;
322 >        long    cpos;
323 >        int     c;
324          int     lineno;
325  
326          if (fp == stdin)

Diff Legend

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