ieee754sp.h 1.7 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677
  1. /* SPDX-License-Identifier: GPL-2.0-only */
  2. /*
  3. * IEEE754 floating point
  4. * double precision internal header file
  5. */
  6. /*
  7. * MIPS floating point support
  8. * Copyright (C) 1994-2000 Algorithmics Ltd.
  9. */
  10. #include <linux/compiler.h>
  11. #include "ieee754int.h"
  12. #define assert(expr) ((void)0)
  13. #define SP_EBIAS 127
  14. #define SP_EMIN (-126)
  15. #define SP_EMAX 127
  16. #define SP_FBITS 23
  17. #define SP_MBITS 23
  18. #define SP_MBIT(x) ((u32)1 << (x))
  19. #define SP_HIDDEN_BIT SP_MBIT(SP_FBITS)
  20. #define SP_SIGN_BIT SP_MBIT(31)
  21. #define SPSIGN(sp) (sp.sign)
  22. #define SPBEXP(sp) (sp.bexp)
  23. #define SPMANT(sp) (sp.mant)
  24. static inline int ieee754sp_finite(union ieee754sp x)
  25. {
  26. return SPBEXP(x) != SP_EMAX + 1 + SP_EBIAS;
  27. }
  28. /* 64 bit right shift with rounding */
  29. #define XSPSRS64(v, rs) \
  30. (((rs) >= 64) ? ((v) != 0) : ((v) >> (rs)) | ((v) << (64-(rs)) != 0))
  31. /* 3bit extended single precision sticky right shift */
  32. #define XSPSRS(v, rs) \
  33. ((rs > (SP_FBITS+3))?1:((v) >> (rs)) | ((v) << (32-(rs)) != 0))
  34. #define XSPSRS1(m) \
  35. ((m >> 1) | (m & 1))
  36. #define SPXSRSX1() \
  37. (xe++, (xm = XSPSRS1(xm)))
  38. #define SPXSRSY1() \
  39. (ye++, (ym = XSPSRS1(ym)))
  40. /* convert denormal to normalized with extended exponent */
  41. #define SPDNORMx(m,e) \
  42. while ((m >> SP_FBITS) == 0) { m <<= 1; e--; }
  43. #define SPDNORMX SPDNORMx(xm, xe)
  44. #define SPDNORMY SPDNORMx(ym, ye)
  45. #define SPDNORMZ SPDNORMx(zm, ze)
  46. static inline union ieee754sp buildsp(int s, int bx, unsigned int m)
  47. {
  48. union ieee754sp r;
  49. assert((s) == 0 || (s) == 1);
  50. assert((bx) >= SP_EMIN - 1 + SP_EBIAS
  51. && (bx) <= SP_EMAX + 1 + SP_EBIAS);
  52. assert(((m) >> SP_FBITS) == 0);
  53. r.sign = s;
  54. r.bexp = bx;
  55. r.mant = m;
  56. return r;
  57. }
  58. extern union ieee754sp __cold ieee754sp_nanxcpt(union ieee754sp);
  59. extern union ieee754sp ieee754sp_format(int, int, unsigned);