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