^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 1) /* SPDX-License-Identifier: GPL-2.0-only */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 2) /*
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 3) * IEEE754 floating point
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 4) * double precision internal header file
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 5) */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 6) /*
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 7) * MIPS floating point support
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 8) * Copyright (C) 1994-2000 Algorithmics Ltd.
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 9) */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 10)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 11) #include <linux/compiler.h>
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 12)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 13) #include "ieee754int.h"
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 14)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 15) #define assert(expr) ((void)0)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 16)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 17) #define DP_EBIAS 1023
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 18) #define DP_EMIN (-1022)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 19) #define DP_EMAX 1023
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 20) #define DP_FBITS 52
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 21) #define DP_MBITS 52
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 22)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 23) #define DP_MBIT(x) ((u64)1 << (x))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 24) #define DP_HIDDEN_BIT DP_MBIT(DP_FBITS)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 25) #define DP_SIGN_BIT DP_MBIT(63)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 26)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 27) #define DPSIGN(dp) (dp.sign)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 28) #define DPBEXP(dp) (dp.bexp)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 29) #define DPMANT(dp) (dp.mant)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 30)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 31) static inline int ieee754dp_finite(union ieee754dp x)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 32) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 33) return DPBEXP(x) != DP_EMAX + 1 + DP_EBIAS;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 34) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 35)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 36) /* 3bit extended double precision sticky right shift */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 37) #define XDPSRS(v,rs) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 38) ((rs > (DP_FBITS+3))?1:((v) >> (rs)) | ((v) << (64-(rs)) != 0))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 39)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 40) #define XDPSRSX1() \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 41) (xe++, (xm = (xm >> 1) | (xm & 1)))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 42)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 43) #define XDPSRS1(v) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 44) (((v) >> 1) | ((v) & 1))
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 45)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 46) /* 32bit * 32bit => 64bit unsigned integer multiplication */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 47) #define DPXMULT(x, y) ((u64)(x) * (u64)y)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 48)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 49) /* convert denormal to normalized with extended exponent */
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 50) #define DPDNORMx(m,e) \
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 51) while ((m >> DP_FBITS) == 0) { m <<= 1; e--; }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 52) #define DPDNORMX DPDNORMx(xm, xe)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 53) #define DPDNORMY DPDNORMx(ym, ye)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 54) #define DPDNORMZ DPDNORMx(zm, ze)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 55)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 56) static inline union ieee754dp builddp(int s, int bx, u64 m)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 57) {
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 58) union ieee754dp r;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 59)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 60) assert((s) == 0 || (s) == 1);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 61) assert((bx) >= DP_EMIN - 1 + DP_EBIAS
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 62) && (bx) <= DP_EMAX + 1 + DP_EBIAS);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 63) assert(((m) >> DP_FBITS) == 0);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 64)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 65) r.sign = s;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 66) r.bexp = bx;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 67) r.mant = m;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 68)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 69) return r;
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 70) }
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 71)
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 72) extern union ieee754dp __cold ieee754dp_nanxcpt(union ieee754dp);
^8f3ce5b39 (kx 2023-10-28 12:00:06 +0300 73) extern union ieee754dp ieee754dp_format(int, int, u64);