/*
 * 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) 1988 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.
 */

/*LINTLIBRARY*/

#include        <unistd.h>
#include        <sys/types.h>
#include        "curses_inc.h"
#ifdef SYSV
#include        <fcntl.h>
#endif /* SYSV */

/*
 * Set the file descriptor for typeahead checks to fd.  fd can be -1
 * to disable the checking.
 */

int
typeahead(int fd)
{
#ifdef  SYSV
        /*
         * Doing fcntls before and after each typeahead check
         * read is a serious problem on the 3b2. Profiling
         * results indicated that a simple program(edit.c from
         * "The New Curses and Terminfo Package") was spending
         * 9.2% of the time in fcntl().
         */

        int     savefd = cur_term->_check_fd;

        /* Close the previous duped file descriptor. */
        if (savefd >= 0)
                (void) close(savefd);

        /*
         * Duplicate the file descriptor so we have one to play with.
         * We cannot use dup(2), unfortunately, so we do typeahead checking
         * on terminals only. Besides, if typeahead is done when input is
         * coming from a file, nothing would EVER get drawn on the screen!
         */

        /* MODIFIED: DRS 3/26/89 */

        /*
         * a couple of notes by DRS:  first, a new file descriptor is
         * required, since O_NDELAY must be set.  calling fcntl() or dup()
         * would provide a new file descriptor, but NOT a new file pointer
         * for the open file (by file pointer, i mean a unix kernal file
         * ptr).  if a new underlying unix file ptr. is not allocated,
         * setting O_NDELAY will cause all normal terminal i/o to return
         * prematurely without blocking.
         *
         * second, the call to ttyname is NOT necessary, /dev/tty can be
         * used instead.  calling ttyname is quite expensive -- especially
         * for large /dev directories.
         *
         * note also that the code for the '#else' clause will not work
         * since the new file descriptor MUST have O_NDELAY set for the
         * rest of libcurses code to function properly.
         *
         * 4/24/89:  modified to set the close on exec() flag of the newly
         *              opened file descriptor
         */

        /*
         *      cur_term->_check_fd = (tty = ttyname(fd)) ?
         *          open(tty, O_RDONLY | O_NDELAY) : -1;
         */
        if (isatty(fd)) {
                if ((cur_term->_check_fd = open("/dev/tty", O_RDONLY |
                    O_NDELAY)) >= 0)
                        (void) fcntl(cur_term->_check_fd, F_SETFD, 1);
        } else
                cur_term->_check_fd = -1;

#else   /* SYSV */
        int savefd = cur_term->_check_fd;
        /* Only do typeahead checking if the input is a tty. */
        if (isatty(fd))
                cur_term->_check_fd = fd;
        else
                cur_term->_check_fd = -1;
#endif  /* SYSV */
        return (savefd);
}