/* run front end support for all the simulators. Copyright (C) 1992, 93-96, 1997 Free Software Foundation, Inc. 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. */ /* Steve Chamberlain sac@cygnus.com, and others at Cygnus. */ #include "config.h" #include "tconfig.h" #include #include #ifdef __STDC__ #include #else #include #endif #ifdef HAVE_STDLIB_H #include #endif #ifdef HAVE_STRING_H #include #else #ifdef HAVE_STRINGS_H #include #endif #endif #include "libiberty.h" #include "bfd.h" #include "callback.h" #include "remote-sim.h" #include "ansidecl.h" #include "../libiberty/alloca-conf.h" static void usage PARAMS ((void)); extern int optind; extern char *optarg; extern host_callback default_callback; static char *myname; extern int getopt (); #ifdef NEED_UI_LOOP_HOOK /* Gdb foolery. This is only needed for gdb using a gui. */ int (*ui_loop_hook) PARAMS ((int signo)); #endif static SIM_DESC sd; static RETSIGTYPE cntrl_c (int sig ATTRIBUTE_UNUSED) { if (! sim_stop (sd)) { fprintf (stderr, "Quit!\n"); exit (1); } } int main (ac, av) int ac; char **av; { RETSIGTYPE (*prev_sigint) (); bfd *abfd; int i; int verbose = 0; int trace = 0; #ifdef SIM_HAVE_ENVIRONMENT int operating_p = 0; #endif char *name; static char *no_args[4]; char **sim_argv = &no_args[0]; char **prog_args; enum sim_stop reason; int sigrc; myname = av[0] + strlen (av[0]); while (myname > av[0] && myname[-1] != '/') --myname; /* The first element of sim_open's argv is the program name. */ no_args[0] = av[0]; #ifdef SIM_HAVE_BIENDIAN no_args[1] = "-E"; no_args[2] = "set-later"; #endif /* FIXME: This is currently being migrated into sim_open. Simulators that use functions such as sim_size() still require this. */ default_callback.init (&default_callback); sim_set_callbacks (&default_callback); /* FIXME: This is currently being rewritten to have each simulator do all argv processing. */ #ifdef SIM_H8300 /* FIXME: quick hack */ while ((i = getopt (ac, av, "a:c:m:op:s:htv")) != EOF) #else while ((i = getopt (ac, av, "a:c:m:op:s:tv")) != EOF) #endif switch (i) { case 'a': /* FIXME: Temporary hack. */ { int len = strlen (av[0]) + strlen (optarg); char *argbuf = (char *) alloca (len + 2 + 50); sprintf (argbuf, "%s %s", av[0], optarg); #ifdef SIM_HAVE_BIENDIAN /* The desired endianness must be passed to sim_open. The value for "set-later" is set when we know what it is. -E support isn't yet part of the published interface. */ strcat (argbuf, " -E set-later"); #endif sim_argv = buildargv (argbuf); } break; #ifdef SIM_HAVE_SIMCACHE case 'c': sim_set_simcache_size (atoi (optarg)); break; #endif case 'm': /* FIXME: Rename to sim_set_mem_size. */ sim_size (atoi (optarg)); break; #ifdef SIM_HAVE_ENVIRONMENT case 'o': /* Operating enironment where any signals are delivered to the target. */ operating_p = 1; break; #endif SIM_HAVE_ENVIRONMENT #ifdef SIM_HAVE_PROFILE case 'p': sim_set_profile (atoi (optarg)); break; case 's': sim_set_profile_size (atoi (optarg)); break; #endif case 't': trace = 1; break; case 'v': /* Things that are printed with -v are the kinds of things that gcc -v prints. This is not meant to include detailed tracing or debugging information, just summaries. */ verbose = 1; /* sim_set_verbose (1); */ break; /* FIXME: Quick hack, to be replaced by more general facility. */ #ifdef SIM_H8300 case 'h': set_h8300h (1); break; #endif default: usage (); } ac -= optind; av += optind; if (ac <= 0) usage (); name = *av; prog_args = av; if (verbose) { printf ("%s %s\n", myname, name); } abfd = bfd_openr (name, 0); if (!abfd) { fprintf (stderr, "%s: can't open %s: %s\n", myname, name, bfd_errmsg (bfd_get_error ())); exit (1); } if (!bfd_check_format (abfd, bfd_object)) { fprintf (stderr, "%s: can't load %s: %s\n", myname, name, bfd_errmsg (bfd_get_error ())); exit (1); } #ifdef SIM_HAVE_BIENDIAN /* The endianness must be passed to sim_open because one may wish to examine/set registers before calling sim_load [which is the other place where one can determine endianness]. We previously passed the endianness via global `target_byte_order' but that's not a clean interface. */ for (i = 1; sim_argv[i + 1] != NULL; ++i) continue; if (bfd_big_endian (abfd)) sim_argv[i] = "big"; else sim_argv[i] = "little"; #endif /* Ensure that any run-time initialisation that needs to be performed by the simulator can occur. */ sd = sim_open (SIM_OPEN_STANDALONE, &default_callback, abfd, sim_argv); if (sd == 0) exit (1); if (sim_load (sd, name, abfd, 0) == SIM_RC_FAIL) exit (1); if (sim_create_inferior (sd, abfd, prog_args, NULL) == SIM_RC_FAIL) exit (1); #ifdef SIM_HAVE_ENVIRONMENT /* NOTE: An old simulator supporting the operating environment MUST provide sim_set_trace() and not sim_trace(). That way sim_stop_reason() can be used to determine any stop reason. */ if (trace) sim_set_trace (); do { prev_sigint = signal (SIGINT, cntrl_c); sim_resume (sd, 0, sigrc); signal (SIGINT, prev_sigint); sim_stop_reason (sd, &reason, &sigrc); } while (operating_p && reason == sim_stopped && sigrc != SIGINT); #else if (trace) { int done = 0; prev_sigint = signal (SIGINT, cntrl_c); while (!done) { done = sim_trace (sd); } signal (SIGINT, prev_sigint); sim_stop_reason (sd, &reason, &sigrc); } else { prev_sigint = signal (SIGINT, cntrl_c); sim_resume (sd, 0, sigrc); signal (SIGINT, prev_sigint); sim_stop_reason (sd, &reason, &sigrc); } #endif if (verbose) sim_info (sd, 0); sim_close (sd, 0); /* If reason is sim_exited, then sigrc holds the exit code which we want to return. If reason is sim_stopped or sim_signalled, then sigrc holds the signal that the simulator received; we want to return that to indicate failure. */ #ifdef SIM_H8300 /* FIXME: Ugh. grep for SLEEP in compile.c */ if (sigrc == SIGILL) abort (); sigrc = 0; #else /* Why did we stop? */ switch (reason) { case sim_signalled: case sim_stopped: if (sigrc != 0) fprintf (stderr, "program stopped with signal %d.\n", sigrc); break; case sim_exited: break; case sim_running: case sim_polling: /* these indicate a serious problem */ abort (); break; } #endif return sigrc; } static void usage () { fprintf (stderr, "Usage: %s [options] program [program args]\n", myname); fprintf (stderr, "Options:\n"); fprintf (stderr, "-a args Pass `args' to simulator.\n"); #ifdef SIM_HAVE_SIMCACHE fprintf (stderr, "-c size Set simulator cache size to `size'.\n"); #endif #ifdef SIM_H8300 fprintf (stderr, "-h Executable is for h8/300h or h8/300s.\n"); #endif fprintf (stderr, "-m size Set memory size of simulator, in bytes.\n"); #ifdef SIM_HAVE_ENVIRONMENT fprintf (stderr, "-o Select operating (kernel) environment.\n"); #endif #ifdef SIM_HAVE_PROFILE fprintf (stderr, "-p freq Set profiling frequency.\n"); fprintf (stderr, "-s size Set profiling size.\n"); #endif fprintf (stderr, "-t Perform instruction tracing.\n"); fprintf (stderr, " Note: Very few simulators support tracing.\n"); fprintf (stderr, "-v Verbose output.\n"); fprintf (stderr, "\n"); fprintf (stderr, "program args Arguments to pass to simulated program.\n"); fprintf (stderr, " Note: Very few simulators support this.\n"); exit (1); }