ViewVC Help
View File | Revision Log | Show Annotations | Download File | Root Listing
root/radiance/ray/src/cv/tmesh.c
Revision: 2.2
Committed: Wed Jul 24 13:07:47 1996 UTC (27 years, 10 months ago) by greg
Content type: text/plain
Branch: MAIN
Changes since 2.1: +25 -0 lines
Log Message:
added check for flat triangles with normals

File Contents

# User Rev Content
1 greg 2.1 /* Copyright (c) 1994 Regents of the University of California */
2    
3     #ifndef lint
4     static char SCCSid[] = "$SunId$ LBL";
5     #endif
6    
7     /*
8     * Compute and print barycentric coordinates for triangle meshes
9     */
10    
11     #include <stdio.h>
12    
13     #include "fvect.h"
14    
15     #include "tmesh.h"
16    
17     #define ABS(x) ((x) >= 0 ? (x) : -(x))
18    
19    
20     int
21 greg 2.2 flat_tri(v1, v2, v3, n1, n2, n3) /* determine if triangle is flat */
22     FVECT v1, v2, v3, n1, n2, n3;
23     {
24     double d1, d2, d3;
25     FVECT vt1, vt2, vn;
26     /* compute default normal */
27     vt1[0] = v2[0] - v1[0]; vt1[1] = v2[1] - v1[1]; vt1[2] = v2[2] - v1[2];
28     vt2[0] = v3[0] - v2[0]; vt2[1] = v3[1] - v2[1]; vt2[2] = v3[2] - v2[2];
29     fcross(vn, vt1, vt2);
30     if (normalize(vn) == 0.0)
31     return(DEGEN);
32     /* compare to supplied normals */
33     d1 = DOT(vn, n1); d2 = DOT(vn, n2); d3 = DOT(vn, n3);
34     if (d1 < 0 && d2 < 0 && d3 < 0) {
35     if (d1 > -COSTOL || d2 > -COSTOL || d3 > -COSTOL)
36     return(RVBENT);
37     return(RVFLAT);
38     }
39     if (d1 < COSTOL || d2 < COSTOL || d3 < COSTOL)
40     return(ISBENT);
41     return(ISFLAT);
42     }
43    
44    
45     int
46 greg 2.1 comp_baryc(bcm, v1, v2, v3) /* compute barycentric vectors */
47     register BARYCCM *bcm;
48     FLOAT *v1, *v2, *v3;
49     {
50     FLOAT *vt;
51     FVECT va, vab, vcb;
52     double d;
53     int ax0, ax1;
54     register int i, j;
55     /* compute major axis */
56     for (i = 0; i < 3; i++) {
57     vab[i] = v1[i] - v2[i];
58     vcb[i] = v3[i] - v2[i];
59     }
60     fcross(va, vab, vcb);
61     bcm->ax = ABS(va[0]) > ABS(va[1]) ? 0 : 1;
62     bcm->ax = ABS(va[bcm->ax]) > ABS(va[2]) ? bcm->ax : 2;
63     ax0 = (bcm->ax + 1) % 3;
64     ax1 = (bcm->ax + 2) % 3;
65     for (j = 0; j < 2; j++) {
66     vab[0] = v1[ax0] - v2[ax0];
67     vcb[0] = v3[ax0] - v2[ax0];
68     vab[1] = v1[ax1] - v2[ax1];
69     vcb[1] = v3[ax1] - v2[ax1];
70     d = vcb[0]*vcb[0] + vcb[1]*vcb[1];
71     if (d <= FTINY)
72     return(-1);
73     d = (vcb[0]*vab[0]+vcb[1]*vab[1])/d;
74     va[0] = vab[0] - vcb[0]*d;
75     va[1] = vab[1] - vcb[1]*d;
76     d = va[0]*va[0] + va[1]*va[1];
77     if (d <= FTINY)
78     return(-1);
79     bcm->tm[j][0] = va[0] /= d;
80     bcm->tm[j][1] = va[1] /= d;
81     bcm->tm[j][2] = -(v2[ax0]*va[0]+v2[ax1]*va[1]);
82     /* rotate vertices */
83     vt = v1;
84     v1 = v2;
85     v2 = v3;
86     v3 = vt;
87     }
88     return(0);
89     }
90    
91    
92     put_baryc(bcm, com, n) /* put barycentric coord. vectors */
93     register BARYCCM *bcm;
94     register FLOAT com[][3];
95     int n;
96     {
97     double a, b;
98     register int i, j;
99    
100     printf("%d\t%d\n", 1+3*n, bcm->ax);
101     for (i = 0; i < n; i++) {
102     a = com[i][0] - com[i][2];
103     b = com[i][1] - com[i][2];
104     printf("%14.8f %14.8f %14.8f\n",
105     bcm->tm[0][0]*a + bcm->tm[1][0]*b,
106     bcm->tm[0][1]*a + bcm->tm[1][1]*b,
107     bcm->tm[0][2]*a + bcm->tm[1][2]*b + com[i][2]);
108     }
109     }