sim/rx/main.c

   1 /* main.c --- main function for stand-alone RX simulator.
   2
   3 Copyright (C) 2005-2023 Free Software Foundation, Inc.
   4 Contributed by Red Hat, Inc.
   5
   6 This file is part of the GNU simulators.
   7
   8 This program is free software; you can redistribute it and/or modify
   9 it under the terms of the GNU General Public License as published by
  10 the Free Software Foundation; either version 3 of the License, or
  11 (at your option) any later version.
  12
  13 This program is distributed in the hope that it will be useful,
  14 but WITHOUT ANY WARRANTY; without even the implied warranty of
  15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16 GNU General Public License for more details.
  17
  18 You should have received a copy of the GNU General Public License
  19 along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
  20
  21 /* This must come before any other includes.  */
  22 #include "defs.h"
  23
  24 #include <stdio.h>
  25 #include <string.h>
  26 #include <stdlib.h>
  27 #include <unistd.h>
  28 #include <assert.h>
  29 #include <setjmp.h>
  30 #include <signal.h>
  31 #include <getopt.h>
  32
  33 #include "bfd.h"
  34
  35 #include "cpu.h"
  36 #include "mem.h"
  37 #include "misc.h"
  38 #include "load.h"
  39 #include "trace.h"
  40 #include "err.h"
  41
  42 static int disassemble = 0;
  43
  44 /* This must be higher than any other option index.  */
  45 #define OPT_ACT 400
  46
  47 #define ACT(E,A) (OPT_ACT + SIM_ERR_##E * SIM_ERRACTION_NUM_ACTIONS + SIM_ERRACTION_##A)
  48
  49 static struct option sim_options[] =
  50 {
  51   { "end-sim-args", 0, NULL, 'E' },
  52   { "exit-null-deref", 0, NULL, ACT(NULL_POINTER_DEREFERENCE,EXIT) },
  53   { "warn-null-deref", 0, NULL, ACT(NULL_POINTER_DEREFERENCE,WARN) },
  54   { "ignore-null-deref", 0, NULL, ACT(NULL_POINTER_DEREFERENCE,IGNORE) },
  55   { "exit-unwritten-pages", 0, NULL, ACT(READ_UNWRITTEN_PAGES,EXIT) },
  56   { "warn-unwritten-pages", 0, NULL, ACT(READ_UNWRITTEN_PAGES,WARN) },
  57   { "ignore-unwritten-pages", 0, NULL, ACT(READ_UNWRITTEN_PAGES,IGNORE) },
  58   { "exit-unwritten-bytes", 0, NULL, ACT(READ_UNWRITTEN_BYTES,EXIT) },
  59   { "warn-unwritten-bytes", 0, NULL, ACT(READ_UNWRITTEN_BYTES,WARN) },
  60   { "ignore-unwritten-bytes", 0, NULL, ACT(READ_UNWRITTEN_BYTES,IGNORE) },
  61   { "exit-corrupt-stack", 0, NULL, ACT(CORRUPT_STACK,EXIT) },
  62   { "warn-corrupt-stack", 0, NULL, ACT(CORRUPT_STACK,WARN) },
  63   { "ignore-corrupt-stack", 0, NULL, ACT(CORRUPT_STACK,IGNORE) },
  64   { 0, 0, 0, 0 }
  65 };
  66
  67 static void
  68 done (int exit_code)
  69 {
  70   if (verbose)
  71     {
  72       stack_heap_stats ();
  73       mem_usage_stats ();
  74       /* Only use comma separated numbers when being very verbose.
  75          Comma separated numbers are hard to parse in awk scripts.  */
  76       if (verbose > 1)
  77         printf ("insns: %14s\n", comma (rx_cycles));
  78       else
  79         printf ("insns: %u\n", rx_cycles);
  80
  81       pipeline_stats ();
  82     }
  83   exit (exit_code);
  84 }
  85
  86 int
  87 main (int argc, char **argv)
  88 {
  89   int o;
  90   int save_trace;
  91   bfd *prog;
  92   int rc;
  93
  94   /* By default, we exit when an execution error occurs.  */
  95   execution_error_init_standalone ();
  96
  97   while ((o = getopt_long (argc, argv, "tvdeEwi", sim_options, NULL)) != -1)
  98     {
  99       if (o == 'E')
 100         /* Stop processing the command line. This is so that any remaining
 101            words on the command line that look like arguments will be passed
 102            on to the program being simulated.  */
 103         break;
 104
 105       if (o >= OPT_ACT)
 106         {
 107           int e, a;
 108
 109           o -= OPT_ACT;
 110           e = o / SIM_ERRACTION_NUM_ACTIONS;
 111           a = o % SIM_ERRACTION_NUM_ACTIONS;
 112           execution_error_set_action (e, a);
 113         }
 114       else switch (o)
 115         {
 116         case 't':
 117           trace++;
 118           break;
 119         case 'v':
 120           verbose++;
 121           break;
 122         case 'd':
 123           disassemble++;
 124           break;
 125         case 'e':
 126           execution_error_init_standalone ();
 127           break;
 128         case 'w':
 129           execution_error_warn_all ();
 130           break;
 131         case 'i':
 132           execution_error_ignore_all ();
 133           break;
 134         case '?':
 135           {
 136             int i;
 137             fprintf (stderr,
 138                      "usage: run [options] program [arguments]\n");
 139             fprintf (stderr,
 140                      "\t-v\t- increase verbosity.\n"
 141                      "\t-t\t- trace.\n"
 142                      "\t-d\t- disassemble.\n"
 143                      "\t-E\t- stop processing sim args\n"
 144                      "\t-e\t- exit on all execution errors.\n"
 145                      "\t-w\t- warn (do not exit) on all execution errors.\n"
 146                      "\t-i\t- ignore all execution errors.\n");
 147             for (i=0; sim_options[i].name; i++)
 148               fprintf (stderr, "\t--%s\n", sim_options[i].name);
 149             exit (1);
 150           }
 151         }
 152     }
 153
 154   prog = bfd_openr (argv[optind], 0);
 155   if (!prog)
 156     {
 157       fprintf (stderr, "Can't read %s\n", argv[optind]);
 158       exit (1);
 159     }
 160
 161   if (!bfd_check_format (prog, bfd_object))
 162     {
 163       fprintf (stderr, "%s not a rx program\n", argv[optind]);
 164       exit (1);
 165     }
 166
 167   init_regs ();
 168
 169   rx_in_gdb = 0;
 170   save_trace = trace;
 171   trace = 0;
 172   rx_load (prog, NULL);
 173   trace = save_trace;
 174
 175   sim_disasm_init (prog);
 176
 177   enable_counting = verbose;
 178
 179   rc = setjmp (decode_jmp_buf);
 180
 181   if (rc == 0)
 182     {
 183       if (!trace && !disassemble)
 184         {
 185           /* This will longjmp to the above if an exception
 186              happens.  */
 187           for (;;)
 188             decode_opcode ();
 189         }
 190       else
 191         while (1)
 192           {
 193
 194             if (trace)
 195               printf ("\n");
 196
 197             if (disassemble)
 198               {
 199                 enable_counting = 0;
 200                 sim_disasm_one ();
 201                 enable_counting = verbose;
 202               }
 203
 204             rc = decode_opcode ();
 205
 206             if (trace)
 207               trace_register_changes ();
 208           }
 209     }
 210
 211   if (RX_HIT_BREAK (rc))
 212     done (1);
 213   else if (RX_EXITED (rc))
 214     done (RX_EXIT_STATUS (rc));
 215   else if (RX_STOPPED (rc))
 216     {
 217       if (verbose)
 218         printf("Stopped on signal %d\n", RX_STOP_SIG (rc));
 219       exit(1);
 220     }
 221   done (0);
 222   exit (0);
 223 }