[apple/libc.git] / fbsdcompat / _fpmath.h

/*
 * Copyright (c) 2003, 2008 Apple Inc. All rights reserved.
 *
 * @APPLE_LICENSE_HEADER_START@
 * 
 * This file contains Original Code and/or Modifications of Original Code
 * as defined in and that are subject to the Apple Public Source License
 * Version 2.0 (the 'License'). You may not use this file except in
 * compliance with the License. Please obtain a copy of the License at
 * http://www.opensource.apple.com/apsl/ and read it before using this
 * file.
 * 
 * The Original Code and all software distributed under the License are
 * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
 * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
 * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
 * Please see the License for the specific language governing rights and
 * limitations under the License.
 * 
 * @APPLE_LICENSE_HEADER_END@
 */
/*-
 * Copyright (c) 2002, 2003 David Schultz <dschultz@uclink.Berkeley.EDU>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions
 * are met:
 * 1. Redistributions of source code must retain the above copyright
 *    notice, this list of conditions and the following disclaimer.
 * 2. Redistributions in binary form must reproduce the above copyright
 *    notice, this list of conditions and the following disclaimer in the
 *    documentation and/or other materials provided with the distribution.
 *
 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
 * SUCH DAMAGE.
 *
 * $FreeBSD: src/lib/libc/i386/_fpmath.h,v 1.3 2004/01/18 07:57:01 das Exp $
 */

#if defined(__ppc__) || defined(__ppc64__)

union IEEEl2bits {
	long double	e;
	double		d[2];
	struct {
		unsigned long long	sign	:1;
		unsigned long long	exp	:11;
		unsigned long long	manh	:52;
		unsigned long long	sign2	:1;
		unsigned long long	exp2	:11;
		unsigned long long	manl	:52;
	} bits;
};

#define	mask_nbit_l(u)	((void)0)
#define LDBL_IMPLICIT_NBIT

#define	LDBL_MANH_SIZE	52
#define	LDBL_MANL_SIZE	53	// includes hidden bit

#define LDBL_HEAD_TAIL_PAIR

__private_extern__ int _ldbl2array32dd(union IEEEl2bits, uint32_t *);

#define	LDBL_TO_ARRAY32(u, a) _ldbl2array32dd(u, a)

#elif defined(__i386__) || defined(__x86_64__)

union IEEEl2bits {
	long double	e;
	struct {
		unsigned int	manl	:32;
		unsigned int	manh	:32;
		unsigned int	exp	:15;
		unsigned int	sign	:1;
		unsigned int	junk	:16;
	} bits;
};

#define	mask_nbit_l(u)	((u).bits.manh &= 0x7fffffff)

#define	LDBL_MANH_SIZE	32
#define	LDBL_MANL_SIZE	32

#define	LDBL_TO_ARRAY32(u, a) do {			\
	(a)[0] = (uint32_t)(u).bits.manl;		\
	(a)[1] = (uint32_t)(u).bits.manh;		\
} while(0)
#elif defined(__arm__)

union IEEEl2bits {
    long double     e;
    struct {
#ifndef __ARMEB__
	unsigned int    manl    :32;
	unsigned int    manh    :20;
	unsigned int    exp     :11;
	unsigned int    sign    :1;
#else
	unsigned int            sign    :1;
	unsigned int            exp     :11;
	unsigned int            manh    :20;
	unsigned int            manl    :32;
#endif
    } bits;
};

#define LDBL_NBIT       0
#define mask_nbit_l(u)  ((void)0)

#define LDBL_MANH_SIZE  20
#define LDBL_MANL_SIZE  32

#define LDBL_TO_ARRAY32(u, a) do {                      \
        (a)[0] = (uint32_t)(u).bits.manl;               \
        (a)[1] = (uint32_t)(u).bits.manh;               \
} while(0)

#else
#error unsupported architecture
#endif
Commit	Line	Data
e9ce8d39	1	/*
34e8f829	2	* Copyright (c) 2003, 2008 Apple Inc. All rights reserved.
e9ce8d39 A	3	*
	4	* @APPLE_LICENSE_HEADER_START@
	5	*
734aad71 A	6	* This file contains Original Code and/or Modifications of Original Code
	7	* as defined in and that are subject to the Apple Public Source License
	8	* Version 2.0 (the 'License'). You may not use this file except in
	9	* compliance with the License. Please obtain a copy of the License at
	10	* http://www.opensource.apple.com/apsl/ and read it before using this
	11	* file.
	12	*
	13	* The Original Code and all software distributed under the License are
	14	* distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
e9ce8d39 A	15	* EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
e9ce8d39 A	16	* INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
734aad71 A	17	* FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
	18	* Please see the License for the specific language governing rights and
	19	* limitations under the License.
e9ce8d39 A	20	*
	21	* @APPLE_LICENSE_HEADER_END@
	22	*/
9385eb3d A	23	/*-
	24	* Copyright (c) 2002, 2003 David Schultz <dschultz@uclink.Berkeley.EDU>
	25	* All rights reserved.
e9ce8d39 A	26	*
	27	* Redistribution and use in source and binary forms, with or without
	28	* modification, are permitted provided that the following conditions
	29	* are met:
	30	* 1. Redistributions of source code must retain the above copyright
	31	* notice, this list of conditions and the following disclaimer.
	32	* 2. Redistributions in binary form must reproduce the above copyright
	33	* notice, this list of conditions and the following disclaimer in the
	34	* documentation and/or other materials provided with the distribution.
e9ce8d39	35	*
9385eb3d	36	* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
e9ce8d39 A	37	* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
e9ce8d39 A	38	* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
9385eb3d	39	* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
e9ce8d39 A	40	* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
	41	* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
	42	* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
	43	* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
	44	* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
	45	* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
	46	* SUCH DAMAGE.
9385eb3d	47	*
59e0d9fe	48	* $FreeBSD: src/lib/libc/i386/_fpmath.h,v 1.3 2004/01/18 07:57:01 das Exp $
e9ce8d39 A	49	*/
e9ce8d39 A	50
3d9156a7 A	51	#if defined(__ppc__) \|\| defined(__ppc64__)
	52
	53	union IEEEl2bits {
	54	long double e;
	55	double d[2];
	56	struct {
	57	unsigned long long sign :1;
	58	unsigned long long exp :11;
	59	unsigned long long manh :52;
	60	unsigned long long sign2 :1;
	61	unsigned long long exp2 :11;
	62	unsigned long long manl :52;
	63	} bits;
	64	};
	65
	66	#define mask_nbit_l(u) ((void)0)
	67	#define LDBL_IMPLICIT_NBIT
	68
	69	#define LDBL_MANH_SIZE 52
	70	#define LDBL_MANL_SIZE 53 // includes hidden bit
	71
	72	#define LDBL_HEAD_TAIL_PAIR
	73
34e8f829	74	__private_extern__ int _ldbl2array32dd(union IEEEl2bits, uint32_t *);
3d9156a7 A	75
	76	#define LDBL_TO_ARRAY32(u, a) _ldbl2array32dd(u, a)
	77
8e029c65	78	#elif defined(__i386__) \|\| defined(__x86_64__)
3d9156a7	79
9385eb3d A	80	union IEEEl2bits {
	81	long double e;
	82	struct {
	83	unsigned int manl :32;
	84	unsigned int manh :32;
	85	unsigned int exp :15;
	86	unsigned int sign :1;
	87	unsigned int junk :16;
	88	} bits;
	89	};
e9ce8d39	90
9385eb3d	91	#define mask_nbit_l(u) ((u).bits.manh &= 0x7fffffff)
e9ce8d39	92
59e0d9fe A	93	#define LDBL_MANH_SIZE 32
	94	#define LDBL_MANL_SIZE 32
	95
9385eb3d A	96	#define LDBL_TO_ARRAY32(u, a) do { \
	97	(a)[0] = (uint32_t)(u).bits.manl; \
	98	(a)[1] = (uint32_t)(u).bits.manh; \
	99	} while(0)
b5d655f7 A	100	#elif defined(__arm__)
	101
	102	union IEEEl2bits {
	103	long double e;
	104	struct {
	105	#ifndef __ARMEB__
	106	unsigned int manl :32;
	107	unsigned int manh :20;
	108	unsigned int exp :11;
	109	unsigned int sign :1;
	110	#else
	111	unsigned int sign :1;
	112	unsigned int exp :11;
	113	unsigned int manh :20;
	114	unsigned int manl :32;
	115	#endif
	116	} bits;
	117	};
	118
	119	#define LDBL_NBIT 0
	120	#define mask_nbit_l(u) ((void)0)
	121
	122	#define LDBL_MANH_SIZE 20
	123	#define LDBL_MANL_SIZE 32
	124
	125	#define LDBL_TO_ARRAY32(u, a) do { \
	126	(a)[0] = (uint32_t)(u).bits.manl; \
	127	(a)[1] = (uint32_t)(u).bits.manh; \
	128	} while(0)
3d9156a7 A	129
	130	#else
	131	#error unsupported architecture
	132	#endif