1 /* Low level interface to simulators, for the remote server for GDB.
2 Copyright (C) 1995, 1996 Free Software Foundation, Inc.
4 This file is part of GDB.
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 59 Temple Place - Suite 330,
19 Boston, MA 02111-1307, USA. */
23 #include "callback.h" /* GDB simulator callback interface */
24 #include "remote-sim.h" /* GDB simulator interface */
26 extern int remote_debug
;
28 extern host_callback default_callback
; /* in sim/common/callback.c */
30 static char my_registers
[REGISTER_BYTES
] __attribute__ ((aligned
));
31 char * registers
= my_registers
;
33 int target_byte_order
; /* used by simulator */
35 /* We record the result of sim_open so we can pass it
36 back to the other sim_foo routines. */
37 static SIM_DESC gdbsim_desc
= 0;
39 /* This version of "load" should be usable for any simulator that
40 does not support loading itself. */
43 mygeneric_load (bfd
*loadfile_bfd
)
47 for (s
= loadfile_bfd
->sections
; s
; s
= s
->next
)
49 if (s
->flags
& SEC_LOAD
)
53 size
= bfd_get_section_size_before_reloc (s
);
57 bfd_vma lma
; /* use load address, not virtual address */
59 buffer
= xmalloc (size
);
62 /* Is this really necessary? I guess it gives the user something
63 to look at during a long download. */
64 printf ("Loading section %s, size 0x%lx lma 0x%lx\n",
65 bfd_get_section_name (loadfile_bfd
, s
),
67 (unsigned long) lma
); /* chops high 32 bits. FIXME!! */
69 bfd_get_section_contents (loadfile_bfd
, s
, buffer
, 0, size
);
71 write_inferior_memory (lma
, buffer
, size
);
77 printf ("Start address 0x%lx\n",
78 (unsigned long) loadfile_bfd
->start_address
);
80 /* We were doing this in remote-mips.c, I suspect it is right
81 for other targets too. */
82 /* write_pc (loadfile_bfd->start_address); *//* FIXME!! */
86 create_inferior (char *program
, char **argv
)
90 #ifdef TARGET_BYTE_ORDER_SELECTABLE
95 abfd
= bfd_openr (program
, 0);
98 fprintf (stderr
, "gdbserver: can't open %s: %s\n",
99 program
, bfd_errmsg (bfd_get_error ()));
103 if (!bfd_check_format (abfd
, bfd_object
))
105 fprintf (stderr
, "gdbserver: unknown load format for %s: %s\n",
106 program
, bfd_errmsg (bfd_get_error ()));
110 #ifdef TARGET_BYTE_ORDER_SELECTABLE
111 /* Add "-E big" or "-E little" to the argument list depending on the
112 endianness of the program to be loaded. */
113 for (nargs
= 0; argv
[nargs
] != NULL
; nargs
++) /* count the args */
115 new_argv
= alloca (sizeof (char *) * (nargs
+ 3)); /* allocate new args */
116 for (nargs
= 0; argv
[nargs
] != NULL
; nargs
++) /* copy old to new */
117 new_argv
[nargs
] = argv
[nargs
];
118 new_argv
[nargs
] = "-E";
119 new_argv
[nargs
+ 1] = bfd_big_endian (abfd
) ? "big" : "little";
120 new_argv
[nargs
+ 2] = NULL
;
124 /* Create an instance of the simulator. */
125 default_callback
.init (&default_callback
);
126 gdbsim_desc
= sim_open (SIM_OPEN_STANDALONE
, &default_callback
, abfd
, argv
);
127 if (gdbsim_desc
== 0)
130 /* Load the program into the simulator. */
132 if (sim_load (gdbsim_desc
, program
, NULL
, 0) == SIM_RC_FAIL
)
133 mygeneric_load (abfd
);
135 /* Create an inferior process in the simulator. This initializes SP. */
136 sim_create_inferior (gdbsim_desc
, abfd
, argv
, /* env */ NULL
);
137 sim_resume (gdbsim_desc
, 1, 0); /* execute one instr */
141 /* Kill the inferior process. Make us have no inferior. */
146 sim_close (gdbsim_desc
, 0);
147 default_callback
.shutdown (&default_callback
);
150 /* Fetch one register. */
153 fetch_register (int regno
)
155 sim_fetch_register (gdbsim_desc
, regno
, ®isters
[REGISTER_BYTE (regno
)],
156 REGISTER_RAW_SIZE (regno
));
159 /* Fetch all registers, or just one, from the child process. */
162 fetch_inferior_registers (int regno
)
164 if (regno
== -1 || regno
== 0)
165 for (regno
= 0; regno
< NUM_REGS
/*-NUM_FREGS*/ ; regno
++)
166 fetch_register (regno
);
168 fetch_register (regno
);
171 /* Store our register values back into the inferior.
172 If REGNO is -1, do this for all registers.
173 Otherwise, REGNO specifies which register (so we can save time). */
176 store_inferior_registers (int regno
)
180 for (regno
= 0; regno
< NUM_REGS
; regno
++)
181 store_inferior_registers (regno
);
184 sim_store_register (gdbsim_desc
, regno
, ®isters
[REGISTER_BYTE (regno
)],
185 REGISTER_RAW_SIZE (regno
));
188 /* Return nonzero if the given thread is still alive. */
190 mythread_alive (int pid
)
195 /* Wait for process, returns status */
198 mywait (char *status
)
201 enum sim_stop reason
;
203 sim_stop_reason (gdbsim_desc
, &reason
, &sigrc
);
208 printf ("\nChild exited with retcode = %x \n", sigrc
);
215 printf ("\nChild terminated with signal = %x \n", sigrc
);
220 default: /* should this be sim_signalled or sim_stopped? FIXME!! */
222 printf ("\nChild received signal = %x \n", sigrc
);
223 fetch_inferior_registers (0);
225 return (unsigned char) sigrc
;
229 /* Resume execution of the inferior process.
230 If STEP is nonzero, single-step it.
231 If SIGNAL is nonzero, give it that signal. */
234 myresume (int step
, int signo
)
236 /* Should be using target_signal_to_host() or signal numbers in target.h
237 to convert GDB signal number to target signal number. */
238 sim_resume (gdbsim_desc
, step
, signo
);
241 /* Copy LEN bytes from inferior's memory starting at MEMADDR
242 to debugger memory starting at MYADDR. */
245 read_inferior_memory (CORE_ADDR memaddr
, char *myaddr
, int len
)
247 sim_read (gdbsim_desc
, memaddr
, myaddr
, len
);
250 /* Copy LEN bytes of data from debugger memory at MYADDR
251 to inferior's memory at MEMADDR.
252 On failure (cannot write the inferior)
253 returns the value of errno. */
256 write_inferior_memory (CORE_ADDR memaddr
, char *myaddr
, int len
)
258 sim_write (gdbsim_desc
, memaddr
, myaddr
, len
); /* should check for error. FIXME!! */
263 initialize_low (void)