tcg-runtime.c

   1 /*
   2  * Tiny Code Generator for QEMU
   3  *
   4  * Copyright (c) 2008 Fabrice Bellard
   5  *
   6  * Permission is hereby granted, free of charge, to any person obtaining a copy
   7  * of this software and associated documentation files (the "Software"), to deal
   8  * in the Software without restriction, including without limitation the rights
   9  * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
  10  * copies of the Software, and to permit persons to whom the Software is
  11  * furnished to do so, subject to the following conditions:
  12  *
  13  * The above copyright notice and this permission notice shall be included in
  14  * all copies or substantial portions of the Software.
  15  *
  16  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
  17  * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
  18  * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
  19  * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
  20  * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
  21  * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
  22  * THE SOFTWARE.
  23  */
  24 #include "qemu/osdep.h"
  25 #include "qemu/host-utils.h"
  26 #include "cpu.h"
  27 #include "exec/helper-proto.h"
  28 #include "exec/cpu_ldst.h"
  29 #include "exec/exec-all.h"
  30
  31 /* 32-bit helpers */
  32
  33 int32_t HELPER(div_i32)(int32_t arg1, int32_t arg2)
  34 {
  35     return arg1 / arg2;
  36 }
  37
  38 int32_t HELPER(rem_i32)(int32_t arg1, int32_t arg2)
  39 {
  40     return arg1 % arg2;
  41 }
  42
  43 uint32_t HELPER(divu_i32)(uint32_t arg1, uint32_t arg2)
  44 {
  45     return arg1 / arg2;
  46 }
  47
  48 uint32_t HELPER(remu_i32)(uint32_t arg1, uint32_t arg2)
  49 {
  50     return arg1 % arg2;
  51 }
  52
  53 /* 64-bit helpers */
  54
  55 uint64_t HELPER(shl_i64)(uint64_t arg1, uint64_t arg2)
  56 {
  57     return arg1 << arg2;
  58 }
  59
  60 uint64_t HELPER(shr_i64)(uint64_t arg1, uint64_t arg2)
  61 {
  62     return arg1 >> arg2;
  63 }
  64
  65 int64_t HELPER(sar_i64)(int64_t arg1, int64_t arg2)
  66 {
  67     return arg1 >> arg2;
  68 }
  69
  70 int64_t HELPER(div_i64)(int64_t arg1, int64_t arg2)
  71 {
  72     return arg1 / arg2;
  73 }
  74
  75 int64_t HELPER(rem_i64)(int64_t arg1, int64_t arg2)
  76 {
  77     return arg1 % arg2;
  78 }
  79
  80 uint64_t HELPER(divu_i64)(uint64_t arg1, uint64_t arg2)
  81 {
  82     return arg1 / arg2;
  83 }
  84
  85 uint64_t HELPER(remu_i64)(uint64_t arg1, uint64_t arg2)
  86 {
  87     return arg1 % arg2;
  88 }
  89
  90 uint64_t HELPER(muluh_i64)(uint64_t arg1, uint64_t arg2)
  91 {
  92     uint64_t l, h;
  93     mulu64(&l, &h, arg1, arg2);
  94     return h;
  95 }
  96
  97 int64_t HELPER(mulsh_i64)(int64_t arg1, int64_t arg2)
  98 {
  99     uint64_t l, h;
 100     muls64(&l, &h, arg1, arg2);
 101     return h;
 102 }
 103
 104 uint32_t HELPER(clz_i32)(uint32_t arg, uint32_t zero_val)
 105 {
 106     return arg ? clz32(arg) : zero_val;
 107 }
 108
 109 uint32_t HELPER(ctz_i32)(uint32_t arg, uint32_t zero_val)
 110 {
 111     return arg ? ctz32(arg) : zero_val;
 112 }
 113
 114 uint64_t HELPER(clz_i64)(uint64_t arg, uint64_t zero_val)
 115 {
 116     return arg ? clz64(arg) : zero_val;
 117 }
 118
 119 uint64_t HELPER(ctz_i64)(uint64_t arg, uint64_t zero_val)
 120 {
 121     return arg ? ctz64(arg) : zero_val;
 122 }
 123
 124 uint32_t HELPER(clrsb_i32)(uint32_t arg)
 125 {
 126     return clrsb32(arg);
 127 }
 128
 129 uint64_t HELPER(clrsb_i64)(uint64_t arg)
 130 {
 131     return clrsb64(arg);
 132 }
 133
 134 uint32_t HELPER(ctpop_i32)(uint32_t arg)
 135 {
 136     return ctpop32(arg);
 137 }
 138
 139 uint64_t HELPER(ctpop_i64)(uint64_t arg)
 140 {
 141     return ctpop64(arg);
 142 }
 143
 144 void HELPER(exit_atomic)(CPUArchState *env)
 145 {
 146     cpu_loop_exit_atomic(ENV_GET_CPU(env), GETPC());
 147 }
 148
 149 #ifndef CONFIG_SOFTMMU
 150 /* The softmmu versions of these helpers are in cputlb.c.  */
 151
 152 /* Do not allow unaligned operations to proceed.  Return the host address.  */
 153 static void *atomic_mmu_lookup(CPUArchState *env, target_ulong addr,
 154                                int size, uintptr_t retaddr)
 155 {
 156     /* Enforce qemu required alignment.  */
 157     if (unlikely(addr & (size - 1))) {
 158         cpu_loop_exit_atomic(ENV_GET_CPU(env), retaddr);
 159     }
 160     return g2h(addr);
 161 }
 162
 163 /* Macro to call the above, with local variables from the use context.  */
 164 #define ATOMIC_MMU_LOOKUP  atomic_mmu_lookup(env, addr, DATA_SIZE, GETPC())
 165
 166 #define ATOMIC_NAME(X)   HELPER(glue(glue(atomic_ ## X, SUFFIX), END))
 167 #define EXTRA_ARGS
 168
 169 #define DATA_SIZE 1
 170 #include "atomic_template.h"
 171
 172 #define DATA_SIZE 2
 173 #include "atomic_template.h"
 174
 175 #define DATA_SIZE 4
 176 #include "atomic_template.h"
 177
 178 #ifdef CONFIG_ATOMIC64
 179 #define DATA_SIZE 8
 180 #include "atomic_template.h"
 181 #endif
 182
 183 /* The following is only callable from other helpers, and matches up
 184    with the softmmu version.  */
 185
 186 #ifdef CONFIG_ATOMIC128
 187
 188 #undef EXTRA_ARGS
 189 #undef ATOMIC_NAME
 190 #undef ATOMIC_MMU_LOOKUP
 191
 192 #define EXTRA_ARGS     , TCGMemOpIdx oi, uintptr_t retaddr
 193 #define ATOMIC_NAME(X) \
 194     HELPER(glue(glue(glue(atomic_ ## X, SUFFIX), END), _mmu))
 195 #define ATOMIC_MMU_LOOKUP  atomic_mmu_lookup(env, addr, DATA_SIZE, retaddr)
 196
 197 #define DATA_SIZE 16
 198 #include "atomic_template.h"
 199 #endif /* CONFIG_ATOMIC128 */
 200
 201 #endif /* !CONFIG_SOFTMMU */