sim/m32r/sim-if.c

   1 /* Main simulator entry points specific to the M32R.
   2    Copyright (C) 1996-2015 Free Software Foundation, Inc.
   3    Contributed by Cygnus Support.
   4
   5    This file is part of GDB, the GNU debugger.
   6
   7    This program is free software; you can redistribute it and/or modify
   8    it under the terms of the GNU General Public License as published by
   9    the Free Software Foundation; either version 3 of the License, or
  10    (at your option) any later version.
  11
  12    This program is distributed in the hope that it will be useful,
  13    but WITHOUT ANY WARRANTY; without even the implied warranty of
  14    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15    GNU General Public License for more details.
  16
  17    You should have received a copy of the GNU General Public License
  18    along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  19
  20 #include "sim-main.h"
  21 #include "sim-options.h"
  22 #include "libiberty.h"
  23 #include "bfd.h"
  24
  25 #ifdef HAVE_STRING_H
  26 #include <string.h>
  27 #else
  28 #ifdef HAVE_STRINGS_H
  29 #include <strings.h>
  30 #endif
  31 #endif
  32 #ifdef HAVE_STDLIB_H
  33 #include <stdlib.h>
  34 #endif
  35
  36 static void free_state (SIM_DESC);
  37 static void print_m32r_misc_cpu (SIM_CPU *cpu, int verbose);
  38
  39 /* Records simulator descriptor so utilities like m32r_dump_regs can be
  40    called from gdb.  */
  41 SIM_DESC current_state;
  42 \f
  43 /* Cover function of sim_state_free to free the cpu buffers as well.  */
  44
  45 static void
  46 free_state (SIM_DESC sd)
  47 {
  48   if (STATE_MODULES (sd) != NULL)
  49     sim_module_uninstall (sd);
  50   sim_cpu_free_all (sd);
  51   sim_state_free (sd);
  52 }
  53
  54 /* Create an instance of the simulator.  */
  55
  56 SIM_DESC
  57 sim_open (kind, callback, abfd, argv)
  58      SIM_OPEN_KIND kind;
  59      host_callback *callback;
  60      struct bfd *abfd;
  61      char **argv;
  62 {
  63   SIM_DESC sd = sim_state_alloc (kind, callback);
  64   char c;
  65   int i;
  66
  67   /* The cpu data is kept in a separately allocated chunk of memory.  */
  68   if (sim_cpu_alloc_all (sd, 1, cgen_cpu_max_extra_bytes ()) != SIM_RC_OK)
  69     {
  70       free_state (sd);
  71       return 0;
  72     }
  73
  74 #if 0 /* FIXME: pc is in mach-specific struct */
  75   /* FIXME: watchpoints code shouldn't need this */
  76   {
  77     SIM_CPU *current_cpu = STATE_CPU (sd, 0);
  78     STATE_WATCHPOINTS (sd)->pc = &(PC);
  79     STATE_WATCHPOINTS (sd)->sizeof_pc = sizeof (PC);
  80   }
  81 #endif
  82
  83   if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK)
  84     {
  85       free_state (sd);
  86       return 0;
  87     }
  88
  89 #if 0 /* FIXME: 'twould be nice if we could do this */
  90   /* These options override any module options.
  91      Obviously ambiguity should be avoided, however the caller may wish to
  92      augment the meaning of an option.  */
  93   if (extra_options != NULL)
  94     sim_add_option_table (sd, extra_options);
  95 #endif
  96
  97   /* getopt will print the error message so we just have to exit if this fails.
  98      FIXME: Hmmm...  in the case of gdb we need getopt to call
  99      print_filtered.  */
 100   if (sim_parse_args (sd, argv) != SIM_RC_OK)
 101     {
 102       free_state (sd);
 103       return 0;
 104     }
 105
 106   /* Allocate a handler for the control registers and other devices
 107      if no memory for that range has been allocated by the user.
 108      All are allocated in one chunk to keep things from being
 109      unnecessarily complicated.  */
 110   if (sim_core_read_buffer (sd, NULL, read_map, &c, M32R_DEVICE_ADDR, 1) == 0)
 111     sim_core_attach (sd, NULL,
 112                      0 /*level*/,
 113                      access_read_write,
 114                      0 /*space ???*/,
 115                      M32R_DEVICE_ADDR, M32R_DEVICE_LEN /*nr_bytes*/,
 116                      0 /*modulo*/,
 117                      &m32r_devices,
 118                      NULL /*buffer*/);
 119
 120   /* Allocate core managed memory if none specified by user.
 121      Use address 4 here in case the user wanted address 0 unmapped.  */
 122   if (sim_core_read_buffer (sd, NULL, read_map, &c, 4, 1) == 0)
 123     sim_do_commandf (sd, "memory region 0,0x%x", M32R_DEFAULT_MEM_SIZE);
 124
 125   /* check for/establish the reference program image */
 126   if (sim_analyze_program (sd,
 127                            (STATE_PROG_ARGV (sd) != NULL
 128                             ? *STATE_PROG_ARGV (sd)
 129                             : NULL),
 130                            abfd) != SIM_RC_OK)
 131     {
 132       free_state (sd);
 133       return 0;
 134     }
 135
 136   /* Establish any remaining configuration options.  */
 137   if (sim_config (sd) != SIM_RC_OK)
 138     {
 139       free_state (sd);
 140       return 0;
 141     }
 142
 143   if (sim_post_argv_init (sd) != SIM_RC_OK)
 144     {
 145       free_state (sd);
 146       return 0;
 147     }
 148
 149   /* Open a copy of the cpu descriptor table.  */
 150   {
 151     CGEN_CPU_DESC cd = m32r_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name,
 152                                              CGEN_ENDIAN_BIG);
 153     for (i = 0; i < MAX_NR_PROCESSORS; ++i)
 154       {
 155         SIM_CPU *cpu = STATE_CPU (sd, i);
 156         CPU_CPU_DESC (cpu) = cd;
 157         CPU_DISASSEMBLER (cpu) = sim_cgen_disassemble_insn;
 158       }
 159     m32r_cgen_init_dis (cd);
 160   }
 161
 162   /* Initialize various cgen things not done by common framework.
 163      Must be done after m32r_cgen_cpu_open.  */
 164   cgen_init (sd);
 165
 166   for (c = 0; c < MAX_NR_PROCESSORS; ++c)
 167     {
 168       /* Only needed for profiling, but the structure member is small.  */
 169       memset (CPU_M32R_MISC_PROFILE (STATE_CPU (sd, i)), 0,
 170               sizeof (* CPU_M32R_MISC_PROFILE (STATE_CPU (sd, i))));
 171       /* Hook in callback for reporting these stats */
 172       PROFILE_INFO_CPU_CALLBACK (CPU_PROFILE_DATA (STATE_CPU (sd, i)))
 173         = print_m32r_misc_cpu;
 174     }
 175
 176   /* Store in a global so things like sparc32_dump_regs can be invoked
 177      from the gdb command line.  */
 178   current_state = sd;
 179
 180   return sd;
 181 }
 182
 183 void
 184 sim_close (sd, quitting)
 185      SIM_DESC sd;
 186      int quitting;
 187 {
 188   m32r_cgen_cpu_close (CPU_CPU_DESC (STATE_CPU (sd, 0)));
 189   sim_module_uninstall (sd);
 190 }
 191 \f
 192 SIM_RC
 193 sim_create_inferior (sd, abfd, argv, envp)
 194      SIM_DESC sd;
 195      struct bfd *abfd;
 196      char **argv;
 197      char **envp;
 198 {
 199   SIM_CPU *current_cpu = STATE_CPU (sd, 0);
 200   SIM_ADDR addr;
 201
 202   if (abfd != NULL)
 203     addr = bfd_get_start_address (abfd);
 204   else
 205     addr = 0;
 206   sim_pc_set (current_cpu, addr);
 207
 208 #ifdef M32R_LINUX
 209   m32rbf_h_cr_set (current_cpu,
 210                     m32r_decode_gdb_ctrl_regnum(SPI_REGNUM), 0x1f00000);
 211   m32rbf_h_cr_set (current_cpu,
 212                     m32r_decode_gdb_ctrl_regnum(SPU_REGNUM), 0x1f00000);
 213 #endif
 214
 215 #if 0
 216   STATE_ARGV (sd) = sim_copy_argv (argv);
 217   STATE_ENVP (sd) = sim_copy_argv (envp);
 218 #endif
 219
 220   return SIM_RC_OK;
 221 }
 222
 223 /* PROFILE_CPU_CALLBACK */
 224
 225 static void
 226 print_m32r_misc_cpu (SIM_CPU *cpu, int verbose)
 227 {
 228   SIM_DESC sd = CPU_STATE (cpu);
 229   char buf[20];
 230
 231   if (CPU_PROFILE_FLAGS (cpu) [PROFILE_INSN_IDX])
 232     {
 233       sim_io_printf (sd, "Miscellaneous Statistics\n\n");
 234       sim_io_printf (sd, "  %-*s %s\n\n",
 235                      PROFILE_LABEL_WIDTH, "Fill nops:",
 236                      sim_add_commas (buf, sizeof (buf),
 237                                      CPU_M32R_MISC_PROFILE (cpu)->fillnop_count));
 238       if (STATE_ARCHITECTURE (sd)->mach == bfd_mach_m32rx)
 239         sim_io_printf (sd, "  %-*s %s\n\n",
 240                        PROFILE_LABEL_WIDTH, "Parallel insns:",
 241                        sim_add_commas (buf, sizeof (buf),
 242                                        CPU_M32R_MISC_PROFILE (cpu)->parallel_count));
 243       if (STATE_ARCHITECTURE (sd)->mach == bfd_mach_m32r2)
 244         sim_io_printf (sd, "  %-*s %s\n\n",
 245                        PROFILE_LABEL_WIDTH, "Parallel insns:",
 246                        sim_add_commas (buf, sizeof (buf),
 247                                        CPU_M32R_MISC_PROFILE (cpu)->parallel_count));
 248     }
 249 }