Commit | Line | Data |
---|---|---|
c906108c SS |
1 | /* Main simulator loop for CGEN-based simulators. |
2 | Copyright (C) 1998 Free Software Foundation, Inc. | |
3 | Contributed by Cygnus Solutions. | |
4 | ||
5 | This file is part of GDB, the GNU debugger. | |
6 | ||
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) | |
10 | any later version. | |
11 | ||
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. | |
16 | ||
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. */ | |
20 | ||
21 | /* ??? These are old notes, kept around for now. | |
22 | Collecting profile data and tracing slow us down so we don't do them in | |
23 | "fast mode". | |
24 | There are 6 possibilities on 2 axes: | |
25 | - no-scaching, insn-scaching, basic-block-scaching | |
26 | - run with full features or run fast | |
27 | Supporting all six possibilities in one executable is a bit much but | |
28 | supporting full/fast seems reasonable. | |
29 | If the scache is configured in it is always used. | |
30 | If pbb-scaching is configured in it is always used. | |
31 | ??? Sometimes supporting more than one set of semantic functions will make | |
32 | the simulator too large - this should be configurable. Blah blah blah. | |
33 | ??? Supporting full/fast can be more modular, blah blah blah. | |
34 | When the framework is more modular, this can be. | |
35 | */ | |
36 | ||
37 | #include "sim-main.h" | |
38 | #include "sim-assert.h" | |
39 | ||
40 | #ifndef SIM_ENGINE_PREFIX_HOOK | |
41 | #define SIM_ENGINE_PREFIX_HOOK(sd) | |
42 | #endif | |
43 | #ifndef SIM_ENGINE_POSTFIX_HOOK | |
44 | #define SIM_ENGINE_POSTFIX_HOOK(sd) | |
45 | #endif | |
46 | ||
47 | static sim_event_handler has_stepped; | |
48 | static void prime_cpu (SIM_CPU *, int); | |
49 | static void engine_run_1 (SIM_DESC, int, int); | |
50 | static void engine_run_n (SIM_DESC, int, int, int, int); | |
51 | ||
52 | /* sim_resume for cgen */ | |
53 | ||
54 | void | |
55 | sim_resume (SIM_DESC sd, int step, int siggnal) | |
56 | { | |
57 | sim_engine *engine = STATE_ENGINE (sd); | |
58 | jmp_buf buf; | |
59 | int jmpval; | |
60 | ||
61 | ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
62 | ||
63 | /* we only want to be single stepping the simulator once */ | |
64 | if (engine->stepper != NULL) | |
65 | { | |
66 | sim_events_deschedule (sd, engine->stepper); | |
67 | engine->stepper = NULL; | |
68 | } | |
69 | if (step) | |
70 | engine->stepper = sim_events_schedule (sd, 1, has_stepped, sd); | |
71 | ||
72 | sim_module_resume (sd); | |
73 | ||
74 | #if WITH_SCACHE | |
75 | if (USING_SCACHE_P (sd)) | |
76 | scache_flush (sd); | |
77 | #endif | |
78 | ||
79 | /* run/resume the simulator */ | |
80 | ||
81 | sim_engine_set_run_state (sd, sim_running, 0); | |
82 | ||
83 | engine->jmpbuf = &buf; | |
84 | jmpval = setjmp (buf); | |
85 | if (jmpval == sim_engine_start_jmpval | |
86 | || jmpval == sim_engine_restart_jmpval) | |
87 | { | |
88 | int last_cpu_nr = sim_engine_last_cpu_nr (sd); | |
89 | int next_cpu_nr = sim_engine_next_cpu_nr (sd); | |
90 | int nr_cpus = sim_engine_nr_cpus (sd); | |
91 | /* ??? Setting max_insns to 0 allows pbb/jit code to run wild and is | |
92 | useful if all one wants to do is run a benchmark. Need some better | |
93 | way to identify this case. */ | |
94 | int max_insns = (step | |
95 | ? 1 | |
7a292a7a SS |
96 | : (nr_cpus == 1 |
97 | /*&& wip:no-events*/ | |
98 | /* Don't do this if running under gdb, need to | |
99 | poll ui for events. */ | |
100 | && STATE_OPEN_KIND (sd) == SIM_OPEN_STANDALONE) | |
c906108c | 101 | ? 0 |
7a292a7a | 102 | : 8); /*FIXME: magic number*/ |
c906108c SS |
103 | int fast_p = STATE_RUN_FAST_P (sd); |
104 | ||
105 | sim_events_preprocess (sd, last_cpu_nr >= nr_cpus, next_cpu_nr >= nr_cpus); | |
106 | if (next_cpu_nr >= nr_cpus) | |
107 | next_cpu_nr = 0; | |
108 | if (nr_cpus == 1) | |
109 | engine_run_1 (sd, max_insns, fast_p); | |
110 | else | |
111 | engine_run_n (sd, next_cpu_nr, nr_cpus, max_insns, fast_p); | |
112 | } | |
113 | #if 1 /*wip*/ | |
114 | else | |
115 | { | |
116 | /* Account for the last insn executed. */ | |
117 | SIM_CPU *cpu = STATE_CPU (sd, sim_engine_last_cpu_nr (sd)); | |
118 | ++ CPU_INSN_COUNT (cpu); | |
119 | TRACE_INSN_FINI (cpu, NULL, 1); | |
120 | } | |
121 | #endif | |
122 | ||
123 | engine->jmpbuf = NULL; | |
124 | ||
125 | { | |
126 | int i; | |
127 | int nr_cpus = sim_engine_nr_cpus (sd); | |
128 | ||
129 | #if 0 /*wip,ignore*/ | |
130 | /* If the loop exits, either we single-stepped or @cpu@_engine_stop | |
131 | was called. */ | |
132 | if (step) | |
133 | sim_engine_set_run_state (sd, sim_stopped, SIM_SIGTRAP); | |
134 | else | |
135 | sim_engine_set_run_state (sd, pending_reason, pending_sigrc); | |
136 | #endif | |
137 | ||
138 | for (i = 0; i < nr_cpus; ++i) | |
139 | { | |
140 | SIM_CPU *cpu = STATE_CPU (sd, i); | |
141 | ||
142 | PROFILE_TOTAL_INSN_COUNT (CPU_PROFILE_DATA (cpu)) += CPU_INSN_COUNT (cpu); | |
143 | } | |
144 | } | |
145 | ||
146 | sim_module_suspend (sd); | |
147 | } | |
148 | ||
149 | /* Halt the simulator after just one instruction. */ | |
150 | ||
151 | static void | |
152 | has_stepped (SIM_DESC sd, void *data) | |
153 | { | |
154 | ASSERT (STATE_MAGIC (sd) == SIM_MAGIC_NUMBER); | |
155 | sim_engine_halt (sd, NULL, NULL, NULL_CIA, sim_stopped, SIM_SIGTRAP); | |
156 | } | |
157 | ||
158 | /* Prepare a cpu for running. | |
159 | MAX_INSNS is the number of insns to execute per time slice. | |
160 | If 0 it means the cpu can run as long as it wants (e.g. until the | |
161 | program completes). | |
162 | ??? Perhaps this should be an argument to the engine_fn. */ | |
163 | ||
164 | static void | |
165 | prime_cpu (SIM_CPU *cpu, int max_insns) | |
166 | { | |
167 | CPU_MAX_SLICE_INSNS (cpu) = max_insns; | |
168 | CPU_INSN_COUNT (cpu) = 0; | |
169 | ||
170 | /* Initialize the insn descriptor table. | |
171 | This has to be done after all initialization so we just defer it to | |
172 | here. */ | |
173 | ||
174 | if (MACH_PREPARE_RUN (CPU_MACH (cpu))) | |
175 | (* MACH_PREPARE_RUN (CPU_MACH (cpu))) (cpu); | |
176 | } | |
177 | ||
178 | /* Main loop, for 1 cpu. */ | |
179 | ||
180 | static void | |
181 | engine_run_1 (SIM_DESC sd, int max_insns, int fast_p) | |
182 | { | |
183 | sim_cpu *cpu = STATE_CPU (sd, 0); | |
184 | ENGINE_FN *fn = fast_p ? CPU_FAST_ENGINE_FN (cpu) : CPU_FULL_ENGINE_FN (cpu); | |
185 | ||
186 | prime_cpu (cpu, max_insns); | |
187 | ||
188 | while (1) | |
189 | { | |
190 | SIM_ENGINE_PREFIX_HOOK (sd); | |
191 | ||
192 | (*fn) (cpu); | |
193 | ||
194 | SIM_ENGINE_POSTFIX_HOOK (sd); | |
195 | ||
196 | /* process any events */ | |
197 | if (sim_events_tick (sd)) | |
198 | sim_events_process (sd); | |
199 | } | |
200 | } | |
201 | ||
202 | /* Main loop, for multiple cpus. */ | |
203 | ||
204 | static void | |
205 | engine_run_n (SIM_DESC sd, int next_cpu_nr, int nr_cpus, int max_insns, int fast_p) | |
206 | { | |
207 | int i; | |
208 | ENGINE_FN *engine_fns[MAX_NR_PROCESSORS]; | |
209 | ||
210 | for (i = 0; i < nr_cpus; ++i) | |
211 | { | |
212 | SIM_CPU *cpu = STATE_CPU (sd, i); | |
213 | ||
214 | engine_fns[i] = fast_p ? CPU_FAST_ENGINE_FN (cpu) : CPU_FULL_ENGINE_FN (cpu); | |
215 | prime_cpu (cpu, max_insns); | |
216 | } | |
217 | ||
218 | while (1) | |
219 | { | |
220 | SIM_ENGINE_PREFIX_HOOK (sd); | |
221 | ||
222 | /* FIXME: proper cycling of all of them, blah blah blah. */ | |
223 | while (next_cpu_nr != nr_cpus) | |
224 | { | |
225 | SIM_CPU *cpu = STATE_CPU (sd, next_cpu_nr); | |
226 | ||
227 | (* engine_fns[next_cpu_nr]) (cpu); | |
228 | ++next_cpu_nr; | |
229 | } | |
230 | ||
231 | SIM_ENGINE_POSTFIX_HOOK (sd); | |
232 | ||
233 | /* process any events */ | |
234 | if (sim_events_tick (sd)) | |
235 | sim_events_process (sd); | |
236 | } | |
237 | } |