(optionally) push static array initialization down to the ports code generator

[fw/sdcc] / src / mcs51 / main.c

diff --git a/src/mcs51/main.c b/src/mcs51/main.c
index 49cee9e099e31ddb79d9740d37e1cc4d48225529..c06d08a9c6d0b0f6b44360da588127be7f522fe1 100644 (file)
--- a/src/mcs51/main.c
+++ b/src/mcs51/main.c
@@ -7,69 +7,210 @@
 #include "common.h"
 #include "main.h"
 #include "ralloc.h"
+#include "gen.h"
 
+static char _defaultRules[] =
+{
+#include "peeph.rul"
+};
+
+/* list of key words used by msc51 */
+static char *_mcs51_keywords[] =
+{
+  "at",
+  "bit",
+  "code",
+  "critical",
+  "data",
+  "far",
+  "idata",
+  "interrupt",
+  "near",
+  "pdata",
+  "reentrant",
+  "sfr",
+  "sbit",
+  "using",
+  "xdata",
+  "_data",
+  "_code",
+  "_generic",
+  "_near",
+  "_xdata",
+  "_pdata",
+  "_idata",
+  "_naked",
+  NULL
+};
 
-void mcs51_assignRegisters (eBBlock **ebbs, int count);
 
-static bool _mcs51_parseOptions(int *pargc, char **argv)
+void mcs51_assignRegisters (eBBlock ** ebbs, int count);
+
+static int regParmFlg = 0;     /* determine if we can register a parameter */
+
+static void
+_mcs51_init (void)
 {
-    return FALSE;
+  asm_addTree (&asm_asxxxx_mapping);
 }
 
-static void _mcs51_finaliseOptions(void)
+static void
+_mcs51_reset_regparm ()
 {
+  regParmFlg = 0;
 }
 
-static void _mcs51_setDefaultOptions(void)
-{    
+static int
+_mcs51_regparm (sym_link * l)
+{
+  /* for this processor it is simple
+     can pass only the first parameter in a register */
+  if (regParmFlg)
+    return 0;
+
+  regParmFlg = 1;
+  return 1;
 }
 
-static const char *_mcs51_getRegName(struct regs *reg)
+static bool
+_mcs51_parseOptions (int *pargc, char **argv, int *i)
 {
-    if (reg)
-       return reg->name;
-    return "err";
+  /* TODO: allow port-specific command line options to specify
+   * segment names here.
+   */
+  return FALSE;
 }
 
-/* Globals */
-PORT mcs51_port = {
-    "mcs51",
-    "MCU 8051",                        /* Target name */
-    {  
-       "asx8051",              /* Assembler executable name */
-       "-plosgffc",            /* Options with debug */
-       "-plosgff",             /* Options without debug */
-       FALSE                   /* TRUE if the assembler requires an output name */
-    },
-    {
-       "aslink",               /* Linker executable name */
-    },
-    {
-       /* Sizes: char, short, int, long, ptr, fptr, gptr, bit, float, max */
-       1, 1, 2, 4, 1, 2, 3, 1, 4, 4
-    },
+static void
+_mcs51_finaliseOptions (void)
+{
+  if (options.model == MODEL_LARGE) {
+      port->mem.default_local_map = xdata;
+      port->mem.default_globl_map = xdata;
+    }
+  else
     {
-       "XSEG    (XDATA)",
-       "STACK   (DATA)",
-       "CSEG    (CODE)",
-       "DSEG    (DATA)",
-       "ISEG    (DATA)",
-       "XSEG    (XDATA)",
-       "BSEG    (BIT)",
-       "RSEG    (DATA)",
-       "GSINIT  (CODE)",
-       "OSEG    (OVR,DATA)"
-    },
-    { 
-       +1, 1, 4, 0, 0
-    },
+      port->mem.default_local_map = data;
+      port->mem.default_globl_map = data;
+    }
+}
+
+static void
+_mcs51_setDefaultOptions (void)
+{
+}
+
+static const char *
+_mcs51_getRegName (struct regs *reg)
+{
+  if (reg)
+    return reg->name;
+  return "err";
+}
+
+static void
+_mcs51_genAssemblerPreamble (FILE * of)
+{
+}
+
+/* Generate interrupt vector table. */
+static int
+_mcs51_genIVT (FILE * of, symbol ** interrupts, int maxInterrupts)
+{
+  return FALSE;
+}
+
+/** $1 is always the basename.
+    $2 is always the output file.
+    $3 varies
+    $l is the list of extra options that should be there somewhere...
+    MUST be terminated with a NULL.
+*/
+static const char *_linkCmd[] =
+{
+  "aslink", "-nf", "$1", NULL
+};
+
+static const char *_asmCmd[] =
+{
+  "asx8051", "$l", "-plosgffc", "$1.asm", NULL
+};
+
+/* Globals */
+PORT mcs51_port =
+{
+  TARGET_ID_MCS51,
+  "mcs51",
+  "MCU 8051",                  /* Target name */
+  {
+    TRUE,                      /* Emit glue around main */
+    MODEL_SMALL | MODEL_LARGE,
+    MODEL_SMALL
+  },
+  {
+    _asmCmd,
+    "-plosgffc",               /* Options with debug */
+    "-plosgff",                        /* Options without debug */
+    0,
+    ".asm"
+  },
+  {
+    _linkCmd,
+    NULL,
+    ".rel"
+  },
+  {
+    _defaultRules
+  },
+  {
+       /* Sizes: char, short, int, long, ptr, fptr, gptr, bit, float, max */
+    1, 2, 2, 4, 1, 2, 3, 1, 4, 4
+  },
+  {
+    "XSEG    (XDATA)",
+    "STACK   (DATA)",
+    "CSEG    (CODE)",
+    "DSEG    (DATA)",
+    "ISEG    (DATA)",
+    "XSEG    (XDATA)",
+    "BSEG    (BIT)",
+    "RSEG    (DATA)",
+    "GSINIT  (CODE)",
+    "OSEG    (OVR,DATA)",
+    "GSFINAL (CODE)",
+    "HOME       (CODE)",
+    NULL,
+    NULL,
+    1
+  },
+  {
+    +1, 1, 4, 1, 1, 0
+  },
     /* mcs51 has an 8 bit mul */
-    {
-       1
-    },
-    _mcs51_parseOptions,
-    _mcs51_finaliseOptions,
-    _mcs51_setDefaultOptions,
-    mcs51_assignRegisters,
-    _mcs51_getRegName
+  {
+    1, -1
+  },
+  "_",
+  _mcs51_init,
+  _mcs51_parseOptions,
+  _mcs51_finaliseOptions,
+  _mcs51_setDefaultOptions,
+  mcs51_assignRegisters,
+  _mcs51_getRegName,
+  _mcs51_keywords,
+  _mcs51_genAssemblerPreamble,
+  _mcs51_genIVT,
+  _mcs51_reset_regparm,
+  _mcs51_regparm,
+  NULL,
+  NULL,
+  FALSE,
+  0,                           /* leave lt */
+  0,                           /* leave gt */
+  1,                           /* transform <= to ! > */
+  1,                           /* transform >= to ! < */
+  1,                           /* transform != to !(a == b) */
+  0,                           /* leave == */
+  FALSE,                        /* No array initializer support. */
+  PORT_MAGIC
 };