1/*	$OpenBSD: ieee.h,v 1.3 2021/05/12 01:20:52 jsg Exp $	*/
2/*	$NetBSD: ieee.h,v 1.1 1996/09/30 16:34:25 ws Exp $	*/
3
4/*
5 * Copyright (c) 1992, 1993
6 *	The Regents of the University of California.  All rights reserved.
7 *
8 * This software was developed by the Computer Systems Engineering group
9 * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
10 * contributed to Berkeley.
11 *
12 * All advertising materials mentioning features or use of this software
13 * must display the following acknowledgement:
14 *	This product includes software developed by the University of
15 *	California, Lawrence Berkeley Laboratory.
16 *
17 * Redistribution and use in source and binary forms, with or without
18 * modification, are permitted provided that the following conditions
19 * are met:
20 * 1. Redistributions of source code must retain the above copyright
21 *    notice, this list of conditions and the following disclaimer.
22 * 2. Redistributions in binary form must reproduce the above copyright
23 *    notice, this list of conditions and the following disclaimer in the
24 *    documentation and/or other materials provided with the distribution.
25 * 3. Neither the name of the University nor the names of its contributors
26 *    may be used to endorse or promote products derived from this software
27 *    without specific prior written permission.
28 *
29 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
30 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
31 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
32 * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
33 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
34 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
35 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
36 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
37 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
38 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
39 * SUCH DAMAGE.
40 *
41 *	@(#)ieee.h	8.1 (Berkeley) 6/11/93
42 */
43
44/*
45 * ieee.h defines the machine-dependent layout of the machine's IEEE
46 * floating point.  It does *not* define (yet?) any of the rounding
47 * mode bits, exceptions, and so forth.
48 */
49
50/*
51 * Define the number of bits in each fraction and exponent.
52 *
53 *		     k	         k+1
54 * Note that  1.0 x 2  == 0.1 x 2      and that denorms are represented
55 *
56 *					  (-exp_bias+1)
57 * as fractions that look like 0.fffff x 2             .  This means that
58 *
59 *			 -126
60 * the number 0.10000 x 2    , for instance, is the same as the normalized
61 *
62 *		-127			   -128
63 * float 1.0 x 2    .  Thus, to represent 2    , we need one leading zero
64 *
65 *				  -129
66 * in the fraction; to represent 2    , we need two, and so on.  This
67 *
68 *						     (-exp_bias-fracbits+1)
69 * implies that the smallest denormalized number is 2
70 *
71 * for whichever format we are talking about: for single precision, for
72 *
73 *						-126		-149
74 * instance, we get .00000000000000000000001 x 2    , or 1.0 x 2    , and
75 *
76 * -149 == -127 - 23 + 1.
77 */
78#define	SNG_EXPBITS	8
79#define	SNG_FRACBITS	23
80
81#define	DBL_EXPBITS	11
82#define	DBL_FRACHBITS	20
83#define	DBL_FRACLBITS	32
84#define	DBL_FRACBITS	52
85
86#define	EXT_EXPBITS	15
87#define	EXT_FRACHBITS	16
88#define	EXT_FRACHMBITS	32
89#define	EXT_FRACLMBITS	32
90#define	EXT_FRACLBITS	32
91#define	EXT_FRACBITS	112
92
93#define	EXT_IMPLICIT_NBIT
94
95#define	EXT_TO_ARRAY32(p, a) do {		\
96	(a)[0] = (uint32_t)(p)->ext_fracl;	\
97	(a)[1] = (uint32_t)(p)->ext_fraclm;	\
98	(a)[2] = (uint32_t)(p)->ext_frachm;	\
99	(a)[3] = (uint32_t)(p)->ext_frach;	\
100} while (0)
101
102struct ieee_single {
103	u_int	sng_frac:23;
104	u_int	sng_exp:8;
105	u_int	sng_sign:1;
106};
107
108struct ieee_double {
109	u_int	dbl_fracl;
110	u_int	dbl_frach:20;
111	u_int	dbl_exp:11;
112	u_int	dbl_sign:1;
113};
114
115struct ieee_ext {
116	u_int	ext_fracl;
117	u_int	ext_fraclm;
118	u_int	ext_frachm;
119	u_int	ext_frach:16;
120	u_int	ext_exp:15;
121	u_int	ext_sign:1;
122};
123
124/*
125 * Floats whose exponent is in [1..INFNAN) (of whatever type) are
126 * `normal'.  Floats whose exponent is INFNAN are either Inf or NaN.
127 * Floats whose exponent is zero are either zero (iff all fraction
128 * bits are zero) or subnormal values.
129 *
130 * A NaN is a `signalling NaN' if its QUIETNAN bit is clear in its
131 * high fraction; if the bit is set, it is a `quiet NaN'.
132 */
133#define	SNG_EXP_INFNAN	255
134#define	DBL_EXP_INFNAN	2047
135#define	EXT_EXP_INFNAN	32767
136
137#if 0
138#define	SNG_QUIETNAN	(1 << 22)
139#define	DBL_QUIETNAN	(1 << 19)
140#define	EXT_QUIETNAN	(1 << 15)
141#endif
142
143/*
144 * Exponent biases.
145 */
146#define	SNG_EXP_BIAS	127
147#define	DBL_EXP_BIAS	1023
148#define	EXT_EXP_BIAS	16383
149