/*
   xls2xml: Converts from Microsoft Excel files to XML.
   Copyright 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
 */
/*
   Roberto Arturo Tena Sanchez <arturo@directmail.org>
 */


#ifndef COLE1COMPAT_H
#define COLE1COMPAT_H

#ifdef __cplusplus
extern "C" {
#endif


#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. Get another compiler.
#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. Get another compiler.
#endif

/* U8 */
#if SIZEOF_UNSIGNED_CHAR == 1
#define U8      unsigned char
#else
#error No 1 byte length type found. Get another compiler.
#error Char is not a byte! Mmmh... may be 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. Get another compiler.
#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. Get another compiler.
#endif


#ifndef XLS2XML_VERBOSE
#define verbose_d(n) {  }
#	define verbose_d(n) { }
#	define verbose(s) { }
#	define verbose_wonl(s) { }
#	define verboseU8(expr)  { }
#	define verboseU16(expr) { }
#	define verbose_return() { }
#else /* XLS2XML_VERBOSE */
#	define verbose_d(n) { printf ("%d\n", n); }
#	define verbose(s) { printf (s); printf ("\n"); }
#	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 verbose_return()                \
	  {                                    \
	    verbose_wonl ("returning from ");  \
	    verbose_wonl (__FILE__);           \
	    verbose_wonl (":");                \
	    verbose_d (__LINE__);              \
	  }
#endif
#define verboseU8Array_force(rec,len,reclen)                    \
        __xls2xml_dump ((rec), (rec), ((len)*(reclen)), "");
#define test(t,retval)    \
  {                       \
    if (!(t))             \
    {                     \
      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);                                                \
    }                                                                 \
  }
#define test_exitf(t,retval,func)  \
  {                                \
    if (!(t))                      \
    {                              \
      func;                        \
      verbose_return ();           \
      return (retval);             \
    }                              \
  }


U16 _xls2xml_sreadU16 (U8 * in);
U32 _xls2xml_sreadU32 (U8 * in);
F64 _xls2xml_sreadF64 (U8 * in);


#include <cole/cole.h>


#ifdef __cplusplus
}
#endif

#endif