]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blame - sim/arm/wrapper.c
Add special case handling when GDB set CPSR register
[thirdparty/binutils-gdb.git] / sim / arm / wrapper.c
CommitLineData
c906108c
SS
1/* run front end support for arm
2 Copyright (C) 1995, 1996, 1997 Free Software Foundation, Inc.
3
4This file is part of ARM SIM.
5
6GNU CC is free software; you can redistribute it and/or modify
7it under the terms of the GNU General Public License as published by
8the Free Software Foundation; either version 2, or (at your option)
9any later version.
10
11GNU CC is distributed in the hope that it will be useful,
12but WITHOUT ANY WARRANTY; without even the implied warranty of
13MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14GNU General Public License for more details.
15
16You should have received a copy of the GNU General Public License
17along with this program; if not, write to the Free Software
18Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
19
20/* This file provides the interface between the simulator and run.c and gdb
21 (when the simulator is linked with gdb).
22 All simulator interaction should go through this file. */
23
24#include <stdio.h>
25#include <stdarg.h>
6d358e86 26#include <string.h>
c906108c
SS
27#include <bfd.h>
28#include <signal.h>
29#include "callback.h"
30#include "remote-sim.h"
31#include "armdefs.h"
32#include "armemu.h"
33#include "dbg_rdi.h"
6d358e86 34#include "ansidecl.h"
c906108c
SS
35
36host_callback *sim_callback;
37
38static struct ARMul_State *state;
39
40/* Who is using the simulator. */
41static SIM_OPEN_KIND sim_kind;
42
43/* argv[0] */
44static char *myname;
45
46/* Memory size in bytes. */
47static int mem_size = (1 << 21);
48
49/* Non-zero to display start up banner, and maybe other things. */
50static int verbosity;
51
52/* Non-zero to set big endian mode. */
53static int big_endian;
54
7a292a7a
SS
55int stop_simulator;
56
dfcd3bfb 57static void
c906108c
SS
58init ()
59{
60 static int done;
61
62 if (!done)
63 {
dfcd3bfb 64 ARMul_EmulateInit ();
c906108c
SS
65 state = ARMul_NewState ();
66 state->bigendSig = (big_endian ? HIGH : LOW);
dfcd3bfb
JM
67 ARMul_MemoryInit (state, mem_size);
68 ARMul_OSInit (state);
69 ARMul_CoProInit (state);
c906108c
SS
70 state->verbose = verbosity;
71 done = 1;
72 }
73}
74
75/* Set verbosity level of simulator.
76 This is not intended to produce detailed tracing or debugging information.
77 Just summaries. */
78/* FIXME: common/run.c doesn't do this yet. */
79
80void
81sim_set_verbose (v)
82 int v;
83{
84 verbosity = v;
85}
86
87/* Set the memory size to SIZE bytes.
dfcd3bfb 88 Must be called before initializing simulator. */
c906108c
SS
89/* FIXME: Rename to sim_set_mem_size. */
90
dfcd3bfb 91void
c906108c
SS
92sim_size (size)
93 int size;
94{
95 mem_size = size;
96}
97
dfcd3bfb
JM
98void
99ARMul_ConsolePrint (ARMul_State * state, const char *format, ...)
c906108c
SS
100{
101 va_list ap;
102
103 if (state->verbose)
104 {
105 va_start (ap, format);
106 vprintf (format, ap);
107 va_end (ap);
108 }
109}
110
6d358e86
NC
111ARMword
112ARMul_Debug (ARMul_State * state ATTRIBUTE_UNUSED, ARMword pc ATTRIBUTE_UNUSED, ARMword instr ATTRIBUTE_UNUSED)
c906108c 113{
6d358e86 114 return 0;
c906108c
SS
115}
116
117int
118sim_write (sd, addr, buffer, size)
6d358e86 119 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
120 SIM_ADDR addr;
121 unsigned char *buffer;
122 int size;
123{
124 int i;
125 init ();
126 for (i = 0; i < size; i++)
127 {
dfcd3bfb 128 ARMul_WriteByte (state, addr + i, buffer[i]);
c906108c
SS
129 }
130 return size;
131}
132
133int
134sim_read (sd, addr, buffer, size)
6d358e86 135 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
136 SIM_ADDR addr;
137 unsigned char *buffer;
138 int size;
139{
140 int i;
141 init ();
142 for (i = 0; i < size; i++)
143 {
144 buffer[i] = ARMul_ReadByte (state, addr + i);
145 }
146 return size;
147}
148
149int
150sim_trace (sd)
6d358e86 151 SIM_DESC sd ATTRIBUTE_UNUSED;
dfcd3bfb
JM
152{
153 (*sim_callback->printf_filtered) (sim_callback,
154 "This simulator does not support tracing\n");
c906108c
SS
155 return 1;
156}
157
158int
159sim_stop (sd)
6d358e86 160 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c 161{
7a292a7a
SS
162 state->Emulate = STOP;
163 stop_simulator = 1;
164 return 1;
c906108c
SS
165}
166
167void
168sim_resume (sd, step, siggnal)
6d358e86
NC
169 SIM_DESC sd ATTRIBUTE_UNUSED;
170 int step;
171 int siggnal ATTRIBUTE_UNUSED;
c906108c
SS
172{
173 state->EndCondition = 0;
7a292a7a 174 stop_simulator = 0;
c906108c
SS
175
176 if (step)
177 {
178 state->Reg[15] = ARMul_DoInstr (state);
179 if (state->EndCondition == 0)
180 state->EndCondition = RDIError_BreakpointReached;
181 }
182 else
183 {
dfcd3bfb
JM
184#if 1 /* JGS */
185 state->NextInstr = RESUME; /* treat as PC change */
c906108c
SS
186#endif
187 state->Reg[15] = ARMul_DoProg (state);
188 }
189
190 FLUSHPIPE;
191}
192
193SIM_RC
194sim_create_inferior (sd, abfd, argv, env)
6d358e86 195 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
196 struct _bfd *abfd;
197 char **argv;
198 char **env;
199{
dfcd3bfb 200 int argvlen = 0;
c906108c
SS
201 char **arg;
202
203 if (abfd != NULL)
204 ARMul_SetPC (state, bfd_get_start_address (abfd));
205 else
dfcd3bfb 206 ARMul_SetPC (state, 0); /* ??? */
c906108c 207
dfcd3bfb 208#if 1 /* JGS */
c906108c
SS
209 /* We explicitly select a processor capable of supporting the ARM
210 32bit mode, and then we force the simulated CPU into the 32bit
211 User mode: */
dfcd3bfb
JM
212 ARMul_SelectProcessor (state, ARM600);
213 ARMul_SetCPSR (state, USER32MODE);
c906108c
SS
214#endif
215
216 if (argv != NULL)
217 {
218 /*
dfcd3bfb
JM
219 ** Set up the command line (by laboriously stringing together the
220 ** environment carefully picked apart by our caller...)
221 */
c906108c
SS
222 /* Free any old stuff */
223 if (state->CommandLine != NULL)
224 {
dfcd3bfb 225 free (state->CommandLine);
c906108c
SS
226 state->CommandLine = NULL;
227 }
dfcd3bfb 228
c906108c
SS
229 /* See how much we need */
230 for (arg = argv; *arg != NULL; arg++)
dfcd3bfb
JM
231 argvlen += strlen (*arg) + 1;
232
c906108c 233 /* allocate it... */
dfcd3bfb 234 state->CommandLine = malloc (argvlen + 1);
c906108c
SS
235 if (state->CommandLine != NULL)
236 {
237 arg = argv;
dfcd3bfb 238 state->CommandLine[0] = '\0';
c906108c
SS
239 for (arg = argv; *arg != NULL; arg++)
240 {
dfcd3bfb
JM
241 strcat (state->CommandLine, *arg);
242 strcat (state->CommandLine, " ");
c906108c
SS
243 }
244 }
245 }
246
247 if (env != NULL)
248 {
249 /* Now see if there's a MEMSIZE spec in the environment */
250 while (*env)
251 {
dfcd3bfb 252 if (strncmp (*env, "MEMSIZE=", sizeof ("MEMSIZE=") - 1) == 0)
c906108c 253 {
c906108c 254 char *end_of_num;
dfcd3bfb 255
c906108c 256 /* Set up memory limit */
dfcd3bfb
JM
257 state->MemSize =
258 strtoul (*env + sizeof ("MEMSIZE=") - 1, &end_of_num, 0);
c906108c
SS
259 }
260 env++;
261 }
262 }
263
264 return SIM_RC_OK;
265}
266
267void
268sim_info (sd, verbose)
6d358e86
NC
269 SIM_DESC sd ATTRIBUTE_UNUSED;
270 int verbose ATTRIBUTE_UNUSED;
c906108c
SS
271{
272}
273
274
dfcd3bfb 275static int
c906108c
SS
276frommem (state, memory)
277 struct ARMul_State *state;
278 unsigned char *memory;
279{
280 if (state->bigendSig == HIGH)
281 {
282 return (memory[0] << 24)
dfcd3bfb 283 | (memory[1] << 16) | (memory[2] << 8) | (memory[3] << 0);
c906108c
SS
284 }
285 else
286 {
287 return (memory[3] << 24)
dfcd3bfb 288 | (memory[2] << 16) | (memory[1] << 8) | (memory[0] << 0);
c906108c
SS
289 }
290}
291
292
293static void
dfcd3bfb 294tomem (state, memory, val)
c906108c
SS
295 struct ARMul_State *state;
296 unsigned char *memory;
297 int val;
298{
299 if (state->bigendSig == HIGH)
300 {
301 memory[0] = val >> 24;
302 memory[1] = val >> 16;
303 memory[2] = val >> 8;
304 memory[3] = val >> 0;
305 }
306 else
307 {
308 memory[3] = val >> 24;
309 memory[2] = val >> 16;
310 memory[1] = val >> 8;
311 memory[0] = val >> 0;
312 }
313}
314
315int
316sim_store_register (sd, rn, memory, length)
6d358e86 317 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
318 int rn;
319 unsigned char *memory;
6d358e86 320 int length ATTRIBUTE_UNUSED;
c906108c
SS
321{
322 init ();
3463c3fb
NC
323 if (rn == 25)
324 {
325 state->Cpsr = frommem (state, memory);
326 ARMul_CPSRAltered (state);
327 }
328 else
329 ARMul_SetReg (state, state->Mode, rn, frommem (state, memory));
c906108c
SS
330 return -1;
331}
332
333int
334sim_fetch_register (sd, rn, memory, length)
6d358e86 335 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
336 int rn;
337 unsigned char *memory;
6d358e86 338 int length ATTRIBUTE_UNUSED;
c906108c
SS
339{
340 ARMword regval;
341
342 init ();
343 if (rn < 16)
dfcd3bfb
JM
344 regval = ARMul_GetReg (state, state->Mode, rn);
345 else if (rn == 25) /* FIXME: use PS_REGNUM from gdb/config/arm/tm-arm.h */
346 regval = ARMul_GetCPSR (state);
c906108c 347 else
dfcd3bfb 348 regval = 0; /* FIXME: should report an error */
c906108c
SS
349 tomem (state, memory, regval);
350 return -1;
351}
352
353SIM_DESC
354sim_open (kind, ptr, abfd, argv)
355 SIM_OPEN_KIND kind;
356 host_callback *ptr;
357 struct _bfd *abfd;
358 char **argv;
359{
360 sim_kind = kind;
6c9e0292
FCE
361 if (myname) free (myname);
362 myname = xstrdup (argv[0]);
c906108c 363 sim_callback = ptr;
dfcd3bfb 364
c906108c
SS
365 /* Decide upon the endian-ness of the processor.
366 If we can, get the information from the bfd itself.
367 Otherwise look to see if we have been given a command
368 line switch that tells us. Otherwise default to little endian. */
369 if (abfd != NULL)
370 big_endian = bfd_big_endian (abfd);
371 else if (argv[1] != NULL)
372 {
373 int i;
dfcd3bfb 374
c906108c
SS
375 /* Scan for endian-ness switch. */
376 for (i = 0; (argv[i] != NULL) && (argv[i][0] != 0); i++)
dfcd3bfb
JM
377 if (argv[i][0] == '-' && argv[i][1] == 'E')
378 {
379 char c;
380
381 if ((c = argv[i][2]) == 0)
382 {
383 ++i;
384 c = argv[i][0];
385 }
386
387 switch (c)
388 {
389 case 0:
390 sim_callback->printf_filtered
391 (sim_callback, "No argument to -E option provided\n");
392 break;
393
394 case 'b':
395 case 'B':
396 big_endian = 1;
397 break;
398
399 case 'l':
400 case 'L':
401 big_endian = 0;
402 break;
403
404 default:
405 sim_callback->printf_filtered
406 (sim_callback, "Unrecognised argument to -E option\n");
407 break;
408 }
409 }
c906108c
SS
410 }
411
412 return (SIM_DESC) 1;
413}
414
415void
416sim_close (sd, quitting)
6d358e86
NC
417 SIM_DESC sd ATTRIBUTE_UNUSED;
418 int quitting ATTRIBUTE_UNUSED;
c906108c 419{
6c9e0292
FCE
420 if (myname) free (myname);
421 myname = NULL;
c906108c
SS
422}
423
424SIM_RC
425sim_load (sd, prog, abfd, from_tty)
426 SIM_DESC sd;
427 char *prog;
428 bfd *abfd;
6d358e86 429 int from_tty ATTRIBUTE_UNUSED;
c906108c 430{
dfcd3bfb 431 extern bfd *sim_load_file (); /* ??? Don't know where this should live. */
c906108c
SS
432 bfd *prog_bfd;
433
434 prog_bfd = sim_load_file (sd, myname, sim_callback, prog, abfd,
dfcd3bfb 435 sim_kind == SIM_OPEN_DEBUG, 0, sim_write);
c906108c
SS
436 if (prog_bfd == NULL)
437 return SIM_RC_FAIL;
438 ARMul_SetPC (state, bfd_get_start_address (prog_bfd));
439 if (abfd == NULL)
440 bfd_close (prog_bfd);
441 return SIM_RC_OK;
442}
443
444void
445sim_stop_reason (sd, reason, sigrc)
6d358e86 446 SIM_DESC sd ATTRIBUTE_UNUSED;
c906108c
SS
447 enum sim_stop *reason;
448 int *sigrc;
449{
7a292a7a
SS
450 if (stop_simulator)
451 {
452 *reason = sim_stopped;
453 *sigrc = SIGINT;
454 }
455 else if (state->EndCondition == 0)
c906108c
SS
456 {
457 *reason = sim_exited;
458 *sigrc = state->Reg[0] & 255;
459 }
460 else
461 {
462 *reason = sim_stopped;
463 if (state->EndCondition == RDIError_BreakpointReached)
464 *sigrc = SIGTRAP;
465 else
466 *sigrc = 0;
467 }
468}
469
470void
471sim_do_command (sd, cmd)
6d358e86
NC
472 SIM_DESC sd ATTRIBUTE_UNUSED;
473 char *cmd ATTRIBUTE_UNUSED;
dfcd3bfb
JM
474{
475 (*sim_callback->printf_filtered) (sim_callback,
476 "This simulator does not accept any commands.\n");
c906108c
SS
477}
478
479
480void
481sim_set_callbacks (ptr)
482 host_callback *ptr;
483{
484 sim_callback = ptr;
485}