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-2023 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 /* This must come before any other includes.  */
  22 #include "defs.h"
  23
  24 #include <stdlib.h>
  25
  26 #include "sim/callback.h"
  27 #include "sim-main.h"
  28 #include "sim-options.h"
  29 #include "libiberty.h"
  30 #include "bfd.h"
  31 \f
  32 /* Cover function of sim_state_free to free the cpu buffers as well.  */
  33
  34 static void
  35 free_state (SIM_DESC sd)
  36 {
  37   if (STATE_MODULES (sd) != NULL)
  38     sim_module_uninstall (sd);
  39   sim_cpu_free_all (sd);
  40   sim_state_free (sd);
  41 }
  42
  43 /* Find memory range used by program.  */
  44
  45 static unsigned long
  46 find_base (bfd *prog_bfd)
  47 {
  48   int found;
  49   unsigned long base = ~(0UL);
  50   asection *s;
  51
  52   found = 0;
  53   for (s = prog_bfd->sections; s; s = s->next)
  54     {
  55       if ((strcmp (bfd_section_name (s), ".boot") == 0)
  56           || (strcmp (bfd_section_name (s), ".text") == 0)
  57           || (strcmp (bfd_section_name (s), ".data") == 0)
  58           || (strcmp (bfd_section_name (s), ".bss") == 0))
  59         {
  60           if (!found)
  61             {
  62               base = bfd_section_vma (s);
  63               found = 1;
  64             }
  65           else
  66             base = bfd_section_vma (s) < base ? bfd_section_vma (s) : base;
  67         }
  68     }
  69   return base & ~(0xffffUL);
  70 }
  71
  72 static unsigned long
  73 find_limit (SIM_DESC sd)
  74 {
  75   bfd_vma addr;
  76
  77   addr = trace_sym_value (sd, "_fstack");
  78   if (addr == -1)
  79     return 0;
  80
  81   return (addr + 65536) & ~(0xffffUL);
  82 }
  83
  84 extern const SIM_MACH * const lm32_sim_machs[];
  85
  86 /* Create an instance of the simulator.  */
  87
  88 SIM_DESC
  89 sim_open (SIM_OPEN_KIND kind, host_callback *callback, struct bfd *abfd,
  90           char * const *argv)
  91 {
  92   SIM_DESC sd = sim_state_alloc (kind, callback);
  93   char c;
  94   int i;
  95   unsigned long base, limit;
  96
  97   /* Set default options before parsing user options.  */
  98   STATE_MACHS (sd) = lm32_sim_machs;
  99   STATE_MODEL_NAME (sd) = "lm32";
 100   current_alignment = STRICT_ALIGNMENT;
 101   current_target_byte_order = BFD_ENDIAN_BIG;
 102
 103   /* The cpu data is kept in a separately allocated chunk of memory.  */
 104   if (sim_cpu_alloc_all_extra (sd, 0, sizeof (struct lm32_sim_cpu))
 105       != SIM_RC_OK)
 106     {
 107       free_state (sd);
 108       return 0;
 109     }
 110
 111   if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK)
 112     {
 113       free_state (sd);
 114       return 0;
 115     }
 116
 117   /* The parser will print an error message for us, so we silently return.  */
 118   if (sim_parse_args (sd, argv) != SIM_RC_OK)
 119     {
 120       free_state (sd);
 121       return 0;
 122     }
 123
 124 #if 0
 125   /* Allocate a handler for I/O devices
 126      if no memory for that range has been allocated by the user.
 127      All are allocated in one chunk to keep things from being
 128      unnecessarily complicated.  */
 129   if (sim_core_read_buffer (sd, NULL, read_map, &c, LM32_DEVICE_ADDR, 1) == 0)
 130     sim_core_attach (sd, NULL, 0 /*level */ ,
 131                      access_read_write, 0 /*space ??? */ ,
 132                      LM32_DEVICE_ADDR, LM32_DEVICE_LEN /*nr_bytes */ ,
 133                      0 /*modulo */ ,
 134                      &lm32_devices, NULL /*buffer */ );
 135 #endif
 136
 137   /* check for/establish the reference program image.  */
 138   if (sim_analyze_program (sd, STATE_PROG_FILE (sd), abfd) != SIM_RC_OK)
 139     {
 140       free_state (sd);
 141       return 0;
 142     }
 143
 144   /* Check to see if memory exists at programs start address.  */
 145   if (sim_core_read_buffer (sd, NULL, read_map, &c, STATE_START_ADDR (sd), 1)
 146       == 0)
 147     {
 148       if (STATE_PROG_BFD (sd) != NULL)
 149         {
 150           /* It doesn't, so we should try to allocate enough memory to hold program.  */
 151           base = find_base (STATE_PROG_BFD (sd));
 152           limit = find_limit (sd);
 153           if (limit == 0)
 154             {
 155               sim_io_eprintf (sd,
 156                               "Failed to find symbol _fstack in program. You must specify memory regions with --memory-region.\n");
 157               free_state (sd);
 158               return 0;
 159             }
 160           /*sim_io_printf (sd, "Allocating memory at 0x%lx size 0x%lx\n", base, limit); */
 161           sim_do_commandf (sd, "memory region 0x%lx,0x%lx", base, limit);
 162         }
 163     }
 164
 165   /* Establish any remaining configuration options.  */
 166   if (sim_config (sd) != SIM_RC_OK)
 167     {
 168       free_state (sd);
 169       return 0;
 170     }
 171
 172   if (sim_post_argv_init (sd) != SIM_RC_OK)
 173     {
 174       free_state (sd);
 175       return 0;
 176     }
 177
 178   /* Open a copy of the cpu descriptor table.  */
 179   {
 180     CGEN_CPU_DESC cd =
 181       lm32_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name,
 182                             CGEN_ENDIAN_BIG);
 183     for (i = 0; i < MAX_NR_PROCESSORS; ++i)
 184       {
 185         SIM_CPU *cpu = STATE_CPU (sd, i);
 186         CPU_CPU_DESC (cpu) = cd;
 187         CPU_DISASSEMBLER (cpu) = sim_cgen_disassemble_insn;
 188       }
 189     lm32_cgen_init_dis (cd);
 190   }
 191
 192   return sd;
 193 }
 194 \f
 195 SIM_RC
 196 sim_create_inferior (SIM_DESC sd, struct bfd *abfd, char * const *argv,
 197                      char * const *env)
 198 {
 199   SIM_CPU *current_cpu = STATE_CPU (sd, 0);
 200   host_callback *cb = STATE_CALLBACK (sd);
 201   bfd_vma addr;
 202
 203   if (abfd != NULL)
 204     addr = bfd_get_start_address (abfd);
 205   else
 206     addr = 0;
 207   sim_pc_set (current_cpu, addr);
 208
 209   /* Standalone mode (i.e. `run`) will take care of the argv for us in
 210      sim_open() -> sim_parse_args().  But in debug mode (i.e. 'target sim'
 211      with `gdb`), we need to handle it because the user can change the
 212      argv on the fly via gdb's 'run'.  */
 213   if (STATE_PROG_ARGV (sd) != argv)
 214     {
 215       freeargv (STATE_PROG_ARGV (sd));
 216       STATE_PROG_ARGV (sd) = dupargv (argv);
 217     }
 218
 219   if (STATE_PROG_ENVP (sd) != env)
 220     {
 221       freeargv (STATE_PROG_ENVP (sd));
 222       STATE_PROG_ENVP (sd) = dupargv (env);
 223     }
 224
 225   cb->argv = STATE_PROG_ARGV (sd);
 226   cb->envp = STATE_PROG_ENVP (sd);
 227
 228   return SIM_RC_OK;
 229 }