sim/lm32/sim-if.c

   1 /* Main simulator entry points specific to Lattice Mico32.
   2    Contributed by Jon Beniston <jon@beniston.com>
   3
   4    Copyright (C) 2009-2016 Free Software Foundation, Inc.
   5
   6    This file is part of GDB.
   7
   8    This program is free software; you can redistribute it and/or modify
   9    it under the terms of the GNU General Public License as published by
  10    the Free Software Foundation; either version 3 of the License, or
  11    (at your option) any later version.
  12
  13    This program is distributed in the hope that it will be useful,
  14    but WITHOUT ANY WARRANTY; without even the implied warranty of
  15    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16    GNU General Public License for more details.
  17
  18    You should have received a copy of the GNU General Public License
  19    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  20
  21 #include "sim-main.h"
  22 #include "sim-options.h"
  23 #include "libiberty.h"
  24 #include "bfd.h"
  25
  26 #ifdef HAVE_STDLIB_H
  27 #include <stdlib.h>
  28 #endif
  29 \f
  30 /* Cover function of sim_state_free to free the cpu buffers as well.  */
  31
  32 static void
  33 free_state (SIM_DESC sd)
  34 {
  35   if (STATE_MODULES (sd) != NULL)
  36     sim_module_uninstall (sd);
  37   sim_cpu_free_all (sd);
  38   sim_state_free (sd);
  39 }
  40
  41 /* Find memory range used by program.  */
  42
  43 static unsigned long
  44 find_base (bfd *prog_bfd)
  45 {
  46   int found;
  47   unsigned long base = ~(0UL);
  48   asection *s;
  49
  50   found = 0;
  51   for (s = prog_bfd->sections; s; s = s->next)
  52     {
  53       if ((strcmp (bfd_get_section_name (prog_bfd, s), ".boot") == 0)
  54           || (strcmp (bfd_get_section_name (prog_bfd, s), ".text") == 0)
  55           || (strcmp (bfd_get_section_name (prog_bfd, s), ".data") == 0)
  56           || (strcmp (bfd_get_section_name (prog_bfd, s), ".bss") == 0))
  57         {
  58           if (!found)
  59             {
  60               base = bfd_get_section_vma (prog_bfd, s);
  61               found = 1;
  62             }
  63           else
  64             base =
  65               bfd_get_section_vma (prog_bfd,
  66                                    s) < base ? bfd_get_section_vma (prog_bfd,
  67                                                                     s) : base;
  68         }
  69     }
  70   return base & ~(0xffffUL);
  71 }
  72
  73 static unsigned long
  74 find_limit (bfd *prog_bfd)
  75 {
  76   struct bfd_symbol **asymbols;
  77   long symsize;
  78   long symbol_count;
  79   long s;
  80
  81   symsize = bfd_get_symtab_upper_bound (prog_bfd);
  82   if (symsize < 0)
  83     return 0;
  84   asymbols = (asymbol **) xmalloc (symsize);
  85   symbol_count = bfd_canonicalize_symtab (prog_bfd, asymbols);
  86   if (symbol_count < 0)
  87     return 0;
  88
  89   for (s = 0; s < symbol_count; s++)
  90     {
  91       if (!strcmp (asymbols[s]->name, "_fstack"))
  92         return (asymbols[s]->value + 65536) & ~(0xffffUL);
  93     }
  94   return 0;
  95 }
  96
  97 /* Create an instance of the simulator.  */
  98
  99 SIM_DESC
 100 sim_open (kind, callback, abfd, argv)
 101      SIM_OPEN_KIND kind;
 102      host_callback *callback;
 103      struct bfd *abfd;
 104      char * const *argv;
 105 {
 106   SIM_DESC sd = sim_state_alloc (kind, callback);
 107   char c;
 108   int i;
 109   unsigned long base, limit;
 110
 111   /* The cpu data is kept in a separately allocated chunk of memory.  */
 112   if (sim_cpu_alloc_all (sd, 1, cgen_cpu_max_extra_bytes ()) != SIM_RC_OK)
 113     {
 114       free_state (sd);
 115       return 0;
 116     }
 117
 118   if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK)
 119     {
 120       free_state (sd);
 121       return 0;
 122     }
 123
 124   /* The parser will print an error message for us, so we silently return.  */
 125   if (sim_parse_args (sd, argv) != SIM_RC_OK)
 126     {
 127       free_state (sd);
 128       return 0;
 129     }
 130
 131 #if 0
 132   /* Allocate a handler for I/O devices
 133      if no memory for that range has been allocated by the user.
 134      All are allocated in one chunk to keep things from being
 135      unnecessarily complicated.  */
 136   if (sim_core_read_buffer (sd, NULL, read_map, &c, LM32_DEVICE_ADDR, 1) == 0)
 137     sim_core_attach (sd, NULL, 0 /*level */ ,
 138                      access_read_write, 0 /*space ??? */ ,
 139                      LM32_DEVICE_ADDR, LM32_DEVICE_LEN /*nr_bytes */ ,
 140                      0 /*modulo */ ,
 141                      &lm32_devices, NULL /*buffer */ );
 142 #endif
 143
 144   /* check for/establish the reference program image.  */
 145   if (sim_analyze_program (sd,
 146                            (STATE_PROG_ARGV (sd) != NULL
 147                             ? *STATE_PROG_ARGV (sd)
 148                             : NULL), abfd) != SIM_RC_OK)
 149     {
 150       free_state (sd);
 151       return 0;
 152     }
 153
 154   /* Check to see if memory exists at programs start address.  */
 155   if (sim_core_read_buffer (sd, NULL, read_map, &c, STATE_START_ADDR (sd), 1)
 156       == 0)
 157     {
 158       if (STATE_PROG_BFD (sd) != NULL)
 159         {
 160           /* It doesn't, so we should try to allocate enough memory to hold program.  */
 161           base = find_base (STATE_PROG_BFD (sd));
 162           limit = find_limit (STATE_PROG_BFD (sd));
 163           if (limit == 0)
 164             {
 165               sim_io_eprintf (sd,
 166                               "Failed to find symbol _fstack in program. You must specify memory regions with --memory-region.\n");
 167               free_state (sd);
 168               return 0;
 169             }
 170           /*sim_io_printf (sd, "Allocating memory at 0x%x size 0x%x\n", base, limit); */
 171           sim_do_commandf (sd, "memory region 0x%x,0x%x", base, limit);
 172         }
 173     }
 174
 175   /* Establish any remaining configuration options.  */
 176   if (sim_config (sd) != SIM_RC_OK)
 177     {
 178       free_state (sd);
 179       return 0;
 180     }
 181
 182   if (sim_post_argv_init (sd) != SIM_RC_OK)
 183     {
 184       free_state (sd);
 185       return 0;
 186     }
 187
 188   /* Open a copy of the cpu descriptor table.  */
 189   {
 190     CGEN_CPU_DESC cd =
 191       lm32_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name,
 192                             CGEN_ENDIAN_BIG);
 193     for (i = 0; i < MAX_NR_PROCESSORS; ++i)
 194       {
 195         SIM_CPU *cpu = STATE_CPU (sd, i);
 196         CPU_CPU_DESC (cpu) = cd;
 197         CPU_DISASSEMBLER (cpu) = sim_cgen_disassemble_insn;
 198       }
 199     lm32_cgen_init_dis (cd);
 200   }
 201
 202   /* Initialize various cgen things not done by common framework.
 203      Must be done after lm32_cgen_cpu_open.  */
 204   cgen_init (sd);
 205
 206   return sd;
 207 }
 208 \f
 209 SIM_RC
 210 sim_create_inferior (sd, abfd, argv, envp)
 211      SIM_DESC sd;
 212      struct bfd *abfd;
 213      char * const *argv;
 214      char * const *envp;
 215 {
 216   SIM_CPU *current_cpu = STATE_CPU (sd, 0);
 217   SIM_ADDR addr;
 218
 219   if (abfd != NULL)
 220     addr = bfd_get_start_address (abfd);
 221   else
 222     addr = 0;
 223   sim_pc_set (current_cpu, addr);
 224
 225   /* Standalone mode (i.e. `run`) will take care of the argv for us in
 226      sim_open() -> sim_parse_args().  But in debug mode (i.e. 'target sim'
 227      with `gdb`), we need to handle it because the user can change the
 228      argv on the fly via gdb's 'run'.  */
 229   if (STATE_PROG_ARGV (sd) != argv)
 230     {
 231       freeargv (STATE_PROG_ARGV (sd));
 232       STATE_PROG_ARGV (sd) = dupargv (argv);
 233     }
 234
 235   return SIM_RC_OK;
 236 }