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.5 by greg, Wed Jul 3 17:31:02 1996 UTC vs.
Revision 2.18 by greg, Wed Aug 21 20:42:20 2024 UTC

# Line 1 | Line 1
1 – /* Copyright (c) 1996 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 "color.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 36 | 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 <                /* FALL THROUGH */
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 <                getdata(op->oargs.sarg[3]);
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 PAT_BDATA:         /* brightness data */
110 <                /* FALL THROUGH */
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 others -- 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 + void
183 + cow_memshare(void)              /* set up copy-on-write memory sharing */
184 + {
185 +        if (shm_boundary != NULL)
186 +                return;                 /* assume we're good */
187 +
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