sim: parse_args: display getopt error ourselves
[external/binutils.git] / sim / common / sim-trace.c
index 7764005..6c01e15 100644 (file)
@@ -1,28 +1,29 @@
 /* Simulator tracing/debugging support.
-   Copyright (C) 1997, 1998 Free Software Foundation, Inc.
+   Copyright (C) 1997-2016 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-io.h"
 #include "sim-options.h"
 #include "sim-fpu.h"
+
 #include "bfd.h"
+#include "libiberty.h"
 
 #include "sim-assert.h"
 
@@ -33,6 +34,9 @@ with this program; if not, write to the Free Software Foundation, Inc.,
 #include <strings.h>
 #endif
 #endif
+#ifdef HAVE_STDLIB_H
+#include <stdlib.h>
+#endif
 
 #ifndef SIZE_PHASE
 #define SIZE_PHASE 8
@@ -50,6 +54,7 @@ with this program; if not, write to the Free Software Foundation, Inc.,
 #define SIZE_LINE_NUMBER 4
 #endif
 
+static MODULE_INIT_FN trace_init;
 static MODULE_UNINSTALL_FN trace_uninstall;
 
 static DECLARE_OPTION_HANDLER (trace_option_handler);
@@ -67,8 +72,13 @@ enum {
   OPTION_TRACE_FPU,
   OPTION_TRACE_BRANCH,
   OPTION_TRACE_SEMANTICS,
+  OPTION_TRACE_RANGE,
+  OPTION_TRACE_FUNCTION,
   OPTION_TRACE_DEBUG,
-  OPTION_TRACE_FILE
+  OPTION_TRACE_FILE,
+  OPTION_TRACE_VPU,
+  OPTION_TRACE_SYSCALL,
+  OPTION_TRACE_REGISTER
 };
 
 static const OPTION trace_options[] =
@@ -76,60 +86,75 @@ static const OPTION trace_options[] =
   /* This table is organized to group related instructions together.  */
   { {"trace", optional_argument, NULL, 't'},
       't', "on|off", "Trace useful things",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-insn", optional_argument, NULL, OPTION_TRACE_INSN},
       '\0', "on|off", "Perform instruction tracing",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-decode", optional_argument, NULL, OPTION_TRACE_DECODE},
       '\0', "on|off", "Trace instruction decoding",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-extract", optional_argument, NULL, OPTION_TRACE_EXTRACT},
       '\0', "on|off", "Trace instruction extraction",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-linenum", optional_argument, NULL, OPTION_TRACE_LINENUM},
       '\0', "on|off", "Perform line number tracing (implies --trace-insn)",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-memory", optional_argument, NULL, OPTION_TRACE_MEMORY},
       '\0', "on|off", "Trace memory operations",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-alu", optional_argument, NULL, OPTION_TRACE_ALU},
-      '\0', "on|off", "Trace ALU operations",
-      trace_option_handler },
+      '\0', "on|off", "Trace ALU (Arithmetic Logic Unit) operations",
+      trace_option_handler, NULL },
   { {"trace-fpu", optional_argument, NULL, OPTION_TRACE_FPU},
-      '\0', "on|off", "Trace FPU operations",
-      trace_option_handler },
+      '\0', "on|off", "Trace FPU (Floating Point Unit) operations",
+      trace_option_handler, NULL },
+  { {"trace-vpu", optional_argument, NULL, OPTION_TRACE_VPU},
+      '\0', "on|off", "Trace VPU (Vector Processing Unit) operations",
+      trace_option_handler, NULL },
   { {"trace-branch", optional_argument, NULL, OPTION_TRACE_BRANCH},
       '\0', "on|off", "Trace branching",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-semantics", optional_argument, NULL, OPTION_TRACE_SEMANTICS},
-      '\0', "on|off", "Perform ALU, FPU, MEMORY, and BRANCH tracing",
-      trace_option_handler },
+      '\0', "on|off", "Perform ALU, FPU, VPU, MEMORY, and BRANCH tracing",
+      trace_option_handler, NULL },
   { {"trace-model", optional_argument, NULL, OPTION_TRACE_MODEL},
       '\0', "on|off", "Include model performance data",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-core", optional_argument, NULL, OPTION_TRACE_CORE},
       '\0', "on|off", "Trace core operations",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-events", optional_argument, NULL, OPTION_TRACE_EVENTS},
       '\0', "on|off", "Trace events",
-      trace_option_handler },
+      trace_option_handler, NULL },
+  { {"trace-syscall", optional_argument, NULL, OPTION_TRACE_SYSCALL},
+      '\0', "on|off", "Trace system calls",
+      trace_option_handler, NULL },
+  { {"trace-register", optional_argument, NULL, OPTION_TRACE_REGISTER},
+      '\0', "on|off", "Trace cpu register accesses",
+      trace_option_handler, NULL },
+#ifdef SIM_HAVE_ADDR_RANGE
+  { {"trace-range", required_argument, NULL, OPTION_TRACE_RANGE},
+      '\0', "START,END", "Specify range of addresses for instruction tracing",
+      trace_option_handler, NULL },
+#if 0 /*wip*/
+  { {"trace-function", required_argument, NULL, OPTION_TRACE_FUNCTION},
+      '\0', "FUNCTION", "Specify function to trace",
+      trace_option_handler, NULL },
+#endif
+#endif
   { {"trace-debug", optional_argument, NULL, OPTION_TRACE_DEBUG},
       '\0', "on|off", "Add information useful for debugging the simulator to the tracing output",
-      trace_option_handler },
+      trace_option_handler, NULL },
   { {"trace-file", required_argument, NULL, OPTION_TRACE_FILE},
       '\0', "FILE NAME", "Specify tracing output file",
-      trace_option_handler },
-  { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL }
+      trace_option_handler, NULL },
+  { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL, NULL }
 };
 
 /* Set/reset the trace options indicated in MASK.  */
 
 static SIM_RC
-set_trace_option_mask (sd, name, mask, arg)
-     SIM_DESC sd;
-     const char *name;
-     int mask;
-     const char *arg;
+set_trace_option_mask (SIM_DESC sd, const char *name, int mask, const char *arg)
 {
   int trace_nr;
   int cpu_nr;
@@ -152,21 +177,14 @@ set_trace_option_mask (sd, name, mask, arg)
        }
     }
 
+  /* Update applicable trace bits.  */
   for (trace_nr = 0; trace_nr < MAX_TRACE_VALUES; ++trace_nr)
     {
       if ((mask & (1 << trace_nr)) == 0)
        continue;
 
       /* Set non-cpu specific values.  */
-      switch (trace_nr)
-       {
-       case TRACE_EVENTS_IDX:
-         STATE_EVENTS (sd)->trace = trace_val;
-         break;
-       case TRACE_DEBUG_IDX:
-         STATE_TRACE_FLAGS (sd)[trace_nr] = trace_val;
-         break;
-       }
+      STATE_TRACE_FLAGS (sd)[trace_nr] = trace_val;
 
       /* Set cpu values.  */
       for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++)
@@ -175,35 +193,50 @@ set_trace_option_mask (sd, name, mask, arg)
        }
     }
 
+  /* Re-compute the cpu trace summary.  */
+  if (trace_val)
+    {
+      for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++)
+       CPU_TRACE_DATA (STATE_CPU (sd, cpu_nr))->trace_any_p = 1;
+    }
+  else
+    {
+      for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++)
+       {
+         CPU_TRACE_DATA (STATE_CPU (sd, cpu_nr))->trace_any_p = 0;
+         for (trace_nr = 0; trace_nr < MAX_TRACE_VALUES; ++trace_nr)
+           {
+             if (CPU_TRACE_FLAGS (STATE_CPU (sd, cpu_nr))[trace_nr])
+               {
+                 CPU_TRACE_DATA (STATE_CPU (sd, cpu_nr))->trace_any_p = 1;
+                 break;
+               }
+           }
+       }
+    }
+
   return SIM_RC_OK;
 }
 
 /* Set one trace option based on its IDX value.  */
 
 static SIM_RC
-set_trace_option (sd, name, idx, arg)
-     SIM_DESC sd;
-     const char *name;
-     int idx;
-     const char *arg;
+set_trace_option (SIM_DESC sd, const char *name, int idx, const char *arg)
 {
   return set_trace_option_mask (sd, name, 1 << idx, arg);
 }
 
 
 static SIM_RC
-trace_option_handler (sd, opt, arg, is_command)
-     SIM_DESC sd;
-     int opt;
-     char *arg;
-     int is_command;
+trace_option_handler (SIM_DESC sd, sim_cpu *cpu, int opt,
+                     char *arg, int is_command)
 {
   int n;
 
   switch (opt)
     {
     case 't' :
-      if (! WITH_TRACE)
+      if (!WITH_TRACE_ANY_P)
        sim_io_eprintf (sd, "Tracing not compiled in, `-t' ignored\n");
       else
        return set_trace_option_mask (sd, "trace", TRACE_USEFUL_MASK, arg);
@@ -283,6 +316,13 @@ trace_option_handler (sd, opt, arg, is_command)
        sim_io_eprintf (sd, "FPU tracing not compiled in, `--trace-fpu' ignored\n");
       break;
 
+    case OPTION_TRACE_VPU :
+      if (WITH_TRACE_VPU_P)
+       return set_trace_option (sd, "-vpu", TRACE_VPU_IDX, arg);
+      else
+       sim_io_eprintf (sd, "VPU tracing not compiled in, `--trace-vpu' ignored\n");
+      break;
+
     case OPTION_TRACE_BRANCH :
       if (WITH_TRACE_BRANCH_P)
        return set_trace_option (sd, "-branch", TRACE_BRANCH_IDX, arg);
@@ -290,6 +330,20 @@ trace_option_handler (sd, opt, arg, is_command)
        sim_io_eprintf (sd, "Branch tracing not compiled in, `--trace-branch' ignored\n");
       break;
 
+    case OPTION_TRACE_SYSCALL :
+      if (WITH_TRACE_SYSCALL_P)
+       return set_trace_option (sd, "-syscall", TRACE_SYSCALL_IDX, arg);
+      else
+       sim_io_eprintf (sd, "System call tracing not compiled in, `--trace-syscall' ignored\n");
+      break;
+
+    case OPTION_TRACE_REGISTER :
+      if (WITH_TRACE_REGISTER_P)
+       return set_trace_option (sd, "-register", TRACE_REGISTER_IDX, arg);
+      else
+       sim_io_eprintf (sd, "Register tracing not compiled in, `--trace-register' ignored\n");
+      break;
+
     case OPTION_TRACE_SEMANTICS :
       if (WITH_TRACE_ALU_P
          && WITH_TRACE_FPU_P
@@ -298,6 +352,7 @@ trace_option_handler (sd, opt, arg, is_command)
        {
          if (set_trace_option (sd, "-semantics", TRACE_ALU_IDX, arg) != SIM_RC_OK
              || set_trace_option (sd, "-semantics", TRACE_FPU_IDX, arg) != SIM_RC_OK
+             || set_trace_option (sd, "-semantics", TRACE_VPU_IDX, arg) != SIM_RC_OK
              || set_trace_option (sd, "-semantics", TRACE_MEMORY_IDX, arg) != SIM_RC_OK
              || set_trace_option (sd, "-semantics", TRACE_BRANCH_IDX, arg) != SIM_RC_OK)
            return SIM_RC_FAIL;
@@ -306,6 +361,43 @@ trace_option_handler (sd, opt, arg, is_command)
        sim_io_eprintf (sd, "Alu, fpu, memory, and/or branch tracing not compiled in, `--trace-semantics' ignored\n");
       break;
 
+#ifdef SIM_HAVE_ADDR_RANGE
+    case OPTION_TRACE_RANGE :
+      if (WITH_TRACE_ANY_P)
+       {
+         int cpu_nr;
+         char *chp = arg;
+         unsigned long start,end;
+         start = strtoul (chp, &chp, 0);
+         if (*chp != ',')
+           {
+             sim_io_eprintf (sd, "--trace-range missing END argument\n");
+             return SIM_RC_FAIL;
+           }
+         end = strtoul (chp + 1, NULL, 0);
+         /* FIXME: Argument validation.  */
+         if (cpu != NULL)
+           sim_addr_range_add (TRACE_RANGE (CPU_PROFILE_DATA (cpu)),
+                               start, end);
+         else
+           for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; ++cpu_nr)
+             sim_addr_range_add (TRACE_RANGE (CPU_TRACE_DATA (STATE_CPU (sd, cpu_nr))),
+                                 start, end);
+       }
+      else
+       sim_io_eprintf (sd, "Tracing not compiled in, `--trace-range' ignored\n");
+      break;
+
+    case OPTION_TRACE_FUNCTION :
+      if (WITH_TRACE_ANY_P)
+       {
+         /*wip: need to compute function range given name*/
+       }
+      else
+       sim_io_eprintf (sd, "Tracing not compiled in, `--trace-function' ignored\n");
+      break;
+#endif /* SIM_HAVE_ADDR_RANGE */
+
     case OPTION_TRACE_DEBUG :
       if (WITH_TRACE_DEBUG_P)
        return set_trace_option (sd, "-debug", TRACE_DEBUG_IDX, arg);
@@ -314,7 +406,7 @@ trace_option_handler (sd, opt, arg, is_command)
       break;
 
     case OPTION_TRACE_FILE :
-      if (! WITH_TRACE)
+      if (!WITH_TRACE_ANY_P)
        sim_io_eprintf (sd, "Tracing not compiled in, `--trace-file' ignored\n");
       else
        {
@@ -344,15 +436,44 @@ trace_install (SIM_DESC sd)
 
   SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
 
-  sim_add_option_table (sd, trace_options);
+  sim_add_option_table (sd, NULL, trace_options);
   memset (STATE_TRACE_DATA (sd), 0, sizeof (* STATE_TRACE_DATA (sd)));
   for (i = 0; i < MAX_NR_PROCESSORS; ++i)
     memset (CPU_TRACE_DATA (STATE_CPU (sd, i)), 0,
            sizeof (* CPU_TRACE_DATA (STATE_CPU (sd, i))));
+  sim_module_add_init_fn (sd, trace_init);
   sim_module_add_uninstall_fn (sd, trace_uninstall);
   return SIM_RC_OK;
 }
 
+static SIM_RC
+trace_init (SIM_DESC sd)
+{
+#ifdef SIM_HAVE_ADDR_RANGE
+  /* Check if a range has been specified without specifying what to
+     collect.  */
+  {
+    int i;
+
+    for (i = 0; i < MAX_NR_PROCESSORS; ++i)
+      {
+       sim_cpu *cpu = STATE_CPU (sd, i);
+
+       if (ADDR_RANGE_RANGES (TRACE_RANGE (CPU_TRACE_DATA (cpu)))
+           && ! TRACE_INSN_P (cpu))
+         {
+           sim_io_eprintf_cpu (cpu, "Tracing address range specified without --trace-insn.\n");
+           sim_io_eprintf_cpu (cpu, "Address range ignored.\n");
+           sim_addr_range_delete (TRACE_RANGE (CPU_TRACE_DATA (cpu)),
+                                  0, ~ (address_word) 0);
+         }
+      }
+  }
+#endif
+
+  return SIM_RC_OK;
+}
+
 static void
 trace_uninstall (SIM_DESC sd)
 {
@@ -378,15 +499,6 @@ trace_uninstall (SIM_DESC sd)
     }
 }
 \f
-typedef enum {
-  trace_fmt_invalid,
-  trace_fmt_word,
-  trace_fmt_fp,
-  trace_fmt_fpu,
-  trace_fmt_string,
-  trace_fmt_instruction_incomplete,
-} data_fmt;
-
 /* compute the nr of trace data units consumed by data */
 static int
 save_data_size (TRACE_DATA *data,
@@ -398,12 +510,12 @@ save_data_size (TRACE_DATA *data,
 
 
 /* Archive DATA into the trace buffer */
-static void
+void
 save_data (SIM_DESC sd,
           TRACE_DATA *data,
           data_fmt fmt,
           long size,
-          void *buf)
+          const void *buf)
 {
   int i = TRACE_INPUT_IDX (data);
   if (i == sizeof (TRACE_INPUT_FMT (data)))
@@ -428,28 +540,62 @@ print_data (SIM_DESC sd,
       trace_printf (sd, cpu, " (instruction incomplete)");
       break;
     case trace_fmt_word:
-      switch (size)
-       {
-       case sizeof (unsigned_word):
-         trace_printf (sd, cpu, " 0x%08lx", (long) * (unsigned_word*) data);
-         break;
-       default:
-         abort ();
-       }
-      break;
+    case trace_fmt_addr:
+      {
+       switch (size)
+         {
+         case sizeof (unsigned32):
+           trace_printf (sd, cpu, " 0x%08lx", (long) * (unsigned32*) data);
+           break;
+         case sizeof (unsigned64):
+           trace_printf (sd, cpu, " 0x%08lx%08lx",
+                         (long) ((* (unsigned64*) data) >> 32),
+                         (long) * (unsigned64*) data);
+           break;
+         default:
+           abort ();
+         }
+       break;
+      }
+    case trace_fmt_bool:
+      {
+       SIM_ASSERT (size == sizeof (int));
+       trace_printf (sd, cpu, " %-8s",
+                     (* (int*) data) ? "true" : "false");
+       break;
+      }
     case trace_fmt_fp:
-      switch (size)
-       {
-         /* FIXME: Assumes sizeof float == 4; sizeof double == 8 */
-       case 4:
-         trace_printf (sd, cpu, " %8g", * (float*) data);
-         break;
-       case 8:
-         trace_printf (sd, cpu, " %8g", * (double*) data);
-         break;
-       default:
-         abort ();
-       }
+      {
+       sim_fpu fp;
+       switch (size)
+         {
+           /* FIXME: Assumes sizeof float == 4; sizeof double == 8 */
+         case 4:
+           sim_fpu_32to (&fp, *(unsigned32*)data);
+           break;
+         case 8:
+           sim_fpu_64to (&fp, *(unsigned64*)data);
+           break;
+         default:
+           abort ();
+         }
+       trace_printf (sd, cpu, " %8g", sim_fpu_2d (&fp));
+       switch (size)
+         {
+         case 4:
+           trace_printf (sd, cpu, " (0x%08lx)",
+                         (long) *(unsigned32*)data);
+           break;
+         case 8:
+           trace_printf (sd, cpu, " (0x%08lx%08lx)",
+                         (long) (*(unsigned64*)data >> 32),
+                         (long) (*(unsigned64*)data));
+           break;
+         default:
+           abort ();
+         }
+       break;
+      }
     case trace_fmt_fpu:
       /* FIXME: At present sim_fpu data is stored as a double */
       trace_printf (sd, cpu, " %8g", * (double*) data);
@@ -461,22 +607,25 @@ print_data (SIM_DESC sd,
       abort ();
     }
 }
-                 
+
 static const char *
 trace_idx_to_str (int trace_idx)
 {
   static char num[8];
   switch (trace_idx)
     {
-    case TRACE_ALU_IDX:     return "alu:     ";
-    case TRACE_INSN_IDX:    return "insn:    ";
-    case TRACE_DECODE_IDX:  return "decode:  ";
-    case TRACE_EXTRACT_IDX: return "extract: ";
-    case TRACE_MEMORY_IDX:  return "memory:  ";
-    case TRACE_CORE_IDX:    return "core:    ";
-    case TRACE_EVENTS_IDX:  return "events:  ";
-    case TRACE_FPU_IDX:     return "fpu:     ";
-    case TRACE_BRANCH_IDX:  return "branch:  ";
+    case TRACE_ALU_IDX:      return "alu:     ";
+    case TRACE_INSN_IDX:     return "insn:    ";
+    case TRACE_DECODE_IDX:   return "decode:  ";
+    case TRACE_EXTRACT_IDX:  return "extract: ";
+    case TRACE_MEMORY_IDX:   return "memory:  ";
+    case TRACE_CORE_IDX:     return "core:    ";
+    case TRACE_EVENTS_IDX:   return "events:  ";
+    case TRACE_FPU_IDX:      return "fpu:     ";
+    case TRACE_BRANCH_IDX:   return "branch:  ";
+    case TRACE_SYSCALL_IDX:  return "syscall: ";
+    case TRACE_REGISTER_IDX: return "reg:     ";
+    case TRACE_VPU_IDX:      return "vpu:     ";
     default:
       sprintf (num, "?%d?", trace_idx);
       return num;
@@ -525,6 +674,7 @@ trace_results (SIM_DESC sd,
 void
 trace_prefix (SIM_DESC sd,
              sim_cpu *cpu,
+             sim_cia cia,
              address_word pc,
              int line_p,
              const char *filename,
@@ -536,9 +686,15 @@ trace_prefix (SIM_DESC sd,
   va_list ap;
   char *prefix = TRACE_PREFIX (data);
   char *chp;
+ /* FIXME: The TRACE_PREFIX_WIDTH should be determined at build time using
+    known information about the disassembled instructions. */
+#ifndef TRACE_PREFIX_WIDTH
+#define TRACE_PREFIX_WIDTH 48
+#endif
+  int width = TRACE_PREFIX_WIDTH;
 
   /* if the previous trace data wasn't flushed, flush it now with a
-     note indicating that this occured. */
+     note indicating that the trace was incomplete. */
   if (TRACE_IDX (data) != 0)
     {
       int last_input = TRACE_INPUT_IDX (data);
@@ -548,12 +704,23 @@ trace_prefix (SIM_DESC sd,
   TRACE_IDX (data) = 0;
   TRACE_INPUT_IDX (data) = 0;
 
+  /* Create the text prefix for this new instruction: */
   if (!line_p)
     {
-      sprintf (prefix, "%s:%-*d 0x%.*lx ",
-              filename,
-              SIZE_LINE_NUMBER, linenum,
-              SIZE_PC, (long)pc);
+      if (filename)
+       {
+         sprintf (prefix, "%s:%-*d 0x%.*lx ",
+                  filename,
+                  SIZE_LINE_NUMBER, linenum,
+                  SIZE_PC, (long) pc);
+       }
+      else
+       {
+         sprintf (prefix, "0x%.*lx ",
+                  SIZE_PC, (long) pc);
+         /* Shrink the width by the amount that we didn't print.  */
+         width -= SIZE_LINE_NUMBER + SIZE_PC + 8;
+       }
       chp = strchr (prefix, '\0');
       va_start (ap, fmt);
       vsprintf (chp, fmt, ap);
@@ -570,10 +737,33 @@ trace_prefix (SIM_DESC sd,
          const char *pc_filename = (const char *)0;
          const char *pc_function = (const char *)0;
          unsigned int pc_linenum = 0;
+         bfd *abfd;
+         asymbol **asymbols;
+
+         abfd = STATE_PROG_BFD (CPU_STATE (cpu));
+         asymbols = STATE_PROG_SYMS (CPU_STATE (cpu));
+         if (asymbols == NULL)
+           {
+             long symsize;
+             long symbol_count;
+
+             symsize = bfd_get_symtab_upper_bound (abfd);
+             if (symsize < 0)
+               {
+                 sim_engine_abort (sd, cpu, cia, "could not read symbols");
+               }
+             asymbols = (asymbol **) xmalloc (symsize);
+             symbol_count = bfd_canonicalize_symtab (abfd, asymbols);
+             if (symbol_count < 0)
+               {
+                 sim_engine_abort (sd, cpu, cia, "could not canonicalize symbols");
+               }
+             STATE_PROG_SYMS (CPU_STATE (cpu)) = asymbols;
+           }
 
-         if (bfd_find_nearest_line (STATE_PROG_BFD (CPU_STATE (cpu)),
+         if (bfd_find_nearest_line (abfd,
                                     STATE_TEXT_SECTION (CPU_STATE (cpu)),
-                                    (struct symbol_cache_entry **) 0,
+                                    asymbols,
                                     pc - STATE_TEXT_START (CPU_STATE (cpu)),
                                     &pc_filename, &pc_function, &pc_linenum))
            {
@@ -615,17 +805,12 @@ trace_prefix (SIM_DESC sd,
       va_end (ap);
     }
 
-  /* pad it out to TRACE_PREFIX_WIDTH.  FIXME: The TRACE_PREFIX_WIDTH
-     should be determined at build time using known information about
-     the disassembled instructions */
-#ifndef TRACE_PREFIX_WIDTH
-#define TRACE_PREFIX_WIDTH 48
-#endif
+  /* Pad it out to TRACE_PREFIX_WIDTH.  */
   chp = strchr (prefix, '\0');
-  if (chp - prefix < TRACE_PREFIX_WIDTH)
+  if (chp - prefix < width)
     {
-      memset (chp, ' ', TRACE_PREFIX_WIDTH - (chp - prefix));
-      chp = &prefix [TRACE_PREFIX_WIDTH];
+      memset (chp, ' ', width - (chp - prefix));
+      chp = &prefix [width];
       *chp = '\0';
     }
   strcpy (chp, " -");
@@ -639,7 +824,7 @@ void
 trace_generic (SIM_DESC sd,
               sim_cpu *cpu,
               int trace_idx,
-              char *fmt,
+              const char *fmt,
               ...)
 {
   va_list ap;
@@ -701,6 +886,45 @@ trace_input_word3 (SIM_DESC sd,
 }
 
 void
+trace_input_word4 (SIM_DESC sd,
+                  sim_cpu *cpu,
+                  int trace_idx,
+                  unsigned_word d0,
+                  unsigned_word d1,
+                  unsigned_word d2,
+                  unsigned_word d3)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  TRACE_IDX (data) = trace_idx;
+  save_data (sd, data, trace_fmt_word, sizeof (d0), &d0);
+  save_data (sd, data, trace_fmt_word, sizeof (d1), &d1);
+  save_data (sd, data, trace_fmt_word, sizeof (d2), &d2);
+  save_data (sd, data, trace_fmt_word, sizeof (d3), &d3);
+}
+
+void
+trace_input_bool1 (SIM_DESC sd,
+                  sim_cpu *cpu,
+                  int trace_idx,
+                  int d0)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  TRACE_IDX (data) = trace_idx;
+  save_data (sd, data, trace_fmt_bool, sizeof (d0), &d0);
+}
+
+void
+trace_input_addr1 (SIM_DESC sd,
+                  sim_cpu *cpu,
+                  int trace_idx,
+                  address_word d0)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  TRACE_IDX (data) = trace_idx;
+  save_data (sd, data, trace_fmt_addr, sizeof (d0), &d0);
+}
+
+void
 trace_input_fp1 (SIM_DESC sd,
                 sim_cpu *cpu,
                 int trace_idx,
@@ -801,7 +1025,93 @@ trace_result_word1 (SIM_DESC sd,
   save_data (sd, data, trace_fmt_word, sizeof (unsigned_word), &r0);
 
   trace_results (sd, cpu, trace_idx, last_input);
-}            
+}
+
+void
+trace_result0 (SIM_DESC sd,
+              sim_cpu *cpu,
+              int trace_idx)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
+
+void
+trace_result_word2 (SIM_DESC sd,
+                   sim_cpu *cpu,
+                   int trace_idx,
+                   unsigned_word r0,
+                   unsigned_word r1)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+  save_data (sd, data, trace_fmt_word, sizeof (r0), &r0);
+  save_data (sd, data, trace_fmt_word, sizeof (r1), &r1);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
+
+void
+trace_result_word4 (SIM_DESC sd,
+                   sim_cpu *cpu,
+                   int trace_idx,
+                   unsigned_word r0,
+                   unsigned_word r1,
+                   unsigned_word r2,
+                   unsigned_word r3)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+  save_data (sd, data, trace_fmt_word, sizeof (r0), &r0);
+  save_data (sd, data, trace_fmt_word, sizeof (r1), &r1);
+  save_data (sd, data, trace_fmt_word, sizeof (r2), &r2);
+  save_data (sd, data, trace_fmt_word, sizeof (r3), &r3);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
+
+void
+trace_result_bool1 (SIM_DESC sd,
+                   sim_cpu *cpu,
+                   int trace_idx,
+                   int r0)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+  save_data (sd, data, trace_fmt_bool, sizeof (r0), &r0);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
+
+void
+trace_result_addr1 (SIM_DESC sd,
+                   sim_cpu *cpu,
+                   int trace_idx,
+                   address_word r0)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+  save_data (sd, data, trace_fmt_addr, sizeof (r0), &r0);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
 
 void
 trace_result_fp1 (SIM_DESC sd,
@@ -817,7 +1127,25 @@ trace_result_fp1 (SIM_DESC sd,
   save_data (sd, data, trace_fmt_fp, sizeof (fp_word), &f0);
 
   trace_results (sd, cpu, trace_idx, last_input);
-}            
+}
+
+void
+trace_result_fp2 (SIM_DESC sd,
+                 sim_cpu *cpu,
+                 int trace_idx,
+                 fp_word f0,
+                 fp_word f1)
+{
+  TRACE_DATA *data = CPU_TRACE_DATA (cpu);
+  int last_input;
+
+  /* Append any results to the end of the inputs */
+  last_input = TRACE_INPUT_IDX (data);
+  save_data (sd, data, trace_fmt_fp, sizeof (f0), &f0);
+  save_data (sd, data, trace_fmt_fp, sizeof (f1), &f1);
+
+  trace_results (sd, cpu, trace_idx, last_input);
+}
 
 void
 trace_result_fpu1 (SIM_DESC sd,
@@ -835,7 +1163,7 @@ trace_result_fpu1 (SIM_DESC sd,
   save_data (sd, data, trace_fmt_fp, sizeof (double), &d);
 
   trace_results (sd, cpu, trace_idx, last_input);
-}            
+}
 
 void
 trace_result_string1 (SIM_DESC sd,
@@ -851,7 +1179,7 @@ trace_result_string1 (SIM_DESC sd,
   save_data (sd, data, trace_fmt_string, strlen (s0) + 1, s0);
 
   trace_results (sd, cpu, trace_idx, last_input);
-}            
+}
 
 void
 trace_result_word1_string1 (SIM_DESC sd,
@@ -869,7 +1197,7 @@ trace_result_word1_string1 (SIM_DESC sd,
   save_data (sd, data, trace_fmt_string, strlen (s0) + 1, s0);
 
   trace_results (sd, cpu, trace_idx, last_input);
-}            
+}
 \f
 void
 trace_vprintf (SIM_DESC sd, sim_cpu *cpu, const char *fmt, va_list ap)
@@ -891,104 +1219,11 @@ trace_vprintf (SIM_DESC sd, sim_cpu *cpu, const char *fmt, va_list ap)
 }
 
 void
-trace_one_insn (SIM_DESC sd, sim_cpu *cpu, address_word pc,
-               int line_p, const char *filename, int linenum,
-               const char *phase_wo_colon, const char *fmt,
-               ...)
-{
-  va_list ap;
-  char phase[SIZE_PHASE+2];
-
-  strncpy (phase, phase_wo_colon, SIZE_PHASE);
-  strcat (phase, ":");
-
-  if (!line_p)
-    {
-      trace_printf (sd, cpu, "%-*s %s:%-*d 0x%.*lx ",
-                   SIZE_PHASE+1, phase,
-                   filename,
-                   SIZE_LINE_NUMBER, linenum,
-                   SIZE_PC, (long)pc);
-      va_start (ap, fmt);
-      trace_vprintf (sd, cpu, fmt, ap);
-      va_end (ap);
-      trace_printf (sd, cpu, "\n");
-    }
-  else
-    {
-      char buf[256];
-
-      buf[0] = 0;
-      if (STATE_TEXT_SECTION (CPU_STATE (cpu))
-         && pc >= STATE_TEXT_START (CPU_STATE (cpu))
-         && pc < STATE_TEXT_END (CPU_STATE (cpu)))
-       {
-         const char *pc_filename = (const char *)0;
-         const char *pc_function = (const char *)0;
-         unsigned int pc_linenum = 0;
-
-         if (bfd_find_nearest_line (STATE_PROG_BFD (CPU_STATE (cpu)),
-                                    STATE_TEXT_SECTION (CPU_STATE (cpu)),
-                                    (struct symbol_cache_entry **) 0,
-                                    pc - STATE_TEXT_START (CPU_STATE (cpu)),
-                                    &pc_filename, &pc_function, &pc_linenum))
-           {
-             char *p = buf;
-             if (pc_linenum)
-               {
-                 sprintf (p, "#%-*d ", SIZE_LINE_NUMBER, pc_linenum);
-                 p += strlen (p);
-               }
-             else
-               {
-                 sprintf (p, "%-*s ", SIZE_LINE_NUMBER+1, "---");
-                 p += SIZE_LINE_NUMBER+2;
-               }
-
-             if (pc_function)
-               {
-                 sprintf (p, "%s ", pc_function);
-                 p += strlen (p);
-               }
-             else if (pc_filename)
-               {
-                 char *q = (char *) strrchr (pc_filename, '/');
-                 sprintf (p, "%s ", (q) ? q+1 : pc_filename);
-                 p += strlen (p);
-               }
-
-             if (*p == ' ')
-               *p = '\0';
-           }
-       }
-
-      trace_printf (sd, cpu, "%-*s 0x%.*x %-*.*s ",
-                   SIZE_PHASE+1, phase,
-                   SIZE_PC, (unsigned) pc,
-                   SIZE_LOCATION, SIZE_LOCATION, buf);
-      va_start (ap, fmt);
-      trace_vprintf (sd, cpu, fmt, ap);
-      va_end (ap);
-      trace_printf (sd, cpu, "\n");
-    }
-}
-
-void
-trace_printf VPARAMS ((SIM_DESC sd, sim_cpu *cpu, const char *fmt, ...))
+trace_printf (SIM_DESC sd, sim_cpu *cpu, const char *fmt, ...)
 {
-#if !defined __STDC__ && !defined ALMOST_STDC
-  SIM_DESC sd;
-  sim_cpu *cpu;
-  const char *fmt;
-#endif
   va_list ap;
 
-  VA_START (ap, fmt);
-#if !defined __STDC__ && !defined ALMOST_STDC
-  sd = va_arg (ap, SIM_DESC);
-  cpu = va_arg (ap, sim_cpu *);
-  fmt = va_arg (ap, const char *);
-#endif
+  va_start (ap, fmt);
 
   trace_vprintf (sd, cpu, fmt, ap);
 
@@ -996,19 +1231,11 @@ trace_printf VPARAMS ((SIM_DESC sd, sim_cpu *cpu, const char *fmt, ...))
 }
 
 void
-debug_printf VPARAMS ((sim_cpu *cpu, const char *fmt, ...))
+sim_debug_printf (sim_cpu *cpu, const char *fmt, ...)
 {
-#if !defined __STDC__ && !defined ALMOST_STDC
-  sim_cpu *cpu;
-  const char *fmt;
-#endif
   va_list ap;
 
-  VA_START (ap, fmt);
-#if !defined __STDC__ && !defined ALMOST_STDC
-  cpu = va_arg (ap, sim_cpu *);
-  fmt = va_arg (ap, const char *);
-#endif
+  va_start (ap, fmt);
 
   if (CPU_DEBUG_FILE (cpu) == NULL)
     (* STATE_CALLBACK (CPU_STATE (cpu))->evprintf_filtered)