X-Git-Url: https://git.gag.com/?a=blobdiff_plain;f=src%2FSDCCglobl.h;h=7166d88177841520743536b7ec1e7a3134ec55d7;hb=fd94924a3d743c1c82f4b370d9401d7239172789;hp=c21af2bc46ac461ec011477ea1fd815dd4c98325;hpb=73967d94994c82df85e44f90af4461f90b532640;p=fw%2Fsdcc diff --git a/src/SDCCglobl.h b/src/SDCCglobl.h index c21af2bc..7166d881 100644 --- a/src/SDCCglobl.h +++ b/src/SDCCglobl.h @@ -1,63 +1,88 @@ /* SDCCglobl.h - global macros etc required by all files */ + #ifndef SDCCGLOBL_H #define SDCCGLOBL_H + #include #include #include #include #include +#include "SDCCset.h" + + /* * Define host port dependant constants etc. */ -#define DOS_DIR_SEPARATOR_CHAR '\\' -#define DOS_DIR_SEPARATOR_STRING "\\" #define UNIX_DIR_SEPARATOR_CHAR '/' -#define UNIX_DIR_SEPARATOR_STRING "/" -#if defined(__BORLANDC__) /* Borland Turbo C/Win32 Host */ +#if defined(__BORLANDC__) || defined(_MSC_VER) +#define STRCASECMP stricmp +#define STRNCASECMP strnicmp +#else +#define STRCASECMP strcasecmp +#define STRNCASECMP strncasecmp +#endif -#define NATIVE_WIN32 1 -#define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR -#define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING +#if defined(__MSDOS__) || defined(_WIN32) || defined(__OS2__) || defined (__CYGWIN__) -#elif defined(_MSC_VER) /* Miscosoft VC6/Win32 Host */ +#ifndef HAVE_DOS_BASED_FILE_SYSTEM +#define HAVE_DOS_BASED_FILE_SYSTEM 1 +#endif -#define NATIVE_WIN32 1 -#include "sdcc_vc.h" -#define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR -#define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING +#define IS_DIR_SEPARATOR(c) ((c) == DIR_SEPARATOR_CHAR || (c) == UNIX_DIR_SEPARATOR_CHAR) +/* Note that IS_ABSOLUTE_PATH accepts d:foo as well, although it is + only semi-absolute. This is because the users of IS_ABSOLUTE_PATH + want to know whether to prepend the current working directory to + a file name, which should not be done with a name like d:foo. */ +#define IS_ABSOLUTE_PATH(f) (IS_DIR_SEPARATOR((f)[0]) || (((f)[0]) && ((f)[1] == ':'))) +#define FILENAME_CMP(s1, s2) STRCASECMP(s1, s2) -#elif defined(__MINGW32__) /* MINGW32 DOS Host */ +#else /* not DOSish */ -#define NATIVE_WIN32 1 -#define DIR_SEPARATOR_CHAR DOS_DIR_SEPARATOR_CHAR -#define DIR_SEPARATOR_STRING DOS_DIR_SEPARATOR_STRING +#define IS_DIR_SEPARATOR(c) ((c) == DIR_SEPARATOR_CHAR) +#define IS_ABSOLUTE_PATH(f) (IS_DIR_SEPARATOR((f)[0])) +#define FILENAME_CMP(s1, s2) strcmp(s1, s2) -#else /* Assume Un*x style system */ +#endif /* not DOSish */ -#include "sdccconf.h" -#define DIR_SEPARATOR_CHAR UNIX_DIR_SEPARATOR_CHAR -#define DIR_SEPARATOR_STRING UNIX_DIR_SEPARATOR_STRING +#ifdef WIN32 +# define NATIVE_WIN32 1 +# ifndef __MINGW32__ +# define PATH_MAX _MAX_PATH +# endif +#endif -#endif // _MSC_VER +#ifdef HAVE_CONFIG_H +# include "config.h" +#elif defined(_WIN32) && !defined(__MINGW32__) +# include "sdcc_vc.h" +#else +# include "sdccconf.h" +#endif #include "SDCCerr.h" #define SPACE ' ' #define ZERO 0 -#define MAX_FNAME_LEN 128 +#include /* PATH_MAX */ +#if !defined(PATH_MAX) || (PATH_MAX < 2048) +# undef PATH_MAX +# define PATH_MAX 2048 /* define a reasonable value */ +#endif + #define MAX_REG_PARMS 1 typedef int bool; #ifndef max -#define max(a,b) (a > b ? a : b) +# define max(a,b) (a > b ? a : b) #endif #ifndef min -#define min(a,b) (a < b ? a : b) +# define min(a,b) (a < b ? a : b) #endif #ifndef THROWS @@ -80,26 +105,13 @@ typedef int bool; #define FLOATSIZE port->s.float_size #define MAXBASESIZE port->s.max_base_size - -#define PRAGMA_SAVE "SAVE" -#define PRAGMA_RESTORE "RESTORE" -#define PRAGMA_NOINDUCTION "NOINDUCTION" -#define PRAGMA_NOINVARIANT "NOINVARIANT" -#define PRAGMA_NOLOOPREV "NOLOOPREVERSE" -#define PRAGMA_INDUCTION "INDUCTION" -#define PRAGMA_STACKAUTO "STACKAUTO" -#define PRAGMA_NOJTBOUND "NOJTBOUND" -#define PRAGMA_NOGCSE "NOGCSE" -#define PRAGMA_NOOVERLAY "NOOVERLAY" -#define PRAGMA_CALLEESAVES "CALLEE-SAVES" -#define PRAGMA_EXCLUDE "EXCLUDE" #define SMALL_MODEL 0 #define LARGE_MODEL 1 #define TRUE 1 #define FALSE 0 #define MAX_TVAR 6 -#define MAX_INLINEASM 4*1024 +#define INITIAL_INLINEASM 4*1024 #define DEFPOOLSTACK(type,size) \ type *type##Pool ; \ type *type##FreeStack [size] ; \ @@ -113,66 +125,75 @@ typedef int bool; #ifdef UNIX #define EMPTY(x) (x##StackPtr <= 1 ? 1 : 0) #else -#define EMPTY(x) (x##StackPtr == 0 ? 1 : 0) +#define EMPTY(x) (x##StackPtr == 0 ? 1 : 0) #endif #define COPYTYPE(start,end,from) (end = getSpec (start = from)) -/* generalpurpose stack related macros */ -#define STACK_DCL(stack,type,size) \ - typedef type t_##stack ; \ - t_##stack stack[size] ; \ - t_##stack (*p_##stack) = stack + (size); \ +/* general purpose stack related macros */ +#define STACK_DCL(stack,type,size) \ + typedef type t_##stack ; \ + t_##stack stack[size] ; \ + t_##stack (*p_##stack) = stack; /* define extern stack */ -#define EXTERN_STACK_DCL(stack,type,size) \ - typedef type t_##stack ; \ - extern t_##stack stack[size] ; \ +#define EXTERN_STACK_DCL(stack,type,size) \ + typedef type t_##stack ; \ + extern t_##stack stack[size] ; \ extern t_##stack *p_##stack; -#define STACK_FULL(stack) ((p_##stack) <= stack ) -#define STACK_EMPTY(stack) ((p_##stack) >= (stack + \ - sizeof(stack)/sizeof(*stack)) ) +#define STACK_EMPTY(stack) ((p_##stack) <= stack ) +#define STACK_FULL(stack) ((p_##stack) >= (stack + \ + sizeof(stack)/sizeof(*stack)) ) -#define STACK_PUSH_(stack,x) (*--p_##stack = (x)) -#define STACK_POP_(stack) (*p_##stack++) +#define STACK_PUSH_(stack, x) (*++p_##stack = (x)) +#define STACK_POP_(stack) (*p_##stack--) -#define STACK_PUSH(stack,x) (STACK_FULL(stack) \ - ?((t_##stack)(long)(STACK_ERR(1))) \ - : STACK_PUSH_(stack,x) ) +#define STACK_PUSH(stack, x) (STACK_FULL(stack) \ + ? (STACK_ERR(1, stack), *p_##stack) \ + : STACK_PUSH_(stack,x) ) -#define STACK_POP(stack) (STACK_EMPTY(stack) \ - ?((t_##stack)(long)(STACK_ERR(0))) \ - : STACK_POP_(stack) ) +#define STACK_POP(stack) (STACK_EMPTY(stack) \ + ? (STACK_ERR(-1, stack), *p_##stack) \ + : STACK_POP_(stack) ) -#define STACK_PEEK(stack) (STACK_EMPTY(stack) \ - ?((t_##stack) NULL) \ - : *p_##stack ) +#define STACK_PEEK(stack) (STACK_EMPTY(stack) \ + ? (STACK_ERR(0, stack), *p_##stack) \ + : *p_##stack ) -#define STACK_ERR(o) ( o \ - ? fprintf(stderr,"stack Overflow\n")\ - : fprintf(stderr,"stack underflow\n")) +#define STACK_ERR(o, stack) (fatal(1, E_STACK_VIOLATION, #stack, \ + (o < 0) \ + ? "underflow" \ + : (o > 0) \ + ? "overflow" \ + : "empty")) /* optimization options */ +/* + * cloneOptimize function in SDCC.lex should be updated every time + * a new set is added to the optimize structure! + */ struct optimize { - unsigned global_cse:1; - unsigned ptrArithmetic:1; - unsigned label1:1; - unsigned label2:1; - unsigned label3:1; - unsigned label4:1; - unsigned loopInvariant:1; - unsigned loopInduction:1; - unsigned noJTabBoundary:1; - unsigned noLoopReverse:1; + int global_cse; + int ptrArithmetic; + int label1; + int label2; + int label3; + int label4; + int loopInvariant; + int loopInduction; + int noJTabBoundary; + int noLoopReverse; + int codeSpeed; + int codeSize; }; /** Build model. Used in options.model.A bit each as port.supported_models is an OR - of these. + of these. */ enum { @@ -180,113 +201,190 @@ enum MODEL_COMPACT = 2, MODEL_MEDIUM = 4, MODEL_LARGE = 8, - MODEL_FLAT24 = 16 + MODEL_FLAT24 = 16, + MODEL_PAGE0 = 32, /* for the xa51 port */ + MODEL_HUGE = 64 /* for banked support */ }; +/* overlay segment name and the functions + that belong to it. used by pragma overlay */ +typedef struct { + char *osname; /* overlay segment name */ + int nfuncs; /* number of functions in this overlay */ + char *funcs[128]; /* function name that belong to this */ +} olay; + /* other command line options */ +/* + * cloneOptions function in SDCC.lex should be updated every time + * a new set is added to the options structure! + */ struct options { - int model; /* see MODEL_* defines above */ - int stackAuto:3; /* Stack Automatic */ - int useXstack:3; /* use Xternal Stack */ - int stack10bit:3; /* use 10 bit stack (flat24 model only) */ - int genericPtr:1; /* use generic pointers */ - int regExtend:1; /* don't use extended registers */ - int dump_raw:1; /* dump after intermediate code generation */ - int dump_gcse:1; /* dump after gcse */ - int dump_loop:1; /* dump after loop optimizations */ - int dump_kill:1; /* dump after dead code elimination */ - int dump_range:1; /* dump after live range analysis */ - int dump_pack:1; /* dump after register packing */ - int dump_rassgn:1; /* dump after register assignment */ - int cc_only:1; /* compile only flag */ - int intlong_rent:1; /* integer & long support routines reentrant */ - int float_rent:1; /* floating point routines are reentrant */ - int out_fmt:1; /* 1 = motorola S19 format 0 = intel Hex format */ - int cyclomatic:1; /* print cyclomatic information */ - int noOverlay:1; /* don't overlay local variables & parameters */ - int mainreturn:1; /* issue a return after main */ - int nopeep:1; /* no peep hole optimization */ - int asmpeep:1; /* pass inline assembler thru peep hole */ - int debug:1; /* generate extra debug info */ - int nodebug:1; /* Generate no debug info. */ - int stackOnData:1; /* stack after data segment */ - int c1mode:1; /* Act like c1 - no pre-proc, asm or link */ - char *peep_file; /* additional rules for peep hole */ - char *out_name; /* Asm output name for c1 mode */ - int nostdlib:1; /* Don't use standard lib files */ - int nostdinc:1; /* Don't use standard include files */ - int verbose:1; /* Show what the compiler is doing */ - int ANSIint:1; /* Use ANSI integer promotion rules in expressions. */ - - char *calleeSaves[128]; /* list of functions using callee save */ - char *excludeRegs[32]; /* registers excluded from saving */ - + int model; /* see MODEL_* defines above */ + int stackAuto; /* Stack Automatic */ + int useXstack; /* use Xternal Stack */ + int stack10bit; /* use 10 bit stack (flat24 model only) */ + int dump_raw; /* dump after intermediate code generation */ + int dump_gcse; /* dump after gcse */ + int dump_loop; /* dump after loop optimizations */ + int dump_kill; /* dump after dead code elimination */ + int dump_range; /* dump after live range analysis */ + int dump_pack; /* dump after register packing */ + int dump_rassgn; /* dump after register assignment */ + int dump_tree; /* dump front-end tree before lowering to iCode */ + int cc_only; /* compile only flag */ + int intlong_rent; /* integer & long support routines reentrant */ + int float_rent; /* floating point routines are reentrant */ + int out_fmt; /* 1 = motorola S19 format 0 = intel Hex format */ + int cyclomatic; /* print cyclomatic information */ + int noOverlay; /* don't overlay local variables & parameters */ + int mainreturn; /* issue a return after main */ + int xram_movc; /* use movc instead of movx to read xram (mcs51) */ + int nopeep; /* no peep hole optimization */ + int asmpeep; /* pass inline assembler thru peep hole */ + int debug; /* generate extra debug info */ + int c1mode; /* Act like c1 - no pre-proc, asm or link */ + char *peep_file; /* additional rules for peep hole */ + int nostdlib; /* Don't use standard lib files */ + int nostdinc; /* Don't use standard include files */ + int noRegParams; /* Disable passing some parameters in registers */ + int verbose; /* Show what the compiler is doing */ + int shortis8bits; /* treat short like int or char */ + int lessPedantic; /* disable some warnings */ + int profile; /* Turn on extra profiling information */ + int ommitFramePtr; /* Turn off the frame pointer. */ + int useAccelerator; /* use ds390 Arithmetic Accelerator */ + int noiv; /* do not generate irq vector table entries */ + int all_callee_saves; /* callee saves for all functions */ + int stack_probe; /* insert call to function __stack_probe */ + int tini_libid; /* library ID for TINI */ + int protect_sp_update; /* DS390 - will disable interrupts during ESP:SP updates */ + int parms_in_bank1; /* DS390 - use reg bank1 to pass parameters */ + int stack_size; /* MCS51/DS390 - Tells the linker to allocate this space for stack */ + int no_pack_iram; /* MCS51/DS390 - Tells the linker not to pack variables in internal ram */ + int acall_ajmp; /* MCS51 - Use acall/ajmp instead of lcall/ljmp */ /* starting address of the segments */ - int xstack_loc; /* initial location of external stack */ - int stack_loc; /* initial value of internal stack pointer */ - int xdata_loc; /* xternal ram starts at address */ - int data_loc; /* interram start location */ - int idata_loc; /* indirect address space */ - int code_loc; /* code location start */ - int iram_size; /* internal ram size (used only for error checking) */ + int xstack_loc; /* initial location of external stack */ + int stack_loc; /* initial value of internal stack pointer */ + int xdata_loc; /* xternal ram starts at address */ + int data_loc; /* interram start location */ + int idata_loc; /* indirect address space */ + int code_loc; /* code location start */ + int iram_size; /* internal ram size (used only for error checking) */ + int xram_size; /* external ram size (used only for error checking) */ + bool xram_size_set; /* since xram_size=0 is a possibility */ + int code_size; /* code size (used only for error checking) */ + int verboseExec; /* show what we are doing */ + int noXinitOpt; /* don't optimize initialized xdata */ + int noCcodeInAsm; /* hide c-code from asm */ + int iCodeInAsm; /* show i-code in asm */ + int noPeepComments; /* hide peephole optimizer comments */ + int verboseAsm; /* include comments generated with gen.c */ + int printSearchDirs; /* display the directories in the compiler's search path */ + int vc_err_style; /* errors and warnings are compatible with Micro$oft visual studio */ + int use_stdout; /* send errors to stdout instead of stderr */ + int no_std_crt0; /* for the z80/gbz80 do not link default crt0.o*/ + int std_c99; /* enable C99 keywords/constructs */ + int std_sdcc; /* enable SDCC extensions to C */ + int dollars_in_ident; /* zero means dollar signs are punctuation */ + int unsigned_char; /* use unsigned for char without signed/unsigned modifier */ + char *code_seg; /* segment name to use instead of CSEG */ + char *const_seg; /* segment name to use instead of CONST */ + /* sets */ + set *calleeSavesSet; /* list of functions using callee save */ + set *excludeRegsSet; /* registers excluded from saving */ +/* set *olaysSet; * not implemented yet: overlay segments used in #pragma OVERLAY */ }; /* forward definition for variables accessed globally */ -extern char *currFname; -extern char *srcFileName; /* source file name without the extenstion */ -extern char *moduleName; /* source file name without path & extension */ -extern int currLineno; /* current line number */ -extern int yylineno; /* line number of the current file SDCC.lex */ -extern FILE *yyin; /* */ -extern FILE *asmFile; /* assembly output file */ -extern FILE *cdbFile; /* debugger symbol file */ -extern int NestLevel; /* NestLevel SDCC.y */ -extern int stackPtr; /* stack pointer SDCC.y */ -extern int xstackPtr; /* external stack pointer SDCC.y */ -extern int reentrant; /* /X flag has been sent SDCC.y */ -extern char buffer[]; /* general buffer SDCCgen.c */ -extern int currRegBank; /* register bank being used SDCCgens.c */ -extern struct symbol *currFunc; /* current function SDCCgens.c */ -extern int cNestLevel; /* block nest level SDCCval.c */ -extern int currBlockno; /* sequentail block number */ +extern int noAssemble; /* no assembly, stop after code generation */ +extern char *yytext; +extern char *lexFilename; /* lex idea of current file name */ +extern int lexLineno; /* lex idea of line number of the current file */ +extern char *fullSrcFileName; /* full name for the source file; */ + /* can be NULL while linking without compiling */ +extern char *fullDstFileName; /* full name for the output file; */ + /* only given by -o, otherwise NULL */ +extern char *dstFileName; /* destination file name without extension */ +extern char *dstPath; /* path for the output files; */ + /* "" is equivalent with cwd */ +extern char *moduleName; /* module name is source file without path and extension */ + /* can be NULL while linking without compiling */ +extern int seqPointNo; /* current sequence point */ +extern FILE *yyin; /* */ +extern FILE *asmFile; /* assembly output file */ +extern FILE *cdbFile; /* debugger symbol file */ +extern int NestLevel; /* NestLevel SDCC.y */ +extern int stackPtr; /* stack pointer SDCC.y */ +extern int xstackPtr; /* external stack pointer SDCC.y */ +extern int reentrant; /* /X flag has been sent SDCC.y */ +extern char buffer[PATH_MAX * 2];/* general buffer SDCCmain.c */ +extern int currRegBank; /* register bank being used SDCCgens.c */ +extern int RegBankUsed[4]; /* JCF: register banks used SDCCmain.c */ +extern int BitBankUsed; /* MB: overlayable bit bank SDCCmain.c */ +extern struct symbol *currFunc; /* current function SDCCgens.c */ +extern int cNestLevel; /* block nest level SDCCval.c */ +extern int blockNo; /* maximum sequential block number */ +extern int currBlockno; /* sequential block number */ extern struct optimize optimize; extern struct options options; -extern int maxInterrupts; +extern unsigned maxInterrupts; +extern int ignoreTypedefType; /* Visible from SDCCmain.c */ -extern int nrelFiles; -extern char *relFiles[128]; -extern char *libFiles[128]; -extern int nlibFiles; - -/* - void buildCmdLine(char *into, char **args, const char **cmds, - const char *p1, const char *p2, - const char *p3, const char **list); - int my_system (const char *cmd, char **cmd_argv); - */ +extern set *preArgvSet; +extern set *relFilesSet; +extern set *libFilesSet; +extern set *libPathsSet; +extern set *libDirsSet; /* list of lib search directories */ -void parseWithComma (char **, char *); - -/** Creates a temporary file a'la tmpfile which avoids the bugs - in cygwin wrt c:\tmp. - Scans, in order: TMP, TEMP, TMPDIR, else uses tmpfile(). -*/ -FILE *tempfile (void); - -/** Creates a duplicate of the string 'sz' a'la strdup but using - libgc. -*/ -char *gc_strdup (const char *sz); +void setParseWithComma (set **, const char *); /** An assert() macro that will go out through sdcc's error system. */ -#define wassertl(a,s) ((a) ? 0 : \ +#define wassertl(a,s) ((a) ? 0 : \ (werror (E_INTERNAL_ERROR,__FILE__,__LINE__, s), 0)) #define wassert(a) wassertl(a,"code generator internal error") +#define DUMP_RAW0 1 +#define DUMP_RAW1 DUMP_RAW0+1 +#define DUMP_CSE DUMP_RAW1+1 +#define DUMP_DFLOW DUMP_CSE+1 +#define DUMP_GCSE DUMP_DFLOW+1 +#define DUMP_DEADCODE DUMP_GCSE+1 +#define DUMP_LOOP DUMP_DEADCODE+1 +#define DUMP_LOOPG DUMP_LOOP+1 +#define DUMP_LOOPD DUMP_LOOPG+1 +#define DUMP_RANGE DUMP_LOOPD+1 +#define DUMP_PACK DUMP_RANGE+1 +#define DUMP_RASSGN DUMP_PACK+1 +#define DUMP_LRANGE DUMP_RASSGN+1 + +struct _dumpFiles { + int id; + char *ext; + FILE *filePtr; +}; + +extern struct _dumpFiles dumpFiles[]; + +/* Buffer which can be used to hold a file name; assume it will + * be trashed by any function call within SDCC. + */ +extern char scratchFileName[PATH_MAX]; + +/* Define well known filenos if the system does not define them. */ +#ifndef STDIN_FILENO +# define STDIN_FILENO 0 +#endif +#ifndef STDOUT_FILENO +# define STDOUT_FILENO 1 +#endif +#ifndef STDERR_FILENO +# define STDERR_FILENO 2 +#endif #endif