]>
Commit | Line | Data |
---|---|---|
c906108c | 1 | /* Model support. |
7b6bb8da | 2 | Copyright (C) 1996, 1997, 1998, 2007, 2008, 2009, 2010, 2011 |
e4d013fc | 3 | Free Software Foundation, Inc. |
c906108c SS |
4 | Contributed by Cygnus Support. |
5 | ||
6 | This file is part of GDB, the GNU debugger. | |
7 | ||
8 | This program is free software; you can redistribute it and/or modify | |
9 | it under the terms of the GNU General Public License as published by | |
4744ac1b JB |
10 | the Free Software Foundation; either version 3 of the License, or |
11 | (at your option) any later version. | |
c906108c SS |
12 | |
13 | This program is distributed in the hope that it will be useful, | |
14 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
15 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
16 | GNU General Public License for more details. | |
17 | ||
4744ac1b JB |
18 | You should have received a copy of the GNU General Public License |
19 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ | |
c906108c SS |
20 | |
21 | #include "sim-main.h" | |
fd87baa9 | 22 | #include "sim-model.h" |
c906108c SS |
23 | #include "libiberty.h" |
24 | #include "sim-options.h" | |
25 | #include "sim-io.h" | |
26 | #include "sim-assert.h" | |
27 | #include "bfd.h" | |
28 | ||
29 | static void model_set (sim_cpu *, const MODEL *); | |
30 | ||
31 | static DECLARE_OPTION_HANDLER (model_option_handler); | |
32 | ||
33 | static MODULE_INIT_FN sim_model_init; | |
34 | ||
bd0bd508 MF |
35 | enum { |
36 | OPTION_MODEL = OPTION_START, | |
37 | OPTION_MODEL_INFO, | |
38 | }; | |
c906108c SS |
39 | |
40 | static const OPTION model_options[] = { | |
41 | { {"model", required_argument, NULL, OPTION_MODEL}, | |
42 | '\0', "MODEL", "Specify model to simulate", | |
21cf617c | 43 | model_option_handler, NULL }, |
bd0bd508 MF |
44 | |
45 | { {"model-info", no_argument, NULL, OPTION_MODEL_INFO}, | |
46 | '\0', NULL, "List selectable models", | |
47 | model_option_handler, NULL }, | |
48 | { {"info-model", no_argument, NULL, OPTION_MODEL_INFO}, | |
49 | '\0', NULL, NULL, | |
50 | model_option_handler, NULL }, | |
51 | ||
21cf617c | 52 | { {NULL, no_argument, NULL, 0}, '\0', NULL, NULL, NULL, NULL } |
c906108c SS |
53 | }; |
54 | ||
55 | static SIM_RC | |
56 | model_option_handler (SIM_DESC sd, sim_cpu *cpu, int opt, | |
57 | char *arg, int is_command) | |
58 | { | |
59 | switch (opt) | |
60 | { | |
61 | case OPTION_MODEL : | |
62 | { | |
63 | const MODEL *model = sim_model_lookup (arg); | |
64 | if (! model) | |
65 | { | |
53a5351d | 66 | sim_io_eprintf (sd, "unknown model `%s'\n", arg); |
c906108c SS |
67 | return SIM_RC_FAIL; |
68 | } | |
69 | sim_model_set (sd, cpu, model); | |
70 | break; | |
71 | } | |
bd0bd508 MF |
72 | |
73 | case OPTION_MODEL_INFO : | |
74 | { | |
75 | const MACH **machp; | |
76 | const MODEL *model; | |
77 | for (machp = & sim_machs[0]; *machp != NULL; ++machp) | |
78 | { | |
79 | sim_io_printf (sd, "Models for architecture `%s':\n", | |
80 | MACH_NAME (*machp)); | |
81 | for (model = MACH_MODELS (*machp); MODEL_NAME (model) != NULL; | |
82 | ++model) | |
83 | sim_io_printf (sd, " %s", MODEL_NAME (model)); | |
84 | sim_io_printf (sd, "\n"); | |
85 | } | |
86 | break; | |
87 | } | |
c906108c SS |
88 | } |
89 | ||
90 | return SIM_RC_OK; | |
91 | } | |
92 | ||
93 | SIM_RC | |
94 | sim_model_install (SIM_DESC sd) | |
95 | { | |
96 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
97 | ||
98 | sim_add_option_table (sd, NULL, model_options); | |
99 | sim_module_add_init_fn (sd, sim_model_init); | |
100 | ||
101 | return SIM_RC_OK; | |
102 | } | |
103 | ||
104 | /* Subroutine of sim_model_set to set the model for one cpu. */ | |
105 | ||
106 | static void | |
107 | model_set (sim_cpu *cpu, const MODEL *model) | |
108 | { | |
109 | CPU_MACH (cpu) = MODEL_MACH (model); | |
110 | CPU_MODEL (cpu) = model; | |
111 | (* MACH_INIT_CPU (MODEL_MACH (model))) (cpu); | |
112 | (* MODEL_INIT (model)) (cpu); | |
113 | } | |
114 | ||
115 | /* Set the current model of CPU to MODEL. | |
116 | If CPU is NULL, all cpus are set to MODEL. */ | |
117 | ||
118 | void | |
119 | sim_model_set (SIM_DESC sd, sim_cpu *cpu, const MODEL *model) | |
120 | { | |
121 | if (! cpu) | |
122 | { | |
123 | int c; | |
124 | ||
125 | for (c = 0; c < MAX_NR_PROCESSORS; ++c) | |
126 | if (STATE_CPU (sd, c)) | |
127 | model_set (STATE_CPU (sd, c), model); | |
128 | } | |
129 | else | |
130 | { | |
131 | model_set (cpu, model); | |
132 | } | |
133 | } | |
134 | ||
135 | /* Look up model named NAME. | |
136 | Result is pointer to MODEL entry or NULL if not found. */ | |
137 | ||
138 | const MODEL * | |
139 | sim_model_lookup (const char *name) | |
140 | { | |
141 | const MACH **machp; | |
142 | const MODEL *model; | |
143 | ||
144 | for (machp = & sim_machs[0]; *machp != NULL; ++machp) | |
145 | { | |
146 | for (model = MACH_MODELS (*machp); MODEL_NAME (model) != NULL; ++model) | |
147 | { | |
148 | if (strcmp (MODEL_NAME (model), name) == 0) | |
149 | return model; | |
150 | } | |
151 | } | |
152 | return NULL; | |
153 | } | |
154 | ||
155 | /* Look up machine named NAME. | |
156 | Result is pointer to MACH entry or NULL if not found. */ | |
157 | ||
158 | const MACH * | |
159 | sim_mach_lookup (const char *name) | |
160 | { | |
161 | const MACH **machp; | |
162 | ||
163 | for (machp = & sim_machs[0]; *machp != NULL; ++machp) | |
164 | { | |
165 | if (strcmp (MACH_NAME (*machp), name) == 0) | |
166 | return *machp; | |
167 | } | |
168 | return NULL; | |
169 | } | |
170 | ||
171 | /* Look up a machine via its bfd name. | |
172 | Result is pointer to MACH entry or NULL if not found. */ | |
173 | ||
174 | const MACH * | |
175 | sim_mach_lookup_bfd_name (const char *name) | |
176 | { | |
177 | const MACH **machp; | |
178 | ||
179 | for (machp = & sim_machs[0]; *machp != NULL; ++machp) | |
180 | { | |
181 | if (strcmp (MACH_BFD_NAME (*machp), name) == 0) | |
182 | return *machp; | |
183 | } | |
184 | return NULL; | |
185 | } | |
186 | ||
187 | /* Initialize model support. */ | |
188 | ||
189 | static SIM_RC | |
190 | sim_model_init (SIM_DESC sd) | |
191 | { | |
192 | SIM_CPU *cpu; | |
193 | ||
194 | /* If both cpu model and state architecture are set, ensure they're | |
195 | compatible. If only one is set, set the other. If neither are set, | |
196 | use the default model. STATE_ARCHITECTURE is the bfd_arch_info data | |
197 | for the selected "mach" (bfd terminology). */ | |
198 | ||
199 | /* Only check cpu 0. STATE_ARCHITECTURE is for that one only. */ | |
200 | /* ??? At present this only supports homogeneous multiprocessors. */ | |
201 | cpu = STATE_CPU (sd, 0); | |
202 | ||
203 | if (! STATE_ARCHITECTURE (sd) | |
204 | && ! CPU_MACH (cpu)) | |
205 | { | |
206 | /* Set the default model. */ | |
207 | const MODEL *model = sim_model_lookup (WITH_DEFAULT_MODEL); | |
208 | sim_model_set (sd, NULL, model); | |
209 | } | |
210 | ||
211 | if (STATE_ARCHITECTURE (sd) | |
212 | && CPU_MACH (cpu)) | |
213 | { | |
214 | if (strcmp (STATE_ARCHITECTURE (sd)->printable_name, | |
215 | MACH_BFD_NAME (CPU_MACH (cpu))) != 0) | |
216 | { | |
217 | sim_io_eprintf (sd, "invalid model `%s' for `%s'\n", | |
218 | MODEL_NAME (CPU_MODEL (cpu)), | |
219 | STATE_ARCHITECTURE (sd)->printable_name); | |
220 | return SIM_RC_FAIL; | |
221 | } | |
222 | } | |
223 | else if (STATE_ARCHITECTURE (sd)) | |
224 | { | |
225 | /* Use the default model for the selected machine. | |
226 | The default model is the first one in the list. */ | |
227 | const MACH *mach = sim_mach_lookup_bfd_name (STATE_ARCHITECTURE (sd)->printable_name); | |
9846de1b JM |
228 | |
229 | if (mach == NULL) | |
230 | { | |
231 | sim_io_eprintf (sd, "unsupported machine `%s'\n", | |
232 | STATE_ARCHITECTURE (sd)->printable_name); | |
233 | return SIM_RC_FAIL; | |
234 | } | |
c906108c SS |
235 | sim_model_set (sd, NULL, MACH_MODELS (mach)); |
236 | } | |
237 | else | |
238 | { | |
239 | STATE_ARCHITECTURE (sd) = bfd_scan_arch (MACH_BFD_NAME (CPU_MACH (cpu))); | |
240 | } | |
241 | ||
242 | return SIM_RC_OK; | |
243 | } |