Statistics
| Branch: | Revision:

root / target-ppc / op.c @ d7e4b87e

History | View | Annotate | Download (48 kB)

1 79aceca5 bellard
/*
2 3fc6c082 bellard
 *  PowerPC emulation micro-operations for qemu.
3 5fafdf24 ths
 *
4 76a66253 j_mayer
 *  Copyright (c) 2003-2007 Jocelyn Mayer
5 79aceca5 bellard
 *
6 79aceca5 bellard
 * This library is free software; you can redistribute it and/or
7 79aceca5 bellard
 * modify it under the terms of the GNU Lesser General Public
8 79aceca5 bellard
 * License as published by the Free Software Foundation; either
9 79aceca5 bellard
 * version 2 of the License, or (at your option) any later version.
10 79aceca5 bellard
 *
11 79aceca5 bellard
 * This library is distributed in the hope that it will be useful,
12 79aceca5 bellard
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13 79aceca5 bellard
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14 79aceca5 bellard
 * Lesser General Public License for more details.
15 79aceca5 bellard
 *
16 79aceca5 bellard
 * You should have received a copy of the GNU Lesser General Public
17 79aceca5 bellard
 * License along with this library; if not, write to the Free Software
18 79aceca5 bellard
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19 79aceca5 bellard
 */
20 79aceca5 bellard
21 a541f297 bellard
//#define DEBUG_OP
22 a541f297 bellard
23 79aceca5 bellard
#include "config.h"
24 79aceca5 bellard
#include "exec.h"
25 76a66253 j_mayer
#include "op_helper.h"
26 79aceca5 bellard
27 28b6751f bellard
#define REG 0
28 28b6751f bellard
#include "op_template.h"
29 28b6751f bellard
30 28b6751f bellard
#define REG 1
31 28b6751f bellard
#include "op_template.h"
32 28b6751f bellard
33 28b6751f bellard
#define REG 2
34 28b6751f bellard
#include "op_template.h"
35 28b6751f bellard
36 28b6751f bellard
#define REG 3
37 28b6751f bellard
#include "op_template.h"
38 28b6751f bellard
39 28b6751f bellard
#define REG 4
40 28b6751f bellard
#include "op_template.h"
41 28b6751f bellard
42 28b6751f bellard
#define REG 5
43 28b6751f bellard
#include "op_template.h"
44 28b6751f bellard
45 28b6751f bellard
#define REG 6
46 28b6751f bellard
#include "op_template.h"
47 28b6751f bellard
48 28b6751f bellard
#define REG 7
49 28b6751f bellard
#include "op_template.h"
50 28b6751f bellard
51 28b6751f bellard
#define REG 8
52 28b6751f bellard
#include "op_template.h"
53 28b6751f bellard
54 28b6751f bellard
#define REG 9
55 28b6751f bellard
#include "op_template.h"
56 28b6751f bellard
57 28b6751f bellard
#define REG 10
58 28b6751f bellard
#include "op_template.h"
59 28b6751f bellard
60 28b6751f bellard
#define REG 11
61 28b6751f bellard
#include "op_template.h"
62 28b6751f bellard
63 28b6751f bellard
#define REG 12
64 28b6751f bellard
#include "op_template.h"
65 28b6751f bellard
66 28b6751f bellard
#define REG 13
67 28b6751f bellard
#include "op_template.h"
68 28b6751f bellard
69 28b6751f bellard
#define REG 14
70 28b6751f bellard
#include "op_template.h"
71 28b6751f bellard
72 28b6751f bellard
#define REG 15
73 28b6751f bellard
#include "op_template.h"
74 28b6751f bellard
75 28b6751f bellard
#define REG 16
76 28b6751f bellard
#include "op_template.h"
77 28b6751f bellard
78 28b6751f bellard
#define REG 17
79 28b6751f bellard
#include "op_template.h"
80 28b6751f bellard
81 28b6751f bellard
#define REG 18
82 28b6751f bellard
#include "op_template.h"
83 28b6751f bellard
84 28b6751f bellard
#define REG 19
85 28b6751f bellard
#include "op_template.h"
86 28b6751f bellard
87 28b6751f bellard
#define REG 20
88 28b6751f bellard
#include "op_template.h"
89 28b6751f bellard
90 28b6751f bellard
#define REG 21
91 28b6751f bellard
#include "op_template.h"
92 28b6751f bellard
93 28b6751f bellard
#define REG 22
94 28b6751f bellard
#include "op_template.h"
95 28b6751f bellard
96 28b6751f bellard
#define REG 23
97 28b6751f bellard
#include "op_template.h"
98 28b6751f bellard
99 28b6751f bellard
#define REG 24
100 28b6751f bellard
#include "op_template.h"
101 28b6751f bellard
102 28b6751f bellard
#define REG 25
103 28b6751f bellard
#include "op_template.h"
104 28b6751f bellard
105 28b6751f bellard
#define REG 26
106 28b6751f bellard
#include "op_template.h"
107 28b6751f bellard
108 28b6751f bellard
#define REG 27
109 28b6751f bellard
#include "op_template.h"
110 28b6751f bellard
111 28b6751f bellard
#define REG 28
112 28b6751f bellard
#include "op_template.h"
113 28b6751f bellard
114 28b6751f bellard
#define REG 29
115 28b6751f bellard
#include "op_template.h"
116 28b6751f bellard
117 28b6751f bellard
#define REG 30
118 28b6751f bellard
#include "op_template.h"
119 28b6751f bellard
120 28b6751f bellard
#define REG 31
121 28b6751f bellard
#include "op_template.h"
122 28b6751f bellard
123 a496775f j_mayer
124 a496775f j_mayer
void OPPROTO op_print_mem_EA (void)
125 a496775f j_mayer
{
126 a496775f j_mayer
    do_print_mem_EA(T0);
127 a496775f j_mayer
    RETURN();
128 a496775f j_mayer
}
129 a496775f j_mayer
130 3fc6c082 bellard
/* PowerPC state maintenance operations */
131 79aceca5 bellard
/* set_Rc0 */
132 36081602 j_mayer
void OPPROTO op_set_Rc0 (void)
133 79aceca5 bellard
{
134 966439a6 j_mayer
    env->crf[0] = T0 | xer_so;
135 79aceca5 bellard
    RETURN();
136 79aceca5 bellard
}
137 79aceca5 bellard
138 fb0eaffc bellard
/* Set Rc1 (for floating point arithmetic) */
139 36081602 j_mayer
void OPPROTO op_set_Rc1 (void)
140 fb0eaffc bellard
{
141 36081602 j_mayer
    env->crf[1] = env->fpscr[7];
142 fb0eaffc bellard
    RETURN();
143 fb0eaffc bellard
}
144 fb0eaffc bellard
145 9a64fbe4 bellard
/* Constants load */
146 76a66253 j_mayer
void OPPROTO op_reset_T0 (void)
147 76a66253 j_mayer
{
148 76a66253 j_mayer
    T0 = 0;
149 76a66253 j_mayer
    RETURN();
150 76a66253 j_mayer
}
151 76a66253 j_mayer
152 36081602 j_mayer
void OPPROTO op_set_T0 (void)
153 79aceca5 bellard
{
154 d9bce9d9 j_mayer
    T0 = (uint32_t)PARAM1;
155 79aceca5 bellard
    RETURN();
156 79aceca5 bellard
}
157 79aceca5 bellard
158 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
159 d9bce9d9 j_mayer
void OPPROTO op_set_T0_64 (void)
160 d9bce9d9 j_mayer
{
161 d9bce9d9 j_mayer
    T0 = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
162 d9bce9d9 j_mayer
    RETURN();
163 d9bce9d9 j_mayer
}
164 d9bce9d9 j_mayer
#endif
165 d9bce9d9 j_mayer
166 36081602 j_mayer
void OPPROTO op_set_T1 (void)
167 79aceca5 bellard
{
168 d9bce9d9 j_mayer
    T1 = (uint32_t)PARAM1;
169 d9bce9d9 j_mayer
    RETURN();
170 d9bce9d9 j_mayer
}
171 d9bce9d9 j_mayer
172 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
173 d9bce9d9 j_mayer
void OPPROTO op_set_T1_64 (void)
174 d9bce9d9 j_mayer
{
175 d9bce9d9 j_mayer
    T1 = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
176 79aceca5 bellard
    RETURN();
177 79aceca5 bellard
}
178 d9bce9d9 j_mayer
#endif
179 79aceca5 bellard
180 76a66253 j_mayer
#if 0 // unused
181 36081602 j_mayer
void OPPROTO op_set_T2 (void)
182 79aceca5 bellard
{
183 36081602 j_mayer
    T2 = PARAM1;
184 79aceca5 bellard
    RETURN();
185 79aceca5 bellard
}
186 76a66253 j_mayer
#endif
187 79aceca5 bellard
188 76a66253 j_mayer
void OPPROTO op_move_T1_T0 (void)
189 79aceca5 bellard
{
190 76a66253 j_mayer
    T1 = T0;
191 76a66253 j_mayer
    RETURN();
192 9a64fbe4 bellard
}
193 9a64fbe4 bellard
194 d9bce9d9 j_mayer
void OPPROTO op_move_T2_T0 (void)
195 d9bce9d9 j_mayer
{
196 d9bce9d9 j_mayer
    T2 = T0;
197 d9bce9d9 j_mayer
    RETURN();
198 d9bce9d9 j_mayer
}
199 d9bce9d9 j_mayer
200 76a66253 j_mayer
/* Generate exceptions */
201 36081602 j_mayer
void OPPROTO op_raise_exception_err (void)
202 9a64fbe4 bellard
{
203 36081602 j_mayer
    do_raise_exception_err(PARAM1, PARAM2);
204 9a64fbe4 bellard
}
205 9a64fbe4 bellard
206 36081602 j_mayer
void OPPROTO op_update_nip (void)
207 9a64fbe4 bellard
{
208 d9bce9d9 j_mayer
    env->nip = (uint32_t)PARAM1;
209 76a66253 j_mayer
    RETURN();
210 9a64fbe4 bellard
}
211 9a64fbe4 bellard
212 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
213 d9bce9d9 j_mayer
void OPPROTO op_update_nip_64 (void)
214 d9bce9d9 j_mayer
{
215 d9bce9d9 j_mayer
    env->nip = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
216 d9bce9d9 j_mayer
    RETURN();
217 d9bce9d9 j_mayer
}
218 d9bce9d9 j_mayer
#endif
219 d9bce9d9 j_mayer
220 36081602 j_mayer
void OPPROTO op_debug (void)
221 ea4e754f bellard
{
222 ea4e754f bellard
    do_raise_exception(EXCP_DEBUG);
223 ea4e754f bellard
}
224 ea4e754f bellard
225 36081602 j_mayer
void OPPROTO op_exit_tb (void)
226 9a64fbe4 bellard
{
227 76a66253 j_mayer
    EXIT_TB();
228 9a64fbe4 bellard
}
229 9a64fbe4 bellard
230 76a66253 j_mayer
/* Load/store special registers */
231 36081602 j_mayer
void OPPROTO op_load_cr (void)
232 9a64fbe4 bellard
{
233 76a66253 j_mayer
    do_load_cr();
234 79aceca5 bellard
    RETURN();
235 79aceca5 bellard
}
236 79aceca5 bellard
237 36081602 j_mayer
void OPPROTO op_store_cr (void)
238 79aceca5 bellard
{
239 36081602 j_mayer
    do_store_cr(PARAM1);
240 79aceca5 bellard
    RETURN();
241 79aceca5 bellard
}
242 79aceca5 bellard
243 76a66253 j_mayer
void OPPROTO op_load_cro (void)
244 79aceca5 bellard
{
245 76a66253 j_mayer
    T0 = env->crf[PARAM1];
246 79aceca5 bellard
    RETURN();
247 79aceca5 bellard
}
248 79aceca5 bellard
249 76a66253 j_mayer
void OPPROTO op_store_cro (void)
250 79aceca5 bellard
{
251 76a66253 j_mayer
    env->crf[PARAM1] = T0;
252 79aceca5 bellard
    RETURN();
253 79aceca5 bellard
}
254 79aceca5 bellard
255 36081602 j_mayer
void OPPROTO op_load_xer_cr (void)
256 79aceca5 bellard
{
257 79aceca5 bellard
    T0 = (xer_so << 3) | (xer_ov << 2) | (xer_ca << 1);
258 79aceca5 bellard
    RETURN();
259 79aceca5 bellard
}
260 79aceca5 bellard
261 36081602 j_mayer
void OPPROTO op_clear_xer_ov (void)
262 79aceca5 bellard
{
263 79aceca5 bellard
    xer_so = 0;
264 79aceca5 bellard
    xer_ov = 0;
265 e864cabd j_mayer
    RETURN();
266 e864cabd j_mayer
}
267 e864cabd j_mayer
268 36081602 j_mayer
void OPPROTO op_clear_xer_ca (void)
269 e864cabd j_mayer
{
270 79aceca5 bellard
    xer_ca = 0;
271 79aceca5 bellard
    RETURN();
272 79aceca5 bellard
}
273 79aceca5 bellard
274 36081602 j_mayer
void OPPROTO op_load_xer_bc (void)
275 79aceca5 bellard
{
276 9a64fbe4 bellard
    T1 = xer_bc;
277 79aceca5 bellard
    RETURN();
278 79aceca5 bellard
}
279 79aceca5 bellard
280 76a66253 j_mayer
void OPPROTO op_store_xer_bc (void)
281 76a66253 j_mayer
{
282 76a66253 j_mayer
    xer_bc = T0;
283 76a66253 j_mayer
    RETURN();
284 76a66253 j_mayer
}
285 76a66253 j_mayer
286 36081602 j_mayer
void OPPROTO op_load_xer (void)
287 79aceca5 bellard
{
288 76a66253 j_mayer
    do_load_xer();
289 79aceca5 bellard
    RETURN();
290 79aceca5 bellard
}
291 79aceca5 bellard
292 36081602 j_mayer
void OPPROTO op_store_xer (void)
293 79aceca5 bellard
{
294 76a66253 j_mayer
    do_store_xer();
295 76a66253 j_mayer
    RETURN();
296 76a66253 j_mayer
}
297 76a66253 j_mayer
298 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
299 76a66253 j_mayer
/* Segment registers load and store */
300 36081602 j_mayer
void OPPROTO op_load_sr (void)
301 76a66253 j_mayer
{
302 36081602 j_mayer
    T0 = env->sr[T1];
303 76a66253 j_mayer
    RETURN();
304 76a66253 j_mayer
}
305 76a66253 j_mayer
306 36081602 j_mayer
void OPPROTO op_store_sr (void)
307 76a66253 j_mayer
{
308 76a66253 j_mayer
    do_store_sr(env, T1, T0);
309 76a66253 j_mayer
    RETURN();
310 76a66253 j_mayer
}
311 76a66253 j_mayer
312 36081602 j_mayer
void OPPROTO op_load_sdr1 (void)
313 76a66253 j_mayer
{
314 36081602 j_mayer
    T0 = env->sdr1;
315 76a66253 j_mayer
    RETURN();
316 76a66253 j_mayer
}
317 76a66253 j_mayer
318 36081602 j_mayer
void OPPROTO op_store_sdr1 (void)
319 76a66253 j_mayer
{
320 76a66253 j_mayer
    do_store_sdr1(env, T0);
321 79aceca5 bellard
    RETURN();
322 79aceca5 bellard
}
323 79aceca5 bellard
324 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
325 d9bce9d9 j_mayer
void OPPROTO op_load_asr (void)
326 d9bce9d9 j_mayer
{
327 d9bce9d9 j_mayer
    T0 = env->asr;
328 d9bce9d9 j_mayer
    RETURN();
329 d9bce9d9 j_mayer
}
330 d9bce9d9 j_mayer
331 d9bce9d9 j_mayer
void OPPROTO op_store_asr (void)
332 d9bce9d9 j_mayer
{
333 d9bce9d9 j_mayer
    ppc_store_asr(env, T0);
334 d9bce9d9 j_mayer
    RETURN();
335 d9bce9d9 j_mayer
}
336 d9bce9d9 j_mayer
#endif
337 d9bce9d9 j_mayer
338 36081602 j_mayer
void OPPROTO op_load_msr (void)
339 79aceca5 bellard
{
340 3fc6c082 bellard
    T0 = do_load_msr(env);
341 79aceca5 bellard
    RETURN();
342 79aceca5 bellard
}
343 79aceca5 bellard
344 36081602 j_mayer
void OPPROTO op_store_msr (void)
345 79aceca5 bellard
{
346 3fc6c082 bellard
    do_store_msr(env, T0);
347 9a64fbe4 bellard
    RETURN();
348 9a64fbe4 bellard
}
349 d9bce9d9 j_mayer
350 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
351 d9bce9d9 j_mayer
void OPPROTO op_store_msr_32 (void)
352 d9bce9d9 j_mayer
{
353 d9bce9d9 j_mayer
    ppc_store_msr_32(env, T0);
354 d9bce9d9 j_mayer
    RETURN();
355 d9bce9d9 j_mayer
}
356 d9bce9d9 j_mayer
#endif
357 76a66253 j_mayer
#endif
358 9a64fbe4 bellard
359 9a64fbe4 bellard
/* SPR */
360 a496775f j_mayer
void OPPROTO op_load_spr (void)
361 a496775f j_mayer
{
362 a496775f j_mayer
    T0 = env->spr[PARAM1];
363 a496775f j_mayer
    RETURN();
364 a496775f j_mayer
}
365 a496775f j_mayer
366 a496775f j_mayer
void OPPROTO op_store_spr (void)
367 a496775f j_mayer
{
368 a496775f j_mayer
    env->spr[PARAM1] = T0;
369 a496775f j_mayer
    RETURN();
370 a496775f j_mayer
}
371 a496775f j_mayer
372 a496775f j_mayer
void OPPROTO op_load_dump_spr (void)
373 a496775f j_mayer
{
374 a496775f j_mayer
    T0 = ppc_load_dump_spr(PARAM1);
375 a496775f j_mayer
    RETURN();
376 a496775f j_mayer
}
377 a496775f j_mayer
378 a496775f j_mayer
void OPPROTO op_store_dump_spr (void)
379 9a64fbe4 bellard
{
380 a496775f j_mayer
    ppc_store_dump_spr(PARAM1, T0);
381 9a64fbe4 bellard
    RETURN();
382 9a64fbe4 bellard
}
383 9a64fbe4 bellard
384 a496775f j_mayer
void OPPROTO op_mask_spr (void)
385 9a64fbe4 bellard
{
386 a496775f j_mayer
    env->spr[PARAM1] &= ~T0;
387 79aceca5 bellard
    RETURN();
388 79aceca5 bellard
}
389 79aceca5 bellard
390 36081602 j_mayer
void OPPROTO op_load_lr (void)
391 79aceca5 bellard
{
392 36081602 j_mayer
    T0 = env->lr;
393 9a64fbe4 bellard
    RETURN();
394 9a64fbe4 bellard
}
395 9a64fbe4 bellard
396 36081602 j_mayer
void OPPROTO op_store_lr (void)
397 9a64fbe4 bellard
{
398 36081602 j_mayer
    env->lr = T0;
399 9a64fbe4 bellard
    RETURN();
400 9a64fbe4 bellard
}
401 9a64fbe4 bellard
402 36081602 j_mayer
void OPPROTO op_load_ctr (void)
403 9a64fbe4 bellard
{
404 36081602 j_mayer
    T0 = env->ctr;
405 9a64fbe4 bellard
    RETURN();
406 9a64fbe4 bellard
}
407 9a64fbe4 bellard
408 36081602 j_mayer
void OPPROTO op_store_ctr (void)
409 9a64fbe4 bellard
{
410 36081602 j_mayer
    env->ctr = T0;
411 9a64fbe4 bellard
    RETURN();
412 9a64fbe4 bellard
}
413 9a64fbe4 bellard
414 36081602 j_mayer
void OPPROTO op_load_tbl (void)
415 9a64fbe4 bellard
{
416 36081602 j_mayer
    T0 = cpu_ppc_load_tbl(env);
417 9a64fbe4 bellard
    RETURN();
418 9a64fbe4 bellard
}
419 9a64fbe4 bellard
420 36081602 j_mayer
void OPPROTO op_load_tbu (void)
421 9a64fbe4 bellard
{
422 36081602 j_mayer
    T0 = cpu_ppc_load_tbu(env);
423 9a64fbe4 bellard
    RETURN();
424 9a64fbe4 bellard
}
425 9a64fbe4 bellard
426 a062e36c j_mayer
void OPPROTO op_load_atbl (void)
427 a062e36c j_mayer
{
428 a062e36c j_mayer
    T0 = cpu_ppc_load_atbl(env);
429 a062e36c j_mayer
    RETURN();
430 a062e36c j_mayer
}
431 a062e36c j_mayer
432 a062e36c j_mayer
void OPPROTO op_load_atbu (void)
433 a062e36c j_mayer
{
434 a062e36c j_mayer
    T0 = cpu_ppc_load_atbu(env);
435 a062e36c j_mayer
    RETURN();
436 a062e36c j_mayer
}
437 a062e36c j_mayer
438 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
439 36081602 j_mayer
void OPPROTO op_store_tbl (void)
440 9a64fbe4 bellard
{
441 36081602 j_mayer
    cpu_ppc_store_tbl(env, T0);
442 79aceca5 bellard
    RETURN();
443 79aceca5 bellard
}
444 79aceca5 bellard
445 36081602 j_mayer
void OPPROTO op_store_tbu (void)
446 9a64fbe4 bellard
{
447 36081602 j_mayer
    cpu_ppc_store_tbu(env, T0);
448 9a64fbe4 bellard
    RETURN();
449 9a64fbe4 bellard
}
450 9a64fbe4 bellard
451 a062e36c j_mayer
void OPPROTO op_store_atbl (void)
452 a062e36c j_mayer
{
453 a062e36c j_mayer
    cpu_ppc_store_atbl(env, T0);
454 a062e36c j_mayer
    RETURN();
455 a062e36c j_mayer
}
456 a062e36c j_mayer
457 a062e36c j_mayer
void OPPROTO op_store_atbu (void)
458 a062e36c j_mayer
{
459 a062e36c j_mayer
    cpu_ppc_store_atbu(env, T0);
460 a062e36c j_mayer
    RETURN();
461 a062e36c j_mayer
}
462 a062e36c j_mayer
463 36081602 j_mayer
void OPPROTO op_load_decr (void)
464 9a64fbe4 bellard
{
465 36081602 j_mayer
    T0 = cpu_ppc_load_decr(env);
466 76a66253 j_mayer
    RETURN();
467 76a66253 j_mayer
}
468 9fddaa0c bellard
469 36081602 j_mayer
void OPPROTO op_store_decr (void)
470 9fddaa0c bellard
{
471 36081602 j_mayer
    cpu_ppc_store_decr(env, T0);
472 9a64fbe4 bellard
    RETURN();
473 9a64fbe4 bellard
}
474 9a64fbe4 bellard
475 36081602 j_mayer
void OPPROTO op_load_ibat (void)
476 9a64fbe4 bellard
{
477 36081602 j_mayer
    T0 = env->IBAT[PARAM1][PARAM2];
478 76a66253 j_mayer
    RETURN();
479 9a64fbe4 bellard
}
480 9a64fbe4 bellard
481 76a66253 j_mayer
void OPPROTO op_store_ibatu (void)
482 9a64fbe4 bellard
{
483 3fc6c082 bellard
    do_store_ibatu(env, PARAM1, T0);
484 3fc6c082 bellard
    RETURN();
485 3fc6c082 bellard
}
486 3fc6c082 bellard
487 76a66253 j_mayer
void OPPROTO op_store_ibatl (void)
488 3fc6c082 bellard
{
489 3fc6c082 bellard
#if 1
490 3fc6c082 bellard
    env->IBAT[1][PARAM1] = T0;
491 3fc6c082 bellard
#else
492 3fc6c082 bellard
    do_store_ibatl(env, PARAM1, T0);
493 3fc6c082 bellard
#endif
494 3fc6c082 bellard
    RETURN();
495 9a64fbe4 bellard
}
496 9a64fbe4 bellard
497 36081602 j_mayer
void OPPROTO op_load_dbat (void)
498 9a64fbe4 bellard
{
499 36081602 j_mayer
    T0 = env->DBAT[PARAM1][PARAM2];
500 76a66253 j_mayer
    RETURN();
501 9a64fbe4 bellard
}
502 9a64fbe4 bellard
503 76a66253 j_mayer
void OPPROTO op_store_dbatu (void)
504 3fc6c082 bellard
{
505 3fc6c082 bellard
    do_store_dbatu(env, PARAM1, T0);
506 3fc6c082 bellard
    RETURN();
507 3fc6c082 bellard
}
508 3fc6c082 bellard
509 76a66253 j_mayer
void OPPROTO op_store_dbatl (void)
510 9a64fbe4 bellard
{
511 3fc6c082 bellard
#if 1
512 3fc6c082 bellard
    env->DBAT[1][PARAM1] = T0;
513 3fc6c082 bellard
#else
514 3fc6c082 bellard
    do_store_dbatl(env, PARAM1, T0);
515 3fc6c082 bellard
#endif
516 3fc6c082 bellard
    RETURN();
517 9a64fbe4 bellard
}
518 76a66253 j_mayer
#endif /* !defined(CONFIG_USER_ONLY) */
519 9a64fbe4 bellard
520 fb0eaffc bellard
/* FPSCR */
521 36081602 j_mayer
void OPPROTO op_load_fpscr (void)
522 fb0eaffc bellard
{
523 76a66253 j_mayer
    do_load_fpscr();
524 fb0eaffc bellard
    RETURN();
525 fb0eaffc bellard
}
526 fb0eaffc bellard
527 36081602 j_mayer
void OPPROTO op_store_fpscr (void)
528 fb0eaffc bellard
{
529 76a66253 j_mayer
    do_store_fpscr(PARAM1);
530 fb0eaffc bellard
    RETURN();
531 fb0eaffc bellard
}
532 fb0eaffc bellard
533 36081602 j_mayer
void OPPROTO op_reset_scrfx (void)
534 fb0eaffc bellard
{
535 36081602 j_mayer
    env->fpscr[7] &= ~0x8;
536 fb0eaffc bellard
    RETURN();
537 fb0eaffc bellard
}
538 fb0eaffc bellard
539 79aceca5 bellard
/* crf operations */
540 36081602 j_mayer
void OPPROTO op_getbit_T0 (void)
541 79aceca5 bellard
{
542 36081602 j_mayer
    T0 = (T0 >> PARAM1) & 1;
543 79aceca5 bellard
    RETURN();
544 79aceca5 bellard
}
545 79aceca5 bellard
546 36081602 j_mayer
void OPPROTO op_getbit_T1 (void)
547 79aceca5 bellard
{
548 36081602 j_mayer
    T1 = (T1 >> PARAM1) & 1;
549 79aceca5 bellard
    RETURN();
550 79aceca5 bellard
}
551 79aceca5 bellard
552 36081602 j_mayer
void OPPROTO op_setcrfbit (void)
553 79aceca5 bellard
{
554 36081602 j_mayer
    T1 = (T1 & PARAM1) | (T0 << PARAM2);
555 79aceca5 bellard
    RETURN();
556 79aceca5 bellard
}
557 79aceca5 bellard
558 79aceca5 bellard
/* Branch */
559 36081602 j_mayer
#define EIP env->nip
560 9a64fbe4 bellard
561 36081602 j_mayer
void OPPROTO op_setlr (void)
562 e98a6e40 bellard
{
563 36081602 j_mayer
    env->lr = (uint32_t)PARAM1;
564 76a66253 j_mayer
    RETURN();
565 e98a6e40 bellard
}
566 e98a6e40 bellard
567 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
568 d9bce9d9 j_mayer
void OPPROTO op_setlr_64 (void)
569 d9bce9d9 j_mayer
{
570 36081602 j_mayer
    env->lr = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
571 d9bce9d9 j_mayer
    RETURN();
572 d9bce9d9 j_mayer
}
573 d9bce9d9 j_mayer
#endif
574 d9bce9d9 j_mayer
575 36081602 j_mayer
void OPPROTO op_goto_tb0 (void)
576 e98a6e40 bellard
{
577 c53be334 bellard
    GOTO_TB(op_goto_tb0, PARAM1, 0);
578 c53be334 bellard
}
579 c53be334 bellard
580 36081602 j_mayer
void OPPROTO op_goto_tb1 (void)
581 c53be334 bellard
{
582 c53be334 bellard
    GOTO_TB(op_goto_tb1, PARAM1, 1);
583 e98a6e40 bellard
}
584 e98a6e40 bellard
585 d9bce9d9 j_mayer
void OPPROTO op_b_T1 (void)
586 e98a6e40 bellard
{
587 36081602 j_mayer
    env->nip = (uint32_t)(T1 & ~3);
588 76a66253 j_mayer
    RETURN();
589 e98a6e40 bellard
}
590 e98a6e40 bellard
591 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
592 d9bce9d9 j_mayer
void OPPROTO op_b_T1_64 (void)
593 d9bce9d9 j_mayer
{
594 36081602 j_mayer
    env->nip = (uint64_t)(T1 & ~3);
595 d9bce9d9 j_mayer
    RETURN();
596 d9bce9d9 j_mayer
}
597 d9bce9d9 j_mayer
#endif
598 d9bce9d9 j_mayer
599 36081602 j_mayer
void OPPROTO op_jz_T0 (void)
600 e98a6e40 bellard
{
601 c53be334 bellard
    if (!T0)
602 c53be334 bellard
        GOTO_LABEL_PARAM(1);
603 e98a6e40 bellard
    RETURN();
604 e98a6e40 bellard
}
605 e98a6e40 bellard
606 d9bce9d9 j_mayer
void OPPROTO op_btest_T1 (void)
607 e98a6e40 bellard
{
608 e98a6e40 bellard
    if (T0) {
609 36081602 j_mayer
        env->nip = (uint32_t)(T1 & ~3);
610 e98a6e40 bellard
    } else {
611 36081602 j_mayer
        env->nip = (uint32_t)PARAM1;
612 e98a6e40 bellard
    }
613 e98a6e40 bellard
    RETURN();
614 e98a6e40 bellard
}
615 e98a6e40 bellard
616 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
617 d9bce9d9 j_mayer
void OPPROTO op_btest_T1_64 (void)
618 d9bce9d9 j_mayer
{
619 d9bce9d9 j_mayer
    if (T0) {
620 36081602 j_mayer
        env->nip = (uint64_t)(T1 & ~3);
621 d9bce9d9 j_mayer
    } else {
622 36081602 j_mayer
        env->nip = ((uint64_t)PARAM1 << 32) | (uint64_t)PARAM2;
623 d9bce9d9 j_mayer
    }
624 d9bce9d9 j_mayer
    RETURN();
625 d9bce9d9 j_mayer
}
626 d9bce9d9 j_mayer
#endif
627 d9bce9d9 j_mayer
628 36081602 j_mayer
void OPPROTO op_movl_T1_ctr (void)
629 e98a6e40 bellard
{
630 36081602 j_mayer
    T1 = env->ctr;
631 76a66253 j_mayer
    RETURN();
632 e98a6e40 bellard
}
633 e98a6e40 bellard
634 36081602 j_mayer
void OPPROTO op_movl_T1_lr (void)
635 e98a6e40 bellard
{
636 36081602 j_mayer
    T1 = env->lr;
637 76a66253 j_mayer
    RETURN();
638 e98a6e40 bellard
}
639 e98a6e40 bellard
640 e98a6e40 bellard
/* tests with result in T0 */
641 d9bce9d9 j_mayer
void OPPROTO op_test_ctr (void)
642 d9bce9d9 j_mayer
{
643 36081602 j_mayer
    T0 = (uint32_t)env->ctr;
644 d9bce9d9 j_mayer
    RETURN();
645 d9bce9d9 j_mayer
}
646 e98a6e40 bellard
647 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
648 d9bce9d9 j_mayer
void OPPROTO op_test_ctr_64 (void)
649 e98a6e40 bellard
{
650 36081602 j_mayer
    T0 = (uint64_t)env->ctr;
651 d9bce9d9 j_mayer
    RETURN();
652 d9bce9d9 j_mayer
}
653 d9bce9d9 j_mayer
#endif
654 d9bce9d9 j_mayer
655 d9bce9d9 j_mayer
void OPPROTO op_test_ctr_true (void)
656 d9bce9d9 j_mayer
{
657 36081602 j_mayer
    T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) != 0);
658 76a66253 j_mayer
    RETURN();
659 e98a6e40 bellard
}
660 e98a6e40 bellard
661 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
662 d9bce9d9 j_mayer
void OPPROTO op_test_ctr_true_64 (void)
663 e98a6e40 bellard
{
664 36081602 j_mayer
    T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) != 0);
665 76a66253 j_mayer
    RETURN();
666 e98a6e40 bellard
}
667 d9bce9d9 j_mayer
#endif
668 e98a6e40 bellard
669 d9bce9d9 j_mayer
void OPPROTO op_test_ctr_false (void)
670 e98a6e40 bellard
{
671 36081602 j_mayer
    T0 = ((uint32_t)env->ctr != 0 && (T0 & PARAM1) == 0);
672 76a66253 j_mayer
    RETURN();
673 e98a6e40 bellard
}
674 e98a6e40 bellard
675 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
676 d9bce9d9 j_mayer
void OPPROTO op_test_ctr_false_64 (void)
677 e98a6e40 bellard
{
678 36081602 j_mayer
    T0 = ((uint64_t)env->ctr != 0 && (T0 & PARAM1) == 0);
679 76a66253 j_mayer
    RETURN();
680 e98a6e40 bellard
}
681 d9bce9d9 j_mayer
#endif
682 d9bce9d9 j_mayer
683 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz (void)
684 d9bce9d9 j_mayer
{
685 36081602 j_mayer
    T0 = ((uint32_t)env->ctr == 0);
686 d9bce9d9 j_mayer
    RETURN();
687 d9bce9d9 j_mayer
}
688 d9bce9d9 j_mayer
689 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
690 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz_64 (void)
691 d9bce9d9 j_mayer
{
692 36081602 j_mayer
    T0 = ((uint64_t)env->ctr == 0);
693 d9bce9d9 j_mayer
    RETURN();
694 d9bce9d9 j_mayer
}
695 d9bce9d9 j_mayer
#endif
696 d9bce9d9 j_mayer
697 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz_true (void)
698 d9bce9d9 j_mayer
{
699 36081602 j_mayer
    T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) != 0);
700 d9bce9d9 j_mayer
    RETURN();
701 d9bce9d9 j_mayer
}
702 d9bce9d9 j_mayer
703 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
704 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz_true_64 (void)
705 d9bce9d9 j_mayer
{
706 36081602 j_mayer
    T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) != 0);
707 d9bce9d9 j_mayer
    RETURN();
708 d9bce9d9 j_mayer
}
709 d9bce9d9 j_mayer
#endif
710 e98a6e40 bellard
711 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz_false (void)
712 e98a6e40 bellard
{
713 36081602 j_mayer
    T0 = ((uint32_t)env->ctr == 0 && (T0 & PARAM1) == 0);
714 76a66253 j_mayer
    RETURN();
715 e98a6e40 bellard
}
716 e98a6e40 bellard
717 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
718 d9bce9d9 j_mayer
void OPPROTO op_test_ctrz_false_64 (void)
719 e98a6e40 bellard
{
720 36081602 j_mayer
    T0 = ((uint64_t)env->ctr == 0 && (T0 & PARAM1) == 0);
721 76a66253 j_mayer
    RETURN();
722 e98a6e40 bellard
}
723 d9bce9d9 j_mayer
#endif
724 e98a6e40 bellard
725 36081602 j_mayer
void OPPROTO op_test_true (void)
726 e98a6e40 bellard
{
727 36081602 j_mayer
    T0 = (T0 & PARAM1);
728 76a66253 j_mayer
    RETURN();
729 e98a6e40 bellard
}
730 e98a6e40 bellard
731 36081602 j_mayer
void OPPROTO op_test_false (void)
732 e98a6e40 bellard
{
733 36081602 j_mayer
    T0 = ((T0 & PARAM1) == 0);
734 76a66253 j_mayer
    RETURN();
735 e98a6e40 bellard
}
736 79aceca5 bellard
737 79aceca5 bellard
/* CTR maintenance */
738 36081602 j_mayer
void OPPROTO op_dec_ctr (void)
739 79aceca5 bellard
{
740 36081602 j_mayer
    env->ctr--;
741 79aceca5 bellard
    RETURN();
742 79aceca5 bellard
}
743 79aceca5 bellard
744 79aceca5 bellard
/***                           Integer arithmetic                          ***/
745 79aceca5 bellard
/* add */
746 36081602 j_mayer
void OPPROTO op_add (void)
747 79aceca5 bellard
{
748 79aceca5 bellard
    T0 += T1;
749 79aceca5 bellard
    RETURN();
750 79aceca5 bellard
}
751 79aceca5 bellard
752 d9bce9d9 j_mayer
void OPPROTO op_check_addo (void)
753 79aceca5 bellard
{
754 d9bce9d9 j_mayer
    if (likely(!(((uint32_t)T2 ^ (uint32_t)T1 ^ UINT32_MAX) &
755 d9bce9d9 j_mayer
                 ((uint32_t)T2 ^ (uint32_t)T0) & (1UL << 31)))) {
756 d9bce9d9 j_mayer
        xer_ov = 0;
757 d9bce9d9 j_mayer
    } else {
758 d9bce9d9 j_mayer
        xer_ov = 1;
759 966439a6 j_mayer
        xer_so = 1;
760 d9bce9d9 j_mayer
    }
761 e864cabd j_mayer
    RETURN();
762 79aceca5 bellard
}
763 79aceca5 bellard
764 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
765 d9bce9d9 j_mayer
void OPPROTO op_check_addo_64 (void)
766 79aceca5 bellard
{
767 d9bce9d9 j_mayer
    if (likely(!(((uint64_t)T2 ^ (uint64_t)T1 ^ UINT64_MAX) &
768 1698b741 j_mayer
                 ((uint64_t)T2 ^ (uint64_t)T0) & (1ULL << 63)))) {
769 d9bce9d9 j_mayer
        xer_ov = 0;
770 79aceca5 bellard
    } else {
771 d9bce9d9 j_mayer
        xer_ov = 1;
772 966439a6 j_mayer
        xer_so = 1;
773 d9bce9d9 j_mayer
    }
774 e864cabd j_mayer
    RETURN();
775 d9bce9d9 j_mayer
}
776 d9bce9d9 j_mayer
#endif
777 d9bce9d9 j_mayer
778 d9bce9d9 j_mayer
/* add carrying */
779 d9bce9d9 j_mayer
void OPPROTO op_check_addc (void)
780 d9bce9d9 j_mayer
{
781 d9bce9d9 j_mayer
    if (likely((uint32_t)T0 >= (uint32_t)T2)) {
782 79aceca5 bellard
        xer_ca = 0;
783 d9bce9d9 j_mayer
    } else {
784 d9bce9d9 j_mayer
        xer_ca = 1;
785 79aceca5 bellard
    }
786 79aceca5 bellard
    RETURN();
787 79aceca5 bellard
}
788 79aceca5 bellard
789 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
790 d9bce9d9 j_mayer
void OPPROTO op_check_addc_64 (void)
791 79aceca5 bellard
{
792 d9bce9d9 j_mayer
    if (likely((uint64_t)T0 >= (uint64_t)T2)) {
793 d9bce9d9 j_mayer
        xer_ca = 0;
794 d9bce9d9 j_mayer
    } else {
795 d9bce9d9 j_mayer
        xer_ca = 1;
796 d9bce9d9 j_mayer
    }
797 79aceca5 bellard
    RETURN();
798 79aceca5 bellard
}
799 d9bce9d9 j_mayer
#endif
800 79aceca5 bellard
801 79aceca5 bellard
/* add extended */
802 76a66253 j_mayer
void OPPROTO op_adde (void)
803 79aceca5 bellard
{
804 fdabc366 bellard
    do_adde();
805 76a66253 j_mayer
    RETURN();
806 79aceca5 bellard
}
807 79aceca5 bellard
808 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
809 d9bce9d9 j_mayer
void OPPROTO op_adde_64 (void)
810 79aceca5 bellard
{
811 d9bce9d9 j_mayer
    do_adde_64();
812 79aceca5 bellard
    RETURN();
813 79aceca5 bellard
}
814 d9bce9d9 j_mayer
#endif
815 79aceca5 bellard
816 79aceca5 bellard
/* add immediate */
817 36081602 j_mayer
void OPPROTO op_addi (void)
818 79aceca5 bellard
{
819 36081602 j_mayer
    T0 += (int32_t)PARAM1;
820 79aceca5 bellard
    RETURN();
821 79aceca5 bellard
}
822 79aceca5 bellard
823 d9bce9d9 j_mayer
/* add to minus one extended */
824 d9bce9d9 j_mayer
void OPPROTO op_add_me (void)
825 79aceca5 bellard
{
826 d9bce9d9 j_mayer
    T0 += xer_ca + (-1);
827 d9bce9d9 j_mayer
    if (likely((uint32_t)T1 != 0))
828 79aceca5 bellard
        xer_ca = 1;
829 79aceca5 bellard
    RETURN();
830 79aceca5 bellard
}
831 79aceca5 bellard
832 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
833 d9bce9d9 j_mayer
void OPPROTO op_add_me_64 (void)
834 79aceca5 bellard
{
835 79aceca5 bellard
    T0 += xer_ca + (-1);
836 d9bce9d9 j_mayer
    if (likely((uint64_t)T1 != 0))
837 79aceca5 bellard
        xer_ca = 1;
838 79aceca5 bellard
    RETURN();
839 79aceca5 bellard
}
840 d9bce9d9 j_mayer
#endif
841 79aceca5 bellard
842 76a66253 j_mayer
void OPPROTO op_addmeo (void)
843 79aceca5 bellard
{
844 fdabc366 bellard
    do_addmeo();
845 79aceca5 bellard
    RETURN();
846 79aceca5 bellard
}
847 79aceca5 bellard
848 d9bce9d9 j_mayer
void OPPROTO op_addmeo_64 (void)
849 d9bce9d9 j_mayer
{
850 d9bce9d9 j_mayer
    do_addmeo();
851 d9bce9d9 j_mayer
    RETURN();
852 d9bce9d9 j_mayer
}
853 d9bce9d9 j_mayer
854 79aceca5 bellard
/* add to zero extended */
855 d9bce9d9 j_mayer
void OPPROTO op_add_ze (void)
856 79aceca5 bellard
{
857 79aceca5 bellard
    T0 += xer_ca;
858 79aceca5 bellard
    RETURN();
859 79aceca5 bellard
}
860 79aceca5 bellard
861 d9bce9d9 j_mayer
/* divide word */
862 d9bce9d9 j_mayer
void OPPROTO op_divw (void)
863 79aceca5 bellard
{
864 d9bce9d9 j_mayer
    if (unlikely(((int32_t)T0 == INT32_MIN && (int32_t)T1 == -1) ||
865 d9bce9d9 j_mayer
                 (int32_t)T1 == 0)) {
866 d9bce9d9 j_mayer
        T0 = (int32_t)((-1) * ((uint32_t)T0 >> 31));
867 d9bce9d9 j_mayer
    } else {
868 d9bce9d9 j_mayer
        T0 = (int32_t)T0 / (int32_t)T1;
869 d9bce9d9 j_mayer
    }
870 79aceca5 bellard
    RETURN();
871 79aceca5 bellard
}
872 79aceca5 bellard
873 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
874 d9bce9d9 j_mayer
void OPPROTO op_divd (void)
875 79aceca5 bellard
{
876 d9bce9d9 j_mayer
    if (unlikely(((int64_t)T0 == INT64_MIN && (int64_t)T1 == -1) ||
877 d9bce9d9 j_mayer
                 (int64_t)T1 == 0)) {
878 d9bce9d9 j_mayer
        T0 = (int64_t)((-1ULL) * ((uint64_t)T0 >> 63));
879 79aceca5 bellard
    } else {
880 d9bce9d9 j_mayer
        T0 = (int64_t)T0 / (int64_t)T1;
881 79aceca5 bellard
    }
882 79aceca5 bellard
    RETURN();
883 79aceca5 bellard
}
884 d9bce9d9 j_mayer
#endif
885 79aceca5 bellard
886 76a66253 j_mayer
void OPPROTO op_divwo (void)
887 79aceca5 bellard
{
888 fdabc366 bellard
    do_divwo();
889 79aceca5 bellard
    RETURN();
890 79aceca5 bellard
}
891 79aceca5 bellard
892 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
893 d9bce9d9 j_mayer
void OPPROTO op_divdo (void)
894 d9bce9d9 j_mayer
{
895 d9bce9d9 j_mayer
    do_divdo();
896 d9bce9d9 j_mayer
    RETURN();
897 d9bce9d9 j_mayer
}
898 d9bce9d9 j_mayer
#endif
899 d9bce9d9 j_mayer
900 79aceca5 bellard
/* divide word unsigned */
901 d9bce9d9 j_mayer
void OPPROTO op_divwu (void)
902 d9bce9d9 j_mayer
{
903 d9bce9d9 j_mayer
    if (unlikely(T1 == 0)) {
904 d9bce9d9 j_mayer
        T0 = 0;
905 d9bce9d9 j_mayer
    } else {
906 d9bce9d9 j_mayer
        T0 = (uint32_t)T0 / (uint32_t)T1;
907 d9bce9d9 j_mayer
    }
908 d9bce9d9 j_mayer
    RETURN();
909 d9bce9d9 j_mayer
}
910 d9bce9d9 j_mayer
911 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
912 d9bce9d9 j_mayer
void OPPROTO op_divdu (void)
913 79aceca5 bellard
{
914 d9bce9d9 j_mayer
    if (unlikely(T1 == 0)) {
915 79aceca5 bellard
        T0 = 0;
916 79aceca5 bellard
    } else {
917 79aceca5 bellard
        T0 /= T1;
918 79aceca5 bellard
    }
919 79aceca5 bellard
    RETURN();
920 79aceca5 bellard
}
921 d9bce9d9 j_mayer
#endif
922 79aceca5 bellard
923 76a66253 j_mayer
void OPPROTO op_divwuo (void)
924 79aceca5 bellard
{
925 fdabc366 bellard
    do_divwuo();
926 79aceca5 bellard
    RETURN();
927 79aceca5 bellard
}
928 79aceca5 bellard
929 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
930 d9bce9d9 j_mayer
void OPPROTO op_divduo (void)
931 d9bce9d9 j_mayer
{
932 d9bce9d9 j_mayer
    do_divduo();
933 d9bce9d9 j_mayer
    RETURN();
934 d9bce9d9 j_mayer
}
935 d9bce9d9 j_mayer
#endif
936 d9bce9d9 j_mayer
937 79aceca5 bellard
/* multiply high word */
938 d9bce9d9 j_mayer
void OPPROTO op_mulhw (void)
939 79aceca5 bellard
{
940 d9bce9d9 j_mayer
    T0 = ((int64_t)((int32_t)T0) * (int64_t)((int32_t)T1)) >> 32;
941 79aceca5 bellard
    RETURN();
942 79aceca5 bellard
}
943 79aceca5 bellard
944 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
945 d9bce9d9 j_mayer
void OPPROTO op_mulhd (void)
946 d9bce9d9 j_mayer
{
947 d9bce9d9 j_mayer
    uint64_t tl, th;
948 d9bce9d9 j_mayer
949 d9bce9d9 j_mayer
    do_imul64(&tl, &th);
950 d9bce9d9 j_mayer
    T0 = th;
951 d9bce9d9 j_mayer
    RETURN();
952 d9bce9d9 j_mayer
}
953 d9bce9d9 j_mayer
#endif
954 d9bce9d9 j_mayer
955 79aceca5 bellard
/* multiply high word unsigned */
956 d9bce9d9 j_mayer
void OPPROTO op_mulhwu (void)
957 79aceca5 bellard
{
958 d9bce9d9 j_mayer
    T0 = ((uint64_t)(uint32_t)T0 * (uint64_t)(uint32_t)T1) >> 32;
959 79aceca5 bellard
    RETURN();
960 79aceca5 bellard
}
961 79aceca5 bellard
962 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
963 d9bce9d9 j_mayer
void OPPROTO op_mulhdu (void)
964 d9bce9d9 j_mayer
{
965 d9bce9d9 j_mayer
    uint64_t tl, th;
966 d9bce9d9 j_mayer
967 d9bce9d9 j_mayer
    do_mul64(&tl, &th);
968 d9bce9d9 j_mayer
    T0 = th;
969 d9bce9d9 j_mayer
    RETURN();
970 d9bce9d9 j_mayer
}
971 d9bce9d9 j_mayer
#endif
972 d9bce9d9 j_mayer
973 79aceca5 bellard
/* multiply low immediate */
974 36081602 j_mayer
void OPPROTO op_mulli (void)
975 79aceca5 bellard
{
976 d9bce9d9 j_mayer
    T0 = ((int32_t)T0 * (int32_t)PARAM1);
977 79aceca5 bellard
    RETURN();
978 79aceca5 bellard
}
979 79aceca5 bellard
980 79aceca5 bellard
/* multiply low word */
981 36081602 j_mayer
void OPPROTO op_mullw (void)
982 79aceca5 bellard
{
983 d9bce9d9 j_mayer
    T0 = (int32_t)(T0 * T1);
984 d9bce9d9 j_mayer
    RETURN();
985 d9bce9d9 j_mayer
}
986 d9bce9d9 j_mayer
987 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
988 d9bce9d9 j_mayer
void OPPROTO op_mulld (void)
989 d9bce9d9 j_mayer
{
990 79aceca5 bellard
    T0 *= T1;
991 79aceca5 bellard
    RETURN();
992 79aceca5 bellard
}
993 d9bce9d9 j_mayer
#endif
994 79aceca5 bellard
995 76a66253 j_mayer
void OPPROTO op_mullwo (void)
996 79aceca5 bellard
{
997 fdabc366 bellard
    do_mullwo();
998 79aceca5 bellard
    RETURN();
999 79aceca5 bellard
}
1000 79aceca5 bellard
1001 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1002 d9bce9d9 j_mayer
void OPPROTO op_mulldo (void)
1003 d9bce9d9 j_mayer
{
1004 d9bce9d9 j_mayer
    do_mulldo();
1005 d9bce9d9 j_mayer
    RETURN();
1006 d9bce9d9 j_mayer
}
1007 d9bce9d9 j_mayer
#endif
1008 d9bce9d9 j_mayer
1009 79aceca5 bellard
/* negate */
1010 d9bce9d9 j_mayer
void OPPROTO op_neg (void)
1011 79aceca5 bellard
{
1012 d9bce9d9 j_mayer
    if (likely(T0 != INT32_MIN)) {
1013 d9bce9d9 j_mayer
        T0 = -(int32_t)T0;
1014 79aceca5 bellard
    }
1015 79aceca5 bellard
    RETURN();
1016 79aceca5 bellard
}
1017 79aceca5 bellard
1018 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1019 d9bce9d9 j_mayer
void OPPROTO op_neg_64 (void)
1020 d9bce9d9 j_mayer
{
1021 d9bce9d9 j_mayer
    if (likely(T0 != INT64_MIN)) {
1022 d9bce9d9 j_mayer
        T0 = -(int64_t)T0;
1023 d9bce9d9 j_mayer
    }
1024 d9bce9d9 j_mayer
    RETURN();
1025 d9bce9d9 j_mayer
}
1026 d9bce9d9 j_mayer
#endif
1027 d9bce9d9 j_mayer
1028 76a66253 j_mayer
void OPPROTO op_nego (void)
1029 79aceca5 bellard
{
1030 fdabc366 bellard
    do_nego();
1031 79aceca5 bellard
    RETURN();
1032 79aceca5 bellard
}
1033 79aceca5 bellard
1034 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1035 d9bce9d9 j_mayer
void OPPROTO op_nego_64 (void)
1036 d9bce9d9 j_mayer
{
1037 d9bce9d9 j_mayer
    do_nego_64();
1038 d9bce9d9 j_mayer
    RETURN();
1039 d9bce9d9 j_mayer
}
1040 d9bce9d9 j_mayer
#endif
1041 d9bce9d9 j_mayer
1042 0cfec834 ths
/* subtract from */
1043 36081602 j_mayer
void OPPROTO op_subf (void)
1044 79aceca5 bellard
{
1045 79aceca5 bellard
    T0 = T1 - T0;
1046 79aceca5 bellard
    RETURN();
1047 79aceca5 bellard
}
1048 79aceca5 bellard
1049 d9bce9d9 j_mayer
void OPPROTO op_check_subfo (void)
1050 d9bce9d9 j_mayer
{
1051 d9bce9d9 j_mayer
    if (likely(!(((uint32_t)(~T2) ^ (uint32_t)T1 ^ UINT32_MAX) &
1052 d9bce9d9 j_mayer
                 ((uint32_t)(~T2) ^ (uint32_t)T0) & (1UL << 31)))) {
1053 d9bce9d9 j_mayer
        xer_ov = 0;
1054 d9bce9d9 j_mayer
    } else {
1055 d9bce9d9 j_mayer
        xer_ov = 1;
1056 966439a6 j_mayer
        xer_so = 1;
1057 d9bce9d9 j_mayer
    }
1058 d9bce9d9 j_mayer
    RETURN();
1059 d9bce9d9 j_mayer
}
1060 d9bce9d9 j_mayer
1061 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1062 d9bce9d9 j_mayer
void OPPROTO op_check_subfo_64 (void)
1063 79aceca5 bellard
{
1064 d9bce9d9 j_mayer
    if (likely(!(((uint64_t)(~T2) ^ (uint64_t)T1 ^ UINT64_MAX) &
1065 d9bce9d9 j_mayer
                 ((uint64_t)(~T2) ^ (uint64_t)T0) & (1ULL << 63)))) {
1066 d9bce9d9 j_mayer
        xer_ov = 0;
1067 d9bce9d9 j_mayer
    } else {
1068 d9bce9d9 j_mayer
        xer_ov = 1;
1069 966439a6 j_mayer
        xer_so = 1;
1070 d9bce9d9 j_mayer
    }
1071 79aceca5 bellard
    RETURN();
1072 79aceca5 bellard
}
1073 d9bce9d9 j_mayer
#endif
1074 79aceca5 bellard
1075 0cfec834 ths
/* subtract from carrying */
1076 d9bce9d9 j_mayer
void OPPROTO op_check_subfc (void)
1077 79aceca5 bellard
{
1078 d9bce9d9 j_mayer
    if (likely((uint32_t)T0 > (uint32_t)T1)) {
1079 79aceca5 bellard
        xer_ca = 0;
1080 d9bce9d9 j_mayer
    } else {
1081 d9bce9d9 j_mayer
        xer_ca = 1;
1082 79aceca5 bellard
    }
1083 79aceca5 bellard
    RETURN();
1084 79aceca5 bellard
}
1085 79aceca5 bellard
1086 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1087 d9bce9d9 j_mayer
void OPPROTO op_check_subfc_64 (void)
1088 79aceca5 bellard
{
1089 d9bce9d9 j_mayer
    if (likely((uint64_t)T0 > (uint64_t)T1)) {
1090 d9bce9d9 j_mayer
        xer_ca = 0;
1091 d9bce9d9 j_mayer
    } else {
1092 d9bce9d9 j_mayer
        xer_ca = 1;
1093 d9bce9d9 j_mayer
    }
1094 79aceca5 bellard
    RETURN();
1095 79aceca5 bellard
}
1096 d9bce9d9 j_mayer
#endif
1097 79aceca5 bellard
1098 0cfec834 ths
/* subtract from extended */
1099 76a66253 j_mayer
void OPPROTO op_subfe (void)
1100 79aceca5 bellard
{
1101 fdabc366 bellard
    do_subfe();
1102 79aceca5 bellard
    RETURN();
1103 79aceca5 bellard
}
1104 79aceca5 bellard
1105 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1106 d9bce9d9 j_mayer
void OPPROTO op_subfe_64 (void)
1107 79aceca5 bellard
{
1108 d9bce9d9 j_mayer
    do_subfe_64();
1109 79aceca5 bellard
    RETURN();
1110 79aceca5 bellard
}
1111 d9bce9d9 j_mayer
#endif
1112 79aceca5 bellard
1113 0cfec834 ths
/* subtract from immediate carrying */
1114 d9bce9d9 j_mayer
void OPPROTO op_subfic (void)
1115 79aceca5 bellard
{
1116 b6e27ab8 j_mayer
    T0 = (int32_t)PARAM1 + ~T0 + 1;
1117 d9bce9d9 j_mayer
    if ((uint32_t)T0 <= (uint32_t)PARAM1) {
1118 79aceca5 bellard
        xer_ca = 1;
1119 79aceca5 bellard
    } else {
1120 79aceca5 bellard
        xer_ca = 0;
1121 79aceca5 bellard
    }
1122 79aceca5 bellard
    RETURN();
1123 79aceca5 bellard
}
1124 79aceca5 bellard
1125 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1126 d9bce9d9 j_mayer
void OPPROTO op_subfic_64 (void)
1127 d9bce9d9 j_mayer
{
1128 d9bce9d9 j_mayer
    T0 = PARAM1 + ~T0 + 1;
1129 d9bce9d9 j_mayer
    if ((uint64_t)T0 <= (uint64_t)PARAM1) {
1130 d9bce9d9 j_mayer
        xer_ca = 1;
1131 d9bce9d9 j_mayer
    } else {
1132 d9bce9d9 j_mayer
        xer_ca = 0;
1133 d9bce9d9 j_mayer
    }
1134 d9bce9d9 j_mayer
    RETURN();
1135 d9bce9d9 j_mayer
}
1136 d9bce9d9 j_mayer
#endif
1137 d9bce9d9 j_mayer
1138 0cfec834 ths
/* subtract from minus one extended */
1139 d9bce9d9 j_mayer
void OPPROTO op_subfme (void)
1140 79aceca5 bellard
{
1141 79aceca5 bellard
    T0 = ~T0 + xer_ca - 1;
1142 d9bce9d9 j_mayer
    if (likely((uint32_t)T0 != (uint32_t)-1))
1143 d9bce9d9 j_mayer
        xer_ca = 1;
1144 d9bce9d9 j_mayer
    RETURN();
1145 d9bce9d9 j_mayer
}
1146 79aceca5 bellard
1147 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1148 d9bce9d9 j_mayer
void OPPROTO op_subfme_64 (void)
1149 d9bce9d9 j_mayer
{
1150 d9bce9d9 j_mayer
    T0 = ~T0 + xer_ca - 1;
1151 d9bce9d9 j_mayer
    if (likely((uint64_t)T0 != (uint64_t)-1))
1152 79aceca5 bellard
        xer_ca = 1;
1153 79aceca5 bellard
    RETURN();
1154 79aceca5 bellard
}
1155 d9bce9d9 j_mayer
#endif
1156 79aceca5 bellard
1157 76a66253 j_mayer
void OPPROTO op_subfmeo (void)
1158 79aceca5 bellard
{
1159 fdabc366 bellard
    do_subfmeo();
1160 79aceca5 bellard
    RETURN();
1161 79aceca5 bellard
}
1162 79aceca5 bellard
1163 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1164 d9bce9d9 j_mayer
void OPPROTO op_subfmeo_64 (void)
1165 d9bce9d9 j_mayer
{
1166 d9bce9d9 j_mayer
    do_subfmeo_64();
1167 d9bce9d9 j_mayer
    RETURN();
1168 d9bce9d9 j_mayer
}
1169 d9bce9d9 j_mayer
#endif
1170 d9bce9d9 j_mayer
1171 0cfec834 ths
/* subtract from zero extended */
1172 d9bce9d9 j_mayer
void OPPROTO op_subfze (void)
1173 79aceca5 bellard
{
1174 79aceca5 bellard
    T1 = ~T0;
1175 79aceca5 bellard
    T0 = T1 + xer_ca;
1176 d9bce9d9 j_mayer
    if ((uint32_t)T0 < (uint32_t)T1) {
1177 79aceca5 bellard
        xer_ca = 1;
1178 79aceca5 bellard
    } else {
1179 79aceca5 bellard
        xer_ca = 0;
1180 79aceca5 bellard
    }
1181 79aceca5 bellard
    RETURN();
1182 79aceca5 bellard
}
1183 79aceca5 bellard
1184 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1185 d9bce9d9 j_mayer
void OPPROTO op_subfze_64 (void)
1186 d9bce9d9 j_mayer
{
1187 d9bce9d9 j_mayer
    T1 = ~T0;
1188 d9bce9d9 j_mayer
    T0 = T1 + xer_ca;
1189 d9bce9d9 j_mayer
    if ((uint64_t)T0 < (uint64_t)T1) {
1190 d9bce9d9 j_mayer
        xer_ca = 1;
1191 d9bce9d9 j_mayer
    } else {
1192 d9bce9d9 j_mayer
        xer_ca = 0;
1193 d9bce9d9 j_mayer
    }
1194 d9bce9d9 j_mayer
    RETURN();
1195 d9bce9d9 j_mayer
}
1196 d9bce9d9 j_mayer
#endif
1197 d9bce9d9 j_mayer
1198 76a66253 j_mayer
void OPPROTO op_subfzeo (void)
1199 79aceca5 bellard
{
1200 fdabc366 bellard
    do_subfzeo();
1201 79aceca5 bellard
    RETURN();
1202 79aceca5 bellard
}
1203 79aceca5 bellard
1204 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1205 d9bce9d9 j_mayer
void OPPROTO op_subfzeo_64 (void)
1206 d9bce9d9 j_mayer
{
1207 d9bce9d9 j_mayer
    do_subfzeo_64();
1208 d9bce9d9 j_mayer
    RETURN();
1209 d9bce9d9 j_mayer
}
1210 d9bce9d9 j_mayer
#endif
1211 d9bce9d9 j_mayer
1212 79aceca5 bellard
/***                           Integer comparison                          ***/
1213 79aceca5 bellard
/* compare */
1214 d9bce9d9 j_mayer
void OPPROTO op_cmp (void)
1215 d9bce9d9 j_mayer
{
1216 d9bce9d9 j_mayer
    if ((int32_t)T0 < (int32_t)T1) {
1217 d9bce9d9 j_mayer
        T0 = 0x08;
1218 d9bce9d9 j_mayer
    } else if ((int32_t)T0 > (int32_t)T1) {
1219 d9bce9d9 j_mayer
        T0 = 0x04;
1220 d9bce9d9 j_mayer
    } else {
1221 d9bce9d9 j_mayer
        T0 = 0x02;
1222 d9bce9d9 j_mayer
    }
1223 966439a6 j_mayer
    T0 |= xer_so;
1224 d9bce9d9 j_mayer
    RETURN();
1225 d9bce9d9 j_mayer
}
1226 d9bce9d9 j_mayer
1227 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1228 d9bce9d9 j_mayer
void OPPROTO op_cmp_64 (void)
1229 79aceca5 bellard
{
1230 d9bce9d9 j_mayer
    if ((int64_t)T0 < (int64_t)T1) {
1231 79aceca5 bellard
        T0 = 0x08;
1232 d9bce9d9 j_mayer
    } else if ((int64_t)T0 > (int64_t)T1) {
1233 79aceca5 bellard
        T0 = 0x04;
1234 79aceca5 bellard
    } else {
1235 79aceca5 bellard
        T0 = 0x02;
1236 79aceca5 bellard
    }
1237 966439a6 j_mayer
    T0 |= xer_so;
1238 79aceca5 bellard
    RETURN();
1239 79aceca5 bellard
}
1240 d9bce9d9 j_mayer
#endif
1241 79aceca5 bellard
1242 79aceca5 bellard
/* compare immediate */
1243 d9bce9d9 j_mayer
void OPPROTO op_cmpi (void)
1244 79aceca5 bellard
{
1245 d9bce9d9 j_mayer
    if ((int32_t)T0 < (int32_t)PARAM1) {
1246 79aceca5 bellard
        T0 = 0x08;
1247 d9bce9d9 j_mayer
    } else if ((int32_t)T0 > (int32_t)PARAM1) {
1248 79aceca5 bellard
        T0 = 0x04;
1249 79aceca5 bellard
    } else {
1250 79aceca5 bellard
        T0 = 0x02;
1251 79aceca5 bellard
    }
1252 966439a6 j_mayer
    T0 |= xer_so;
1253 79aceca5 bellard
    RETURN();
1254 79aceca5 bellard
}
1255 79aceca5 bellard
1256 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1257 d9bce9d9 j_mayer
void OPPROTO op_cmpi_64 (void)
1258 d9bce9d9 j_mayer
{
1259 d9bce9d9 j_mayer
    if ((int64_t)T0 < (int64_t)((int32_t)PARAM1)) {
1260 d9bce9d9 j_mayer
        T0 = 0x08;
1261 d9bce9d9 j_mayer
    } else if ((int64_t)T0 > (int64_t)((int32_t)PARAM1)) {
1262 d9bce9d9 j_mayer
        T0 = 0x04;
1263 d9bce9d9 j_mayer
    } else {
1264 d9bce9d9 j_mayer
        T0 = 0x02;
1265 d9bce9d9 j_mayer
    }
1266 966439a6 j_mayer
    T0 |= xer_so;
1267 d9bce9d9 j_mayer
    RETURN();
1268 d9bce9d9 j_mayer
}
1269 d9bce9d9 j_mayer
#endif
1270 d9bce9d9 j_mayer
1271 79aceca5 bellard
/* compare logical */
1272 d9bce9d9 j_mayer
void OPPROTO op_cmpl (void)
1273 79aceca5 bellard
{
1274 d9bce9d9 j_mayer
    if ((uint32_t)T0 < (uint32_t)T1) {
1275 79aceca5 bellard
        T0 = 0x08;
1276 d9bce9d9 j_mayer
    } else if ((uint32_t)T0 > (uint32_t)T1) {
1277 79aceca5 bellard
        T0 = 0x04;
1278 79aceca5 bellard
    } else {
1279 79aceca5 bellard
        T0 = 0x02;
1280 79aceca5 bellard
    }
1281 966439a6 j_mayer
    T0 |= xer_so;
1282 79aceca5 bellard
    RETURN();
1283 79aceca5 bellard
}
1284 79aceca5 bellard
1285 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1286 d9bce9d9 j_mayer
void OPPROTO op_cmpl_64 (void)
1287 d9bce9d9 j_mayer
{
1288 d9bce9d9 j_mayer
    if ((uint64_t)T0 < (uint64_t)T1) {
1289 d9bce9d9 j_mayer
        T0 = 0x08;
1290 d9bce9d9 j_mayer
    } else if ((uint64_t)T0 > (uint64_t)T1) {
1291 d9bce9d9 j_mayer
        T0 = 0x04;
1292 d9bce9d9 j_mayer
    } else {
1293 d9bce9d9 j_mayer
        T0 = 0x02;
1294 d9bce9d9 j_mayer
    }
1295 966439a6 j_mayer
    T0 |= xer_so;
1296 d9bce9d9 j_mayer
    RETURN();
1297 d9bce9d9 j_mayer
}
1298 d9bce9d9 j_mayer
#endif
1299 d9bce9d9 j_mayer
1300 79aceca5 bellard
/* compare logical immediate */
1301 d9bce9d9 j_mayer
void OPPROTO op_cmpli (void)
1302 d9bce9d9 j_mayer
{
1303 d9bce9d9 j_mayer
    if ((uint32_t)T0 < (uint32_t)PARAM1) {
1304 d9bce9d9 j_mayer
        T0 = 0x08;
1305 d9bce9d9 j_mayer
    } else if ((uint32_t)T0 > (uint32_t)PARAM1) {
1306 d9bce9d9 j_mayer
        T0 = 0x04;
1307 d9bce9d9 j_mayer
    } else {
1308 d9bce9d9 j_mayer
        T0 = 0x02;
1309 d9bce9d9 j_mayer
    }
1310 966439a6 j_mayer
    T0 |= xer_so;
1311 d9bce9d9 j_mayer
    RETURN();
1312 d9bce9d9 j_mayer
}
1313 d9bce9d9 j_mayer
1314 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1315 d9bce9d9 j_mayer
void OPPROTO op_cmpli_64 (void)
1316 79aceca5 bellard
{
1317 d9bce9d9 j_mayer
    if ((uint64_t)T0 < (uint64_t)PARAM1) {
1318 79aceca5 bellard
        T0 = 0x08;
1319 d9bce9d9 j_mayer
    } else if ((uint64_t)T0 > (uint64_t)PARAM1) {
1320 79aceca5 bellard
        T0 = 0x04;
1321 79aceca5 bellard
    } else {
1322 79aceca5 bellard
        T0 = 0x02;
1323 79aceca5 bellard
    }
1324 966439a6 j_mayer
    T0 |= xer_so;
1325 79aceca5 bellard
    RETURN();
1326 79aceca5 bellard
}
1327 d9bce9d9 j_mayer
#endif
1328 d9bce9d9 j_mayer
1329 d9bce9d9 j_mayer
void OPPROTO op_isel (void)
1330 d9bce9d9 j_mayer
{
1331 d9bce9d9 j_mayer
    if (T0)
1332 d9bce9d9 j_mayer
        T0 = T1;
1333 d9bce9d9 j_mayer
    else
1334 d9bce9d9 j_mayer
        T0 = T2;
1335 d9bce9d9 j_mayer
    RETURN();
1336 d9bce9d9 j_mayer
}
1337 d9bce9d9 j_mayer
1338 d9bce9d9 j_mayer
void OPPROTO op_popcntb (void)
1339 d9bce9d9 j_mayer
{
1340 d9bce9d9 j_mayer
    do_popcntb();
1341 d9bce9d9 j_mayer
    RETURN();
1342 d9bce9d9 j_mayer
}
1343 d9bce9d9 j_mayer
1344 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1345 d9bce9d9 j_mayer
void OPPROTO op_popcntb_64 (void)
1346 d9bce9d9 j_mayer
{
1347 d9bce9d9 j_mayer
    do_popcntb_64();
1348 d9bce9d9 j_mayer
    RETURN();
1349 d9bce9d9 j_mayer
}
1350 d9bce9d9 j_mayer
#endif
1351 79aceca5 bellard
1352 79aceca5 bellard
/***                            Integer logical                            ***/
1353 79aceca5 bellard
/* and */
1354 36081602 j_mayer
void OPPROTO op_and (void)
1355 79aceca5 bellard
{
1356 79aceca5 bellard
    T0 &= T1;
1357 79aceca5 bellard
    RETURN();
1358 79aceca5 bellard
}
1359 79aceca5 bellard
1360 79aceca5 bellard
/* andc */
1361 36081602 j_mayer
void OPPROTO op_andc (void)
1362 79aceca5 bellard
{
1363 79aceca5 bellard
    T0 &= ~T1;
1364 79aceca5 bellard
    RETURN();
1365 79aceca5 bellard
}
1366 79aceca5 bellard
1367 79aceca5 bellard
/* andi. */
1368 76a66253 j_mayer
void OPPROTO op_andi_T0 (void)
1369 79aceca5 bellard
{
1370 36081602 j_mayer
    T0 &= PARAM1;
1371 79aceca5 bellard
    RETURN();
1372 79aceca5 bellard
}
1373 79aceca5 bellard
1374 76a66253 j_mayer
void OPPROTO op_andi_T1 (void)
1375 76a66253 j_mayer
{
1376 76a66253 j_mayer
    T1 &= PARAM1;
1377 76a66253 j_mayer
    RETURN();
1378 76a66253 j_mayer
}
1379 76a66253 j_mayer
1380 40d0591e j_mayer
#if defined(TARGET_PPC64)
1381 40d0591e j_mayer
void OPPROTO op_andi_T0_64 (void)
1382 40d0591e j_mayer
{
1383 40d0591e j_mayer
    T0 &= ((uint64_t)PARAM1 << 32) | PARAM2;
1384 40d0591e j_mayer
    RETURN();
1385 40d0591e j_mayer
}
1386 40d0591e j_mayer
1387 40d0591e j_mayer
void OPPROTO op_andi_T1_64 (void)
1388 40d0591e j_mayer
{
1389 40d0591e j_mayer
    T1 &= ((uint64_t)PARAM1 << 32) | PARAM2;
1390 40d0591e j_mayer
    RETURN();
1391 40d0591e j_mayer
}
1392 40d0591e j_mayer
#endif
1393 40d0591e j_mayer
1394 40d0591e j_mayer
1395 79aceca5 bellard
/* count leading zero */
1396 76a66253 j_mayer
void OPPROTO op_cntlzw (void)
1397 79aceca5 bellard
{
1398 0487d6a8 j_mayer
    T0 = _do_cntlzw(T0);
1399 79aceca5 bellard
    RETURN();
1400 79aceca5 bellard
}
1401 79aceca5 bellard
1402 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1403 d9bce9d9 j_mayer
void OPPROTO op_cntlzd (void)
1404 d9bce9d9 j_mayer
{
1405 0487d6a8 j_mayer
    T0 = _do_cntlzd(T0);
1406 d9bce9d9 j_mayer
    RETURN();
1407 d9bce9d9 j_mayer
}
1408 d9bce9d9 j_mayer
#endif
1409 d9bce9d9 j_mayer
1410 79aceca5 bellard
/* eqv */
1411 36081602 j_mayer
void OPPROTO op_eqv (void)
1412 79aceca5 bellard
{
1413 79aceca5 bellard
    T0 = ~(T0 ^ T1);
1414 79aceca5 bellard
    RETURN();
1415 79aceca5 bellard
}
1416 79aceca5 bellard
1417 79aceca5 bellard
/* extend sign byte */
1418 d9bce9d9 j_mayer
void OPPROTO op_extsb (void)
1419 79aceca5 bellard
{
1420 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
1421 d9bce9d9 j_mayer
    T0 = (int64_t)((int8_t)T0);
1422 d9bce9d9 j_mayer
#else
1423 d9bce9d9 j_mayer
    T0 = (int32_t)((int8_t)T0);
1424 d9bce9d9 j_mayer
#endif
1425 79aceca5 bellard
    RETURN();
1426 79aceca5 bellard
}
1427 79aceca5 bellard
1428 79aceca5 bellard
/* extend sign half word */
1429 d9bce9d9 j_mayer
void OPPROTO op_extsh (void)
1430 79aceca5 bellard
{
1431 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
1432 d9bce9d9 j_mayer
    T0 = (int64_t)((int16_t)T0);
1433 d9bce9d9 j_mayer
#else
1434 d9bce9d9 j_mayer
    T0 = (int32_t)((int16_t)T0);
1435 d9bce9d9 j_mayer
#endif
1436 79aceca5 bellard
    RETURN();
1437 79aceca5 bellard
}
1438 79aceca5 bellard
1439 d9bce9d9 j_mayer
#if defined (TARGET_PPC64)
1440 d9bce9d9 j_mayer
void OPPROTO op_extsw (void)
1441 d9bce9d9 j_mayer
{
1442 d9bce9d9 j_mayer
    T0 = (int64_t)((int32_t)T0);
1443 d9bce9d9 j_mayer
    RETURN();
1444 d9bce9d9 j_mayer
}
1445 d9bce9d9 j_mayer
#endif
1446 d9bce9d9 j_mayer
1447 79aceca5 bellard
/* nand */
1448 36081602 j_mayer
void OPPROTO op_nand (void)
1449 79aceca5 bellard
{
1450 79aceca5 bellard
    T0 = ~(T0 & T1);
1451 79aceca5 bellard
    RETURN();
1452 79aceca5 bellard
}
1453 79aceca5 bellard
1454 79aceca5 bellard
/* nor */
1455 36081602 j_mayer
void OPPROTO op_nor (void)
1456 79aceca5 bellard
{
1457 79aceca5 bellard
    T0 = ~(T0 | T1);
1458 79aceca5 bellard
    RETURN();
1459 79aceca5 bellard
}
1460 79aceca5 bellard
1461 79aceca5 bellard
/* or */
1462 36081602 j_mayer
void OPPROTO op_or (void)
1463 79aceca5 bellard
{
1464 79aceca5 bellard
    T0 |= T1;
1465 79aceca5 bellard
    RETURN();
1466 79aceca5 bellard
}
1467 79aceca5 bellard
1468 79aceca5 bellard
/* orc */
1469 36081602 j_mayer
void OPPROTO op_orc (void)
1470 79aceca5 bellard
{
1471 79aceca5 bellard
    T0 |= ~T1;
1472 79aceca5 bellard
    RETURN();
1473 79aceca5 bellard
}
1474 79aceca5 bellard
1475 79aceca5 bellard
/* ori */
1476 36081602 j_mayer
void OPPROTO op_ori (void)
1477 79aceca5 bellard
{
1478 36081602 j_mayer
    T0 |= PARAM1;
1479 79aceca5 bellard
    RETURN();
1480 79aceca5 bellard
}
1481 79aceca5 bellard
1482 79aceca5 bellard
/* xor */
1483 36081602 j_mayer
void OPPROTO op_xor (void)
1484 79aceca5 bellard
{
1485 79aceca5 bellard
    T0 ^= T1;
1486 79aceca5 bellard
    RETURN();
1487 79aceca5 bellard
}
1488 79aceca5 bellard
1489 79aceca5 bellard
/* xori */
1490 36081602 j_mayer
void OPPROTO op_xori (void)
1491 79aceca5 bellard
{
1492 36081602 j_mayer
    T0 ^= PARAM1;
1493 79aceca5 bellard
    RETURN();
1494 79aceca5 bellard
}
1495 79aceca5 bellard
1496 79aceca5 bellard
/***                             Integer rotate                            ***/
1497 76a66253 j_mayer
void OPPROTO op_rotl32_T0_T1 (void)
1498 79aceca5 bellard
{
1499 76a66253 j_mayer
    T0 = rotl32(T0, T1 & 0x1F);
1500 79aceca5 bellard
    RETURN();
1501 79aceca5 bellard
}
1502 79aceca5 bellard
1503 76a66253 j_mayer
void OPPROTO op_rotli32_T0 (void)
1504 79aceca5 bellard
{
1505 76a66253 j_mayer
    T0 = rotl32(T0, PARAM1);
1506 79aceca5 bellard
    RETURN();
1507 79aceca5 bellard
}
1508 79aceca5 bellard
1509 51789c41 j_mayer
#if defined(TARGET_PPC64)
1510 51789c41 j_mayer
void OPPROTO op_rotl64_T0_T1 (void)
1511 51789c41 j_mayer
{
1512 51789c41 j_mayer
    T0 = rotl64(T0, T1 & 0x3F);
1513 51789c41 j_mayer
    RETURN();
1514 51789c41 j_mayer
}
1515 51789c41 j_mayer
1516 51789c41 j_mayer
void OPPROTO op_rotli64_T0 (void)
1517 51789c41 j_mayer
{
1518 51789c41 j_mayer
    T0 = rotl64(T0, PARAM1);
1519 51789c41 j_mayer
    RETURN();
1520 51789c41 j_mayer
}
1521 51789c41 j_mayer
#endif
1522 51789c41 j_mayer
1523 79aceca5 bellard
/***                             Integer shift                             ***/
1524 79aceca5 bellard
/* shift left word */
1525 d9bce9d9 j_mayer
void OPPROTO op_slw (void)
1526 79aceca5 bellard
{
1527 79aceca5 bellard
    if (T1 & 0x20) {
1528 79aceca5 bellard
        T0 = 0;
1529 79aceca5 bellard
    } else {
1530 d9bce9d9 j_mayer
        T0 = (uint32_t)(T0 << T1);
1531 d9bce9d9 j_mayer
    }
1532 d9bce9d9 j_mayer
    RETURN();
1533 d9bce9d9 j_mayer
}
1534 d9bce9d9 j_mayer
1535 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1536 d9bce9d9 j_mayer
void OPPROTO op_sld (void)
1537 d9bce9d9 j_mayer
{
1538 d9bce9d9 j_mayer
    if (T1 & 0x40) {
1539 d9bce9d9 j_mayer
        T0 = 0;
1540 d9bce9d9 j_mayer
    } else {
1541 79aceca5 bellard
        T0 = T0 << T1;
1542 79aceca5 bellard
    }
1543 79aceca5 bellard
    RETURN();
1544 79aceca5 bellard
}
1545 d9bce9d9 j_mayer
#endif
1546 79aceca5 bellard
1547 79aceca5 bellard
/* shift right algebraic word */
1548 76a66253 j_mayer
void OPPROTO op_sraw (void)
1549 79aceca5 bellard
{
1550 9a64fbe4 bellard
    do_sraw();
1551 79aceca5 bellard
    RETURN();
1552 79aceca5 bellard
}
1553 79aceca5 bellard
1554 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1555 d9bce9d9 j_mayer
void OPPROTO op_srad (void)
1556 d9bce9d9 j_mayer
{
1557 d9bce9d9 j_mayer
    do_srad();
1558 d9bce9d9 j_mayer
    RETURN();
1559 d9bce9d9 j_mayer
}
1560 d9bce9d9 j_mayer
#endif
1561 d9bce9d9 j_mayer
1562 79aceca5 bellard
/* shift right algebraic word immediate */
1563 d9bce9d9 j_mayer
void OPPROTO op_srawi (void)
1564 79aceca5 bellard
{
1565 d9bce9d9 j_mayer
    uint32_t mask = (uint32_t)PARAM2;
1566 d9bce9d9 j_mayer
1567 d9bce9d9 j_mayer
    T0 = (int32_t)T0 >> PARAM1;
1568 d9bce9d9 j_mayer
    if ((int32_t)T1 < 0 && (T1 & mask) != 0) {
1569 79aceca5 bellard
        xer_ca = 1;
1570 79aceca5 bellard
    } else {
1571 79aceca5 bellard
        xer_ca = 0;
1572 79aceca5 bellard
    }
1573 79aceca5 bellard
    RETURN();
1574 79aceca5 bellard
}
1575 79aceca5 bellard
1576 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1577 d9bce9d9 j_mayer
void OPPROTO op_sradi (void)
1578 d9bce9d9 j_mayer
{
1579 d9bce9d9 j_mayer
    uint64_t mask = ((uint64_t)PARAM2 << 32) | (uint64_t)PARAM3;
1580 d9bce9d9 j_mayer
1581 d9bce9d9 j_mayer
    T0 = (int64_t)T0 >> PARAM1;
1582 d9bce9d9 j_mayer
    if ((int64_t)T1 < 0 && ((uint64_t)T1 & mask) != 0) {
1583 d9bce9d9 j_mayer
        xer_ca = 1;
1584 d9bce9d9 j_mayer
    } else {
1585 d9bce9d9 j_mayer
        xer_ca = 0;
1586 d9bce9d9 j_mayer
    }
1587 d9bce9d9 j_mayer
    RETURN();
1588 d9bce9d9 j_mayer
}
1589 d9bce9d9 j_mayer
#endif
1590 d9bce9d9 j_mayer
1591 79aceca5 bellard
/* shift right word */
1592 d9bce9d9 j_mayer
void OPPROTO op_srw (void)
1593 79aceca5 bellard
{
1594 79aceca5 bellard
    if (T1 & 0x20) {
1595 79aceca5 bellard
        T0 = 0;
1596 79aceca5 bellard
    } else {
1597 d9bce9d9 j_mayer
        T0 = (uint32_t)T0 >> T1;
1598 d9bce9d9 j_mayer
    }
1599 d9bce9d9 j_mayer
    RETURN();
1600 d9bce9d9 j_mayer
}
1601 d9bce9d9 j_mayer
1602 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1603 d9bce9d9 j_mayer
void OPPROTO op_srd (void)
1604 d9bce9d9 j_mayer
{
1605 d9bce9d9 j_mayer
    if (T1 & 0x40) {
1606 d9bce9d9 j_mayer
        T0 = 0;
1607 d9bce9d9 j_mayer
    } else {
1608 d9bce9d9 j_mayer
        T0 = (uint64_t)T0 >> T1;
1609 79aceca5 bellard
    }
1610 79aceca5 bellard
    RETURN();
1611 79aceca5 bellard
}
1612 d9bce9d9 j_mayer
#endif
1613 79aceca5 bellard
1614 76a66253 j_mayer
void OPPROTO op_sl_T0_T1 (void)
1615 76a66253 j_mayer
{
1616 76a66253 j_mayer
    T0 = T0 << T1;
1617 76a66253 j_mayer
    RETURN();
1618 76a66253 j_mayer
}
1619 76a66253 j_mayer
1620 76a66253 j_mayer
void OPPROTO op_sli_T0 (void)
1621 76a66253 j_mayer
{
1622 76a66253 j_mayer
    T0 = T0 << PARAM1;
1623 76a66253 j_mayer
    RETURN();
1624 76a66253 j_mayer
}
1625 76a66253 j_mayer
1626 76a66253 j_mayer
void OPPROTO op_srl_T0_T1 (void)
1627 76a66253 j_mayer
{
1628 d9bce9d9 j_mayer
    T0 = (uint32_t)T0 >> T1;
1629 d9bce9d9 j_mayer
    RETURN();
1630 d9bce9d9 j_mayer
}
1631 d9bce9d9 j_mayer
1632 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1633 d9bce9d9 j_mayer
void OPPROTO op_srl_T0_T1_64 (void)
1634 d9bce9d9 j_mayer
{
1635 d9bce9d9 j_mayer
    T0 = (uint32_t)T0 >> T1;
1636 76a66253 j_mayer
    RETURN();
1637 76a66253 j_mayer
}
1638 d9bce9d9 j_mayer
#endif
1639 76a66253 j_mayer
1640 76a66253 j_mayer
void OPPROTO op_srli_T0 (void)
1641 76a66253 j_mayer
{
1642 d9bce9d9 j_mayer
    T0 = (uint32_t)T0 >> PARAM1;
1643 76a66253 j_mayer
    RETURN();
1644 76a66253 j_mayer
}
1645 76a66253 j_mayer
1646 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1647 d9bce9d9 j_mayer
void OPPROTO op_srli_T0_64 (void)
1648 d9bce9d9 j_mayer
{
1649 d9bce9d9 j_mayer
    T0 = (uint64_t)T0 >> PARAM1;
1650 d9bce9d9 j_mayer
    RETURN();
1651 d9bce9d9 j_mayer
}
1652 d9bce9d9 j_mayer
#endif
1653 d9bce9d9 j_mayer
1654 76a66253 j_mayer
void OPPROTO op_srli_T1 (void)
1655 76a66253 j_mayer
{
1656 d9bce9d9 j_mayer
    T1 = (uint32_t)T1 >> PARAM1;
1657 76a66253 j_mayer
    RETURN();
1658 76a66253 j_mayer
}
1659 76a66253 j_mayer
1660 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1661 d9bce9d9 j_mayer
void OPPROTO op_srli_T1_64 (void)
1662 d9bce9d9 j_mayer
{
1663 d9bce9d9 j_mayer
    T1 = (uint64_t)T1 >> PARAM1;
1664 d9bce9d9 j_mayer
    RETURN();
1665 d9bce9d9 j_mayer
}
1666 d9bce9d9 j_mayer
#endif
1667 d9bce9d9 j_mayer
1668 79aceca5 bellard
/***                       Floating-Point arithmetic                       ***/
1669 9a64fbe4 bellard
/* fadd - fadd. */
1670 36081602 j_mayer
void OPPROTO op_fadd (void)
1671 79aceca5 bellard
{
1672 76a66253 j_mayer
    FT0 = float64_add(FT0, FT1, &env->fp_status);
1673 79aceca5 bellard
    RETURN();
1674 79aceca5 bellard
}
1675 79aceca5 bellard
1676 9a64fbe4 bellard
/* fsub - fsub. */
1677 36081602 j_mayer
void OPPROTO op_fsub (void)
1678 79aceca5 bellard
{
1679 76a66253 j_mayer
    FT0 = float64_sub(FT0, FT1, &env->fp_status);
1680 79aceca5 bellard
    RETURN();
1681 79aceca5 bellard
}
1682 79aceca5 bellard
1683 9a64fbe4 bellard
/* fmul - fmul. */
1684 36081602 j_mayer
void OPPROTO op_fmul (void)
1685 79aceca5 bellard
{
1686 76a66253 j_mayer
    FT0 = float64_mul(FT0, FT1, &env->fp_status);
1687 79aceca5 bellard
    RETURN();
1688 79aceca5 bellard
}
1689 79aceca5 bellard
1690 9a64fbe4 bellard
/* fdiv - fdiv. */
1691 36081602 j_mayer
void OPPROTO op_fdiv (void)
1692 79aceca5 bellard
{
1693 fdabc366 bellard
    FT0 = float64_div(FT0, FT1, &env->fp_status);
1694 79aceca5 bellard
    RETURN();
1695 79aceca5 bellard
}
1696 28b6751f bellard
1697 9a64fbe4 bellard
/* fsqrt - fsqrt. */
1698 36081602 j_mayer
void OPPROTO op_fsqrt (void)
1699 28b6751f bellard
{
1700 9a64fbe4 bellard
    do_fsqrt();
1701 9a64fbe4 bellard
    RETURN();
1702 28b6751f bellard
}
1703 28b6751f bellard
1704 d7e4b87e j_mayer
/* fre - fre. */
1705 d7e4b87e j_mayer
void OPPROTO op_fre (void)
1706 d7e4b87e j_mayer
{
1707 d7e4b87e j_mayer
    do_fre();
1708 d7e4b87e j_mayer
    RETURN();
1709 d7e4b87e j_mayer
}
1710 d7e4b87e j_mayer
1711 9a64fbe4 bellard
/* fres - fres. */
1712 36081602 j_mayer
void OPPROTO op_fres (void)
1713 28b6751f bellard
{
1714 9a64fbe4 bellard
    do_fres();
1715 9a64fbe4 bellard
    RETURN();
1716 28b6751f bellard
}
1717 28b6751f bellard
1718 9a64fbe4 bellard
/* frsqrte  - frsqrte. */
1719 36081602 j_mayer
void OPPROTO op_frsqrte (void)
1720 28b6751f bellard
{
1721 4ecc3190 bellard
    do_frsqrte();
1722 9a64fbe4 bellard
    RETURN();
1723 28b6751f bellard
}
1724 28b6751f bellard
1725 9a64fbe4 bellard
/* fsel - fsel. */
1726 36081602 j_mayer
void OPPROTO op_fsel (void)
1727 28b6751f bellard
{
1728 9a64fbe4 bellard
    do_fsel();
1729 9a64fbe4 bellard
    RETURN();
1730 28b6751f bellard
}
1731 28b6751f bellard
1732 9a64fbe4 bellard
/***                     Floating-Point multiply-and-add                   ***/
1733 9a64fbe4 bellard
/* fmadd - fmadd. */
1734 36081602 j_mayer
void OPPROTO op_fmadd (void)
1735 28b6751f bellard
{
1736 e864cabd j_mayer
#if USE_PRECISE_EMULATION
1737 e864cabd j_mayer
    do_fmadd();
1738 e864cabd j_mayer
#else
1739 76a66253 j_mayer
    FT0 = float64_mul(FT0, FT1, &env->fp_status);
1740 76a66253 j_mayer
    FT0 = float64_add(FT0, FT2, &env->fp_status);
1741 e864cabd j_mayer
#endif
1742 9a64fbe4 bellard
    RETURN();
1743 28b6751f bellard
}
1744 28b6751f bellard
1745 9a64fbe4 bellard
/* fmsub - fmsub. */
1746 36081602 j_mayer
void OPPROTO op_fmsub (void)
1747 28b6751f bellard
{
1748 e864cabd j_mayer
#if USE_PRECISE_EMULATION
1749 e864cabd j_mayer
    do_fmsub();
1750 e864cabd j_mayer
#else
1751 76a66253 j_mayer
    FT0 = float64_mul(FT0, FT1, &env->fp_status);
1752 76a66253 j_mayer
    FT0 = float64_sub(FT0, FT2, &env->fp_status);
1753 e864cabd j_mayer
#endif
1754 9a64fbe4 bellard
    RETURN();
1755 28b6751f bellard
}
1756 28b6751f bellard
1757 9a64fbe4 bellard
/* fnmadd - fnmadd. - fnmadds - fnmadds. */
1758 36081602 j_mayer
void OPPROTO op_fnmadd (void)
1759 28b6751f bellard
{
1760 4b3686fa bellard
    do_fnmadd();
1761 9a64fbe4 bellard
    RETURN();
1762 28b6751f bellard
}
1763 28b6751f bellard
1764 9a64fbe4 bellard
/* fnmsub - fnmsub. */
1765 36081602 j_mayer
void OPPROTO op_fnmsub (void)
1766 28b6751f bellard
{
1767 4b3686fa bellard
    do_fnmsub();
1768 9a64fbe4 bellard
    RETURN();
1769 28b6751f bellard
}
1770 28b6751f bellard
1771 9a64fbe4 bellard
/***                     Floating-Point round & convert                    ***/
1772 9a64fbe4 bellard
/* frsp - frsp. */
1773 36081602 j_mayer
void OPPROTO op_frsp (void)
1774 28b6751f bellard
{
1775 76a66253 j_mayer
    FT0 = float64_to_float32(FT0, &env->fp_status);
1776 9a64fbe4 bellard
    RETURN();
1777 28b6751f bellard
}
1778 28b6751f bellard
1779 9a64fbe4 bellard
/* fctiw - fctiw. */
1780 36081602 j_mayer
void OPPROTO op_fctiw (void)
1781 28b6751f bellard
{
1782 9a64fbe4 bellard
    do_fctiw();
1783 9a64fbe4 bellard
    RETURN();
1784 28b6751f bellard
}
1785 28b6751f bellard
1786 9a64fbe4 bellard
/* fctiwz - fctiwz. */
1787 36081602 j_mayer
void OPPROTO op_fctiwz (void)
1788 28b6751f bellard
{
1789 9a64fbe4 bellard
    do_fctiwz();
1790 9a64fbe4 bellard
    RETURN();
1791 28b6751f bellard
}
1792 28b6751f bellard
1793 426613db j_mayer
#if defined(TARGET_PPC64)
1794 426613db j_mayer
/* fcfid - fcfid. */
1795 36081602 j_mayer
void OPPROTO op_fcfid (void)
1796 426613db j_mayer
{
1797 426613db j_mayer
    do_fcfid();
1798 426613db j_mayer
    RETURN();
1799 426613db j_mayer
}
1800 426613db j_mayer
1801 426613db j_mayer
/* fctid - fctid. */
1802 36081602 j_mayer
void OPPROTO op_fctid (void)
1803 426613db j_mayer
{
1804 426613db j_mayer
    do_fctid();
1805 426613db j_mayer
    RETURN();
1806 426613db j_mayer
}
1807 426613db j_mayer
1808 426613db j_mayer
/* fctidz - fctidz. */
1809 36081602 j_mayer
void OPPROTO op_fctidz (void)
1810 426613db j_mayer
{
1811 426613db j_mayer
    do_fctidz();
1812 426613db j_mayer
    RETURN();
1813 426613db j_mayer
}
1814 426613db j_mayer
#endif
1815 426613db j_mayer
1816 d7e4b87e j_mayer
void OPPROTO op_frin (void)
1817 d7e4b87e j_mayer
{
1818 d7e4b87e j_mayer
    do_frin();
1819 d7e4b87e j_mayer
    RETURN();
1820 d7e4b87e j_mayer
}
1821 d7e4b87e j_mayer
1822 d7e4b87e j_mayer
void OPPROTO op_friz (void)
1823 d7e4b87e j_mayer
{
1824 d7e4b87e j_mayer
    do_friz();
1825 d7e4b87e j_mayer
    RETURN();
1826 d7e4b87e j_mayer
}
1827 d7e4b87e j_mayer
1828 d7e4b87e j_mayer
void OPPROTO op_frip (void)
1829 d7e4b87e j_mayer
{
1830 d7e4b87e j_mayer
    do_frip();
1831 d7e4b87e j_mayer
    RETURN();
1832 d7e4b87e j_mayer
}
1833 d7e4b87e j_mayer
1834 d7e4b87e j_mayer
void OPPROTO op_frim (void)
1835 d7e4b87e j_mayer
{
1836 d7e4b87e j_mayer
    do_frim();
1837 d7e4b87e j_mayer
    RETURN();
1838 d7e4b87e j_mayer
}
1839 d7e4b87e j_mayer
1840 9a64fbe4 bellard
/***                         Floating-Point compare                        ***/
1841 9a64fbe4 bellard
/* fcmpu */
1842 36081602 j_mayer
void OPPROTO op_fcmpu (void)
1843 28b6751f bellard
{
1844 9a64fbe4 bellard
    do_fcmpu();
1845 9a64fbe4 bellard
    RETURN();
1846 28b6751f bellard
}
1847 28b6751f bellard
1848 9a64fbe4 bellard
/* fcmpo */
1849 36081602 j_mayer
void OPPROTO op_fcmpo (void)
1850 28b6751f bellard
{
1851 9a64fbe4 bellard
    do_fcmpo();
1852 9a64fbe4 bellard
    RETURN();
1853 fb0eaffc bellard
}
1854 fb0eaffc bellard
1855 9a64fbe4 bellard
/***                         Floating-point move                           ***/
1856 9a64fbe4 bellard
/* fabs */
1857 36081602 j_mayer
void OPPROTO op_fabs (void)
1858 fb0eaffc bellard
{
1859 fdabc366 bellard
    FT0 = float64_abs(FT0);
1860 fb0eaffc bellard
    RETURN();
1861 fb0eaffc bellard
}
1862 fb0eaffc bellard
1863 9a64fbe4 bellard
/* fnabs */
1864 36081602 j_mayer
void OPPROTO op_fnabs (void)
1865 fb0eaffc bellard
{
1866 fdabc366 bellard
    FT0 = float64_abs(FT0);
1867 fdabc366 bellard
    FT0 = float64_chs(FT0);
1868 fb0eaffc bellard
    RETURN();
1869 fb0eaffc bellard
}
1870 fb0eaffc bellard
1871 9a64fbe4 bellard
/* fneg */
1872 36081602 j_mayer
void OPPROTO op_fneg (void)
1873 fb0eaffc bellard
{
1874 fdabc366 bellard
    FT0 = float64_chs(FT0);
1875 fb0eaffc bellard
    RETURN();
1876 fb0eaffc bellard
}
1877 fb0eaffc bellard
1878 9a64fbe4 bellard
/* Load and store */
1879 9a64fbe4 bellard
#define MEMSUFFIX _raw
1880 76a66253 j_mayer
#include "op_helper.h"
1881 9a64fbe4 bellard
#include "op_mem.h"
1882 a541f297 bellard
#if !defined(CONFIG_USER_ONLY)
1883 9a64fbe4 bellard
#define MEMSUFFIX _user
1884 76a66253 j_mayer
#include "op_helper.h"
1885 9a64fbe4 bellard
#include "op_mem.h"
1886 9a64fbe4 bellard
#define MEMSUFFIX _kernel
1887 76a66253 j_mayer
#include "op_helper.h"
1888 9a64fbe4 bellard
#include "op_mem.h"
1889 9a64fbe4 bellard
#endif
1890 9a64fbe4 bellard
1891 4b3686fa bellard
/* Special op to check and maybe clear reservation */
1892 d9bce9d9 j_mayer
void OPPROTO op_check_reservation (void)
1893 4b3686fa bellard
{
1894 fdabc366 bellard
    if ((uint32_t)env->reserve == (uint32_t)(T0 & ~0x00000003))
1895 fdabc366 bellard
        env->reserve = -1;
1896 4b3686fa bellard
    RETURN();
1897 4b3686fa bellard
}
1898 4b3686fa bellard
1899 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1900 d9bce9d9 j_mayer
void OPPROTO op_check_reservation_64 (void)
1901 d9bce9d9 j_mayer
{
1902 d9bce9d9 j_mayer
    if ((uint64_t)env->reserve == (uint64_t)(T0 & ~0x00000003))
1903 d9bce9d9 j_mayer
        env->reserve = -1;
1904 d9bce9d9 j_mayer
    RETURN();
1905 d9bce9d9 j_mayer
}
1906 d9bce9d9 j_mayer
#endif
1907 d9bce9d9 j_mayer
1908 9a64fbe4 bellard
/* Return from interrupt */
1909 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
1910 76a66253 j_mayer
void OPPROTO op_rfi (void)
1911 fb0eaffc bellard
{
1912 fdabc366 bellard
    do_rfi();
1913 fb0eaffc bellard
    RETURN();
1914 fb0eaffc bellard
}
1915 d9bce9d9 j_mayer
1916 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1917 426613db j_mayer
void OPPROTO op_rfid (void)
1918 426613db j_mayer
{
1919 426613db j_mayer
    do_rfid();
1920 426613db j_mayer
    RETURN();
1921 426613db j_mayer
}
1922 d9bce9d9 j_mayer
#endif
1923 76a66253 j_mayer
#endif
1924 fb0eaffc bellard
1925 9a64fbe4 bellard
/* Trap word */
1926 76a66253 j_mayer
void OPPROTO op_tw (void)
1927 fb0eaffc bellard
{
1928 76a66253 j_mayer
    do_tw(PARAM1);
1929 fb0eaffc bellard
    RETURN();
1930 fb0eaffc bellard
}
1931 fb0eaffc bellard
1932 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1933 d9bce9d9 j_mayer
void OPPROTO op_td (void)
1934 d9bce9d9 j_mayer
{
1935 d9bce9d9 j_mayer
    do_td(PARAM1);
1936 d9bce9d9 j_mayer
    RETURN();
1937 d9bce9d9 j_mayer
}
1938 d9bce9d9 j_mayer
#endif
1939 d9bce9d9 j_mayer
1940 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
1941 9a64fbe4 bellard
/* tlbia */
1942 36081602 j_mayer
void OPPROTO op_tlbia (void)
1943 fb0eaffc bellard
{
1944 9a64fbe4 bellard
    do_tlbia();
1945 9a64fbe4 bellard
    RETURN();
1946 9a64fbe4 bellard
}
1947 9a64fbe4 bellard
1948 9a64fbe4 bellard
/* tlbie */
1949 d9bce9d9 j_mayer
void OPPROTO op_tlbie (void)
1950 9a64fbe4 bellard
{
1951 9a64fbe4 bellard
    do_tlbie();
1952 fb0eaffc bellard
    RETURN();
1953 28b6751f bellard
}
1954 d9bce9d9 j_mayer
1955 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1956 d9bce9d9 j_mayer
void OPPROTO op_tlbie_64 (void)
1957 d9bce9d9 j_mayer
{
1958 d9bce9d9 j_mayer
    do_tlbie_64();
1959 d9bce9d9 j_mayer
    RETURN();
1960 d9bce9d9 j_mayer
}
1961 d9bce9d9 j_mayer
#endif
1962 d9bce9d9 j_mayer
1963 d9bce9d9 j_mayer
#if defined(TARGET_PPC64)
1964 d9bce9d9 j_mayer
void OPPROTO op_slbia (void)
1965 d9bce9d9 j_mayer
{
1966 d9bce9d9 j_mayer
    do_slbia();
1967 d9bce9d9 j_mayer
    RETURN();
1968 d9bce9d9 j_mayer
}
1969 d9bce9d9 j_mayer
1970 d9bce9d9 j_mayer
void OPPROTO op_slbie (void)
1971 d9bce9d9 j_mayer
{
1972 d9bce9d9 j_mayer
    do_slbie();
1973 d9bce9d9 j_mayer
    RETURN();
1974 d9bce9d9 j_mayer
}
1975 d9bce9d9 j_mayer
#endif
1976 76a66253 j_mayer
#endif
1977 3fc6c082 bellard
1978 76a66253 j_mayer
/* PowerPC 602/603/755 software TLB load instructions */
1979 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
1980 76a66253 j_mayer
void OPPROTO op_6xx_tlbld (void)
1981 76a66253 j_mayer
{
1982 76a66253 j_mayer
    do_load_6xx_tlb(0);
1983 76a66253 j_mayer
    RETURN();
1984 76a66253 j_mayer
}
1985 76a66253 j_mayer
1986 76a66253 j_mayer
void OPPROTO op_6xx_tlbli (void)
1987 76a66253 j_mayer
{
1988 76a66253 j_mayer
    do_load_6xx_tlb(1);
1989 76a66253 j_mayer
    RETURN();
1990 76a66253 j_mayer
}
1991 76a66253 j_mayer
#endif
1992 76a66253 j_mayer
1993 76a66253 j_mayer
/* 601 specific */
1994 76a66253 j_mayer
void OPPROTO op_load_601_rtcl (void)
1995 76a66253 j_mayer
{
1996 76a66253 j_mayer
    T0 = cpu_ppc601_load_rtcl(env);
1997 76a66253 j_mayer
    RETURN();
1998 76a66253 j_mayer
}
1999 76a66253 j_mayer
2000 76a66253 j_mayer
void OPPROTO op_load_601_rtcu (void)
2001 76a66253 j_mayer
{
2002 76a66253 j_mayer
    T0 = cpu_ppc601_load_rtcu(env);
2003 76a66253 j_mayer
    RETURN();
2004 76a66253 j_mayer
}
2005 76a66253 j_mayer
2006 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
2007 76a66253 j_mayer
void OPPROTO op_store_601_rtcl (void)
2008 76a66253 j_mayer
{
2009 76a66253 j_mayer
    cpu_ppc601_store_rtcl(env, T0);
2010 76a66253 j_mayer
    RETURN();
2011 76a66253 j_mayer
}
2012 76a66253 j_mayer
2013 76a66253 j_mayer
void OPPROTO op_store_601_rtcu (void)
2014 76a66253 j_mayer
{
2015 76a66253 j_mayer
    cpu_ppc601_store_rtcu(env, T0);
2016 76a66253 j_mayer
    RETURN();
2017 76a66253 j_mayer
}
2018 76a66253 j_mayer
2019 76a66253 j_mayer
void OPPROTO op_load_601_bat (void)
2020 76a66253 j_mayer
{
2021 76a66253 j_mayer
    T0 = env->IBAT[PARAM1][PARAM2];
2022 76a66253 j_mayer
    RETURN();
2023 76a66253 j_mayer
}
2024 76a66253 j_mayer
#endif /* !defined(CONFIG_USER_ONLY) */
2025 76a66253 j_mayer
2026 76a66253 j_mayer
/* 601 unified BATs store.
2027 76a66253 j_mayer
 * To avoid using specific MMU code for 601, we store BATs in
2028 76a66253 j_mayer
 * IBAT and DBAT simultaneously, then emulate unified BATs.
2029 76a66253 j_mayer
 */
2030 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
2031 76a66253 j_mayer
void OPPROTO op_store_601_batl (void)
2032 76a66253 j_mayer
{
2033 76a66253 j_mayer
    int nr = PARAM1;
2034 76a66253 j_mayer
2035 76a66253 j_mayer
    env->IBAT[1][nr] = T0;
2036 76a66253 j_mayer
    env->DBAT[1][nr] = T0;
2037 76a66253 j_mayer
    RETURN();
2038 76a66253 j_mayer
}
2039 76a66253 j_mayer
2040 76a66253 j_mayer
void OPPROTO op_store_601_batu (void)
2041 76a66253 j_mayer
{
2042 76a66253 j_mayer
    do_store_601_batu(PARAM1);
2043 76a66253 j_mayer
    RETURN();
2044 76a66253 j_mayer
}
2045 76a66253 j_mayer
#endif /* !defined(CONFIG_USER_ONLY) */
2046 76a66253 j_mayer
2047 76a66253 j_mayer
/* PowerPC 601 specific instructions (POWER bridge) */
2048 76a66253 j_mayer
/* XXX: those micro-ops need tests ! */
2049 76a66253 j_mayer
void OPPROTO op_POWER_abs (void)
2050 76a66253 j_mayer
{
2051 76a66253 j_mayer
    if (T0 == INT32_MIN)
2052 76a66253 j_mayer
        T0 = INT32_MAX;
2053 76a66253 j_mayer
    else if (T0 < 0)
2054 76a66253 j_mayer
        T0 = -T0;
2055 76a66253 j_mayer
    RETURN();
2056 76a66253 j_mayer
}
2057 76a66253 j_mayer
2058 76a66253 j_mayer
void OPPROTO op_POWER_abso (void)
2059 76a66253 j_mayer
{
2060 76a66253 j_mayer
    do_POWER_abso();
2061 76a66253 j_mayer
    RETURN();
2062 76a66253 j_mayer
}
2063 76a66253 j_mayer
2064 76a66253 j_mayer
void OPPROTO op_POWER_clcs (void)
2065 76a66253 j_mayer
{
2066 76a66253 j_mayer
    do_POWER_clcs();
2067 76a66253 j_mayer
    RETURN();
2068 76a66253 j_mayer
}
2069 76a66253 j_mayer
2070 76a66253 j_mayer
void OPPROTO op_POWER_div (void)
2071 76a66253 j_mayer
{
2072 76a66253 j_mayer
    do_POWER_div();
2073 76a66253 j_mayer
    RETURN();
2074 76a66253 j_mayer
}
2075 76a66253 j_mayer
2076 76a66253 j_mayer
void OPPROTO op_POWER_divo (void)
2077 76a66253 j_mayer
{
2078 76a66253 j_mayer
    do_POWER_divo();
2079 76a66253 j_mayer
    RETURN();
2080 76a66253 j_mayer
}
2081 76a66253 j_mayer
2082 76a66253 j_mayer
void OPPROTO op_POWER_divs (void)
2083 76a66253 j_mayer
{
2084 76a66253 j_mayer
    do_POWER_divs();
2085 76a66253 j_mayer
    RETURN();
2086 76a66253 j_mayer
}
2087 76a66253 j_mayer
2088 76a66253 j_mayer
void OPPROTO op_POWER_divso (void)
2089 76a66253 j_mayer
{
2090 76a66253 j_mayer
    do_POWER_divso();
2091 76a66253 j_mayer
    RETURN();
2092 76a66253 j_mayer
}
2093 76a66253 j_mayer
2094 76a66253 j_mayer
void OPPROTO op_POWER_doz (void)
2095 76a66253 j_mayer
{
2096 d9bce9d9 j_mayer
    if ((int32_t)T1 > (int32_t)T0)
2097 76a66253 j_mayer
        T0 = T1 - T0;
2098 76a66253 j_mayer
    else
2099 76a66253 j_mayer
        T0 = 0;
2100 76a66253 j_mayer
    RETURN();
2101 76a66253 j_mayer
}
2102 76a66253 j_mayer
2103 76a66253 j_mayer
void OPPROTO op_POWER_dozo (void)
2104 76a66253 j_mayer
{
2105 76a66253 j_mayer
    do_POWER_dozo();
2106 76a66253 j_mayer
    RETURN();
2107 76a66253 j_mayer
}
2108 76a66253 j_mayer
2109 76a66253 j_mayer
void OPPROTO op_load_xer_cmp (void)
2110 76a66253 j_mayer
{
2111 76a66253 j_mayer
    T2 = xer_cmp;
2112 76a66253 j_mayer
    RETURN();
2113 76a66253 j_mayer
}
2114 76a66253 j_mayer
2115 76a66253 j_mayer
void OPPROTO op_POWER_maskg (void)
2116 76a66253 j_mayer
{
2117 76a66253 j_mayer
    do_POWER_maskg();
2118 76a66253 j_mayer
    RETURN();
2119 76a66253 j_mayer
}
2120 76a66253 j_mayer
2121 76a66253 j_mayer
void OPPROTO op_POWER_maskir (void)
2122 76a66253 j_mayer
{
2123 76a66253 j_mayer
    T0 = (T0 & ~T2) | (T1 & T2);
2124 76a66253 j_mayer
    RETURN();
2125 76a66253 j_mayer
}
2126 76a66253 j_mayer
2127 76a66253 j_mayer
void OPPROTO op_POWER_mul (void)
2128 76a66253 j_mayer
{
2129 76a66253 j_mayer
    uint64_t tmp;
2130 76a66253 j_mayer
2131 76a66253 j_mayer
    tmp = (uint64_t)T0 * (uint64_t)T1;
2132 76a66253 j_mayer
    env->spr[SPR_MQ] = tmp >> 32;
2133 76a66253 j_mayer
    T0 = tmp;
2134 76a66253 j_mayer
    RETURN();
2135 76a66253 j_mayer
}
2136 76a66253 j_mayer
2137 76a66253 j_mayer
void OPPROTO op_POWER_mulo (void)
2138 76a66253 j_mayer
{
2139 76a66253 j_mayer
    do_POWER_mulo();
2140 76a66253 j_mayer
    RETURN();
2141 76a66253 j_mayer
}
2142 76a66253 j_mayer
2143 76a66253 j_mayer
void OPPROTO op_POWER_nabs (void)
2144 76a66253 j_mayer
{
2145 76a66253 j_mayer
    if (T0 > 0)
2146 76a66253 j_mayer
        T0 = -T0;
2147 76a66253 j_mayer
    RETURN();
2148 76a66253 j_mayer
}
2149 76a66253 j_mayer
2150 76a66253 j_mayer
void OPPROTO op_POWER_nabso (void)
2151 76a66253 j_mayer
{
2152 76a66253 j_mayer
    /* nabs never overflows */
2153 76a66253 j_mayer
    if (T0 > 0)
2154 76a66253 j_mayer
        T0 = -T0;
2155 76a66253 j_mayer
    xer_ov = 0;
2156 76a66253 j_mayer
    RETURN();
2157 76a66253 j_mayer
}
2158 76a66253 j_mayer
2159 76a66253 j_mayer
/* XXX: factorise POWER rotates... */
2160 76a66253 j_mayer
void OPPROTO op_POWER_rlmi (void)
2161 76a66253 j_mayer
{
2162 76a66253 j_mayer
    T0 = rotl32(T0, T2) & PARAM1;
2163 76a66253 j_mayer
    T0 |= T1 & PARAM2;
2164 76a66253 j_mayer
    RETURN();
2165 76a66253 j_mayer
}
2166 76a66253 j_mayer
2167 76a66253 j_mayer
void OPPROTO op_POWER_rrib (void)
2168 76a66253 j_mayer
{
2169 76a66253 j_mayer
    T2 &= 0x1FUL;
2170 76a66253 j_mayer
    T0 = rotl32(T0 & INT32_MIN, T2);
2171 76a66253 j_mayer
    T0 |= T1 & ~rotl32(INT32_MIN, T2);
2172 76a66253 j_mayer
    RETURN();
2173 76a66253 j_mayer
}
2174 76a66253 j_mayer
2175 76a66253 j_mayer
void OPPROTO op_POWER_sle (void)
2176 76a66253 j_mayer
{
2177 76a66253 j_mayer
    T1 &= 0x1FUL;
2178 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, T1);
2179 76a66253 j_mayer
    T0 = T0 << T1;
2180 76a66253 j_mayer
    RETURN();
2181 76a66253 j_mayer
}
2182 76a66253 j_mayer
2183 76a66253 j_mayer
void OPPROTO op_POWER_sleq (void)
2184 76a66253 j_mayer
{
2185 76a66253 j_mayer
    uint32_t tmp = env->spr[SPR_MQ];
2186 76a66253 j_mayer
2187 76a66253 j_mayer
    T1 &= 0x1FUL;
2188 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, T1);
2189 76a66253 j_mayer
    T0 = T0 << T1;
2190 76a66253 j_mayer
    T0 |= tmp >> (32 - T1);
2191 76a66253 j_mayer
    RETURN();
2192 76a66253 j_mayer
}
2193 76a66253 j_mayer
2194 76a66253 j_mayer
void OPPROTO op_POWER_sllq (void)
2195 76a66253 j_mayer
{
2196 76a66253 j_mayer
    uint32_t msk = -1;
2197 76a66253 j_mayer
2198 76a66253 j_mayer
    msk = msk << (T1 & 0x1FUL);
2199 76a66253 j_mayer
    if (T1 & 0x20UL)
2200 76a66253 j_mayer
        msk = ~msk;
2201 76a66253 j_mayer
    T1 &= 0x1FUL;
2202 76a66253 j_mayer
    T0 = (T0 << T1) & msk;
2203 76a66253 j_mayer
    T0 |= env->spr[SPR_MQ] & ~msk;
2204 76a66253 j_mayer
    RETURN();
2205 76a66253 j_mayer
}
2206 76a66253 j_mayer
2207 76a66253 j_mayer
void OPPROTO op_POWER_slq (void)
2208 76a66253 j_mayer
{
2209 76a66253 j_mayer
    uint32_t msk = -1, tmp;
2210 76a66253 j_mayer
2211 76a66253 j_mayer
    msk = msk << (T1 & 0x1FUL);
2212 76a66253 j_mayer
    if (T1 & 0x20UL)
2213 76a66253 j_mayer
        msk = ~msk;
2214 76a66253 j_mayer
    T1 &= 0x1FUL;
2215 76a66253 j_mayer
    tmp = rotl32(T0, T1);
2216 76a66253 j_mayer
    T0 = tmp & msk;
2217 76a66253 j_mayer
    env->spr[SPR_MQ] = tmp;
2218 76a66253 j_mayer
    RETURN();
2219 76a66253 j_mayer
}
2220 76a66253 j_mayer
2221 76a66253 j_mayer
void OPPROTO op_POWER_sraq (void)
2222 76a66253 j_mayer
{
2223 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, 32 - (T1 & 0x1FUL));
2224 76a66253 j_mayer
    if (T1 & 0x20UL)
2225 76a66253 j_mayer
        T0 = -1L;
2226 76a66253 j_mayer
    else
2227 d9bce9d9 j_mayer
        T0 = (int32_t)T0 >> T1;
2228 76a66253 j_mayer
    RETURN();
2229 76a66253 j_mayer
}
2230 76a66253 j_mayer
2231 76a66253 j_mayer
void OPPROTO op_POWER_sre (void)
2232 76a66253 j_mayer
{
2233 76a66253 j_mayer
    T1 &= 0x1FUL;
2234 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2235 d9bce9d9 j_mayer
    T0 = (int32_t)T0 >> T1;
2236 76a66253 j_mayer
    RETURN();
2237 76a66253 j_mayer
}
2238 76a66253 j_mayer
2239 76a66253 j_mayer
void OPPROTO op_POWER_srea (void)
2240 76a66253 j_mayer
{
2241 76a66253 j_mayer
    T1 &= 0x1FUL;
2242 76a66253 j_mayer
    env->spr[SPR_MQ] = T0 >> T1;
2243 d9bce9d9 j_mayer
    T0 = (int32_t)T0 >> T1;
2244 76a66253 j_mayer
    RETURN();
2245 76a66253 j_mayer
}
2246 76a66253 j_mayer
2247 76a66253 j_mayer
void OPPROTO op_POWER_sreq (void)
2248 76a66253 j_mayer
{
2249 76a66253 j_mayer
    uint32_t tmp;
2250 76a66253 j_mayer
    int32_t msk;
2251 76a66253 j_mayer
2252 76a66253 j_mayer
    T1 &= 0x1FUL;
2253 76a66253 j_mayer
    msk = INT32_MIN >> T1;
2254 76a66253 j_mayer
    tmp = env->spr[SPR_MQ];
2255 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2256 76a66253 j_mayer
    T0 = T0 >> T1;
2257 76a66253 j_mayer
    T0 |= tmp & msk;
2258 76a66253 j_mayer
    RETURN();
2259 76a66253 j_mayer
}
2260 76a66253 j_mayer
2261 76a66253 j_mayer
void OPPROTO op_POWER_srlq (void)
2262 76a66253 j_mayer
{
2263 76a66253 j_mayer
    uint32_t tmp;
2264 76a66253 j_mayer
    int32_t msk;
2265 76a66253 j_mayer
2266 76a66253 j_mayer
    msk = INT32_MIN >> (T1 & 0x1FUL);
2267 76a66253 j_mayer
    if (T1 & 0x20UL)
2268 76a66253 j_mayer
        msk = ~msk;
2269 76a66253 j_mayer
    T1 &= 0x1FUL;
2270 76a66253 j_mayer
    tmp = env->spr[SPR_MQ];
2271 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2272 76a66253 j_mayer
    T0 = T0 >> T1;
2273 76a66253 j_mayer
    T0 &= msk;
2274 76a66253 j_mayer
    T0 |= tmp & ~msk;
2275 76a66253 j_mayer
    RETURN();
2276 76a66253 j_mayer
}
2277 76a66253 j_mayer
2278 76a66253 j_mayer
void OPPROTO op_POWER_srq (void)
2279 76a66253 j_mayer
{
2280 76a66253 j_mayer
    T1 &= 0x1FUL;
2281 76a66253 j_mayer
    env->spr[SPR_MQ] = rotl32(T0, 32 - T1);
2282 76a66253 j_mayer
    T0 = T0 >> T1;
2283 76a66253 j_mayer
    RETURN();
2284 76a66253 j_mayer
}
2285 76a66253 j_mayer
2286 76a66253 j_mayer
/* POWER instructions not implemented in PowerPC 601 */
2287 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
2288 76a66253 j_mayer
void OPPROTO op_POWER_mfsri (void)
2289 76a66253 j_mayer
{
2290 76a66253 j_mayer
    T1 = T0 >> 28;
2291 76a66253 j_mayer
    T0 = env->sr[T1];
2292 76a66253 j_mayer
    RETURN();
2293 76a66253 j_mayer
}
2294 76a66253 j_mayer
2295 76a66253 j_mayer
void OPPROTO op_POWER_rac (void)
2296 76a66253 j_mayer
{
2297 76a66253 j_mayer
    do_POWER_rac();
2298 76a66253 j_mayer
    RETURN();
2299 76a66253 j_mayer
}
2300 76a66253 j_mayer
2301 76a66253 j_mayer
void OPPROTO op_POWER_rfsvc (void)
2302 76a66253 j_mayer
{
2303 76a66253 j_mayer
    do_POWER_rfsvc();
2304 76a66253 j_mayer
    RETURN();
2305 76a66253 j_mayer
}
2306 76a66253 j_mayer
#endif
2307 76a66253 j_mayer
2308 76a66253 j_mayer
/* PowerPC 602 specific instruction */
2309 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
2310 76a66253 j_mayer
void OPPROTO op_602_mfrom (void)
2311 76a66253 j_mayer
{
2312 76a66253 j_mayer
    do_op_602_mfrom();
2313 76a66253 j_mayer
    RETURN();
2314 76a66253 j_mayer
}
2315 76a66253 j_mayer
#endif
2316 76a66253 j_mayer
2317 76a66253 j_mayer
/* PowerPC 4xx specific micro-ops */
2318 76a66253 j_mayer
void OPPROTO op_405_add_T0_T2 (void)
2319 76a66253 j_mayer
{
2320 76a66253 j_mayer
    T0 = (int32_t)T0 + (int32_t)T2;
2321 76a66253 j_mayer
    RETURN();
2322 76a66253 j_mayer
}
2323 76a66253 j_mayer
2324 76a66253 j_mayer
void OPPROTO op_405_mulchw (void)
2325 76a66253 j_mayer
{
2326 76a66253 j_mayer
    T0 = ((int16_t)T0) * ((int16_t)(T1 >> 16));
2327 76a66253 j_mayer
    RETURN();
2328 76a66253 j_mayer
}
2329 76a66253 j_mayer
2330 76a66253 j_mayer
void OPPROTO op_405_mulchwu (void)
2331 76a66253 j_mayer
{
2332 76a66253 j_mayer
    T0 = ((uint16_t)T0) * ((uint16_t)(T1 >> 16));
2333 76a66253 j_mayer
    RETURN();
2334 76a66253 j_mayer
}
2335 76a66253 j_mayer
2336 76a66253 j_mayer
void OPPROTO op_405_mulhhw (void)
2337 76a66253 j_mayer
{
2338 76a66253 j_mayer
    T0 = ((int16_t)(T0 >> 16)) * ((int16_t)(T1 >> 16));
2339 76a66253 j_mayer
    RETURN();
2340 76a66253 j_mayer
}
2341 76a66253 j_mayer
2342 76a66253 j_mayer
void OPPROTO op_405_mulhhwu (void)
2343 76a66253 j_mayer
{
2344 76a66253 j_mayer
    T0 = ((uint16_t)(T0 >> 16)) * ((uint16_t)(T1 >> 16));
2345 76a66253 j_mayer
    RETURN();
2346 76a66253 j_mayer
}
2347 76a66253 j_mayer
2348 76a66253 j_mayer
void OPPROTO op_405_mullhw (void)
2349 76a66253 j_mayer
{
2350 76a66253 j_mayer
    T0 = ((int16_t)T0) * ((int16_t)T1);
2351 76a66253 j_mayer
    RETURN();
2352 76a66253 j_mayer
}
2353 76a66253 j_mayer
2354 76a66253 j_mayer
void OPPROTO op_405_mullhwu (void)
2355 76a66253 j_mayer
{
2356 76a66253 j_mayer
    T0 = ((uint16_t)T0) * ((uint16_t)T1);
2357 76a66253 j_mayer
    RETURN();
2358 76a66253 j_mayer
}
2359 76a66253 j_mayer
2360 76a66253 j_mayer
void OPPROTO op_405_check_ov (void)
2361 76a66253 j_mayer
{
2362 76a66253 j_mayer
    do_405_check_ov();
2363 76a66253 j_mayer
    RETURN();
2364 76a66253 j_mayer
}
2365 76a66253 j_mayer
2366 76a66253 j_mayer
void OPPROTO op_405_check_sat (void)
2367 76a66253 j_mayer
{
2368 76a66253 j_mayer
    do_405_check_sat();
2369 76a66253 j_mayer
    RETURN();
2370 76a66253 j_mayer
}
2371 76a66253 j_mayer
2372 76a66253 j_mayer
void OPPROTO op_405_check_ovu (void)
2373 76a66253 j_mayer
{
2374 76a66253 j_mayer
    if (likely(T0 >= T2)) {
2375 76a66253 j_mayer
        xer_ov = 0;
2376 76a66253 j_mayer
    } else {
2377 76a66253 j_mayer
        xer_ov = 1;
2378 76a66253 j_mayer
        xer_so = 1;
2379 76a66253 j_mayer
    }
2380 76a66253 j_mayer
    RETURN();
2381 76a66253 j_mayer
}
2382 76a66253 j_mayer
2383 76a66253 j_mayer
void OPPROTO op_405_check_satu (void)
2384 76a66253 j_mayer
{
2385 76a66253 j_mayer
    if (unlikely(T0 < T2)) {
2386 76a66253 j_mayer
        /* Saturate result */
2387 76a66253 j_mayer
        T0 = -1;
2388 76a66253 j_mayer
    }
2389 76a66253 j_mayer
    RETURN();
2390 76a66253 j_mayer
}
2391 76a66253 j_mayer
2392 a42bd6cc j_mayer
void OPPROTO op_load_dcr (void)
2393 76a66253 j_mayer
{
2394 a42bd6cc j_mayer
    do_load_dcr();
2395 76a66253 j_mayer
    RETURN();
2396 76a66253 j_mayer
}
2397 76a66253 j_mayer
2398 a42bd6cc j_mayer
void OPPROTO op_store_dcr (void)
2399 76a66253 j_mayer
{
2400 a42bd6cc j_mayer
    do_store_dcr();
2401 76a66253 j_mayer
    RETURN();
2402 76a66253 j_mayer
}
2403 76a66253 j_mayer
2404 a750fc0b j_mayer
#if !defined(CONFIG_USER_ONLY)
2405 76a66253 j_mayer
/* Return from critical interrupt :
2406 76a66253 j_mayer
 * same as rfi, except nip & MSR are loaded from SRR2/3 instead of SRR0/1
2407 76a66253 j_mayer
 */
2408 a42bd6cc j_mayer
void OPPROTO op_40x_rfci (void)
2409 a42bd6cc j_mayer
{
2410 a42bd6cc j_mayer
    do_40x_rfci();
2411 a42bd6cc j_mayer
    RETURN();
2412 a42bd6cc j_mayer
}
2413 a42bd6cc j_mayer
2414 a42bd6cc j_mayer
void OPPROTO op_rfci (void)
2415 a42bd6cc j_mayer
{
2416 a42bd6cc j_mayer
    do_rfci();
2417 a42bd6cc j_mayer
    RETURN();
2418 a42bd6cc j_mayer
}
2419 a42bd6cc j_mayer
2420 a42bd6cc j_mayer
void OPPROTO op_rfdi (void)
2421 a42bd6cc j_mayer
{
2422 a42bd6cc j_mayer
    do_rfdi();
2423 a42bd6cc j_mayer
    RETURN();
2424 a42bd6cc j_mayer
}
2425 a42bd6cc j_mayer
2426 a42bd6cc j_mayer
void OPPROTO op_rfmci (void)
2427 76a66253 j_mayer
{
2428 a42bd6cc j_mayer
    do_rfmci();
2429 76a66253 j_mayer
    RETURN();
2430 76a66253 j_mayer
}
2431 76a66253 j_mayer
2432 a42bd6cc j_mayer
void OPPROTO op_wrte (void)
2433 76a66253 j_mayer
{
2434 76a66253 j_mayer
    msr_ee = T0 >> 16;
2435 76a66253 j_mayer
    RETURN();
2436 76a66253 j_mayer
}
2437 76a66253 j_mayer
2438 a4bb6c3e j_mayer
void OPPROTO op_440_tlbre (void)
2439 5eb7995e j_mayer
{
2440 a4bb6c3e j_mayer
    do_440_tlbre(PARAM1);
2441 5eb7995e j_mayer
    RETURN();
2442 5eb7995e j_mayer
}
2443 5eb7995e j_mayer
2444 a4bb6c3e j_mayer
void OPPROTO op_440_tlbsx (void)
2445 5eb7995e j_mayer
{
2446 a4bb6c3e j_mayer
    do_440_tlbsx();
2447 5eb7995e j_mayer
    RETURN();
2448 5eb7995e j_mayer
}
2449 5eb7995e j_mayer
2450 a4bb6c3e j_mayer
void OPPROTO op_440_tlbsx_ (void)
2451 5eb7995e j_mayer
{
2452 a4bb6c3e j_mayer
    do_440_tlbsx_();
2453 5eb7995e j_mayer
    RETURN();
2454 5eb7995e j_mayer
}
2455 5eb7995e j_mayer
2456 a4bb6c3e j_mayer
void OPPROTO op_440_tlbwe (void)
2457 5eb7995e j_mayer
{
2458 a4bb6c3e j_mayer
    do_440_tlbwe(PARAM1);
2459 5eb7995e j_mayer
    RETURN();
2460 5eb7995e j_mayer
}
2461 5eb7995e j_mayer
2462 76a66253 j_mayer
void OPPROTO op_4xx_tlbre_lo (void)
2463 76a66253 j_mayer
{
2464 76a66253 j_mayer
    do_4xx_tlbre_lo();
2465 76a66253 j_mayer
    RETURN();
2466 76a66253 j_mayer
}
2467 76a66253 j_mayer
2468 76a66253 j_mayer
void OPPROTO op_4xx_tlbre_hi (void)
2469 76a66253 j_mayer
{
2470 76a66253 j_mayer
    do_4xx_tlbre_hi();
2471 76a66253 j_mayer
    RETURN();
2472 76a66253 j_mayer
}
2473 76a66253 j_mayer
2474 76a66253 j_mayer
void OPPROTO op_4xx_tlbsx (void)
2475 76a66253 j_mayer
{
2476 76a66253 j_mayer
    do_4xx_tlbsx();
2477 76a66253 j_mayer
    RETURN();
2478 76a66253 j_mayer
}
2479 76a66253 j_mayer
2480 76a66253 j_mayer
void OPPROTO op_4xx_tlbsx_ (void)
2481 76a66253 j_mayer
{
2482 76a66253 j_mayer
    do_4xx_tlbsx_();
2483 76a66253 j_mayer
    RETURN();
2484 76a66253 j_mayer
}
2485 76a66253 j_mayer
2486 76a66253 j_mayer
void OPPROTO op_4xx_tlbwe_lo (void)
2487 76a66253 j_mayer
{
2488 76a66253 j_mayer
    do_4xx_tlbwe_lo();
2489 76a66253 j_mayer
    RETURN();
2490 76a66253 j_mayer
}
2491 76a66253 j_mayer
2492 76a66253 j_mayer
void OPPROTO op_4xx_tlbwe_hi (void)
2493 76a66253 j_mayer
{
2494 76a66253 j_mayer
    do_4xx_tlbwe_hi();
2495 76a66253 j_mayer
    RETURN();
2496 76a66253 j_mayer
}
2497 76a66253 j_mayer
#endif
2498 76a66253 j_mayer
2499 76a66253 j_mayer
/* SPR micro-ops */
2500 76a66253 j_mayer
/* 440 specific */
2501 76a66253 j_mayer
void OPPROTO op_440_dlmzb (void)
2502 76a66253 j_mayer
{
2503 76a66253 j_mayer
    do_440_dlmzb();
2504 76a66253 j_mayer
    RETURN();
2505 76a66253 j_mayer
}
2506 76a66253 j_mayer
2507 76a66253 j_mayer
void OPPROTO op_440_dlmzb_update_Rc (void)
2508 76a66253 j_mayer
{
2509 76a66253 j_mayer
    if (T0 == 8)
2510 76a66253 j_mayer
        T0 = 0x2;
2511 76a66253 j_mayer
    else if (T0 < 4)
2512 76a66253 j_mayer
        T0 = 0x4;
2513 76a66253 j_mayer
    else
2514 76a66253 j_mayer
        T0 = 0x8;
2515 76a66253 j_mayer
    RETURN();
2516 76a66253 j_mayer
}
2517 76a66253 j_mayer
2518 76a66253 j_mayer
#if !defined(CONFIG_USER_ONLY)
2519 76a66253 j_mayer
void OPPROTO op_store_pir (void)
2520 3fc6c082 bellard
{
2521 3fc6c082 bellard
    env->spr[SPR_PIR] = T0 & 0x0000000FUL;
2522 3fc6c082 bellard
    RETURN();
2523 3fc6c082 bellard
}
2524 76a66253 j_mayer
2525 76a66253 j_mayer
void OPPROTO op_load_403_pb (void)
2526 76a66253 j_mayer
{
2527 76a66253 j_mayer
    do_load_403_pb(PARAM1);
2528 76a66253 j_mayer
    RETURN();
2529 76a66253 j_mayer
}
2530 76a66253 j_mayer
2531 76a66253 j_mayer
void OPPROTO op_store_403_pb (void)
2532 76a66253 j_mayer
{
2533 76a66253 j_mayer
    do_store_403_pb(PARAM1);
2534 76a66253 j_mayer
    RETURN();
2535 76a66253 j_mayer
}
2536 76a66253 j_mayer
2537 76a66253 j_mayer
void OPPROTO op_load_40x_pit (void)
2538 76a66253 j_mayer
{
2539 76a66253 j_mayer
    T0 = load_40x_pit(env);
2540 76a66253 j_mayer
    RETURN();
2541 76a66253 j_mayer
}
2542 76a66253 j_mayer
2543 76a66253 j_mayer
void OPPROTO op_store_40x_pit (void)
2544 76a66253 j_mayer
{
2545 76a66253 j_mayer
    store_40x_pit(env, T0);
2546 76a66253 j_mayer
    RETURN();
2547 76a66253 j_mayer
}
2548 76a66253 j_mayer
2549 8ecc7913 j_mayer
void OPPROTO op_store_40x_dbcr0 (void)
2550 8ecc7913 j_mayer
{
2551 8ecc7913 j_mayer
    store_40x_dbcr0(env, T0);
2552 8ecc7913 j_mayer
}
2553 8ecc7913 j_mayer
2554 c294fc58 j_mayer
void OPPROTO op_store_40x_sler (void)
2555 c294fc58 j_mayer
{
2556 c294fc58 j_mayer
    store_40x_sler(env, T0);
2557 c294fc58 j_mayer
    RETURN();
2558 c294fc58 j_mayer
}
2559 c294fc58 j_mayer
2560 76a66253 j_mayer
void OPPROTO op_store_booke_tcr (void)
2561 76a66253 j_mayer
{
2562 76a66253 j_mayer
    store_booke_tcr(env, T0);
2563 76a66253 j_mayer
    RETURN();
2564 76a66253 j_mayer
}
2565 76a66253 j_mayer
2566 76a66253 j_mayer
void OPPROTO op_store_booke_tsr (void)
2567 76a66253 j_mayer
{
2568 76a66253 j_mayer
    store_booke_tsr(env, T0);
2569 76a66253 j_mayer
    RETURN();
2570 76a66253 j_mayer
}
2571 0487d6a8 j_mayer
2572 76a66253 j_mayer
#endif /* !defined(CONFIG_USER_ONLY) */
2573 0487d6a8 j_mayer
2574 35cdaad6 j_mayer
#if defined(TARGET_PPCEMB)
2575 0487d6a8 j_mayer
/* SPE extension */
2576 0487d6a8 j_mayer
void OPPROTO op_splatw_T1_64 (void)
2577 0487d6a8 j_mayer
{
2578 0487d6a8 j_mayer
    T1_64 = (T1_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2579 e864cabd j_mayer
    RETURN();
2580 0487d6a8 j_mayer
}
2581 0487d6a8 j_mayer
2582 0487d6a8 j_mayer
void OPPROTO op_splatwi_T0_64 (void)
2583 0487d6a8 j_mayer
{
2584 0487d6a8 j_mayer
    uint64_t tmp = PARAM1;
2585 0487d6a8 j_mayer
2586 0487d6a8 j_mayer
    T0_64 = (tmp << 32) | tmp;
2587 e864cabd j_mayer
    RETURN();
2588 0487d6a8 j_mayer
}
2589 0487d6a8 j_mayer
2590 0487d6a8 j_mayer
void OPPROTO op_splatwi_T1_64 (void)
2591 0487d6a8 j_mayer
{
2592 0487d6a8 j_mayer
    uint64_t tmp = PARAM1;
2593 0487d6a8 j_mayer
2594 0487d6a8 j_mayer
    T1_64 = (tmp << 32) | tmp;
2595 e864cabd j_mayer
    RETURN();
2596 0487d6a8 j_mayer
}
2597 0487d6a8 j_mayer
2598 0487d6a8 j_mayer
void OPPROTO op_extsh_T1_64 (void)
2599 0487d6a8 j_mayer
{
2600 0487d6a8 j_mayer
    T1_64 = (int32_t)((int16_t)T1_64);
2601 0487d6a8 j_mayer
    RETURN();
2602 0487d6a8 j_mayer
}
2603 0487d6a8 j_mayer
2604 0487d6a8 j_mayer
void OPPROTO op_sli16_T1_64 (void)
2605 0487d6a8 j_mayer
{
2606 0487d6a8 j_mayer
    T1_64 = T1_64 << 16;
2607 0487d6a8 j_mayer
    RETURN();
2608 0487d6a8 j_mayer
}
2609 0487d6a8 j_mayer
2610 0487d6a8 j_mayer
void OPPROTO op_sli32_T1_64 (void)
2611 0487d6a8 j_mayer
{
2612 0487d6a8 j_mayer
    T1_64 = T1_64 << 32;
2613 0487d6a8 j_mayer
    RETURN();
2614 0487d6a8 j_mayer
}
2615 0487d6a8 j_mayer
2616 0487d6a8 j_mayer
void OPPROTO op_srli32_T1_64 (void)
2617 0487d6a8 j_mayer
{
2618 0487d6a8 j_mayer
    T1_64 = T1_64 >> 32;
2619 0487d6a8 j_mayer
    RETURN();
2620 0487d6a8 j_mayer
}
2621 0487d6a8 j_mayer
2622 0487d6a8 j_mayer
void OPPROTO op_evsel (void)
2623 0487d6a8 j_mayer
{
2624 0487d6a8 j_mayer
    do_evsel();
2625 0487d6a8 j_mayer
    RETURN();
2626 0487d6a8 j_mayer
}
2627 0487d6a8 j_mayer
2628 0487d6a8 j_mayer
void OPPROTO op_evaddw (void)
2629 0487d6a8 j_mayer
{
2630 0487d6a8 j_mayer
    do_evaddw();
2631 0487d6a8 j_mayer
    RETURN();
2632 0487d6a8 j_mayer
}
2633 0487d6a8 j_mayer
2634 0487d6a8 j_mayer
void OPPROTO op_evsubfw (void)
2635 0487d6a8 j_mayer
{
2636 0487d6a8 j_mayer
    do_evsubfw();
2637 0487d6a8 j_mayer
    RETURN();
2638 0487d6a8 j_mayer
}
2639 0487d6a8 j_mayer
2640 0487d6a8 j_mayer
void OPPROTO op_evneg (void)
2641 0487d6a8 j_mayer
{
2642 0487d6a8 j_mayer
    do_evneg();
2643 0487d6a8 j_mayer
    RETURN();
2644 0487d6a8 j_mayer
}
2645 0487d6a8 j_mayer
2646 0487d6a8 j_mayer
void OPPROTO op_evabs (void)
2647 0487d6a8 j_mayer
{
2648 0487d6a8 j_mayer
    do_evabs();
2649 0487d6a8 j_mayer
    RETURN();
2650 0487d6a8 j_mayer
}
2651 0487d6a8 j_mayer
2652 0487d6a8 j_mayer
void OPPROTO op_evextsh (void)
2653 0487d6a8 j_mayer
{
2654 0487d6a8 j_mayer
    T0_64 = ((uint64_t)((int32_t)(int16_t)(T0_64 >> 32)) << 32) |
2655 0487d6a8 j_mayer
        (uint64_t)((int32_t)(int16_t)T0_64);
2656 0487d6a8 j_mayer
    RETURN();
2657 0487d6a8 j_mayer
}
2658 0487d6a8 j_mayer
2659 0487d6a8 j_mayer
void OPPROTO op_evextsb (void)
2660 0487d6a8 j_mayer
{
2661 0487d6a8 j_mayer
    T0_64 = ((uint64_t)((int32_t)(int8_t)(T0_64 >> 32)) << 32) |
2662 0487d6a8 j_mayer
        (uint64_t)((int32_t)(int8_t)T0_64);
2663 0487d6a8 j_mayer
    RETURN();
2664 0487d6a8 j_mayer
}
2665 0487d6a8 j_mayer
2666 0487d6a8 j_mayer
void OPPROTO op_evcntlzw (void)
2667 0487d6a8 j_mayer
{
2668 0487d6a8 j_mayer
    do_evcntlzw();
2669 0487d6a8 j_mayer
    RETURN();
2670 0487d6a8 j_mayer
}
2671 0487d6a8 j_mayer
2672 0487d6a8 j_mayer
void OPPROTO op_evrndw (void)
2673 0487d6a8 j_mayer
{
2674 0487d6a8 j_mayer
    do_evrndw();
2675 0487d6a8 j_mayer
    RETURN();
2676 0487d6a8 j_mayer
}
2677 0487d6a8 j_mayer
2678 0487d6a8 j_mayer
void OPPROTO op_brinc (void)
2679 0487d6a8 j_mayer
{
2680 0487d6a8 j_mayer
    do_brinc();
2681 0487d6a8 j_mayer
    RETURN();
2682 0487d6a8 j_mayer
}
2683 0487d6a8 j_mayer
2684 0487d6a8 j_mayer
void OPPROTO op_evcntlsw (void)
2685 0487d6a8 j_mayer
{
2686 0487d6a8 j_mayer
    do_evcntlsw();
2687 0487d6a8 j_mayer
    RETURN();
2688 0487d6a8 j_mayer
}
2689 0487d6a8 j_mayer
2690 0487d6a8 j_mayer
void OPPROTO op_evand (void)
2691 0487d6a8 j_mayer
{
2692 0487d6a8 j_mayer
    T0_64 &= T1_64;
2693 0487d6a8 j_mayer
    RETURN();
2694 0487d6a8 j_mayer
}
2695 0487d6a8 j_mayer
2696 0487d6a8 j_mayer
void OPPROTO op_evandc (void)
2697 0487d6a8 j_mayer
{
2698 0487d6a8 j_mayer
    T0_64 &= ~T1_64;
2699 0487d6a8 j_mayer
    RETURN();
2700 0487d6a8 j_mayer
}
2701 0487d6a8 j_mayer
2702 0487d6a8 j_mayer
void OPPROTO op_evor (void)
2703 0487d6a8 j_mayer
{
2704 0487d6a8 j_mayer
    T0_64 |= T1_64;
2705 0487d6a8 j_mayer
    RETURN();
2706 0487d6a8 j_mayer
}
2707 0487d6a8 j_mayer
2708 0487d6a8 j_mayer
void OPPROTO op_evxor (void)
2709 0487d6a8 j_mayer
{
2710 0487d6a8 j_mayer
    T0_64 ^= T1_64;
2711 0487d6a8 j_mayer
    RETURN();
2712 0487d6a8 j_mayer
}
2713 0487d6a8 j_mayer
2714 0487d6a8 j_mayer
void OPPROTO op_eveqv (void)
2715 0487d6a8 j_mayer
{
2716 0487d6a8 j_mayer
    T0_64 = ~(T0_64 ^ T1_64);
2717 0487d6a8 j_mayer
    RETURN();
2718 0487d6a8 j_mayer
}
2719 0487d6a8 j_mayer
2720 0487d6a8 j_mayer
void OPPROTO op_evnor (void)
2721 0487d6a8 j_mayer
{
2722 0487d6a8 j_mayer
    T0_64 = ~(T0_64 | T1_64);
2723 0487d6a8 j_mayer
    RETURN();
2724 0487d6a8 j_mayer
}
2725 0487d6a8 j_mayer
2726 0487d6a8 j_mayer
void OPPROTO op_evorc (void)
2727 0487d6a8 j_mayer
{
2728 0487d6a8 j_mayer
    T0_64 |= ~T1_64;
2729 0487d6a8 j_mayer
    RETURN();
2730 0487d6a8 j_mayer
}
2731 0487d6a8 j_mayer
2732 0487d6a8 j_mayer
void OPPROTO op_evnand (void)
2733 0487d6a8 j_mayer
{
2734 0487d6a8 j_mayer
    T0_64 = ~(T0_64 & T1_64);
2735 0487d6a8 j_mayer
    RETURN();
2736 0487d6a8 j_mayer
}
2737 0487d6a8 j_mayer
2738 0487d6a8 j_mayer
void OPPROTO op_evsrws (void)
2739 0487d6a8 j_mayer
{
2740 0487d6a8 j_mayer
    do_evsrws();
2741 0487d6a8 j_mayer
    RETURN();
2742 0487d6a8 j_mayer
}
2743 0487d6a8 j_mayer
2744 0487d6a8 j_mayer
void OPPROTO op_evsrwu (void)
2745 0487d6a8 j_mayer
{
2746 0487d6a8 j_mayer
    do_evsrwu();
2747 0487d6a8 j_mayer
    RETURN();
2748 0487d6a8 j_mayer
}
2749 0487d6a8 j_mayer
2750 0487d6a8 j_mayer
void OPPROTO op_evslw (void)
2751 0487d6a8 j_mayer
{
2752 0487d6a8 j_mayer
    do_evslw();
2753 0487d6a8 j_mayer
    RETURN();
2754 0487d6a8 j_mayer
}
2755 0487d6a8 j_mayer
2756 0487d6a8 j_mayer
void OPPROTO op_evrlw (void)
2757 0487d6a8 j_mayer
{
2758 0487d6a8 j_mayer
    do_evrlw();
2759 0487d6a8 j_mayer
    RETURN();
2760 0487d6a8 j_mayer
}
2761 0487d6a8 j_mayer
2762 0487d6a8 j_mayer
void OPPROTO op_evmergelo (void)
2763 0487d6a8 j_mayer
{
2764 0487d6a8 j_mayer
    T0_64 = (T0_64 << 32) | (T1_64 & 0x00000000FFFFFFFFULL);
2765 0487d6a8 j_mayer
    RETURN();
2766 0487d6a8 j_mayer
}
2767 0487d6a8 j_mayer
2768 0487d6a8 j_mayer
void OPPROTO op_evmergehi (void)
2769 0487d6a8 j_mayer
{
2770 0487d6a8 j_mayer
    T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 >> 32);
2771 0487d6a8 j_mayer
    RETURN();
2772 0487d6a8 j_mayer
}
2773 0487d6a8 j_mayer
2774 0487d6a8 j_mayer
void OPPROTO op_evmergelohi (void)
2775 0487d6a8 j_mayer
{
2776 0487d6a8 j_mayer
    T0_64 = (T0_64 << 32) | (T1_64 >> 32);
2777 0487d6a8 j_mayer
    RETURN();
2778 0487d6a8 j_mayer
}
2779 0487d6a8 j_mayer
2780 0487d6a8 j_mayer
void OPPROTO op_evmergehilo (void)
2781 0487d6a8 j_mayer
{
2782 0487d6a8 j_mayer
    T0_64 = (T0_64 & 0xFFFFFFFF00000000ULL) | (T1_64 & 0x00000000FFFFFFFFULL);
2783 0487d6a8 j_mayer
    RETURN();
2784 0487d6a8 j_mayer
}
2785 0487d6a8 j_mayer
2786 0487d6a8 j_mayer
void OPPROTO op_evcmpgts (void)
2787 0487d6a8 j_mayer
{
2788 0487d6a8 j_mayer
    do_evcmpgts();
2789 0487d6a8 j_mayer
    RETURN();
2790 0487d6a8 j_mayer
}
2791 0487d6a8 j_mayer
2792 0487d6a8 j_mayer
void OPPROTO op_evcmpgtu (void)
2793 0487d6a8 j_mayer
{
2794 0487d6a8 j_mayer
    do_evcmpgtu();
2795 0487d6a8 j_mayer
    RETURN();
2796 0487d6a8 j_mayer
}
2797 0487d6a8 j_mayer
2798 0487d6a8 j_mayer
void OPPROTO op_evcmplts (void)
2799 0487d6a8 j_mayer
{
2800 0487d6a8 j_mayer
    do_evcmplts();
2801 0487d6a8 j_mayer
    RETURN();
2802 0487d6a8 j_mayer
}
2803 0487d6a8 j_mayer
2804 0487d6a8 j_mayer
void OPPROTO op_evcmpltu (void)
2805 0487d6a8 j_mayer
{
2806 0487d6a8 j_mayer
    do_evcmpltu();
2807 0487d6a8 j_mayer
    RETURN();
2808 0487d6a8 j_mayer
}
2809 0487d6a8 j_mayer
2810 0487d6a8 j_mayer
void OPPROTO op_evcmpeq (void)
2811 0487d6a8 j_mayer
{
2812 0487d6a8 j_mayer
    do_evcmpeq();
2813 0487d6a8 j_mayer
    RETURN();
2814 0487d6a8 j_mayer
}
2815 0487d6a8 j_mayer
2816 0487d6a8 j_mayer
void OPPROTO op_evfssub (void)
2817 0487d6a8 j_mayer
{
2818 0487d6a8 j_mayer
    do_evfssub();
2819 0487d6a8 j_mayer
    RETURN();
2820 0487d6a8 j_mayer
}
2821 0487d6a8 j_mayer
2822 0487d6a8 j_mayer
void OPPROTO op_evfsadd (void)
2823 0487d6a8 j_mayer
{
2824 0487d6a8 j_mayer
    do_evfsadd();
2825 0487d6a8 j_mayer
    RETURN();
2826 0487d6a8 j_mayer
}
2827 0487d6a8 j_mayer
2828 0487d6a8 j_mayer
void OPPROTO op_evfsnabs (void)
2829 0487d6a8 j_mayer
{
2830 0487d6a8 j_mayer
    do_evfsnabs();
2831 0487d6a8 j_mayer
    RETURN();
2832 0487d6a8 j_mayer
}
2833 0487d6a8 j_mayer
2834 0487d6a8 j_mayer
void OPPROTO op_evfsabs (void)
2835 0487d6a8 j_mayer
{
2836 0487d6a8 j_mayer
    do_evfsabs();
2837 0487d6a8 j_mayer
    RETURN();
2838 0487d6a8 j_mayer
}
2839 0487d6a8 j_mayer
2840 0487d6a8 j_mayer
void OPPROTO op_evfsneg (void)
2841 0487d6a8 j_mayer
{
2842 0487d6a8 j_mayer
    do_evfsneg();
2843 0487d6a8 j_mayer
    RETURN();
2844 0487d6a8 j_mayer
}
2845 0487d6a8 j_mayer
2846 0487d6a8 j_mayer
void OPPROTO op_evfsdiv (void)
2847 0487d6a8 j_mayer
{
2848 0487d6a8 j_mayer
    do_evfsdiv();
2849 0487d6a8 j_mayer
    RETURN();
2850 0487d6a8 j_mayer
}
2851 0487d6a8 j_mayer
2852 0487d6a8 j_mayer
void OPPROTO op_evfsmul (void)
2853 0487d6a8 j_mayer
{
2854 0487d6a8 j_mayer
    do_evfsmul();
2855 0487d6a8 j_mayer
    RETURN();
2856 0487d6a8 j_mayer
}
2857 0487d6a8 j_mayer
2858 0487d6a8 j_mayer
void OPPROTO op_evfscmplt (void)
2859 0487d6a8 j_mayer
{
2860 0487d6a8 j_mayer
    do_evfscmplt();
2861 0487d6a8 j_mayer
    RETURN();
2862 0487d6a8 j_mayer
}
2863 0487d6a8 j_mayer
2864 0487d6a8 j_mayer
void OPPROTO op_evfscmpgt (void)
2865 0487d6a8 j_mayer
{
2866 0487d6a8 j_mayer
    do_evfscmpgt();
2867 0487d6a8 j_mayer
    RETURN();
2868 0487d6a8 j_mayer
}
2869 0487d6a8 j_mayer
2870 0487d6a8 j_mayer
void OPPROTO op_evfscmpeq (void)
2871 0487d6a8 j_mayer
{
2872 0487d6a8 j_mayer
    do_evfscmpeq();
2873 0487d6a8 j_mayer
    RETURN();
2874 0487d6a8 j_mayer
}
2875 0487d6a8 j_mayer
2876 0487d6a8 j_mayer
void OPPROTO op_evfscfsi (void)
2877 0487d6a8 j_mayer
{
2878 0487d6a8 j_mayer
    do_evfscfsi();
2879 0487d6a8 j_mayer
    RETURN();
2880 0487d6a8 j_mayer
}
2881 0487d6a8 j_mayer
2882 0487d6a8 j_mayer
void OPPROTO op_evfscfui (void)
2883 0487d6a8 j_mayer
{
2884 0487d6a8 j_mayer
    do_evfscfui();
2885 0487d6a8 j_mayer
    RETURN();
2886 0487d6a8 j_mayer
}
2887 0487d6a8 j_mayer
2888 0487d6a8 j_mayer
void OPPROTO op_evfscfsf (void)
2889 0487d6a8 j_mayer
{
2890 0487d6a8 j_mayer
    do_evfscfsf();
2891 0487d6a8 j_mayer
    RETURN();
2892 0487d6a8 j_mayer
}
2893 0487d6a8 j_mayer
2894 0487d6a8 j_mayer
void OPPROTO op_evfscfuf (void)
2895 0487d6a8 j_mayer
{
2896 0487d6a8 j_mayer
    do_evfscfuf();
2897 0487d6a8 j_mayer
    RETURN();
2898 0487d6a8 j_mayer
}
2899 0487d6a8 j_mayer
2900 0487d6a8 j_mayer
void OPPROTO op_evfsctsi (void)
2901 0487d6a8 j_mayer
{
2902 0487d6a8 j_mayer
    do_evfsctsi();
2903 0487d6a8 j_mayer
    RETURN();
2904 0487d6a8 j_mayer
}
2905 0487d6a8 j_mayer
2906 0487d6a8 j_mayer
void OPPROTO op_evfsctui (void)
2907 0487d6a8 j_mayer
{
2908 0487d6a8 j_mayer
    do_evfsctui();
2909 0487d6a8 j_mayer
    RETURN();
2910 0487d6a8 j_mayer
}
2911 0487d6a8 j_mayer
2912 0487d6a8 j_mayer
void OPPROTO op_evfsctsf (void)
2913 0487d6a8 j_mayer
{
2914 0487d6a8 j_mayer
    do_evfsctsf();
2915 0487d6a8 j_mayer
    RETURN();
2916 0487d6a8 j_mayer
}
2917 0487d6a8 j_mayer
2918 0487d6a8 j_mayer
void OPPROTO op_evfsctuf (void)
2919 0487d6a8 j_mayer
{
2920 0487d6a8 j_mayer
    do_evfsctuf();
2921 0487d6a8 j_mayer
    RETURN();
2922 0487d6a8 j_mayer
}
2923 0487d6a8 j_mayer
2924 0487d6a8 j_mayer
void OPPROTO op_evfsctuiz (void)
2925 0487d6a8 j_mayer
{
2926 0487d6a8 j_mayer
    do_evfsctuiz();
2927 0487d6a8 j_mayer
    RETURN();
2928 0487d6a8 j_mayer
}
2929 0487d6a8 j_mayer
2930 0487d6a8 j_mayer
void OPPROTO op_evfsctsiz (void)
2931 0487d6a8 j_mayer
{
2932 0487d6a8 j_mayer
    do_evfsctsiz();
2933 0487d6a8 j_mayer
    RETURN();
2934 0487d6a8 j_mayer
}
2935 0487d6a8 j_mayer
2936 0487d6a8 j_mayer
void OPPROTO op_evfststlt (void)
2937 0487d6a8 j_mayer
{
2938 0487d6a8 j_mayer
    do_evfststlt();
2939 0487d6a8 j_mayer
    RETURN();
2940 0487d6a8 j_mayer
}
2941 0487d6a8 j_mayer
2942 0487d6a8 j_mayer
void OPPROTO op_evfststgt (void)
2943 0487d6a8 j_mayer
{
2944 0487d6a8 j_mayer
    do_evfststgt();
2945 0487d6a8 j_mayer
    RETURN();
2946 0487d6a8 j_mayer
}
2947 0487d6a8 j_mayer
2948 0487d6a8 j_mayer
void OPPROTO op_evfststeq (void)
2949 0487d6a8 j_mayer
{
2950 0487d6a8 j_mayer
    do_evfststeq();
2951 0487d6a8 j_mayer
    RETURN();
2952 0487d6a8 j_mayer
}
2953 0487d6a8 j_mayer
2954 0487d6a8 j_mayer
void OPPROTO op_efssub (void)
2955 0487d6a8 j_mayer
{
2956 0487d6a8 j_mayer
    T0_64 = _do_efssub(T0_64, T1_64);
2957 0487d6a8 j_mayer
    RETURN();
2958 0487d6a8 j_mayer
}
2959 0487d6a8 j_mayer
2960 0487d6a8 j_mayer
void OPPROTO op_efsadd (void)
2961 0487d6a8 j_mayer
{
2962 0487d6a8 j_mayer
    T0_64 = _do_efsadd(T0_64, T1_64);
2963 0487d6a8 j_mayer
    RETURN();
2964 0487d6a8 j_mayer
}
2965 0487d6a8 j_mayer
2966 0487d6a8 j_mayer
void OPPROTO op_efsnabs (void)
2967 0487d6a8 j_mayer
{
2968 0487d6a8 j_mayer
    T0_64 = _do_efsnabs(T0_64);
2969 0487d6a8 j_mayer
    RETURN();
2970 0487d6a8 j_mayer
}
2971 0487d6a8 j_mayer
2972 0487d6a8 j_mayer
void OPPROTO op_efsabs (void)
2973 0487d6a8 j_mayer
{
2974 0487d6a8 j_mayer
    T0_64 = _do_efsabs(T0_64);
2975 0487d6a8 j_mayer
    RETURN();
2976 0487d6a8 j_mayer
}
2977 0487d6a8 j_mayer
2978 0487d6a8 j_mayer
void OPPROTO op_efsneg (void)
2979 0487d6a8 j_mayer
{
2980 0487d6a8 j_mayer
    T0_64 = _do_efsneg(T0_64);
2981 0487d6a8 j_mayer
    RETURN();
2982 0487d6a8 j_mayer
}
2983 0487d6a8 j_mayer
2984 0487d6a8 j_mayer
void OPPROTO op_efsdiv (void)
2985 0487d6a8 j_mayer
{
2986 0487d6a8 j_mayer
    T0_64 = _do_efsdiv(T0_64, T1_64);
2987 0487d6a8 j_mayer
    RETURN();
2988 0487d6a8 j_mayer
}
2989 0487d6a8 j_mayer
2990 0487d6a8 j_mayer
void OPPROTO op_efsmul (void)
2991 0487d6a8 j_mayer
{
2992 0487d6a8 j_mayer
    T0_64 = _do_efsmul(T0_64, T1_64);
2993 0487d6a8 j_mayer
    RETURN();
2994 0487d6a8 j_mayer
}
2995 0487d6a8 j_mayer
2996 0487d6a8 j_mayer
void OPPROTO op_efscmplt (void)
2997 0487d6a8 j_mayer
{
2998 0487d6a8 j_mayer
    do_efscmplt();
2999 0487d6a8 j_mayer
    RETURN();
3000 0487d6a8 j_mayer
}
3001 0487d6a8 j_mayer
3002 0487d6a8 j_mayer
void OPPROTO op_efscmpgt (void)
3003 0487d6a8 j_mayer
{
3004 0487d6a8 j_mayer
    do_efscmpgt();
3005 0487d6a8 j_mayer
    RETURN();
3006 0487d6a8 j_mayer
}
3007 0487d6a8 j_mayer
3008 0487d6a8 j_mayer
void OPPROTO op_efscfd (void)
3009 0487d6a8 j_mayer
{
3010 0487d6a8 j_mayer
    do_efscfd();
3011 0487d6a8 j_mayer
    RETURN();
3012 0487d6a8 j_mayer
}
3013 0487d6a8 j_mayer
3014 0487d6a8 j_mayer
void OPPROTO op_efscmpeq (void)
3015 0487d6a8 j_mayer
{
3016 0487d6a8 j_mayer
    do_efscmpeq();
3017 0487d6a8 j_mayer
    RETURN();
3018 0487d6a8 j_mayer
}
3019 0487d6a8 j_mayer
3020 0487d6a8 j_mayer
void OPPROTO op_efscfsi (void)
3021 0487d6a8 j_mayer
{
3022 0487d6a8 j_mayer
    do_efscfsi();
3023 0487d6a8 j_mayer
    RETURN();
3024 0487d6a8 j_mayer
}
3025 0487d6a8 j_mayer
3026 0487d6a8 j_mayer
void OPPROTO op_efscfui (void)
3027 0487d6a8 j_mayer
{
3028 0487d6a8 j_mayer
    do_efscfui();
3029 0487d6a8 j_mayer
    RETURN();
3030 0487d6a8 j_mayer
}
3031 0487d6a8 j_mayer
3032 0487d6a8 j_mayer
void OPPROTO op_efscfsf (void)
3033 0487d6a8 j_mayer
{
3034 0487d6a8 j_mayer
    do_efscfsf();
3035 0487d6a8 j_mayer
    RETURN();
3036 0487d6a8 j_mayer
}
3037 0487d6a8 j_mayer
3038 0487d6a8 j_mayer
void OPPROTO op_efscfuf (void)
3039 0487d6a8 j_mayer
{
3040 0487d6a8 j_mayer
    do_efscfuf();
3041 0487d6a8 j_mayer
    RETURN();
3042 0487d6a8 j_mayer
}
3043 0487d6a8 j_mayer
3044 0487d6a8 j_mayer
void OPPROTO op_efsctsi (void)
3045 0487d6a8 j_mayer
{
3046 0487d6a8 j_mayer
    do_efsctsi();
3047 0487d6a8 j_mayer
    RETURN();
3048 0487d6a8 j_mayer
}
3049 0487d6a8 j_mayer
3050 0487d6a8 j_mayer
void OPPROTO op_efsctui (void)
3051 0487d6a8 j_mayer
{
3052 0487d6a8 j_mayer
    do_efsctui();
3053 0487d6a8 j_mayer
    RETURN();
3054 0487d6a8 j_mayer
}
3055 0487d6a8 j_mayer
3056 0487d6a8 j_mayer
void OPPROTO op_efsctsf (void)
3057 0487d6a8 j_mayer
{
3058 0487d6a8 j_mayer
    do_efsctsf();
3059 0487d6a8 j_mayer
    RETURN();
3060 0487d6a8 j_mayer
}
3061 0487d6a8 j_mayer
3062 0487d6a8 j_mayer
void OPPROTO op_efsctuf (void)
3063 0487d6a8 j_mayer
{
3064 0487d6a8 j_mayer
    do_efsctuf();
3065 0487d6a8 j_mayer
    RETURN();
3066 0487d6a8 j_mayer
}
3067 0487d6a8 j_mayer
3068 0487d6a8 j_mayer
void OPPROTO op_efsctsiz (void)
3069 0487d6a8 j_mayer
{
3070 0487d6a8 j_mayer
    do_efsctsiz();
3071 0487d6a8 j_mayer
    RETURN();
3072 0487d6a8 j_mayer
}
3073 0487d6a8 j_mayer
3074 0487d6a8 j_mayer
void OPPROTO op_efsctuiz (void)
3075 0487d6a8 j_mayer
{
3076 0487d6a8 j_mayer
    do_efsctuiz();
3077 0487d6a8 j_mayer
    RETURN();
3078 0487d6a8 j_mayer
}
3079 0487d6a8 j_mayer
3080 0487d6a8 j_mayer
void OPPROTO op_efststlt (void)
3081 0487d6a8 j_mayer
{
3082 0487d6a8 j_mayer
    T0 = _do_efststlt(T0_64, T1_64);
3083 0487d6a8 j_mayer
    RETURN();
3084 0487d6a8 j_mayer
}
3085 0487d6a8 j_mayer
3086 0487d6a8 j_mayer
void OPPROTO op_efststgt (void)
3087 0487d6a8 j_mayer
{
3088 0487d6a8 j_mayer
    T0 = _do_efststgt(T0_64, T1_64);
3089 0487d6a8 j_mayer
    RETURN();
3090 0487d6a8 j_mayer
}
3091 0487d6a8 j_mayer
3092 0487d6a8 j_mayer
void OPPROTO op_efststeq (void)
3093 0487d6a8 j_mayer
{
3094 0487d6a8 j_mayer
    T0 = _do_efststeq(T0_64, T1_64);
3095 0487d6a8 j_mayer
    RETURN();
3096 0487d6a8 j_mayer
}
3097 0487d6a8 j_mayer
3098 0487d6a8 j_mayer
void OPPROTO op_efdsub (void)
3099 0487d6a8 j_mayer
{
3100 0487d6a8 j_mayer
    union {
3101 0487d6a8 j_mayer
        uint64_t u;
3102 0487d6a8 j_mayer
        float64 f;
3103 0487d6a8 j_mayer
    } u1, u2;
3104 0487d6a8 j_mayer
    u1.u = T0_64;
3105 0487d6a8 j_mayer
    u2.u = T1_64;
3106 0487d6a8 j_mayer
    u1.f = float64_sub(u1.f, u2.f, &env->spe_status);
3107 0487d6a8 j_mayer
    T0_64 = u1.u;
3108 0487d6a8 j_mayer
    RETURN();
3109 0487d6a8 j_mayer
}
3110 0487d6a8 j_mayer
3111 0487d6a8 j_mayer
void OPPROTO op_efdadd (void)
3112 0487d6a8 j_mayer
{
3113 0487d6a8 j_mayer
    union {
3114 0487d6a8 j_mayer
        uint64_t u;
3115 0487d6a8 j_mayer
        float64 f;
3116 0487d6a8 j_mayer
    } u1, u2;
3117 0487d6a8 j_mayer
    u1.u = T0_64;
3118 0487d6a8 j_mayer
    u2.u = T1_64;
3119 0487d6a8 j_mayer
    u1.f = float64_add(u1.f, u2.f, &env->spe_status);
3120 0487d6a8 j_mayer
    T0_64 = u1.u;
3121 0487d6a8 j_mayer
    RETURN();
3122 0487d6a8 j_mayer
}
3123 0487d6a8 j_mayer
3124 0487d6a8 j_mayer
void OPPROTO op_efdcfsid (void)
3125 0487d6a8 j_mayer
{
3126 0487d6a8 j_mayer
    do_efdcfsi();
3127 0487d6a8 j_mayer
    RETURN();
3128 0487d6a8 j_mayer
}
3129 0487d6a8 j_mayer
3130 0487d6a8 j_mayer
void OPPROTO op_efdcfuid (void)
3131 0487d6a8 j_mayer
{
3132 0487d6a8 j_mayer
    do_efdcfui();
3133 0487d6a8 j_mayer
    RETURN();
3134 0487d6a8 j_mayer
}
3135 0487d6a8 j_mayer
3136 0487d6a8 j_mayer
void OPPROTO op_efdnabs (void)
3137 0487d6a8 j_mayer
{
3138 0487d6a8 j_mayer
    T0_64 |= 0x8000000000000000ULL;
3139 0487d6a8 j_mayer
    RETURN();
3140 0487d6a8 j_mayer
}
3141 0487d6a8 j_mayer
3142 0487d6a8 j_mayer
void OPPROTO op_efdabs (void)
3143 0487d6a8 j_mayer
{
3144 0487d6a8 j_mayer
    T0_64 &= ~0x8000000000000000ULL;
3145 0487d6a8 j_mayer
    RETURN();
3146 0487d6a8 j_mayer
}
3147 0487d6a8 j_mayer
3148 0487d6a8 j_mayer
void OPPROTO op_efdneg (void)
3149 0487d6a8 j_mayer
{
3150 0487d6a8 j_mayer
    T0_64 ^= 0x8000000000000000ULL;
3151 0487d6a8 j_mayer
    RETURN();
3152 0487d6a8 j_mayer
}
3153 0487d6a8 j_mayer
3154 0487d6a8 j_mayer
void OPPROTO op_efddiv (void)
3155 0487d6a8 j_mayer
{
3156 0487d6a8 j_mayer
    union {
3157 0487d6a8 j_mayer
        uint64_t u;
3158 0487d6a8 j_mayer
        float64 f;
3159 0487d6a8 j_mayer
    } u1, u2;
3160 0487d6a8 j_mayer
    u1.u = T0_64;
3161 0487d6a8 j_mayer
    u2.u = T1_64;
3162 0487d6a8 j_mayer
    u1.f = float64_div(u1.f, u2.f, &env->spe_status);
3163 0487d6a8 j_mayer
    T0_64 = u1.u;
3164 0487d6a8 j_mayer
    RETURN();
3165 0487d6a8 j_mayer
}
3166 0487d6a8 j_mayer
3167 0487d6a8 j_mayer
void OPPROTO op_efdmul (void)
3168 0487d6a8 j_mayer
{
3169 0487d6a8 j_mayer
    union {
3170 0487d6a8 j_mayer
        uint64_t u;
3171 0487d6a8 j_mayer
        float64 f;
3172 0487d6a8 j_mayer
    } u1, u2;
3173 0487d6a8 j_mayer
    u1.u = T0_64;
3174 0487d6a8 j_mayer
    u2.u = T1_64;
3175 0487d6a8 j_mayer
    u1.f = float64_mul(u1.f, u2.f, &env->spe_status);
3176 0487d6a8 j_mayer
    T0_64 = u1.u;
3177 0487d6a8 j_mayer
    RETURN();
3178 0487d6a8 j_mayer
}
3179 0487d6a8 j_mayer
3180 0487d6a8 j_mayer
void OPPROTO op_efdctsidz (void)
3181 0487d6a8 j_mayer
{
3182 0487d6a8 j_mayer
    do_efdctsiz();
3183 0487d6a8 j_mayer
    RETURN();
3184 0487d6a8 j_mayer
}
3185 0487d6a8 j_mayer
3186 0487d6a8 j_mayer
void OPPROTO op_efdctuidz (void)
3187 0487d6a8 j_mayer
{
3188 0487d6a8 j_mayer
    do_efdctuiz();
3189 0487d6a8 j_mayer
    RETURN();
3190 0487d6a8 j_mayer
}
3191 0487d6a8 j_mayer
3192 0487d6a8 j_mayer
void OPPROTO op_efdcmplt (void)
3193 0487d6a8 j_mayer
{
3194 0487d6a8 j_mayer
    do_efdcmplt();
3195 0487d6a8 j_mayer
    RETURN();
3196 0487d6a8 j_mayer
}
3197 0487d6a8 j_mayer
3198 0487d6a8 j_mayer
void OPPROTO op_efdcmpgt (void)
3199 0487d6a8 j_mayer
{
3200 0487d6a8 j_mayer
    do_efdcmpgt();
3201 0487d6a8 j_mayer
    RETURN();
3202 0487d6a8 j_mayer
}
3203 0487d6a8 j_mayer
3204 0487d6a8 j_mayer
void OPPROTO op_efdcfs (void)
3205 0487d6a8 j_mayer
{
3206 0487d6a8 j_mayer
    do_efdcfs();
3207 0487d6a8 j_mayer
    RETURN();
3208 0487d6a8 j_mayer
}
3209 0487d6a8 j_mayer
3210 0487d6a8 j_mayer
void OPPROTO op_efdcmpeq (void)
3211 0487d6a8 j_mayer
{
3212 0487d6a8 j_mayer
    do_efdcmpeq();
3213 0487d6a8 j_mayer
    RETURN();
3214 0487d6a8 j_mayer
}
3215 0487d6a8 j_mayer
3216 0487d6a8 j_mayer
void OPPROTO op_efdcfsi (void)
3217 0487d6a8 j_mayer
{
3218 0487d6a8 j_mayer
    do_efdcfsi();
3219 0487d6a8 j_mayer
    RETURN();
3220 0487d6a8 j_mayer
}
3221 0487d6a8 j_mayer
3222 0487d6a8 j_mayer
void OPPROTO op_efdcfui (void)
3223 0487d6a8 j_mayer
{
3224 0487d6a8 j_mayer
    do_efdcfui();
3225 0487d6a8 j_mayer
    RETURN();
3226 0487d6a8 j_mayer
}
3227 0487d6a8 j_mayer
3228 0487d6a8 j_mayer
void OPPROTO op_efdcfsf (void)
3229 0487d6a8 j_mayer
{
3230 0487d6a8 j_mayer
    do_efdcfsf();
3231 0487d6a8 j_mayer
    RETURN();
3232 0487d6a8 j_mayer
}
3233 0487d6a8 j_mayer
3234 0487d6a8 j_mayer
void OPPROTO op_efdcfuf (void)
3235 0487d6a8 j_mayer
{
3236 0487d6a8 j_mayer
    do_efdcfuf();
3237 0487d6a8 j_mayer
    RETURN();
3238 0487d6a8 j_mayer
}
3239 0487d6a8 j_mayer
3240 0487d6a8 j_mayer
void OPPROTO op_efdctsi (void)
3241 0487d6a8 j_mayer
{
3242 0487d6a8 j_mayer
    do_efdctsi();
3243 0487d6a8 j_mayer
    RETURN();
3244 0487d6a8 j_mayer
}
3245 0487d6a8 j_mayer
3246 0487d6a8 j_mayer
void OPPROTO op_efdctui (void)
3247 0487d6a8 j_mayer
{
3248 0487d6a8 j_mayer
    do_efdctui();
3249 0487d6a8 j_mayer
    RETURN();
3250 0487d6a8 j_mayer
}
3251 0487d6a8 j_mayer
3252 0487d6a8 j_mayer
void OPPROTO op_efdctsf (void)
3253 0487d6a8 j_mayer
{
3254 0487d6a8 j_mayer
    do_efdctsf();
3255 0487d6a8 j_mayer
    RETURN();
3256 0487d6a8 j_mayer
}
3257 0487d6a8 j_mayer
3258 0487d6a8 j_mayer
void OPPROTO op_efdctuf (void)
3259 0487d6a8 j_mayer
{
3260 0487d6a8 j_mayer
    do_efdctuf();
3261 0487d6a8 j_mayer
    RETURN();
3262 0487d6a8 j_mayer
}
3263 0487d6a8 j_mayer
3264 0487d6a8 j_mayer
void OPPROTO op_efdctuiz (void)
3265 0487d6a8 j_mayer
{
3266 0487d6a8 j_mayer
    do_efdctuiz();
3267 0487d6a8 j_mayer
    RETURN();
3268 0487d6a8 j_mayer
}
3269 0487d6a8 j_mayer
3270 0487d6a8 j_mayer
void OPPROTO op_efdctsiz (void)
3271 0487d6a8 j_mayer
{
3272 0487d6a8 j_mayer
    do_efdctsiz();
3273 0487d6a8 j_mayer
    RETURN();
3274 0487d6a8 j_mayer
}
3275 0487d6a8 j_mayer
3276 0487d6a8 j_mayer
void OPPROTO op_efdtstlt (void)
3277 0487d6a8 j_mayer
{
3278 0487d6a8 j_mayer
    T0 = _do_efdtstlt(T0_64, T1_64);
3279 0487d6a8 j_mayer
    RETURN();
3280 0487d6a8 j_mayer
}
3281 0487d6a8 j_mayer
3282 0487d6a8 j_mayer
void OPPROTO op_efdtstgt (void)
3283 0487d6a8 j_mayer
{
3284 0487d6a8 j_mayer
    T0 = _do_efdtstgt(T0_64, T1_64);
3285 0487d6a8 j_mayer
    RETURN();
3286 0487d6a8 j_mayer
}
3287 0487d6a8 j_mayer
3288 0487d6a8 j_mayer
void OPPROTO op_efdtsteq (void)
3289 0487d6a8 j_mayer
{
3290 0487d6a8 j_mayer
    T0 = _do_efdtsteq(T0_64, T1_64);
3291 0487d6a8 j_mayer
    RETURN();
3292 0487d6a8 j_mayer
}
3293 35cdaad6 j_mayer
#endif /* defined(TARGET_PPCEMB) */