lib_baudrate.c revision 305547
1/**************************************************************************** 2 * Copyright (c) 1998-2010,2013 Free Software Foundation, Inc. * 3 * * 4 * Permission is hereby granted, free of charge, to any person obtaining a * 5 * copy of this software and associated documentation files (the * 6 * "Software"), to deal in the Software without restriction, including * 7 * without limitation the rights to use, copy, modify, merge, publish, * 8 * distribute, distribute with modifications, sublicense, and/or sell * 9 * copies of the Software, and to permit persons to whom the Software is * 10 * furnished to do so, subject to the following conditions: * 11 * * 12 * The above copyright notice and this permission notice shall be included * 13 * in all copies or substantial portions of the Software. * 14 * * 15 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS * 16 * OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF * 17 * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. * 18 * IN NO EVENT SHALL THE ABOVE COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, * 19 * DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR * 20 * OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE SOFTWARE OR * 21 * THE USE OR OTHER DEALINGS IN THE SOFTWARE. * 22 * * 23 * Except as contained in this notice, the name(s) of the above copyright * 24 * holders shall not be used in advertising or otherwise to promote the * 25 * sale, use or other dealings in this Software without prior written * 26 * authorization. * 27 ****************************************************************************/ 28 29/**************************************************************************** 30 * Author: Zeyd M. Ben-Halim <zmbenhal@netcom.com> 1992,1995 * 31 * and: Eric S. Raymond <esr@snark.thyrsus.com> * 32 * and: Thomas E. Dickey 1996-on * 33 ****************************************************************************/ 34 35/* 36 * lib_baudrate.c 37 * 38 */ 39 40#include <curses.priv.h> 41#include <termcap.h> /* ospeed */ 42#if defined(__FreeBSD__) 43#include <sys/param.h> 44#endif 45 46/* 47 * These systems use similar header files, which define B1200 as 1200, etc., 48 * but can be overridden by defining USE_OLD_TTY so B1200 is 9, which makes all 49 * of the indices up to B115200 fit nicely in a 'short', allowing us to retain 50 * ospeed's type for compatibility. 51 */ 52#if NCURSES_OSPEED_COMPAT && ((defined(__FreeBSD__) && (__FreeBSD_version < 700000)) || defined(__NetBSD__) || defined(__OpenBSD__)) 53#undef B0 54#undef B50 55#undef B75 56#undef B110 57#undef B134 58#undef B150 59#undef B200 60#undef B300 61#undef B600 62#undef B1200 63#undef B1800 64#undef B2400 65#undef B4800 66#undef B9600 67#undef B19200 68#undef EXTA 69#undef B38400 70#undef EXTB 71#undef B57600 72#undef B115200 73#undef B230400 74#undef B460800 75#undef B921600 76#define USE_OLD_TTY 77#include <sys/ttydev.h> 78#else 79#undef USE_OLD_TTY 80#endif /* USE_OLD_TTY */ 81 82MODULE_ID("$Id: lib_baudrate.c,v 1.34 2013/12/15 01:29:02 tom Exp $") 83 84/* 85 * int 86 * baudrate() 87 * 88 * Returns the current terminal's baud rate. 89 * 90 */ 91 92struct speed { 93 NCURSES_OSPEED s; /* values for 'ospeed' */ 94 int sp; /* the actual speed */ 95}; 96 97#define DATA(number) { (NCURSES_OSPEED)B##number, number } 98 99static struct speed const speeds[] = 100{ 101 DATA(0), 102 DATA(50), 103 DATA(75), 104 DATA(110), 105 DATA(134), 106 DATA(150), 107 DATA(200), 108 DATA(300), 109 DATA(600), 110 DATA(1200), 111 DATA(1800), 112 DATA(2400), 113 DATA(4800), 114 DATA(9600), 115#ifdef B19200 116 DATA(19200), 117#elif defined(EXTA) 118 {EXTA, 19200}, 119#endif 120#ifdef B38400 121 DATA(38400), 122#elif defined(EXTB) 123 {EXTB, 38400}, 124#endif 125#ifdef B57600 126 DATA(57600), 127#endif 128 /* ifdef to prevent overflow when OLD_TTY is not available */ 129#if !(NCURSES_OSPEED_COMPAT && defined(__FreeBSD__) && (__FreeBSD_version > 700000)) 130#ifdef B115200 131 DATA(115200), 132#endif 133#ifdef B230400 134 DATA(230400), 135#endif 136#ifdef B460800 137 DATA(460800), 138#endif 139#ifdef B921600 140 DATA(921600), 141#endif 142#endif 143}; 144 145NCURSES_EXPORT(int) 146_nc_baudrate(int OSpeed) 147{ 148#if !USE_REENTRANT 149 static int last_OSpeed; 150 static int last_baudrate; 151#endif 152 153 int result = ERR; 154 unsigned i; 155 156#if !USE_REENTRANT 157 if (OSpeed == last_OSpeed) { 158 result = last_baudrate; 159 } 160#endif 161 if (result == ERR) { 162 if (OSpeed >= 0) { 163 for (i = 0; i < SIZEOF(speeds); i++) { 164 if (speeds[i].s == OSpeed) { 165 result = speeds[i].sp; 166 break; 167 } 168 } 169 } 170#if !USE_REENTRANT 171 if (OSpeed != last_OSpeed) { 172 last_OSpeed = OSpeed; 173 last_baudrate = result; 174 } 175#endif 176 } 177 return (result); 178} 179 180NCURSES_EXPORT(int) 181_nc_ospeed(int BaudRate) 182{ 183 int result = 1; 184 unsigned i; 185 186 if (BaudRate >= 0) { 187 for (i = 0; i < SIZEOF(speeds); i++) { 188 if (speeds[i].sp == BaudRate) { 189 result = speeds[i].s; 190 break; 191 } 192 } 193 } 194 return (result); 195} 196 197NCURSES_EXPORT(int) 198NCURSES_SP_NAME(baudrate) (NCURSES_SP_DCL0) 199{ 200 int result; 201 202 T((T_CALLED("baudrate(%p)"), (void *) SP_PARM)); 203 204 /* 205 * In debugging, allow the environment symbol to override when we're 206 * redirecting to a file, so we can construct repeatable test-cases 207 * that take into account costs that depend on baudrate. 208 */ 209#ifdef TRACE 210 if (IsValidTIScreen(SP_PARM) 211 && !isatty(fileno(SP_PARM ? SP_PARM->_ofp : stdout)) 212 && getenv("BAUDRATE") != 0) { 213 int ret; 214 if ((ret = _nc_getenv_num("BAUDRATE")) <= 0) 215 ret = 9600; 216 ospeed = (NCURSES_OSPEED) _nc_ospeed(ret); 217 returnCode(ret); 218 } 219#endif 220 221 if (IsValidTIScreen(SP_PARM)) { 222#ifdef USE_OLD_TTY 223 result = (int) cfgetospeed(&(TerminalOf(SP_PARM)->Nttyb)); 224 ospeed = (NCURSES_OSPEED) _nc_ospeed(result); 225#else /* !USE_OLD_TTY */ 226#ifdef TERMIOS 227 ospeed = (NCURSES_OSPEED) cfgetospeed(&(TerminalOf(SP_PARM)->Nttyb)); 228#else 229 ospeed = (NCURSES_OSPEED) TerminalOf(SP_PARM)->Nttyb.sg_ospeed; 230#endif 231 result = _nc_baudrate(ospeed); 232#endif 233 TerminalOf(SP_PARM)->_baudrate = result; 234 } else { 235 result = ERR; 236 } 237 238 returnCode(result); 239} 240 241#if NCURSES_SP_FUNCS 242NCURSES_EXPORT(int) 243baudrate(void) 244{ 245 return NCURSES_SP_NAME(baudrate) (CURRENT_SCREEN); 246} 247#endif 248