swe4r 0.0.0

data/ext/swe4r/sweodef.h

@@ -0,0 +1,325 @@
+/************************************************************
+   $Header: /home/dieter/sweph/RCS/sweodef.h,v 1.74 2008/06/16 10:07:20 dieter Exp $
+   definitions and constants for all Swiss Ephemeris source files,
+   only required for compiling the libraries, not for the external
+   interface of the libraries.
+
+   The definitions are a subset of Astrodienst's ourdef.h content
+   and must be kept compatible. Everything not used in SwissEph
+   has been deleted.
+
+   Does auto-detection of MSDOS (TURBO_C or MS_C),  HPUNIX, Linux.
+   Must be extended for more portability; there should be a way
+   to detect byte order and file system type.
+   
+************************************************************/
+
+/* Copyright (C) 1997 - 2008 Astrodienst AG, Switzerland.  All rights reserved.
+
+  License conditions
+  ------------------
+
+  This file is part of Swiss Ephemeris.
+
+  Swiss Ephemeris is distributed with NO WARRANTY OF ANY KIND.  No author
+  or distributor accepts any responsibility for the consequences of using it,
+  or for whether it serves any particular purpose or works at all, unless he
+  or she says so in writing.  
+
+  Swiss Ephemeris is made available by its authors under a dual licensing
+  system. The software developer, who uses any part of Swiss Ephemeris
+  in his or her software, must choose between one of the two license models,
+  which are
+  a) GNU public license version 2 or later
+  b) Swiss Ephemeris Professional License
+
+  The choice must be made before the software developer distributes software
+  containing parts of Swiss Ephemeris to others, and before any public
+  service using the developed software is activated.
+
+  If the developer choses the GNU GPL software license, he or she must fulfill
+  the conditions of that license, which includes the obligation to place his
+  or her whole software project under the GNU GPL or a compatible license.
+  See http://www.gnu.org/licenses/old-licenses/gpl-2.0.html
+
+  If the developer choses the Swiss Ephemeris Professional license,
+  he must follow the instructions as found in http://www.astro.com/swisseph/ 
+  and purchase the Swiss Ephemeris Professional Edition from Astrodienst
+  and sign the corresponding license contract.
+
+  The License grants you the right to use, copy, modify and redistribute
+  Swiss Ephemeris, but only under certain conditions described in the License.
+  Among other things, the License requires that the copyright notices and
+  this notice be preserved on all copies.
+
+  Authors of the Swiss Ephemeris: Dieter Koch and Alois Treindl
+
+  The authors of Swiss Ephemeris have no control or influence over any of
+  the derived works, i.e. over software or services created by other
+  programmers which use Swiss Ephemeris functions.
+
+  The names of the authors or of the copyright holder (Astrodienst) must not
+  be used for promoting any software, product or service which uses or contains
+  the Swiss Ephemeris. This copyright notice is the ONLY place where the
+  names of the authors can legally appear, except in cases where they have
+  given special permission in writing.
+
+  The trademarks 'Swiss Ephemeris' and 'Swiss Ephemeris inside' may be used
+  for promoting such software, products or services.
+*/
+
+#ifndef _OURDEF_INCLUDED	/* ourdef.h is a superset of sweodef.h */
+#ifndef _SWEODEF_INCLUDED /* allow multiple #includes */
+#define _SWEODEF_INCLUDED
+ 
+# define MY_TRUE 1	/* for use in other defines, before TRUE is defined */
+# define MY_FALSE 0	/* for use in other defines, before TRUE is defined */
+
+
+#ifdef _WIN32		/* Microsoft VC 5.0 does not define MSDOS anymore */
+# undef MSDOS
+# define MSDOS MY_TRUE
+#include <wtypes.h>
+#include <objbase.h>
+#include <wincon.h>
+#include <winbase.h>
+#include <io.h>
+#include <windows.h>
+# define sleep(x)	Sleep((x) * 1000)
+#endif
+
+#ifdef _MSC_VER
+# define MS_VC
+#endif
+
+#ifdef WIN32		/* Microsoft VC 5.0 does not define MSDOS anymore */
+# define MSDOS MY_TRUE
+#endif
+
+#ifdef MSDOS	/* already defined by some DOS compilers */
+# undef MSDOS
+# define MSDOS MY_TRUE
+#endif
+
+#ifdef __TURBOC__	/* defined by  turboc */
+# ifndef MSDOS
+#   define MSDOS MY_TRUE
+# endif
+# define TURBO_C
+#endif
+
+#ifdef __SC__	/* defined by  Symantec C */
+# ifndef MSDOS
+#   define MSDOS MY_TRUE
+# endif
+# define SYMANTEC_C
+#endif
+
+#ifdef __WATCOMC__	/* defined by  WatcomC */
+# ifndef MSDOS
+#   define MSDOS MY_TRUE
+# endif
+# define WATCOMC
+#endif
+
+#ifdef __MWERKS__	/* defined on Macintosh CodeWarrior */
+# if macintosh && powerc
+#  define MACOS MY_TRUE		/* let it undefined otherwise */
+#  define MSDOS MY_FALSE	/* in case one above fired falsely */
+# endif
+#endif
+
+#ifdef MSDOS
+#  define HPUNIX MY_FALSE
+#  define INTEL_BYTE_ORDER 1
+#  ifndef TURBO_C
+#    define MS_C	/* assume Microsoft C compiler */
+#  endif
+# define MYFAR far
+# define UNIX_FS MY_FALSE
+#else
+# ifdef MACOS
+#  define HPUNIX MY_FALSE
+#  define MYFAR
+#  define UNIX_FS MY_FALSE
+# else
+#  define MSDOS MY_FALSE
+#  define HPUNIX MY_TRUE
+#  ifndef _HPUX_SOURCE
+#    define _HPUX_SOURCE
+#  endif
+#  define MYFAR
+#  define UNIX_FS MY_TRUE
+# endif
+#endif
+
+#include <math.h>
+#include <stdlib.h>
+#ifndef FILE
+# include <stdio.h>
+#endif
+
+#if HPUNIX
+#  include <unistd.h>
+#endif
+
+/*
+ * if we have 16-bit ints, we define INT_16; we will need %ld to printf an int32
+ * if we have 64-bit long, we define LONG_64
+ * If none is defined, we have int = long = 32 bit, and use %d to printf an int32
+ */
+#include <limits.h>
+#if INT_MAX < 40000
+# define INT_16
+#else
+# if LONG_MAX > INT_MAX
+#   define LONG_64
+# endif
+#endif
+
+#ifdef BYTE_ORDER
+#ifdef LITTLE_ENDIAN
+# if BYTE_ORDER == LITTLE_ENDIAN
+#  define INTEL_BYTE_ORDER
+# endif
+#endif
+#endif
+
+#ifdef INT_16
+  typedef long	int32;
+  typedef unsigned long	uint32;
+  typedef int	int16;
+  typedef double  REAL8;  /* real with at least 64 bit precision */
+  typedef long    INT4;   /* signed integer with at least 32 bit precision */
+  typedef unsigned long UINT4;
+                          /* unsigned integer with at least 32 bit precision */
+  typedef int     AS_BOOL;
+  typedef unsigned int UINT2;	/* unsigned 16 bits */
+# define ABS4	labs		/* abs function for long */ 
+#else
+  typedef int	int32;
+  typedef long long	int64;
+  typedef unsigned int	uint32;
+  typedef short	int16;
+  typedef double  REAL8;  /* real with at least 64 bit precision */
+  typedef int     INT4;   /* signed integer with at least 32 bit precision */
+  typedef unsigned int UINT4; 
+			/* unsigned integer with at least 32 bit precision */
+  typedef int     AS_BOOL;
+  typedef unsigned short UINT2;	/* unsigned 16 bits */
+  # define ABS4	abs		/* abs function for long */
+#endif
+
+#if MSDOS 
+# ifdef TURBO_C
+#   include <alloc.h>		/* MSC needs malloc ! */
+# else
+#   include <malloc.h>
+# endif
+# define SIGALRM SIGINT
+#endif
+
+#ifndef TRUE 
+#  define TRUE 1
+#  define FALSE 0
+#endif
+
+#ifndef OK 
+#  define OK (0)
+#  define ERR (-1)
+#endif
+
+/* hack because UCHAR is already used by mingw gcc */
+#ifdef __GNUC__
+#ifdef _WIN32
+#define UCHAR SWE_UCHAR
+#endif
+#endif
+
+typedef unsigned char UCHAR;
+#define UCP	(UCHAR*)
+#define SCP	(char*)
+
+# define ODEGREE_STRING "°"	/* degree as string, utf8 encoding */
+ 
+
+
+#ifndef HUGE
+#  define HUGE 1.7E+308     /* biggest value for REAL8 */
+#endif
+#ifndef M_PI
+#  define M_PI 3.14159265358979323846
+#endif
+ 
+#define forward static
+
+#define AS_MAXCH 256    /* used for string declarations, allowing 255 char+\0 */
+ 
+#define DEGTORAD 0.0174532925199433
+#define RADTODEG 57.2957795130823
+ 
+typedef int32    centisec;       /* centiseconds used for angles and times */
+#define CS	(centisec)	/* use for casting */
+#define CSEC	centisec	/* use for typing */
+
+#define DEG     360000  /* degree expressed in centiseconds */
+#define DEG7_30 (2700000)	/* 7.5 degrees */
+#define DEG15   (15 * DEG)
+#define DEG24   (24 * DEG)
+#define DEG30   (30 * DEG)
+#define DEG60   (60 * DEG)
+#define DEG90   (90 * DEG)
+#define DEG120  (120 * DEG)
+#define DEG150  (150 * DEG)
+#define DEG180  (180 * DEG)
+#define DEG270  (270 * DEG)
+#define DEG360  (360 * DEG)
+ 
+#define CSTORAD  4.84813681109536E-08 /* centisec to rad: pi / 180 /3600/100 */
+#define RADTOCS  2.06264806247096E+07 /* rad to centisec 180*3600*100/pi */
+ 
+#define CS2DEG	(1.0/360000.0)	/* centisec to degree */
+
+/* control strings for fopen()	*/
+#if UNIX_FS
+#  define BFILE_R_ACCESS "r"	/* open binary file for reading */
+#  define BFILE_RW_ACCESS "r+"	/* open binary file for writing and reading */
+#  define BFILE_W_CREATE "w"	/* create/open binary file for write*/
+#  define BFILE_A_ACCESS "a+"	/* create/open binary file for append*/
+#  define FILE_R_ACCESS "r"	/* open text file for reading */
+#  define FILE_RW_ACCESS "r+"	/* open text file for writing and reading */
+#  define FILE_W_CREATE "w"	/* create/open text file for write*/
+#  define FILE_A_ACCESS "a+"	/* create/open text file for append*/
+#  define O_BINARY 0		/* for open(), not defined in Unix */
+#  define OPEN_MODE 0666	/* default file creation mode */
+#  define DIR_GLUE "/"		/* glue string for directory/file */
+#  define PATH_SEPARATOR ";:"	/* semicolon or colon may be used */
+#else
+#  define BFILE_R_ACCESS "rb"	/* open binary file for reading */
+#  define BFILE_RW_ACCESS "r+b"	/* open binary file for writing and reading */
+#  define BFILE_W_CREATE "wb"	/* create/open binary file for write*/
+#  define BFILE_A_ACCESS "a+b"	/* create/open binary file for append*/
+#  define PATH_SEPARATOR ";"	/* semicolon as PATH separator */
+#  define OPEN_MODE 0666	/* default file creation mode */
+# ifdef MACOS
+#  define FILE_R_ACCESS "r"	/* open text file for reading */
+#  define FILE_RW_ACCESS "r+"	/* open text file for writing and reading */
+#  define FILE_W_CREATE "w"	/* create/open text file for write*/
+#  define FILE_A_ACCESS "a+"	/* create/open text file for append*/
+#  define DIR_GLUE ":"		/* glue string for directory/file */
+# else
+#  define FILE_R_ACCESS "rt"	/* open text file for reading */
+#  define FILE_RW_ACCESS "r+t"	/* open text file for writing and reading */
+#  define FILE_W_CREATE "wt"	/* create/open text file for write*/
+#  define FILE_A_ACCESS "a+t"	/* create/open text file for append*/
+/* attention, all backslashes for msdos directry names must be written as \\,
+   because it is the C escape character */
+#  define DIR_GLUE "\\"		/* glue string for directory/file */
+# endif
+#endif
+
+#include <string.h>
+#include <ctype.h>
+
+#endif /* _SWEODEF_INCLUDED */
+#endif /* _OURDEF_INCLUDED */