git.gag.com Git - fw/sdcc/blob - src/avr/main.c

   1 /** @file main.c
   2     avr specific general functions.
   3
   4     Note that mlh prepended _avr_ on the static functions.  Makes
   5     it easier to set a breakpoint using the debugger.
   6 */
   7 #include "common.h"
   8 #include "main.h"
   9 #include "ralloc.h"
  10 #include "gen.h"
  11
  12 static char _defaultRules[] = {
  13 #include "peeph.rul"
  14 };
  15
  16 /* list of key words used by msc51 */
  17 static char *_avr_keywords[] = {
  18         "at",
  19         "code",
  20         "critical",
  21         "eeprom",
  22         "interrupt",
  23         "sfr",
  24         "xdata",
  25         "_code",
  26         "_eeprom",
  27         "_generic",
  28         "_xdata",
  29         "sram",
  30         "_sram",
  31         "flash",
  32         "_flash",
  33         NULL
  34 };
  35
  36 static int regParmFlg = 0;      /* determine if we can register a parameter */
  37
  38 static void
  39 _avr_init (void)
  40 {
  41         asm_addTree (&asm_asxxxx_mapping);
  42 }
  43
  44 static void
  45 _avr_reset_regparm (void)
  46 {
  47         regParmFlg = 0;
  48 }
  49
  50 static int
  51 _avr_regparm (sym_link * l, bool reentrant)
  52 {
  53         /* the first eight bytes will be passed in
  54            registers r16-r23. but we won't split variables
  55            i.e. if not enough registers left to hold
  56            the parameter then the whole parameter along
  57            with rest of the parameters go onto the stack */
  58         if (regParmFlg < 8) {
  59                 int size;
  60                 if ((size = getSize (l)) > (8 - regParmFlg)) {
  61                         /* all remaining go on stack */
  62                         regParmFlg = 8;
  63                         return 0;
  64                 }
  65                 regParmFlg += size;
  66                 return 1;
  67         }
  68
  69         return 0;
  70 }
  71
  72 void avr_assignRegisters (ebbIndex *);
  73
  74 static bool
  75 _avr_parseOptions (int *pargc, char **argv, int *i)
  76 {
  77         /* TODO: allow port-specific command line options to specify
  78          * segment names here.
  79          */
  80         return FALSE;
  81 }
  82
  83 static void
  84 _avr_finaliseOptions (void)
  85 {
  86         port->mem.default_local_map = port->mem.default_globl_map = xdata;
  87         /* change stack to be in far space */
  88         /* internal stack segment ;
  89            SFRSPACE       -   NO
  90            FAR-SPACE      -   YES
  91            PAGED          -   NO
  92            DIRECT-ACCESS  -   NO
  93            BIT-ACCESS     -   NO
  94            CODE-ACESS     -   NO
  95            DEBUG-NAME     -   'B'
  96            POINTER-TYPE   -   FPOINTER
  97          */
  98         istack =
  99                 allocMap (0, 1, 0, 0, 0, 0, options.stack_loc, ISTACK_NAME,
 100                           'B', FPOINTER);
 101
 102         /* also change xdata to be direct space since we can use lds/sts */
 103         xdata->direct = 1;
 104
 105 }
 106
 107 static void
 108 _avr_setDefaultOptions (void)
 109 {
 110         options.stackAuto = 1;
 111 }
 112
 113 static const char *
 114 _avr_getRegName (struct regs *reg)
 115 {
 116         if (reg)
 117                 return reg->name;
 118         return "err";
 119 }
 120
 121 static void
 122 _avr_genAssemblerPreamble (FILE * of)
 123 {
 124
 125 }
 126
 127 /* Generate interrupt vector table. */
 128 static int
 129 _avr_genIVT (FILE * of, symbol ** interrupts, int maxInterrupts)
 130 {
 131         return TRUE;
 132 }
 133
 134 /* Indicate which extended bit operations this port supports */
 135 static bool
 136 hasExtBitOp (int op, int size)
 137 {
 138   if (op == RRC
 139       || op == RLC
 140       || op == GETHBIT
 141      )
 142     return TRUE;
 143   else
 144     return FALSE;
 145 }
 146
 147 /* Indicate the expense of an access to an output storage class */
 148 static int
 149 oclsExpense (struct memmap *oclass)
 150 {
 151   if (IN_FARSPACE(oclass))
 152     return 1;
 153
 154   return 0;
 155 }
 156
 157 /** $1 is always the basename.
 158     $2 is always the output file.
 159     $3 varies
 160     $l is the list of extra options that should be there somewhere...
 161     MUST be terminated with a NULL.
 162 */
 163 static const char *_linkCmd[] = {
 164         "linkavr", "", "\"$1\"", NULL
 165 };
 166
 167 /* $3 is replaced by assembler.debug_opts resp. port->assembler.plain_opts */
 168 static const char *_asmCmd[] = {
 169         "asavr", "$l" , "$3", "\"$1.s\"", NULL
 170 };
 171
 172 /* Globals */
 173 PORT avr_port = {
 174         TARGET_ID_AVR,
 175         "avr",
 176         "ATMEL AVR",            /* Target name */
 177         NULL,                   /* processor */
 178         {
 179          glue,
 180          TRUE,                  /* Emit glue around main */
 181          MODEL_LARGE | MODEL_SMALL,
 182          MODEL_SMALL
 183         },
 184         {
 185          _asmCmd,
 186          NULL,
 187          "-plosgff",            /* Options with debug */
 188          "-plosgff",            /* Options without debug */
 189          0,
 190         ".s",
 191          NULL,                  /* no do_assemble */
 192         },
 193         {
 194          _linkCmd,
 195          NULL,
 196          NULL,
 197          ".rel",
 198          1},
 199         {
 200          _defaultRules},
 201         {
 202          /* Sizes: char, short, int, long, ptr, fptr, gptr, bit, float, max */
 203          1, 2, 2, 4, 2, 2, 3, 1, 4, 4},
 204         {
 205          "XSEG",
 206          "STACK",
 207          "CSEG",
 208          "DSEG",
 209          "ISEG",
 210          NULL, //PSEG
 211          "XSEG",
 212          "BSEG",
 213          "RSEG",
 214          "GSINIT",
 215          "OSEG",
 216          "GSFINAL",
 217          "HOME",
 218          NULL, // initialized xdata
 219          NULL, // a code copy of xiseg
 220          "CONST   (CODE)",              // const_name - const data (code or not)
 221          NULL,
 222          NULL,
 223          0,
 224          },
 225         { NULL, NULL },
 226         {
 227          -1, 1, 4, 1, 1, 0},
 228         /* avr has an 8 bit mul */
 229         {
 230           1, -1
 231         },
 232         {
 233           avr_emitDebuggerSymbol
 234         },
 235         {
 236           255/3,      /* maxCount */
 237           3,          /* sizeofElement */
 238           /* The rest of these costs are bogus. They approximate */
 239           /* the behavior of src/SDCCicode.c 1.207 and earlier.  */
 240           {4,4,4},    /* sizeofMatchJump[] */
 241           {0,0,0},    /* sizeofRangeCompare[] */
 242           0,          /* sizeofSubtract */
 243           3,          /* sizeofDispatch */
 244         },
 245         "_",
 246         _avr_init,
 247         _avr_parseOptions,
 248         NULL,
 249         NULL,
 250         _avr_finaliseOptions,
 251         _avr_setDefaultOptions,
 252         avr_assignRegisters,
 253         _avr_getRegName,
 254         _avr_keywords,
 255         _avr_genAssemblerPreamble,
 256         NULL,                           /* no genAssemblerEnd */
 257         _avr_genIVT,
 258         NULL, // _avr_genXINIT
 259         NULL,                   /* genInitStartup */
 260         _avr_reset_regparm,
 261         _avr_regparm,
 262         NULL,
 263         NULL,
 264         NULL,
 265         hasExtBitOp,            /* hasExtBitOp */
 266         oclsExpense,            /* oclsExpense */
 267         FALSE,
 268         TRUE,                   /* little endian */
 269         0,                      /* leave lt */
 270         1,                      /* transform gt ==> not le */
 271         0,                      /* leave le */
 272         0,                      /* leave ge */
 273         0,                      /* leave !=  */
 274         0,                      /* leave == */
 275         FALSE,                  /* No array initializer support. */
 276         0,                      /* no CSE cost estimation yet */
 277         NULL,                   /* no builtin functions */
 278         GPOINTER,               /* treat unqualified pointers as "generic" pointers */
 279         1,                      /* reset labelKey to 1 */
 280         1,                      /* globals & local static allowed */
 281         PORT_MAGIC
 282 };