2N/A/*
2N/A * CDDL HEADER START
2N/A *
2N/A * The contents of this file are subject to the terms of the
2N/A * Common Development and Distribution License, Version 1.0 only
2N/A * (the "License"). You may not use this file except in compliance
2N/A * with the License.
2N/A *
2N/A * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
2N/A * or http://www.opensolaris.org/os/licensing.
2N/A * See the License for the specific language governing permissions
2N/A * and limitations under the License.
2N/A *
2N/A * When distributing Covered Code, include this CDDL HEADER in each
2N/A * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
2N/A * If applicable, add the following below this CDDL HEADER, with the
2N/A * fields enclosed by brackets "[]" replaced with your own identifying
2N/A * information: Portions Copyright [yyyy] [name of copyright owner]
2N/A *
2N/A * CDDL HEADER END
2N/A */
2N/A/*
2N/A * Copyright 1997 Sun Microsystems, Inc. All rights reserved.
2N/A * Use is subject to license terms.
2N/A */
2N/A
2N/A/* Copyright (c) 1988 AT&T */
2N/A/* All Rights Reserved */
2N/A
2N/A/*
2N/A * University Copyright- Copyright (c) 1982, 1986, 1988
2N/A * The Regents of the University of California
2N/A * All Rights Reserved
2N/A *
2N/A * University Acknowledgment- Portions of this document are derived from
2N/A * software developed by the University of California, Berkeley, and its
2N/A * contributors.
2N/A */
2N/A
2N/A#pragma ident "%Z%%M% %I% %E% SMI"
2N/A
2N/A/*LINTLIBRARY*/
2N/A
2N/A#include <unistd.h>
2N/A#include <sys/types.h>
2N/A#include "curses_inc.h"
2N/A
2N/A/*
2N/A * Code for various kinds of delays. Most of this is nonportable and
2N/A * requires various enhancements to the operating system, so it won't
2N/A * work on all systems. It is included in curses to provide a portable
2N/A * interface, and so curses itself can use it for function keys.
2N/A */
2N/A
2N/A#define NAPINTERVAL 100
2N/A/*
2N/A * Wait until the output has drained enough that it will only take
2N/A * ms more milliseconds to drain completely.
2N/A * Needs Berkeley TIOCOUTQ ioctl. Returns ERR if impossible.
2N/A */
2N/A
2N/Aint
2N/Adraino(int ms)
2N/A{
2N/A#ifdef TIOCOUTQ
2N/A#define _DRAINO
2N/A /* number of chars = that many ms */
2N/A long ncneeded;
2N/A
2N/A /* 10 bits/char, 1000 ms/sec, baudrate in bits/sec */
2N/A ncneeded = SP->baud * ms / (10 * 1000);
2N/A /*CONSTCOND*/
2N/A while (TRUE) {
2N/A int rv; /* ioctl return value */
2N/A int ncthere = 0; /* number of chars actually in */
2N/A /* output queue */
2N/A
2N/A rv = ioctl(cur_term->Filedes, TIOCOUTQ, &ncthere);
2N/A#ifdef DEBUG
2N/A if (outf)
2N/A fprintf(outf, "draino: rv %d, ncneeded %d, "
2N/A "ncthere %d\n", rv, ncneeded, ncthere);
2N/A#endif /* DEBUG */
2N/A if (rv < 0)
2N/A return (ERR); /* ioctl didn't work */
2N/A if (ncthere <= ncneeded)
2N/A return (OK);
2N/A (void) napms(NAPINTERVAL);
2N/A }
2N/A#else /* TIOCOUTQ */
2N/A
2N/A#ifdef TCSETAW
2N/A#define _DRAINO
2N/A /*
2N/A * SYSV simulation - waits until the entire queue is empty,
2N/A * then sets the state to what it already is (e.g. no-op).
2N/A * Unfortunately this only works if ms is zero.
2N/A */
2N/A if (ms <= 0) {
2N/A#ifdef SYSV
2N/A if (prog_istermios < 0) {
2N/A int i;
2N/A
2N/A PROGTTY.c_lflag = PROGTTYS.c_lflag;
2N/A PROGTTY.c_oflag = PROGTTYS.c_oflag;
2N/A PROGTTY.c_iflag = PROGTTYS.c_iflag;
2N/A PROGTTY.c_cflag = PROGTTYS.c_cflag;
2N/A for (i = 0; i < NCC; i++)
2N/A PROGTTY.c_cc[i] = PROGTTYS.c_cc[i];
2N/A (void) ioctl(cur_term->Filedes, TCSETAW, &PROGTTY);
2N/A } else
2N/A (void) ioctl(cur_term->Filedes, TCSETSW, &PROGTTYS);
2N/A#else /* SYSV */
2N/A (void) ioctl(cur_term->Filedes, TCSETAW, &PROGTTY);
2N/A#endif /* SYSV */
2N/A return (OK);
2N/A } else
2N/A return (ERR);
2N/A#endif /* TCSETAW */
2N/A#endif /* TIOCOUTQ */
2N/A
2N/A#ifndef _DRAINO
2N/A /*
2N/A * No way to fake it, so we return failure.
2N/A * Used #else to avoid warning from compiler about unreached stmt
2N/A */
2N/A return (ERR);
2N/A#endif /* _DRAINO */
2N/A/*NOTREACHED*/
2N/A}