1*0Sstevel@tonic-gate /* 2*0Sstevel@tonic-gate * CDDL HEADER START 3*0Sstevel@tonic-gate * 4*0Sstevel@tonic-gate * The contents of this file are subject to the terms of the 5*0Sstevel@tonic-gate * Common Development and Distribution License, Version 1.0 only 6*0Sstevel@tonic-gate * (the "License"). You may not use this file except in compliance 7*0Sstevel@tonic-gate * with the License. 8*0Sstevel@tonic-gate * 9*0Sstevel@tonic-gate * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE 10*0Sstevel@tonic-gate * or http://www.opensolaris.org/os/licensing. 11*0Sstevel@tonic-gate * See the License for the specific language governing permissions 12*0Sstevel@tonic-gate * and limitations under the License. 13*0Sstevel@tonic-gate * 14*0Sstevel@tonic-gate * When distributing Covered Code, include this CDDL HEADER in each 15*0Sstevel@tonic-gate * file and include the License file at usr/src/OPENSOLARIS.LICENSE. 16*0Sstevel@tonic-gate * If applicable, add the following below this CDDL HEADER, with the 17*0Sstevel@tonic-gate * fields enclosed by brackets "[]" replaced with your own identifying 18*0Sstevel@tonic-gate * information: Portions Copyright [yyyy] [name of copyright owner] 19*0Sstevel@tonic-gate * 20*0Sstevel@tonic-gate * CDDL HEADER END 21*0Sstevel@tonic-gate */ 22*0Sstevel@tonic-gate /* 23*0Sstevel@tonic-gate * Copyright 1997 Sun Microsystems, Inc. All rights reserved. 24*0Sstevel@tonic-gate * Use is subject to license terms. 25*0Sstevel@tonic-gate */ 26*0Sstevel@tonic-gate 27*0Sstevel@tonic-gate /* Copyright (c) 1988 AT&T */ 28*0Sstevel@tonic-gate /* All Rights Reserved */ 29*0Sstevel@tonic-gate 30*0Sstevel@tonic-gate /* 31*0Sstevel@tonic-gate * University Copyright- Copyright (c) 1982, 1986, 1988 32*0Sstevel@tonic-gate * The Regents of the University of California 33*0Sstevel@tonic-gate * All Rights Reserved 34*0Sstevel@tonic-gate * 35*0Sstevel@tonic-gate * University Acknowledgment- Portions of this document are derived from 36*0Sstevel@tonic-gate * software developed by the University of California, Berkeley, and its 37*0Sstevel@tonic-gate * contributors. 38*0Sstevel@tonic-gate */ 39*0Sstevel@tonic-gate 40*0Sstevel@tonic-gate #pragma ident "%Z%%M% %I% %E% SMI" 41*0Sstevel@tonic-gate 42*0Sstevel@tonic-gate /*LINTLIBRARY*/ 43*0Sstevel@tonic-gate 44*0Sstevel@tonic-gate #include <sys/types.h> 45*0Sstevel@tonic-gate #include "curses_inc.h" 46*0Sstevel@tonic-gate 47*0Sstevel@tonic-gate /* 48*0Sstevel@tonic-gate * The following array gives the number of tens of milliseconds per 49*0Sstevel@tonic-gate * character for each speed as returned by gtty. Thus since 300 50*0Sstevel@tonic-gate * baud returns a 7, there are 33.3 milliseconds per char at 300 baud. 51*0Sstevel@tonic-gate */ 52*0Sstevel@tonic-gate static short tmspc10[] = 53*0Sstevel@tonic-gate { 54*0Sstevel@tonic-gate /* 0 50 75 110 134.5 150 200 300 baud */ 55*0Sstevel@tonic-gate 0, 2000, 1333, 909, 743, 666, 500, 333, 56*0Sstevel@tonic-gate /* 600 1200 1800 2400 4800 9600 19200 38400 baud */ 57*0Sstevel@tonic-gate 166, 83, 55, 41, 20, 10, 5, 2, 58*0Sstevel@tonic-gate /* 57600, 76800, 115200, 153600, 230400 307200 baud */ 59*0Sstevel@tonic-gate 2, 1, 1, 1, 1, 1, 60*0Sstevel@tonic-gate /* 460800 baud */ 61*0Sstevel@tonic-gate 1 62*0Sstevel@tonic-gate }; 63*0Sstevel@tonic-gate 64*0Sstevel@tonic-gate /* 65*0Sstevel@tonic-gate * Insert a delay into the output stream for "delay/10" milliseconds. 66*0Sstevel@tonic-gate * Round up by a half a character frame, and then do the delay. 67*0Sstevel@tonic-gate * Too bad there are no user program accessible programmed delays. 68*0Sstevel@tonic-gate * Transmitting pad characters slows many terminals down and also 69*0Sstevel@tonic-gate * loads the system. 70*0Sstevel@tonic-gate */ 71*0Sstevel@tonic-gate 72*0Sstevel@tonic-gate int 73*0Sstevel@tonic-gate _delay(int delay, int (*outc)(char)) 74*0Sstevel@tonic-gate { 75*0Sstevel@tonic-gate int mspc10; 76*0Sstevel@tonic-gate char pc; 77*0Sstevel@tonic-gate int outspeed; 78*0Sstevel@tonic-gate 79*0Sstevel@tonic-gate /* if there is no pad character, then just return */ 80*0Sstevel@tonic-gate if (no_pad_char) 81*0Sstevel@tonic-gate goto good; 82*0Sstevel@tonic-gate 83*0Sstevel@tonic-gate #ifdef SYSV 84*0Sstevel@tonic-gate outspeed = _BRS(PROGTTYS); 85*0Sstevel@tonic-gate #else /* SYSV */ 86*0Sstevel@tonic-gate outspeed = _BR(PROGTTY); 87*0Sstevel@tonic-gate #endif /* SYSV */ 88*0Sstevel@tonic-gate if (outspeed <= 0 || outspeed >= 89*0Sstevel@tonic-gate (sizeof (tmspc10) / sizeof (tmspc10[0]))) 90*0Sstevel@tonic-gate return (ERR); 91*0Sstevel@tonic-gate 92*0Sstevel@tonic-gate mspc10 = tmspc10[outspeed]; 93*0Sstevel@tonic-gate delay += mspc10 / 2; 94*0Sstevel@tonic-gate if (pad_char) 95*0Sstevel@tonic-gate pc = *pad_char; 96*0Sstevel@tonic-gate else 97*0Sstevel@tonic-gate pc = 0; 98*0Sstevel@tonic-gate for (delay /= mspc10; delay-- > 0; ) 99*0Sstevel@tonic-gate (*outc)(pc); 100*0Sstevel@tonic-gate good: 101*0Sstevel@tonic-gate return (OK); 102*0Sstevel@tonic-gate } 103