1/* 2 * Copyright (c) 1989, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * Redistribution and use in source and binary forms, with or without 6 * modification, are permitted provided that the following conditions 7 * are met: 8 * 1. Redistributions of source code must retain the above copyright 9 * notice, this list of conditions and the following disclaimer. 10 * 2. Redistributions in binary form must reproduce the above copyright 11 * notice, this list of conditions and the following disclaimer in the 12 * documentation and/or other materials provided with the distribution. 13 * 3. Neither the name of the University nor the names of its contributors 14 * may be used to endorse or promote products derived from this software 15 * without specific prior written permission. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 */ 29 30#if 0 31#ifndef lint 32static const char sccsid[] = "@(#)termstat.c 8.2 (Berkeley) 5/30/95"; 33#endif 34#endif 35#include <sys/cdefs.h> 36__FBSDID("$FreeBSD$"); 37 38#include "telnetd.h" 39 40#ifdef ENCRYPTION 41#include <libtelnet/encrypt.h> 42#endif 43 44/* 45 * local variables 46 */ 47int def_tspeed = -1, def_rspeed = -1; 48#ifdef TIOCSWINSZ 49int def_row = 0, def_col = 0; 50#endif 51#ifdef LINEMODE 52static int _terminit = 0; 53#endif /* LINEMODE */ 54 55#ifdef LINEMODE 56/* 57 * localstat 58 * 59 * This function handles all management of linemode. 60 * 61 * Linemode allows the client to do the local editing of data 62 * and send only complete lines to the server. Linemode state is 63 * based on the state of the pty driver. If the pty is set for 64 * external processing, then we can use linemode. Further, if we 65 * can use real linemode, then we can look at the edit control bits 66 * in the pty to determine what editing the client should do. 67 * 68 * Linemode support uses the following state flags to keep track of 69 * current and desired linemode state. 70 * alwayslinemode : true if -l was specified on the telnetd 71 * command line. It means to have linemode on as much as 72 * possible. 73 * 74 * lmodetype: signifies whether the client can 75 * handle real linemode, or if use of kludgeomatic linemode 76 * is preferred. It will be set to one of the following: 77 * REAL_LINEMODE : use linemode option 78 * NO_KLUDGE : don't initiate kludge linemode. 79 * KLUDGE_LINEMODE : use kludge linemode 80 * NO_LINEMODE : client is ignorant of linemode 81 * 82 * linemode, uselinemode : linemode is true if linemode 83 * is currently on, uselinemode is the state that we wish 84 * to be in. If another function wishes to turn linemode 85 * on or off, it sets or clears uselinemode. 86 * 87 * editmode, useeditmode : like linemode/uselinemode, but 88 * these contain the edit mode states (edit and trapsig). 89 * 90 * The state variables correspond to some of the state information 91 * in the pty. 92 * linemode: 93 * In real linemode, this corresponds to whether the pty 94 * expects external processing of incoming data. 95 * In kludge linemode, this more closely corresponds to the 96 * whether normal processing is on or not. (ICANON in 97 * system V, or COOKED mode in BSD.) 98 * If the -l option was specified (alwayslinemode), then 99 * an attempt is made to force external processing on at 100 * all times. 101 * 102 * The following heuristics are applied to determine linemode 103 * handling within the server. 104 * 1) Early on in starting up the server, an attempt is made 105 * to negotiate the linemode option. If this succeeds 106 * then lmodetype is set to REAL_LINEMODE and all linemode 107 * processing occurs in the context of the linemode option. 108 * 2) If the attempt to negotiate the linemode option failed, 109 * and the "-k" (don't initiate kludge linemode) isn't set, 110 * then we try to use kludge linemode. We test for this 111 * capability by sending "do Timing Mark". If a positive 112 * response comes back, then we assume that the client 113 * understands kludge linemode (ech!) and the 114 * lmodetype flag is set to KLUDGE_LINEMODE. 115 * 3) Otherwise, linemode is not supported at all and 116 * lmodetype remains set to NO_LINEMODE (which happens 117 * to be 0 for convenience). 118 * 4) At any time a command arrives that implies a higher 119 * state of linemode support in the client, we move to that 120 * linemode support. 121 * 122 * A short explanation of kludge linemode is in order here. 123 * 1) The heuristic to determine support for kludge linemode 124 * is to send a do timing mark. We assume that a client 125 * that supports timing marks also supports kludge linemode. 126 * A risky proposition at best. 127 * 2) Further negotiation of linemode is done by changing the 128 * the server's state regarding SGA. If server will SGA, 129 * then linemode is off, if server won't SGA, then linemode 130 * is on. 131 */ 132void 133localstat(void) 134{ 135 int need_will_echo = 0; 136 137 /* 138 * Check for changes to flow control if client supports it. 139 */ 140 flowstat(); 141 142 /* 143 * Check linemode on/off state 144 */ 145 uselinemode = tty_linemode(); 146 147 /* 148 * If alwayslinemode is on, and pty is changing to turn it off, then 149 * force linemode back on. 150 */ 151 if (alwayslinemode && linemode && !uselinemode) { 152 uselinemode = 1; 153 tty_setlinemode(uselinemode); 154 } 155 156 if (uselinemode) { 157 /* 158 * Check for state of BINARY options. 159 * 160 * We only need to do the binary dance if we are actually going 161 * to use linemode. As this confuses some telnet clients 162 * that don't support linemode, and doesn't gain us 163 * anything, we don't do it unless we're doing linemode. 164 * -Crh (henrich@msu.edu) 165 */ 166 167 if (tty_isbinaryin()) { 168 if (his_want_state_is_wont(TELOPT_BINARY)) 169 send_do(TELOPT_BINARY, 1); 170 } else { 171 if (his_want_state_is_will(TELOPT_BINARY)) 172 send_dont(TELOPT_BINARY, 1); 173 } 174 175 if (tty_isbinaryout()) { 176 if (my_want_state_is_wont(TELOPT_BINARY)) 177 send_will(TELOPT_BINARY, 1); 178 } else { 179 if (my_want_state_is_will(TELOPT_BINARY)) 180 send_wont(TELOPT_BINARY, 1); 181 } 182 } 183 184#ifdef ENCRYPTION 185 /* 186 * If the terminal is not echoing, but editing is enabled, 187 * something like password input is going to happen, so 188 * if we the other side is not currently sending encrypted 189 * data, ask the other side to start encrypting. 190 */ 191 if (his_state_is_will(TELOPT_ENCRYPT)) { 192 static int enc_passwd = 0; 193 if (uselinemode && !tty_isecho() && tty_isediting() 194 && (enc_passwd == 0) && !decrypt_input) { 195 encrypt_send_request_start(); 196 enc_passwd = 1; 197 } else if (enc_passwd) { 198 encrypt_send_request_end(); 199 enc_passwd = 0; 200 } 201 } 202#endif /* ENCRYPTION */ 203 204 /* 205 * Do echo mode handling as soon as we know what the 206 * linemode is going to be. 207 * If the pty has echo turned off, then tell the client that 208 * the server will echo. If echo is on, then the server 209 * will echo if in character mode, but in linemode the 210 * client should do local echoing. The state machine will 211 * not send anything if it is unnecessary, so don't worry 212 * about that here. 213 * 214 * If we need to send the WILL ECHO (because echo is off), 215 * then delay that until after we have changed the MODE. 216 * This way, when the user is turning off both editing 217 * and echo, the client will get editing turned off first. 218 * This keeps the client from going into encryption mode 219 * and then right back out if it is doing auto-encryption 220 * when passwords are being typed. 221 */ 222 if (uselinemode) { 223 if (tty_isecho()) 224 send_wont(TELOPT_ECHO, 1); 225 else 226 need_will_echo = 1; 227#ifdef KLUDGELINEMODE 228 if (lmodetype == KLUDGE_OK) 229 lmodetype = KLUDGE_LINEMODE; 230#endif 231 } 232 233 /* 234 * If linemode is being turned off, send appropriate 235 * command and then we're all done. 236 */ 237 if (!uselinemode && linemode) { 238# ifdef KLUDGELINEMODE 239 if (lmodetype == REAL_LINEMODE) { 240# endif /* KLUDGELINEMODE */ 241 send_dont(TELOPT_LINEMODE, 1); 242# ifdef KLUDGELINEMODE 243 } else if (lmodetype == KLUDGE_LINEMODE) 244 send_will(TELOPT_SGA, 1); 245# endif /* KLUDGELINEMODE */ 246 send_will(TELOPT_ECHO, 1); 247 linemode = uselinemode; 248 goto done; 249 } 250 251# ifdef KLUDGELINEMODE 252 /* 253 * If using real linemode check edit modes for possible later use. 254 * If we are in kludge linemode, do the SGA negotiation. 255 */ 256 if (lmodetype == REAL_LINEMODE) { 257# endif /* KLUDGELINEMODE */ 258 useeditmode = 0; 259 if (tty_isediting()) 260 useeditmode |= MODE_EDIT; 261 if (tty_istrapsig()) 262 useeditmode |= MODE_TRAPSIG; 263 if (tty_issofttab()) 264 useeditmode |= MODE_SOFT_TAB; 265 if (tty_islitecho()) 266 useeditmode |= MODE_LIT_ECHO; 267# ifdef KLUDGELINEMODE 268 } else if (lmodetype == KLUDGE_LINEMODE) { 269 if (tty_isediting() && uselinemode) 270 send_wont(TELOPT_SGA, 1); 271 else 272 send_will(TELOPT_SGA, 1); 273 } 274# endif /* KLUDGELINEMODE */ 275 276 /* 277 * Negotiate linemode on if pty state has changed to turn it on. 278 * Send appropriate command and send along edit mode, then all done. 279 */ 280 if (uselinemode && !linemode) { 281# ifdef KLUDGELINEMODE 282 if (lmodetype == KLUDGE_LINEMODE) { 283 send_wont(TELOPT_SGA, 1); 284 } else if (lmodetype == REAL_LINEMODE) { 285# endif /* KLUDGELINEMODE */ 286 send_do(TELOPT_LINEMODE, 1); 287 /* send along edit modes */ 288 output_data("%c%c%c%c%c%c%c", IAC, SB, 289 TELOPT_LINEMODE, LM_MODE, useeditmode, 290 IAC, SE); 291 editmode = useeditmode; 292# ifdef KLUDGELINEMODE 293 } 294# endif /* KLUDGELINEMODE */ 295 linemode = uselinemode; 296 goto done; 297 } 298 299# ifdef KLUDGELINEMODE 300 /* 301 * None of what follows is of any value if not using 302 * real linemode. 303 */ 304 if (lmodetype < REAL_LINEMODE) 305 goto done; 306# endif /* KLUDGELINEMODE */ 307 308 if (linemode && his_state_is_will(TELOPT_LINEMODE)) { 309 /* 310 * If edit mode changed, send edit mode. 311 */ 312 if (useeditmode != editmode) { 313 /* 314 * Send along appropriate edit mode mask. 315 */ 316 output_data("%c%c%c%c%c%c%c", IAC, SB, 317 TELOPT_LINEMODE, LM_MODE, useeditmode, 318 IAC, SE); 319 editmode = useeditmode; 320 } 321 322 323 /* 324 * Check for changes to special characters in use. 325 */ 326 start_slc(0); 327 check_slc(); 328 (void) end_slc(0); 329 } 330 331done: 332 if (need_will_echo) 333 send_will(TELOPT_ECHO, 1); 334 /* 335 * Some things should be deferred until after the pty state has 336 * been set by the local process. Do those things that have been 337 * deferred now. This only happens once. 338 */ 339 if (_terminit == 0) { 340 _terminit = 1; 341 defer_terminit(); 342 } 343 344 netflush(); 345 set_termbuf(); 346 return; 347 348} /* end of localstat */ 349#endif /* LINEMODE */ 350 351/* 352 * flowstat 353 * 354 * Check for changes to flow control 355 */ 356void 357flowstat(void) 358{ 359 if (his_state_is_will(TELOPT_LFLOW)) { 360 if (tty_flowmode() != flowmode) { 361 flowmode = tty_flowmode(); 362 output_data("%c%c%c%c%c%c", 363 IAC, SB, TELOPT_LFLOW, 364 flowmode ? LFLOW_ON : LFLOW_OFF, 365 IAC, SE); 366 } 367 if (tty_restartany() != restartany) { 368 restartany = tty_restartany(); 369 output_data("%c%c%c%c%c%c", 370 IAC, SB, TELOPT_LFLOW, 371 restartany ? LFLOW_RESTART_ANY 372 : LFLOW_RESTART_XON, 373 IAC, SE); 374 } 375 } 376} 377 378/* 379 * clientstat 380 * 381 * Process linemode related requests from the client. 382 * Client can request a change to only one of linemode, editmode or slc's 383 * at a time, and if using kludge linemode, then only linemode may be 384 * affected. 385 */ 386void 387clientstat(int code, int parm1, int parm2) 388{ 389 390 /* 391 * Get a copy of terminal characteristics. 392 */ 393 init_termbuf(); 394 395 /* 396 * Process request from client. code tells what it is. 397 */ 398 switch (code) { 399#ifdef LINEMODE 400 case TELOPT_LINEMODE: 401 /* 402 * Don't do anything unless client is asking us to change 403 * modes. 404 */ 405 uselinemode = (parm1 == WILL); 406 if (uselinemode != linemode) { 407# ifdef KLUDGELINEMODE 408 /* 409 * If using kludge linemode, make sure that 410 * we can do what the client asks. 411 * We can not turn off linemode if alwayslinemode 412 * and the ICANON bit is set. 413 */ 414 if (lmodetype == KLUDGE_LINEMODE) { 415 if (alwayslinemode && tty_isediting()) { 416 uselinemode = 1; 417 } 418 } 419 420 /* 421 * Quit now if we can't do it. 422 */ 423 if (uselinemode == linemode) 424 return; 425 426 /* 427 * If using real linemode and linemode is being 428 * turned on, send along the edit mode mask. 429 */ 430 if (lmodetype == REAL_LINEMODE && uselinemode) 431# else /* KLUDGELINEMODE */ 432 if (uselinemode) 433# endif /* KLUDGELINEMODE */ 434 { 435 useeditmode = 0; 436 if (tty_isediting()) 437 useeditmode |= MODE_EDIT; 438 if (tty_istrapsig()) 439 useeditmode |= MODE_TRAPSIG; 440 if (tty_issofttab()) 441 useeditmode |= MODE_SOFT_TAB; 442 if (tty_islitecho()) 443 useeditmode |= MODE_LIT_ECHO; 444 output_data("%c%c%c%c%c%c%c", IAC, 445 SB, TELOPT_LINEMODE, LM_MODE, 446 useeditmode, IAC, SE); 447 editmode = useeditmode; 448 } 449 450 451 tty_setlinemode(uselinemode); 452 453 linemode = uselinemode; 454 455 if (!linemode) 456 send_will(TELOPT_ECHO, 1); 457 } 458 break; 459 460 case LM_MODE: 461 { 462 int ack, changed; 463 464 /* 465 * Client has sent along a mode mask. If it agrees with 466 * what we are currently doing, ignore it; if not, it could 467 * be viewed as a request to change. Note that the server 468 * will change to the modes in an ack if it is different from 469 * what we currently have, but we will not ack the ack. 470 */ 471 useeditmode &= MODE_MASK; 472 ack = (useeditmode & MODE_ACK); 473 useeditmode &= ~MODE_ACK; 474 475 if ((changed = (useeditmode ^ editmode))) { 476 /* 477 * This check is for a timing problem. If the 478 * state of the tty has changed (due to the user 479 * application) we need to process that info 480 * before we write in the state contained in the 481 * ack!!! This gets out the new MODE request, 482 * and when the ack to that command comes back 483 * we'll set it and be in the right mode. 484 */ 485 if (ack) 486 localstat(); 487 if (changed & MODE_EDIT) 488 tty_setedit(useeditmode & MODE_EDIT); 489 490 if (changed & MODE_TRAPSIG) 491 tty_setsig(useeditmode & MODE_TRAPSIG); 492 493 if (changed & MODE_SOFT_TAB) 494 tty_setsofttab(useeditmode & MODE_SOFT_TAB); 495 496 if (changed & MODE_LIT_ECHO) 497 tty_setlitecho(useeditmode & MODE_LIT_ECHO); 498 499 set_termbuf(); 500 501 if (!ack) { 502 output_data("%c%c%c%c%c%c%c", IAC, 503 SB, TELOPT_LINEMODE, LM_MODE, 504 useeditmode|MODE_ACK, 505 IAC, SE); 506 } 507 508 editmode = useeditmode; 509 } 510 511 break; 512 513 } /* end of case LM_MODE */ 514#endif /* LINEMODE */ 515 516 case TELOPT_NAWS: 517#ifdef TIOCSWINSZ 518 { 519 struct winsize ws; 520 521 def_col = parm1; 522 def_row = parm2; 523#ifdef LINEMODE 524 /* 525 * Defer changing window size until after terminal is 526 * initialized. 527 */ 528 if (terminit() == 0) 529 return; 530#endif /* LINEMODE */ 531 532 /* 533 * Change window size as requested by client. 534 */ 535 536 ws.ws_col = parm1; 537 ws.ws_row = parm2; 538 (void) ioctl(pty, TIOCSWINSZ, (char *)&ws); 539 } 540#endif /* TIOCSWINSZ */ 541 542 break; 543 544 case TELOPT_TSPEED: 545 { 546 def_tspeed = parm1; 547 def_rspeed = parm2; 548#ifdef LINEMODE 549 /* 550 * Defer changing the terminal speed. 551 */ 552 if (terminit() == 0) 553 return; 554#endif /* LINEMODE */ 555 /* 556 * Change terminal speed as requested by client. 557 * We set the receive speed first, so that if we can't 558 * store separate receive and transmit speeds, the transmit 559 * speed will take precedence. 560 */ 561 tty_rspeed(parm2); 562 tty_tspeed(parm1); 563 set_termbuf(); 564 565 break; 566 567 } /* end of case TELOPT_TSPEED */ 568 569 default: 570 /* What? */ 571 break; 572 } /* end of switch */ 573 574 netflush(); 575 576} /* end of clientstat */ 577 578#ifdef LINEMODE 579/* 580 * defer_terminit 581 * 582 * Some things should not be done until after the login process has started 583 * and all the pty modes are set to what they are supposed to be. This 584 * function is called when the pty state has been processed for the first time. 585 * It calls other functions that do things that were deferred in each module. 586 */ 587void 588defer_terminit(void) 589{ 590 591 /* 592 * local stuff that got deferred. 593 */ 594 if (def_tspeed != -1) { 595 clientstat(TELOPT_TSPEED, def_tspeed, def_rspeed); 596 def_tspeed = def_rspeed = 0; 597 } 598 599#ifdef TIOCSWINSZ 600 if (def_col || def_row) { 601 struct winsize ws; 602 603 memset((char *)&ws, 0, sizeof(ws)); 604 ws.ws_col = def_col; 605 ws.ws_row = def_row; 606 (void) ioctl(pty, TIOCSWINSZ, (char *)&ws); 607 } 608#endif 609 610 /* 611 * The only other module that currently defers anything. 612 */ 613 deferslc(); 614 615} /* end of defer_terminit */ 616 617/* 618 * terminit 619 * 620 * Returns true if the pty state has been processed yet. 621 */ 622int 623terminit(void) 624{ 625 return(_terminit); 626 627} /* end of terminit */ 628#endif /* LINEMODE */ 629