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

Comparing ray/src/common/readmesh.c (file contents):
Revision 2.1 by greg, Tue Mar 11 17:08:55 2003 UTC vs.
Revision 2.19 by greg, Tue Feb 7 20:28:16 2023 UTC

# Line 5 | Line 5 | static const char RCSid[] = "$Id$";
5   *  Routines for reading a compiled mesh from a file
6   */
7  
8 + #include  <time.h>
9 +
10 + #include  "platform.h"
11   #include  "standard.h"
12   #include  "octree.h"
13   #include  "object.h"
14   #include  "mesh.h"
15 + #include  "resolu.h"
16  
17   static char     *meshfn;        /* input file name */
18   static FILE     *meshfp;        /* mesh file pointer */
# Line 31 | Line 35 | static long
35   mgetint(siz)                            /* get a siz-byte integer */
36   int  siz;
37   {
38 <        register long  r;
38 >        long  r = getint(siz, meshfp);
39  
40 <        r = getint(siz, meshfp);
37 <        if (feof(meshfp))
40 >        if (r == EOF && feof(meshfp))
41                  mesherror(USER, "truncated mesh file");
42 +
43          return(r);
44   }
45  
# Line 43 | Line 47 | int  siz;
47   static double
48   mgetflt()                               /* get a floating point number */
49   {
50 <        double  r;
50 >        double  r = getflt(meshfp);
51  
52 <        r = getflt(meshfp);
49 <        if (feof(meshfp))
52 >        if (r == (double)EOF && feof(meshfp))
53                  mesherror(USER, "truncated mesh file");
54 +
55          return(r);
56   }
57          
# Line 56 | Line 60 | static OCTREE
60   getfullnode()                           /* get a set, return fullnode */
61   {
62          OBJECT  set[MAXSET+1];
63 <        register int  i;
63 >        int  i;
64  
65          if ((set[0] = mgetint(objsize)) > MAXSET)
66                  mesherror(USER, "bad set in getfullnode");
# Line 69 | Line 73 | getfullnode()                          /* get a set, return fullnode */
73   static OCTREE
74   gettree()                               /* get a pre-ordered octree */
75   {
76 <        register OCTREE  ot;
77 <        register int  i;
76 >        OCTREE   ot;
77 >        int  i;
78          
79          switch (getc(meshfp)) {
80 <        case OT_EMPTY:
81 <                return(EMPTY);
82 <        case OT_FULL:
83 <                return(getfullnode());
84 <        case OT_TREE:
85 <                if ((ot = octalloc()) == EMPTY)
86 <                        mesherror(SYSTEM, "out of tree space in readmesh");
87 <                for (i = 0; i < 8; i++)
88 <                        octkid(ot, i) = gettree();
89 <                return(ot);
90 <        case EOF:
91 <                mesherror(USER, "truncated mesh octree");
92 <        default:
93 <                mesherror(USER, "damaged mesh octree");
80 >                case OT_EMPTY:
81 >                        return(EMPTY);
82 >                case OT_FULL:
83 >                        return(getfullnode());
84 >                case OT_TREE:
85 >                        if ((ot = octalloc()) == EMPTY)
86 >                                mesherror(SYSTEM, "out of tree space in readmesh");
87 >                        for (i = 0; i < 8; i++)
88 >                                octkid(ot, i) = gettree();
89 >                        return(ot);
90 >                case EOF:
91 >                        mesherror(USER, "truncated mesh octree");
92 >                default:
93 >                        mesherror(USER, "damaged mesh octree");
94          }
95 +        return (OCTREE)0;       /* pro forma return */
96   }
97  
98  
99   static void
100   skiptree()                              /* skip octree on input */
101   {
102 <        register int  i;
102 >        int  i;
103          
104          switch (getc(meshfp)) {
105          case OT_EMPTY:
# Line 118 | Line 123 | skiptree()                             /* skip octree on input */
123  
124   static void
125   getpatch(pp)                            /* load a mesh patch */
126 < register MESHPATCH      *pp;
126 > MESHPATCH       *pp;
127   {
128          int     flags;
129          int     i, j;
# Line 128 | Line 133 | register MESHPATCH     *pp;
133                  mesherror(USER, "bad patch flags");
134                                          /* allocate vertices */
135          pp->nverts = mgetint(2);
136 <        if (pp->nverts <= 0 || pp->nverts > 256)
136 >        if ((pp->nverts <= 0) | (pp->nverts > 256))
137                  mesherror(USER, "bad number of patch vertices");
138 <        pp->xyz = (uint4 (*)[3])malloc(pp->nverts*3*sizeof(uint4));
138 >        pp->xyz = (uint32 (*)[3])malloc(pp->nverts*3*sizeof(uint32));
139          if (pp->xyz == NULL)
140                  goto nomem;
141          if (flags & MT_N) {
142 <                pp->norm = (int4 *)calloc(pp->nverts, sizeof(int4));
142 >                pp->norm = (int32 *)calloc(pp->nverts, sizeof(int32));
143                  if (pp->norm == NULL)
144                          goto nomem;
145          } else
146                  pp->norm = NULL;
147          if (flags & MT_UV) {
148 <                pp->uv = (uint4 (*)[2])calloc(pp->nverts, 2*sizeof(uint4));
148 >                pp->uv = (uint32 (*)[2])calloc(pp->nverts, 2*sizeof(uint32));
149                  if (pp->uv == NULL)
150                          goto nomem;
151          } else
# Line 160 | Line 165 | register MESHPATCH     *pp;
165                                  pp->uv[i][j] = mgetint(4);
166                                          /* local triangles */
167          pp->ntris = mgetint(2);
168 <        if (pp->ntris < 0 || pp->ntris > 512)
168 >        if ((pp->ntris < 0) | (pp->ntris > 512))
169                  mesherror(USER, "bad number of local triangles");
170          if (pp->ntris) {
171                  pp->tri = (struct PTri *)malloc(pp->ntris *
# Line 174 | Line 179 | register MESHPATCH     *pp;
179                  }
180          } else
181                  pp->tri = NULL;
182 +                                        /* local triangle material(s) */
183 +        if (mgetint(2) > 1) {
184 +                pp->trimat = (int16 *)malloc(pp->ntris*sizeof(int16));
185 +                if (pp->trimat == NULL)
186 +                        goto nomem;
187 +                for (i = 0; i < pp->ntris; i++)
188 +                        pp->trimat[i] = mgetint(2);
189 +        } else {
190 +                pp->solemat = mgetint(2);
191 +                pp->trimat = NULL;
192 +        }
193                                          /* joiner triangles */
194          pp->nj1tris = mgetint(2);
195 <        if (pp->nj1tris < 0 || pp->nj1tris > 512)
195 >        if ((pp->nj1tris < 0) | (pp->nj1tris > 256))
196                  mesherror(USER, "bad number of joiner triangles");
197          if (pp->nj1tris) {
198                  pp->j1tri = (struct PJoin1 *)malloc(pp->nj1tris *
# Line 187 | Line 203 | register MESHPATCH     *pp;
203                          pp->j1tri[i].v1j = mgetint(4);
204                          pp->j1tri[i].v2 = mgetint(1);
205                          pp->j1tri[i].v3 = mgetint(1);
206 +                        pp->j1tri[i].mat = mgetint(2);
207                  }
208          } else
209                  pp->j1tri = NULL;
210                                          /* double joiner triangles */
211          pp->nj2tris = mgetint(2);
212 <        if (pp->nj2tris < 0 || pp->nj2tris > 256)
212 >        if ((pp->nj2tris < 0) | (pp->nj2tris > 256))
213                  mesherror(USER, "bad number of double joiner triangles");
214          if (pp->nj2tris) {
215                  pp->j2tri = (struct PJoin2 *)malloc(pp->nj2tris *
# Line 203 | Line 220 | register MESHPATCH     *pp;
220                          pp->j2tri[i].v1j = mgetint(4);
221                          pp->j2tri[i].v2j = mgetint(4);
222                          pp->j2tri[i].v3 = mgetint(1);
223 +                        pp->j2tri[i].mat = mgetint(2);
224                  }
225          } else
226                  pp->j2tri = NULL;
# Line 218 | Line 236 | MESH   *mp;
236   char    *path;
237   int     flags;
238   {
239 +        char    *err;
240          char    sbuf[64];
241          int     i;
242                                          /* check what's loaded */
# Line 230 | Line 249 | int    flags;
249                  sprintf(errmsg, "cannot open mesh file \"%s\"", path);
250                  error(SYSTEM, errmsg);
251          }
252 < #ifdef MSDOS
253 <        setmode(fileno(meshfp), O_BINARY);
252 >        SET_FILE_BINARY(meshfp);
253 > #ifdef getc_unlocked                    /* avoid stupid semaphores */
254 >        flockfile(meshfp);
255   #endif
256                                          /* read header */
257          checkheader(meshfp, MESHFMT, flags&IO_INFO ? stdout : (FILE *)NULL);
258                                          /* read format number */
259          objsize = getint(2, meshfp) - MESHMAGIC;
260 <        if (objsize <= 0 || objsize > MAXOBJSIZ || objsize > sizeof(long))
260 >        if ((objsize <= 0) | (objsize > MAXOBJSIZ) | (objsize > sizeof(long)))
261                  mesherror(USER, "incompatible mesh format");
262                                          /* read boundaries */
263          if (flags & IO_BOUNDS) {
# Line 259 | Line 279 | int    flags;
279                  mp->mcube.cutree = gettree();
280          else if (flags & IO_SCENE)
281                  skiptree();
282 <                                        /* read the patches */
282 >                                        /* read materials and patches */
283          if (flags & IO_SCENE) {
284 +                mp->mat0 = nobjects;
285 +                readscene(meshfp, objsize);
286 +                mp->nmats = nobjects - mp->mat0;
287                  mp->npatches = mgetint(4);
288                  mp->patch = (MESHPATCH *)calloc(mp->npatches,
289                                          sizeof(MESHPATCH));
# Line 270 | Line 293 | int    flags;
293                          getpatch(&mp->patch[i]);
294          }
295                                          /* clean up */
296 <        fclose(meshfp);
296 >        if (meshfp != stdin)
297 >                fclose(meshfp);
298 > #ifdef getc_unlocked
299 >        else
300 >                funlockfile(meshfp);
301 > #endif
302          mp->ldflags |= flags;
303 +                                        /* verify data */
304 +        if ((err = checkmesh(mp)) != NULL)
305 +                mesherror(USER, err);
306   }

Diff Legend

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