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, 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 char registers[REGISTER_BYTES] __attribute__ ((aligned));
32 int target_byte_order; /* used by simulator */
34 /* We record the result of sim_open so we can pass it
35 back to the other sim_foo routines. */
36 static SIM_DESC gdbsim_desc = 0;
38 /* This version of "load" should be usable for any simulator that
39 does not support loading itself. */
42 generic_load (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 (program, argv)
92 #ifdef TARGET_BYTE_ORDER_SELECTABLE
97 abfd = bfd_openr (program, 0);
100 fprintf (stderr, "gdbserver: can't open %s: %s\n",
101 program, bfd_errmsg (bfd_get_error ()));
105 if (!bfd_check_format (abfd, bfd_object))
107 fprintf (stderr, "gdbserver: unknown load format for %s: %s\n",
108 program, bfd_errmsg (bfd_get_error ()));
112 #ifdef TARGET_BYTE_ORDER_SELECTABLE
113 /* Add "-E big" or "-E little" to the argument list depending on the
114 endianness of the program to be loaded. */
115 for (nargs = 0; argv[nargs] != NULL; nargs++) /* count the args */
117 new_argv = alloca (sizeof (char *) * (nargs + 3)); /* allocate new args */
118 for (nargs = 0; argv[nargs] != NULL; nargs++) /* copy old to new */
119 new_argv[nargs] = argv[nargs];
120 new_argv[nargs] = "-E";
121 new_argv[nargs + 1] = bfd_big_endian (abfd) ? "big" : "little";
122 new_argv[nargs + 2] = NULL;
126 /* Create an instance of the simulator. */
127 default_callback.init (&default_callback);
128 gdbsim_desc = sim_open (SIM_OPEN_STANDALONE, &default_callback, abfd, argv);
129 if (gdbsim_desc == 0)
132 /* Load the program into the simulator. */
134 if (sim_load (gdbsim_desc, program, NULL, 0) == SIM_RC_FAIL)
137 /* Create an inferior process in the simulator. This initializes SP. */
138 sim_create_inferior (gdbsim_desc, abfd, argv, /* env */ NULL);
139 sim_resume (gdbsim_desc, 1, 0); /* execute one instr */
143 /* Kill the inferior process. Make us have no inferior. */
148 sim_close (gdbsim_desc, 0);
149 default_callback.shutdown (&default_callback);
152 /* Fetch one register. */
155 fetch_register (regno)
158 sim_fetch_register (gdbsim_desc, regno, ®isters[REGISTER_BYTE (regno)],
159 REGISTER_RAW_SIZE (regno));
162 /* Fetch all registers, or just one, from the child process. */
165 fetch_inferior_registers (regno)
168 if (regno == -1 || regno == 0)
169 for (regno = 0; regno < NUM_REGS/*-NUM_FREGS*/; regno++)
170 fetch_register (regno);
172 fetch_register (regno);
175 /* Store our register values back into the inferior.
176 If REGNO is -1, do this for all registers.
177 Otherwise, REGNO specifies which register (so we can save time). */
180 store_inferior_registers (regno)
185 for (regno = 0; regno < NUM_REGS; regno++)
186 store_inferior_registers (regno);
189 sim_store_register (gdbsim_desc, regno, ®isters[REGISTER_BYTE (regno)],
190 REGISTER_RAW_SIZE (regno));
193 /* Return nonzero if the given thread is still alive. */
201 /* Wait for process, returns status */
208 enum sim_stop reason;
210 sim_stop_reason (gdbsim_desc, &reason, &sigrc);
215 printf ("\nChild exited with retcode = %x \n", sigrc);
222 printf ("\nChild terminated with signal = %x \n", sigrc);
227 default: /* should this be sim_signalled or sim_stopped? FIXME!! */
229 printf ("\nChild received signal = %x \n", sigrc);
230 fetch_inferior_registers (0);
232 return (unsigned char) sigrc;
236 /* Resume execution of the inferior process.
237 If STEP is nonzero, single-step it.
238 If SIGNAL is nonzero, give it that signal. */
241 myresume (step, signo)
245 /* Should be using target_signal_to_host() or signal numbers in target.h
246 to convert GDB signal number to target signal number. */
247 sim_resume (gdbsim_desc, step, signo);
250 /* Copy LEN bytes from inferior's memory starting at MEMADDR
251 to debugger memory starting at MYADDR. */
254 read_inferior_memory (memaddr, myaddr, len)
259 sim_read (gdbsim_desc, memaddr, myaddr, len);
262 /* Copy LEN bytes of data from debugger memory at MYADDR
263 to inferior's memory at MEMADDR.
264 On failure (cannot write the inferior)
265 returns the value of errno. */
268 write_inferior_memory (memaddr, myaddr, len)
273 sim_write (gdbsim_desc, memaddr, myaddr, len); /* should check for error. FIXME!! */
287 return inferior_pid != 0;