cb22561995-10-11Fredrik Hübinette (Hubbe) /*\
06983f1996-09-22Fredrik Hübinette (Hubbe) ||| This file a part of Pike, and is copyright by Fredrik Hubinette ||| Pike is distributed as GPL (General Public License)
cb22561995-10-11Fredrik Hübinette (Hubbe) ||| See the files COPYING and DISCLAIMER for more information. \*/
24ddc71998-03-28Henrik Grubbström (Grubba)  /*
e50e882000-01-09Fredrik Hübinette (Hubbe)  * $Id: global.h,v 1.41 2000/01/10 00:48:45 hubbe Exp $
24ddc71998-03-28Henrik Grubbström (Grubba)  */
5267b71995-08-09Fredrik Hübinette (Hubbe) #ifndef GLOBAL_H #define GLOBAL_H
cb22561995-10-11Fredrik Hübinette (Hubbe) 
7fbe091999-05-11Fredrik Hübinette (Hubbe) #if defined(__WINNT__) && !defined(__NT__) #define __NT__ #endif
6e04e61999-04-25Henrik Grubbström (Grubba) /* The worlds most stringent C compiler? */ #ifdef __TenDRA__ /* We want to be able to use 64bit arithmetic */ #pragma TenDRA longlong type allow #pragma TenDRA set longlong type : long long
32ef4c1999-04-25Henrik Grubbström (Grubba) 
a298371999-04-25Henrik Grubbström (Grubba) #ifdef _NO_LONGLONG #undef _NO_LONGLONG #endif /* _NO_LONGLONG */
6e04e61999-04-25Henrik Grubbström (Grubba) #endif /* __TenDRA__ */
a2326e1998-03-25Per Hedbor #ifndef _LARGEFILE_SOURCE # define _FILE_OFFSET_BITS 64 # define _LARGEFILE_SOURCE
fedf131998-03-25Fredrik Hübinette (Hubbe) # define _LARGEFILE64_SOURCE 1
a2326e1998-03-25Per Hedbor #endif
90dc921998-06-12Fredrik Noring /* HPUX needs these too... */ #ifndef __STDC_EXT__ # define __STDC_EXT__ #endif /* !__STDC_EXT__ */
ada73b1999-07-15Henrik Grubbström (Grubba) #ifndef _PROTOTYPES # define _PROTOTYPES #endif /* !_PROTOTYPES */
90dc921998-06-12Fredrik Noring 
5267b71995-08-09Fredrik Hübinette (Hubbe) /* * Some structure forward declarations are needed. */ /* This is needed for linux */ #ifdef MALLOC_REPLACED #define NO_FIX_MALLOC #endif
211d6b1996-12-05Fredrik Hübinette (Hubbe) #ifndef STRUCT_PROGRAM_DECLARED #define STRUCT_PROGRAM_DECLARED
5267b71995-08-09Fredrik Hübinette (Hubbe) struct program;
211d6b1996-12-05Fredrik Hübinette (Hubbe) #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) struct function;
211d6b1996-12-05Fredrik Hübinette (Hubbe) #ifndef STRUCT_SVALUE_DECLARED #define STRUCT_SVALUE_DECLARED
5267b71995-08-09Fredrik Hübinette (Hubbe) struct svalue;
211d6b1996-12-05Fredrik Hübinette (Hubbe) #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) struct sockaddr; struct object; struct array; struct svalue;
ee83561998-08-07Henrik Grubbström (Grubba) #ifndef STRUCT_TIMEVAL_DECLARED #define STRUCT_TIMEVAL_DECLARED struct timeval; #endif
cb22561995-10-11Fredrik Hübinette (Hubbe) #include "machine.h"
189fd01997-01-28Fredrik Hübinette (Hubbe)  /* * Max number of local variables in a function. * Currently there is no support for more than 256 */ #define MAX_LOCAL 256 /* * define NO_GC to get rid of garbage collection */ #ifndef NO_GC #define GC2 #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) 
75920f1997-12-28Fredrik Hübinette (Hubbe) #if defined(i386) #ifndef HANDLES_UNALIGNED_MEMORY_ACCESS #define HANDLES_UNALIGNED_MEMORY_ACCESS #endif #endif
cb22561995-10-11Fredrik Hübinette (Hubbe) /* AIX requires this to be the first thing in the file. */ #ifdef __GNUC__ # ifdef alloca # undef alloca # endif # define alloca __builtin_alloca #else # if HAVE_ALLOCA_H # include <alloca.h> # else # ifdef _AIX
5c8e891995-10-29Fredrik Hübinette (Hubbe)  #pragma alloca
cb22561995-10-11Fredrik Hübinette (Hubbe) # else # ifndef alloca /* predefined by HP cc +Olibcalls */ char *alloca (); # endif # endif # endif
5401b61999-08-06Fredrik Hübinette (Hubbe) #endif #ifdef __NT__ /* We are running NT */ #define FD_SETSIZE MAX_OPEN_FILEDESCRIPTORS
cb22561995-10-11Fredrik Hübinette (Hubbe) #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) #include <stdio.h> #ifdef HAVE_STDLIB_H #include <stdlib.h>
a4e1c41996-08-06Fredrik Hübinette (Hubbe) #undef HAVE_STDLIB_H
5267b71995-08-09Fredrik Hübinette (Hubbe) #endif
ada73b1999-07-15Henrik Grubbström (Grubba) #ifdef HAVE_STDDEF_H
1e577b1999-07-15Fredrik Hübinette (Hubbe) #include <stddef.h>
ada73b1999-07-15Henrik Grubbström (Grubba) #undef HAVE_STDDEF_H
1e577b1999-07-15Fredrik Hübinette (Hubbe) #endif
75920f1997-12-28Fredrik Hübinette (Hubbe) #ifdef HAVE_MALLOC_H #include <malloc.h> #undef HAVE_MALLOC_H #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) #ifdef HAVE_UNISTD_H #include <unistd.h>
a4e1c41996-08-06Fredrik Hübinette (Hubbe) #undef HAVE_UNISTD_H
5267b71995-08-09Fredrik Hübinette (Hubbe) #endif #ifdef HAVE_STRING_H #include <string.h>
a4e1c41996-08-06Fredrik Hübinette (Hubbe) #undef HAVE_STRING_H
5267b71995-08-09Fredrik Hübinette (Hubbe) #endif
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) #ifdef HAVE_LIMITS_H #include <limits.h> #undef HAVE_LIMITS_H
5267b71995-08-09Fredrik Hübinette (Hubbe) #endif
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) #ifdef HAVE_SYS_TYPES_H #include <sys/types.h> #undef HAVE_SYS_TYPES_H
419ede1996-11-13Fredrik Hübinette (Hubbe) #endif
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) #ifdef HAVE_MEMORY_H #include <memory.h> #undef HAVE_MEMORY_H
5267b71995-08-09Fredrik Hübinette (Hubbe) #endif
b4dd8c1999-06-19Fredrik Hübinette (Hubbe) #ifdef HAVE_WINDOWS_H #include <windows.h> #undef HAVE_WINDOWS_H #endif
bed9601997-05-19Fredrik Hübinette (Hubbe) 
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) /* we here define a few types with more defined values */
bed9601997-05-19Fredrik Hübinette (Hubbe) 
7a5e471999-11-22Fredrik Hübinette (Hubbe) #if SIZEOF_LONG >= 8 #define INT64 long #else #if SIZEOF_LONG_LONG - 0 >= 8
bed9601997-05-19Fredrik Hübinette (Hubbe) #define INT64 long long
e50e882000-01-09Fredrik Hübinette (Hubbe) #else #if SIZEOF___INT64 - 0 >= 8 #define INT64 __int64 #endif
7a5e471999-11-22Fredrik Hübinette (Hubbe) #endif #endif
bed9601997-05-19Fredrik Hübinette (Hubbe)  #if SIZEOF_SHORT >= 4 #define INT32 short #else #if SIZEOF_INT >= 4 #define INT32 int #else #define INT32 long #endif #endif
b660c81999-03-01Fredrik Hübinette (Hubbe) #define MAX_INT32 2147483647 #define MIN_INT32 -2147483648
bed9601997-05-19Fredrik Hübinette (Hubbe) #define INT16 short #define INT8 char #define SIZE_T unsigned INT32 #define TYPE_T unsigned INT8 #define TYPE_FIELD unsigned INT16
ad7f211999-12-05Mirar (Pontus Hagland) #ifndef WITH_DOUBLE_PRECISION_SVALUE
673b2c1997-08-12Per Hedbor #define FLOAT_TYPE float
ad7f211999-12-05Mirar (Pontus Hagland) #else #ifdef WITH_LONG_DOUBLE_PRECISION_SVALUE #define FLOAT_TYPE long double #else #define FLOAT_TYPE double #endif /* long double */ #endif /* double */
f197351998-02-27Fredrik Hübinette (Hubbe) #define INT_TYPE INT32
bed9601997-05-19Fredrik Hübinette (Hubbe) 
6d22541998-01-28Fredrik Hübinette (Hubbe) #define B1_T char
bed9601997-05-19Fredrik Hübinette (Hubbe) 
6d22541998-01-28Fredrik Hübinette (Hubbe) #if SIZEOF_SHORT == 2 #define B2_T short #elif SIZEOF_INT == 2 #define B2_T int #endif #if SIZEOF_SHORT == 4 #define B4_T short #elif SIZEOF_INT == 4 #define B4_T int #elif SIZEOF_LONG == 4 #define B4_T long #endif #if SIZEOF_INT == 8 #define B8_T int #elif SIZEOF_LONG == 8 #define B8_T long #elif SIZEOF_CHAR_P == 8 #define B8_T char * #elif defined(B4_T) struct b8_t_s { B4_T x,y; };
52fcc81998-01-28Fredrik Hübinette (Hubbe) #define B8_T struct b8_t_s
6d22541998-01-28Fredrik Hübinette (Hubbe) #endif
52fcc81998-01-28Fredrik Hübinette (Hubbe) #if defined(B8_T)
2de1181998-01-28Fredrik Hübinette (Hubbe) struct b16_t_s { B8_T x,y; };
52fcc81998-01-28Fredrik Hübinette (Hubbe) #define B16_T struct b16_t_s
6d22541998-01-28Fredrik Hübinette (Hubbe) #endif
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) 
3e625c1998-10-11Fredrik Hübinette (Hubbe) typedef unsigned char p_wchar0; typedef unsigned INT16 p_wchar1; typedef unsigned INT32 p_wchar2;
3ef4661999-02-27Henrik Grubbström (Grubba) typedef struct p_wchar_p { p_wchar0 *ptr; int shift; } PCHARP;
9aa6fa1997-05-19Fredrik Hübinette (Hubbe)  #if __GNUC__ > 2 || (__GNUC__ == 2 && __GNUC_MINOR__ >= 7) #define RCSID(X) \ static char *rcsid __attribute__ ((unused)) =X #elif __GNUC__ == 2 #define RCSID(X) \ static char *rcsid = X; \ static void *use_rcsid=(&use_rcsid, (void *)&rcsid) #else #define RCSID(X) \ static char *rcsid = X
bed9601997-05-19Fredrik Hübinette (Hubbe) #endif
ae95031999-04-07Fredrik Hübinette (Hubbe) #ifdef PIKE_DEBUG #define DO_IF_DEBUG(X) X #else #define DO_IF_DEBUG(X) #endif
71f3a21998-11-22Fredrik Hübinette (Hubbe) #if defined(__GNUC__) && !defined(PIKE_DEBUG) && !defined(lint)
9aa6fa1997-05-19Fredrik Hübinette (Hubbe) #define INLINE inline #else #define INLINE #endif
bed9601997-05-19Fredrik Hübinette (Hubbe) 
ae95031999-04-07Fredrik Hübinette (Hubbe) #if defined(PURIFY) || defined(__CHECKER__) || defined(DEBUG_MALLOC) #define DO_PIKE_CLEANUP #endif
5267b71995-08-09Fredrik Hübinette (Hubbe) #include "port.h"
61e9a01998-01-25Fredrik Hübinette (Hubbe) #include "dmalloc.h"
5267b71995-08-09Fredrik Hübinette (Hubbe)  #ifdef BUFSIZ #define PROT_STDIO(x) PROT(x) #else #define PROT_STDIO(x) () #endif #ifdef __STDC__ #define PROT(x) x #else #define PROT(x) () #endif #ifdef MALLOC_DECL_MISSING char *malloc PROT((int)); char *realloc PROT((char *,int)); void free PROT((char *)); char *calloc PROT((int,int)); #endif #ifdef GETPEERNAME_DECL_MISSING int getpeername PROT((int, struct sockaddr *, int *)); #endif #ifdef GETHOSTNAME_DECL_MISSING void gethostname PROT((char *,int)); #endif #ifdef POPEN_DECL_MISSING FILE *popen PROT((char *,char *)); #endif #ifdef GETENV_DECL_MISSING char *getenv PROT((char *)); #endif #endif