Commit | Line | Data |
---|---|---|
c906108c | 1 | /* Module support. |
836cc9f4 | 2 | |
ecd75fc8 | 3 | Copyright 1996-2014 Free Software Foundation, Inc. |
836cc9f4 | 4 | |
c906108c SS |
5 | Contributed by Cygnus Support. |
6 | ||
7 | This file is part of GDB, the GNU debugger. | |
8 | ||
9 | This program is free software; you can redistribute it and/or modify | |
10 | it under the terms of the GNU General Public License as published by | |
4744ac1b JB |
11 | the Free Software Foundation; either version 3 of the License, or |
12 | (at your option) any later version. | |
c906108c SS |
13 | |
14 | This program is distributed in the hope that it will be useful, | |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
18 | ||
4744ac1b JB |
19 | You should have received a copy of the GNU General Public License |
20 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
c906108c SS |
21 | |
22 | #include "sim-main.h" | |
23 | #include "sim-io.h" | |
24 | #include "sim-options.h" | |
25 | #include "sim-assert.h" | |
26 | ||
27 | #if WITH_HW | |
28 | #include "sim-hw.h" | |
29 | #endif | |
30 | ||
31 | #include "libiberty.h" | |
32 | ||
33 | /* List of all modules. */ | |
34 | static MODULE_INSTALL_FN * const modules[] = { | |
35 | standard_install, | |
36 | sim_events_install, | |
37 | #ifdef SIM_HAVE_MODEL | |
38 | sim_model_install, | |
39 | #endif | |
40 | #if WITH_ENGINE | |
41 | sim_engine_install, | |
42 | #endif | |
43 | #if WITH_TRACE | |
44 | trace_install, | |
45 | #endif | |
46 | #if WITH_PROFILE | |
47 | profile_install, | |
48 | #endif | |
49 | sim_core_install, | |
50 | #ifndef SIM_HAVE_FLATMEM | |
51 | /* FIXME: should handle flatmem as well FLATMEM */ | |
52 | sim_memopt_install, | |
53 | #endif | |
54 | #if WITH_WATCHPOINTS | |
55 | sim_watchpoint_install, | |
56 | #endif | |
57 | #if WITH_SCACHE | |
58 | scache_install, | |
59 | #endif | |
c906108c SS |
60 | #if WITH_HW |
61 | sim_hw_install, | |
62 | #endif | |
63 | /* Configured in [simulator specific] additional modules. */ | |
64 | #ifdef MODULE_LIST | |
65 | MODULE_LIST | |
66 | #endif | |
67 | 0 | |
68 | }; | |
69 | \f | |
70 | /* Functions called from sim_open. */ | |
71 | ||
72 | /* Initialize common parts before argument processing. */ | |
73 | ||
74 | SIM_RC | |
75 | sim_pre_argv_init (SIM_DESC sd, const char *myname) | |
76 | { | |
77 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
78 | SIM_ASSERT (STATE_MODULES (sd) == NULL); | |
79 | ||
80 | STATE_MY_NAME (sd) = myname + strlen (myname); | |
81 | while (STATE_MY_NAME (sd) > myname && STATE_MY_NAME (sd)[-1] != '/') | |
82 | --STATE_MY_NAME (sd); | |
83 | ||
84 | /* Set the cpu names to default values. */ | |
85 | { | |
86 | int i; | |
87 | for (i = 0; i < MAX_NR_PROCESSORS; ++i) | |
88 | { | |
89 | char *name; | |
39a3ae0a MF |
90 | if (asprintf (&name, "cpu%d", i) < 0) |
91 | return SIM_RC_FAIL; | |
c906108c SS |
92 | CPU_NAME (STATE_CPU (sd, i)) = name; |
93 | } | |
94 | } | |
95 | ||
96 | sim_config_default (sd); | |
97 | ||
98 | /* Install all configured in modules. */ | |
99 | if (sim_module_install (sd) != SIM_RC_OK) | |
100 | return SIM_RC_FAIL; | |
101 | ||
102 | return SIM_RC_OK; | |
103 | } | |
104 | ||
105 | /* Initialize common parts after argument processing. */ | |
106 | ||
107 | SIM_RC | |
108 | sim_post_argv_init (SIM_DESC sd) | |
109 | { | |
110 | int i; | |
111 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
112 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
113 | ||
114 | /* Set the cpu->state backlinks for each cpu. */ | |
115 | for (i = 0; i < MAX_NR_PROCESSORS; ++i) | |
116 | { | |
117 | CPU_STATE (STATE_CPU (sd, i)) = sd; | |
118 | CPU_INDEX (STATE_CPU (sd, i)) = i; | |
119 | } | |
120 | ||
121 | if (sim_module_init (sd) != SIM_RC_OK) | |
122 | return SIM_RC_FAIL; | |
123 | ||
124 | return SIM_RC_OK; | |
125 | } | |
126 | \f | |
127 | /* Install all modules. | |
128 | If this fails, no modules are left installed. */ | |
129 | ||
130 | SIM_RC | |
131 | sim_module_install (SIM_DESC sd) | |
132 | { | |
133 | MODULE_INSTALL_FN * const *modp; | |
134 | ||
135 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
136 | SIM_ASSERT (STATE_MODULES (sd) == NULL); | |
137 | ||
138 | STATE_MODULES (sd) = ZALLOC (struct module_list); | |
139 | for (modp = modules; *modp != NULL; ++modp) | |
140 | { | |
141 | if ((*modp) (sd) != SIM_RC_OK) | |
142 | { | |
143 | sim_module_uninstall (sd); | |
144 | SIM_ASSERT (STATE_MODULES (sd) == NULL); | |
145 | return SIM_RC_FAIL; | |
146 | } | |
147 | } | |
148 | return SIM_RC_OK; | |
149 | } | |
150 | ||
151 | /* Called after all modules have been installed and after argv | |
152 | has been processed. */ | |
153 | ||
154 | SIM_RC | |
155 | sim_module_init (SIM_DESC sd) | |
156 | { | |
157 | struct module_list *modules = STATE_MODULES (sd); | |
158 | MODULE_INIT_LIST *modp; | |
159 | ||
160 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
161 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
162 | ||
163 | for (modp = modules->init_list; modp != NULL; modp = modp->next) | |
164 | { | |
165 | if ((*modp->fn) (sd) != SIM_RC_OK) | |
166 | return SIM_RC_FAIL; | |
167 | } | |
168 | return SIM_RC_OK; | |
169 | } | |
170 | ||
171 | /* Called when ever the simulator is resumed */ | |
172 | ||
173 | SIM_RC | |
174 | sim_module_resume (SIM_DESC sd) | |
175 | { | |
176 | struct module_list *modules = STATE_MODULES (sd); | |
177 | MODULE_RESUME_LIST *modp; | |
178 | ||
179 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
180 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
181 | ||
182 | for (modp = modules->resume_list; modp != NULL; modp = modp->next) | |
183 | { | |
184 | if ((*modp->fn) (sd) != SIM_RC_OK) | |
185 | return SIM_RC_FAIL; | |
186 | } | |
187 | return SIM_RC_OK; | |
188 | } | |
189 | ||
190 | /* Called when ever the simulator is suspended */ | |
191 | ||
192 | SIM_RC | |
193 | sim_module_suspend (SIM_DESC sd) | |
194 | { | |
195 | struct module_list *modules = STATE_MODULES (sd); | |
196 | MODULE_SUSPEND_LIST *modp; | |
197 | ||
198 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
199 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
200 | ||
201 | for (modp = modules->suspend_list; modp != NULL; modp = modp->next) | |
202 | { | |
203 | if ((*modp->fn) (sd) != SIM_RC_OK) | |
204 | return SIM_RC_FAIL; | |
205 | } | |
206 | return SIM_RC_OK; | |
207 | } | |
208 | ||
209 | /* Uninstall installed modules, called by sim_close. */ | |
210 | ||
211 | void | |
212 | sim_module_uninstall (SIM_DESC sd) | |
213 | { | |
214 | struct module_list *modules = STATE_MODULES (sd); | |
215 | MODULE_UNINSTALL_LIST *modp; | |
216 | ||
217 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
218 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
219 | ||
220 | /* Uninstall the modules. */ | |
221 | for (modp = modules->uninstall_list; modp != NULL; modp = modp->next) | |
222 | (*modp->fn) (sd); | |
223 | ||
224 | /* clean-up init list */ | |
225 | { | |
226 | MODULE_INIT_LIST *n, *d; | |
227 | for (d = modules->init_list; d != NULL; d = n) | |
228 | { | |
229 | n = d->next; | |
d79fe0d6 | 230 | free (d); |
c906108c SS |
231 | } |
232 | } | |
233 | ||
234 | /* clean-up resume list */ | |
235 | { | |
236 | MODULE_RESUME_LIST *n, *d; | |
237 | for (d = modules->resume_list; d != NULL; d = n) | |
238 | { | |
239 | n = d->next; | |
d79fe0d6 | 240 | free (d); |
c906108c SS |
241 | } |
242 | } | |
243 | ||
244 | /* clean-up suspend list */ | |
245 | { | |
246 | MODULE_SUSPEND_LIST *n, *d; | |
247 | for (d = modules->suspend_list; d != NULL; d = n) | |
248 | { | |
249 | n = d->next; | |
d79fe0d6 | 250 | free (d); |
c906108c SS |
251 | } |
252 | } | |
253 | ||
254 | /* clean-up uninstall list */ | |
255 | { | |
256 | MODULE_UNINSTALL_LIST *n, *d; | |
257 | for (d = modules->uninstall_list; d != NULL; d = n) | |
258 | { | |
259 | n = d->next; | |
d79fe0d6 | 260 | free (d); |
c906108c SS |
261 | } |
262 | } | |
263 | ||
264 | /* clean-up info list */ | |
265 | { | |
266 | MODULE_INFO_LIST *n, *d; | |
267 | for (d = modules->info_list; d != NULL; d = n) | |
268 | { | |
269 | n = d->next; | |
d79fe0d6 | 270 | free (d); |
c906108c SS |
271 | } |
272 | } | |
273 | ||
d79fe0d6 | 274 | free (modules); |
c906108c SS |
275 | STATE_MODULES (sd) = NULL; |
276 | } | |
277 | ||
278 | /* Called when ever simulator info is needed */ | |
279 | ||
280 | void | |
281 | sim_module_info (SIM_DESC sd, int verbose) | |
282 | { | |
283 | struct module_list *modules = STATE_MODULES (sd); | |
284 | MODULE_INFO_LIST *modp; | |
285 | ||
286 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
287 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
288 | ||
289 | for (modp = modules->info_list; modp != NULL; modp = modp->next) | |
290 | { | |
291 | (*modp->fn) (sd, verbose); | |
292 | } | |
293 | } | |
294 | \f | |
295 | /* Add FN to the init handler list. | |
296 | init in the same order as the install. */ | |
297 | ||
298 | void | |
299 | sim_module_add_init_fn (SIM_DESC sd, MODULE_INIT_FN fn) | |
300 | { | |
301 | struct module_list *modules = STATE_MODULES (sd); | |
302 | MODULE_INIT_LIST *l = ZALLOC (MODULE_INIT_LIST); | |
303 | MODULE_INIT_LIST **last; | |
304 | ||
305 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
306 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
307 | ||
308 | last = &modules->init_list; | |
309 | while (*last != NULL) | |
310 | last = &((*last)->next); | |
311 | ||
312 | l->fn = fn; | |
313 | l->next = NULL; | |
314 | *last = l; | |
315 | } | |
316 | ||
317 | /* Add FN to the resume handler list. | |
318 | resume in the same order as the install. */ | |
319 | ||
320 | void | |
321 | sim_module_add_resume_fn (SIM_DESC sd, MODULE_RESUME_FN fn) | |
322 | { | |
323 | struct module_list *modules = STATE_MODULES (sd); | |
324 | MODULE_RESUME_LIST *l = ZALLOC (MODULE_RESUME_LIST); | |
325 | MODULE_RESUME_LIST **last; | |
326 | ||
327 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
328 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
329 | ||
330 | last = &modules->resume_list; | |
331 | while (*last != NULL) | |
332 | last = &((*last)->next); | |
333 | ||
334 | l->fn = fn; | |
335 | l->next = NULL; | |
336 | *last = l; | |
337 | } | |
338 | ||
339 | /* Add FN to the init handler list. | |
340 | suspend in the reverse order to install. */ | |
341 | ||
342 | void | |
343 | sim_module_add_suspend_fn (SIM_DESC sd, MODULE_SUSPEND_FN fn) | |
344 | { | |
345 | struct module_list *modules = STATE_MODULES (sd); | |
346 | MODULE_SUSPEND_LIST *l = ZALLOC (MODULE_SUSPEND_LIST); | |
347 | MODULE_SUSPEND_LIST **last; | |
348 | ||
349 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
350 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
351 | ||
352 | last = &modules->suspend_list; | |
353 | while (*last != NULL) | |
354 | last = &((*last)->next); | |
355 | ||
356 | l->fn = fn; | |
357 | l->next = modules->suspend_list; | |
358 | modules->suspend_list = l; | |
359 | } | |
360 | ||
361 | /* Add FN to the uninstall handler list. | |
362 | Uninstall in reverse order to install. */ | |
363 | ||
364 | void | |
365 | sim_module_add_uninstall_fn (SIM_DESC sd, MODULE_UNINSTALL_FN fn) | |
366 | { | |
367 | struct module_list *modules = STATE_MODULES (sd); | |
368 | MODULE_UNINSTALL_LIST *l = ZALLOC (MODULE_UNINSTALL_LIST); | |
369 | ||
370 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
371 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
372 | ||
373 | l->fn = fn; | |
374 | l->next = modules->uninstall_list; | |
375 | modules->uninstall_list = l; | |
376 | } | |
377 | ||
378 | /* Add FN to the info handler list. | |
379 | Report info in the same order as the install. */ | |
380 | ||
381 | void | |
382 | sim_module_add_info_fn (SIM_DESC sd, MODULE_INFO_FN fn) | |
383 | { | |
384 | struct module_list *modules = STATE_MODULES (sd); | |
385 | MODULE_INFO_LIST *l = ZALLOC (MODULE_INFO_LIST); | |
386 | MODULE_INFO_LIST **last; | |
387 | ||
388 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
389 | SIM_ASSERT (STATE_MODULES (sd) != NULL); | |
390 | ||
391 | last = &modules->info_list; | |
392 | while (*last != NULL) | |
393 | last = &((*last)->next); | |
394 | ||
395 | l->fn = fn; | |
396 | l->next = NULL; | |
397 | *last = l; | |
398 | } |