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 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 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 } 237