2 Copyright (C) 1996, 1997, 1998, 2007, 2008, 2009, 2010, 2011
3 Free Software Foundation, Inc.
4 Contributed by Cygnus Support.
6 This file is part of GDB, the GNU debugger.
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
10 the Free Software Foundation; either version 3 of the License, or
11 (at your option) any later version.
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.
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/>. */
22 #include "sim-model.h"
23 #include "libiberty.h"
24 #include "sim-options.h"
26 #include "sim-assert.h"
29 static void model_set (sim_cpu
*, const MODEL
*);
31 static DECLARE_OPTION_HANDLER (model_option_handler
);
33 static MODULE_INIT_FN sim_model_init
;
36 OPTION_MODEL
= OPTION_START
,
40 static const OPTION model_options
[] = {
41 { {"model", required_argument
, NULL
, OPTION_MODEL
},
42 '\0', "MODEL", "Specify model to simulate",
43 model_option_handler
, NULL
},
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
},
50 model_option_handler
, NULL
},
52 { {NULL
, no_argument
, NULL
, 0}, '\0', NULL
, NULL
, NULL
, NULL
}
56 model_option_handler (SIM_DESC sd
, sim_cpu
*cpu
, int opt
,
57 char *arg
, int is_command
)
63 const MODEL
*model
= sim_model_lookup (arg
);
66 sim_io_eprintf (sd
, "unknown model `%s'\n", arg
);
69 sim_model_set (sd
, cpu
, model
);
73 case OPTION_MODEL_INFO
:
77 for (machp
= & sim_machs
[0]; *machp
!= NULL
; ++machp
)
79 sim_io_printf (sd
, "Models for architecture `%s':\n",
81 for (model
= MACH_MODELS (*machp
); MODEL_NAME (model
) != NULL
;
83 sim_io_printf (sd
, " %s", MODEL_NAME (model
));
84 sim_io_printf (sd
, "\n");
94 sim_model_install (SIM_DESC sd
)
96 SIM_ASSERT (STATE_MAGIC (sd
) == SIM_MAGIC_NUMBER
);
98 sim_add_option_table (sd
, NULL
, model_options
);
99 sim_module_add_init_fn (sd
, sim_model_init
);
104 /* Subroutine of sim_model_set to set the model for one cpu. */
107 model_set (sim_cpu
*cpu
, const MODEL
*model
)
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
);
115 /* Set the current model of CPU to MODEL.
116 If CPU is NULL, all cpus are set to MODEL. */
119 sim_model_set (SIM_DESC sd
, sim_cpu
*cpu
, const MODEL
*model
)
125 for (c
= 0; c
< MAX_NR_PROCESSORS
; ++c
)
126 if (STATE_CPU (sd
, c
))
127 model_set (STATE_CPU (sd
, c
), model
);
131 model_set (cpu
, model
);
135 /* Look up model named NAME.
136 Result is pointer to MODEL entry or NULL if not found. */
139 sim_model_lookup (const char *name
)
144 for (machp
= & sim_machs
[0]; *machp
!= NULL
; ++machp
)
146 for (model
= MACH_MODELS (*machp
); MODEL_NAME (model
) != NULL
; ++model
)
148 if (strcmp (MODEL_NAME (model
), name
) == 0)
155 /* Look up machine named NAME.
156 Result is pointer to MACH entry or NULL if not found. */
159 sim_mach_lookup (const char *name
)
163 for (machp
= & sim_machs
[0]; *machp
!= NULL
; ++machp
)
165 if (strcmp (MACH_NAME (*machp
), name
) == 0)
171 /* Look up a machine via its bfd name.
172 Result is pointer to MACH entry or NULL if not found. */
175 sim_mach_lookup_bfd_name (const char *name
)
179 for (machp
= & sim_machs
[0]; *machp
!= NULL
; ++machp
)
181 if (strcmp (MACH_BFD_NAME (*machp
), name
) == 0)
187 /* Initialize model support. */
190 sim_model_init (SIM_DESC sd
)
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). */
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);
203 if (! STATE_ARCHITECTURE (sd
)
206 /* Set the default model. */
207 const MODEL
*model
= sim_model_lookup (WITH_DEFAULT_MODEL
);
208 sim_model_set (sd
, NULL
, model
);
211 if (STATE_ARCHITECTURE (sd
)
214 if (strcmp (STATE_ARCHITECTURE (sd
)->printable_name
,
215 MACH_BFD_NAME (CPU_MACH (cpu
))) != 0)
217 sim_io_eprintf (sd
, "invalid model `%s' for `%s'\n",
218 MODEL_NAME (CPU_MODEL (cpu
)),
219 STATE_ARCHITECTURE (sd
)->printable_name
);
223 else if (STATE_ARCHITECTURE (sd
))
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
);
231 sim_io_eprintf (sd
, "unsupported machine `%s'\n",
232 STATE_ARCHITECTURE (sd
)->printable_name
);
235 sim_model_set (sd
, NULL
, MACH_MODELS (mach
));
239 STATE_ARCHITECTURE (sd
) = bfd_scan_arch (MACH_BFD_NAME (CPU_MACH (cpu
)));