From f6bcefefe817b20b493081511cdeb8f87052bd41 Mon Sep 17 00:00:00 2001 From: Hans-Peter Nilsson Date: Fri, 28 Jan 2005 04:29:00 +0000 Subject: * cris: New directory, simulator for Axis Communications CRIS including CRIS v32, CGEN-based. * configure.ac: Add corresponding configury. * configure: Regenerate. --- sim/cris/sim-if.c | 590 ++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 590 insertions(+) create mode 100644 sim/cris/sim-if.c (limited to 'sim/cris/sim-if.c') diff --git a/sim/cris/sim-if.c b/sim/cris/sim-if.c new file mode 100644 index 0000000..507ba57 --- /dev/null +++ b/sim/cris/sim-if.c @@ -0,0 +1,590 @@ +/* Main simulator entry points specific to the CRIS. + Copyright (C) 2004, 2005 Free Software Foundation, Inc. + Contributed by Axis Communications. + +This file is part of the GNU simulators. + +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 +the Free Software Foundation; either version 2, or (at your option) +any later version. + +This program is distributed in the hope that it will be useful, +but WITHOUT ANY WARRANTY; without even the implied warranty of +MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +GNU General Public License for more details. + +You should have received a copy of the GNU General Public License along +with this program; if not, write to the Free Software Foundation, Inc., +59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ + +/* Based on the fr30 file, mixing in bits from the i960 and pruning of + dead code. */ + +#include "libiberty.h" +#include "bfd.h" + +#include "sim-main.h" +#ifdef HAVE_STDLIB_H +#include +#endif +#include "sim-options.h" +#include "dis-asm.h" + +/* Apparently the autoconf bits are missing (though HAVE_ENVIRON is used + in other dirs; also lacking there). Patch around it for major systems. */ +#if defined (HAVE_ENVIRON) || defined (__GLIBC__) +extern char **environ; +#define GET_ENVIRON() environ +#else +char *missing_environ[] = { "SHELL=/bin/sh", "PATH=/bin:/usr/bin", NULL }; +#define GET_ENVIRON() missing_environ +#endif + +/* AUX vector entries. */ +#define TARGET_AT_NULL 0 +#define TARGET_AT_PHDR 3 +#define TARGET_AT_PHENT 4 +#define TARGET_AT_PHNUM 5 +#define TARGET_AT_PAGESZ 6 +#define TARGET_AT_BASE 7 +#define TARGET_AT_FLAGS 8 +#define TARGET_AT_ENTRY 9 +#define TARGET_AT_UID 11 +#define TARGET_AT_EUID 12 +#define TARGET_AT_GID 13 +#define TARGET_AT_EGID 14 +#define TARGET_AT_HWCAP 16 +#define TARGET_AT_CLKTCK 17 + +/* Used with get_progbounds to find out how much memory is needed for the + program. We don't want to allocate more, since that could mask + invalid memory accesses program bugs. */ +struct progbounds { + USI startmem; + USI endmem; +}; + +static void free_state (SIM_DESC); +static void get_progbounds (bfd *, asection *, void *); +static SIM_RC cris_option_handler (SIM_DESC, sim_cpu *, int, char *, int); + +/* Since we don't build the cgen-opcode table, we use the old + disassembler. */ +static CGEN_DISASSEMBLER cris_disassemble_insn; + +/* By default, we set up stack and environment variables like the Linux + kernel. */ +static char cris_bare_iron = 0; + +/* Whether 0x9000000xx have simulator-specific meanings. */ +static char cris_have_900000xxif = 0; + +/* Records simulator descriptor so utilities like cris_dump_regs can be + called from gdb. */ +SIM_DESC current_state; + +/* CRIS-specific options. */ +typedef enum { + OPTION_CRIS_STATS = OPTION_START, + OPTION_CRIS_TRACE, + OPTION_CRIS_NAKED, + OPTION_CRIS_900000XXIF, +} CRIS_OPTIONS; + +static const OPTION cris_options[] = +{ + { {"cris-cycles", required_argument, NULL, OPTION_CRIS_STATS}, + '\0', "basic|unaligned|schedulable|all", + "Dump execution statistics", + cris_option_handler, NULL }, + { {"cris-trace", required_argument, NULL, OPTION_CRIS_TRACE}, + '\0', "basic", + "Emit trace information while running", + cris_option_handler, NULL }, + { {"cris-naked", no_argument, NULL, OPTION_CRIS_NAKED}, + '\0', NULL, "Don't set up stack and environment", + cris_option_handler, NULL }, + { {"cris-900000xx", no_argument, NULL, OPTION_CRIS_900000XXIF}, + '\0', NULL, "Define addresses at 0x900000xx with simulator semantics", + cris_option_handler, NULL }, + { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL, NULL } +}; + +/* Add the CRIS-specific option list to the simulator. */ + +SIM_RC +cris_option_install (SIM_DESC sd) +{ + SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); + if (sim_add_option_table (sd, NULL, cris_options) != SIM_RC_OK) + return SIM_RC_FAIL; + return SIM_RC_OK; +} + +/* Handle CRIS-specific options. */ + +static SIM_RC +cris_option_handler (SIM_DESC sd, sim_cpu *cpu ATTRIBUTE_UNUSED, int opt, + char *arg, int is_command ATTRIBUTE_UNUSED) +{ + /* The options are CRIS-specific, but cpu-specific option-handling is + broken; required to being with "--cpu0-". We store the flags in an + unused field in the global state structure and move the flags over + to the module-specific CPU data when we store things in the + cpu-specific structure. */ + char *tracefp = STATE_TRACE_FLAGS (sd); + + switch ((CRIS_OPTIONS) opt) + { + case OPTION_CRIS_STATS: + if (strcmp (arg, "basic") == 0) + *tracefp = FLAG_CRIS_MISC_PROFILE_SIMPLE; + else if (strcmp (arg, "unaligned") == 0) + *tracefp + = (FLAG_CRIS_MISC_PROFILE_UNALIGNED + | FLAG_CRIS_MISC_PROFILE_SIMPLE); + else if (strcmp (arg, "schedulable") == 0) + *tracefp + = (FLAG_CRIS_MISC_PROFILE_SCHEDULABLE + | FLAG_CRIS_MISC_PROFILE_SIMPLE); + else if (strcmp (arg, "all") == 0) + *tracefp = FLAG_CRIS_MISC_PROFILE_ALL; + else + { + /* We'll actually never get here; the caller handles the + error case. */ + sim_io_eprintf (sd, "Unknown option `--cris-stats=%s'\n", arg); + return SIM_RC_FAIL; + } + break; + + case OPTION_CRIS_TRACE: + if (strcmp (arg, "basic") == 0) + *tracefp |= FLAG_CRIS_MISC_PROFILE_XSIM_TRACE; + else + { + sim_io_eprintf (sd, "Unknown option `--cris-trace=%s'\n", arg); + return SIM_RC_FAIL; + } + break; + + case OPTION_CRIS_NAKED: + cris_bare_iron = 1; + break; + + case OPTION_CRIS_900000XXIF: + cris_have_900000xxif = 1; + break; + + default: + /* We'll actually never get here; the caller handles the error + case. */ + sim_io_eprintf (sd, "Unknown option `%s'\n", arg); + return SIM_RC_FAIL; + } + + /* Imply --profile-model=on. */ + return sim_profile_set_option (sd, "-model", PROFILE_MODEL_IDX, "on"); +} + +/* Cover function of sim_state_free to free the cpu buffers as well. */ + +static void +free_state (SIM_DESC sd) +{ + if (STATE_MODULES (sd) != NULL) + sim_module_uninstall (sd); + sim_cpu_free_all (sd); + sim_state_free (sd); +} + +/* BFD section iterator to find the highest allocated section address + (plus one). If we could, we should use the program header table + instead, but we can't get to that using bfd. */ + +void +get_progbounds (bfd *abfd ATTRIBUTE_UNUSED, asection *s, void *vp) +{ + struct progbounds *pbp = (struct progbounds *) vp; + + if ((bfd_get_section_flags (abfd, s) & SEC_ALLOC)) + { + bfd_size_type sec_size = bfd_get_section_size (s); + bfd_size_type sec_start = bfd_get_section_vma (abfd, s); + bfd_size_type sec_end = sec_start + sec_size; + + if (sec_end > pbp->endmem) + pbp->endmem = sec_end; + + if (sec_start < pbp->startmem) + pbp->startmem = sec_start; + } +} + +/* Create an instance of the simulator. */ + +SIM_DESC +sim_open (SIM_OPEN_KIND kind, host_callback *callback, struct bfd *abfd, + char **argv) +{ + char c; + int i; + USI startmem = 0; + USI endmem = CRIS_DEFAULT_MEM_SIZE; + USI endbrk = endmem; + USI stack_low = 0; + SIM_DESC sd = sim_state_alloc (kind, callback); + + /* Can't initialize to "" below. It's either a GCC bug in old + releases (up to and including 2.95.3 (.4 in debian) or a bug in the + standard ;-) that the rest of the elements won't be initialized. */ + bfd_byte sp_init[4] = {0, 0, 0, 0}; + + /* 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) + { + free_state (sd); + return 0; + } + + if (sim_pre_argv_init (sd, argv[0]) != SIM_RC_OK) + { + free_state (sd); + return 0; + } + + /* 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 + print_filtered. */ + if (sim_parse_args (sd, argv) != SIM_RC_OK) + { + free_state (sd); + return 0; + } + + /* If we have a binary program, endianness-setting would not be taken + from elsewhere unfortunately, so set it here. At the time of this + writing, it isn't used until sim_config, but that might change so + set it here before memory is defined or touched. */ + current_target_byte_order = LITTLE_ENDIAN; + + /* check for/establish the reference program image */ + if (sim_analyze_program (sd, + (STATE_PROG_ARGV (sd) != NULL + ? *STATE_PROG_ARGV (sd) + : NULL), + abfd) != SIM_RC_OK) + { + free_state (sd); + return 0; + } + + /* For CRIS simulator-specific use, we need to find out the bounds of + the program as well, which is not done by sim_analyze_program + above. */ + if (STATE_PROG_BFD (sd)) + { + struct progbounds pb; + + /* The sections should now be accessible using bfd functions. */ + pb.startmem = 0x7fffffff; + pb.endmem = 0; + bfd_map_over_sections (STATE_PROG_BFD (sd), get_progbounds, &pb); + + /* We align the area that the program uses to page boundaries. */ + startmem = pb.startmem & ~8191; + endbrk = pb.endmem; + endmem = (endbrk + 8191) & ~8191; + } + + /* Find out how much room is needed for the environment and argv, create + that memory and fill it. Only do this when there's a program + specified. */ + if (STATE_PROG_BFD (sd) && !cris_bare_iron) + { + char *name = bfd_get_filename (STATE_PROG_BFD (sd)); + char **my_environ = GET_ENVIRON (); + /* We use these maps to give the same behavior as the old xsim + simulator. */ + USI envtop = 0x40000000; + USI stacktop = 0x3e000000; + USI envstart; + int envc; + int len = strlen (name) + 1; + USI epp, epp0; + USI stacklen; + int i; + char **prog_argv = STATE_PROG_ARGV (sd); + int my_argc = 0; + /* All CPU:s have the same memory map, apparently. */ + SIM_CPU *cpu = STATE_CPU (sd, 0); + USI csp; + bfd_byte buf[4]; + + /* Count in the environment as well. */ + for (envc = 0; my_environ[envc] != NULL; envc++) + len += strlen (my_environ[envc]) + 1; + + for (i = 0; prog_argv[i] != NULL; my_argc++, i++) + len += strlen (prog_argv[i]) + 1; + + envstart = (envtop - len) & ~8191; + + /* Create read-only block for the environment strings. */ + sim_core_attach (sd, NULL, 0, access_read, 0, + envstart, (len + 8191) & ~8191, + 0, NULL, NULL); + + /* This shouldn't happen. */ + if (envstart < stacktop) + stacktop = envstart - 64 * 8192; + + csp = stacktop; + + /* Note that the linux kernel does not correctly compute the storage + needs for the static-exe AUX vector. */ + csp -= 4 * 4 * 2; + + csp -= (envc + 1) * 4; + csp -= (my_argc + 1) * 4; + csp -= 4; + + /* Write the target representation of the start-up-value for the + stack-pointer suitable for register initialization below. */ + bfd_putl32 (csp, sp_init); + + /* If we make this 1M higher; say 8192*1024, we have to take + special precautions for pthreads, because pthreads assumes that + the memory that low isn't mmapped, and that it can mmap it + without fallback in case of failure (and we fail ungracefully + long before *that*: the memory isn't accounted for in our mmap + list). */ + stack_low = (csp - (7168*1024)) & ~8191; + + stacklen = stacktop - stack_low; + + /* Tee hee, we have an executable stack. Well, it's necessary to + test GCC trampolines... */ + sim_core_attach (sd, NULL, 0, access_read_write_exec, 0, + stack_low, stacklen, + 0, NULL, NULL); + + epp = epp0 = envstart; + + /* Can't use sim_core_write_unaligned_4 without everything + initialized when tracing, and then these writes would get into + the trace. */ +#define write_dword(addr, data) \ + do \ + { \ + USI data_ = data; \ + USI addr_ = addr; \ + bfd_putl32 (data_, buf); \ + if (sim_core_write_buffer (sd, cpu, 0, buf, addr_, 4) != 4) \ + goto abandon_chip; \ + } \ + while (0) + + write_dword (csp, my_argc); + csp += 4; + + for (i = 0; i < my_argc; i++, csp += 4) + { + size_t strln = strlen (prog_argv[i]) + 1; + + if (sim_core_write_buffer (sd, cpu, 0, prog_argv[i], epp, strln) + != strln) + goto abandon_chip; + + write_dword (csp, envstart + epp - epp0); + epp += strln; + } + + write_dword (csp, 0); + csp += 4; + + for (i = 0; i < envc; i++, csp += 4) + { + unsigned int strln = strlen (my_environ[i]) + 1; + + if (sim_core_write_buffer (sd, cpu, 0, my_environ[i], epp, strln) + != strln) + goto abandon_chip; + + write_dword (csp, envstart + epp - epp0); + epp += strln; + } + + write_dword (csp, 0); + csp += 4; + +#define NEW_AUX_ENT(nr, id, val) \ + do \ + { \ + write_dword (csp + (nr) * 4 * 2, (id)); \ + write_dword (csp + (nr) * 4 * 2 + 4, (val)); \ + } \ + while (0) + + /* Note that there are some extra AUX entries for a dynlinked + program loaded image. */ + + /* AUX entries always present. */ + NEW_AUX_ENT (0, TARGET_AT_HWCAP, 0); + NEW_AUX_ENT (1, TARGET_AT_PAGESZ, 8192); + NEW_AUX_ENT (2, TARGET_AT_CLKTCK, 100); + + csp += 4 * 2 * 3; + NEW_AUX_ENT (0, TARGET_AT_NULL, 0); +#undef NEW_AUX_ENT + + /* Register R10 should hold 0 at static start (no initfunc), but + that's the default, so don't bother. */ + } + + /* Allocate core managed memory if none specified by user. */ + if (sim_core_read_buffer (sd, NULL, read_map, &c, startmem, 1) == 0) + sim_do_commandf (sd, "memory region 0x%lx,0x%lx", startmem, + endmem - startmem); + + /* Allocate simulator I/O managed memory if none specified by user. */ + if (cris_have_900000xxif) + { + if (sim_core_read_buffer (sd, NULL, read_map, &c, 0x90000000, 1) == 0) + sim_core_attach (sd, NULL, 0, access_write, 0, 0x90000000, 0x100, + 0, &cris_devices, NULL); + else + { + (*callback-> + printf_filtered) (callback, + "Seeing --cris-900000xx with memory defined there\n"); + goto abandon_chip; + } + } + + /* Establish any remaining configuration options. */ + if (sim_config (sd) != SIM_RC_OK) + { + abandon_chip: + free_state (sd); + return 0; + } + + if (sim_post_argv_init (sd) != SIM_RC_OK) + { + free_state (sd); + return 0; + } + + /* Open a copy of the cpu descriptor table. */ + { + CGEN_CPU_DESC cd = cris_cgen_cpu_open_1 (STATE_ARCHITECTURE (sd)->printable_name, + CGEN_ENDIAN_LITTLE); + for (i = 0; i < MAX_NR_PROCESSORS; ++i) + { + SIM_CPU *cpu = STATE_CPU (sd, i); + CPU_CPU_DESC (cpu) = cd; + CPU_DISASSEMBLER (cpu) = cris_disassemble_insn; + + /* See cris_option_handler for the reason why this is needed. */ + CPU_CRIS_MISC_PROFILE (cpu)->flags = STATE_TRACE_FLAGS (sd)[0]; + + /* Set SP to the stack we allocated above. */ + (* CPU_REG_STORE (cpu)) (cpu, H_GR_SP, (char *) sp_init, 4); + + /* Set the simulator environment data. */ + cpu->highest_mmapped_page = NULL; + cpu->endmem = endmem; + cpu->endbrk = endbrk; + cpu->stack_low = stack_low; + cpu->syscalls = 0; + cpu->m1threads = 0; + cpu->threadno = 0; + cpu->max_threadid = 0; + cpu->thread_data = NULL; + memset (cpu->sighandler, 0, sizeof (cpu->sighandler)); + cpu->make_thread_cpu_data = NULL; + cpu->thread_cpu_data_size = 0; + } + } + + /* Initialize various cgen things not done by common framework. + Must be done after cris_cgen_cpu_open. */ + cgen_init (sd); + + /* Store in a global so things like cris_dump_regs can be invoked + from the gdb command line. */ + current_state = sd; + + cris_set_callbacks (callback); + + return sd; +} + +void +sim_close (SIM_DESC sd, int quitting ATTRIBUTE_UNUSED) +{ + cris_cgen_cpu_close (CPU_CPU_DESC (STATE_CPU (sd, 0))); + sim_module_uninstall (sd); +} + +SIM_RC +sim_create_inferior (SIM_DESC sd, struct bfd *abfd, + char **argv ATTRIBUTE_UNUSED, + char **envp ATTRIBUTE_UNUSED) +{ + SIM_CPU *current_cpu = STATE_CPU (sd, 0); + SIM_ADDR addr; + + if (abfd != NULL) + addr = bfd_get_start_address (abfd); + else + addr = 0; + sim_pc_set (current_cpu, addr); + + /* Other simulators have #if 0:d code that says + STATE_ARGV (sd) = sim_copy_argv (argv); + STATE_ENVP (sd) = sim_copy_argv (envp); + Enabling that gives you not-found link-errors for sim_copy_argv. + FIXME: Do archaeology to find out more. */ + + return SIM_RC_OK; +} + +void +sim_do_command (SIM_DESC sd, char *cmd) +{ + if (sim_args_command (sd, cmd) != SIM_RC_OK) + sim_io_eprintf (sd, "Unknown command `%s'\n", cmd); +} + +/* Disassemble an instruction. */ + +static void +cris_disassemble_insn (SIM_CPU *cpu, + const CGEN_INSN *insn ATTRIBUTE_UNUSED, + const ARGBUF *abuf ATTRIBUTE_UNUSED, + IADDR pc, char *buf) +{ + disassembler_ftype pinsn; + struct disassemble_info disasm_info; + SFILE sfile; + SIM_DESC sd = CPU_STATE (cpu); + + sfile.buffer = sfile.current = buf; + INIT_DISASSEMBLE_INFO (disasm_info, (FILE *) &sfile, + (fprintf_ftype) sim_disasm_sprintf); + disasm_info.endian = + (bfd_big_endian (STATE_PROG_BFD (sd)) ? BFD_ENDIAN_BIG + : bfd_little_endian (STATE_PROG_BFD (sd)) ? BFD_ENDIAN_LITTLE + : BFD_ENDIAN_UNKNOWN); + /* We live with the cast until the prototype is fixed, or else we get a + warning because the functions differ in the signedness of one parameter. */ + disasm_info.read_memory_func = + sim_disasm_read_memory; + disasm_info.memory_error_func = sim_disasm_perror_memory; + disasm_info.application_data = (PTR) cpu; + pinsn = cris_get_disassembler (STATE_PROG_BFD (sd)); + (*pinsn) (pc, &disasm_info); +} -- cgit v1.1