/* Main simulator entry points specific to Lattice Mico32.
|
/* Main simulator entry points specific to Lattice Mico32.
|
Contributed by Jon Beniston <jon@beniston.com>
|
Contributed by Jon Beniston <jon@beniston.com>
|
|
|
Copyright (C) 2009, 2010 Free Software Foundation, Inc.
|
Copyright (C) 2009, 2010 Free Software Foundation, Inc.
|
|
|
This file is part of GDB.
|
This file is part of GDB.
|
|
|
This program is free software; you can redistribute it and/or modify
|
This program is free software; you can redistribute it and/or modify
|
it under the terms of the GNU General Public License as published by
|
it under the terms of the GNU General Public License as published by
|
the Free Software Foundation; either version 3 of the License, or
|
the Free Software Foundation; either version 3 of the License, or
|
(at your option) any later version.
|
(at your option) any later version.
|
|
|
This program is distributed in the hope that it will be useful,
|
This program is distributed in the hope that it will be useful,
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
but WITHOUT ANY WARRANTY; without even the implied warranty of
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
|
GNU General Public License for more details.
|
GNU General Public License for more details.
|
|
|
You should have received a copy of the GNU General Public License
|
You should have received a copy of the GNU General Public License
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
along with this program. If not, see <http://www.gnu.org/licenses/>. */
|
|
|
#include "sim-main.h"
|
#include "sim-main.h"
|
#include "sim-options.h"
|
#include "sim-options.h"
|
#include "libiberty.h"
|
#include "libiberty.h"
|
#include "bfd.h"
|
#include "bfd.h"
|
|
|
#ifdef HAVE_STDLIB_H
|
#ifdef HAVE_STDLIB_H
|
#include <stdlib.h>
|
#include <stdlib.h>
|
#endif
|
#endif
|
|
|
static void free_state (SIM_DESC);
|
static void free_state (SIM_DESC);
|
static void print_lm32_misc_cpu (SIM_CPU * cpu, int verbose);
|
static void print_lm32_misc_cpu (SIM_CPU * cpu, int verbose);
|
static DECLARE_OPTION_HANDLER (lm32_option_handler);
|
static DECLARE_OPTION_HANDLER (lm32_option_handler);
|
|
|
enum
|
enum
|
{
|
{
|
OPTION_ENDIAN = OPTION_START,
|
OPTION_ENDIAN = OPTION_START,
|
};
|
};
|
|
|
/* GDB passes -E, even though it's fixed, so we have to handle it here. common code only handles it if SIM_HAVE_BIENDIAN is defined, which it isn't for lm32. */
|
/* GDB passes -E, even though it's fixed, so we have to handle it here. common code only handles it if SIM_HAVE_BIENDIAN is defined, which it isn't for lm32. */
|
static const OPTION lm32_options[] = {
|
static const OPTION lm32_options[] = {
|
{{"endian", required_argument, NULL, OPTION_ENDIAN},
|
{{"endian", required_argument, NULL, OPTION_ENDIAN},
|
'E', "big", "Set endianness",
|
'E', "big", "Set endianness",
|
lm32_option_handler},
|
lm32_option_handler},
|
{{NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL}
|
{{NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL}
|
};
|
};
|
|
|
/* Records simulator descriptor so utilities like lm32_dump_regs can be
|
/* Records simulator descriptor so utilities like lm32_dump_regs can be
|
called from gdb. */
|
called from gdb. */
|
SIM_DESC current_state;
|
SIM_DESC current_state;
|
|
|
/* Cover function of sim_state_free to free the cpu buffers as well. */
|
/* Cover function of sim_state_free to free the cpu buffers as well. */
|
|
|
static void
|
static void
|
free_state (SIM_DESC sd)
|
free_state (SIM_DESC sd)
|
{
|
{
|
if (STATE_MODULES (sd) != NULL)
|
if (STATE_MODULES (sd) != NULL)
|
sim_module_uninstall (sd);
|
sim_module_uninstall (sd);
|
sim_cpu_free_all (sd);
|
sim_cpu_free_all (sd);
|
sim_state_free (sd);
|
sim_state_free (sd);
|
}
|
}
|
|
|
/* Find memory range used by program. */
|
/* Find memory range used by program. */
|
|
|
static unsigned long
|
static unsigned long
|
find_base (bfd *prog_bfd)
|
find_base (bfd *prog_bfd)
|
{
|
{
|
int found;
|
int found;
|
unsigned long base = ~(0UL);
|
unsigned long base = ~(0UL);
|
asection *s;
|
asection *s;
|
|
|
found = 0;
|
found = 0;
|
for (s = prog_bfd->sections; s; s = s->next)
|
for (s = prog_bfd->sections; s; s = s->next)
|
{
|
{
|
if ((strcmp (bfd_get_section_name (prog_bfd, s), ".boot") == 0)
|
if ((strcmp (bfd_get_section_name (prog_bfd, s), ".boot") == 0)
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".text") == 0)
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".text") == 0)
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".data") == 0)
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".data") == 0)
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".bss") == 0))
|
|| (strcmp (bfd_get_section_name (prog_bfd, s), ".bss") == 0))
|
{
|
{
|
if (!found)
|
if (!found)
|
{
|
{
|
base = bfd_get_section_vma (prog_bfd, s);
|
base = bfd_get_section_vma (prog_bfd, s);
|
found = 1;
|
found = 1;
|
}
|
}
|
else
|
else
|
base =
|
base =
|
bfd_get_section_vma (prog_bfd,
|
bfd_get_section_vma (prog_bfd,
|
s) < base ? bfd_get_section_vma (prog_bfd,
|
s) < base ? bfd_get_section_vma (prog_bfd,
|
s) : base;
|
s) : base;
|
}
|
}
|
}
|
}
|
return base & ~(0xffffUL);
|
return base & ~(0xffffUL);
|
}
|
}
|
|
|
static unsigned long
|
static unsigned long
|
find_limit (bfd *prog_bfd)
|
find_limit (bfd *prog_bfd)
|
{
|
{
|
struct bfd_symbol **asymbols;
|
struct bfd_symbol **asymbols;
|
long symsize;
|
long symsize;
|
long symbol_count;
|
long symbol_count;
|
long s;
|
long s;
|
|
|
symsize = bfd_get_symtab_upper_bound (prog_bfd);
|
symsize = bfd_get_symtab_upper_bound (prog_bfd);
|
if (symsize < 0)
|
if (symsize < 0)
|
return 0;
|
return 0;
|
asymbols = (asymbol **) xmalloc (symsize);
|
asymbols = (asymbol **) xmalloc (symsize);
|
symbol_count = bfd_canonicalize_symtab (prog_bfd, asymbols);
|
symbol_count = bfd_canonicalize_symtab (prog_bfd, asymbols);
|
if (symbol_count < 0)
|
if (symbol_count < 0)
|
return 0;
|
return 0;
|
|
|
for (s = 0; s < symbol_count; s++)
|
for (s = 0; s < symbol_count; s++)
|
{
|
{
|
if (!strcmp (asymbols[s]->name, "_fstack"))
|
if (!strcmp (asymbols[s]->name, "_fstack"))
|
return (asymbols[s]->value + 65536) & ~(0xffffUL);
|
return (asymbols[s]->value + 65536) & ~(0xffffUL);
|
}
|
}
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* Handle lm32 specific options. */
|
/* Handle lm32 specific options. */
|
|
|
static SIM_RC
|
static SIM_RC
|
lm32_option_handler (sd, cpu, opt, arg, is_command)
|
lm32_option_handler (sd, cpu, opt, arg, is_command)
|
SIM_DESC sd;
|
SIM_DESC sd;
|
sim_cpu *cpu;
|
sim_cpu *cpu;
|
int opt;
|
int opt;
|
char *arg;
|
char *arg;
|
int is_command;
|
int is_command;
|
{
|
{
|
return SIM_RC_OK;
|
return SIM_RC_OK;
|
}
|
}
|
|
|
/* Create an instance of the simulator. */
|
/* Create an instance of the simulator. */
|
|
|
SIM_DESC
|
SIM_DESC
|
sim_open (kind, callback, abfd, argv)
|
sim_open (kind, callback, abfd, argv)
|
SIM_OPEN_KIND kind;
|
SIM_OPEN_KIND kind;
|
host_callback *callback;
|
host_callback *callback;
|
struct bfd *abfd;
|
struct bfd *abfd;
|
char **argv;
|
char **argv;
|
{
|
{
|
SIM_DESC sd = sim_state_alloc (kind, callback);
|
SIM_DESC sd = sim_state_alloc (kind, callback);
|
char c;
|
char c;
|
int i;
|
int i;
|
unsigned long base, limit;
|
unsigned long base, limit;
|
|
|
/* The cpu data is kept in a separately allocated chunk of memory. */
|
/* The cpu data is kept in a separately allocated chunk of memory. */
|
if (sim_cpu_alloc_all (sd, 1, cgen_cpu_max_extra_bytes ()) != SIM_RC_OK)
|
if (sim_cpu_alloc_all (sd, 1, cgen_cpu_max_extra_bytes ()) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK)
|
if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
sim_add_option_table (sd, NULL, lm32_options);
|
sim_add_option_table (sd, NULL, lm32_options);
|
|
|
/* getopt will print the error message so we just have to exit if this fails.
|
/* getopt will print the error message so we just have to exit if this fails.
|
FIXME: Hmmm... in the case of gdb we need getopt to call
|
FIXME: Hmmm... in the case of gdb we need getopt to call
|
print_filtered. */
|
print_filtered. */
|
if (sim_parse_args (sd, argv) != SIM_RC_OK)
|
if (sim_parse_args (sd, argv) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
#if 0
|
#if 0
|
/* Allocate a handler for I/O devices
|
/* Allocate a handler for I/O devices
|
if no memory for that range has been allocated by the user.
|
if no memory for that range has been allocated by the user.
|
All are allocated in one chunk to keep things from being
|
All are allocated in one chunk to keep things from being
|
unnecessarily complicated. */
|
unnecessarily complicated. */
|
if (sim_core_read_buffer (sd, NULL, read_map, &c, LM32_DEVICE_ADDR, 1) == 0)
|
if (sim_core_read_buffer (sd, NULL, read_map, &c, LM32_DEVICE_ADDR, 1) == 0)
|
sim_core_attach (sd, NULL, 0 /*level */ ,
|
sim_core_attach (sd, NULL, 0 /*level */ ,
|
access_read_write, 0 /*space ??? */ ,
|
access_read_write, 0 /*space ??? */ ,
|
LM32_DEVICE_ADDR, LM32_DEVICE_LEN /*nr_bytes */ ,
|
LM32_DEVICE_ADDR, LM32_DEVICE_LEN /*nr_bytes */ ,
|
0 /*modulo */ ,
|
0 /*modulo */ ,
|
&lm32_devices, NULL /*buffer */ );
|
&lm32_devices, NULL /*buffer */ );
|
#endif
|
#endif
|
|
|
/* check for/establish the reference program image. */
|
/* check for/establish the reference program image. */
|
if (sim_analyze_program (sd,
|
if (sim_analyze_program (sd,
|
(STATE_PROG_ARGV (sd) != NULL
|
(STATE_PROG_ARGV (sd) != NULL
|
? *STATE_PROG_ARGV (sd)
|
? *STATE_PROG_ARGV (sd)
|
: NULL), abfd) != SIM_RC_OK)
|
: NULL), abfd) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* Check to see if memory exists at programs start address. */
|
/* Check to see if memory exists at programs start address. */
|
if (sim_core_read_buffer (sd, NULL, read_map, &c, STATE_START_ADDR (sd), 1)
|
if (sim_core_read_buffer (sd, NULL, read_map, &c, STATE_START_ADDR (sd), 1)
|
== 0)
|
== 0)
|
{
|
{
|
if (STATE_PROG_BFD (sd) != NULL)
|
if (STATE_PROG_BFD (sd) != NULL)
|
{
|
{
|
/* It doesn't, so we should try to allocate enough memory to hold program. */
|
/* It doesn't, so we should try to allocate enough memory to hold program. */
|
base = find_base (STATE_PROG_BFD (sd));
|
base = find_base (STATE_PROG_BFD (sd));
|
limit = find_limit (STATE_PROG_BFD (sd));
|
limit = find_limit (STATE_PROG_BFD (sd));
|
if (limit == 0)
|
if (limit == 0)
|
{
|
{
|
sim_io_eprintf (sd,
|
sim_io_eprintf (sd,
|
"Failed to find symbol _fstack in program. You must specify memory regions with --memory-region.\n");
|
"Failed to find symbol _fstack in program. You must specify memory regions with --memory-region.\n");
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
/*sim_io_printf (sd, "Allocating memory at 0x%x size 0x%x\n", base, limit); */
|
/*sim_io_printf (sd, "Allocating memory at 0x%x size 0x%x\n", base, limit); */
|
sim_do_commandf (sd, "memory region 0x%x,0x%x", base, limit);
|
sim_do_commandf (sd, "memory region 0x%x,0x%x", base, limit);
|
}
|
}
|
}
|
}
|
|
|
/* Establish any remaining configuration options. */
|
/* Establish any remaining configuration options. */
|
if (sim_config (sd) != SIM_RC_OK)
|
if (sim_config (sd) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
if (sim_post_argv_init (sd) != SIM_RC_OK)
|
if (sim_post_argv_init (sd) != SIM_RC_OK)
|
{
|
{
|
free_state (sd);
|
free_state (sd);
|
return 0;
|
return 0;
|
}
|
}
|
|
|
/* Open a copy of the cpu descriptor table. */
|
/* Open a copy of the cpu descriptor table. */
|
{
|
{
|
CGEN_CPU_DESC cd =
|
CGEN_CPU_DESC cd =
|
lm32_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name,
|
lm32_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name,
|
CGEN_ENDIAN_BIG);
|
CGEN_ENDIAN_BIG);
|
for (i = 0; i < MAX_NR_PROCESSORS; ++i)
|
for (i = 0; i < MAX_NR_PROCESSORS; ++i)
|
{
|
{
|
SIM_CPU *cpu = STATE_CPU (sd, i);
|
SIM_CPU *cpu = STATE_CPU (sd, i);
|
CPU_CPU_DESC (cpu) = cd;
|
CPU_CPU_DESC (cpu) = cd;
|
CPU_DISASSEMBLER (cpu) = sim_cgen_disassemble_insn;
|
CPU_DISASSEMBLER (cpu) = sim_cgen_disassemble_insn;
|
}
|
}
|
lm32_cgen_init_dis (cd);
|
lm32_cgen_init_dis (cd);
|
}
|
}
|
|
|
/* Initialize various cgen things not done by common framework.
|
/* Initialize various cgen things not done by common framework.
|
Must be done after lm32_cgen_cpu_open. */
|
Must be done after lm32_cgen_cpu_open. */
|
cgen_init (sd);
|
cgen_init (sd);
|
|
|
/* Store in a global so things like lm32_dump_regs can be invoked
|
/* Store in a global so things like lm32_dump_regs can be invoked
|
from the gdb command line. */
|
from the gdb command line. */
|
current_state = sd;
|
current_state = sd;
|
|
|
return sd;
|
return sd;
|
}
|
}
|
|
|
void
|
void
|
sim_close (sd, quitting)
|
sim_close (sd, quitting)
|
SIM_DESC sd;
|
SIM_DESC sd;
|
int quitting;
|
int quitting;
|
{
|
{
|
lm32_cgen_cpu_close (CPU_CPU_DESC (STATE_CPU (sd, 0)));
|
lm32_cgen_cpu_close (CPU_CPU_DESC (STATE_CPU (sd, 0)));
|
sim_module_uninstall (sd);
|
sim_module_uninstall (sd);
|
}
|
}
|
|
|
SIM_RC
|
SIM_RC
|
sim_create_inferior (sd, abfd, argv, envp)
|
sim_create_inferior (sd, abfd, argv, envp)
|
SIM_DESC sd;
|
SIM_DESC sd;
|
struct bfd *abfd;
|
struct bfd *abfd;
|
char **argv;
|
char **argv;
|
char **envp;
|
char **envp;
|
{
|
{
|
SIM_CPU *current_cpu = STATE_CPU (sd, 0);
|
SIM_CPU *current_cpu = STATE_CPU (sd, 0);
|
SIM_ADDR addr;
|
SIM_ADDR addr;
|
|
|
if (abfd != NULL)
|
if (abfd != NULL)
|
addr = bfd_get_start_address (abfd);
|
addr = bfd_get_start_address (abfd);
|
else
|
else
|
addr = 0;
|
addr = 0;
|
sim_pc_set (current_cpu, addr);
|
sim_pc_set (current_cpu, addr);
|
|
|
#if 0
|
#if 0
|
STATE_ARGV (sd) = sim_copy_argv (argv);
|
STATE_ARGV (sd) = sim_copy_argv (argv);
|
STATE_ENVP (sd) = sim_copy_argv (envp);
|
STATE_ENVP (sd) = sim_copy_argv (envp);
|
#endif
|
#endif
|
|
|
return SIM_RC_OK;
|
return SIM_RC_OK;
|
}
|
}
|
|
|
void
|
void
|
sim_do_command (sd, cmd)
|
sim_do_command (sd, cmd)
|
SIM_DESC sd;
|
SIM_DESC sd;
|
char *cmd;
|
char *cmd;
|
{
|
{
|
if (sim_args_command (sd, cmd) != SIM_RC_OK)
|
if (sim_args_command (sd, cmd) != SIM_RC_OK)
|
sim_io_eprintf (sd, "Unknown command `%s'\n", cmd);
|
sim_io_eprintf (sd, "Unknown command `%s'\n", cmd);
|
}
|
}
|
|
|
