Always make PowerPC hypervisor mode memory accesses and instructions
[qemu] / target-ppc / op_helper.h
1 /*
2  *  PowerPC emulation helpers header for qemu.
3  *
4  *  Copyright (c) 2003-2007 Jocelyn Mayer
5  *
6  * This library is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2 of the License, or (at your option) any later version.
10  *
11  * This library is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with this library; if not, write to the Free Software
18  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  */
20
21 #if defined(MEMSUFFIX)
22
23 /* Memory load/store helpers */
24 void glue(do_lsw, MEMSUFFIX) (int dst);
25 void glue(do_lsw_le, MEMSUFFIX) (int dst);
26 void glue(do_stsw, MEMSUFFIX) (int src);
27 void glue(do_stsw_le, MEMSUFFIX) (int src);
28 void glue(do_lmw, MEMSUFFIX) (int dst);
29 void glue(do_lmw_le, MEMSUFFIX) (int dst);
30 void glue(do_stmw, MEMSUFFIX) (int src);
31 void glue(do_stmw_le, MEMSUFFIX) (int src);
32 void glue(do_icbi, MEMSUFFIX) (void);
33 void glue(do_dcbz, MEMSUFFIX) (void);
34 void glue(do_POWER_lscbx, MEMSUFFIX) (int dest, int ra, int rb);
35 void glue(do_POWER2_lfq, MEMSUFFIX) (void);
36 void glue(do_POWER2_lfq_le, MEMSUFFIX) (void);
37 void glue(do_POWER2_stfq, MEMSUFFIX) (void);
38 void glue(do_POWER2_stfq_le, MEMSUFFIX) (void);
39
40 #if defined(TARGET_PPC64)
41 void glue(do_lsw_64, MEMSUFFIX) (int dst);
42 void glue(do_lsw_le_64, MEMSUFFIX) (int dst);
43 void glue(do_stsw_64, MEMSUFFIX) (int src);
44 void glue(do_stsw_le_64, MEMSUFFIX) (int src);
45 void glue(do_lmw_64, MEMSUFFIX) (int dst);
46 void glue(do_lmw_le_64, MEMSUFFIX) (int dst);
47 void glue(do_stmw_64, MEMSUFFIX) (int src);
48 void glue(do_stmw_le_64, MEMSUFFIX) (int src);
49 void glue(do_icbi_64, MEMSUFFIX) (void);
50 void glue(do_dcbz_64, MEMSUFFIX) (void);
51 #endif
52
53 #else
54
55 void do_print_mem_EA (target_ulong EA);
56
57 /* Registers load and stores */
58 void do_load_cr (void);
59 void do_store_cr (uint32_t mask);
60 #if defined(TARGET_PPC64)
61 void do_store_pri (int prio);
62 #endif
63 void do_fpscr_setbit (int bit);
64 void do_store_fpscr (uint32_t mask);
65 target_ulong ppc_load_dump_spr (int sprn);
66 void ppc_store_dump_spr (int sprn, target_ulong val);
67
68 /* Integer arithmetic helpers */
69 void do_adde (void);
70 void do_addmeo (void);
71 void do_divwo (void);
72 void do_divwuo (void);
73 void do_mullwo (void);
74 void do_nego (void);
75 void do_subfe (void);
76 void do_subfmeo (void);
77 void do_subfzeo (void);
78 void do_cntlzw (void);
79 #if defined(TARGET_PPC64)
80 void do_cntlzd (void);
81 #endif
82 void do_sraw (void);
83 #if defined(TARGET_PPC64)
84 void do_adde_64 (void);
85 void do_addmeo_64 (void);
86 void do_divdo (void);
87 void do_divduo (void);
88 void do_mulldo (void);
89 void do_nego_64 (void);
90 void do_subfe_64 (void);
91 void do_subfmeo_64 (void);
92 void do_subfzeo_64 (void);
93 void do_srad (void);
94 #endif
95 void do_popcntb (void);
96 #if defined(TARGET_PPC64)
97 void do_popcntb_64 (void);
98 #endif
99
100 /* Floating-point arithmetic helpers */
101 void do_compute_fprf (int set_class);
102 #ifdef CONFIG_SOFTFLOAT
103 void do_float_check_status (void);
104 #endif
105 #if USE_PRECISE_EMULATION
106 void do_fadd (void);
107 void do_fsub (void);
108 void do_fmul (void);
109 void do_fdiv (void);
110 #endif
111 void do_fsqrt (void);
112 void do_fre (void);
113 void do_fres (void);
114 void do_frsqrte (void);
115 void do_fsel (void);
116 #if USE_PRECISE_EMULATION
117 void do_fmadd (void);
118 void do_fmsub (void);
119 #endif
120 void do_fnmadd (void);
121 void do_fnmsub (void);
122 #if USE_PRECISE_EMULATION
123 void do_frsp (void);
124 #endif
125 void do_fctiw (void);
126 void do_fctiwz (void);
127 #if defined(TARGET_PPC64)
128 void do_fcfid (void);
129 void do_fctid (void);
130 void do_fctidz (void);
131 #endif
132 void do_frin (void);
133 void do_friz (void);
134 void do_frip (void);
135 void do_frim (void);
136 void do_fcmpu (void);
137 void do_fcmpo (void);
138
139 /* Misc */
140 void do_tw (int flags);
141 #if defined(TARGET_PPC64)
142 void do_td (int flags);
143 #endif
144 #if !defined(CONFIG_USER_ONLY)
145 void do_store_msr (void);
146 void do_rfi (void);
147 #if defined(TARGET_PPC64)
148 void do_rfid (void);
149 void do_hrfid (void);
150 #endif
151 void do_load_6xx_tlb (int is_code);
152 void do_load_74xx_tlb (int is_code);
153 #endif
154
155 /* POWER / PowerPC 601 specific helpers */
156 void do_POWER_abso (void);
157 void do_POWER_clcs (void);
158 void do_POWER_div (void);
159 void do_POWER_divo (void);
160 void do_POWER_divs (void);
161 void do_POWER_divso (void);
162 void do_POWER_dozo (void);
163 void do_POWER_maskg (void);
164 void do_POWER_mulo (void);
165 #if !defined(CONFIG_USER_ONLY)
166 void do_POWER_rac (void);
167 void do_POWER_rfsvc (void);
168 void do_store_hid0_601 (void);
169 #endif
170
171 /* PowerPC 602 specific helper */
172 #if !defined(CONFIG_USER_ONLY)
173 void do_op_602_mfrom (void);
174 #endif
175
176 /* PowerPC 440 specific helpers */
177 #if !defined(CONFIG_USER_ONLY)
178 void do_440_tlbre (int word);
179 void do_440_tlbwe (int word);
180 #endif
181
182 /* PowerPC 4xx specific helpers */
183 void do_405_check_sat (void);
184 void do_load_dcr (void);
185 void do_store_dcr (void);
186 #if !defined(CONFIG_USER_ONLY)
187 void do_40x_rfci (void);
188 void do_rfci (void);
189 void do_rfdi (void);
190 void do_rfmci (void);
191 void do_4xx_tlbre_lo (void);
192 void do_4xx_tlbre_hi (void);
193 void do_4xx_tlbwe_lo (void);
194 void do_4xx_tlbwe_hi (void);
195 #endif
196
197 /* PowerPC 440 specific helpers */
198 void do_440_dlmzb (void);
199
200 /* PowerPC 403 specific helpers */
201 #if !defined(CONFIG_USER_ONLY)
202 void do_load_403_pb (int num);
203 void do_store_403_pb (int num);
204 #endif
205
206 /* SPE extension helpers */
207 void do_brinc (void);
208 /* Fixed-point vector helpers */
209 void do_evabs (void);
210 void do_evaddw (void);
211 void do_evcntlsw (void);
212 void do_evcntlzw (void);
213 void do_evneg (void);
214 void do_evrlw (void);
215 void do_evsel (void);
216 void do_evrndw (void);
217 void do_evslw (void);
218 void do_evsrws (void);
219 void do_evsrwu (void);
220 void do_evsubfw (void);
221 void do_evcmpeq (void);
222 void do_evcmpgts (void);
223 void do_evcmpgtu (void);
224 void do_evcmplts (void);
225 void do_evcmpltu (void);
226
227 /* Single precision floating-point helpers */
228 void do_efscmplt (void);
229 void do_efscmpgt (void);
230 void do_efscmpeq (void);
231 void do_efscfsf (void);
232 void do_efscfuf (void);
233 void do_efsctsf (void);
234 void do_efsctuf (void);
235
236 void do_efscfsi (void);
237 void do_efscfui (void);
238 void do_efsctsi (void);
239 void do_efsctui (void);
240 void do_efsctsiz (void);
241 void do_efsctuiz (void);
242
243 /* Double precision floating-point helpers */
244 void do_efdcmplt (void);
245 void do_efdcmpgt (void);
246 void do_efdcmpeq (void);
247 void do_efdcfsf (void);
248 void do_efdcfuf (void);
249 void do_efdctsf (void);
250 void do_efdctuf (void);
251
252 void do_efdcfsi (void);
253 void do_efdcfui (void);
254 void do_efdctsi (void);
255 void do_efdctui (void);
256 void do_efdctsiz (void);
257 void do_efdctuiz (void);
258
259 void do_efdcfs (void);
260 void do_efscfd (void);
261
262 /* Floating-point vector helpers */
263 void do_evfsabs (void);
264 void do_evfsnabs (void);
265 void do_evfsneg (void);
266 void do_evfsadd (void);
267 void do_evfssub (void);
268 void do_evfsmul (void);
269 void do_evfsdiv (void);
270 void do_evfscmplt (void);
271 void do_evfscmpgt (void);
272 void do_evfscmpeq (void);
273 void do_evfststlt (void);
274 void do_evfststgt (void);
275 void do_evfststeq (void);
276 void do_evfscfsi (void);
277 void do_evfscfui (void);
278 void do_evfscfsf (void);
279 void do_evfscfuf (void);
280 void do_evfsctsf (void);
281 void do_evfsctuf (void);
282 void do_evfsctsi (void);
283 void do_evfsctui (void);
284 void do_evfsctsiz (void);
285 void do_evfsctuiz (void);
286
287 /* SPE extension */
288 /* Single precision floating-point helpers */
289 static always_inline uint32_t _do_efsabs (uint32_t val)
290 {
291     return val & ~0x80000000;
292 }
293 static always_inline uint32_t _do_efsnabs (uint32_t val)
294 {
295     return val | 0x80000000;
296 }
297 static always_inline uint32_t _do_efsneg (uint32_t val)
298 {
299     return val ^ 0x80000000;
300 }
301 static always_inline uint32_t _do_efsadd (uint32_t op1, uint32_t op2)
302 {
303     union {
304         uint32_t u;
305         float32 f;
306     } u1, u2;
307     u1.u = op1;
308     u2.u = op2;
309     u1.f = float32_add(u1.f, u2.f, &env->spe_status);
310     return u1.u;
311 }
312 static always_inline uint32_t _do_efssub (uint32_t op1, uint32_t op2)
313 {
314     union {
315         uint32_t u;
316         float32 f;
317     } u1, u2;
318     u1.u = op1;
319     u2.u = op2;
320     u1.f = float32_sub(u1.f, u2.f, &env->spe_status);
321     return u1.u;
322 }
323 static always_inline uint32_t _do_efsmul (uint32_t op1, uint32_t op2)
324 {
325     union {
326         uint32_t u;
327         float32 f;
328     } u1, u2;
329     u1.u = op1;
330     u2.u = op2;
331     u1.f = float32_mul(u1.f, u2.f, &env->spe_status);
332     return u1.u;
333 }
334 static always_inline uint32_t _do_efsdiv (uint32_t op1, uint32_t op2)
335 {
336     union {
337         uint32_t u;
338         float32 f;
339     } u1, u2;
340     u1.u = op1;
341     u2.u = op2;
342     u1.f = float32_div(u1.f, u2.f, &env->spe_status);
343     return u1.u;
344 }
345
346 static always_inline int _do_efststlt (uint32_t op1, uint32_t op2)
347 {
348     union {
349         uint32_t u;
350         float32 f;
351     } u1, u2;
352     u1.u = op1;
353     u2.u = op2;
354     return float32_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0;
355 }
356 static always_inline int _do_efststgt (uint32_t op1, uint32_t op2)
357 {
358     union {
359         uint32_t u;
360         float32 f;
361     } u1, u2;
362     u1.u = op1;
363     u2.u = op2;
364     return float32_le(u1.f, u2.f, &env->spe_status) ? 0 : 1;
365 }
366 static always_inline int _do_efststeq (uint32_t op1, uint32_t op2)
367 {
368     union {
369         uint32_t u;
370         float32 f;
371     } u1, u2;
372     u1.u = op1;
373     u2.u = op2;
374     return float32_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0;
375 }
376 /* Double precision floating-point helpers */
377 static always_inline int _do_efdtstlt (uint64_t op1, uint64_t op2)
378 {
379     union {
380         uint64_t u;
381         float64 f;
382     } u1, u2;
383     u1.u = op1;
384     u2.u = op2;
385     return float64_lt(u1.f, u2.f, &env->spe_status) ? 1 : 0;
386 }
387 static always_inline int _do_efdtstgt (uint64_t op1, uint64_t op2)
388 {
389     union {
390         uint64_t u;
391         float64 f;
392     } u1, u2;
393     u1.u = op1;
394     u2.u = op2;
395     return float64_le(u1.f, u2.f, &env->spe_status) ? 0 : 1;
396 }
397 static always_inline int _do_efdtsteq (uint64_t op1, uint64_t op2)
398 {
399     union {
400         uint64_t u;
401         float64 f;
402     } u1, u2;
403     u1.u = op1;
404     u2.u = op2;
405     return float64_eq(u1.f, u2.f, &env->spe_status) ? 1 : 0;
406 }
407 #endif