/*
 * CDDL HEADER START
 *
 * The contents of this file are subject to the terms of the
 * Common Development and Distribution License, Version 1.0 only
 * (the "License").  You may not use this file except in compliance
 * with the License.
 *
 * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
 * or http://www.opensolaris.org/os/licensing.
 * See the License for the specific language governing permissions
 * and limitations under the License.
 *
 * When distributing Covered Code, include this CDDL HEADER in each
 * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
 * If applicable, add the following below this CDDL HEADER, with the
 * fields enclosed by brackets "[]" replaced with your own identifying
 * information: Portions Copyright [yyyy] [name of copyright owner]
 *
 * CDDL HEADER END
 */
/*
 * Copyright 1997 Sun Microsystems, Inc.  All rights reserved.
 * Use is subject to license terms.
 */

/*	Copyright (c) 1984, 1986, 1987, 1988, 1989 AT&T */
/*	  All Rights Reserved   */

/*
 * University Copyright- Copyright (c) 1982, 1986, 1988
 * The Regents of the University of California
 * All Rights Reserved
 *
 * University Acknowledgment- Portions of this document are derived from
 * software developed by the University of California, Berkeley, and its
 * contributors.
 */

#include <sys/types.h>
#include <sys/socket.h>
#include <sys/stropts.h>
#include <sys/stream.h>
#include <sys/socketvar.h>
#include <errno.h>
#include <unistd.h>
#include <stdlib.h>

extern int _socket_create(int, int, int, int);
extern int _so_socketpair(int *);

int _socketpair_create(int, int, int, int [2], int);

#pragma weak socketpair = _socketpair

int
_socketpair(int family, int type, int protocol, int sv[2])
{
	return (_socketpair_create(family, type, protocol, sv, SOV_DEFAULT));
}

/*
 * Used by the BCP library.
 */
int
_socketpair_bsd(int family, int type, int protocol, int sv[2])
{
	return (_socketpair_create(family, type, protocol, sv, SOV_SOCKBSD));
}

int
_socketpair_svr4(int family, int type, int protocol, int sv[2])
{
	return (_socketpair_create(family, type, protocol, sv, SOV_SOCKSTREAM));
}

int
__xnet_socketpair(int family, int type, int protocol, int sv[2])
{
	return (_socketpair_create(family, type, protocol, sv, SOV_XPG4_2));
}

int
_socketpair_create(int family, int type, int protocol, int sv[2], int version)
{
	int res;
	int fd1, fd2;

	/*
	 * Create the two sockets and pass them to _so_socketpair, which
	 * will connect them together.
	 */
	fd1 = _socket_create(family, type, protocol, version);
	if (fd1 < 0)
		return (-1);
	fd2 = _socket_create(family, type, protocol, version);
	if (fd2 < 0) {
		int error = errno;

		(void) close(fd1);
		errno = error;
		return (-1);
	}
	sv[0] = fd1;
	sv[1] = fd2;
	res = _so_socketpair(sv);
	if (res < 0) {
		int error = errno;

		(void) close(fd1);
		(void) close(fd2);
		errno = error;
		return (-1);
	}
	/*
	 * Check if kernel returned different fds in which case we close
	 * the original ones. This is the case for SOCK_STREAM where
	 * one of the original sockets is used as a listener and
	 * _so_socketpair passes out the newly accepted socket.
	 */
	if (sv[0] != fd1)
		(void) close(fd1);
	if (sv[1] != fd2)
		(void) close(fd2);
	return (res);
}