Subversion Repositories openrisc_2011-10-31

/* GDB Simulator wrapper for Or1ksim, the OpenRISC architectural simulator

   Copyright 1988-2008, Free Software Foundation, Inc.

   Copyright (C) 2010 Embecosm Limited

   Contributor Jeremy Bennett <jeremy.bennett@embecosm.com>

   This file is part of GDB.

   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 3 of the License, 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, see <http://www.gnu.org/licenses/>.  */

/*---------------------------------------------------------------------------*/

/* This is a wrapper for Or1ksim, suitable for use as a GDB simulator.

   The code tries to follow the GDB coding style.

   Commenting is Doxygen compatible.                                         */

/*---------------------------------------------------------------------------*/

#include <errno.h>

#include <stdlib.h>

#include <stdio.h>

#include <signal.h>

#include <sys/socket.h>

#include <sys/types.h>

#include <sys/un.h>

#include <unistd.h>

#include "ansidecl.h"

#include "gdb/callback.h"

#include "gdb/remote-sim.h"

#include "sim-utils.h"

#include "targ-vals.h"

#include "or1ksim.h"

#include "or32sim.h"

/*!A global record of the simulator description */

static SIM_DESC  global_sd = NULL;

/*!The last reason we stopped */

enum sim_stop  last_reason = sim_running;

/*!The last return code from a resume/step call */

static unsigned long int  last_rc = 0;

/* ------------------------------------------------------------------------- */

/*!Create a fully initialized simulator instance.

   This function is called when the simulator is selected from the gdb command

   line.

   While the simulator configuration can be parameterized by (in decreasing

   precedence) argv's SIM-OPTION, argv's TARGET-PROGRAM and the abfd argument,

   the successful creation of the simulator shall not dependent on the

   presence of any of these arguments/options.

   For a hardware simulator the created simulator shall be sufficiently

   initialized to handle, without restrictions any client requests (including

   memory reads/writes, register fetch/stores and a resume).

   For a process simulator, the process is not created until a call to

   sim_create_inferior.

   This function creates a socket pair, which will be used to communicate to

   and from the process model, then forks off a process to run the SystemC

   model. Communication is via RSP packets across the socket pair, but with

   simplified hand-shaking.

   @note We seem to capable of being called twice. We use the static

         "global_sd" variable to keep track of this. Second and subsequent

         calls do nothing, but return the previously opened simulator

         description.

   @param[in] kind  Specifies how the simulator shall be used.  Currently

                    there are only two kinds: stand-alone and debug.

   @param[in] callback  Specifies a standard host callback (defined in

                        callback.h).

   @param[in] abfd      When non NULL, designates a target program.  The

                        program is not loaded.

   @param[in] argv      A standard ARGV pointer such as that passed from the

                        command line.  The syntax of the argument list is is

                        assumed to be ``SIM-PROG { SIM-OPTION } [

                        TARGET-PROGRAM { TARGET-OPTION } ]''.

                        The trailing TARGET-PROGRAM and args are only valid

                        for a stand-alone simulator.

                        The argument list is null terminated!

   @return On success, the result is a non NULL descriptor that shall be

           passed to the other sim_foo functions.                            */

/* ------------------------------------------------------------------------- */

SIM_DESC

sim_open (SIM_OPEN_KIND                kind,

          struct host_callback_struct *callback,

          struct bfd                  *abfd,

          char                        *argv[])

{

  int   argc;

  char *config_file;

  char *image_file;

  /* If the global_sd is currently set, we just return it. */

  if (NULL != global_sd)

    {

      return  global_sd;

    }

  /* Eventually we should use the option parser built into the GDB simulator

     (see common/sim-options.h). However since this is minimally documented,

     and we have only the one option, for now we do it ourselves. */

  /* Count the number of arguments */

  for (argc = 0; NULL != argv[argc]; argc++)

    {

      /* printf ("argv[%d] = %s\n", argc, argv[argc]); */

    }

  /* Configuration file may be passed using the -f <filename> */

  if ((argc > 2) && (0 == strcmp (argv[1], "-f")))

    {

      config_file = argv[2];

      image_file  = argc > 3 ? argv[3] : NULL;

    }

  else

    {

      config_file = NULL;

      image_file  = argc > 1 ? argv[1] : NULL;

    }

  /* Initialize the simulator. No class image nor upcalls */

  if (0 == or1ksim_init (config_file, image_file, NULL, NULL, NULL))

    {

      global_sd = (SIM_DESC) malloc (sizeof (*global_sd));

      global_sd->callback = callback;

      global_sd->is_debug = (kind == SIM_OPEN_DEBUG);

      global_sd->myname   = (char *)xstrdup (argv[0]);

    }

  return  global_sd;

}       /* sim_open () */

/* ------------------------------------------------------------------------- */

/*!Destroy a simulator instance.

   This may involve freeing target memory and closing any open files and

   mmap'd areas.

   We cannot assume sim_kill () has already been called.

   @param[in] sd        Simulation descriptor from sim_open ().

   @param[in] quitting  Non-zero if we cannot hang on errors.                */

/* ------------------------------------------------------------------------- */

void

sim_close (SIM_DESC  sd,

           int       quitting)

{

  if (NULL != sd)

    {

      free (sd->myname);

      free (sd);

    }

}       /* sim_close () */

/* ------------------------------------------------------------------------- */

/*!Load program PROG into the simulators memory.

   Hardware simulator: Normally, each program section is written into

   memory according to that sections LMA using physical (direct)

   addressing.  The exception being systems, such as PPC/CHRP, which

   support more complicated program loaders.  A call to this function

   should not effect the state of the processor registers.  Multiple

   calls to this function are permitted and have an accumulative

   effect.

   Process simulator: Calls to this function may be ignored.

   @todo Most hardware simulators load the image at the VMA using

         virtual addressing.

   @todo For some hardware targets, before a loaded program can be executed,

         it requires the manipulation of VM registers and tables.  Such

         manipulation should probably (?) occure in sim_create_inferior ().

   @param[in] sd        Simulation descriptor from sim_open ().

   @param[in] prog      The name of the program

   @param[in] abfd      If non-NULL, the BFD for the file has already been

                        opened.

   @param[in] from_tty  Not sure what this does. Probably indicates this is a

                        command line load? Anyway we don't use it.

   @return  A return code indicating success.                                */

/* ------------------------------------------------------------------------- */

SIM_RC

sim_load (SIM_DESC    sd,

          char       *prog,

          struct bfd *abfd,

          int         from_tty)

{

  bfd *prog_bfd;

  /* Use the built in loader, which will in turn use our write function. */

  prog_bfd = sim_load_file (sd, sd->myname, sd->callback, prog, abfd,

                            sd->is_debug, 0, sim_write);

  if (NULL == prog_bfd)

    {

      return SIM_RC_FAIL;

    }

  /* If the BFD was not already open, then close the loaded program. */

  if (NULL == abfd)

    {

      bfd_close (prog_bfd);

    }

  return  SIM_RC_OK;

}       /* sim_load () */

/* ------------------------------------------------------------------------- */

/*!Prepare to run the simulated program.

   Hardware simulator: This function shall initialize the processor

   registers to a known value.  The program counter and possibly stack

   pointer shall be set using information obtained from ABFD (or

   hardware reset defaults).  ARGV and ENV, dependant on the target

   ABI, may be written to memory.

   Process simulator: After a call to this function, a new process

   instance shall exist. The TEXT, DATA, BSS and stack regions shall

   all be initialized, ARGV and ENV shall be written to process

   address space (according to the applicable ABI) and the program

   counter and stack pointer set accordingly.

   ABFD, if not NULL, provides initial processor state information.

   ARGV and ENV, if non NULL, are NULL terminated lists of pointers.

   @param[in] sd    Simulation descriptor from sim_open ().

   @param[in] abfd  If non-NULL provides initial processor state information.

   @param[in] argv  Vector of arguments to the program. We don't use this

   @param[in] env   Vector of environment data. We don't use this.

   @return  A return code indicating success.                                */

/* ------------------------------------------------------------------------- */

SIM_RC

sim_create_inferior (SIM_DESC     sd,

                     struct bfd  *abfd,

                     char       **argv  ATTRIBUTE_UNUSED,

                     char       **env   ATTRIBUTE_UNUSED)

{

  /* We set the starting PC if we have that data */

  unsigned long int  pc     = (NULL == abfd) ? 0 : bfd_get_start_address (abfd);

  unsigned char     *pc_ptr = (unsigned char *)(&pc);

  sim_store_register (sd, OR32_NPC_REGNUM, pc_ptr, sizeof (pc));

  return  SIM_RC_OK;

}       /* sim_create_inferior () */

/* ------------------------------------------------------------------------- */

/*!Fetch bytes from the simulated program's memory.

   @param[in]  sd   Simulation descriptor from sim_open (). We don't use

                    this.

   @param[in]  mem  The address in memory to fetch from.

   @param[out] buf  Where to put the read data

   @param[in]  len  Number of bytes to fetch

   @return  Number of bytes read, or zero if error.                          */

/* ------------------------------------------------------------------------- */

int

sim_read (SIM_DESC       sd  ATTRIBUTE_UNUSED,

          SIM_ADDR       mem,

          unsigned char *buf,

          int            len)

{

  return  or1ksim_read_mem (buf, (unsigned int) mem, len);

}      /* sim_read () */

/* ------------------------------------------------------------------------- */

/*!Store bytes to the simulated program's memory.

   @param[in] sd   Simulation descriptor from sim_open (). We don't use

                   this.

   @param[in] mem  The address in memory to write to.

   @param[in] buf  The data to write

   @param[in] len  Number of bytes to write

   @return  Number of byte written, or zero if error.                        */

/* ------------------------------------------------------------------------- */

int

sim_write (SIM_DESC       sd  ATTRIBUTE_UNUSED,

           SIM_ADDR       mem,

           unsigned char *buf,

           int            len)

{

  return  or1ksim_write_mem (buf, (unsigned int) mem, len);

}       /* sim_write () */

/* ------------------------------------------------------------------------- */

/*!Fetch a register from the simulation

   @param[in]  sd     Simulation descriptor from sim_open (). We don't use

                      this.

   @param[in]  regno  The register to fetch

   @param[out] buf    Buffer of length bytes to store the result. Data is

                      only transferred if length matches the register length

                      (the actual register size is still returned).

   @param[in]  len    Size of buf, which should match the size of the

                      register.

   @return  The actual size of the register, or zero if regno is not

            applicable. Legacy implementations return -1.

/* ------------------------------------------------------------------------- */

int

sim_fetch_register (SIM_DESC       sd  ATTRIBUTE_UNUSED,

                    int            regno,

                    unsigned char *buf,

                    int            len)

{

  return  or1ksim_read_reg (buf, regno, len);

}       /* sim_fetch_register () */

/* ------------------------------------------------------------------------- */

/*!Store a register to the simulation

   @param[in] sd     Simulation descriptor from sim_open (). We don't use

                     this.

   @param[in] regno  The register to store

   @param[in] buf    Buffer of length bytes with the data to store. Data is

                     only transferred if length matches the register length

                     (the actual register size is still returned).

   @param[in] len    Size of buf, which should match the size of the

                     register.

   @return  The actual size of the register, or zero if regno is not

            applicable. Legacy implementations return -1.

/* ------------------------------------------------------------------------- */

int

sim_store_register (SIM_DESC       sd  ATTRIBUTE_UNUSED,

                    int            regno,

                    unsigned char *buf,

                    int            len)

{

  return  or1ksim_write_reg (buf, regno, len);

}       /* sim_store_register () */

/* ------------------------------------------------------------------------- */

/* Print whatever statistics the simulator has collected.

   @param[in] sd       Simulation descriptor from sim_open (). We don't use

                       this.

   @param[in] verbose  Currently unused, and should always be zero.          */

/* ------------------------------------------------------------------------- */

void

sim_info (SIM_DESC  sd       ATTRIBUTE_UNUSED,

          int       verbose  ATTRIBUTE_UNUSED)

{

}       /* sim_info () */

/* ------------------------------------------------------------------------- */

/*!Run (or resume) the simulated program.

   Hardware simulator: If the SIGRC value returned by

   sim_stop_reason() is passed back to the simulator via siggnal then

   the hardware simulator shall correctly deliver the hardware event

   indicated by that signal.  If a value of zero is passed in then the

   simulation will continue as if there were no outstanding signal.

   The effect of any other siggnal value is is implementation

   dependant.

   Process simulator: If SIGRC is non-zero then the corresponding

   signal is delivered to the simulated program and execution is then

   continued.  A zero SIGRC value indicates that the program should

   continue as normal.

   @param[in] sd       Simulation descriptor from sim_open ().

   @param[in] step     When non-zero indicates that only a single simulator

                       cycle should be emulated.

   @param[in] siggnal  If non-zero is a (HOST) SIGRC value indicating the type

                       of event (hardware interrupt, signal) to be delivered

                       to the simulated program.                             */

/* ------------------------------------------------------------------------- */

void

sim_resume (SIM_DESC  sd,

            int       step,

            int       siggnal)

{

  int  res;

  res = step ? or1ksim_step () : or1ksim_run (-1.0);

  switch (res)

    {

    case OR1KSIM_RC_HALTED:

      last_reason = sim_exited;

      (void) sim_fetch_register (sd, OR32_FIRST_ARG_REGNUM,

                                 (unsigned char *) &last_rc, 4);

      break;

    case OR1KSIM_RC_BRKPT:

      last_reason = sim_stopped;

      last_rc     = TARGET_SIGNAL_TRAP;

      break;

    }

}       /* sim_resume () */

/* ------------------------------------------------------------------------- */

/*!Asynchronous request to stop the simulation.

   @param[in] sd  Simulation descriptor from sim_open (). We don't use this.

   @return  Non-zero indicates that the simulator is able to handle the

            request.                                                         */

/* ------------------------------------------------------------------------- */

int sim_stop (SIM_DESC  sd  ATTRIBUTE_UNUSED)

{

  return  0;                     /* We don't support this */

}       /* sim_stop () */

/* ------------------------------------------------------------------------- */

/*!Fetch the REASON why the program stopped.

   The reason enumeration indicates why:

   - sim_exited:    The program has terminated. sigrc indicates the target

                    dependant exit status.

   - sim_stopped:   The program has stopped.  sigrc uses the host's signal

                    numbering as a way of identifying the reaon: program

                    interrupted by user via a sim_stop request (SIGINT); a

                    breakpoint instruction (SIGTRAP); a completed single step

                    (SIGTRAP); an internal error condition (SIGABRT); an

                    illegal instruction (SIGILL); Access to an undefined

                    memory region (SIGSEGV); Mis-aligned memory access

                    (SIGBUS).

                    For some signals information in addition to the signal

                    number may be retained by the simulator (e.g. offending

                    address), that information is not directly accessable via

                    this interface.

   - sim_signalled: The program has been terminated by a signal. The

                    simulator has encountered target code that causes the the

                    program to exit with signal sigrc.

   - sim_running:

   - sim_polling:   The return of one of these values indicates a problem

                    internal to the simulator.

   @param[in]  sd      Simulation descriptor from sim_open (). We don't use

                       this.

   @param[out] reason  The reason for stopping

   @param[out] sigrc   Supplementary information for some values of reason.  */

/* ------------------------------------------------------------------------- */

void

sim_stop_reason (SIM_DESC       sd      ATTRIBUTE_UNUSED,

                 enum sim_stop *reason,

                 int           *sigrc)

 {

   *reason = last_reason;

   *sigrc  = last_rc;

}       /* sim_stop_reason () */

/* ------------------------------------------------------------------------- */

/* Passthru for other commands that the simulator might support.

   Simulators should be prepared to deal with any combination of NULL

   or empty command.

   This implementation currently does nothing.

   @param[in] sd  Simulation descriptor from sim_open (). We don't use this.

   @param[in] cmd The command to pass through.                               */

/* ------------------------------------------------------------------------- */

void

sim_do_command (SIM_DESC  sd   ATTRIBUTE_UNUSED,

                char     *cmd  ATTRIBUTE_UNUSED)

{

}       /* sim_do_command () */

/* ------------------------------------------------------------------------- */

/* Set the default host_callback_struct

   @note Deprecated, but implemented, since it is still required for linking.

   This implementation currently does nothing.

   @param[in] ptr  The host_callback_struct pointer. Unused here.            */

/* ------------------------------------------------------------------------- */

void

sim_set_callbacks (struct host_callback_struct *ptr ATTRIBUTE_UNUSED)

{

}       /* sim_set_callbacks () */

/* ------------------------------------------------------------------------- */

/* Set the size of the simulator memory array.

   @note Deprecated, but implemented, since it is still required for linking.

   This implementation currently does nothing.

   @param[in] size  The memory size to use. Unused here.                     */

/* ------------------------------------------------------------------------- */

void

sim_size (int  size  ATTRIBUTE_UNUSED)

{

}       /* sim_size () */

/* ------------------------------------------------------------------------- */

/* Single step the simulator with tracing enabled.

   @note Deprecated, but implemented, since it is still required for linking.

   This implementation currently does nothing.

   @param[in] sd  The simulator description struct. Unused here.             */

/* ------------------------------------------------------------------------- */

void

sim_trace (SIM_DESC  sd  ATTRIBUTE_UNUSED)

{

}       /* sim_trace () */