Commit | Line | Data |
---|---|---|
c906108c SS |
1 | /* run front end support for all the simulators. |
2 | Copyright (C) 1992, 93-96, 1997 Free Software Foundation, Inc. | |
3 | ||
4 | This program is free software; you can redistribute it and/or modify | |
5 | it under the terms of the GNU General Public License as published by | |
6 | the Free Software Foundation; either version 2, or (at your option) | |
7 | any later version. | |
8 | ||
9 | This program is distributed in the hope that it will be useful, | |
10 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
11 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
12 | GNU General Public License for more details. | |
13 | ||
14 | You should have received a copy of the GNU General Public License along | |
15 | with this program; if not, write to the Free Software Foundation, Inc., | |
16 | 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */ | |
17 | ||
18 | /* Steve Chamberlain sac@cygnus.com, | |
19 | and others at Cygnus. */ | |
20 | ||
21 | #include "config.h" | |
22 | #include "tconfig.h" | |
23 | ||
24 | #include <signal.h> | |
25 | #include <stdio.h> | |
26 | #ifdef __STDC__ | |
27 | #include <stdarg.h> | |
28 | #else | |
29 | #include <varargs.h> | |
30 | #endif | |
31 | ||
32 | #ifdef HAVE_STDLIB_H | |
33 | #include <stdlib.h> | |
34 | #endif | |
35 | ||
36 | #ifdef HAVE_STRING_H | |
37 | #include <string.h> | |
38 | #else | |
39 | #ifdef HAVE_STRINGS_H | |
40 | #include <strings.h> | |
41 | #endif | |
42 | #endif | |
43 | ||
44 | #include "libiberty.h" | |
45 | #include "bfd.h" | |
46 | #include "callback.h" | |
47 | #include "remote-sim.h" | |
48 | ||
49 | #include "../libiberty/alloca-conf.h" | |
50 | ||
51 | static void usage PARAMS ((void)); | |
52 | extern int optind; | |
53 | extern char *optarg; | |
54 | ||
55 | extern host_callback default_callback; | |
56 | ||
57 | static char *myname; | |
58 | ||
c906108c SS |
59 | /* NOTE: sim_size() and sim_trace() are going away */ |
60 | extern int sim_trace PARAMS ((SIM_DESC sd)); | |
61 | ||
62 | extern int getopt (); | |
63 | ||
7a292a7a SS |
64 | #ifdef NEED_UI_LOOP_HOOK |
65 | /* Gdb foolery. This is only needed for gdb using a gui. */ | |
66 | int (*ui_loop_hook) PARAMS ((int signo)); | |
67 | #endif | |
68 | ||
c906108c SS |
69 | static SIM_DESC sd; |
70 | ||
71 | static RETSIGTYPE | |
72 | cntrl_c (int sig) | |
73 | { | |
74 | if (! sim_stop (sd)) | |
75 | { | |
76 | fprintf (stderr, "Quit!\n"); | |
77 | exit (1); | |
78 | } | |
79 | } | |
80 | ||
81 | int | |
82 | main (ac, av) | |
83 | int ac; | |
84 | char **av; | |
85 | { | |
86 | RETSIGTYPE (*prev_sigint) (); | |
87 | bfd *abfd; | |
88 | int i; | |
89 | int verbose = 0; | |
90 | int trace = 0; | |
91 | char *name; | |
92 | static char *no_args[4]; | |
93 | char **sim_argv = &no_args[0]; | |
94 | char **prog_args; | |
95 | enum sim_stop reason; | |
96 | int sigrc; | |
97 | ||
98 | myname = av[0] + strlen (av[0]); | |
99 | while (myname > av[0] && myname[-1] != '/') | |
100 | --myname; | |
101 | ||
102 | /* The first element of sim_open's argv is the program name. */ | |
103 | no_args[0] = av[0]; | |
104 | #ifdef SIM_HAVE_BIENDIAN | |
105 | no_args[1] = "-E"; | |
106 | no_args[2] = "set-later"; | |
107 | #endif | |
108 | ||
109 | /* FIXME: This is currently being migrated into sim_open. | |
110 | Simulators that use functions such as sim_size() still require | |
111 | this. */ | |
112 | default_callback.init (&default_callback); | |
113 | sim_set_callbacks (&default_callback); | |
114 | ||
115 | /* FIXME: This is currently being rewritten to have each simulator | |
116 | do all argv processing. */ | |
117 | ||
118 | #ifdef SIM_H8300 /* FIXME: quick hack */ | |
119 | while ((i = getopt (ac, av, "a:c:m:p:s:htv")) != EOF) | |
120 | #else | |
121 | while ((i = getopt (ac, av, "a:c:m:p:s:tv")) != EOF) | |
122 | #endif | |
123 | switch (i) | |
124 | { | |
125 | case 'a': | |
126 | /* FIXME: Temporary hack. */ | |
127 | { | |
128 | int len = strlen (av[0]) + strlen (optarg); | |
129 | char *argbuf = (char *) alloca (len + 2 + 50); | |
130 | sprintf (argbuf, "%s %s", av[0], optarg); | |
131 | #ifdef SIM_HAVE_BIENDIAN | |
132 | /* The desired endianness must be passed to sim_open. | |
133 | The value for "set-later" is set when we know what it is. | |
134 | -E support isn't yet part of the published interface. */ | |
135 | strcat (argbuf, " -E set-later"); | |
136 | #endif | |
137 | sim_argv = buildargv (argbuf); | |
138 | } | |
139 | break; | |
140 | #ifdef SIM_HAVE_SIMCACHE | |
141 | case 'c': | |
142 | sim_set_simcache_size (atoi (optarg)); | |
143 | break; | |
144 | #endif | |
145 | case 'm': | |
146 | /* FIXME: Rename to sim_set_mem_size. */ | |
147 | sim_size (atoi (optarg)); | |
148 | break; | |
149 | #ifdef SIM_HAVE_PROFILE | |
150 | case 'p': | |
151 | sim_set_profile (atoi (optarg)); | |
152 | break; | |
153 | case 's': | |
154 | sim_set_profile_size (atoi (optarg)); | |
155 | break; | |
156 | #endif | |
157 | case 't': | |
158 | trace = 1; | |
159 | /* FIXME: need to allow specification of what to trace. */ | |
160 | /* sim_set_trace (1); */ | |
161 | break; | |
162 | case 'v': | |
163 | /* Things that are printed with -v are the kinds of things that | |
164 | gcc -v prints. This is not meant to include detailed tracing | |
165 | or debugging information, just summaries. */ | |
166 | verbose = 1; | |
167 | /* sim_set_verbose (1); */ | |
168 | break; | |
169 | /* FIXME: Quick hack, to be replaced by more general facility. */ | |
170 | #ifdef SIM_H8300 | |
171 | case 'h': | |
172 | set_h8300h (1); | |
173 | break; | |
174 | #endif | |
175 | default: | |
176 | usage (); | |
177 | } | |
178 | ||
179 | ac -= optind; | |
180 | av += optind; | |
181 | if (ac <= 0) | |
182 | usage (); | |
183 | ||
184 | name = *av; | |
185 | prog_args = av; | |
186 | ||
187 | if (verbose) | |
188 | { | |
189 | printf ("%s %s\n", myname, name); | |
190 | } | |
191 | ||
192 | abfd = bfd_openr (name, 0); | |
193 | if (!abfd) | |
194 | { | |
195 | fprintf (stderr, "%s: can't open %s: %s\n", | |
196 | myname, name, bfd_errmsg (bfd_get_error ())); | |
197 | exit (1); | |
198 | } | |
199 | ||
200 | if (!bfd_check_format (abfd, bfd_object)) | |
201 | { | |
202 | fprintf (stderr, "%s: can't load %s: %s\n", | |
203 | myname, name, bfd_errmsg (bfd_get_error ())); | |
204 | exit (1); | |
205 | } | |
206 | ||
207 | #ifdef SIM_HAVE_BIENDIAN | |
208 | /* The endianness must be passed to sim_open because one may wish to | |
209 | examine/set registers before calling sim_load [which is the other | |
210 | place where one can determine endianness]. We previously passed the | |
211 | endianness via global `target_byte_order' but that's not a clean | |
212 | interface. */ | |
213 | for (i = 1; sim_argv[i + 1] != NULL; ++i) | |
214 | continue; | |
215 | if (bfd_big_endian (abfd)) | |
216 | sim_argv[i] = "big"; | |
217 | else | |
218 | sim_argv[i] = "little"; | |
219 | #endif | |
220 | ||
221 | /* Ensure that any run-time initialisation that needs to be | |
222 | performed by the simulator can occur. */ | |
223 | sd = sim_open (SIM_OPEN_STANDALONE, &default_callback, abfd, sim_argv); | |
224 | if (sd == 0) | |
225 | exit (1); | |
226 | ||
227 | if (sim_load (sd, name, abfd, 0) == SIM_RC_FAIL) | |
228 | exit (1); | |
229 | ||
230 | if (sim_create_inferior (sd, abfd, prog_args, NULL) == SIM_RC_FAIL) | |
231 | exit (1); | |
232 | ||
233 | prev_sigint = signal (SIGINT, cntrl_c); | |
234 | if (trace) | |
235 | { | |
236 | int done = 0; | |
237 | while (!done) | |
238 | { | |
239 | done = sim_trace (sd); | |
240 | } | |
241 | } | |
242 | else | |
243 | { | |
244 | sim_resume (sd, 0, 0); | |
245 | } | |
246 | signal (SIGINT, prev_sigint); | |
247 | ||
248 | if (verbose) | |
249 | sim_info (sd, 0); | |
250 | ||
251 | sim_stop_reason (sd, &reason, &sigrc); | |
252 | ||
253 | sim_close (sd, 0); | |
254 | ||
255 | /* If reason is sim_exited, then sigrc holds the exit code which we want | |
256 | to return. If reason is sim_stopped or sim_signalled, then sigrc holds | |
257 | the signal that the simulator received; we want to return that to | |
258 | indicate failure. */ | |
259 | ||
260 | #ifdef SIM_H8300 /* FIXME: Ugh. grep for SLEEP in compile.c */ | |
261 | if (sigrc == SIGILL) | |
262 | abort (); | |
263 | sigrc = 0; | |
264 | #else | |
265 | /* Why did we stop? */ | |
266 | switch (reason) | |
267 | { | |
268 | case sim_signalled: | |
269 | case sim_stopped: | |
270 | if (sigrc != 0) | |
271 | fprintf (stderr, "program stopped with signal %d.\n", sigrc); | |
272 | break; | |
273 | ||
274 | case sim_exited: | |
275 | break; | |
276 | ||
277 | case sim_running: | |
278 | case sim_polling: /* these indicate a serious problem */ | |
279 | abort (); | |
280 | break; | |
281 | ||
282 | } | |
283 | #endif | |
284 | ||
285 | return sigrc; | |
286 | } | |
287 | ||
288 | static void | |
289 | usage () | |
290 | { | |
291 | fprintf (stderr, "Usage: %s [options] program [program args]\n", myname); | |
292 | fprintf (stderr, "Options:\n"); | |
293 | fprintf (stderr, "-a args Pass `args' to simulator.\n"); | |
294 | #ifdef SIM_HAVE_SIMCACHE | |
295 | fprintf (stderr, "-c size Set simulator cache size to `size'.\n"); | |
296 | #endif | |
297 | #ifdef SIM_H8300 | |
298 | fprintf (stderr, "-h Executable is for h8/300h or h8/300s.\n"); | |
299 | #endif | |
300 | fprintf (stderr, "-m size Set memory size of simulator, in bytes.\n"); | |
301 | #ifdef SIM_HAVE_PROFILE | |
302 | fprintf (stderr, "-p freq Set profiling frequency.\n"); | |
303 | fprintf (stderr, "-s size Set profiling size.\n"); | |
304 | #endif | |
305 | fprintf (stderr, "-t Perform instruction tracing.\n"); | |
306 | fprintf (stderr, " Note: Very few simulators support tracing.\n"); | |
307 | fprintf (stderr, "-v Verbose output.\n"); | |
308 | fprintf (stderr, "\n"); | |
309 | fprintf (stderr, "program args Arguments to pass to simulated program.\n"); | |
310 | fprintf (stderr, " Note: Very few simulators support this.\n"); | |
311 | exit (1); | |
312 | } |