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

Comparing ray/src/rt/preload.c (file contents):
Revision 2.3 by greg, Thu Jan 21 17:01:26 1993 UTC vs.
Revision 2.18 by greg, Wed Aug 21 20:42:20 2024 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1993 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   * Preload associated object structures to maximize memory sharing.
6 + *
7 + *  External symbols declared in ray.h
8   */
9  
10 < #include "standard.h"
11 < #include "object.h"
10 > #include "copyright.h"
11 >
12 > #include "ray.h"
13   #include "otypes.h"
14   #include "face.h"
15   #include "cone.h"
16   #include "instance.h"
17 + #include "mesh.h"
18 + #include "data.h"
19 + #include "func.h"
20 + #include "bsdf.h"
21  
22 + char    *shm_boundary = NULL;           /* boundary of shared memory */
23  
24 +
25 + /* KEEP THIS ROUTINE CONSISTENT WITH THE DIFFERENT OBJECT FUNCTIONS! */
26 +
27 +
28   int
29 < load_os(op)                     /* load associated data for object */
30 < register OBJREC *op;
29 > load_os(                        /* load associated data for object */
30 >        OBJREC  *op
31 > )
32   {
33 +        DATARRAY        *dp;
34 +        SDData          *sd;
35 +
36 +        SDretainSet = SDretainAll;
37 +
38          switch (op->otype) {
39          case OBJ_FACE:          /* polygon */
40                  getface(op);
# Line 34 | Line 49 | register OBJREC        *op;
49          case OBJ_INSTANCE:      /* octree instance */
50                  getinstance(op, IO_ALL);
51                  return(1);
52 +        case OBJ_MESH:          /* mesh instance */
53 +                getmeshinst(op, IO_ALL);
54 +                return(1);
55 +        case PAT_CPICT:         /* color picture */
56 +                if (op->oargs.nsargs < 4)
57 +                        goto sargerr;
58 +                getpict(op->oargs.sarg[3]);
59 +                getfunc(op, 4, 0x3<<5, 0);
60 +                return(1);
61 +        case PAT_CDATA:         /* color data */
62 +                if (op->oargs.nsargs < 4)
63 +                        goto sargerr;
64 +                dp = getdata(op->oargs.sarg[3]);
65 +                getdata(op->oargs.sarg[4]);
66 +                getdata(op->oargs.sarg[5]);
67 +                getfunc(op, 6, ((1<<dp->nd)-1)<<7, 0);
68 +                return(1);
69 +        case PAT_BDATA:         /* brightness data */
70 +                if (op->oargs.nsargs < 2)
71 +                        goto sargerr;
72 +                dp = getdata(op->oargs.sarg[1]);
73 +                getfunc(op, 2, ((1<<dp->nd)-1)<<3, 0);
74 +                return(1);
75 +        case PAT_BFUNC:         /* brightness function */
76 +                getfunc(op, 1, 0x1, 0);
77 +                return(1);
78 +        case PAT_CFUNC:         /* color function */
79 +                getfunc(op, 3, 0x7, 0);
80 +                return(1);
81 +        case PAT_SPECFUNC:      /* spectral function */
82 +                getfunc(op, 1, 0, 0);
83 +                return(1);
84 +        case PAT_SPECFILE:      /* spectrum file */
85 +                if (op->oargs.nsargs < 1)
86 +                        goto sargerr;
87 +                getdata(op->oargs.sarg[0]);
88 +                return(1);
89 +        case PAT_SPECDATA:      /* spectral data file */
90 +                if (op->oargs.nsargs < 2)
91 +                        goto sargerr;
92 +                dp = getdata(op->oargs.sarg[1]);
93 +                getfunc(op, 2, ((1<<(dp->nd-1)) - 1)<<3, 0);
94 +                return(1);
95 +        case PAT_SPECPICT:      /* spectral picture */
96 +                if (op->oargs.nsargs < 2)
97 +                        goto sargerr;
98 +                getspec(op->oargs.sarg[1]);
99 +                getfunc(op, 2, 0x3<<3, 0);
100 +                return(1);
101 +        case TEX_DATA:          /* texture data */
102 +                if (op->oargs.nsargs < 6)
103 +                        goto sargerr;
104 +                dp = getdata(op->oargs.sarg[3]);
105 +                getdata(op->oargs.sarg[4]);
106 +                getdata(op->oargs.sarg[5]);
107 +                getfunc(op, 6, ((1<<dp->nd)-1)<<7, 1);
108 +                return(1);
109 +        case TEX_FUNC:          /* texture function */
110 +                getfunc(op, 3, 0x7, 1);
111 +                return(1);
112 +        case MIX_DATA:          /* mixture data */
113 +                dp = getdata(op->oargs.sarg[3]);
114 +                getfunc(op, 4, ((1<<dp->nd)-1)<<5, 0);
115 +                return(1);
116 +        case MIX_PICT:          /* mixture picture */
117 +                getpict(op->oargs.sarg[3]);
118 +                getfunc(op, 4, 0x3<<5, 0);
119 +                return(1);
120 +        case MIX_FUNC:          /* mixture function */
121 +                getfunc(op, 3, 0x4, 0);
122 +                return(1);
123 +        case MAT_PLASTIC2:      /* anisotropic plastic */
124 +        case MAT_METAL2:        /* anisotropic metal */
125 +                getfunc(op, 3, 0x7, 1);
126 +                return(1);
127 +        case MAT_BRTDF:         /* BRDTfunc material */
128 +                getfunc(op, 9, 0x3f, 0);
129 +                return(1);
130 +        case MAT_BSDF:          /* BSDF material */
131 +                if (op->oargs.nsargs < 6)
132 +                        goto sargerr;
133 +                getfunc(op, 5, 0x1d, 1);
134 +                sd = loadBSDF(op->oargs.sarg[1]);
135 +                if (sd != NULL) SDfreeCache(sd);
136 +                return(1);
137 +        case MAT_ABSDF:         /* aBSDF material */
138 +                if (op->oargs.nsargs < 5)
139 +                        goto sargerr;
140 +                getfunc(op, 4, 0xe, 1);
141 +                sd = loadBSDF(op->oargs.sarg[0]);
142 +                if (sd != NULL) SDfreeCache(sd);
143 +                return(1);
144 +        case MAT_PDATA:         /* plastic BRDF data */
145 +        case MAT_MDATA:         /* metal BRDF data */
146 +        case MAT_TDATA:         /* trans BRDF data */
147 +                if (op->oargs.nsargs < 2)
148 +                        goto sargerr;
149 +                getdata(op->oargs.sarg[1]);
150 +                getfunc(op, 2, 0, 0);
151 +                return(1);
152 +        case MAT_PFUNC:         /* plastic BRDF func */
153 +        case MAT_MFUNC:         /* metal BRDF func */
154 +        case MAT_TFUNC:         /* trans BRDF func */
155 +                getfunc(op, 1, 0, 0);
156 +                return(1);
157 +        case MAT_DIRECT1:       /* prism1 material */
158 +                getfunc(op, 4, 0xf, 1);
159 +                return(1);
160 +        case MAT_DIRECT2:       /* prism2 material */
161 +                getfunc(op, 8, 0xff, 1);
162 +                return(1);
163          }
164 <                        /* don't bother with non-surfaces -- too tricky */
164 >                        /* nothing to load for the remaining types */
165          return(0);
166 + sargerr:
167 +        objerror(op, USER, "too few string arguments");
168 +        return 0; /* pro forma return */
169   }
170  
171  
172 < preload_objs()          /* preload object data structures */
172 > void
173 > preload_objs(void)              /* preload object data structures */
174   {
175 <        register OBJECT on;
175 >        OBJECT on;
176                                  /* note that nobjects may change during loop */
177          for (on = 0; on < nobjects; on++)
178                  load_os(objptr(on));
179   }
180  
181  
182 < clean_slate()           /* reset time and ray counters */
182 > void
183 > cow_memshare(void)              /* set up copy-on-write memory sharing */
184   {
185 <        extern long     tstart, time();
186 <        extern long     raynum, nrays;
56 <        register OBJECT on;
185 >        if (shm_boundary != NULL)
186 >                return;                 /* assume we're good */
187  
188 <        tstart = time(0);
189 <        raynum = nrays = 0;
190 <        for (on = 0; on < nobjects; on++)
191 <                objptr(on)->lastrno = -1;
188 >        preload_objs();                 /* preload auxiliary data */
189 >                                        /* set shared memory boundary */
190 >        shm_boundary = (char *)malloc(16);
191 >        strcpy(shm_boundary, "SHM_BOUNDARY");
192 > }
193 >
194 >
195 > void
196 > cow_doneshare(void)             /* clear memory sharing boundary */
197 > {
198 >        if (shm_boundary == NULL)
199 >                return;
200 >                                        /* clear shared memory boundary */
201 >        free((void *)shm_boundary);
202 >        shm_boundary = NULL;
203   }

Diff Legend

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