accel/tcg/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 #include "disas/disas.h"
  31 #include "exec/log.h"
  32 #include "tcg/tcg.h"
  33 #include "exec/tb-lookup.h"
  34
  35 /* 32-bit helpers */
  36
  37 int32_t HELPER(div_i32)(int32_t arg1, int32_t arg2)
  38 {
  39     return arg1 / arg2;
  40 }
  41
  42 int32_t HELPER(rem_i32)(int32_t arg1, int32_t arg2)
  43 {
  44     return arg1 % arg2;
  45 }
  46
  47 uint32_t HELPER(divu_i32)(uint32_t arg1, uint32_t arg2)
  48 {
  49     return arg1 / arg2;
  50 }
  51
  52 uint32_t HELPER(remu_i32)(uint32_t arg1, uint32_t arg2)
  53 {
  54     return arg1 % arg2;
  55 }
  56
  57 /* 64-bit helpers */
  58
  59 uint64_t HELPER(shl_i64)(uint64_t arg1, uint64_t arg2)
  60 {
  61     return arg1 << arg2;
  62 }
  63
  64 uint64_t HELPER(shr_i64)(uint64_t arg1, uint64_t arg2)
  65 {
  66     return arg1 >> arg2;
  67 }
  68
  69 int64_t HELPER(sar_i64)(int64_t arg1, int64_t arg2)
  70 {
  71     return arg1 >> arg2;
  72 }
  73
  74 int64_t HELPER(div_i64)(int64_t arg1, int64_t arg2)
  75 {
  76     return arg1 / arg2;
  77 }
  78
  79 int64_t HELPER(rem_i64)(int64_t arg1, int64_t arg2)
  80 {
  81     return arg1 % arg2;
  82 }
  83
  84 uint64_t HELPER(divu_i64)(uint64_t arg1, uint64_t arg2)
  85 {
  86     return arg1 / arg2;
  87 }
  88
  89 uint64_t HELPER(remu_i64)(uint64_t arg1, uint64_t arg2)
  90 {
  91     return arg1 % arg2;
  92 }
  93
  94 uint64_t HELPER(muluh_i64)(uint64_t arg1, uint64_t arg2)
  95 {
  96     uint64_t l, h;
  97     mulu64(&l, &h, arg1, arg2);
  98     return h;
  99 }
 100
 101 int64_t HELPER(mulsh_i64)(int64_t arg1, int64_t arg2)
 102 {
 103     uint64_t l, h;
 104     muls64(&l, &h, arg1, arg2);
 105     return h;
 106 }
 107
 108 uint32_t HELPER(clz_i32)(uint32_t arg, uint32_t zero_val)
 109 {
 110     return arg ? clz32(arg) : zero_val;
 111 }
 112
 113 uint32_t HELPER(ctz_i32)(uint32_t arg, uint32_t zero_val)
 114 {
 115     return arg ? ctz32(arg) : zero_val;
 116 }
 117
 118 uint64_t HELPER(clz_i64)(uint64_t arg, uint64_t zero_val)
 119 {
 120     return arg ? clz64(arg) : zero_val;
 121 }
 122
 123 uint64_t HELPER(ctz_i64)(uint64_t arg, uint64_t zero_val)
 124 {
 125     return arg ? ctz64(arg) : zero_val;
 126 }
 127
 128 uint32_t HELPER(clrsb_i32)(uint32_t arg)
 129 {
 130     return clrsb32(arg);
 131 }
 132
 133 uint64_t HELPER(clrsb_i64)(uint64_t arg)
 134 {
 135     return clrsb64(arg);
 136 }
 137
 138 uint32_t HELPER(ctpop_i32)(uint32_t arg)
 139 {
 140     return ctpop32(arg);
 141 }
 142
 143 uint64_t HELPER(ctpop_i64)(uint64_t arg)
 144 {
 145     return ctpop64(arg);
 146 }
 147
 148 const void *HELPER(lookup_tb_ptr)(CPUArchState *env)
 149 {
 150     CPUState *cpu = env_cpu(env);
 151     TranslationBlock *tb;
 152     target_ulong cs_base, pc;
 153     uint32_t flags;
 154
 155     cpu_get_tb_cpu_state(env, &pc, &cs_base, &flags);
 156
 157     tb = tb_lookup(cpu, pc, cs_base, flags, curr_cflags(cpu));
 158     if (tb == NULL) {
 159         return tcg_code_gen_epilogue;
 160     }
 161     qemu_log_mask_and_addr(CPU_LOG_EXEC, pc,
 162                            "Chain %d: %p ["
 163                            TARGET_FMT_lx "/" TARGET_FMT_lx "/%#x] %s\n",
 164                            cpu->cpu_index, tb->tc.ptr, cs_base, pc, flags,
 165                            lookup_symbol(pc));
 166     return tb->tc.ptr;
 167 }
 168
 169 void HELPER(exit_atomic)(CPUArchState *env)
 170 {
 171     cpu_loop_exit_atomic(env_cpu(env), GETPC());
 172 }