xref: /openbsd-src/lib/libc/arch/sh/gen/flt_rounds.c (revision 29cc2a2d1d99869c4cfa9c708e043103e2d7d805)

/*	$OpenBSD: flt_rounds.c,v 1.6 2016/07/26 19:07:09 guenther Exp $	*/
/*
 * Copyright (c) 2006 Miodrag Vallat.
 *
 * Permission to use, copy, modify, and distribute this software for any
 * purpose with or without fee is hereby granted, provided that the above
 * copyright notice, this permission notice, and the disclaimer below
 * appear in all copies.
 *
 * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
 * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
 * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
 * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
 * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
 * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
 * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
 */

#include <sys/types.h>
#include <float.h>
#include <ieeefp.h>

static const int rndmap[] = {
	1,	/* round to nearest */
	0,	/* round to zero */
	2,	/* round to positive infinity */
	3	/* round to negative infinity */
};

int
__flt_rounds()
{
#if !defined(SOFTFLOAT)
	register_t fpscr;

	__asm__ volatile ("sts fpscr, %0" : "=r" (fpscr));
	return rndmap[fpscr & 0x03];
#else
	return rndmap[fpgetround()];
#endif
}
DEF_STRONG(__flt_rounds);