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.16 by greg, Fri Jan 7 20:33:02 2005 UTC vs.
Revision 3.39 by greg, Wed Jan 6 20:34:10 2021 UTC

# Line 12 | Line 12 | static const char      RCSid[] = "$Id$";
12   #include "copyright.h"
13  
14   #include        <stdio.h>
15 + #include        <stdlib.h>
16   #include        <math.h>
17 + #include        <string.h>
18   #include        "tmprivat.h"
19   #include        "tmerrmsg.h"
20  
# Line 22 | Line 24 | static const char      RCSid[] = "$Id$";
24   struct tmPackage        *tmPkg[TM_MAXPKG];
25   int     tmNumPkgs = 0;                  /* number of registered packages */
26  
27 < int     tmLastError;                    /* last error incurred by library */
28 < char    *tmLastFunction;                /* error-generating function name */
27 >                                        /* luminance->brightness lookup */
28 > static TMbright         *tmFloat2BrtLUT = NULL;
29  
30 + #define tmCvLumLUfp(pf) tmFloat2BrtLUT[*(int32 *)(pf) >> 15]
31  
32 +
33   TMstruct *
34   tmInit(                                 /* initialize new tone mapping */
35   int     flags,
# Line 51 | Line 55 | double gamval
55                  tmnew->clf[GRN] = rgb2xyzmat[1][1];
56                  tmnew->clf[BLU] = rgb2xyzmat[1][2];
57          } else {
58 <                comprgb2xyzWBmat(cmat, tmnew->monpri=monpri);
58 >                comprgb2xyzmat(cmat, tmnew->monpri=monpri);
59                  tmnew->clf[RED] = cmat[1][0];
60                  tmnew->clf[GRN] = cmat[1][1];
61                  tmnew->clf[BLU] = cmat[1][2];
# Line 71 | Line 75 | double gamval
75                          tmnew->inpsf = WHTEFFICACY;
76          tmnew->cmat[0][1] = tmnew->cmat[0][2] = tmnew->cmat[1][0] =
77          tmnew->cmat[1][2] = tmnew->cmat[2][0] = tmnew->cmat[2][1] = 0.;
78 +        tmnew->inpdat = NULL;
79          tmnew->hbrmin = 10; tmnew->hbrmax = -10;
80          tmnew->histo = NULL;
81          tmnew->mbrmin = 10; tmnew->mbrmax = -10;
# Line 78 | Line 83 | double gamval
83                                                  /* zero private data */
84          for (i = TM_MAXPKG; i--; )
85                  tmnew->pd[i] = NULL;
86 +        tmnew->lastError = TM_E_OK;
87 +        tmnew->lastFunc = "NoErr";
88                                                  /* return new TMstruct */
89          return(tmnew);
90   }
# Line 87 | Line 94 | int
94   tmSetSpace(                     /* set input color space for conversions */
95   TMstruct        *tms,
96   RGBPRIMP        pri,
97 < double  sf
97 > double  sf,
98 > MEM_PTR dat
99   )
100   {
101 <        static char     funcName[] = "tmSetSpace";
101 >        static const char funcName[] = "tmSetSpace";
102          int     i, j;
103                                                  /* error check */
104          if (tms == NULL)
# Line 98 | Line 106 | double sf
106          if (sf <= 1e-12)
107                  returnErr(TM_E_ILLEGAL);
108                                                  /* check if no change */
109 <        if (pri == tms->inppri && FEQ(sf, tms->inpsf))
109 >        if (pri == tms->inppri && FEQ(sf, tms->inpsf) && dat == tms->inpdat)
110                  returnOK;
111          tms->inppri = pri;                      /* let's set it */
112          tms->inpsf = sf;
113 +        tms->inpdat = dat;
114  
115          if (tms->flags & TM_F_BW) {             /* color doesn't matter */
116                  tms->monpri = tms->inppri;              /* eliminate xform */
# Line 109 | Line 118 | double sf
118                          tms->clf[CIEX] = tms->clf[CIEZ] = 0.;
119                          tms->clf[CIEY] = 1.;
120                  } else {
121 <                        comprgb2xyzWBmat(tms->cmat, tms->monpri);
121 >                        comprgb2xyzmat(tms->cmat, tms->monpri);
122                          tms->clf[RED] = tms->cmat[1][0];
123                          tms->clf[GRN] = tms->cmat[1][1];
124                          tms->clf[BLU] = tms->cmat[1][2];
# Line 126 | Line 135 | double sf
135                  if (tms->inppri != tms->monpri &&
136                                  PRIMEQ(tms->inppri, tms->monpri))
137                          tms->inppri = tms->monpri;      /* no xform */
138 <                comprgb2rgbWBmat(tms->cmat, tms->inppri, tms->monpri);
138 >                if (!comprgb2rgbWBmat(tms->cmat, tms->inppri, tms->monpri))
139 >                        returnErr(TM_E_ILLEGAL);
140          }
141          for (i = 0; i < 3; i++)
142                  for (j = 0; j < 3; j++)
143                          tms->cmat[i][j] *= tms->inpsf;
144                                                  /* set color divisors */
145          for (i = 0; i < 3; i++)
146 <                if (tms->clf[i] > .001)
147 <                        tms->cdiv[i] =
138 <                                256.*pow(tms->clf[i], 1./tms->mongam);
139 <                else
140 <                        tms->cdiv[i] = 1;
146 >                tms->cdiv[i] = 256.*pow(tms->clf[i] < .001 ? .001 :
147 >                                                tms->clf[i], 1./tms->mongam);
148                                                  /* notify packages */
149          for (i = tmNumPkgs; i--; )
150                  if (tms->pd[i] != NULL && tmPkg[i]->NewSpace != NULL)
# Line 147 | Line 154 | double sf
154  
155  
156   void
157 < tmClearHisto(                   /* clear current histogram */
157 > tmClearHisto(                           /* clear current histogram */
158   TMstruct        *tms
159   )
160   {
# Line 158 | 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 +        return((TMbright)(d + .5 - (d < 0.)));
183 + }
184 +
185 +
186   int
187 + tmCvLums(                               /* convert luminances using lookup */
188 + TMbright        *ls,
189 + float           *scan,
190 + int             len
191 + )
192 + {
193 +        if (tmFloat2BrtLUT == NULL) {   /* initialize lookup table */
194 +                int32   i;
195 +                tmFloat2BrtLUT = (TMbright *)malloc(sizeof(TMbright)*0x10000);
196 +                if (tmFloat2BrtLUT == NULL)
197 +                        return(TM_E_NOMEM);
198 +                for (i = 0; i < 0x10000; i++) {
199 +                        int32   l = (i<<1 | 1) << 14;
200 + #ifndef isfinite
201 +                        if ((l & 0x7f800000) == 0x7f800000)
202 +                                tmFloat2BrtLUT[i] = TM_NOBRT;
203 +                        else
204 + #endif
205 +                        tmFloat2BrtLUT[i] = tmCvLuminance(*(float *)&l);
206 +                }
207 +        }
208 +        if (len <= 0)
209 +                return(TM_E_OK);
210 +        if ((ls == NULL) | (scan == NULL))
211 +                return(TM_E_ILLEGAL);
212 +        while (len--) {
213 +                if (*scan <= TM_NOLUM) {
214 +                        *ls++ = TM_NOBRT;
215 +                        ++scan;
216 +                        continue;
217 +                }
218 +                *ls++ = tmCvLumLUfp(scan++);
219 +        }
220 +        return(TM_E_OK);
221 + }
222 +
223 +
224 + int
225 + tmCvGrays(                              /* convert float gray values */
226 + TMstruct        *tms,
227 + TMbright        *ls,
228 + float           *scan,
229 + int             len
230 + )
231 + {
232 +        static const char funcName[] = "tmCvGrays";
233 +        int     i;
234 +
235 +        if (tms == NULL)
236 +                returnErr(TM_E_TMINVAL);
237 +        if ((ls == NULL) | (scan == NULL) | (len < 0))
238 +                returnErr(TM_E_ILLEGAL);
239 +        if (tmFloat2BrtLUT == NULL)                     /* initialize */
240 +                tmCvLums(NULL, NULL, 0);
241 +        for (i = len; i--; ) {
242 +                float   lum = tms->inpsf * scan[i];
243 +                if (lum <= TM_NOLUM)
244 +                        ls[i] = TM_NOBRT;
245 +                else
246 +                        ls[i] = tmCvLumLUfp(&lum);
247 +        }
248 +        returnOK;
249 + }
250 +
251 +
252 + int
253   tmCvColors(                             /* convert float colors */
254   TMstruct        *tms,
255   TMbright        *ls,
256 < BYTE    *cs,
256 > uby8    *cs,
257   COLOR   *scan,
258   int     len
259   )
260   {
261 <        static char     funcName[] = "tmCvColors";
262 <        static COLOR    csmall = {.5*MINLUM, .5*MINLUM, .5*MINLUM};
261 >        static const char funcName[] = "tmCvColors";
262 >        static uby8     gamtab[1024];
263 >        static double   curgam = .0;
264          COLOR   cmon;
265 <        double  lum, slum;
174 <        double  d;
265 >        float   lum, slum, d;
266          int     i;
267  
268          if (tms == NULL)
269                  returnErr(TM_E_TMINVAL);
270          if ((ls == NULL) | (scan == NULL) | (len < 0))
271                  returnErr(TM_E_ILLEGAL);
272 +        if (tmFloat2BrtLUT == NULL)                     /* initialize */
273 +                tmCvLums(NULL, NULL, 0);
274 +        if (cs != TM_NOCHROM && fabs(tms->mongam - curgam) > .02) {
275 +                curgam = tms->mongam;                   /* (re)build table */
276 +                for (i = 1024; i--; )
277 +                        gamtab[i] = (int)(256.*pow((i+.5)/1024., 1./curgam));
278 +        }
279          for (i = len; i--; ) {
280                  if (tmNeedMatrix(tms)) {                /* get monitor RGB */
281                          colortrans(cmon, tms->cmat, scan[i]);
# Line 186 | Line 284 | int    len
284                          cmon[GRN] = tms->inpsf*scan[i][GRN];
285                          cmon[BLU] = tms->inpsf*scan[i][BLU];
286                  }
287 + #ifdef isfinite
288 +                if (!isfinite(cmon[RED]) || cmon[RED] < .0f) cmon[RED] = .0f;
289 +                if (!isfinite(cmon[GRN]) || cmon[GRN] < .0f) cmon[GRN] = .0f;
290 +                if (!isfinite(cmon[BLU]) || cmon[BLU] < .0f) cmon[BLU] = .0f;
291 + #else
292 +                if (cmon[RED] < .0f) cmon[RED] = .0f;
293 +                if (cmon[GRN] < .0f) cmon[GRN] = .0f;
294 +                if (cmon[BLU] < .0f) cmon[BLU] = .0f;
295 + #endif
296                                                          /* world luminance */
297                  lum =   tms->clf[RED]*cmon[RED] +
298                          tms->clf[GRN]*cmon[GRN] +
299                          tms->clf[BLU]*cmon[BLU] ;
300 <                                                        /* check range */
301 <                if (clipgamut(cmon, lum, CGAMUT_LOWER, csmall, cwhite))
302 <                        lum =   tms->clf[RED]*cmon[RED] +
303 <                                tms->clf[GRN]*cmon[GRN] +
304 <                                tms->clf[BLU]*cmon[BLU] ;
198 <                if (lum < MINLUM) {
199 <                        ls[i] = MINBRT-1;               /* bogus value */
200 <                        lum = MINLUM;
201 <                } else {
202 <                        d = TM_BRTSCALE*log(lum);       /* encode it */
203 <                        ls[i] = d>0. ? (int)(d+.5) : (int)(d-.5);
204 <                }
300 >                if (lum <= TM_NOLUM) {                  /* convert brightness */
301 >                        lum = cmon[RED] = cmon[GRN] = cmon[BLU] = TM_NOLUM;
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) {
308                          slum = scotlum(cmon);           /* mesopic adj. */
309 <                        if (lum < LMESLOWER)
309 >                        if (lum < LMESLOWER) {
310                                  cmon[RED] = cmon[GRN] = cmon[BLU] = slum;
311 <                        else {
311 >                        } else {
312                                  d = (lum - LMESLOWER)/(LMESUPPER - LMESLOWER);
313                                  if (tms->flags & TM_F_BW)
314                                          cmon[RED] = cmon[GRN] =
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 224 | 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 :
228 <                                (int)(256.*pow(d, 1./tms->mongam));
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 :
231 <                                (int)(256.*pow(d, 1./tms->mongam));
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 :
234 <                                (int)(256.*pow(d, 1./tms->mongam));
331 >                cs[3*i+2] = d>=.999f ? 255 : gamtab[(int)(1024.f*d)];
332          }
333          returnOK;
334   }
335  
336  
337   int
241 – tmCvGrays(                              /* convert float gray values */
242 – TMstruct        *tms,
243 – TMbright        *ls,
244 – float   *scan,
245 – int     len
246 – )
247 – {
248 –        static char     funcName[] = "tmCvGrays";
249 –        double  d;
250 –        int     i;
251 –
252 –        if (tms == NULL)
253 –                returnErr(TM_E_TMINVAL);
254 –        if ((ls == NULL) | (scan == NULL) | (len < 0))
255 –                returnErr(TM_E_ILLEGAL);
256 –        for (i = len; i--; )
257 –                if (scan[i] <= TM_NOLUM) {
258 –                        ls[i] = TM_NOBRT;               /* bogus value */
259 –                } else {
260 –                        d = TM_BRTSCALE*log(scan[i]);   /* encode it */
261 –                        ls[i] = d>0. ? (int)(d+.5) : (int)(d-.5);
262 –                }
263 –        returnOK;
264 – }
265 –
266 –
267 – int
338   tmAddHisto(                             /* add values to histogram */
339   TMstruct        *tms,
340   TMbright        *ls,
# Line 272 | Line 342 | int    len,
342   int     wt
343   )
344   {
345 <        static char     funcName[] = "tmAddHisto";
345 >        static const char funcName[] = "tmAddHisto";
346          int     oldorig=0, oldlen, horig, hlen;
347          int     i, j;
348  
# Line 291 | Line 361 | int    wt
361                  tms->hbrmin = tms->hbrmax = ls[i];
362                  oldlen = 0;
363          } else {
364 <                oldorig = (tms->hbrmin-MINBRT)/HISTEP;
365 <                oldlen = (tms->hbrmax-MINBRT)/HISTEP + 1 - oldorig;
364 >                oldorig = HISTI(tms->hbrmin);
365 >                oldlen = HISTI(tms->hbrmax) + 1 - oldorig;
366          }
367          for (i = len; i--; ) {
368                  if ((j = ls[i]) < MINBRT)
# Line 302 | Line 372 | int    wt
372                  else if (j > tms->hbrmax)
373                          tms->hbrmax = j;
374          }
375 <        horig = (tms->hbrmin-MINBRT)/HISTEP;
376 <        hlen = (tms->hbrmax-MINBRT)/HISTEP + 1 - horig;
375 >        horig = HISTI(tms->hbrmin);
376 >        hlen = HISTI(tms->hbrmax) + 1 - horig;
377          if (hlen > oldlen) {                    /* (re)allocate histogram */
378 <                int     *newhist = (int *)calloc(hlen, sizeof(int));
378 >                HIST_TYP  *newhist = (HIST_TYP *)calloc(hlen, sizeof(HIST_TYP));
379                  if (newhist == NULL)
380                          returnErr(TM_E_NOMEM);
381                  if (oldlen) {                   /* copy and free old */
382 <                        for (i = oldlen, j = i+oldorig-horig; i; )
383 <                                newhist[--j] = tms->histo[--i];
382 >                        memcpy((MEM_PTR)(newhist+(oldorig-horig)),
383 >                                (MEM_PTR)tms->histo, oldlen*sizeof(HIST_TYP));
384                          free((MEM_PTR)tms->histo);
385                  }
386                  tms->histo = newhist;
# Line 319 | Line 389 | int    wt
389                  returnOK;
390          for (i = len; i--; )                    /* add in new counts */
391                  if (ls[i] >= MINBRT)
392 <                        tms->histo[ (ls[i]-MINBRT)/HISTEP - horig ] += wt;
392 >                        tms->histo[ HISTI(ls[i]) - horig ] += wt;
393          returnOK;
394   }
395  
# Line 347 | Line 417 | double La
417   }
418  
419  
350 – static int
351 – tmNewMap(                       /* allocate new tone-mapping array */
352 – TMstruct        *tms
353 – )
354 – {
355 –        if (tms->lumap != NULL && (tms->mbrmax - tms->mbrmin) !=
356 –                                        (tms->hbrmax - tms->hbrmin)) {
357 –                free((MEM_PTR)tms->lumap);
358 –                tms->lumap = NULL;
359 –        }
360 –        tms->mbrmin = tms->hbrmin;
361 –        tms->mbrmax = tms->hbrmax;
362 –        if (tms->mbrmin > tms->mbrmax)
363 –                return 0;
364 –        if (tms->lumap == NULL)
365 –                tms->lumap = (unsigned short *)malloc(sizeof(unsigned short)*
366 –                                        (tms->mbrmax-tms->mbrmin+1));
367 –        return(tms->lumap != NULL);
368 – }
369 –
370 –
420   int
421   tmFixedMapping(                 /* compute fixed, linear tone-mapping */
422   TMstruct        *tms,
# Line 375 | Line 424 | double expmult,
424   double  gamval
425   )
426   {
427 <        static char     funcName[] = "tmFixedMapping";
427 >        static const char funcName[] = "tmFixedMapping";
428          double          d;
429          int     i;
430          
# Line 386 | Line 435 | double gamval
435          if (gamval < MINGAM)
436                  gamval = tms->mongam;
437          d = log(expmult/tms->inpsf);
438 <        for (i = tms->mbrmax-tms->mbrmin+1; i--; )
439 <                tms->lumap[i] = 256. * exp(
438 >        for (i = tms->mbrmax-tms->mbrmin+1; i--; ) {
439 >                double  val = 256. * exp(
440                          ( d + (tms->mbrmin+i)*(1./TM_BRTSCALE) )
441 <                        / gamval );
441 >                        / gamval);
442 >                tms->lumap[i] = val >= (double)0xffff ? 0xffff : (int)val;
443 >        }
444          returnOK;
445   }
446  
# Line 402 | Line 453 | double Lddyn,
453   double  Ldmax
454   )
455   {
456 <        static char     funcName[] = "tmComputeMapping";
457 <        int     *histo;
456 >        static const char funcName[] = "tmComputeMapping";
457 >        HIST_TYP        *histo;
458          float   *cumf;
459 <        int     brt0, histlen, threshold, ceiling, trimmings;
459 >        int     brt0, histlen;
460 >        HIST_TYP        threshold, ceiling, trimmings, histot;
461          double  logLddyn, Ldmin, Ldavg, Lwavg, Tr, Lw, Ld;
410 –        int32   histot;
462          double  sum;
463          double  d;
464          int     i, j;
# Line 422 | Line 473 | double Ldmax
473          Ldmin = Ldmax/Lddyn;
474          logLddyn = log(Lddyn);
475          Ldavg = sqrt(Ldmax*Ldmin);
476 <        i = (tms->hbrmin-MINBRT)/HISTEP;
477 <        brt0 = MINBRT + HISTEP/2 + i*HISTEP;
478 <        histlen = (tms->hbrmax-MINBRT)/HISTEP + 1 - i;
476 >        i = HISTI(tms->hbrmin);
477 >        brt0 = HISTV(i);
478 >        histlen = HISTI(tms->hbrmax) + 1 - i;
479                                          /* histogram total and mean */
480          histot = 0; sum = 0;
481          j = brt0 + histlen*HISTEP;
482          for (i = histlen; i--; ) {
483                  histot += tms->histo[i];
484 <                sum += (j -= HISTEP) * tms->histo[i];
484 >                sum += (double)(j -= HISTEP) * tms->histo[i];
485          }
486          threshold = histot*0.005 + .5;
487 <        if (threshold < 4)
487 >        if (!histot)
488                  returnErr(TM_E_TMFAIL);
489          Lwavg = tmLuminance( (double)sum / histot );
439 –                                        /* allocate space for mapping */
440 –        if (!tmNewMap(tms))
441 –                returnErr(TM_E_NOMEM);
490                                          /* use linear tone mapping? */
491 <        if (tms->flags & TM_F_LINEAR)
491 >        if (tms->flags & TM_F_LINEAR || threshold < 4 ||
492 >                        tms->hbrmax - tms->hbrmin < TM_BRTSCALE*logLddyn)
493                  goto linearmap;
494                                          /* clamp histogram */
495 <        histo = (int *)malloc(histlen*sizeof(int));
495 >        histo = (HIST_TYP *)malloc(histlen*sizeof(HIST_TYP));
496          cumf = (float *)malloc((histlen+2)*sizeof(float));
497          if ((histo == NULL) | (cumf == NULL))
498                  returnErr(TM_E_NOMEM);
# Line 481 | Line 530 | double Ldmax
530                          goto linearmap;
531                  }
532          } while (trimmings > threshold);
533 +                                        /* allocate space for mapping */
534 +        if (!tmNewMap(tms))
535 +                returnErr(TM_E_NOMEM);
536                                          /* assign tone-mapping */
537          for (i = tms->mbrmax-tms->mbrmin+1; i--; ) {
538                  j = d = (double)i/(tms->mbrmax-tms->mbrmin)*histlen;
# Line 504 | Line 556 | linearmap:                             /* linear tone-mapping */
556   int
557   tmMapPixels(                    /* apply tone-mapping to pixel(s) */
558   TMstruct        *tms,
559 < BYTE    *ps,
559 > uby8    *ps,
560   TMbright        *ls,
561 < BYTE    *cs,
561 > uby8    *cs,
562   int     len
563   )
564   {
565 <        static char     funcName[] = "tmMapPixels";
565 >        static const char funcName[] = "tmMapPixels";
566          int32   li, pv;
567  
568          if (tms == NULL || tms->lumap == NULL)
# Line 540 | Line 592 | int    len
592   }
593  
594  
543 –
544 –
595   TMstruct *
596   tmDup(                          /* duplicate top tone mapping */
597   TMstruct        *tms
# Line 558 | Line 608 | TMstruct       *tms
608                  return(NULL);
609          *tmnew = *tms;          /* copy everything */
610          if (tmnew->histo != NULL) {     /* duplicate histogram */
611 <                len = (tmnew->hbrmax-MINBRT)/HISTEP + 1 -
612 <                                (tmnew->hbrmin-MINBRT)/HISTEP;
563 <                tmnew->histo = (int *)malloc(len*sizeof(int));
611 >                len = HISTI(tmnew->hbrmax) + 1 - HISTI(tmnew->hbrmin);
612 >                tmnew->histo = (HIST_TYP *)malloc(len*sizeof(HIST_TYP));
613                  if (tmnew->histo != NULL)
614 <                        for (i = len; i--; )
615 <                                tmnew->histo[i] = tms->histo[i];
614 >                        memcpy((MEM_PTR)tmnew->histo, (MEM_PTR)tms->histo,
615 >                                        len*sizeof(HIST_TYP));
616          }
617          if (tmnew->lumap != NULL) {     /* duplicate luminance mapping */
618                  len = tmnew->mbrmax-tmnew->mbrmin+1;
619 <                tmnew->lumap = (unsigned short *)malloc(
571 <                                                len*sizeof(unsigned short) );
619 >                tmnew->lumap = (TMAP_TYP *)malloc(len*sizeof(TMAP_TYP));
620                  if (tmnew->lumap != NULL)
621 <                        for (i = len; i--; )
622 <                                tmnew->lumap[i] = tms->lumap[i];
621 >                        memcpy((MEM_PTR)tmnew->lumap, (MEM_PTR)tms->lumap,
622 >                                        len*sizeof(TMAP_TYP));
623          }
624                                          /* clear package data */
625          for (i = tmNumPkgs; i--; )
# Line 603 | Line 651 | TMstruct       *tms;
651  
652   /******************** Shared but Private library routines *********************/
653  
654 < BYTE    tmMesofact[BMESUPPER-BMESLOWER];
654 > uby8    tmMesofact[BMESUPPER-BMESLOWER];
655  
656   void
657   tmMkMesofact()                          /* build mesopic lookup factor table */
# Line 621 | Line 669 | tmMkMesofact()                         /* build mesopic lookup factor table
669  
670  
671   int
672 + tmNewMap(                       /* allocate new tone-mapping array */
673 + TMstruct        *tms
674 + )
675 + {
676 +        if (tms->lumap != NULL && (tms->mbrmax - tms->mbrmin) !=
677 +                                        (tms->hbrmax - tms->hbrmin)) {
678 +                free((MEM_PTR)tms->lumap);
679 +                tms->lumap = NULL;
680 +        }
681 +        tms->mbrmin = tms->hbrmin;
682 +        tms->mbrmax = tms->hbrmax;
683 +        if (tms->mbrmin > tms->mbrmax)
684 +                return 0;
685 +        if (tms->lumap == NULL)
686 +                tms->lumap = (TMAP_TYP *)malloc(sizeof(TMAP_TYP)*
687 +                                        (tms->mbrmax-tms->mbrmin+1));
688 +        return(tms->lumap != NULL);
689 + }
690 +
691 +
692 + int
693   tmErrorReturn(                          /* error return (with message) */
694 < char    *func,
694 > const char      *func,
695   TMstruct        *tms,
696   int     err
697   )
698   {
699 <        tmLastFunction = func;
700 <        tmLastError = err;
701 <        if (tms != NULL && tms->flags & TM_F_NOSTDERR)
702 <                return(err);
699 >        if (tms != NULL) {
700 >                tms->lastFunc = func;
701 >                tms->lastError = err;
702 >                if (tms->flags & TM_F_NOSTDERR)
703 >                        return(err);
704 >        }
705          fputs(func, stderr);
706          fputs(": ", stderr);
707          fputs(tmErrorMessage[err], stderr);

Diff Legend

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