Initial revision
This commit is contained in:
slidedraw
259
cole/support.h
Normal file
259
cole/support.h
Normal file
@@ -0,0 +1,259 @@
|
||||
/*
|
||||
Support - Provides some big and little endian abstraction functions.
|
||||
Copyright (C) 1999 Roberto Arturo Tena Sanchez
|
||||
|
||||
This program is free software; you can redistribute it and/or modify
|
||||
it under the terms of the GNU General Public License as published by
|
||||
the Free Software Foundation; either version 2 of the License, or
|
||||
(at your option) any later version.
|
||||
|
||||
This program is distributed in the hope that it will be useful,
|
||||
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
||||
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
||||
GNU General Public License for more details.
|
||||
|
||||
You should have received a copy of the GNU General Public License
|
||||
along with this program; if not, write to the Free Software
|
||||
Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
|
||||
*/
|
||||
/*
|
||||
Arturo Tena <arturo@directmail.org>
|
||||
*/
|
||||
/*
|
||||
Some code was from Caolan, but I have replaced all the code,
|
||||
now all code here is mine, so I changed copyright announce in cole-1.0.0.
|
||||
Arturo Tena
|
||||
*/
|
||||
|
||||
|
||||
#ifndef COLE_SUPPORT_H
|
||||
#define COLE_SUPPORT_H
|
||||
|
||||
#ifdef __cplusplus
|
||||
extern "C" {
|
||||
#endif
|
||||
|
||||
|
||||
#include <ctype.h>
|
||||
#include <stdio.h>
|
||||
|
||||
#if !(defined( __BORLANDC__ ) || defined( __WIN32__ ))
|
||||
#include "config.h"
|
||||
|
||||
|
||||
/* F32 */
|
||||
#if SIZEOF_FLOAT == 4
|
||||
#define F32 float
|
||||
#elif SIZEOF_DOUBLE == 4
|
||||
#define F32 double
|
||||
#elif SIZEOF_LONG_DOUBLE == 4
|
||||
#define F32 long double
|
||||
#else
|
||||
#error No 4 byte length float type found.
|
||||
#endif
|
||||
|
||||
/* F64 */
|
||||
#if SIZEOF_DOUBLE == 8
|
||||
#define F64 double
|
||||
#elif SIZEOF_LONG_DOUBLE == 8
|
||||
#define F64 long double
|
||||
#else
|
||||
#error No 8 byte length float type found.
|
||||
#endif
|
||||
|
||||
/* U8 */
|
||||
#if SIZEOF_UNSIGNED_CHAR == 1
|
||||
#define U8 unsigned char
|
||||
#else
|
||||
#error No 1 byte length type found.
|
||||
#error Char is not a byte! Mmmh... maybe you need another compiler.
|
||||
#endif
|
||||
|
||||
/* U16 */
|
||||
#if SIZEOF_UNSIGNED_INT == 2
|
||||
#define U16 unsigned int
|
||||
#elif SIZEOF_UNSIGNED_SHORT == 2
|
||||
#define U16 unsigned short
|
||||
#elif SIZEOF_UNSIGNED_LONG == 2
|
||||
#define U16 unsigned long
|
||||
#else
|
||||
#error No 2 byte length type found.
|
||||
#endif
|
||||
|
||||
/* S16 */
|
||||
#if SIZEOF_UNSIGNED_INT == 2
|
||||
#define S16 signed int
|
||||
#elif SIZEOF_UNSIGNED_SHORT == 2
|
||||
#define S16 signed short
|
||||
#elif SIZEOF_UNSIGNED_LONG == 2
|
||||
#define S16 signed long
|
||||
#else
|
||||
#error No 2 byte length type found.
|
||||
#endif
|
||||
|
||||
|
||||
/* U32 */
|
||||
#if SIZEOF_UNSIGNED_LONG == 4
|
||||
#define U32 unsigned long
|
||||
#elif SIZEOF_UNSIGNED_INT == 4
|
||||
#define U32 unsigned int
|
||||
#elif SIZEOF_UNSIGNED_LONG_LONG == 4
|
||||
#define U32 unsigned long long
|
||||
#else
|
||||
#error No 4 byte length type found.
|
||||
#endif
|
||||
|
||||
/* S32 */
|
||||
#if SIZEOF_UNSIGNED_LONG == 4
|
||||
#define S32 signed long
|
||||
#elif SIZEOF_UNSIGNED_INT == 4
|
||||
#define S32 signed int
|
||||
#elif SIZEOF_UNSIGNED_LONG_LONG == 4
|
||||
#define S32 signed long long
|
||||
#else
|
||||
#error No 4 byte length type found.
|
||||
#endif
|
||||
|
||||
#else
|
||||
|
||||
/* Borland or Wintel constants */
|
||||
#define F32 float
|
||||
#define F64 double
|
||||
#define U8 unsigned char
|
||||
#define U16 unsigned short
|
||||
#define S16 signed short
|
||||
#define U32 unsigned long
|
||||
#define S32 signed long
|
||||
|
||||
#endif
|
||||
|
||||
U16 fil_sreadU16 (U8 * in);
|
||||
U32 fil_sreadU32 (U8 * in);
|
||||
F64 fil_sreadF64 (U8 * in);
|
||||
|
||||
void fil_swriteU16 (U8 * dest, U16 * src);
|
||||
void fil_swriteU32 (U8 * dest, U32 * src);
|
||||
|
||||
void __cole_dump (void *_m, void *_start, int length, char *msg);
|
||||
|
||||
#define verbose_return() \
|
||||
{ \
|
||||
verbose_wonl ("returning from "); \
|
||||
verbose_wonl (__FILE__); \
|
||||
verbose_wonl (":"); \
|
||||
verbose_d (__LINE__); \
|
||||
}
|
||||
|
||||
#define test(t,retval) \
|
||||
{ \
|
||||
if (!(t)) \
|
||||
{ \
|
||||
verbose_return (); \
|
||||
return retval; \
|
||||
} \
|
||||
}
|
||||
#define test_exitf(t,retval,func) \
|
||||
{ \
|
||||
if (!(t)) \
|
||||
{ \
|
||||
func; \
|
||||
verbose_return (); \
|
||||
return (retval); \
|
||||
} \
|
||||
}
|
||||
#define test_call(t,typeretval) \
|
||||
{ \
|
||||
typeretval retval; \
|
||||
retval = (t); \
|
||||
if (retval) \
|
||||
{ \
|
||||
verbose_return () \
|
||||
return (retval); \
|
||||
} \
|
||||
}
|
||||
#define test_call_exitf(t,typeretval,func) \
|
||||
{ \
|
||||
typeretval retval; \
|
||||
retval = (t); \
|
||||
if (retval) \
|
||||
{ \
|
||||
func; \
|
||||
verbose_return () \
|
||||
return (retval); \
|
||||
} \
|
||||
}
|
||||
#define report_bug(prog) \
|
||||
{ \
|
||||
fprintf (stderr, #prog": A bug have been found: %s:%d\n"#prog \
|
||||
":Please, download a most recent version and try again\n", \
|
||||
__FILE__, __LINE__); \
|
||||
}
|
||||
#define assert_return(prog,t,retval) \
|
||||
{ \
|
||||
if (!(t)) \
|
||||
{ \
|
||||
fprintf (stderr, #prog": Condition "#t" is not valid: %s:%d\n", \
|
||||
__FILE__, __LINE__); \
|
||||
report_bug (prog); \
|
||||
return (retval); \
|
||||
} \
|
||||
}
|
||||
|
||||
|
||||
#ifdef VERBOSE
|
||||
|
||||
#define verbose_d(n) { printf ("%d\n", n); }
|
||||
#define verbose(s) { puts(s); }
|
||||
#define verbose_wonl(s) { printf (s); }
|
||||
#define verboseU8(expr) { printf (#expr " = 0x%02x\n", expr); }
|
||||
#define verboseU16(expr) { printf (#expr " = 0x%04x\n", expr); }
|
||||
#define verboseU32(expr) { printf (#expr " = 0x%08x\n", expr); }
|
||||
#define verboseS(expr) { printf (#expr " = %s\n", expr); }
|
||||
#define verboseS_wonl(expr) { printf (#expr " = %s", expr); }
|
||||
#define warning(t) { if (!(t)) printf ("warning: %s is false\n", #t); }
|
||||
|
||||
#else /* ifndef VERBOSE */
|
||||
|
||||
#define verbose_d(n) ;
|
||||
#define verbose(s) ;
|
||||
#define verbose_wonl(s) ;
|
||||
#define verboseU8(expr) ;
|
||||
#define verboseU16(expr) ;
|
||||
#define verboseU32(expr) ;
|
||||
#define verboseS(expr)
|
||||
#define verboseS_wonl(expr)
|
||||
#define warning(t)
|
||||
|
||||
#endif /* ifdef VERBOSE */
|
||||
|
||||
|
||||
#ifdef VERBOSE
|
||||
#define verboseU32Array(array,len) \
|
||||
{ \
|
||||
U32 temp; \
|
||||
for (temp = 0; temp < len; temp++) \
|
||||
printf (#array "[%lu] = 0x%08lx\n", temp, array [temp]); \
|
||||
}
|
||||
#else
|
||||
#define verboseU32Array(array,len)
|
||||
#endif
|
||||
|
||||
|
||||
#define verboseU8Array_force(rec,len,reclen) \
|
||||
__cole_dump ((rec), (rec), ((len)*(reclen)), "");
|
||||
|
||||
|
||||
#ifdef VERBOSE
|
||||
#define verboseU8Array(rec,len,reclen) verboseU8Array_force(rec,len,reclen)
|
||||
#else
|
||||
#define verboseU8Array(rec,len,reclen)
|
||||
#endif
|
||||
|
||||
|
||||
|
||||
#ifdef __cplusplus
|
||||
}
|
||||
#endif
|
||||
|
||||
#endif /* COLE_SUPPORT_H */
|
||||
|
||||
Reference in New Issue
Block a user