Commit | Line | Data |
---|---|---|
c906108c SS |
1 | /* This file is part of the GNU simulators. |
2 | ||
3 | Copyright (C) 1994-1995,1997, Andrew Cagney <cagney@highland.com.au> | |
4 | ||
5 | This program is free software; you can redistribute it and/or modify | |
6 | it under the terms of the GNU General Public License as published by | |
7 | the Free Software Foundation; either version 2 of the License, or | |
8 | (at your option) any later version. | |
9 | ||
10 | This program is distributed in the hope that it will be useful, | |
11 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
12 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
13 | GNU General Public License for more details. | |
14 | ||
15 | You should have received a copy of the GNU General Public License | |
16 | along with this program; if not, write to the Free Software | |
17 | Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA. | |
18 | ||
19 | */ | |
20 | ||
21 | ||
22 | #include "sim-main.h" | |
23 | #include "sim-assert.h" | |
24 | #include "bfd.h" | |
25 | ||
26 | ||
27 | int current_host_byte_order; | |
28 | int current_target_byte_order; | |
29 | int current_stdio; | |
30 | ||
31 | enum sim_alignments current_alignment; | |
32 | ||
33 | #if defined (WITH_FLOATING_POINT) | |
34 | int current_floating_point; | |
35 | #endif | |
36 | ||
37 | ||
38 | ||
39 | /* map a byte order onto a textual string */ | |
40 | ||
41 | static const char * | |
42 | config_byte_order_to_a (int byte_order) | |
43 | { | |
44 | switch (byte_order) | |
45 | { | |
46 | case LITTLE_ENDIAN: | |
47 | return "LITTLE_ENDIAN"; | |
48 | case BIG_ENDIAN: | |
49 | return "BIG_ENDIAN"; | |
50 | case 0: | |
51 | return "0"; | |
52 | } | |
53 | return "UNKNOWN"; | |
54 | } | |
55 | ||
56 | ||
57 | static const char * | |
58 | config_stdio_to_a (int stdio) | |
59 | { | |
60 | switch (stdio) | |
61 | { | |
62 | case DONT_USE_STDIO: | |
63 | return "DONT_USE_STDIO"; | |
64 | case DO_USE_STDIO: | |
65 | return "DO_USE_STDIO"; | |
66 | case 0: | |
67 | return "0"; | |
68 | } | |
69 | return "UNKNOWN"; | |
70 | } | |
71 | ||
72 | ||
73 | static const char * | |
74 | config_environment_to_a (enum sim_environment environment) | |
75 | { | |
76 | switch (environment) | |
77 | { | |
78 | case ALL_ENVIRONMENT: | |
79 | return "ALL_ENVIRONMENT"; | |
80 | case USER_ENVIRONMENT: | |
81 | return "USER_ENVIRONMENT"; | |
82 | case VIRTUAL_ENVIRONMENT: | |
83 | return "VIRTUAL_ENVIRONMENT"; | |
84 | case OPERATING_ENVIRONMENT: | |
85 | return "OPERATING_ENVIRONMENT"; | |
86 | } | |
87 | return "UNKNOWN"; | |
88 | } | |
89 | ||
90 | ||
91 | static const char * | |
92 | config_alignment_to_a (enum sim_alignments alignment) | |
93 | { | |
94 | switch (alignment) | |
95 | { | |
96 | case MIXED_ALIGNMENT: | |
97 | return "MIXED_ALIGNMENT"; | |
98 | case NONSTRICT_ALIGNMENT: | |
99 | return "NONSTRICT_ALIGNMENT"; | |
100 | case STRICT_ALIGNMENT: | |
101 | return "STRICT_ALIGNMENT"; | |
102 | case FORCED_ALIGNMENT: | |
103 | return "FORCED_ALIGNMENT"; | |
104 | } | |
105 | return "UNKNOWN"; | |
106 | } | |
107 | ||
108 | ||
109 | #if defined (WITH_FLOATING_POINT) | |
110 | static const char * | |
111 | config_floating_point_to_a (int floating_point) | |
112 | { | |
113 | switch (floating_point) | |
114 | { | |
115 | case SOFT_FLOATING_POINT: | |
116 | return "SOFT_FLOATING_POINT"; | |
117 | case HARD_FLOATING_POINT: | |
118 | return "HARD_FLOATING_POINT"; | |
119 | case 0: | |
120 | return "0"; | |
121 | } | |
122 | return "UNKNOWN"; | |
123 | } | |
124 | #endif | |
125 | ||
126 | /* Set the default environment, prior to parsing argv. */ | |
127 | ||
128 | void | |
129 | sim_config_default (SIM_DESC sd) | |
130 | { | |
131 | /* Set the current environment to ALL_ENVIRONMENT to indicate none has been | |
132 | selected yet. This is so that after parsing argv, we know whether the | |
133 | environment was explicitly specified or not. */ | |
134 | STATE_ENVIRONMENT (sd) = ALL_ENVIRONMENT; | |
135 | } | |
136 | ||
137 | /* Complete and verify the simulation environment. */ | |
138 | ||
139 | SIM_RC | |
140 | sim_config (SIM_DESC sd) | |
141 | { | |
142 | int prefered_target_byte_order; | |
143 | SIM_ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
144 | ||
145 | /* extract all relevant information */ | |
146 | if (STATE_PROG_BFD (sd) == NULL) | |
147 | prefered_target_byte_order = 0; | |
148 | else | |
149 | prefered_target_byte_order = (bfd_little_endian(STATE_PROG_BFD (sd)) | |
150 | ? LITTLE_ENDIAN | |
151 | : BIG_ENDIAN); | |
152 | ||
153 | /* set the host byte order */ | |
154 | current_host_byte_order = 1; | |
155 | if (*(char*)(¤t_host_byte_order)) | |
156 | current_host_byte_order = LITTLE_ENDIAN; | |
157 | else | |
158 | current_host_byte_order = BIG_ENDIAN; | |
159 | ||
160 | /* verify the host byte order */ | |
161 | if (CURRENT_HOST_BYTE_ORDER != current_host_byte_order) | |
162 | { | |
163 | sim_io_eprintf (sd, "host (%s) and configured (%s) byte order in conflict", | |
164 | config_byte_order_to_a (current_host_byte_order), | |
165 | config_byte_order_to_a (CURRENT_HOST_BYTE_ORDER)); | |
166 | return SIM_RC_FAIL; | |
167 | } | |
168 | ||
169 | ||
170 | /* set the target byte order */ | |
171 | #if (WITH_TREE_PROPERTIES) | |
172 | if (current_target_byte_order == 0) | |
173 | current_target_byte_order | |
174 | = (tree_find_boolean_property (root, "/options/little-endian?") | |
175 | ? LITTLE_ENDIAN | |
176 | : BIG_ENDIAN); | |
177 | #endif | |
178 | if (current_target_byte_order == 0 | |
179 | && prefered_target_byte_order != 0) | |
180 | current_target_byte_order = prefered_target_byte_order; | |
181 | if (current_target_byte_order == 0) | |
182 | current_target_byte_order = WITH_TARGET_BYTE_ORDER; | |
183 | if (current_target_byte_order == 0) | |
184 | current_target_byte_order = WITH_DEFAULT_TARGET_BYTE_ORDER; | |
185 | ||
186 | /* verify the target byte order */ | |
187 | if (CURRENT_TARGET_BYTE_ORDER == 0) | |
188 | { | |
189 | sim_io_eprintf (sd, "Target byte order unspecified\n"); | |
190 | return SIM_RC_FAIL; | |
191 | } | |
192 | if (CURRENT_TARGET_BYTE_ORDER != current_target_byte_order) | |
193 | sim_io_eprintf (sd, "Target (%s) and configured (%s) byte order in conflict\n", | |
194 | config_byte_order_to_a (current_target_byte_order), | |
195 | config_byte_order_to_a (CURRENT_TARGET_BYTE_ORDER)); | |
196 | if (prefered_target_byte_order != 0 | |
197 | && CURRENT_TARGET_BYTE_ORDER != prefered_target_byte_order) | |
198 | sim_io_eprintf (sd, "Target (%s) and specified (%s) byte order in conflict\n", | |
199 | config_byte_order_to_a (CURRENT_TARGET_BYTE_ORDER), | |
200 | config_byte_order_to_a (prefered_target_byte_order)); | |
201 | ||
202 | ||
203 | /* set the stdio */ | |
204 | if (current_stdio == 0) | |
205 | current_stdio = WITH_STDIO; | |
206 | if (current_stdio == 0) | |
207 | current_stdio = DO_USE_STDIO; | |
208 | ||
209 | /* verify the stdio */ | |
210 | if (CURRENT_STDIO == 0) | |
211 | { | |
212 | sim_io_eprintf (sd, "Target standard IO unspecified\n"); | |
213 | return SIM_RC_FAIL; | |
214 | } | |
215 | if (CURRENT_STDIO != current_stdio) | |
216 | { | |
217 | sim_io_eprintf (sd, "Target (%s) and configured (%s) standard IO in conflict\n", | |
218 | config_stdio_to_a (CURRENT_STDIO), | |
219 | config_stdio_to_a (current_stdio)); | |
220 | return SIM_RC_FAIL; | |
221 | } | |
222 | ||
223 | ||
224 | /* check the value of MSB */ | |
225 | if (WITH_TARGET_WORD_MSB != 0 | |
226 | && WITH_TARGET_WORD_MSB != (WITH_TARGET_WORD_BITSIZE - 1)) | |
227 | { | |
228 | sim_io_eprintf (sd, "Target bitsize (%d) contradicts target most significant bit (%d)\n", | |
229 | WITH_TARGET_WORD_BITSIZE, WITH_TARGET_WORD_MSB); | |
230 | return SIM_RC_FAIL; | |
231 | } | |
232 | ||
233 | ||
234 | /* set the environment */ | |
235 | #if (WITH_TREE_PROPERTIES) | |
236 | if (STATE_ENVIRONMENT (sd) == ALL_ENVIRONMENT) | |
237 | { | |
238 | const char *env = | |
239 | tree_find_string_property(root, "/openprom/options/env"); | |
240 | STATE_ENVIRONMENT (sd) = ((strcmp(env, "user") == 0 | |
241 | || strcmp(env, "uea") == 0) | |
242 | ? USER_ENVIRONMENT | |
243 | : (strcmp(env, "virtual") == 0 | |
244 | || strcmp(env, "vea") == 0) | |
245 | ? VIRTUAL_ENVIRONMENT | |
246 | : (strcmp(env, "operating") == 0 | |
247 | || strcmp(env, "oea") == 0) | |
248 | ? OPERATING_ENVIRONMENT | |
249 | : ALL_ENVIRONMENT); | |
250 | } | |
251 | #endif | |
252 | if (STATE_ENVIRONMENT (sd) == ALL_ENVIRONMENT) | |
253 | STATE_ENVIRONMENT (sd) = DEFAULT_ENVIRONMENT; | |
254 | ||
255 | ||
256 | /* set the alignment */ | |
257 | #if (WITH_TREE_PROPERTIES) | |
258 | if (current_alignment == 0) | |
259 | current_alignment = | |
260 | (tree_find_boolean_property(root, "/openprom/options/strict-alignment?") | |
261 | ? STRICT_ALIGNMENT | |
262 | : NONSTRICT_ALIGNMENT); | |
263 | #endif | |
264 | if (current_alignment == 0) | |
265 | current_alignment = WITH_ALIGNMENT; | |
266 | if (current_alignment == 0) | |
267 | current_alignment = WITH_DEFAULT_ALIGNMENT; | |
268 | ||
269 | /* verify the alignment */ | |
270 | if (CURRENT_ALIGNMENT == 0) | |
271 | { | |
272 | sim_io_eprintf (sd, "Target alignment unspecified\n"); | |
273 | return SIM_RC_FAIL; | |
274 | } | |
275 | if (CURRENT_ALIGNMENT != current_alignment) | |
276 | { | |
277 | sim_io_eprintf (sd, "Target (%s) and configured (%s) alignment in conflict\n", | |
278 | config_alignment_to_a (CURRENT_ALIGNMENT), | |
279 | config_alignment_to_a (current_alignment)); | |
280 | return SIM_RC_FAIL; | |
281 | } | |
282 | ||
283 | #if defined (WITH_FLOATING_POINT) | |
284 | ||
285 | /* set the floating point */ | |
286 | if (current_floating_point == 0) | |
287 | current_floating_point = WITH_FLOATING_POINT; | |
288 | ||
289 | /* verify the floating point */ | |
290 | if (CURRENT_FLOATING_POINT == 0) | |
291 | { | |
292 | sim_io_eprintf (sd, "Target floating-point unspecified\n"); | |
293 | return SIM_RC_FAIL; | |
294 | } | |
295 | if (CURRENT_FLOATING_POINT != current_floating_point) | |
296 | { | |
297 | sim_io_eprintf (sd, "Target (%s) and configured (%s) floating-point in conflict\n", | |
298 | config_alignment_to_a (CURRENT_FLOATING_POINT), | |
299 | config_alignment_to_a (current_floating_point)); | |
300 | return SIM_RC_FAIL; | |
301 | } | |
302 | ||
303 | #endif | |
304 | return SIM_RC_OK; | |
305 | } | |
306 | ||
307 | ||
308 | void | |
309 | print_sim_config (SIM_DESC sd) | |
310 | { | |
311 | #if defined (__GNUC__) && defined (__VERSION__) | |
312 | sim_io_printf (sd, "Compiled by GCC %s on %s %s\n", | |
313 | __VERSION__, __DATE__, __TIME__); | |
314 | #else | |
315 | sim_io_printf (sd, "Compiled on %s %s\n", __DATE__, __TIME__); | |
316 | #endif | |
317 | ||
318 | sim_io_printf (sd, "WITH_TARGET_BYTE_ORDER = %s\n", | |
319 | config_byte_order_to_a (WITH_TARGET_BYTE_ORDER)); | |
320 | ||
321 | sim_io_printf (sd, "WITH_DEFAULT_TARGET_BYTE_ORDER = %s\n", | |
322 | config_byte_order_to_a (WITH_DEFAULT_TARGET_BYTE_ORDER)); | |
323 | ||
324 | sim_io_printf (sd, "WITH_HOST_BYTE_ORDER = %s\n", | |
325 | config_byte_order_to_a (WITH_HOST_BYTE_ORDER)); | |
326 | ||
327 | sim_io_printf (sd, "WITH_STDIO = %s\n", | |
328 | config_stdio_to_a (WITH_STDIO)); | |
329 | ||
330 | sim_io_printf (sd, "WITH_TARGET_WORD_MSB = %d\n", | |
331 | WITH_TARGET_WORD_MSB); | |
332 | ||
333 | sim_io_printf (sd, "WITH_TARGET_WORD_BITSIZE = %d\n", | |
334 | WITH_TARGET_WORD_BITSIZE); | |
335 | ||
336 | sim_io_printf (sd, "WITH_TARGET_ADDRESS_BITSIZE = %d\n", | |
337 | WITH_TARGET_ADDRESS_BITSIZE); | |
338 | ||
339 | sim_io_printf (sd, "WITH_TARGET_CELL_BITSIZE = %d\n", | |
340 | WITH_TARGET_CELL_BITSIZE); | |
341 | ||
342 | sim_io_printf (sd, "WITH_TARGET_FLOATING_POINT_BITSIZE = %d\n", | |
343 | WITH_TARGET_FLOATING_POINT_BITSIZE); | |
344 | ||
345 | sim_io_printf (sd, "WITH_ENVIRONMENT = %s\n", | |
346 | config_environment_to_a (WITH_ENVIRONMENT)); | |
347 | ||
348 | sim_io_printf (sd, "WITH_ALIGNMENT = %s\n", | |
349 | config_alignment_to_a (WITH_ALIGNMENT)); | |
350 | ||
351 | #if defined (WITH_DEFAULT_ALIGNMENT) | |
352 | sim_io_printf (sd, "WITH_DEFAULT_ALIGNMENT = %s\n", | |
353 | config_alignment_to_a (WITH_DEFAULT_ALIGNMENT)); | |
354 | #endif | |
355 | ||
356 | #if defined (WITH_XOR_ENDIAN) | |
357 | sim_io_printf (sd, "WITH_XOR_ENDIAN = %d\n", WITH_XOR_ENDIAN); | |
358 | #endif | |
359 | ||
360 | #if defined (WITH_FLOATING_POINT) | |
361 | sim_io_printf (sd, "WITH_FLOATING_POINT = %s\n", | |
362 | config_floating_point_to_a (WITH_FLOATING_POINT)); | |
363 | #endif | |
364 | ||
365 | #if defined (WITH_SMP) | |
366 | sim_io_printf (sd, "WITH_SMP = %d\n", WITH_SMP); | |
367 | #endif | |
368 | ||
369 | #if defined (WITH_RESERVED_BITS) | |
370 | sim_io_printf (sd, "WITH_RESERVED_BITS = %d\n", WITH_RESERVED_BITS); | |
371 | #endif | |
372 | ||
373 | #if defined (WITH_PROFILE) | |
374 | sim_io_printf (sd, "WITH_PROFILE = %d\n", WITH_PROFILE); | |
375 | #endif | |
376 | ||
377 | } |