gwj / at91sam9263 · Commits

Commit 4595fca99c92cbd0b3d11b017972d0ff6c1a5f97

Authored by blueswir1
1 parent 25bc827c

Move 128-bit float emulation under linux-user including the forgotten file 

git-svn-id: svn://svn.savannah.nongnu.org/qemu/trunk@4235 c046a42c-6fe2-441c-8c8c-71466251a162
Inline Side-by-side
Showing 1 changed file with 124 additions and 0 deletions
linux-user/sparc_quad_float.c 0 → 100644
  View file @4595fca
  1 +#include "exec.h"
  2 +#include "host-utils.h"
  3 +#include "helper.h"
  4 +
  5 +#define F_HELPER(name, p) void helper_f##name##p(void)
  6 +
  7 +#define F_BINOP(name) \
  8 + F_HELPER(name, q) \
  9 + { \
  10 + QT0 = float128_ ## name (QT0, QT1, &env->fp_status); \
  11 + }
  12 +
  13 +F_BINOP(add);
  14 +F_BINOP(sub);
  15 +F_BINOP(mul);
  16 +F_BINOP(div);
  17 +#undef F_BINOP
  18 +
  19 +void helper_fdmulq(void)
  20 +{
  21 + QT0 = float128_mul(float64_to_float128(DT0, &env->fp_status),
  22 + float64_to_float128(DT1, &env->fp_status),
  23 + &env->fp_status);
  24 +}
  25 +
  26 +F_HELPER(ito, q)
  27 +{
  28 + QT0 = int32_to_float128(*((int32_t *)&FT1), &env->fp_status);
  29 +}
  30 +
  31 +void helper_fqtos(void)
  32 +{
  33 + FT0 = float128_to_float32(QT1, &env->fp_status);
  34 +}
  35 +
  36 +void helper_fstoq(void)
  37 +{
  38 + QT0 = float32_to_float128(FT1, &env->fp_status);
  39 +}
  40 +
  41 +void helper_fqtod(void)
  42 +{
  43 + DT0 = float128_to_float64(QT1, &env->fp_status);
  44 +}
  45 +
  46 +void helper_fdtoq(void)
  47 +{
  48 + QT0 = float64_to_float128(DT1, &env->fp_status);
  49 +}
  50 +
  51 +void helper_fqtoi(void)
  52 +{
  53 + *((int32_t *)&FT0) = float128_to_int32_round_to_zero(QT1, &env->fp_status);
  54 +}
  55 +
  56 +void helper_fsqrtq(void)
  57 +{
  58 + QT0 = float128_sqrt(QT1, &env->fp_status);
  59 +}
  60 +
  61 +#ifdef TARGET_SPARC64
  62 +F_HELPER(neg, q)
  63 +{
  64 + QT0 = float128_chs(QT1);
  65 +}
  66 +
  67 +F_HELPER(xto, q)
  68 +{
  69 + QT0 = int64_to_float128(*((int64_t *)&DT1), &env->fp_status);
  70 +}
  71 +
  72 +void helper_fqtox(void)
  73 +{
  74 + *((int64_t *)&DT0) = float128_to_int64_round_to_zero(QT1, &env->fp_status);
  75 +}
  76 +
  77 +void helper_fabsq(void)
  78 +{
  79 + QT0 = float128_abs(QT1);
  80 +}
  81 +#endif
  82 +
  83 +#define GEN_FCMP(name, size, reg1, reg2, FS, TRAP) \
  84 + void glue(helper_, name) (void) \
  85 + { \
  86 + target_ulong new_fsr; \
  87 + \
  88 + env->fsr &= ~((FSR_FCC1 | FSR_FCC0) << FS); \
  89 + switch (glue(size, _compare) (reg1, reg2, &env->fp_status)) { \
  90 + case float_relation_unordered: \
  91 + new_fsr = (FSR_FCC1 | FSR_FCC0) << FS; \
  92 + if ((env->fsr & FSR_NVM) || TRAP) { \
  93 + env->fsr |= new_fsr; \
  94 + env->fsr |= FSR_NVC; \
  95 + env->fsr |= FSR_FTT_IEEE_EXCP; \
  96 + raise_exception(TT_FP_EXCP); \
  97 + } else { \
  98 + env->fsr |= FSR_NVA; \
  99 + } \
  100 + break; \
  101 + case float_relation_less: \
  102 + new_fsr = FSR_FCC0 << FS; \
  103 + break; \
  104 + case float_relation_greater: \
  105 + new_fsr = FSR_FCC1 << FS; \
  106 + break; \
  107 + default: \
  108 + new_fsr = 0; \
  109 + break; \
  110 + } \
  111 + env->fsr |= new_fsr; \
  112 + }
  113 +
  114 +GEN_FCMP(fcmpq, float128, QT0, QT1, 0, 0);
  115 +GEN_FCMP(fcmpeq, float128, QT0, QT1, 0, 1);
  116 +
  117 +#ifdef TARGET_SPARC64
  118 +GEN_FCMP(fcmpq_fcc1, float128, QT0, QT1, 22, 0);
  119 +GEN_FCMP(fcmpq_fcc2, float128, QT0, QT1, 24, 0);
  120 +GEN_FCMP(fcmpq_fcc3, float128, QT0, QT1, 26, 0);
  121 +GEN_FCMP(fcmpeq_fcc1, float128, QT0, QT1, 22, 1);
  122 +GEN_FCMP(fcmpeq_fcc2, float128, QT0, QT1, 24, 1);
  123 +GEN_FCMP(fcmpeq_fcc3, float128, QT0, QT1, 26, 1);
  124 +#endif
... ...