imagemagick/magick/quantum-private.h

711 lines
17 KiB
C

/*
Copyright 1999-2021 ImageMagick Studio LLC, a non-profit organization
dedicated to making software imaging solutions freely available.
You may not use this file except in compliance with the License. You may
obtain a copy of the License at
https://imagemagick.org/script/license.php
Unless required by applicable law or agreed to in writing, software
distributed under the License is distributed on an "AS IS" BASIS,
WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
See the License for the specific language governing permissions and
limitations under the License.
MagickCore quantum inline methods.
*/
#ifndef MAGICKCORE_QUANTUM_PRIVATE_H
#define MAGICKCORE_QUANTUM_PRIVATE_H
#include "magick/memory_.h"
#include "magick/cache.h"
#include "magick/image-private.h"
#include "magick/pixel-accessor.h"
#if defined(__cplusplus) || defined(c_plusplus)
extern "C" {
#endif
typedef struct _QuantumState
{
double
inverse_scale;
unsigned int
pixel;
size_t
bits;
const unsigned int
*mask;
} QuantumState;
struct _QuantumInfo
{
size_t
depth,
quantum;
QuantumFormatType
format;
double
minimum,
maximum,
scale;
size_t
pad;
MagickBooleanType
min_is_white,
pack;
QuantumAlphaType
alpha_type;
size_t
number_threads;
MemoryInfo
**pixels;
size_t
extent;
EndianType
endian;
QuantumState
state;
SemaphoreInfo
*semaphore;
size_t
signature;
};
extern MagickPrivate void
ResetQuantumState(QuantumInfo *);
static inline MagickSizeType GetQuantumRange(const size_t depth)
{
MagickSizeType
one;
size_t
max_depth;
if (depth == 0)
return(0);
one=1;
max_depth=8*sizeof(MagickSizeType);
return((MagickSizeType) ((one << (MagickMin(depth,max_depth)-1))+
((one << (MagickMin(depth,max_depth)-1))-1)));
}
static inline float HalfToSinglePrecision(const unsigned short half)
{
#define ExponentBias (127-15)
#define ExponentMask 0x7c00
#define ExponentShift 23
#define SignBitShift 31
#define SignificandShift 13
#define SignificandMask 0x00000400
typedef union _SinglePrecision
{
unsigned int
fixed_point;
float
single_precision;
} SinglePrecision;
unsigned int
exponent,
significand,
sign_bit;
SinglePrecision
map;
unsigned int
value;
/*
The IEEE 754 standard specifies half precision as having:
Sign bit: 1 bit
Exponent width: 5 bits
Significand precision: 11 (10 explicitly stored)
*/
sign_bit=(unsigned int) ((half >> 15) & 0x00000001);
exponent=(unsigned int) ((half >> 10) & 0x0000001f);
significand=(unsigned int) (half & 0x000003ff);
if (exponent == 0)
{
if (significand == 0)
value=sign_bit << SignBitShift;
else
{
while ((significand & SignificandMask) == 0)
{
significand<<=1;
exponent--;
}
exponent++;
significand&=(~SignificandMask);
exponent+=ExponentBias;
value=(sign_bit << SignBitShift) | (exponent << ExponentShift) |
(significand << SignificandShift);
}
}
else
if (exponent == SignBitShift)
{
value=(sign_bit << SignBitShift) | 0x7f800000;
if (significand != 0)
value|=(significand << SignificandShift);
}
else
{
exponent+=ExponentBias;
significand<<=SignificandShift;
value=(sign_bit << SignBitShift) | (exponent << ExponentShift) |
significand;
}
map.fixed_point=value;
return(map.single_precision);
}
static inline unsigned char *PopCharPixel(const unsigned char pixel,
unsigned char *magick_restrict pixels)
{
*pixels++=pixel;
return(pixels);
}
static inline unsigned char *PopLongPixel(const EndianType endian,
const unsigned int pixel,unsigned char *magick_restrict pixels)
{
unsigned int
quantum;
quantum=(unsigned int) pixel;
if (endian == LSBEndian)
{
*pixels++=(unsigned char) (quantum);
*pixels++=(unsigned char) (quantum >> 8);
*pixels++=(unsigned char) (quantum >> 16);
*pixels++=(unsigned char) (quantum >> 24);
return(pixels);
}
*pixels++=(unsigned char) (quantum >> 24);
*pixels++=(unsigned char) (quantum >> 16);
*pixels++=(unsigned char) (quantum >> 8);
*pixels++=(unsigned char) (quantum);
return(pixels);
}
static inline unsigned char *PopShortPixel(const EndianType endian,
const unsigned short pixel,unsigned char *magick_restrict pixels)
{
unsigned int
quantum;
quantum=pixel;
if (endian == LSBEndian)
{
*pixels++=(unsigned char) (quantum);
*pixels++=(unsigned char) (quantum >> 8);
return(pixels);
}
*pixels++=(unsigned char) (quantum >> 8);
*pixels++=(unsigned char) (quantum);
return(pixels);
}
static inline const unsigned char *PushCharPixel(
const unsigned char *magick_restrict pixels,
unsigned char *magick_restrict pixel)
{
*pixel=(*pixels++);
return(pixels);
}
static inline const unsigned char *PushLongPixel(const EndianType endian,
const unsigned char *magick_restrict pixels,
unsigned int *magick_restrict pixel)
{
unsigned int
quantum;
if (endian == LSBEndian)
{
quantum=((unsigned int) *pixels++);
quantum|=((unsigned int) *pixels++ << 8);
quantum|=((unsigned int) *pixels++ << 16);
quantum|=((unsigned int) *pixels++ << 24);
*pixel=quantum;
return(pixels);
}
quantum=((unsigned int) *pixels++ << 24);
quantum|=((unsigned int) *pixels++ << 16);
quantum|=((unsigned int) *pixels++ << 8);
quantum|=((unsigned int) *pixels++);
*pixel=quantum;
return(pixels);
}
static inline const unsigned char *PushShortPixel(const EndianType endian,
const unsigned char *magick_restrict pixels,
unsigned short *magick_restrict pixel)
{
unsigned int
quantum;
if (endian == LSBEndian)
{
quantum=(unsigned int) *pixels++;
quantum|=(unsigned int) (*pixels++ << 8);
*pixel=(unsigned short) (quantum & 0xffff);
return(pixels);
}
quantum=(unsigned int) (*pixels++ << 8);
quantum|=(unsigned int) *pixels++;
*pixel=(unsigned short) (quantum & 0xffff);
return(pixels);
}
static inline const unsigned char *PushFloatPixel(const EndianType endian,
const unsigned char *magick_restrict pixels,
MagickFloatType *magick_restrict pixel)
{
union
{
unsigned int
unsigned_value;
MagickFloatType
float_value;
} quantum;
if (endian == LSBEndian)
{
quantum.unsigned_value=((unsigned int) *pixels++);
quantum.unsigned_value|=((unsigned int) *pixels++ << 8);
quantum.unsigned_value|=((unsigned int) *pixels++ << 16);
quantum.unsigned_value|=((unsigned int) *pixels++ << 24);
*pixel=quantum.float_value;
return(pixels);
}
quantum.unsigned_value=((unsigned int) *pixels++ << 24);
quantum.unsigned_value|=((unsigned int) *pixels++ << 16);
quantum.unsigned_value|=((unsigned int) *pixels++ << 8);
quantum.unsigned_value|=((unsigned int) *pixels++);
*pixel=quantum.float_value;
return(pixels);
}
static inline Quantum ScaleAnyToQuantum(const QuantumAny quantum,
const QuantumAny range)
{
if (quantum > range)
return(QuantumRange);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) ((double) QuantumRange*(quantum*
PerceptibleReciprocal((double) range))+0.5));
#else
return((Quantum) ((double) QuantumRange*(quantum*
PerceptibleReciprocal((double) range))));
#endif
}
static inline QuantumAny ScaleQuantumToAny(const Quantum quantum,
const QuantumAny range)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((QuantumAny) ((MagickRealType) range*quantum/QuantumRange));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return((QuantumAny) 0UL);
if (((MagickRealType) range*quantum/QuantumRange) >= 18446744073709551615.0)
return((QuantumAny) MagickULLConstant(18446744073709551615));
return((QuantumAny) ((MagickRealType) range*quantum/QuantumRange+0.5));
#endif
}
#if (MAGICKCORE_QUANTUM_DEPTH == 8)
static inline Quantum ScaleCharToQuantum(const unsigned char value)
{
return((Quantum) value);
}
static inline Quantum ScaleLongToQuantum(const unsigned int value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) ((value)/16843009UL));
#else
return((Quantum) (value/16843009.0));
#endif
}
static inline Quantum ScaleMapToQuantum(const MagickRealType value)
{
if (value <= 0.0)
return((Quantum) 0);
if (value >= MaxMap)
return(QuantumRange);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (value+0.5));
#else
return((Quantum) value);
#endif
}
static inline unsigned int ScaleQuantumToLong(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) (16843009UL*quantum));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
if ((16843009.0*quantum) >= 4294967295.0)
return(4294967295UL);
return((unsigned int) (16843009.0*quantum+0.5));
#endif
}
static inline unsigned int ScaleQuantumToMap(const Quantum quantum)
{
if (quantum >= (Quantum) MaxMap)
return((unsigned int) MaxMap);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) quantum);
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
return((unsigned int) (quantum+0.5));
#endif
}
static inline unsigned short ScaleQuantumToShort(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned short) (257UL*quantum));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0);
if ((257.0*quantum) >= 65535.0)
return(65535);
return((unsigned short) (257.0*quantum+0.5));
#endif
}
static inline Quantum ScaleShortToQuantum(const unsigned short value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) ((value+128U)/257U));
#else
return((Quantum) (value/257.0));
#endif
}
#elif (MAGICKCORE_QUANTUM_DEPTH == 16)
static inline Quantum ScaleCharToQuantum(const unsigned char value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (257U*value));
#else
return((Quantum) (257.0*value));
#endif
}
static inline Quantum ScaleLongToQuantum(const unsigned int value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) ((value)/MagickULLConstant(65537)));
#else
return((Quantum) (value/65537.0));
#endif
}
static inline Quantum ScaleMapToQuantum(const MagickRealType value)
{
if (value <= 0.0)
return((Quantum) 0);
if (value >= MaxMap)
return(QuantumRange);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (value+0.5));
#else
return((Quantum) value);
#endif
}
static inline unsigned int ScaleQuantumToLong(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) (65537UL*quantum));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
if ((65537.0*quantum) >= 4294967295.0)
return(4294967295U);
return((unsigned int) (65537.0*quantum+0.5));
#endif
}
static inline unsigned int ScaleQuantumToMap(const Quantum quantum)
{
if (quantum >= (Quantum) MaxMap)
return((unsigned int) MaxMap);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) quantum);
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
return((unsigned int) (quantum+0.5));
#endif
}
static inline unsigned short ScaleQuantumToShort(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned short) quantum);
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0);
if (quantum >= 65535.0)
return(65535);
return((unsigned short) (quantum+0.5));
#endif
}
static inline Quantum ScaleShortToQuantum(const unsigned short value)
{
return((Quantum) value);
}
#elif (MAGICKCORE_QUANTUM_DEPTH == 32)
static inline Quantum ScaleCharToQuantum(const unsigned char value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (16843009UL*value));
#else
return((Quantum) (16843009.0*value));
#endif
}
static inline Quantum ScaleLongToQuantum(const unsigned int value)
{
return((Quantum) value);
}
static inline Quantum ScaleMapToQuantum(const MagickRealType value)
{
if (value <= 0.0)
return((Quantum) 0);
if (value >= (Quantum) MaxMap)
return(QuantumRange);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (65537.0*value+0.5));
#else
return((Quantum) (65537.0*value));
#endif
}
static inline unsigned int ScaleQuantumToLong(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) quantum);
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
if ((quantum) >= 4294967295.0)
return(4294967295);
return((unsigned int) (quantum+0.5));
#endif
}
static inline unsigned int ScaleQuantumToMap(const Quantum quantum)
{
if ((quantum/65537) >= (Quantum) MaxMap)
return((unsigned int) MaxMap);
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned int) ((quantum+MagickULLConstant(32768))/
MagickULLConstant(65537)));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
return((unsigned int) (quantum/65537.0+0.5));
#endif
}
static inline unsigned short ScaleQuantumToShort(const Quantum quantum)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((unsigned short) ((quantum+MagickULLConstant(32768))/
MagickULLConstant(65537)));
#else
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0);
if ((quantum/65537.0) >= 65535.0)
return(65535);
return((unsigned short) (quantum/65537.0+0.5));
#endif
}
static inline Quantum ScaleShortToQuantum(const unsigned short value)
{
#if !defined(MAGICKCORE_HDRI_SUPPORT)
return((Quantum) (65537UL*value));
#else
return((Quantum) (65537.0*value));
#endif
}
#elif (MAGICKCORE_QUANTUM_DEPTH == 64)
static inline Quantum ScaleCharToQuantum(const unsigned char value)
{
return((Quantum) (72340172838076673.0*value));
}
static inline Quantum ScaleLongToQuantum(const unsigned int value)
{
return((Quantum) (4294967297.0*value));
}
static inline Quantum ScaleMapToQuantum(const MagickRealType value)
{
if (value <= 0.0)
return((Quantum) 0);
if (value >= MaxMap)
return(QuantumRange);
return((Quantum) (281479271743489.0*value));
}
static inline unsigned int ScaleQuantumToLong(const Quantum quantum)
{
return((unsigned int) (quantum/4294967297.0+0.5));
}
static inline unsigned int ScaleQuantumToMap(const Quantum quantum)
{
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0U);
if ((quantum/281479271743489.0) >= MaxMap)
return((unsigned int) MaxMap);
return((unsigned int) (quantum/281479271743489.0+0.5));
}
static inline unsigned short ScaleQuantumToShort(const Quantum quantum)
{
if ((IsNaN(quantum) != 0) || (quantum <= 0.0))
return(0);
if ((quantum/281479271743489.0) >= 65535.0)
return(65535);
return((unsigned short) (quantum/281479271743489.0+0.5));
}
static inline Quantum ScaleShortToQuantum(const unsigned short value)
{
return((Quantum) (281479271743489.0*value));
}
#endif
static inline unsigned short SinglePrecisionToHalf(const float value)
{
typedef union _SinglePrecision
{
unsigned int
fixed_point;
float
single_precision;
} SinglePrecision;
int
exponent;
unsigned int
significand,
sign_bit;
SinglePrecision
map;
unsigned short
half;
/*
The IEEE 754 standard specifies half precision as having:
Sign bit: 1 bit
Exponent width: 5 bits
Significand precision: 11 (10 explicitly stored)
*/
map.single_precision=value;
sign_bit=(map.fixed_point >> 16) & 0x00008000;
exponent=(int) ((map.fixed_point >> ExponentShift) & 0x000000ff)-ExponentBias;
significand=map.fixed_point & 0x007fffff;
if (exponent <= 0)
{
int
shift;
if (exponent < -10)
return((unsigned short) sign_bit);
significand=significand | 0x00800000;
shift=(int) (14-exponent);
significand=(unsigned int) ((significand+((1 << (shift-1))-1)+
((significand >> shift) & 0x01)) >> shift);
return((unsigned short) (sign_bit | significand));
}
else
if (exponent == (0xff-ExponentBias))
{
if (significand == 0)
return((unsigned short) (sign_bit | ExponentMask));
else
{
significand>>=SignificandShift;
half=(unsigned short) (sign_bit | significand |
(significand == 0) | ExponentMask);
return(half);
}
}
significand=significand+((significand >> SignificandShift) & 0x01)+0x00000fff;
if ((significand & 0x00800000) != 0)
{
significand=0;
exponent++;
}
if (exponent > 30)
{
float
alpha;
int
i;
/*
Float overflow.
*/
alpha=1.0e10;
for (i=0; i < 10; i++)
alpha*=alpha;
return((unsigned short) (sign_bit | ExponentMask));
}
half=(unsigned short) (sign_bit | (exponent << 10) |
(significand >> SignificandShift));
return(half);
}
#if defined(__cplusplus) || defined(c_plusplus)
}
#endif
#endif