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

Comparing ray/src/cv/tmesh2rad.c (file contents):
Revision 2.3 by greg, Fri Feb 18 13:11:35 1994 UTC vs.
Revision 2.6 by greg, Wed Jun 15 15:07:06 1994 UTC

# Line 34 | Line 34 | static char SCCSid[] = "$SunId$ LBL";
34  
35   #include "standard.h"
36  
37 + #define  ABS(x)         ((x)>=0 ? (x) : -(x))
38 +
39   #define VOIDID          "void"          /* this is defined in object.h */
40  
41   #define CALNAME         "tmesh.cal"     /* the name of our auxiliary file */
# Line 54 | Line 56 | typedef struct {
56   VERTEX  *vlist = NULL;          /* our vertex list */
57   int     nverts = 0;             /* number of vertices in our list */
58  
59 < typedef FLOAT   BARYCCM[3][4];
59 > typedef struct {
60 >        int     ax;             /* major axis */
61 >        FLOAT   tm[2][3];       /* transformation */
62 > } BARYCCM;
63  
64   #define novert(i)       ((i)<0|(i)>=nverts || !(vlist[i].flags&V_DEFINED))
65  
# Line 205 | Line 210 | register VERTEX        *v1, *v2, *v3;
210   {
211          static int      ntri = 0;
212          BARYCCM bvecs;
213 +        FVECT   bvm[3];
214 +        register int    i;
215                                          /* compute barycentric coordinates */
216          if (v1->flags & v2->flags & v3->flags & (V_HASINDX|V_HASNORM))
217 <                if (comp_baryc(bvecs, v1->pos, v2->pos, v3->pos) < 0)
217 >                if (comp_baryc(&bvecs, v1->pos, v2->pos, v3->pos) < 0)
218                          return;
219                                          /* put out texture (if any) */
220          if (v1->flags & v2->flags & v3->flags & V_HASNORM) {
221                  printf("\n%s texfunc %s\n", mod, TEXNAME);
222                  mod = TEXNAME;
223                  printf("4 dx dy dz %s\n", CALNAME);
224 <                printf("0\n21\n");
225 <                put_baryc(bvecs);
226 <                printf("\t%14.12g %14.12g %14.12g\n",
227 <                                v1->nor[0], v2->nor[0], v3->nor[0]);
228 <                printf("\t%14.12g %14.12g %14.12g\n",
229 <                                v1->nor[1], v2->nor[1], v3->nor[1]);
230 <                printf("\t%14.12g %14.12g %14.12g\n",
224 <                                v1->nor[2], v2->nor[2], v3->nor[2]);
224 >                printf("0\n");
225 >                for (i = 0; i < 3; i++) {
226 >                        bvm[i][0] = v1->nor[i];
227 >                        bvm[i][1] = v2->nor[i];
228 >                        bvm[i][2] = v3->nor[i];
229 >                }
230 >                put_baryc(&bvecs, bvm, 3);
231          }
232                                          /* put out pattern (if any) */
233          if (*pn && (v1->flags & v2->flags & v3->flags & V_HASINDX)) {
234                  printf("\n%s colorpict %s\n", mod, PATNAME);
235                  mod = PATNAME;
236                  printf("7 noneg noneg noneg %s %s u v\n", pn, CALNAME);
237 <                printf("0\n18\n");
238 <                put_baryc(bvecs);
239 <                printf("\t%f %f %f\n", v1->ndx[0], v2->ndx[0], v3->ndx[0]);
240 <                printf("\t%f %f %f\n", v1->ndx[1], v2->ndx[1], v3->ndx[1]);
237 >                printf("0\n");
238 >                for (i = 0; i < 2; i++) {
239 >                        bvm[i][0] = v1->ndx[i];
240 >                        bvm[i][1] = v2->ndx[i];
241 >                        bvm[i][2] = v3->ndx[i];
242 >                }
243 >                put_baryc(&bvecs, bvm, 2);
244          }
245                                          /* put out triangle */
246          printf("\n%s polygon %s.%d\n", mod, obj, ++ntri);
# Line 244 | Line 253 | register VERTEX        *v1, *v2, *v3;
253  
254   int
255   comp_baryc(bcm, v1, v2, v3)             /* compute barycentric vectors */
256 < register BARYCCM        bcm;
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 <
265 <        for (j = 0; j < 3; j++) {
266 <                for (i = 0; i < 3; i++) {
267 <                        vab[i] = v1[i] - v2[i];
268 <                        vcb[i] = v3[i] - v2[i];
269 <                }
270 <                d = DOT(vcb,vcb);
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];
268 >        }
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 = DOT(vcb,vab)/d;
283 <                for (i = 0; i < 3; i++)
284 <                        va[i] = vab[i] - vcb[i]*d;
285 <                d = DOT(va,va);
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 <                for (i = 0; i < 3; i++) {
289 <                        va[i] /= d;
290 <                        bcm[j][i] = va[i];
272 <                }
273 <                bcm[j][3] = -DOT(v2,va);
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;
# Line 281 | Line 298 | FLOAT  *v1, *v2, *v3;
298   }
299  
300  
301 < put_baryc(bcm)                          /* put barycentric coord. vectors */
302 < register BARYCCM        bcm;
301 > put_baryc(bcm, com, n)                  /* put barycentric coord. vectors */
302 > register BARYCCM        *bcm;
303 > register FVECT  com[];
304 > int     n;
305   {
306 <        register int    i;
306 >        double  a, b;
307 >        register int    i, j;
308  
309 <        for (i = 0; i < 3; i++)
310 <                printf("%14.8f %14.8f %14.8f %14.8f\n",
311 <                                bcm[i][0], bcm[i][1], bcm[i][2], bcm[i][3]);
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  
# Line 299 | Line 325 | double x, y, z;
325   {
326          register int    i;
327  
328 <        if (id > nverts) {              /* get some more */
328 >        if (id >= nverts) {             /* get some more */
329                  i = nverts;
330 <                nverts = CHUNKSIZ*((id%CHUNKSIZ)+1);
330 >                nverts = CHUNKSIZ*((id/CHUNKSIZ)+1);
331                  if (vlist == NULL)
332                          vlist = (VERTEX *)malloc(nverts*sizeof(VERTEX));
333                  else

Diff Legend

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