// SPDX-License-Identifier: GPL-2.0-only
/* ieee754 floating point arithmetic
 * single and double precision
 *
 * BUGS
 * not much dp done
 * doesn't generate IEEE754_INEXACT
 */
/*
 * MIPS floating point support
 * Copyright (C) 1994-2000 Algorithmics Ltd.
 */

#include <linux/compiler.h>

#include "ieee754.h"
#include "ieee754sp.h"
#include "ieee754dp.h"

/*
 * Special constants
 */

/*
 * Older GCC requires the inner braces for initialization of union ieee754dp's
 * anonymous struct member.  Without an error will result.
 */
#define xPCNST(s, b, m, ebias)                                          \
{                                                                       \
        {                                                               \
                .sign   = (s),                                          \
                .bexp   = (b) + ebias,                                  \
                .mant   = (m)                                           \
        }                                                               \
}

#define DPCNST(s, b, m)                                                 \
        xPCNST(s, b, m, DP_EBIAS)

const union ieee754dp __ieee754dp_spcvals[] = {
        DPCNST(0, DP_EMIN - 1, 0x0000000000000ULL),     /* + zero   */
        DPCNST(1, DP_EMIN - 1, 0x0000000000000ULL),     /* - zero   */
        DPCNST(0, 0,           0x0000000000000ULL),     /* + 1.0   */
        DPCNST(1, 0,           0x0000000000000ULL),     /* - 1.0   */
        DPCNST(0, 3,           0x4000000000000ULL),     /* + 10.0   */
        DPCNST(1, 3,           0x4000000000000ULL),     /* - 10.0   */
        DPCNST(0, DP_EMAX + 1, 0x0000000000000ULL),     /* + infinity */
        DPCNST(1, DP_EMAX + 1, 0x0000000000000ULL),     /* - infinity */
        DPCNST(0, DP_EMAX + 1, 0x7FFFFFFFFFFFFULL),     /* + ind legacy qNaN */
        DPCNST(0, DP_EMAX + 1, 0x8000000000000ULL),     /* + indef 2008 qNaN */
        DPCNST(0, DP_EMAX,     0xFFFFFFFFFFFFFULL),     /* + max */
        DPCNST(1, DP_EMAX,     0xFFFFFFFFFFFFFULL),     /* - max */
        DPCNST(0, DP_EMIN,     0x0000000000000ULL),     /* + min normal */
        DPCNST(1, DP_EMIN,     0x0000000000000ULL),     /* - min normal */
        DPCNST(0, DP_EMIN - 1, 0x0000000000001ULL),     /* + min denormal */
        DPCNST(1, DP_EMIN - 1, 0x0000000000001ULL),     /* - min denormal */
        DPCNST(0, 31,          0x0000000000000ULL),     /* + 1.0e31 */
        DPCNST(0, 63,          0x0000000000000ULL),     /* + 1.0e63 */
};

#define SPCNST(s, b, m)                                                 \
        xPCNST(s, b, m, SP_EBIAS)

const union ieee754sp __ieee754sp_spcvals[] = {
        SPCNST(0, SP_EMIN - 1, 0x000000),       /* + zero   */
        SPCNST(1, SP_EMIN - 1, 0x000000),       /* - zero   */
        SPCNST(0, 0,           0x000000),       /* + 1.0   */
        SPCNST(1, 0,           0x000000),       /* - 1.0   */
        SPCNST(0, 3,           0x200000),       /* + 10.0   */
        SPCNST(1, 3,           0x200000),       /* - 10.0   */
        SPCNST(0, SP_EMAX + 1, 0x000000),       /* + infinity */
        SPCNST(1, SP_EMAX + 1, 0x000000),       /* - infinity */
        SPCNST(0, SP_EMAX + 1, 0x3FFFFF),       /* + indef legacy quiet NaN */
        SPCNST(0, SP_EMAX + 1, 0x400000),       /* + indef 2008 quiet NaN */
        SPCNST(0, SP_EMAX,     0x7FFFFF),       /* + max normal */
        SPCNST(1, SP_EMAX,     0x7FFFFF),       /* - max normal */
        SPCNST(0, SP_EMIN,     0x000000),       /* + min normal */
        SPCNST(1, SP_EMIN,     0x000000),       /* - min normal */
        SPCNST(0, SP_EMIN - 1, 0x000001),       /* + min denormal */
        SPCNST(1, SP_EMIN - 1, 0x000001),       /* - min denormal */
        SPCNST(0, 31,          0x000000),       /* + 1.0e31 */
        SPCNST(0, 63,          0x000000),       /* + 1.0e63 */
};