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

Comparing ray/src/common/tonemap.c (file contents):
Revision 3.20 by greg, Sat Jan 14 20:25:51 2006 UTC vs.
Revision 3.23 by greg, Wed May 10 15:21:58 2006 UTC

# Line 22 | Line 22 | static const char      RCSid[] = "$Id$";
22   struct tmPackage        *tmPkg[TM_MAXPKG];
23   int     tmNumPkgs = 0;                  /* number of registered packages */
24  
25 +                                        /* luminance->brightness lookup */
26 + static TMbright         *tmFloat2BrtLUT;
27  
28 + #define tmCvLumLUfp(pf) tmFloat2BrtLUT[*(int32 *)(pf) >> 15]
29 +
30 +
31   TMstruct *
32   tmInit(                                 /* initialize new tone mapping */
33   int     flags,
# Line 149 | Line 154 | MEM_PTR        dat
154  
155  
156   void
157 < tmClearHisto(                   /* clear current histogram */
157 > tmClearHisto(                           /* clear current histogram */
158   TMstruct        *tms
159   )
160   {
# Line 160 | Line 165 | TMstruct       *tms
165   }
166  
167  
168 + TMbright
169 + tmCvLuminance(                          /* convert a single luminance */
170 + double  lum
171 + )
172 + {
173 +        double  d;
174 +
175 + #ifdef isfinite
176 +        if (!isfinite(lum) || lum <= TM_NOLUM)
177 + #else
178 +        if (lum <= TM_NOLUM)
179 + #endif
180 +                return(TM_NOBRT);
181 +        d = TM_BRTSCALE*log(lum);
182 +        if (d > 0.)
183 +                return((TMbright)(d+.5));
184 +        return((TMbright)(d-.5));
185 + }
186 +
187 +
188   int
189 + tmCvLums(                               /* convert luminances using lookup */
190 + TMbright        *ls,
191 + float           *scan,
192 + int             len
193 + )
194 + {
195 +        if (tmFloat2BrtLUT == NULL) {   /* initialize lookup table */
196 +                int32   i;
197 +                tmFloat2BrtLUT = (TMbright *)malloc(sizeof(TMbright)*0x10000);
198 +                if (tmFloat2BrtLUT == NULL)
199 +                        return(TM_E_NOMEM);
200 +                for (i = 0; i < 0x10000; i++) {
201 +                        int32   l = (i<<1 | 1) << 14;
202 + #ifndef isfinite
203 +                        if ((l & 0x7f800000) == 0x7f800000)
204 +                                tmFloat2BrtLUT[i] = TM_NOBRT;
205 +                        else
206 + #endif
207 +                        tmFloat2BrtLUT[i] = tmCvLuminance(*(float *)&l);
208 +                }
209 +        }
210 +        if (len <= 0)
211 +                return(TM_E_OK);
212 +        if ((ls == NULL) | (scan == NULL))
213 +                return(TM_E_ILLEGAL);
214 +        while (len--) {
215 +                if (*scan <= TM_NOLUM) {
216 +                        *ls++ = TM_NOBRT;
217 +                        ++scan;
218 +                        continue;
219 +                }
220 +                *ls++ = tmCvLumLUfp(scan++);
221 +        }
222 +        return(TM_E_OK);
223 + }
224 +
225 +
226 + int
227 + tmCvGrays(                              /* convert float gray values */
228 + TMstruct        *tms,
229 + TMbright        *ls,
230 + float           *scan,
231 + int             len
232 + )
233 + {
234 +        static const char funcName[] = "tmCvGrays";
235 +        double  d;
236 +        int     i;
237 +
238 +        if (tms == NULL)
239 +                returnErr(TM_E_TMINVAL);
240 +        if ((ls == NULL) | (scan == NULL) | (len < 0))
241 +                returnErr(TM_E_ILLEGAL);
242 +        for (i = len; i--; ) {
243 +                float   lum = tms->inpsf * scan[i];
244 +                if (lum <= TM_NOLUM)
245 +                        ls[i] = TM_NOBRT;
246 +                else
247 +                        ls[i] = tmCvLumLUfp(&lum);
248 +        }
249 +        returnOK;
250 + }
251 +
252 +
253 + int
254   tmCvColors(                             /* convert float colors */
255   TMstruct        *tms,
256   TMbright        *ls,
# Line 174 | Line 264 | int    len
264          static BYTE     gamtab[1024];
265          static double   curgam = .0;
266          COLOR   cmon;
267 <        double  lum, slum;
178 <        double  d;
267 >        float   lum, slum, d;
268          int     i;
269  
270          if (tms == NULL)
271                  returnErr(TM_E_TMINVAL);
272          if ((ls == NULL) | (scan == NULL) | (len < 0))
273                  returnErr(TM_E_ILLEGAL);
274 <        if (cs != TM_NOCHROM && fabs(curgam - tms->mongam) < .02) {
274 >        tmCvLums(NULL, NULL, 0);                        /* initialize */
275 >        if (cs != TM_NOCHROM && fabs(tms->mongam - curgam) > .02) {
276                  curgam = tms->mongam;                   /* (re)build table */
277                  for (i = 1024; i--; )
278                          gamtab[i] = (int)(256.*pow((i+.5)/1024., 1./curgam));
# Line 195 | Line 285 | int    len
285                          cmon[GRN] = tms->inpsf*scan[i][GRN];
286                          cmon[BLU] = tms->inpsf*scan[i][BLU];
287                  }
288 + #ifdef isfinite
289 +                if (!isfinite(cmon[RED]) || cmon[RED] < .0f) cmon[RED] = .0f;
290 +                if (!isfinite(cmon[GRN]) || cmon[GRN] < .0f) cmon[GRN] = .0f;
291 +                if (!isfinite(cmon[BLU]) || cmon[BLU] < .0f) cmon[BLU] = .0f;
292 + #else
293 +                if (cmon[RED] < .0f) cmon[RED] = .0f;
294 +                if (cmon[GRN] < .0f) cmon[GRN] = .0f;
295 +                if (cmon[BLU] < .0f) cmon[BLU] = .0f;
296 + #endif
297                                                          /* world luminance */
298                  lum =   tms->clf[RED]*cmon[RED] +
299                          tms->clf[GRN]*cmon[GRN] +
300                          tms->clf[BLU]*cmon[BLU] ;
301 <                                                        /* check range */
302 <                if (clipgamut(cmon, lum, CGAMUT_LOWER, csmall, cwhite))
303 <                        lum =   tms->clf[RED]*cmon[RED] +
304 <                                tms->clf[GRN]*cmon[GRN] +
206 <                                tms->clf[BLU]*cmon[BLU] ;
207 <                if (lum < MINLUM) {
208 <                        ls[i] = MINBRT-1;               /* bogus value */
209 <                        lum = MINLUM;
210 <                } else {
211 <                        d = TM_BRTSCALE*log(lum);       /* encode it */
212 <                        ls[i] = d>0. ? (int)(d+.5) : (int)(d-.5);
213 <                }
301 >                if (lum <= TM_NOLUM)                    /* convert brightness */
302 >                        ls[i] = TM_NOBRT;
303 >                else
304 >                        ls[i] = tmCvLumLUfp(&lum);
305                  if (cs == TM_NOCHROM)                   /* no color? */
306                          continue;
307                  if (tms->flags & TM_F_MESOPIC && lum < LMESUPPER) {
# Line 224 | Line 315 | int    len
315                                                          cmon[BLU] = d*lum;
316                                  else
317                                          scalecolor(cmon, d);
318 <                                d = (1.-d)*slum;
318 >                                d = (1.f-d)*slum;
319                                  cmon[RED] += d;
320                                  cmon[GRN] += d;
321                                  cmon[BLU] += d;
# Line 233 | Line 324 | int    len
324                          cmon[RED] = cmon[GRN] = cmon[BLU] = lum;
325                  }
326                  d = tms->clf[RED]*cmon[RED]/lum;
327 <                cs[3*i  ] = d>=.999 ? 255 : gamtab[(int)(1024.*d)];
327 >                cs[3*i  ] = d>=.999f ? 255 : gamtab[(int)(1024.f*d)];
328                  d = tms->clf[GRN]*cmon[GRN]/lum;
329 <                cs[3*i+1] = d>=.999 ? 255 : gamtab[(int)(1024.*d)];
329 >                cs[3*i+1] = d>=.999f ? 255 : gamtab[(int)(1024.f*d)];
330                  d = tms->clf[BLU]*cmon[BLU]/lum;
331 <                cs[3*i+2] = d>=.999 ? 255 : gamtab[(int)(1024.*d)];
331 >                cs[3*i+2] = d>=.999f ? 255 : gamtab[(int)(1024.f*d)];
332          }
242 –        returnOK;
243 – }
244 –
245 –
246 – TMbright
247 – tmCvLuminance(                          /* convert a single luminance */
248 – double  lum
249 – )
250 – {
251 –        double  d;
252 –
253 –        if (lum <= TM_NOLUM)
254 –                return(TM_NOBRT);
255 –        d = TM_BRTSCALE*log(lum);
256 –        if (d > 0.)
257 –                return((TMbright)(d+.5));
258 –        return((TMbright)(d-.5));
259 – }
260 –
261 –
262 – int
263 – tmCvGrays(                              /* convert float gray values */
264 – TMstruct        *tms,
265 – TMbright        *ls,
266 – float   *scan,
267 – int     len
268 – )
269 – {
270 –        static const char funcName[] = "tmCvGrays";
271 –        double  d;
272 –        int     i;
273 –
274 –        if (tms == NULL)
275 –                returnErr(TM_E_TMINVAL);
276 –        if ((ls == NULL) | (scan == NULL) | (len < 0))
277 –                returnErr(TM_E_ILLEGAL);
278 –        for (i = len; i--; )
279 –                if (scan[i] <= TM_NOLUM) {
280 –                        ls[i] = TM_NOBRT;               /* bogus value */
281 –                } else {
282 –                        d = TM_BRTSCALE*log(scan[i]);   /* encode it */
283 –                        ls[i] = d>0. ? (int)(d+.5) : (int)(d-.5);
284 –                }
333          returnOK;
334   }
335  

Diff Legend

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