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

Comparing ray/src/ot/oconv.c (file contents):
Revision 1.11 by greg, Wed Aug 29 21:56:17 1990 UTC vs.
Revision 2.9 by greg, Thu Apr 14 05:02:06 1994 UTC

# Line 1 | Line 1
1 < /* Copyright (c) 1986 Regents of the University of California */
1 > /* Copyright (c) 1992 Regents of the University of California */
2  
3   #ifndef lint
4   static char SCCSid[] = "$SunId$ LBL";
# Line 18 | Line 18 | static char SCCSid[] = "$SunId$ LBL";
18  
19   #include  "otypes.h"
20  
21 < #define  OMARGIN        (10*FTINY)      /* margin around global cube */
21 > #include  "paths.h"
22  
23 < #define  MAXOBJFIL      63              /* maximum number of scene files */
23 > #define  OMARGIN        (10*FTINY)      /* margin around global cube */
24  
25 + #define  MAXOBJFIL      63              /* maximum number of scene files */
26 +
27   char  *progname;                        /* argv[0] */
28  
27 – char  *libpath;                         /* library search path */
28 –
29   int  nowarn = 0;                        /* supress warnings? */
30  
31   int  objlim = 5;                        /* # of objects before split */
# Line 37 | Line 37 | CUBE  thescene = {EMPTY, {0.0, 0.0, 0.0}, 0.0};                /* ou
37   char  *ofname[MAXOBJFIL+1];             /* object file names */
38   int  nfiles = 0;                        /* number of object files */
39  
40 < double  mincusize;                      /* minimum cube size from resolu */
40 > double  mincusize;                      /* minimum cube size from resolu */
41  
42   int  (*addobjnotify[])() = {NULL};      /* new object notifier functions */
43  
# Line 46 | Line 46 | main(argc, argv)               /* convert object files to an octree
46   int  argc;
47   char  **argv;
48   {
49 <        char  *getenv();
50 <        double  atof();
49 >        extern char  *getenv();
50          FVECT  bbmin, bbmax;
51          char  *infile = NULL;
52 +        int  inpfrozen = 0;
53          int  outflags = IO_ALL;
54 <        OBJECT  startobj;
54 >        OBJECT  startobj;
55          int  i;
56  
57 <        progname = argv[0];
57 >        progname = argv[0] = fixargv0(argv[0]);
58  
59 <        if ((libpath = getenv("RAYPATH")) == NULL)
60 <                libpath = ":/usr/local/lib/ray";
59 >        initotypes();
60  
61          for (i = 1; i < argc && argv[i][0] == '-'; i++)
62                  switch (argv[i][1]) {
63                  case '\0':                              /* scene from stdin */
64 +                        outflags &= ~IO_FILES;
65                          goto breakopt;
66                  case 'i':                               /* input octree */
67                          infile = argv[++i];
# Line 90 | Line 90 | char  **argv;
90                          break;
91                  }
92   breakopt:
93 + #ifdef MSDOS
94 +        setmode(fileno(stdout), O_BINARY);
95 + #endif
96          if (infile != NULL) {           /* get old octree & objects */
97                  if (thescene.cusize > FTINY)
98                          error(USER, "only one of '-b' or '-i'");
99                  nfiles = readoct(infile, IO_ALL, &thescene, ofname);
100 <                if (nfiles == 0 && outflags & IO_FILES) {
101 <                        error(WARNING, "frozen octree");
102 <                        outflags &= ~IO_FILES;
103 <                }
104 <        }
105 <
103 <        printargs(argc, argv, stdout);  /* info. header */
100 >                if (nfiles == 0)
101 >                        inpfrozen++;
102 >        } else
103 >                newheader("RADIANCE", stdout);  /* new binary file header */
104 >        printargs(argc, argv, stdout);
105 >        fputformat(OCTFMT, stdout);
106          printf("\n");
107  
108          startobj = nobjects;            /* previous objects already converted */
109 <        
109 >
110          for ( ; i < argc; i++)          /* read new scene descriptions */
111                  if (!strcmp(argv[i], "-")) {    /* from stdin */
112                          readobj(NULL);
# Line 116 | Line 118 | breakopt:
118                  }
119  
120          ofname[nfiles] = NULL;
121 +
122 +        if (inpfrozen && outflags & IO_FILES) {
123 +                error(WARNING, "frozen octree");
124 +                outflags &= ~IO_FILES;
125 +        }
126                                                  /* find bounding box */
127          bbmin[0] = bbmin[1] = bbmin[2] = FHUGE;
128          bbmax[0] = bbmax[1] = bbmax[2] = -FHUGE;
# Line 143 | Line 150 | breakopt:
150          }
151  
152          mincusize = thescene.cusize / resolu - FTINY;
153 <                
153 >
154          for (i = startobj; i < nobjects; i++)           /* add new objects */
155                  addobject(&thescene, i);
156 <        
156 >
157          thescene.cutree = combine(thescene.cutree);     /* optimize */
158  
159          writeoct(outflags, &thescene, ofname);  /* write structures to stdout */
# Line 191 | Line 198 | register char  *s;
198   }
199  
200  
201 < #define  bitop(f,i,op)          (f[((i)>>3)] op (1<<((i)&7)))
202 < #define  tstbit(f,i)            bitop(f,i,&)
203 < #define  setbit(f,i)            bitop(f,i,|=)
204 < #define  clrbit(f,i)            bitop(f,i,&=~)
205 < #define  tglbit(f,i)            bitop(f,i,^=)
201 > #define  bitop(f,i,op)          (f[((i)>>3)] op (1<<((i)&7)))
202 > #define  tstbit(f,i)            bitop(f,i,&)
203 > #define  setbit(f,i)            bitop(f,i,|=)
204 > #define  clrbit(f,i)            bitop(f,i,&=~)
205 > #define  tglbit(f,i)            bitop(f,i,^=)
206  
207  
208   addobject(cu, obj)                      /* add an object to a cube */
209   register CUBE  *cu;
210 < OBJECT  obj;
210 > OBJECT  obj;
211   {
212          CUBE  cukid;
213 <        OCTREE  ot;
214 <        OBJECT  oset[MAXSET+1];
215 <        unsigned char  inflg[MAXSET/8], volflg[MAXSET/8];
213 >        OCTREE  ot;
214 >        OBJECT  oset[MAXSET+1];
215 >        unsigned char  inflg[(MAXSET+7)/8], volflg[(MAXSET+7)/8];
216          int  in;
217          register int  i, j;
218  
# Line 213 | Line 220 | OBJECT  obj;
220  
221          if (in == O_MISS)
222                  return;                         /* no intersection */
223 <        
223 >
224          if (istree(cu->cutree)) {
225                                                  /* do children */
226                  cukid.cusize = cu->cusize * 0.5;
# Line 238 | Line 245 | OBJECT  obj;
245                                          /* add to full node */
246          objset(oset, cu->cutree);
247          cukid.cusize = cu->cusize * 0.5;
248 <        
248 >
249          if (in==O_IN || oset[0] < objlim || cukid.cusize < mincusize) {
250                                                  /* add to set */
251                  if (oset[0] >= MAXSET) {
252 <                        sprintf(errmsg,
246 <                                "set overflow in addobject (%s)",
252 >                        sprintf(errmsg, "set overflow in addobject (%s)",
253                                          objptr(obj)->oname);
254                          error(INTERNAL, errmsg);
255                  }
# Line 262 | Line 268 | OBJECT  obj;
268                  if (isvolume(objptr(oset[j])->otype)) {
269                          setbit(volflg,j-1);
270                          if ((*ofun[objptr(oset[j])->otype].funp)
271 <                                        (objptr(oset[j]),cu) == O_IN)
271 >                                        (objptr(oset[j]), cu) == O_IN)
272                                  setbit(inflg,j-1);
273                  }
274                                          /* assign subcubes */
# Line 279 | Line 285 | OBJECT  obj;
285                                  addobject(&cukid, oset[j]);
286                                          /* then this object */
287                  addobject(&cukid, obj);
288 <                                        /* partial volumes */
288 >                                        /* then partial volumes */
289                  for (j = 1; j <= oset[0]; j++)
290                          if (tstbit(volflg,j-1) &&
291                                          !tstbit(inflg,j-1))
292                                  addobject(&cukid, oset[j]);
293 <                                        /* full volumes */
293 >                                        /* full volumes last */
294                  for (j = 1; j <= oset[0]; j++)
295                          if (tstbit(inflg,j-1))
296                                  addobject(&cukid, oset[j]);

Diff Legend

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