xref: /freebsd/lib/libc/quad/fixdfdi.c (revision fbbd9655e5107c68e4e0146ff22b73d7350475bc)
158f0484fSRodney W. Grimes /*-
258f0484fSRodney W. Grimes  * Copyright (c) 1992, 1993
358f0484fSRodney W. Grimes  *	The Regents of the University of California.  All rights reserved.
458f0484fSRodney W. Grimes  *
558f0484fSRodney W. Grimes  * This software was developed by the Computer Systems Engineering group
658f0484fSRodney W. Grimes  * at Lawrence Berkeley Laboratory under DARPA contract BG 91-66 and
758f0484fSRodney W. Grimes  * contributed to Berkeley.
858f0484fSRodney W. Grimes  *
958f0484fSRodney W. Grimes  * Redistribution and use in source and binary forms, with or without
1058f0484fSRodney W. Grimes  * modification, are permitted provided that the following conditions
1158f0484fSRodney W. Grimes  * are met:
1258f0484fSRodney W. Grimes  * 1. Redistributions of source code must retain the above copyright
1358f0484fSRodney W. Grimes  *    notice, this list of conditions and the following disclaimer.
1458f0484fSRodney W. Grimes  * 2. Redistributions in binary form must reproduce the above copyright
1558f0484fSRodney W. Grimes  *    notice, this list of conditions and the following disclaimer in the
1658f0484fSRodney W. Grimes  *    documentation and/or other materials provided with the distribution.
17*fbbd9655SWarner Losh  * 3. Neither the name of the University nor the names of its contributors
1858f0484fSRodney W. Grimes  *    may be used to endorse or promote products derived from this software
1958f0484fSRodney W. Grimes  *    without specific prior written permission.
2058f0484fSRodney W. Grimes  *
2158f0484fSRodney W. Grimes  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
2258f0484fSRodney W. Grimes  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
2358f0484fSRodney W. Grimes  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
2458f0484fSRodney W. Grimes  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
2558f0484fSRodney W. Grimes  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
2658f0484fSRodney W. Grimes  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
2758f0484fSRodney W. Grimes  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
2858f0484fSRodney W. Grimes  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
2958f0484fSRodney W. Grimes  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
3058f0484fSRodney W. Grimes  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
3158f0484fSRodney W. Grimes  * SUCH DAMAGE.
3258f0484fSRodney W. Grimes  */
3358f0484fSRodney W. Grimes 
3458f0484fSRodney W. Grimes #if defined(LIBC_SCCS) && !defined(lint)
3558f0484fSRodney W. Grimes static char sccsid[] = "@(#)fixdfdi.c	8.1 (Berkeley) 6/4/93";
3658f0484fSRodney W. Grimes #endif /* LIBC_SCCS and not lint */
37333fc21eSDavid E. O'Brien #include <sys/cdefs.h>
38333fc21eSDavid E. O'Brien __FBSDID("$FreeBSD$");
3958f0484fSRodney W. Grimes 
4058f0484fSRodney W. Grimes #include "quad.h"
4158f0484fSRodney W. Grimes 
4258f0484fSRodney W. Grimes /*
4358f0484fSRodney W. Grimes  * Convert double to (signed) quad.
4458f0484fSRodney W. Grimes  * We clamp anything that is out of range.
4558f0484fSRodney W. Grimes  */
4658f0484fSRodney W. Grimes quad_t
4758f0484fSRodney W. Grimes __fixdfdi(x)
4858f0484fSRodney W. Grimes 	double x;
4958f0484fSRodney W. Grimes {
5058f0484fSRodney W. Grimes 	if (x < 0)
5158f0484fSRodney W. Grimes 		if (x <= QUAD_MIN)
5258f0484fSRodney W. Grimes 			return (QUAD_MIN);
5358f0484fSRodney W. Grimes 		else
5458f0484fSRodney W. Grimes 			return ((quad_t)-(u_quad_t)-x);
5558f0484fSRodney W. Grimes 	else
5658f0484fSRodney W. Grimes 		if (x >= QUAD_MAX)
5758f0484fSRodney W. Grimes 			return (QUAD_MAX);
5858f0484fSRodney W. Grimes 		else
5958f0484fSRodney W. Grimes 			return ((quad_t)(u_quad_t)x);
6058f0484fSRodney W. Grimes }
61