binutils: support for the SPARC M8 processor
[deliverable/binutils-gdb.git] / sim / common / sim-utils.c
index 8327c5eb899a03ca07a4d2dd0df3efc2364b7e95..7f385a5463d7db9e4058b6e914d750f7b0de82fd 100644 (file)
@@ -1,22 +1,21 @@
 /* Miscellaneous simulator utilities.
-   Copyright (C) 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1997-2017 Free Software Foundation, Inc.
    Contributed by Cygnus Support.
 
 This file is part of GDB, the GNU debugger.
 
 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.
+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, write to the Free Software Foundation, Inc.,
-59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.  */
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 #include "sim-main.h"
 #include "sim-assert.h"
@@ -49,25 +48,13 @@ with this program; if not, write to the Free Software Foundation, Inc.,
 #include "bfd.h"
 #include "sim-utils.h"
 
-/* Global pointer to all state data.
-   Set by sim_resume.  */
-struct sim_state *current_state;
-
-/* Allocate zero filled memory with xmalloc - xmalloc aborts of the
+/* Allocate zero filled memory with xcalloc - xcalloc aborts if the
    allocation fails.  */
 
 void *
 zalloc (unsigned long size)
 {
-  void *memory = (void *) xmalloc (size);
-  memset (memory, 0, size);
-  return memory;
-}
-
-void
-zfree (void *data)
-{
-  free (data);
+  return xcalloc (1, size);
 }
 
 /* Allocate a sim_state struct.  */
@@ -92,9 +79,13 @@ sim_state_alloc (SIM_OPEN_KIND kind,
        Implementing this is trickier as one may not know what to allocate until
        one has parsed the args.  Parsing the args twice wouldn't be unreasonable,
        IMHO.  If the state struct ever does contain an array of pointers then we
-       can't do this here.  */
+       can't do this here.
+       ??? See also sim_post_argv_init*/
     for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++)
-      CPU_STATE (STATE_CPU (sd, cpu_nr)) = sd;
+      {
+       CPU_STATE (STATE_CPU (sd, cpu_nr)) = sd;
+       CPU_INDEX (STATE_CPU (sd, cpu_nr)) = cpu_nr;
+      }
   }
 #endif
 
@@ -110,13 +101,13 @@ sim_state_alloc (SIM_OPEN_KIND kind,
 void
 sim_state_free (SIM_DESC sd)
 {
-  ASSERT (sd->base.magic == SIM_MAGIC_NUMBER);
+  ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
 
 #ifdef SIM_STATE_FREE
   SIM_STATE_FREE (sd);
 #endif
 
-  zfree (sd);
+  free (sd);
 }
 
 /* Return a pointer to the cpu data for CPU_NAME, or NULL if not found.  */
@@ -132,6 +123,47 @@ sim_cpu_lookup (SIM_DESC sd, const char *cpu_name)
   return NULL;
 }
 
+/* Return the prefix to use for a CPU specific message (typically an
+   error message).  */
+
+const char *
+sim_cpu_msg_prefix (sim_cpu *cpu)
+{
+#if MAX_NR_PROCESSORS == 1
+  return "";
+#else
+  static char *prefix;
+
+  if (prefix == NULL)
+    {
+      int maxlen = 0;
+      for (i = 0; i < MAX_NR_PROCESSORS; ++i)
+       {
+         int len = strlen (CPU_NAME (STATE_CPU (sd, i)));
+         if (len > maxlen)
+           maxlen = len;
+       }
+      prefix = (char *) xmalloc (maxlen + 5);
+    }
+  sprintf (prefix, "%s: ", CPU_NAME (cpu));
+  return prefix;
+#endif
+}
+
+/* Cover fn to sim_io_eprintf.  */
+
+void
+sim_io_eprintf_cpu (sim_cpu *cpu, const char *fmt, ...)
+{
+  SIM_DESC sd = CPU_STATE (cpu);
+  va_list ap;
+
+  va_start (ap, fmt);
+  sim_io_eprintf (sd, "%s", sim_cpu_msg_prefix (cpu));
+  sim_io_evprintf (sd, fmt, ap);
+  va_end (ap);
+}
+
 /* Turn VALUE into a string with commas.  */
 
 char *
@@ -154,14 +186,28 @@ sim_add_commas (char *buf, int sizeof_buf, unsigned long value)
   return endbuf;
 }
 
-/* Analyze a prog_name/prog_bfd and set various fields in the state
-   struct.  */
+/* Analyze PROG_NAME/PROG_BFD and set these fields in the state struct:
+   STATE_ARCHITECTURE, if not set already and can be determined from the bfd
+   STATE_PROG_BFD
+   STATE_START_ADDR
+   STATE_TEXT_SECTION
+   STATE_TEXT_START
+   STATE_TEXT_END
+
+   PROG_NAME is the file name of the executable or NULL.
+   PROG_BFD is its bfd or NULL.
+
+   If both PROG_NAME and PROG_BFD are NULL, this function returns immediately.
+   If PROG_BFD is not NULL, PROG_NAME is ignored.
+
+   Implicit inputs: STATE_MY_NAME(sd), STATE_TARGET(sd),
+                    STATE_ARCHITECTURE(sd).
+
+   A new bfd is created so the app isn't required to keep its copy of the
+   bfd open.  */
 
 SIM_RC
-sim_analyze_program (sd, prog_name, prog_bfd)
-     SIM_DESC sd;
-     char *prog_name;
-     bfd *prog_bfd;
+sim_analyze_program (SIM_DESC sd, const char *prog_name, bfd *prog_bfd)
 {
   asection *s;
   SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
@@ -184,13 +230,13 @@ sim_analyze_program (sd, prog_name, prog_bfd)
   prog_bfd = bfd_openr (prog_name, STATE_TARGET (sd));
   if (prog_bfd == NULL)
     {
-      sim_io_eprintf (sd, "%s: can't open \"%s\": %s\n", 
+      sim_io_eprintf (sd, "%s: can't open \"%s\": %s\n",
                      STATE_MY_NAME (sd),
                      prog_name,
                      bfd_errmsg (bfd_get_error ()));
       return SIM_RC_FAIL;
     }
-  if (!bfd_check_format (prog_bfd, bfd_object)) 
+  if (!bfd_check_format (prog_bfd, bfd_object))
     {
       sim_io_eprintf (sd, "%s: \"%s\" is not an object file: %s\n",
                      STATE_MY_NAME (sd),
@@ -225,6 +271,8 @@ sim_analyze_program (sd, prog_name, prog_bfd)
        break;
       }
 
+  bfd_cache_close (prog_bfd);
+
   return SIM_RC_OK;
 }
 \f
@@ -233,7 +281,7 @@ sim_analyze_program (sd, prog_name, prog_bfd)
 /* Called before sim_elapsed_time_since to get a reference point.  */
 
 SIM_ELAPSED_TIME
-sim_elapsed_time_get ()
+sim_elapsed_time_get (void)
 {
 #ifdef HAVE_GETRUSAGE
   struct rusage mytime;
@@ -250,11 +298,10 @@ sim_elapsed_time_get ()
 }
 
 /* Return the elapsed time in milliseconds since START.
-   The actual time may be cpu usage (prefered) or wall clock.  */
+   The actual time may be cpu usage (preferred) or wall clock.  */
 
 unsigned long
-sim_elapsed_time_since (start)
-     SIM_ELAPSED_TIME start;
+sim_elapsed_time_since (SIM_ELAPSED_TIME start)
 {
 #ifdef HAVE_GETRUSAGE
   return sim_elapsed_time_get () - start;
@@ -277,9 +324,81 @@ sim_do_commandf (SIM_DESC sd,
 {
   va_list ap;
   char *buf;
+  int ret;
+
   va_start (ap, fmt);
-  vasprintf (&buf, fmt, ap);
-  sim_do_command (sd, buf);
+  ret = vasprintf (&buf, fmt, ap);
   va_end (ap);
+
+  if (ret < 0)
+    {
+      sim_io_eprintf (sd, "%s: asprintf failed for `%s'\n",
+                     STATE_MY_NAME (sd), fmt);
+      return;
+    }
+
+  sim_do_command (sd, buf);
   free (buf);
 }
+
+
+/* sim-basics.h defines a number of enumerations, convert each of them
+   to a string representation */
+const char *
+map_to_str (unsigned map)
+{
+  switch (map)
+    {
+    case read_map: return "read";
+    case write_map: return "write";
+    case exec_map: return "exec";
+    case io_map: return "io";
+    default:
+      {
+       static char str[10];
+       sprintf (str, "(%ld)", (long) map);
+       return str;
+      }
+    }
+}
+
+const char *
+access_to_str (unsigned access)
+{
+  switch (access)
+    {
+    case access_invalid: return "invalid";
+    case access_read: return "read";
+    case access_write: return "write";
+    case access_exec: return "exec";
+    case access_io: return "io";
+    case access_read_write: return "read_write";
+    case access_read_exec: return "read_exec";
+    case access_write_exec: return "write_exec";
+    case access_read_write_exec: return "read_write_exec";
+    case access_read_io: return "read_io";
+    case access_write_io: return "write_io";
+    case access_read_write_io: return "read_write_io";
+    case access_exec_io: return "exec_io";
+    case access_read_exec_io: return "read_exec_io";
+    case access_write_exec_io: return "write_exec_io";
+    case access_read_write_exec_io: return "read_write_exec_io";
+    default:
+      {
+       static char str[10];
+       sprintf (str, "(%ld)", (long) access);
+       return str;
+      }
+    }
+}
+
+const char *
+transfer_to_str (unsigned transfer)
+{
+  switch (transfer)
+    {
+    case read_transfer: return "read";
+    case write_transfer: return "write";
+    default: return "(error)";
+    }
+}
This page took 0.030831 seconds and 4 git commands to generate.