* as/asx8051.dsp: added mcs51/strcmpi.h
[fw/sdcc] / src / port.h
index db0eda65796de2a2baf4500b269e5ee6b5df5880..1b7033d2ae6e06c53fa3f4b6569f10c1e7d12b8e 100644 (file)
@@ -5,15 +5,20 @@
 #ifndef PORT_INCLUDE
 #define PORT_INCLUDE
 
+#include "SDCCicode.h"
+#include "SDCCargs.h"
+#include "SDCCpeeph.h"
+
 #define TARGET_ID_MCS51    1
 #define TARGET_ID_GBZ80    2
 #define TARGET_ID_Z80      3
 #define TARGET_ID_AVR      4
 #define TARGET_ID_DS390    5
 #define TARGET_ID_PIC      6
-#define TARGET_ID_I186     7
-#define TARGET_ID_TLCS900H 8
+#define TARGET_ID_PIC16           7
 #define TARGET_ID_XA51     9
+#define TARGET_ID_DS400           10
+#define TARGET_ID_HC08     11
 
 /* Macro to test the target we are compiling for.
    Can only be used after SDCCmain has defined the port
 #define TARGET_IS_Z80 (port->id==TARGET_ID_Z80)
 #define TARGET_IS_AVR (port->id==TARGET_ID_AVR)
 #define TARGET_IS_DS390 (port->id==TARGET_ID_DS390)
+#define TARGET_IS_DS400 (port->id==TARGET_ID_DS400)
 #define TARGET_IS_PIC   (port->id==TARGET_ID_PIC)
-#define TARGET_IS_I186 (port->id==TARGET_ID_I186)
-#define TARGET_IS_TCLS900H (port->id==TARGET_ID_TCLS900H)
+#define TARGET_IS_PIC16        (port->id==TARGET_ID_PIC16)
+#define TARGET_IS_XA51 (port->id==TARGET_ID_XA51)
+#define TARGET_IS_HC08 (port->id==TARGET_ID_HC08)
+
+#define MAX_BUILTIN_ARGS       16
+/* definition of builtin functions */
+typedef struct builtins
+{
+    char *name ;               /* name of builtin function */
+    char *rtype;               /* return type as string : see typefromStr */
+    int  nParms;               /* number of parms : max 8 */
+    char *parm_types[MAX_BUILTIN_ARGS]; /* each parm type as string : see typeFromStr */
+} builtins ;
+
+struct ebbIndex;
 
 /* Processor specific names */
 typedef struct
@@ -38,8 +57,13 @@ typedef struct
 /** Target name string, used for --help */
     const char *target_name;
 
+/** Specific processor for the given target family. specified by -p */
+    char *processor;
+
     struct
       {
+        /** Pointer to glue function */
+        void (*do_glue)(void);
        /** TRUE if all types of glue functions should be inserted into
            the file that also defines main.
            We dont want this in cases like the z80 where the startup
@@ -55,26 +79,36 @@ typedef struct
     /* assembler related information */
     struct
       {
-/** Command to run and arguments (eg as-z80) */
-       const char **cmd;
-/** Arguments for debug mode.  PENDING: ignored */
+        /** Command to run and arguments (eg as-z80) */
+        const char **cmd;
+        /** Alternate macro based form. */
+        const char *mcmd;
+        /** Arguments for debug mode. */
        const char *debug_opts;
-/** Arguments for normal assembly mode.  PENDING: ignored */
+        /** Arguments for normal assembly mode. */
        const char *plain_opts;
        /* print externs as global */
        int externGlobal;
+       /* assembler file extension */
+       const char *file_ext;
+        /** If non-null will be used to execute the assembler. */
+       void (*do_assemble) (set *);
       }
     assembler;
 
     /* linker related info */
     struct
       {
-/** Command to run (eg link-z80) */
+        /** Command to run (eg link-z80) */
        const char **cmd;
-/** If non-null will be used to execute the link. */
+        /** Alternate macro based form. */
+        const char *mcmd;
+        /** If non-null will be used to execute the link. */
        void (*do_link) (void);
-/** Extention for object files (.rel, .obj, ...) */
+        /** Extension for object files (.rel, .obj, ...) */
        const char *rel_ext;
+        /** 1 if port needs the .lnk file, 0 otherwise */
+       const int needLinkerScript;
       }
     linker;
 
@@ -82,6 +116,9 @@ typedef struct
       {
 /** Default peephole rules */
        char *default_rules;
+       int (*getSize)(lineNode *line);
+       bitVect * (*getRegsRead)(lineNode *line);
+       bitVect * (*getRegsWritten)(lineNode *line);
       }
     peep;
 
@@ -90,11 +127,11 @@ typedef struct
       {
        int char_size;
        int short_size;
-       int int_size;
+        unsigned int int_size;
        int long_size;
-       int ptr_size;
-       int fptr_size;
-       int gptr_size;
+       int ptr_size;       //near
+       int fptr_size;      //far
+       int gptr_size;      //generic
        int bit_size;
        int float_size;
        int max_base_size;
@@ -109,6 +146,7 @@ typedef struct
        const char *code_name;
        const char *data_name;
        const char *idata_name;
+       const char *pdata_name;
        const char *xdata_name;
        const char *bit_name;
        const char *reg_name;
@@ -116,12 +154,22 @@ typedef struct
        const char *overlay_name;
        const char *post_static_name;
        const char *home_name;
-       struct memmap *default_local_map;       /* default location for auto vars */
-       struct memmap *default_globl_map;       /* default location for globl vars */
+       const char *xidata_name; // initialized xdata
+       const char *xinit_name; // a code copy of xidata
+       const char *const_name; // const data (code or not)
+       struct memmap *default_local_map; // default location for auto vars
+       struct memmap *default_globl_map; // default location for globl vars
        int code_ro;            /* code space read-only 1=yes */
       }
     mem;
 
+    struct
+      {
+         void (*genExtraAreaDeclaration)(FILE *, bool);
+         void (*genExtraAreaLinkOptions)(FILE *);
+      }
+    extraAreas;
+
     /* stack related information */
     struct
       {
@@ -143,16 +191,42 @@ typedef struct
 
     struct
       {
-       /** One more than the smallest 
-           mul/div operation the processor can do nativley 
+       /** One more than the smallest
+           mul/div operation the processor can do nativley
            Eg if the processor has an 8 bit mul, nativebelow is 2 */
-       int native_below;
-       /** The mul/div/mod functions will be made to use regparams
-           for sizeof(param) < log2(force_reg)
-           i.e. Use 2 for WORD and BYTE, 0 for none. */
-       int force_reg_param_below;
+       unsigned muldiv;
+        unsigned shift;
+      }
+    support;
+
+    struct
+      {
+       void (*emitDebuggerSymbol) (char *);
+       struct
+         {
+           int (*regNum) (struct regs *);
+           bitVect * cfiSame;
+           bitVect * cfiUndef;
+           int addressSize;
+           int regNumRet;
+           int regNumSP;
+           int regNumBP;
+           int offsetSP;
+         }
+       dwarf;
       }
-    muldiv;
+    debugger;
+
+    struct
+      {
+        int maxCount;
+        int sizeofElement;
+        int sizeofMatchJump[3];
+        int sizeofRangeCompare[3];
+        int sizeofSubtract;
+        int sizeofDispatch;
+      }
+    jumptableCost;
 
 /** Prefix to add to a C function (eg "_") */
     const char *fun_prefix;
@@ -164,13 +238,18 @@ typedef struct
     void (*init) (void);
 /** Parses one option + its arguments */
       bool (*parseOption) (int *pargc, char **argv, int *i);
+/** Optional list of automatically parsed options.  Should be
+    implemented to at least show the help text correctly. */
+    OPTION *poptions;
+/** Initialise port spectific paths */
+    void (*initPaths)(void);
 /** Called after all the options have been parsed. */
     void (*finaliseOptions) (void);
     /** Called after the port has been selected but before any
        options are parsed. */
     void (*setDefaultOptions) (void);
 /** Does the dirty work. */
-    void (*assignRegisters) (struct eBBlock **, int);
+    void (*assignRegisters) (struct ebbIndex *);
 
     /** Returns the register name of a symbol.
        Used so that 'regs' can be an incomplete type. */
@@ -182,27 +261,57 @@ typedef struct
 
     /* Write any port specific assembler output. */
     void (*genAssemblerPreamble) (FILE * of);
+      /* invoked at end assembler file */
+    void (*genAssemblerEnd) (FILE * of);
 
     /* Write the port specific IVT. If genIVT is NULL or if
      * it returns zero, default (8051) IVT generation code
-     * will be used. 
+     * will be used.
      */
     int (*genIVT) (FILE * of, symbol ** intTable, int intCount);
 
+    void (*genXINIT) (FILE * of);
+
+    /* Write port specific startup code */
+    void (*genInitStartup) (FILE * of);
 
     /* parameter passing in register related functions */
-    void (*reset_regparms) (); /* reset the register count */
-    int (*reg_parm) (struct sym_link *);       /* will return 1 if can be passed in register */
+    void (*reset_regparms) (void);     /* reset the register count */
+    int (*reg_parm) (struct sym_link *, bool reentrant);       /* will return 1 if can be passed in register */
 
     /** Process the pragma string 'sz'.  Returns 0 if recognised and
        processed, 1 otherwise.  May be NULL.
     */
     int (*process_pragma) (const char *sz);
 
+    /** Mangles a support function name to reflect the calling model.
+     */
+    char *(*getMangledFunctionName) (char *szOrginial);
+
+    /** Returns true if the port can multiply the two types nativly
+        without using support functions.
+    */
+    bool (*hasNativeMulFor) (iCode *ic, sym_link *left, sym_link *right);
+
+    /** Returns true if the port has implemented certain bit
+        manipulation iCodes (RRC, RLC, SWAP, GETHBIT, GETABIT, GETBYTE, GETWORD)
+    */
+    bool (*hasExtBitOp) (int op, int size);
+
+    /** Returns the relative expense of accessing a particular output
+        storage class. Larger values indicate higher expense.
+    */
+    int (*oclsExpense) (struct memmap *oclass);
+
     /** If TRUE, then tprintf and !dw will be used for some initalisers
      */
     bool use_dw_for_init;
 
+    /** TRUE for targets with little endian byte ordering, FALSE for
+        targets with big endian byte ordering.
+     */
+    bool little_endian;
+
     /* condition transformations */
     bool lt_nge;               /* transform (a < b)  to !(a >= b)  */
     bool gt_nle;               /* transform (a > b)  to !(a <= b)  */
@@ -211,6 +320,12 @@ typedef struct
     bool ne_neq;               /* transform a != b --> ! (a == b)  */
     bool eq_nne;               /* transform a == b --> ! (a != b)  */
 
+    bool arrayInitializerSuppported;
+    bool (*cseOk) (iCode *ic, iCode *pdic);
+    builtins *builtintable;     /* table of builtin functions */
+    int unqualified_pointer;   /* unqualified pointers type is  */
+    int reset_labelKey  ;      /* reset Label no 1 at the start of a function */
+    int globals_allowed ;       /* global & static locals not allowed ?  0 ONLY TININative*/
 #define PORT_MAGIC 0xAC32
 /** Used at runtime to detect if this structure has been completly filled in. */
     int magic;
@@ -237,11 +352,20 @@ extern PORT ds390_port;
 #if !OPT_DISABLE_PIC
 extern PORT pic_port;
 #endif
-#if !OPT_DISABLE_I186
-extern PORT i186_port;
+#if !OPT_DISABLE_PIC16
+extern PORT pic16_port;
+#endif
+#if !OPT_DISABLE_TININative
+extern PORT tininative_port;
+#endif
+#if !OPT_DISABLE_XA51
+extern PORT xa51_port;
+#endif
+#if !OPT_DISABLE_DS400
+extern PORT ds400_port;
 #endif
-#if !OPT_DISABLE_TLCS900H
-extern PORT tlcs900h_port;
+#if !OPT_DISABLE_HC08
+extern PORT hc08_port;
 #endif
 
-#endif PORT_INCLUDE
+#endif /* PORT_INCLUDE*/