vsin_.c revision 25c28e83beb90e7c80452a7c818c5e6f73a07dc8
6301N/A/*
6301N/A * CDDL HEADER START
6301N/A *
6330N/A * The contents of this file are subject to the terms of the
6301N/A * Common Development and Distribution License (the "License").
6301N/A * You may not use this file except in compliance with the License.
6301N/A *
6330N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
6330N/A * or http://www.opensolaris.org/os/licensing.
6330N/A * See the License for the specific language governing permissions
6330N/A * and limitations under the License.
6330N/A *
6330N/A * When distributing Covered Code, include this CDDL HEADER in each
6330N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
6330N/A * If applicable, add the following below this CDDL HEADER, with the
6330N/A * fields enclosed by brackets "[]" replaced with your own identifying
6330N/A * information: Portions Copyright [yyyy] [name of copyright owner]
6330N/A *
6330N/A * CDDL HEADER END
6330N/A */
6330N/A
6330N/A/*
6330N/A * Copyright 2011 Nexenta Systems, Inc. All rights reserved.
6330N/A */
6330N/A/*
6330N/A * Copyright 2006 Sun Microsystems, Inc. All rights reserved.
* Use is subject to license terms.
*/
extern void __vsin(int, double *, int, double *, int);
#if !defined(LIBMVEC_SO_BUILD)
#if defined(ARCH_v8plusa) || defined(ARCH_v8plusb) || defined(ARCH_v9a) || defined(ARCH_v9b)
#define CHECK_ULTRA3
#endif
#endif /* !defined(LIBMVEC_SO_BUILD) */
#ifdef CHECK_ULTRA3
#include <strings.h>
#define sysinfo _sysinfo
#include <sys/systeminfo.h>
#define BUFLEN 257
static int use_ultra3 = 0;
extern void __vsin_ultra3(int, double *, int, double *, int);
#endif
#pragma weak vsin_ = __vsin_
/* just invoke the serial function */
void
__vsin_(int *n, double *x, int *stridex, double *y, int *stridey)
{
#ifdef CHECK_ULTRA3
int u;
char buf[BUFLEN];
u = use_ultra3;
if (!u) {
/* use __vsin_ultra3 on Cheetah (and ???) */
if (sysinfo(SI_ISALIST, buf, BUFLEN) > 0 && !strncmp(buf, "sparcv9+vis2", 12))
u = 3;
else
u = 1;
use_ultra3 = u;
}
if (u & 2)
__vsin_ultra3(*n, x, *stridex, y, *stridey);
else
#endif
__vsin(*n, x, *stridex, y, *stridey);
}