1 /* Miscellaneous simulator utilities.
2 Copyright (C) 1997 Free Software Foundation, Inc.
3 Contributed by Cygnus Support.
5 This file is part of GDB, the GNU debugger.
7 This program is free software; you can redistribute it and/or modify
8 it under the terms of the GNU General Public License as published by
9 the Free Software Foundation; either version 2, or (at your option)
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
17 You should have received a copy of the GNU General Public License along
18 with this program; if not, write to the Free Software Foundation, Inc.,
19 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. */
22 #include "sim-assert.h"
32 #ifdef HAVE_SYS_TIME_H
33 #include <sys/time.h> /* needed by sys/resource.h */
36 #ifdef HAVE_SYS_RESOURCE_H
37 #include <sys/resource.h>
48 #include "libiberty.h"
50 #include "sim-utils.h"
52 /* Global pointer to all state data.
54 struct sim_state *current_state;
56 /* Allocate zero filled memory with xmalloc - xmalloc aborts of the
60 zalloc (unsigned long size)
62 void *memory = (void *) xmalloc (size);
63 memset (memory, 0, size);
73 /* Allocate a sim_state struct. */
76 sim_state_alloc (SIM_OPEN_KIND kind,
77 host_callback *callback)
80 SIM_DESC sd = ZALLOC (struct sim_state);
82 STATE_MAGIC (sd) = SIM_MAGIC_NUMBER;
83 STATE_CALLBACK (sd) = callback;
84 STATE_OPEN_KIND (sd) = kind;
87 /* Initialize the back link from the cpu struct to the state struct. */
88 /* ??? I can envision a design where the state struct contains an array
89 of pointers to cpu structs, rather than an array of structs themselves.
90 Implementing this is trickier as one may not know what to allocate until
91 one has parsed the args. Parsing the args twice wouldn't be unreasonable,
92 IMHO. If the state struct ever does contain an array of pointers then we
93 can't do this here. */
94 for (cpu_nr = 0; cpu_nr < MAX_NR_PROCESSORS; cpu_nr++)
95 CPU_STATE (STATE_CPU (sd, cpu_nr)) = sd;
105 /* Free a sim_state struct. */
108 sim_state_free (SIM_DESC sd)
110 ASSERT (sd->base.magic == SIM_MAGIC_NUMBER);
112 #ifdef SIM_STATE_FREE
119 /* Turn VALUE into a string with commas. */
122 sim_add_commas (char *buf, int sizeof_buf, unsigned long value)
125 char *endbuf = buf + sizeof_buf - 1;
135 *--endbuf = (value % 10) + '0';
136 } while ((value /= 10) != 0);
141 /* Analyze a prog_name/prog_bfd and set various fields in the state
145 sim_analyze_program (sd, prog_name, prog_bfd)
151 SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER);
153 if (prog_bfd != NULL)
155 if (prog_bfd == STATE_PROG_BFD (sd))
156 /* already analyzed */
159 /* duplicate needed, save the name of the file to be re-opened */
160 prog_name = bfd_get_filename (prog_bfd);
163 /* do we need to duplicate anything? */
164 if (prog_name == NULL)
167 /* open a new copy of the prog_bfd */
168 prog_bfd = bfd_openr (prog_name, STATE_TARGET (sd));
169 if (prog_bfd == NULL)
171 sim_io_eprintf (sd, "%s: can't open \"%s\": %s\n",
174 bfd_errmsg (bfd_get_error ()));
177 if (!bfd_check_format (prog_bfd, bfd_object))
179 sim_io_eprintf (sd, "%s: \"%s\" is not an object file: %s\n",
182 bfd_errmsg (bfd_get_error ()));
183 bfd_close (prog_bfd);
186 if (STATE_ARCHITECTURE (sd) != NULL)
187 bfd_set_arch_info (prog_bfd, STATE_ARCHITECTURE (sd));
190 if (bfd_get_arch (prog_bfd) != bfd_arch_unknown
191 && bfd_get_arch (prog_bfd) != bfd_arch_obscure)
193 STATE_ARCHITECTURE (sd) = bfd_get_arch_info (prog_bfd);
197 /* update the sim structure */
198 if (STATE_PROG_BFD (sd) != NULL)
199 bfd_close (STATE_PROG_BFD (sd));
200 STATE_PROG_BFD (sd) = prog_bfd;
201 STATE_START_ADDR (sd) = bfd_get_start_address (prog_bfd);
203 for (s = prog_bfd->sections; s; s = s->next)
204 if (strcmp (bfd_get_section_name (prog_bfd, s), ".text") == 0)
206 STATE_TEXT_SECTION (sd) = s;
207 STATE_TEXT_START (sd) = bfd_get_section_vma (prog_bfd, s);
208 STATE_TEXT_END (sd) = STATE_TEXT_START (sd) + bfd_section_size (prog_bfd, s);
215 /* Simulator timing support. */
217 /* Called before sim_elapsed_time_since to get a reference point. */
220 sim_elapsed_time_get ()
222 #ifdef HAVE_GETRUSAGE
223 struct rusage mytime;
224 if (getrusage (RUSAGE_SELF, &mytime) == 0)
225 return 1 + (SIM_ELAPSED_TIME) (((double) mytime.ru_utime.tv_sec * 1000) + (((double) mytime.ru_utime.tv_usec + 500) / 1000));
229 return 1 + (SIM_ELAPSED_TIME) time ((time_t) 0);
236 /* Return the elapsed time in milliseconds since START.
237 The actual time may be cpu usage (prefered) or wall clock. */
240 sim_elapsed_time_since (start)
241 SIM_ELAPSED_TIME start;
243 #ifdef HAVE_GETRUSAGE
244 return sim_elapsed_time_get () - start;
247 return (sim_elapsed_time_get () - start) * 1000;
256 /* do_command but with printf style formatting of the arguments */
258 sim_do_commandf (SIM_DESC sd,
265 vasprintf (&buf, fmt, ap);
266 sim_do_command (sd, buf);