/* Copyright Abandoned 1996 TCX DataKonsult AB & Monty Program KB & Detron HB This file is public domain and comes with NO WARRANTY of any kind */ /* Parts of the original, which are not applicable to mysqlnd have been removed. With small modifications, mostly casting but adding few more macros by Andrey Hristov . The additions are in the public domain and were added to improve the header file, to get it more consistent. */ /* Comes from global.h as OFFSET, renamed to STRUCT_OFFSET */ #define STRUCT_OFFSET(t, f) ((size_t)(char *)&((t *)0)->f) #ifndef __attribute #if !defined(__GNUC__) #define __attribute(A) #endif #endif #ifdef __CYGWIN__ /* We use a Unix API, so pretend it's not Windows */ #undef WIN #undef WIN32 #undef _WIN #undef _WIN32 #undef _WIN64 #undef __WIN__ #undef __WIN32__ #endif /* __CYGWIN__ */ #if defined(_WIN32) || defined(_WIN64) || defined(__WIN32__) || defined(WIN32) # include #else # include "ext/mysqlnd/php_mysqlnd_config.h" #endif /* _WIN32... */ #ifdef HAVE_SYS_TYPES_H #include #endif #ifdef HAVE_STDINT_H #include #endif #if SIZEOF_LONG_LONG > 4 && !defined(_LONG_LONG) #define _LONG_LONG 1 /* For AIX string library */ #endif /* Go around some bugs in different OS and compilers */ #if defined(_HPUX_SOURCE) && defined(HAVE_SYS_STREAM_H) #include /* HPUX 10.20 defines ulong here. UGLY !!! */ #define HAVE_ULONG #endif #if SIZEOF_LONG_LONG > 4 #define HAVE_LONG_LONG 1 #endif /* Typdefs for easyier portability */ #ifndef HAVE_INT8 #ifndef HAVE_INT8_T typedef signed char int8; /* Signed integer >= 8 bits */ #else typedef int8_t int8; /* Signed integer >= 8 bits */ #endif #endif #ifndef HAVE_UINT8 #ifndef HAVE_UINT8_T typedef unsigned char uint8; /* Unsigned integer >= 8 bits */ #else typedef uint8_t uint8; /* Signed integer >= 8 bits */ #endif #endif #ifndef HAVE_INT16 #ifndef HAVE_INT16_T typedef signed short int16; /* Signed integer >= 16 bits */ #else typedef int16_t int16; /* Signed integer >= 16 bits */ #endif #endif #ifndef HAVE_UINT16 #ifndef HAVE_UINT16_T typedef unsigned short uint16; /* Signed integer >= 16 bits */ #else typedef uint16_t uint16; /* Signed integer >= 16 bits */ #endif #endif #ifndef HAVE_UCHAR typedef unsigned char uchar; /* Short for unsigned char */ #endif #ifndef HAVE_INT32 #ifdef HAVE_INT32_T typedef int32_t int32; #elif SIZEOF_INT == 4 typedef signed int int32; #elif SIZEOF_LONG == 4 typedef signed long int32; #else error "Neither int nor long is of 4 bytes width" #endif #endif /* HAVE_INT32 */ #ifndef HAVE_UINT32 #ifdef HAVE_UINT32_T typedef uint32_t uint32; #elif SIZEOF_INT == 4 typedef unsigned int uint32; #elif SIZEOF_LONG == 4 typedef unsigned long uint32; #else #error "Neither int nor long is of 4 bytes width" #endif #endif /* HAVE_UINT32 */ #ifndef HAVE_INT64 #ifdef HAVE_INT64_T typedef int64_t int64; #elif SIZEOF_INT == 8 typedef signed int int64; #elif SIZEOF_LONG == 8 typedef signed long int64; #elif SIZEOF_LONG_LONG == 8 #ifdef PHP_WIN32 typedef __int64 int64; #else typedef signed long long int64; #endif #else #error "Neither int nor long nor long long is of 8 bytes width" #endif #endif /* HAVE_INT64 */ #ifndef HAVE_UINT64 #ifdef HAVE_UINT64_T typedef uint64_t uint64; #elif SIZEOF_INT == 8 typedef unsigned int uint64; #elif SIZEOF_LONG == 8 typedef unsigned long uint64; #elif SIZEOF_LONG_LONG == 8 #ifdef PHP_WIN32 typedef unsigned __int64 uint64; #else typedef unsigned long long uint64; #endif #else #error "Neither int nor long nor long long is of 8 bytes width" #endif #endif /* HAVE_INT64 */ #ifdef PHP_WIN32 #define MYSQLND_LLU_SPEC "%I64u" #define MYSQLND_LL_SPEC "%I64d" #ifndef L64 #define L64(x) x##i64 #endif #else #define MYSQLND_LLU_SPEC "%llu" #define MYSQLND_LL_SPEC "%lld" #ifndef L64 #define L64(x) x##LL #endif #endif typedef int64 longlong; typedef uint64 ulonglong; #define int1store(T,A) do { *((zend_uchar*) (T)) = (A); } while(0) #define uint1korr(A) (*(((uint8*)(A)))) /* Bit values are sent in reverted order of bytes, compared to normal !!! */ #define bit_uint2korr(A) ((uint16) (((uint16) (((uchar*) (A))[1])) +\ ((uint16) (((uchar*) (A))[0]) << 8))) #define bit_uint3korr(A) ((uint32) (((uint32) (((uchar*) (A))[2])) +\ (((uint32) (((uchar*) (A))[1])) << 8) +\ (((uint32) (((uchar*) (A))[0])) << 16))) #define bit_uint4korr(A) ((uint32) (((uint32) (((uchar*) (A))[3])) +\ (((uint32) (((uchar*) (A))[2])) << 8) +\ (((uint32) (((uchar*) (A))[1])) << 16) +\ (((uint32) (((uchar*) (A))[0])) << 24))) #define bit_uint5korr(A) ((ulonglong)(((uint32) ((uchar) (A)[4])) +\ (((uint32) ((uchar) (A)[3])) << 8) +\ (((uint32) ((uchar) (A)[2])) << 16) +\ (((uint32) ((uchar) (A)[1])) << 24)) +\ (((ulonglong) ((uchar) (A)[0])) << 32)) #define bit_uint6korr(A) ((ulonglong)(((uint32) (((uchar*) (A))[5])) +\ (((uint32) (((uchar*) (A))[4])) << 8) +\ (((uint32) (((uchar*) (A))[3])) << 16) +\ (((uint32) (((uchar*) (A))[2])) << 24)) +\ (((ulonglong) (((uint32) (((uchar*) (A))[1])) +\ (((uint32) (((uchar*) (A))[0]) << 8)))) << 32)) #define bit_uint7korr(A) ((ulonglong)(((uint32) (((uchar*) (A))[6])) +\ (((uint32) (((uchar*) (A))[5])) << 8) +\ (((uint32) (((uchar*) (A))[4])) << 16) +\ (((uint32) (((uchar*) (A))[3])) << 24)) +\ (((ulonglong) (((uint32) (((uchar*) (A))[2])) +\ (((uint32) (((uchar*) (A))[1])) << 8) +\ (((uint32) (((uchar*) (A))[0])) << 16))) << 32)) #define bit_uint8korr(A) ((ulonglong)(((uint32) (((uchar*) (A))[7])) +\ (((uint32) (((uchar*) (A))[6])) << 8) +\ (((uint32) (((uchar*) (A))[5])) << 16) +\ (((uint32) (((uchar*) (A))[4])) << 24)) +\ (((ulonglong) (((uint32) (((uchar*) (A))[3])) +\ (((uint32) (((uchar*) (A))[2])) << 8) +\ (((uint32) (((uchar*) (A))[1])) << 16) +\ (((uint32) (((uchar*) (A))[0])) << 24))) << 32)) /* ** Define-funktions for reading and storing in machine independent format ** (low byte first) */ /* Optimized store functions for Intel x86, non-valid for WIN64 */ #if defined(__i386__) && !defined(_WIN64) #define sint2korr(A) (*((int16 *) (A))) #define sint3korr(A) ((int32) ((((uchar) (A)[2]) & 128) ? \ (((uint32) 255L << 24) | \ (((uint32) (uchar) (A)[2]) << 16) |\ (((uint32) (uchar) (A)[1]) << 8) | \ ((uint32) (uchar) (A)[0])) : \ (((uint32) (uchar) (A)[2]) << 16) |\ (((uint32) (uchar) (A)[1]) << 8) | \ ((uint32) (uchar) (A)[0]))) #define sint4korr(A) (*((long *) (A))) #define uint2korr(A) (*((uint16 *) (A))) #define uint3korr(A) (uint32) (((uint32) ((uchar) (A)[0])) +\ (((uint32) ((uchar) (A)[1])) << 8) +\ (((uint32) ((uchar) (A)[2])) << 16)) #define uint4korr(A) (*((unsigned long *) (A))) #define uint8korr(A) (*((ulonglong *) (A))) #define sint8korr(A) (*((longlong *) (A))) #define int2store(T,A) *((uint16*) (T))= (uint16) (A) #define int3store(T,A) { \ *(T)= (uchar) ((A));\ *(T+1)=(uchar) (((uint) (A) >> 8));\ *(T+2)=(uchar) (((A) >> 16)); } #define int4store(T,A) *((long *) (T))= (long) (A) #define int5store(T,A) { \ *((uchar *)(T))= (uchar)((A));\ *(((uchar *)(T))+1)=(uchar) (((A) >> 8));\ *(((uchar *)(T))+2)=(uchar) (((A) >> 16));\ *(((uchar *)(T))+3)=(uchar) (((A) >> 24)); \ *(((uchar *)(T))+4)=(uchar) (((A) >> 32)); } /* From Andrey Hristov, based on int5store() */ #define int6store(T,A) { \ *(((uchar *)(T)))= (uchar)((A));\ *(((uchar *)(T))+1))=(uchar) (((A) >> 8));\ *(((uchar *)(T))+2))=(uchar) (((A) >> 16));\ *(((uchar *)(T))+3))=(uchar) (((A) >> 24)); \ *(((uchar *)(T))+4))=(uchar) (((A) >> 32)); \ *(((uchar *)(T))+5))=(uchar) (((A) >> 40)); } #define int8store(T,A) *((ulonglong *) (T))= (ulonglong) (A) typedef union { double v; long m[2]; } doubleget_union; #define doubleget(V,M) { ((doubleget_union *)&(V))->m[0] = *((long*) (M)); \ ((doubleget_union *)&(V))->m[1] = *(((long*) (M))+1); } #define doublestore(T,V) { *((long *) (T)) = ((doubleget_union *)&(V))->m[0]; \ *(((long *) (T))+1) = ((doubleget_union *)&(V))->m[1]; } #define float4get(V,M) { *((float *) &(V)) = *((float*) (M)); } #define float8get(V,M) doubleget((V),(M)) /* From Andrey Hristov based on doubleget */ #define floatget(V,M) memcpy((char*) &(V),(char*) (M),sizeof(float)) #define floatstore float4store #define float4store(V,M) memcpy((char*) (V),(char*) (&M),sizeof(float)) #define float8store(V,M) doublestore((V),(M)) #endif /* __i386__ */ #ifndef sint2korr #define sint2korr(A) (int16) (((int16) ((uchar) (A)[0])) +\ ((int16) ((int16) (A)[1]) << 8)) #define sint3korr(A) ((int32) ((((uchar) (A)[2]) & 128) ? \ (((uint32) 255L << 24) | \ (((uint32) (uchar) (A)[2]) << 16) |\ (((uint32) (uchar) (A)[1]) << 8) | \ ((uint32) (uchar) (A)[0])) : \ (((uint32) (uchar) (A)[2]) << 16) |\ (((uint32) (uchar) (A)[1]) << 8) | \ ((uint32) (uchar) (A)[0]))) #define sint4korr(A) (int32) (((int32) ((uchar) (A)[0])) +\ (((int32) ((uchar) (A)[1]) << 8)) +\ (((int32) ((uchar) (A)[2]) << 16)) +\ (((int32) ((int16) (A)[3]) << 24))) #define sint8korr(A) (longlong) uint8korr(A) #define uint2korr(A) (uint16) (((uint16) ((uchar) (A)[0])) +\ ((uint16) ((uchar) (A)[1]) << 8)) #define uint3korr(A) (uint32) (((uint32) ((uchar) (A)[0])) +\ (((uint32) ((uchar) (A)[1])) << 8) +\ (((uint32) ((uchar) (A)[2])) << 16)) #define uint4korr(A) (uint32) (((uint32) ((uchar) (A)[0])) +\ (((uint32) ((uchar) (A)[1])) << 8) +\ (((uint32) ((uchar) (A)[2])) << 16) +\ (((uint32) ((uchar) (A)[3])) << 24)) #define bit_uint8korr(A) ((ulonglong)(((uint32) (((uchar*) (A))[7])) +\ (((uint32) (((uchar*) (A))[6])) << 8) +\ (((uint32) (((uchar*) (A))[5])) << 16) +\ (((uint32) (((uchar*) (A))[4])) << 24)) +\ (((ulonglong) (((uint32) (((uchar*) (A))[3])) +\ (((uint32) (((uchar*) (A))[2])) << 8) +\ (((uint32) (((uchar*) (A))[1])) << 16) +\ (((uint32) (((uchar*) (A))[0])) << 24))) << 32)) #define uint8korr(A) ((ulonglong)(((uint32) ((uchar) (A)[0])) +\ (((uint32) ((uchar) (A)[1])) << 8) +\ (((uint32) ((uchar) (A)[2])) << 16) +\ (((uint32) ((uchar) (A)[3])) << 24)) +\ (((ulonglong) (((uint32) ((uchar) (A)[4])) +\ (((uint32) ((uchar) (A)[5])) << 8) +\ (((uint32) ((uchar) (A)[6])) << 16) +\ (((uint32) ((uchar) (A)[7])) << 24))) << 32)) #define int2store(T,A) do { uint def_temp= (uint) (A) ;\ *((uchar*) (T)) = (uchar)(def_temp); \ *((uchar*) (T+1)) = (uchar)((def_temp >> 8)); } while (0) #define int3store(T,A) do { /*lint -save -e734 */\ *(((char *)(T))) = (char) ((A));\ *(((char *)(T))+1) = (char) (((A) >> 8));\ *(((char *)(T))+2) = (char) (((A) >> 16)); \ /*lint -restore */} while (0) #define int4store(T,A) do { \ *(((char *)(T))) = (char) ((A));\ *(((char *)(T))+1) = (char) (((A) >> 8));\ *(((char *)(T))+2) = (char) (((A) >> 16));\ *(((char *)(T))+3) = (char) (((A) >> 24)); } while (0) #define int5store(T,A) do { \ *(((char *)(T))) = (char)((A));\ *(((char *)(T))+1) = (char)(((A) >> 8));\ *(((char *)(T))+2) = (char)(((A) >> 16));\ *(((char *)(T))+3) = (char)(((A) >> 24)); \ *(((char *)(T))+4) = (char)(((A) >> 32)); } while (0) /* Based on int5store() from Andrey Hristov */ #define int6store(T,A) do { \ *(((char *)(T))) = (char)((A));\ *(((char *)(T))+1) = (char)(((A) >> 8));\ *(((char *)(T))+2) = (char)(((A) >> 16));\ *(((char *)(T))+3) = (char)(((A) >> 24)); \ *(((char *)(T))+4) = (char)(((A) >> 32)); \ *(((char *)(T))+5) = (char)(((A) >> 40)); } while (0) #define int8store(T,A) { uint def_temp= (uint) (A), def_temp2= (uint) ((A) >> 32); \ int4store((T),def_temp); \ int4store((T+4),def_temp2); \ } #ifdef WORDS_BIGENDIAN #define float4store(T,A) do { \ *(((char *)(T))) = (char) ((char *) &A)[3];\ *(((char *)(T))+1) = (char) ((char *) &A)[2];\ *(((char *)(T))+2) = (char) ((char *) &A)[1];\ *(((char *)(T))+3) = (char) ((char *) &A)[0]; } while (0) #define float4get(V,M) do { float def_temp;\ ((char*) &def_temp)[0] = (M)[3];\ ((char*) &def_temp)[1] = (M)[2];\ ((char*) &def_temp)[2] = (M)[1];\ ((char*) &def_temp)[3] = (M)[0];\ (V)=def_temp; } while (0) #define float8store(T,V) do { \ *(((char *)(T))) = (char) ((char *) &(V))[7];\ *(((char *)(T))+1) = (char) ((char *) &(V))[6];\ *(((char *)(T))+2) = (char) ((char *) &(V))[5];\ *(((char *)(T))+3) = (char) ((char *) &(V))[4];\ *(((char *)(T))+4) = (char) ((char *) &(V))[3];\ *(((char *)(T))+5) = (char) ((char *) &(V))[2];\ *(((char *)(T))+6) = (char) ((char *) &(V))[1];\ *(((char *)(T))+7) = (char) ((char *) &(V))[0]; } while (0) #define float8get(V,M) do { double def_temp;\ ((char*) &def_temp)[0] = (M)[7];\ ((char*) &def_temp)[1] = (M)[6];\ ((char*) &def_temp)[2] = (M)[5];\ ((char*) &def_temp)[3] = (M)[4];\ ((char*) &def_temp)[4] = (M)[3];\ ((char*) &def_temp)[5] = (M)[2];\ ((char*) &def_temp)[6] = (M)[1];\ ((char*) &def_temp)[7] = (M)[0];\ (V) = def_temp; \ } while (0) #else #define float4get(V,M) memcpy((char*) &(V),(char*) (M),sizeof(float)) #define float4store(V,M) memcpy((char*) (V),(char*) (&M),sizeof(float)) #if defined(__FLOAT_WORD_ORDER) && (__FLOAT_WORD_ORDER == __BIG_ENDIAN) #define doublestore(T,V) do { \ *(((char *)(T)))= ((char *) &(V))[4];\ *(((char *)(T))+1)=(char) ((char *) &(V))[5];\ *(((char *)(T))+2)=(char) ((char *) &(V))[6];\ *(((char *)(T))+3)=(char) ((char *) &(V))[7];\ *(((char *)(T))+4)=(char) ((char *) &(V))[0];\ *(((char *)(T))+5)=(char) ((char *) &(V))[1];\ *(((char *)(T))+6)=(char) ((char *) &(V))[2];\ *(((char *)(T))+7)=(char) ((char *) &(V))[3];} while (0) #define doubleget(V,M) do { double def_temp;\ ((char*) &def_temp)[0]=(M)[4];\ ((char*) &def_temp)[1]=(M)[5];\ ((char*) &def_temp)[2]=(M)[6];\ ((char*) &def_temp)[3]=(M)[7];\ ((char*) &def_temp)[4]=(M)[0];\ ((char*) &def_temp)[5]=(M)[1];\ ((char*) &def_temp)[6]=(M)[2];\ ((char*) &def_temp)[7]=(M)[3];\ (V) = def_temp; } while (0) #endif /* __FLOAT_WORD_ORDER */ #define float8get(V,M) doubleget((V),(M)) #define float8store(V,M) doublestore((V),(M)) #endif /* WORDS_BIGENDIAN */ #endif /* sint2korr */ /* Define-funktions for reading and storing in machine format from/to short/long to/from some place in memory V should be a (not register) variable, M is a pointer to byte */ #ifdef WORDS_BIGENDIAN #define ushortget(V,M) { V = (uint16) (((uint16) ((uchar) (M)[1]))+\ ((uint16) ((uint16) (M)[0]) << 8)); } #define shortget(V,M) { V = (short) (((short) ((uchar) (M)[1]))+\ ((short) ((short) (M)[0]) << 8)); } #define longget(V,M) do { int32 def_temp;\ ((char*) &def_temp)[0]=(M)[0];\ ((char*) &def_temp)[1]=(M)[1];\ ((char*) &def_temp)[2]=(M)[2];\ ((char*) &def_temp)[3]=(M)[3];\ (V)=def_temp; } while (0) #define ulongget(V,M) do { uint32 def_temp;\ ((char*) &def_temp)[0]=(M)[0];\ ((char*) &def_temp)[1]=(M)[1];\ ((char*) &def_temp)[2]=(M)[2];\ ((char*) &def_temp)[3]=(M)[3];\ (V)=def_temp; } while (0) #define shortstore(T,A) do { \ uint def_temp=(uint) (A) ;\ *(((char *)(T))+1)=(char)(def_temp); \ *(((char *)(T))+0)=(char)(def_temp >> 8); } while (0) #define longstore(T,A) do { \ *(((char *)(T))+3)=(char)((A));\ *(((char *)(T))+2)=(char)(((A) >> 8));\ *(((char *)(T))+1)=(char)(((A) >> 16));\ *(((char *)(T))+0)=(char)(((A) >> 24)); } while (0) #define doubleget(V,M) memcpy((char*) &(V),(char*) (M), sizeof(double)) #define doublestore(T,V) memcpy((char*) (T),(char*) &(V), sizeof(double)) #define longlongget(V,M) memcpy((char*) &(V),(char*) (M), sizeof(ulonglong)) #define longlongstore(T,V) memcpy((char*) (T),(char*) &(V), sizeof(ulonglong)) #else #define ushortget(V,M) { V = uint2korr((M)); } #define shortget(V,M) { V = sint2korr((M)); } #define longget(V,M) { V = sint4korr((M)); } #define ulongget(V,M) { V = uint4korr((M)); } #define shortstore(T,V) int2store((T),(V)) #define longstore(T,V) int4store((T),(V)) #ifndef doubleget #define doubleget(V,M) memcpy((char*) &(V),(char*) (M),sizeof(double)) #define doublestore(T,V) memcpy((char*) (T),(char*) &(V),sizeof(double)) #endif /* doubleget */ #define longlongget(V,M) memcpy((char*) &(V),(char*) (M),sizeof(ulonglong)) #define longlongstore(T,V) memcpy((char*) (T),(char*) &(V),sizeof(ulonglong)) #endif /* WORDS_BIGENDIAN */ /* * Local variables: * tab-width: 4 * c-basic-offset: 4 * End: * vim600: noet sw=4 ts=4 fdm=marker * vim<600: noet sw=4 ts=4 */