2 * UniCore32 helper routines
4 * Copyright (C) 2010-2012 Guan Xuetao
6 * This program is free software; you can redistribute it and/or modify
7 * it under the terms of the GNU General Public License version 2 as
8 * published by the Free Software Foundation, or (at your option) any
9 * later version. See the COPYING file in the top-level directory.
12 #include "exec/helper-proto.h"
13 #include "exec/cpu_ldst.h"
15 #define SIGNBIT (uint32_t)0x80000000
16 #define SIGNBIT64 ((uint64_t)1 << 63)
18 void HELPER(exception)(CPUUniCore32State *env, uint32_t excp)
20 CPUState *cs = CPU(uc32_env_get_cpu(env));
22 cs->exception_index = excp;
26 static target_ulong asr_read(CPUUniCore32State *env)
30 return env->uncached_asr | (env->NF & 0x80000000) | (ZF << 30) |
31 (env->CF << 29) | ((env->VF & 0x80000000) >> 3);
34 target_ulong cpu_asr_read(CPUUniCore32State *env)
39 target_ulong HELPER(asr_read)(CPUUniCore32State *env)
44 static void asr_write(CPUUniCore32State *env, target_ulong val,
47 if (mask & ASR_NZCV) {
48 env->ZF = (~val) & ASR_Z;
50 env->CF = (val >> 29) & 1;
51 env->VF = (val << 3) & 0x80000000;
54 if ((env->uncached_asr ^ val) & mask & ASR_M) {
55 switch_mode(env, val & ASR_M);
58 env->uncached_asr = (env->uncached_asr & ~mask) | (val & mask);
61 void cpu_asr_write(CPUUniCore32State *env, target_ulong val, target_ulong mask)
63 asr_write(env, val, mask);
66 void HELPER(asr_write)(CPUUniCore32State *env, target_ulong val,
69 asr_write(env, val, mask);
72 /* Access to user mode registers from privileged modes. */
73 uint32_t HELPER(get_user_reg)(CPUUniCore32State *env, uint32_t regno)
78 val = env->banked_r29[0];
79 } else if (regno == 30) {
80 val = env->banked_r30[0];
82 val = env->regs[regno];
87 void HELPER(set_user_reg)(CPUUniCore32State *env, uint32_t regno, uint32_t val)
90 env->banked_r29[0] = val;
91 } else if (regno == 30) {
92 env->banked_r30[0] = val;
94 env->regs[regno] = val;
98 /* ??? Flag setting arithmetic is awkward because we need to do comparisons.
99 The only way to do that in TCG is a conditional branch, which clobbers
100 all our temporaries. For now implement these as helper functions. */
102 uint32_t HELPER(add_cc)(CPUUniCore32State *env, uint32_t a, uint32_t b)
106 env->NF = env->ZF = result;
107 env->CF = result < a;
108 env->VF = (a ^ b ^ -1) & (a ^ result);
112 uint32_t HELPER(adc_cc)(CPUUniCore32State *env, uint32_t a, uint32_t b)
117 env->CF = result < a;
120 env->CF = result <= a;
122 env->VF = (a ^ b ^ -1) & (a ^ result);
123 env->NF = env->ZF = result;
127 uint32_t HELPER(sub_cc)(CPUUniCore32State *env, uint32_t a, uint32_t b)
131 env->NF = env->ZF = result;
133 env->VF = (a ^ b) & (a ^ result);
137 uint32_t HELPER(sbc_cc)(CPUUniCore32State *env, uint32_t a, uint32_t b)
147 env->VF = (a ^ b) & (a ^ result);
148 env->NF = env->ZF = result;
152 /* Similarly for variable shift instructions. */
154 uint32_t HELPER(shl)(uint32_t x, uint32_t i)
156 int shift = i & 0xff;
163 uint32_t HELPER(shr)(uint32_t x, uint32_t i)
165 int shift = i & 0xff;
169 return (uint32_t)x >> shift;
172 uint32_t HELPER(sar)(uint32_t x, uint32_t i)
174 int shift = i & 0xff;
178 return (int32_t)x >> shift;
181 uint32_t HELPER(shl_cc)(CPUUniCore32State *env, uint32_t x, uint32_t i)
183 int shift = i & 0xff;
191 } else if (shift != 0) {
192 env->CF = (x >> (32 - shift)) & 1;
198 uint32_t HELPER(shr_cc)(CPUUniCore32State *env, uint32_t x, uint32_t i)
200 int shift = i & 0xff;
203 env->CF = (x >> 31) & 1;
208 } else if (shift != 0) {
209 env->CF = (x >> (shift - 1)) & 1;
215 uint32_t HELPER(sar_cc)(CPUUniCore32State *env, uint32_t x, uint32_t i)
217 int shift = i & 0xff;
219 env->CF = (x >> 31) & 1;
220 return (int32_t)x >> 31;
221 } else if (shift != 0) {
222 env->CF = (x >> (shift - 1)) & 1;
223 return (int32_t)x >> shift;
228 uint32_t HELPER(ror_cc)(CPUUniCore32State *env, uint32_t x, uint32_t i)
232 shift = shift1 & 0x1f;
235 env->CF = (x >> 31) & 1;
239 env->CF = (x >> (shift - 1)) & 1;
240 return ((uint32_t)x >> shift) | (x << (32 - shift));
244 #ifndef CONFIG_USER_ONLY
245 void tlb_fill(CPUState *cs, target_ulong addr, int is_write,
246 int mmu_idx, uintptr_t retaddr)
250 ret = uc32_cpu_handle_mmu_fault(cs, addr, is_write, mmu_idx);
253 /* now we have a real cpu fault */
254 cpu_restore_state(cs, retaddr);