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