Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Posting-Version: version B 2.10.1 6/24/83; site burl.UUCP
Path: utzoo!watmath!clyde!burl!rcj
From: rcj@burl.UUCP (R. Curtis Jackson)
Newsgroups: net.sources
Subject: public domain dup2() should work on most Unix systems
Message-ID: <551@burl.UUCP>
Date: Tue, 9-Oct-84 19:50:22 EDT
Article-I.D.: burl.551
Posted: Tue Oct  9 19:50:22 1984
Date-Received: Wed, 10-Oct-84 05:12:42 EDT
Organization: AT&T Technologies; Burlington, NC
Lines: 41

/*
 * Public domain dup2() lookalike
 * by Curtis Jackson @ AT&T Technologies, Burlington, NC
 * electronic address:  burl!rcj
 *
 * dup2 performs the following functions:
 *
 * Check to make sure that fd1 is a valid open file descriptor.
 * Check to see if fd2 is already open; if so, close it.
 * Duplicate fd1 onto fd2; checking to make sure fd2 is a valid fd.
 * Return fd2 if all went well; return BADEXIT otherwise.
 */

# define BADEXIT -1

# include 

extern int errno;

dup2(fd1, fd2)
int fd1, fd2;
{
	if (fcntl(fd1,F_GETFL) < 0)
	{
		return(BADEXIT);
	}
	if (fcntl(fd2,F_GETFL) >= 0)
	{
		close(fd2);
	}
	if (fcntl(fd1,F_DUPFD,fd2) < 0)
	{
		return(BADEXIT);
	}
	return(fd2);
}

-- 
The MAD Programmer -- 919-228-3313 (Cornet 291)
alias: Curtis Jackson	...![ ihnp4 ulysses cbosgd mgnetp ]!burl!rcj
			...![ ihnp4 cbosgd akgua masscomp ]!clyde!rcj