tty.c revision 154013
156668Sshin/*- 256668Sshin * Copyright (c) 1982, 1986, 1990, 1991, 1993 356668Sshin * The Regents of the University of California. All rights reserved. 456668Sshin * (c) UNIX System Laboratories, Inc. 556668Sshin * All or some portions of this file are derived from material licensed 656668Sshin * to the University of California by American Telephone and Telegraph 756668Sshin * Co. or Unix System Laboratories, Inc. and are reproduced herein with 856668Sshin * the permission of UNIX System Laboratories, Inc. 956668Sshin * 1056668Sshin * Copyright (c) 2002 Networks Associates Technologies, Inc. 1156668Sshin * All rights reserved. 1256668Sshin * 1356668Sshin * Portions of this software were developed for the FreeBSD Project by 1480029Sobrien * ThinkSec AS and NAI Labs, the Security Research Division of Network 1556668Sshin * Associates, Inc. under DARPA/SPAWAR contract N66001-01-C-8035 1656668Sshin * ("CBOSS"), as part of the DARPA CHATS research program. 1756668Sshin * 1880029Sobrien * Redistribution and use in source and binary forms, with or without 19122679Sume * modification, are permitted provided that the following conditions 2080029Sobrien * are met: 21124604Sru * 1. Redistributions of source code must retain the above copyright 2256668Sshin * notice, this list of conditions and the following disclaimer. 23201390Sed * 2. Redistributions in binary form must reproduce the above copyright 24201390Sed * notice, this list of conditions and the following disclaimer in the 2556668Sshin * documentation and/or other materials provided with the distribution. 26 * 4. Neither the name of the University nor the names of its contributors 27 * may be used to endorse or promote products derived from this software 28 * without specific prior written permission. 29 * 30 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 31 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 32 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 33 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 34 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 35 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 36 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 37 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 38 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 39 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 40 * SUCH DAMAGE. 41 * 42 * @(#)tty.c 8.8 (Berkeley) 1/21/94 43 */ 44 45/*- 46 * TODO: 47 * o Fix races for sending the start char in ttyflush(). 48 * o Handle inter-byte timeout for "MIN > 0, TIME > 0" in ttyselect(). 49 * With luck, there will be MIN chars before select() returns(). 50 * o Handle CLOCAL consistently for ptys. Perhaps disallow setting it. 51 * o Don't allow input in TS_ZOMBIE case. It would be visible through 52 * FIONREAD. 53 * o Do the new sio locking stuff here and use it to avoid special 54 * case for EXTPROC? 55 * o Lock PENDIN too? 56 * o Move EXTPROC and/or PENDIN to t_state? 57 * o Wrap most of ttioctl in spltty/splx. 58 * o Implement TIOCNOTTY or remove it from <sys/ioctl.h>. 59 * o Send STOP if IXOFF is toggled off while TS_TBLOCK is set. 60 * o Don't allow certain termios flags to affect disciplines other 61 * than TTYDISC. Cancel their effects before switch disciplines 62 * and ignore them if they are set while we are in another 63 * discipline. 64 * o Now that historical speed conversions are handled here, don't 65 * do them in drivers. 66 * o Check for TS_CARR_ON being set while everything is closed and not 67 * waiting for carrier. TS_CARR_ON isn't cleared if nothing is open, 68 * so it would live until the next open even if carrier drops. 69 * o Restore TS_WOPEN since it is useful in pstat. It must be cleared 70 * only when _all_ openers leave open(). 71 */ 72 73#include <sys/cdefs.h> 74__FBSDID("$FreeBSD: head/sys/kern/tty.c 154013 2006-01-04 08:22:39Z phk $"); 75 76#include "opt_compat.h" 77#include "opt_tty.h" 78 79#include <sys/param.h> 80#include <sys/systm.h> 81#include <sys/filio.h> 82#include <sys/lock.h> 83#include <sys/mutex.h> 84#include <sys/namei.h> 85#include <sys/sx.h> 86#ifndef BURN_BRIDGES 87#if defined(COMPAT_43) 88#include <sys/ioctl_compat.h> 89#endif 90#endif 91#include <sys/proc.h> 92#define TTYDEFCHARS 93#include <sys/tty.h> 94#undef TTYDEFCHARS 95#include <sys/fcntl.h> 96#include <sys/conf.h> 97#include <sys/poll.h> 98#include <sys/kernel.h> 99#include <sys/vnode.h> 100#include <sys/serial.h> 101#include <sys/signalvar.h> 102#include <sys/resourcevar.h> 103#include <sys/malloc.h> 104#include <sys/filedesc.h> 105#include <sys/sched.h> 106#include <sys/sysctl.h> 107#include <sys/timepps.h> 108 109#include <machine/stdarg.h> 110 111#include <vm/vm.h> 112#include <vm/pmap.h> 113#include <vm/vm_map.h> 114 115MALLOC_DEFINE(M_TTYS, "ttys", "tty data structures"); 116 117long tk_cancc; 118long tk_nin; 119long tk_nout; 120long tk_rawcc; 121 122static d_open_t ttysopen; 123static d_close_t ttysclose; 124static d_read_t ttysrdwr; 125static d_ioctl_t ttysioctl; 126static d_purge_t ttypurge; 127 128/* Default cdevsw for common tty devices */ 129static struct cdevsw tty_cdevsw = { 130 .d_version = D_VERSION, 131 .d_open = ttyopen, 132 .d_close = ttyclose, 133 .d_ioctl = ttyioctl, 134 .d_purge = ttypurge, 135 .d_name = "ttydrv", 136 .d_flags = D_TTY | D_NEEDGIANT, 137}; 138 139/* Cdevsw for slave tty devices */ 140static struct cdevsw ttys_cdevsw = { 141 .d_version = D_VERSION, 142 .d_open = ttysopen, 143 .d_close = ttysclose, 144 .d_read = ttysrdwr, 145 .d_write = ttysrdwr, 146 .d_ioctl = ttysioctl, 147 .d_name = "TTYS", 148 .d_flags = D_TTY | D_NEEDGIANT, 149}; 150 151static int proc_compare(struct proc *p1, struct proc *p2); 152static int ttnread(struct tty *tp); 153static void ttyecho(int c, struct tty *tp); 154static int ttyoutput(int c, struct tty *tp); 155static void ttypend(struct tty *tp); 156static void ttyretype(struct tty *tp); 157static void ttyrub(int c, struct tty *tp); 158static void ttyrubo(struct tty *tp, int cnt); 159static void ttyunblock(struct tty *tp); 160static int ttywflush(struct tty *tp); 161static int filt_ttyread(struct knote *kn, long hint); 162static void filt_ttyrdetach(struct knote *kn); 163static int filt_ttywrite(struct knote *kn, long hint); 164static void filt_ttywdetach(struct knote *kn); 165 166/* 167 * Table with character classes and parity. The 8th bit indicates parity, 168 * the 7th bit indicates the character is an alphameric or underscore (for 169 * ALTWERASE), and the low 6 bits indicate delay type. If the low 6 bits 170 * are 0 then the character needs no special processing on output; classes 171 * other than 0 might be translated or (not currently) require delays. 172 */ 173#define E 0x00 /* Even parity. */ 174#define O 0x80 /* Odd parity. */ 175#define PARITY(c) (char_type[c] & O) 176 177#define ALPHA 0x40 /* Alpha or underscore. */ 178#define ISALPHA(c) (char_type[(c) & TTY_CHARMASK] & ALPHA) 179 180#define CCLASSMASK 0x3f 181#define CCLASS(c) (char_type[c] & CCLASSMASK) 182 183#define BS BACKSPACE 184#define CC CONTROL 185#define CR RETURN 186#define NA ORDINARY | ALPHA 187#define NL NEWLINE 188#define NO ORDINARY 189#define TB TAB 190#define VT VTAB 191 192static u_char const char_type[] = { 193 E|CC, O|CC, O|CC, E|CC, O|CC, E|CC, E|CC, O|CC, /* nul - bel */ 194 O|BS, E|TB, E|NL, O|CC, E|VT, O|CR, O|CC, E|CC, /* bs - si */ 195 O|CC, E|CC, E|CC, O|CC, E|CC, O|CC, O|CC, E|CC, /* dle - etb */ 196 E|CC, O|CC, O|CC, E|CC, O|CC, E|CC, E|CC, O|CC, /* can - us */ 197 O|NO, E|NO, E|NO, O|NO, E|NO, O|NO, O|NO, E|NO, /* sp - ' */ 198 E|NO, O|NO, O|NO, E|NO, O|NO, E|NO, E|NO, O|NO, /* ( - / */ 199 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* 0 - 7 */ 200 O|NA, E|NA, E|NO, O|NO, E|NO, O|NO, O|NO, E|NO, /* 8 - ? */ 201 O|NO, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* @ - G */ 202 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* H - O */ 203 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* P - W */ 204 O|NA, E|NA, E|NA, O|NO, E|NO, O|NO, O|NO, O|NA, /* X - _ */ 205 E|NO, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* ` - g */ 206 O|NA, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* h - o */ 207 O|NA, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* p - w */ 208 E|NA, O|NA, O|NA, E|NO, O|NO, E|NO, E|NO, O|CC, /* x - del */ 209 /* 210 * Meta chars; should be settable per character set; 211 * for now, treat them all as normal characters. 212 */ 213 NA, NA, NA, NA, NA, NA, NA, NA, 214 NA, NA, NA, NA, NA, NA, NA, NA, 215 NA, NA, NA, NA, NA, NA, NA, NA, 216 NA, NA, NA, NA, NA, NA, NA, NA, 217 NA, NA, NA, NA, NA, NA, NA, NA, 218 NA, NA, NA, NA, NA, NA, NA, NA, 219 NA, NA, NA, NA, NA, NA, NA, NA, 220 NA, NA, NA, NA, NA, NA, NA, NA, 221 NA, NA, NA, NA, NA, NA, NA, NA, 222 NA, NA, NA, NA, NA, NA, NA, NA, 223 NA, NA, NA, NA, NA, NA, NA, NA, 224 NA, NA, NA, NA, NA, NA, NA, NA, 225 NA, NA, NA, NA, NA, NA, NA, NA, 226 NA, NA, NA, NA, NA, NA, NA, NA, 227 NA, NA, NA, NA, NA, NA, NA, NA, 228 NA, NA, NA, NA, NA, NA, NA, NA, 229}; 230#undef BS 231#undef CC 232#undef CR 233#undef NA 234#undef NL 235#undef NO 236#undef TB 237#undef VT 238 239/* Macros to clear/set/test flags. */ 240#define SET(t, f) (t) |= (f) 241#define CLR(t, f) (t) &= ~(f) 242#define ISSET(t, f) ((t) & (f)) 243 244#undef MAX_INPUT /* XXX wrong in <sys/syslimits.h> */ 245#define MAX_INPUT TTYHOG /* XXX limit is usually larger for !ICANON */ 246 247/* 248 * list of struct tty where pstat(8) can pick it up with sysctl 249 * 250 * The lock order is to grab the list mutex before the tty mutex. 251 * Together with additions going on the tail of the list, this allows 252 * the sysctl to avoid doing retries. 253 */ 254static TAILQ_HEAD(, tty) tty_list = TAILQ_HEAD_INITIALIZER(tty_list); 255static struct mtx tty_list_mutex; 256MTX_SYSINIT(tty_list, &tty_list_mutex, "ttylist", MTX_DEF); 257 258static struct unrhdr *tty_unit; 259 260static int drainwait = 5*60; 261SYSCTL_INT(_kern, OID_AUTO, drainwait, CTLFLAG_RW, &drainwait, 262 0, "Output drain timeout in seconds"); 263 264static struct tty * 265tty_gettp(struct cdev *dev) 266{ 267 struct tty *tp; 268 struct cdevsw *csw; 269 270 csw = dev_refthread(dev); 271 KASSERT(csw != NULL, ("No cdevsw in ttycode (%s)", devtoname(dev))); 272 KASSERT(csw->d_flags & D_TTY, 273 ("non D_TTY (%s) in tty code", devtoname(dev))); 274 dev_relthread(dev); 275 tp = dev->si_tty; 276 KASSERT(tp != NULL, 277 ("no tty pointer on (%s) in tty code", devtoname(dev))); 278 return (tp); 279} 280 281/* 282 * Initial open of tty, or (re)entry to standard tty line discipline. 283 */ 284int 285tty_open(struct cdev *device, struct tty *tp) 286{ 287 int s; 288 289 s = spltty(); 290 tp->t_dev = device; 291 tp->t_hotchar = 0; 292 if (!ISSET(tp->t_state, TS_ISOPEN)) { 293 ttyref(tp); 294 SET(tp->t_state, TS_ISOPEN); 295 if (ISSET(tp->t_cflag, CLOCAL)) 296 SET(tp->t_state, TS_CONNECTED); 297 bzero(&tp->t_winsize, sizeof(tp->t_winsize)); 298 } 299 /* XXX don't hang forever on output */ 300 if (tp->t_timeout < 0) 301 tp->t_timeout = drainwait*hz; 302 ttsetwater(tp); 303 splx(s); 304 return (0); 305} 306 307/* 308 * Handle close() on a tty line: flush and set to initial state, 309 * bumping generation number so that pending read/write calls 310 * can detect recycling of the tty. 311 * XXX our caller should have done `spltty(); l_close(); tty_close();' 312 * and l_close() should have flushed, but we repeat the spltty() and 313 * the flush in case there are buggy callers. 314 */ 315int 316tty_close(struct tty *tp) 317{ 318 int s; 319 320 funsetown(&tp->t_sigio); 321 s = spltty(); 322 if (constty == tp) 323 constty_clear(); 324 325 ttyflush(tp, FREAD | FWRITE); 326 clist_free_cblocks(&tp->t_canq); 327 clist_free_cblocks(&tp->t_outq); 328 clist_free_cblocks(&tp->t_rawq); 329 330 tp->t_gen++; 331 tp->t_line = TTYDISC; 332 tp->t_hotchar = 0; 333 tp->t_pgrp = NULL; 334 tp->t_session = NULL; 335 tp->t_state = 0; 336 knlist_clear(&tp->t_rsel.si_note, 0); 337 knlist_clear(&tp->t_wsel.si_note, 0); 338 ttyrel(tp); 339 splx(s); 340 return (0); 341} 342 343#define FLUSHQ(q) { \ 344 if ((q)->c_cc) \ 345 ndflush(q, (q)->c_cc); \ 346} 347 348/* Is 'c' a line delimiter ("break" character)? */ 349#define TTBREAKC(c, lflag) \ 350 ((c) == '\n' || (((c) == cc[VEOF] || \ 351 (c) == cc[VEOL] || ((c) == cc[VEOL2] && lflag & IEXTEN)) && \ 352 (c) != _POSIX_VDISABLE)) 353 354/* 355 * Process input of a single character received on a tty. 356 */ 357int 358ttyinput(int c, struct tty *tp) 359{ 360 tcflag_t iflag, lflag; 361 cc_t *cc; 362 int i, err; 363 364 /* 365 * If input is pending take it first. 366 */ 367 lflag = tp->t_lflag; 368 if (ISSET(lflag, PENDIN)) 369 ttypend(tp); 370 /* 371 * Gather stats. 372 */ 373 if (ISSET(lflag, ICANON)) { 374 ++tk_cancc; 375 ++tp->t_cancc; 376 } else { 377 ++tk_rawcc; 378 ++tp->t_rawcc; 379 } 380 ++tk_nin; 381 382 /* 383 * Block further input iff: 384 * current input > threshold AND input is available to user program 385 * AND input flow control is enabled and not yet invoked. 386 * The 3 is slop for PARMRK. 387 */ 388 iflag = tp->t_iflag; 389 if (tp->t_rawq.c_cc + tp->t_canq.c_cc > tp->t_ihiwat - 3 && 390 (!ISSET(lflag, ICANON) || tp->t_canq.c_cc != 0) && 391 (ISSET(tp->t_cflag, CRTS_IFLOW) || ISSET(iflag, IXOFF)) && 392 !ISSET(tp->t_state, TS_TBLOCK)) 393 ttyblock(tp); 394 395 /* Handle exceptional conditions (break, parity, framing). */ 396 cc = tp->t_cc; 397 err = (ISSET(c, TTY_ERRORMASK)); 398 if (err) { 399 CLR(c, TTY_ERRORMASK); 400 if (ISSET(err, TTY_BI)) { 401 if (ISSET(iflag, IGNBRK)) 402 return (0); 403 if (ISSET(iflag, BRKINT)) { 404 ttyflush(tp, FREAD | FWRITE); 405 if (tp->t_pgrp != NULL) { 406 PGRP_LOCK(tp->t_pgrp); 407 pgsignal(tp->t_pgrp, SIGINT, 1); 408 PGRP_UNLOCK(tp->t_pgrp); 409 } 410 goto endcase; 411 } 412 if (ISSET(iflag, PARMRK)) 413 goto parmrk; 414 } else if ((ISSET(err, TTY_PE) && ISSET(iflag, INPCK)) 415 || ISSET(err, TTY_FE)) { 416 if (ISSET(iflag, IGNPAR)) 417 return (0); 418 else if (ISSET(iflag, PARMRK)) { 419parmrk: 420 if (tp->t_rawq.c_cc + tp->t_canq.c_cc > 421 MAX_INPUT - 3) 422 goto input_overflow; 423 (void)putc(0377 | TTY_QUOTE, &tp->t_rawq); 424 (void)putc(0 | TTY_QUOTE, &tp->t_rawq); 425 (void)putc(c | TTY_QUOTE, &tp->t_rawq); 426 goto endcase; 427 } else 428 c = 0; 429 } 430 } 431 432 if (!ISSET(tp->t_state, TS_TYPEN) && ISSET(iflag, ISTRIP)) 433 CLR(c, 0x80); 434 if (!ISSET(lflag, EXTPROC)) { 435 /* 436 * Check for literal nexting very first 437 */ 438 if (ISSET(tp->t_state, TS_LNCH)) { 439 SET(c, TTY_QUOTE); 440 CLR(tp->t_state, TS_LNCH); 441 } 442 /* 443 * Scan for special characters. This code 444 * is really just a big case statement with 445 * non-constant cases. The bottom of the 446 * case statement is labeled ``endcase'', so goto 447 * it after a case match, or similar. 448 */ 449 450 /* 451 * Control chars which aren't controlled 452 * by ICANON, ISIG, or IXON. 453 */ 454 if (ISSET(lflag, IEXTEN)) { 455 if (CCEQ(cc[VLNEXT], c)) { 456 if (ISSET(lflag, ECHO)) { 457 if (ISSET(lflag, ECHOE)) { 458 (void)ttyoutput('^', tp); 459 (void)ttyoutput('\b', tp); 460 } else 461 ttyecho(c, tp); 462 } 463 SET(tp->t_state, TS_LNCH); 464 goto endcase; 465 } 466 if (CCEQ(cc[VDISCARD], c)) { 467 if (ISSET(lflag, FLUSHO)) 468 CLR(tp->t_lflag, FLUSHO); 469 else { 470 ttyflush(tp, FWRITE); 471 ttyecho(c, tp); 472 if (tp->t_rawq.c_cc + tp->t_canq.c_cc) 473 ttyretype(tp); 474 SET(tp->t_lflag, FLUSHO); 475 } 476 goto startoutput; 477 } 478 } 479 /* 480 * Signals. 481 */ 482 if (ISSET(lflag, ISIG)) { 483 if (CCEQ(cc[VINTR], c) || CCEQ(cc[VQUIT], c)) { 484 if (!ISSET(lflag, NOFLSH)) 485 ttyflush(tp, FREAD | FWRITE); 486 ttyecho(c, tp); 487 if (tp->t_pgrp != NULL) { 488 PGRP_LOCK(tp->t_pgrp); 489 pgsignal(tp->t_pgrp, 490 CCEQ(cc[VINTR], c) ? SIGINT : SIGQUIT, 1); 491 PGRP_UNLOCK(tp->t_pgrp); 492 } 493 goto endcase; 494 } 495 if (CCEQ(cc[VSUSP], c)) { 496 if (!ISSET(lflag, NOFLSH)) 497 ttyflush(tp, FREAD); 498 ttyecho(c, tp); 499 if (tp->t_pgrp != NULL) { 500 PGRP_LOCK(tp->t_pgrp); 501 pgsignal(tp->t_pgrp, SIGTSTP, 1); 502 PGRP_UNLOCK(tp->t_pgrp); 503 } 504 goto endcase; 505 } 506 } 507 /* 508 * Handle start/stop characters. 509 */ 510 if (ISSET(iflag, IXON)) { 511 if (CCEQ(cc[VSTOP], c)) { 512 if (!ISSET(tp->t_state, TS_TTSTOP)) { 513 SET(tp->t_state, TS_TTSTOP); 514 tt_stop(tp, 0); 515 return (0); 516 } 517 if (!CCEQ(cc[VSTART], c)) 518 return (0); 519 /* 520 * if VSTART == VSTOP then toggle 521 */ 522 goto endcase; 523 } 524 if (CCEQ(cc[VSTART], c)) 525 goto restartoutput; 526 } 527 /* 528 * IGNCR, ICRNL, & INLCR 529 */ 530 if (c == '\r') { 531 if (ISSET(iflag, IGNCR)) 532 return (0); 533 else if (ISSET(iflag, ICRNL)) 534 c = '\n'; 535 } else if (c == '\n' && ISSET(iflag, INLCR)) 536 c = '\r'; 537 } 538 if (!ISSET(tp->t_lflag, EXTPROC) && ISSET(lflag, ICANON)) { 539 /* 540 * From here on down canonical mode character 541 * processing takes place. 542 */ 543 /* 544 * erase or erase2 (^H / ^?) 545 */ 546 if (CCEQ(cc[VERASE], c) || CCEQ(cc[VERASE2], c) ) { 547 if (tp->t_rawq.c_cc) 548 ttyrub(unputc(&tp->t_rawq), tp); 549 goto endcase; 550 } 551 /* 552 * kill (^U) 553 */ 554 if (CCEQ(cc[VKILL], c)) { 555 if (ISSET(lflag, ECHOKE) && 556 tp->t_rawq.c_cc == tp->t_rocount && 557 !ISSET(lflag, ECHOPRT)) 558 while (tp->t_rawq.c_cc) 559 ttyrub(unputc(&tp->t_rawq), tp); 560 else { 561 ttyecho(c, tp); 562 if (ISSET(lflag, ECHOK) || 563 ISSET(lflag, ECHOKE)) 564 ttyecho('\n', tp); 565 FLUSHQ(&tp->t_rawq); 566 tp->t_rocount = 0; 567 } 568 CLR(tp->t_state, TS_LOCAL); 569 goto endcase; 570 } 571 /* 572 * word erase (^W) 573 */ 574 if (CCEQ(cc[VWERASE], c) && ISSET(lflag, IEXTEN)) { 575 int ctype; 576 577 /* 578 * erase whitespace 579 */ 580 while ((c = unputc(&tp->t_rawq)) == ' ' || c == '\t') 581 ttyrub(c, tp); 582 if (c == -1) 583 goto endcase; 584 /* 585 * erase last char of word and remember the 586 * next chars type (for ALTWERASE) 587 */ 588 ttyrub(c, tp); 589 c = unputc(&tp->t_rawq); 590 if (c == -1) 591 goto endcase; 592 if (c == ' ' || c == '\t') { 593 (void)putc(c, &tp->t_rawq); 594 goto endcase; 595 } 596 ctype = ISALPHA(c); 597 /* 598 * erase rest of word 599 */ 600 do { 601 ttyrub(c, tp); 602 c = unputc(&tp->t_rawq); 603 if (c == -1) 604 goto endcase; 605 } while (c != ' ' && c != '\t' && 606 (!ISSET(lflag, ALTWERASE) || ISALPHA(c) == ctype)); 607 (void)putc(c, &tp->t_rawq); 608 goto endcase; 609 } 610 /* 611 * reprint line (^R) 612 */ 613 if (CCEQ(cc[VREPRINT], c) && ISSET(lflag, IEXTEN)) { 614 ttyretype(tp); 615 goto endcase; 616 } 617 /* 618 * ^T - kernel info and generate SIGINFO 619 */ 620 if (CCEQ(cc[VSTATUS], c) && ISSET(lflag, IEXTEN)) { 621 if (ISSET(lflag, ISIG) && tp->t_pgrp != NULL) { 622 PGRP_LOCK(tp->t_pgrp); 623 pgsignal(tp->t_pgrp, SIGINFO, 1); 624 PGRP_UNLOCK(tp->t_pgrp); 625 } 626 if (!ISSET(lflag, NOKERNINFO)) 627 ttyinfo(tp); 628 goto endcase; 629 } 630 } 631 /* 632 * Check for input buffer overflow 633 */ 634 if (tp->t_rawq.c_cc + tp->t_canq.c_cc >= MAX_INPUT) { 635input_overflow: 636 if (ISSET(iflag, IMAXBEL)) { 637 if (tp->t_outq.c_cc < tp->t_ohiwat) 638 (void)ttyoutput(CTRL('g'), tp); 639 } 640 goto endcase; 641 } 642 643 if ( c == 0377 && ISSET(iflag, PARMRK) && !ISSET(iflag, ISTRIP) 644 && ISSET(iflag, IGNBRK|IGNPAR) != (IGNBRK|IGNPAR)) 645 (void)putc(0377 | TTY_QUOTE, &tp->t_rawq); 646 647 /* 648 * Put data char in q for user and 649 * wakeup on seeing a line delimiter. 650 */ 651 if (putc(c, &tp->t_rawq) >= 0) { 652 if (!ISSET(lflag, ICANON)) { 653 ttwakeup(tp); 654 ttyecho(c, tp); 655 goto endcase; 656 } 657 if (TTBREAKC(c, lflag)) { 658 tp->t_rocount = 0; 659 catq(&tp->t_rawq, &tp->t_canq); 660 ttwakeup(tp); 661 } else if (tp->t_rocount++ == 0) 662 tp->t_rocol = tp->t_column; 663 if (ISSET(tp->t_state, TS_ERASE)) { 664 /* 665 * end of prterase \.../ 666 */ 667 CLR(tp->t_state, TS_ERASE); 668 (void)ttyoutput('/', tp); 669 } 670 i = tp->t_column; 671 ttyecho(c, tp); 672 if (CCEQ(cc[VEOF], c) && ISSET(lflag, ECHO)) { 673 /* 674 * Place the cursor over the '^' of the ^D. 675 */ 676 i = imin(2, tp->t_column - i); 677 while (i > 0) { 678 (void)ttyoutput('\b', tp); 679 i--; 680 } 681 } 682 } 683endcase: 684 /* 685 * IXANY means allow any character to restart output. 686 */ 687 if (ISSET(tp->t_state, TS_TTSTOP) && 688 !ISSET(iflag, IXANY) && cc[VSTART] != cc[VSTOP]) 689 return (0); 690restartoutput: 691 CLR(tp->t_lflag, FLUSHO); 692 CLR(tp->t_state, TS_TTSTOP); 693startoutput: 694 return (ttstart(tp)); 695} 696 697/* 698 * Output a single character on a tty, doing output processing 699 * as needed (expanding tabs, newline processing, etc.). 700 * Returns < 0 if succeeds, otherwise returns char to resend. 701 * Must be recursive. 702 */ 703static int 704ttyoutput(int c, struct tty *tp) 705{ 706 tcflag_t oflag; 707 int col, s; 708 709 oflag = tp->t_oflag; 710 if (!ISSET(oflag, OPOST)) { 711 if (ISSET(tp->t_lflag, FLUSHO)) 712 return (-1); 713 if (putc(c, &tp->t_outq)) 714 return (c); 715 tk_nout++; 716 tp->t_outcc++; 717 return (-1); 718 } 719 /* 720 * Do tab expansion if OXTABS is set. Special case if we external 721 * processing, we don't do the tab expansion because we'll probably 722 * get it wrong. If tab expansion needs to be done, let it happen 723 * externally. 724 */ 725 CLR(c, ~TTY_CHARMASK); 726 if (c == '\t' && 727 ISSET(oflag, OXTABS) && !ISSET(tp->t_lflag, EXTPROC)) { 728 c = 8 - (tp->t_column & 7); 729 if (!ISSET(tp->t_lflag, FLUSHO)) { 730 s = spltty(); /* Don't interrupt tabs. */ 731 c -= b_to_q(" ", c, &tp->t_outq); 732 tk_nout += c; 733 tp->t_outcc += c; 734 splx(s); 735 } 736 tp->t_column += c; 737 return (c ? -1 : '\t'); 738 } 739 if (c == CEOT && ISSET(oflag, ONOEOT)) 740 return (-1); 741 742 /* 743 * Newline translation: if ONLCR is set, 744 * translate newline into "\r\n". 745 */ 746 if (c == '\n' && ISSET(tp->t_oflag, ONLCR)) { 747 tk_nout++; 748 tp->t_outcc++; 749 if (!ISSET(tp->t_lflag, FLUSHO) && putc('\r', &tp->t_outq)) 750 return (c); 751 } 752 /* If OCRNL is set, translate "\r" into "\n". */ 753 else if (c == '\r' && ISSET(tp->t_oflag, OCRNL)) 754 c = '\n'; 755 /* If ONOCR is set, don't transmit CRs when on column 0. */ 756 else if (c == '\r' && ISSET(tp->t_oflag, ONOCR) && tp->t_column == 0) 757 return (-1); 758 759 tk_nout++; 760 tp->t_outcc++; 761 if (!ISSET(tp->t_lflag, FLUSHO) && putc(c, &tp->t_outq)) 762 return (c); 763 764 col = tp->t_column; 765 switch (CCLASS(c)) { 766 case BACKSPACE: 767 if (col > 0) 768 --col; 769 break; 770 case CONTROL: 771 break; 772 case NEWLINE: 773 if (ISSET(tp->t_oflag, ONLCR | ONLRET)) 774 col = 0; 775 break; 776 case RETURN: 777 col = 0; 778 break; 779 case ORDINARY: 780 ++col; 781 break; 782 case TAB: 783 col = (col + 8) & ~7; 784 break; 785 } 786 tp->t_column = col; 787 return (-1); 788} 789 790/* 791 * Ioctls for all tty devices. Called after line-discipline specific ioctl 792 * has been called to do discipline-specific functions and/or reject any 793 * of these ioctl commands. 794 */ 795/* ARGSUSED */ 796int 797ttioctl(struct tty *tp, u_long cmd, void *data, int flag) 798{ 799 struct proc *p; 800 struct thread *td; 801 struct pgrp *pgrp; 802 int s, error, bits, sig, sig2; 803 804 td = curthread; /* XXX */ 805 p = td->td_proc; 806 807 /* If the ioctl involves modification, hang if in the background. */ 808 switch (cmd) { 809 case TIOCCBRK: 810 case TIOCCONS: 811 case TIOCDRAIN: 812 case TIOCEXCL: 813 case TIOCFLUSH: 814#ifdef TIOCHPCL 815 case TIOCHPCL: 816#endif 817 case TIOCNXCL: 818 case TIOCSBRK: 819 case TIOCSCTTY: 820 case TIOCSDRAINWAIT: 821 case TIOCSETA: 822 case TIOCSETAF: 823 case TIOCSETAW: 824 case TIOCSETD: 825 case TIOCSPGRP: 826 case TIOCSTART: 827 case TIOCSTAT: 828 case TIOCSTI: 829 case TIOCSTOP: 830 case TIOCSWINSZ: 831#ifndef BURN_BRIDGES 832#if defined(COMPAT_43) 833 case TIOCLBIC: 834 case TIOCLBIS: 835 case TIOCLSET: 836 case TIOCSETC: 837 case OTIOCSETD: 838 case TIOCSETN: 839 case TIOCSETP: 840 case TIOCSLTC: 841#endif 842#endif 843 sx_slock(&proctree_lock); 844 PROC_LOCK(p); 845 while (isbackground(p, tp) && !(p->p_flag & P_PPWAIT) && 846 !SIGISMEMBER(p->p_sigacts->ps_sigignore, SIGTTOU) && 847 !SIGISMEMBER(td->td_sigmask, SIGTTOU)) { 848 pgrp = p->p_pgrp; 849 PROC_UNLOCK(p); 850 if (pgrp->pg_jobc == 0) { 851 sx_sunlock(&proctree_lock); 852 return (EIO); 853 } 854 PGRP_LOCK(pgrp); 855 sx_sunlock(&proctree_lock); 856 pgsignal(pgrp, SIGTTOU, 1); 857 PGRP_UNLOCK(pgrp); 858 error = ttysleep(tp, &lbolt, TTOPRI | PCATCH, "ttybg1", 859 0); 860 if (error) 861 return (error); 862 sx_slock(&proctree_lock); 863 PROC_LOCK(p); 864 } 865 PROC_UNLOCK(p); 866 sx_sunlock(&proctree_lock); 867 break; 868 } 869 870 871 if (tp->t_modem != NULL) { 872 switch (cmd) { 873 case TIOCSDTR: 874 tt_modem(tp, SER_DTR, 0); 875 return (0); 876 case TIOCCDTR: 877 tt_modem(tp, 0, SER_DTR); 878 return (0); 879 case TIOCMSET: 880 bits = *(int *)data; 881 sig = (bits & (TIOCM_DTR | TIOCM_RTS)) >> 1; 882 sig2 = ((~bits) & (TIOCM_DTR | TIOCM_RTS)) >> 1; 883 tt_modem(tp, sig, sig2); 884 return (0); 885 case TIOCMBIS: 886 bits = *(int *)data; 887 sig = (bits & (TIOCM_DTR | TIOCM_RTS)) >> 1; 888 tt_modem(tp, sig, 0); 889 return (0); 890 case TIOCMBIC: 891 bits = *(int *)data; 892 sig = (bits & (TIOCM_DTR | TIOCM_RTS)) >> 1; 893 tt_modem(tp, 0, sig); 894 return (0); 895 case TIOCMGET: 896 sig = tt_modem(tp, 0, 0); 897 /* See <sys/serial.h. for the "<< 1" stuff */ 898 bits = TIOCM_LE + (sig << 1); 899 *(int *)data = bits; 900 return (0); 901 default: 902 break; 903 } 904 } 905 906 if (tp->t_pps != NULL) { 907 error = pps_ioctl(cmd, data, tp->t_pps); 908 if (error != ENOIOCTL) 909 return (error); 910 } 911 912 switch (cmd) { /* Process the ioctl. */ 913 case FIOASYNC: /* set/clear async i/o */ 914 s = spltty(); 915 if (*(int *)data) 916 SET(tp->t_state, TS_ASYNC); 917 else 918 CLR(tp->t_state, TS_ASYNC); 919 splx(s); 920 break; 921 case FIONBIO: /* set/clear non-blocking i/o */ 922 break; /* XXX: delete. */ 923 case FIONREAD: /* get # bytes to read */ 924 s = spltty(); 925 *(int *)data = ttnread(tp); 926 splx(s); 927 break; 928 929 case FIOSETOWN: 930 /* 931 * Policy -- Don't allow FIOSETOWN on someone else's 932 * controlling tty 933 */ 934 if (tp->t_session != NULL && !isctty(p, tp)) 935 return (ENOTTY); 936 937 error = fsetown(*(int *)data, &tp->t_sigio); 938 if (error) 939 return (error); 940 break; 941 case FIOGETOWN: 942 if (tp->t_session != NULL && !isctty(p, tp)) 943 return (ENOTTY); 944 *(int *)data = fgetown(&tp->t_sigio); 945 break; 946 947 case TIOCEXCL: /* set exclusive use of tty */ 948 s = spltty(); 949 SET(tp->t_state, TS_XCLUDE); 950 splx(s); 951 break; 952 case TIOCFLUSH: { /* flush buffers */ 953 int flags = *(int *)data; 954 955 if (flags == 0) 956 flags = FREAD | FWRITE; 957 else 958 flags &= FREAD | FWRITE; 959 ttyflush(tp, flags); 960 break; 961 } 962 case TIOCCONS: /* become virtual console */ 963 if (*(int *)data) { 964 struct nameidata nid; 965 966 if (constty && constty != tp && 967 ISSET(constty->t_state, TS_CONNECTED)) 968 return (EBUSY); 969 970 /* Ensure user can open the real console. */ 971 NDINIT(&nid, LOOKUP, LOCKLEAF | FOLLOW, UIO_SYSSPACE, 972 "/dev/console", td); 973 if ((error = namei(&nid)) != 0) 974 return (error); 975 NDFREE(&nid, NDF_ONLY_PNBUF); 976 error = VOP_ACCESS(nid.ni_vp, VREAD, td->td_ucred, td); 977 vput(nid.ni_vp); 978 if (error) 979 return (error); 980 981 constty_set(tp); 982 } else if (tp == constty) 983 constty_clear(); 984 break; 985 case TIOCDRAIN: /* wait till output drained */ 986 error = ttywait(tp); 987 if (error) 988 return (error); 989 break; 990 case TIOCGETA: { /* get termios struct */ 991 struct termios *t = (struct termios *)data; 992 993 bcopy(&tp->t_termios, t, sizeof(struct termios)); 994 break; 995 } 996 case TIOCGETD: /* get line discipline */ 997 *(int *)data = tp->t_line; 998 break; 999 case TIOCGWINSZ: /* get window size */ 1000 *(struct winsize *)data = tp->t_winsize; 1001 break; 1002 case TIOCGPGRP: /* get pgrp of tty */ 1003 if (!isctty(p, tp)) 1004 return (ENOTTY); 1005 *(int *)data = tp->t_pgrp ? tp->t_pgrp->pg_id : NO_PID; 1006 break; 1007#ifdef TIOCHPCL 1008 case TIOCHPCL: /* hang up on last close */ 1009 s = spltty(); 1010 SET(tp->t_cflag, HUPCL); 1011 splx(s); 1012 break; 1013#endif 1014 case TIOCMGDTRWAIT: 1015 *(int *)data = tp->t_dtr_wait * 100 / hz; 1016 break; 1017 case TIOCMSDTRWAIT: 1018 /* must be root since the wait applies to following logins */ 1019 error = suser(td); 1020 if (error) 1021 return (error); 1022 tp->t_dtr_wait = *(int *)data * hz / 100; 1023 break; 1024 case TIOCNXCL: /* reset exclusive use of tty */ 1025 s = spltty(); 1026 CLR(tp->t_state, TS_XCLUDE); 1027 splx(s); 1028 break; 1029 case TIOCOUTQ: /* output queue size */ 1030 *(int *)data = tp->t_outq.c_cc; 1031 break; 1032 case TIOCSETA: /* set termios struct */ 1033 case TIOCSETAW: /* drain output, set */ 1034 case TIOCSETAF: { /* drn out, fls in, set */ 1035 struct termios *t = (struct termios *)data; 1036 1037 if (t->c_ispeed == 0) 1038 t->c_ispeed = t->c_ospeed; 1039 if (t->c_ispeed == 0) 1040 t->c_ispeed = tp->t_ospeed; 1041 if (t->c_ispeed == 0) 1042 return (EINVAL); 1043 s = spltty(); 1044 if (cmd == TIOCSETAW || cmd == TIOCSETAF) { 1045 error = ttywait(tp); 1046 if (error) { 1047 splx(s); 1048 return (error); 1049 } 1050 if (cmd == TIOCSETAF) 1051 ttyflush(tp, FREAD); 1052 } 1053 if (!ISSET(t->c_cflag, CIGNORE)) { 1054 /* 1055 * Set device hardware. 1056 */ 1057 error = tt_param(tp, t); 1058 if (error) { 1059 splx(s); 1060 return (error); 1061 } 1062 if (ISSET(t->c_cflag, CLOCAL) && 1063 !ISSET(tp->t_cflag, CLOCAL)) { 1064 /* 1065 * XXX disconnections would be too hard to 1066 * get rid of without this kludge. The only 1067 * way to get rid of controlling terminals 1068 * is to exit from the session leader. 1069 */ 1070 CLR(tp->t_state, TS_ZOMBIE); 1071 1072 wakeup(TSA_CARR_ON(tp)); 1073 ttwakeup(tp); 1074 ttwwakeup(tp); 1075 } 1076 if ((ISSET(tp->t_state, TS_CARR_ON) || 1077 ISSET(t->c_cflag, CLOCAL)) && 1078 !ISSET(tp->t_state, TS_ZOMBIE)) 1079 SET(tp->t_state, TS_CONNECTED); 1080 else 1081 CLR(tp->t_state, TS_CONNECTED); 1082 tp->t_cflag = t->c_cflag; 1083 tp->t_ispeed = t->c_ispeed; 1084 if (t->c_ospeed != 0) 1085 tp->t_ospeed = t->c_ospeed; 1086 ttsetwater(tp); 1087 } 1088 if (ISSET(t->c_lflag, ICANON) != ISSET(tp->t_lflag, ICANON) && 1089 cmd != TIOCSETAF) { 1090 if (ISSET(t->c_lflag, ICANON)) 1091 SET(tp->t_lflag, PENDIN); 1092 else { 1093 /* 1094 * XXX we really shouldn't allow toggling 1095 * ICANON while we're in a non-termios line 1096 * discipline. Now we have to worry about 1097 * panicing for a null queue. 1098 */ 1099 if (tp->t_canq.c_cbreserved > 0 && 1100 tp->t_rawq.c_cbreserved > 0) { 1101 catq(&tp->t_rawq, &tp->t_canq); 1102 /* 1103 * XXX the queue limits may be 1104 * different, so the old queue 1105 * swapping method no longer works. 1106 */ 1107 catq(&tp->t_canq, &tp->t_rawq); 1108 } 1109 CLR(tp->t_lflag, PENDIN); 1110 } 1111 ttwakeup(tp); 1112 } 1113 tp->t_iflag = t->c_iflag; 1114 tp->t_oflag = t->c_oflag; 1115 /* 1116 * Make the EXTPROC bit read only. 1117 */ 1118 if (ISSET(tp->t_lflag, EXTPROC)) 1119 SET(t->c_lflag, EXTPROC); 1120 else 1121 CLR(t->c_lflag, EXTPROC); 1122 tp->t_lflag = t->c_lflag | ISSET(tp->t_lflag, PENDIN); 1123 if (t->c_cc[VMIN] != tp->t_cc[VMIN] || 1124 t->c_cc[VTIME] != tp->t_cc[VTIME]) 1125 ttwakeup(tp); 1126 bcopy(t->c_cc, tp->t_cc, sizeof(t->c_cc)); 1127 splx(s); 1128 break; 1129 } 1130 case TIOCSETD: { /* set line discipline */ 1131 int t = *(int *)data; 1132 1133 if ((u_int)t >= nlinesw) 1134 return (ENXIO); 1135 if (t == tp->t_line) 1136 return (0); 1137 s = spltty(); 1138 ttyld_close(tp, flag); 1139 tp->t_line = t; 1140 /* XXX: we should use the correct cdev here */ 1141 error = ttyld_open(tp, tp->t_dev); 1142 if (error) { 1143 /* 1144 * If we fail to switch line discipline we cannot 1145 * fall back to the previous, because we can not 1146 * trust that ldisc to open successfully either. 1147 * Fall back to the default ldisc which we know 1148 * will allways succeed. 1149 */ 1150 tp->t_line = TTYDISC; 1151 (void)ttyld_open(tp, tp->t_dev); 1152 } 1153 splx(s); 1154 return (error); 1155 break; 1156 } 1157 case TIOCSTART: /* start output, like ^Q */ 1158 s = spltty(); 1159 if (ISSET(tp->t_state, TS_TTSTOP) || 1160 ISSET(tp->t_lflag, FLUSHO)) { 1161 CLR(tp->t_lflag, FLUSHO); 1162 CLR(tp->t_state, TS_TTSTOP); 1163 ttstart(tp); 1164 } 1165 splx(s); 1166 break; 1167 case TIOCSTI: /* simulate terminal input */ 1168 if ((flag & FREAD) == 0 && suser(td)) 1169 return (EPERM); 1170 if (!isctty(p, tp) && suser(td)) 1171 return (EACCES); 1172 s = spltty(); 1173 ttyld_rint(tp, *(u_char *)data); 1174 splx(s); 1175 break; 1176 case TIOCSTOP: /* stop output, like ^S */ 1177 s = spltty(); 1178 if (!ISSET(tp->t_state, TS_TTSTOP)) { 1179 SET(tp->t_state, TS_TTSTOP); 1180 tt_stop(tp, 0); 1181 } 1182 splx(s); 1183 break; 1184 case TIOCSCTTY: /* become controlling tty */ 1185 /* Session ctty vnode pointer set in vnode layer. */ 1186 sx_slock(&proctree_lock); 1187 if (!SESS_LEADER(p) || 1188 ((p->p_session->s_ttyvp || tp->t_session) && 1189 (tp->t_session != p->p_session))) { 1190 sx_sunlock(&proctree_lock); 1191 return (EPERM); 1192 } 1193 tp->t_session = p->p_session; 1194 tp->t_pgrp = p->p_pgrp; 1195 SESS_LOCK(p->p_session); 1196 ttyref(tp); /* ttyrel(): kern_proc.c:pgdelete() */ 1197 p->p_session->s_ttyp = tp; 1198 SESS_UNLOCK(p->p_session); 1199 PROC_LOCK(p); 1200 p->p_flag |= P_CONTROLT; 1201 PROC_UNLOCK(p); 1202 sx_sunlock(&proctree_lock); 1203 break; 1204 case TIOCSPGRP: { /* set pgrp of tty */ 1205 sx_slock(&proctree_lock); 1206 pgrp = pgfind(*(int *)data); 1207 if (!isctty(p, tp)) { 1208 if (pgrp != NULL) 1209 PGRP_UNLOCK(pgrp); 1210 sx_sunlock(&proctree_lock); 1211 return (ENOTTY); 1212 } 1213 if (pgrp == NULL) { 1214 sx_sunlock(&proctree_lock); 1215 return (EPERM); 1216 } 1217 PGRP_UNLOCK(pgrp); 1218 if (pgrp->pg_session != p->p_session) { 1219 sx_sunlock(&proctree_lock); 1220 return (EPERM); 1221 } 1222 sx_sunlock(&proctree_lock); 1223 tp->t_pgrp = pgrp; 1224 break; 1225 } 1226 case TIOCSTAT: /* simulate control-T */ 1227 s = spltty(); 1228 ttyinfo(tp); 1229 splx(s); 1230 break; 1231 case TIOCSWINSZ: /* set window size */ 1232 if (bcmp((caddr_t)&tp->t_winsize, data, 1233 sizeof (struct winsize))) { 1234 tp->t_winsize = *(struct winsize *)data; 1235 if (tp->t_pgrp != NULL) { 1236 PGRP_LOCK(tp->t_pgrp); 1237 pgsignal(tp->t_pgrp, SIGWINCH, 1); 1238 PGRP_UNLOCK(tp->t_pgrp); 1239 } 1240 } 1241 break; 1242 case TIOCSDRAINWAIT: 1243 error = suser(td); 1244 if (error) 1245 return (error); 1246 tp->t_timeout = *(int *)data * hz; 1247 wakeup(TSA_OCOMPLETE(tp)); 1248 wakeup(TSA_OLOWAT(tp)); 1249 break; 1250 case TIOCGDRAINWAIT: 1251 *(int *)data = tp->t_timeout / hz; 1252 break; 1253 case TIOCSBRK: 1254 return (tt_break(tp, 1)); 1255 case TIOCCBRK: 1256 return (tt_break(tp, 0)); 1257 default: 1258#if defined(COMPAT_43) 1259#ifndef BURN_BRIDGES 1260 return (ttcompat(tp, cmd, data, flag)); 1261#else 1262 return (ENOIOCTL); 1263#endif 1264#else 1265 return (ENOIOCTL); 1266#endif 1267 } 1268 return (0); 1269} 1270 1271int 1272ttypoll(struct cdev *dev, int events, struct thread *td) 1273{ 1274 int s; 1275 int revents = 0; 1276 struct tty *tp; 1277 1278 tp = tty_gettp(dev); 1279 1280 if (tp == NULL) /* XXX used to return ENXIO, but that means true! */ 1281 return ((events & (POLLIN | POLLOUT | POLLRDNORM | POLLWRNORM)) 1282 | POLLHUP); 1283 1284 s = spltty(); 1285 if (events & (POLLIN | POLLRDNORM)) { 1286 if (ISSET(tp->t_state, TS_ZOMBIE)) 1287 revents |= (events & (POLLIN | POLLRDNORM)) | 1288 POLLHUP; 1289 else if (ttnread(tp) > 0) 1290 revents |= events & (POLLIN | POLLRDNORM); 1291 else 1292 selrecord(td, &tp->t_rsel); 1293 } 1294 if (events & POLLOUT) { 1295 if (ISSET(tp->t_state, TS_ZOMBIE)) 1296 revents |= POLLHUP; 1297 else if (tp->t_outq.c_cc <= tp->t_olowat && 1298 ISSET(tp->t_state, TS_CONNECTED)) 1299 revents |= events & POLLOUT; 1300 else 1301 selrecord(td, &tp->t_wsel); 1302 } 1303 splx(s); 1304 return (revents); 1305} 1306 1307static struct filterops ttyread_filtops = 1308 { 1, NULL, filt_ttyrdetach, filt_ttyread }; 1309static struct filterops ttywrite_filtops = 1310 { 1, NULL, filt_ttywdetach, filt_ttywrite }; 1311 1312int 1313ttykqfilter(struct cdev *dev, struct knote *kn) 1314{ 1315 struct tty *tp; 1316 struct knlist *klist; 1317 int s; 1318 1319 tp = tty_gettp(dev); 1320 1321 switch (kn->kn_filter) { 1322 case EVFILT_READ: 1323 klist = &tp->t_rsel.si_note; 1324 kn->kn_fop = &ttyread_filtops; 1325 break; 1326 case EVFILT_WRITE: 1327 klist = &tp->t_wsel.si_note; 1328 kn->kn_fop = &ttywrite_filtops; 1329 break; 1330 default: 1331 return (EINVAL); 1332 } 1333 1334 kn->kn_hook = (caddr_t)dev; 1335 1336 s = spltty(); 1337 knlist_add(klist, kn, 0); 1338 splx(s); 1339 1340 return (0); 1341} 1342 1343static void 1344filt_ttyrdetach(struct knote *kn) 1345{ 1346 struct tty *tp = ((struct cdev *)kn->kn_hook)->si_tty; 1347 int s = spltty(); 1348 1349 knlist_remove(&tp->t_rsel.si_note, kn, 0); 1350 splx(s); 1351} 1352 1353static int 1354filt_ttyread(struct knote *kn, long hint) 1355{ 1356 struct tty *tp = ((struct cdev *)kn->kn_hook)->si_tty; 1357 1358 kn->kn_data = ttnread(tp); 1359 if (ISSET(tp->t_state, TS_ZOMBIE)) { 1360 kn->kn_flags |= EV_EOF; 1361 return (1); 1362 } 1363 return (kn->kn_data > 0); 1364} 1365 1366static void 1367filt_ttywdetach(struct knote *kn) 1368{ 1369 struct tty *tp = ((struct cdev *)kn->kn_hook)->si_tty; 1370 int s = spltty(); 1371 1372 knlist_remove(&tp->t_wsel.si_note, kn, 0); 1373 splx(s); 1374} 1375 1376static int 1377filt_ttywrite(struct knote *kn, long hint) 1378{ 1379 struct tty *tp = ((struct cdev *)kn->kn_hook)->si_tty; 1380 1381 kn->kn_data = tp->t_outq.c_cc; 1382 if (ISSET(tp->t_state, TS_ZOMBIE)) 1383 return (1); 1384 return (kn->kn_data <= tp->t_olowat && 1385 ISSET(tp->t_state, TS_CONNECTED)); 1386} 1387 1388/* 1389 * Must be called at spltty(). 1390 */ 1391static int 1392ttnread(struct tty *tp) 1393{ 1394 int nread; 1395 1396 if (ISSET(tp->t_lflag, PENDIN)) 1397 ttypend(tp); 1398 nread = tp->t_canq.c_cc; 1399 if (!ISSET(tp->t_lflag, ICANON)) { 1400 nread += tp->t_rawq.c_cc; 1401 if (nread < tp->t_cc[VMIN] && tp->t_cc[VTIME] == 0) 1402 nread = 0; 1403 } 1404 return (nread); 1405} 1406 1407/* 1408 * Wait for output to drain. 1409 */ 1410int 1411ttywait(struct tty *tp) 1412{ 1413 int error, s; 1414 1415 error = 0; 1416 s = spltty(); 1417 while ((tp->t_outq.c_cc || ISSET(tp->t_state, TS_BUSY)) && 1418 ISSET(tp->t_state, TS_CONNECTED) && tp->t_oproc) { 1419 tt_oproc(tp); 1420 if ((tp->t_outq.c_cc || ISSET(tp->t_state, TS_BUSY)) && 1421 ISSET(tp->t_state, TS_CONNECTED)) { 1422 SET(tp->t_state, TS_SO_OCOMPLETE); 1423 error = ttysleep(tp, TSA_OCOMPLETE(tp), 1424 TTOPRI | PCATCH, "ttywai", 1425 tp->t_timeout); 1426 if (error) { 1427 if (error == EWOULDBLOCK) 1428 error = EIO; 1429 break; 1430 } 1431 } else 1432 break; 1433 } 1434 if (!error && (tp->t_outq.c_cc || ISSET(tp->t_state, TS_BUSY))) 1435 error = EIO; 1436 splx(s); 1437 return (error); 1438} 1439 1440/* 1441 * Flush if successfully wait. 1442 */ 1443static int 1444ttywflush(struct tty *tp) 1445{ 1446 int error; 1447 1448 if ((error = ttywait(tp)) == 0) 1449 ttyflush(tp, FREAD); 1450 return (error); 1451} 1452 1453/* 1454 * Flush tty read and/or write queues, notifying anyone waiting. 1455 */ 1456void 1457ttyflush(struct tty *tp, int rw) 1458{ 1459 int s; 1460 1461 s = spltty(); 1462#if 0 1463again: 1464#endif 1465 if (rw & FWRITE) { 1466 FLUSHQ(&tp->t_outq); 1467 CLR(tp->t_state, TS_TTSTOP); 1468 } 1469 tt_stop(tp, rw); 1470 if (rw & FREAD) { 1471 FLUSHQ(&tp->t_canq); 1472 FLUSHQ(&tp->t_rawq); 1473 CLR(tp->t_lflag, PENDIN); 1474 tp->t_rocount = 0; 1475 tp->t_rocol = 0; 1476 CLR(tp->t_state, TS_LOCAL); 1477 ttwakeup(tp); 1478 if (ISSET(tp->t_state, TS_TBLOCK)) { 1479 if (rw & FWRITE) 1480 FLUSHQ(&tp->t_outq); 1481 ttyunblock(tp); 1482 1483 /* 1484 * Don't let leave any state that might clobber the 1485 * next line discipline (although we should do more 1486 * to send the START char). Not clearing the state 1487 * may have caused the "putc to a clist with no 1488 * reserved cblocks" panic/printf. 1489 */ 1490 CLR(tp->t_state, TS_TBLOCK); 1491 1492#if 0 /* forget it, sleeping isn't always safe and we don't know when it is */ 1493 if (ISSET(tp->t_iflag, IXOFF)) { 1494 /* 1495 * XXX wait a bit in the hope that the stop 1496 * character (if any) will go out. Waiting 1497 * isn't good since it allows races. This 1498 * will be fixed when the stop character is 1499 * put in a special queue. Don't bother with 1500 * the checks in ttywait() since the timeout 1501 * will save us. 1502 */ 1503 SET(tp->t_state, TS_SO_OCOMPLETE); 1504 ttysleep(tp, TSA_OCOMPLETE(tp), TTOPRI, 1505 "ttyfls", hz / 10); 1506 /* 1507 * Don't try sending the stop character again. 1508 */ 1509 CLR(tp->t_state, TS_TBLOCK); 1510 goto again; 1511 } 1512#endif 1513 } 1514 } 1515 if (rw & FWRITE) { 1516 FLUSHQ(&tp->t_outq); 1517 ttwwakeup(tp); 1518 } 1519 splx(s); 1520} 1521 1522/* 1523 * Copy in the default termios characters. 1524 */ 1525void 1526termioschars(struct termios *t) 1527{ 1528 1529 bcopy(ttydefchars, t->c_cc, sizeof t->c_cc); 1530} 1531 1532/* 1533 * Old interface. 1534 */ 1535void 1536ttychars(struct tty *tp) 1537{ 1538 1539 termioschars(&tp->t_termios); 1540} 1541 1542/* 1543 * Handle input high water. Send stop character for the IXOFF case. Turn 1544 * on our input flow control bit and propagate the changes to the driver. 1545 * XXX the stop character should be put in a special high priority queue. 1546 */ 1547void 1548ttyblock(struct tty *tp) 1549{ 1550 1551 SET(tp->t_state, TS_TBLOCK); 1552 if (ISSET(tp->t_iflag, IXOFF) && tp->t_cc[VSTOP] != _POSIX_VDISABLE && 1553 putc(tp->t_cc[VSTOP], &tp->t_outq) != 0) 1554 CLR(tp->t_state, TS_TBLOCK); /* try again later */ 1555 ttstart(tp); 1556} 1557 1558/* 1559 * Handle input low water. Send start character for the IXOFF case. Turn 1560 * off our input flow control bit and propagate the changes to the driver. 1561 * XXX the start character should be put in a special high priority queue. 1562 */ 1563static void 1564ttyunblock(struct tty *tp) 1565{ 1566 1567 CLR(tp->t_state, TS_TBLOCK); 1568 if (ISSET(tp->t_iflag, IXOFF) && tp->t_cc[VSTART] != _POSIX_VDISABLE && 1569 putc(tp->t_cc[VSTART], &tp->t_outq) != 0) 1570 SET(tp->t_state, TS_TBLOCK); /* try again later */ 1571 ttstart(tp); 1572} 1573 1574#ifdef notyet 1575/* Not used by any current (i386) drivers. */ 1576/* 1577 * Restart after an inter-char delay. 1578 */ 1579void 1580ttrstrt(void *tp_arg) 1581{ 1582 struct tty *tp; 1583 int s; 1584 1585 KASSERT(tp_arg != NULL, ("ttrstrt")); 1586 1587 tp = tp_arg; 1588 s = spltty(); 1589 1590 CLR(tp->t_state, TS_TIMEOUT); 1591 ttstart(tp); 1592 1593 splx(s); 1594} 1595#endif 1596 1597int 1598ttstart(struct tty *tp) 1599{ 1600 1601 tt_oproc(tp); 1602 return (0); 1603} 1604 1605/* 1606 * "close" a line discipline 1607 */ 1608int 1609ttylclose(struct tty *tp, int flag) 1610{ 1611 1612 if (flag & FNONBLOCK || ttywflush(tp)) 1613 ttyflush(tp, FREAD | FWRITE); 1614 return (0); 1615} 1616 1617/* 1618 * Handle modem control transition on a tty. 1619 * Flag indicates new state of carrier. 1620 * Returns 0 if the line should be turned off, otherwise 1. 1621 */ 1622int 1623ttymodem(struct tty *tp, int flag) 1624{ 1625 1626 if (ISSET(tp->t_state, TS_CARR_ON) && ISSET(tp->t_cflag, MDMBUF)) { 1627 /* 1628 * MDMBUF: do flow control according to carrier flag 1629 * XXX TS_CAR_OFLOW doesn't do anything yet. TS_TTSTOP 1630 * works if IXON and IXANY are clear. 1631 */ 1632 if (flag) { 1633 CLR(tp->t_state, TS_CAR_OFLOW); 1634 CLR(tp->t_state, TS_TTSTOP); 1635 ttstart(tp); 1636 } else if (!ISSET(tp->t_state, TS_CAR_OFLOW)) { 1637 SET(tp->t_state, TS_CAR_OFLOW); 1638 SET(tp->t_state, TS_TTSTOP); 1639 tt_stop(tp, 0); 1640 } 1641 } else if (flag == 0) { 1642 /* 1643 * Lost carrier. 1644 */ 1645 CLR(tp->t_state, TS_CARR_ON); 1646 if (ISSET(tp->t_state, TS_ISOPEN) && 1647 !ISSET(tp->t_cflag, CLOCAL)) { 1648 SET(tp->t_state, TS_ZOMBIE); 1649 CLR(tp->t_state, TS_CONNECTED); 1650 if (tp->t_session) { 1651 sx_slock(&proctree_lock); 1652 if (tp->t_session->s_leader) { 1653 struct proc *p; 1654 1655 p = tp->t_session->s_leader; 1656 PROC_LOCK(p); 1657 psignal(p, SIGHUP); 1658 PROC_UNLOCK(p); 1659 } 1660 sx_sunlock(&proctree_lock); 1661 } 1662 ttyflush(tp, FREAD | FWRITE); 1663 return (0); 1664 } 1665 } else { 1666 /* 1667 * Carrier now on. 1668 */ 1669 SET(tp->t_state, TS_CARR_ON); 1670 if (!ISSET(tp->t_state, TS_ZOMBIE)) 1671 SET(tp->t_state, TS_CONNECTED); 1672 wakeup(TSA_CARR_ON(tp)); 1673 ttwakeup(tp); 1674 ttwwakeup(tp); 1675 } 1676 return (1); 1677} 1678 1679/* 1680 * Reinput pending characters after state switch 1681 * call at spltty(). 1682 */ 1683static void 1684ttypend(struct tty *tp) 1685{ 1686 struct clist tq; 1687 int c; 1688 1689 CLR(tp->t_lflag, PENDIN); 1690 SET(tp->t_state, TS_TYPEN); 1691 /* 1692 * XXX this assumes too much about clist internals. It may even 1693 * fail if the cblock slush pool is empty. We can't allocate more 1694 * cblocks here because we are called from an interrupt handler 1695 * and clist_alloc_cblocks() can wait. 1696 */ 1697 tq = tp->t_rawq; 1698 bzero(&tp->t_rawq, sizeof tp->t_rawq); 1699 tp->t_rawq.c_cbmax = tq.c_cbmax; 1700 tp->t_rawq.c_cbreserved = tq.c_cbreserved; 1701 while ((c = getc(&tq)) >= 0) 1702 ttyinput(c, tp); 1703 CLR(tp->t_state, TS_TYPEN); 1704} 1705 1706/* 1707 * Process a read call on a tty device. 1708 */ 1709int 1710ttread(struct tty *tp, struct uio *uio, int flag) 1711{ 1712 struct clist *qp; 1713 int c; 1714 tcflag_t lflag; 1715 cc_t *cc = tp->t_cc; 1716 struct thread *td; 1717 struct proc *p; 1718 int s, first, error = 0; 1719 int has_stime = 0, last_cc = 0; 1720 long slp = 0; /* XXX this should be renamed `timo'. */ 1721 struct timeval stime; 1722 struct pgrp *pg; 1723 1724 td = curthread; 1725 p = td->td_proc; 1726loop: 1727 s = spltty(); 1728 lflag = tp->t_lflag; 1729 /* 1730 * take pending input first 1731 */ 1732 if (ISSET(lflag, PENDIN)) { 1733 ttypend(tp); 1734 splx(s); /* reduce latency */ 1735 s = spltty(); 1736 lflag = tp->t_lflag; /* XXX ttypend() clobbers it */ 1737 } 1738 1739 /* 1740 * Hang process if it's in the background. 1741 */ 1742 if (isbackground(p, tp)) { 1743 splx(s); 1744 sx_slock(&proctree_lock); 1745 PROC_LOCK(p); 1746 if (SIGISMEMBER(p->p_sigacts->ps_sigignore, SIGTTIN) || 1747 SIGISMEMBER(td->td_sigmask, SIGTTIN) || 1748 (p->p_flag & P_PPWAIT) || p->p_pgrp->pg_jobc == 0) { 1749 PROC_UNLOCK(p); 1750 sx_sunlock(&proctree_lock); 1751 return (EIO); 1752 } 1753 pg = p->p_pgrp; 1754 PROC_UNLOCK(p); 1755 PGRP_LOCK(pg); 1756 sx_sunlock(&proctree_lock); 1757 pgsignal(pg, SIGTTIN, 1); 1758 PGRP_UNLOCK(pg); 1759 error = ttysleep(tp, &lbolt, TTIPRI | PCATCH, "ttybg2", 0); 1760 if (error) 1761 return (error); 1762 goto loop; 1763 } 1764 1765 if (ISSET(tp->t_state, TS_ZOMBIE)) { 1766 splx(s); 1767 return (0); /* EOF */ 1768 } 1769 1770 /* 1771 * If canonical, use the canonical queue, 1772 * else use the raw queue. 1773 * 1774 * (should get rid of clists...) 1775 */ 1776 qp = ISSET(lflag, ICANON) ? &tp->t_canq : &tp->t_rawq; 1777 1778 if (flag & IO_NDELAY) { 1779 if (qp->c_cc > 0) 1780 goto read; 1781 if (!ISSET(lflag, ICANON) && cc[VMIN] == 0) { 1782 splx(s); 1783 return (0); 1784 } 1785 splx(s); 1786 return (EWOULDBLOCK); 1787 } 1788 if (!ISSET(lflag, ICANON)) { 1789 int m = cc[VMIN]; 1790 long t = cc[VTIME]; 1791 struct timeval timecopy; 1792 1793 /* 1794 * Check each of the four combinations. 1795 * (m > 0 && t == 0) is the normal read case. 1796 * It should be fairly efficient, so we check that and its 1797 * companion case (m == 0 && t == 0) first. 1798 * For the other two cases, we compute the target sleep time 1799 * into slp. 1800 */ 1801 if (t == 0) { 1802 if (qp->c_cc < m) 1803 goto sleep; 1804 if (qp->c_cc > 0) 1805 goto read; 1806 1807 /* m, t and qp->c_cc are all 0. 0 is enough input. */ 1808 splx(s); 1809 return (0); 1810 } 1811 t *= 100000; /* time in us */ 1812#define diff(t1, t2) (((t1).tv_sec - (t2).tv_sec) * 1000000 + \ 1813 ((t1).tv_usec - (t2).tv_usec)) 1814 if (m > 0) { 1815 if (qp->c_cc <= 0) 1816 goto sleep; 1817 if (qp->c_cc >= m) 1818 goto read; 1819 getmicrotime(&timecopy); 1820 if (!has_stime) { 1821 /* first character, start timer */ 1822 has_stime = 1; 1823 stime = timecopy; 1824 slp = t; 1825 } else if (qp->c_cc > last_cc) { 1826 /* got a character, restart timer */ 1827 stime = timecopy; 1828 slp = t; 1829 } else { 1830 /* nothing, check expiration */ 1831 slp = t - diff(timecopy, stime); 1832 if (slp <= 0) 1833 goto read; 1834 } 1835 last_cc = qp->c_cc; 1836 } else { /* m == 0 */ 1837 if (qp->c_cc > 0) 1838 goto read; 1839 getmicrotime(&timecopy); 1840 if (!has_stime) { 1841 has_stime = 1; 1842 stime = timecopy; 1843 slp = t; 1844 } else { 1845 slp = t - diff(timecopy, stime); 1846 if (slp <= 0) { 1847 /* Timed out, but 0 is enough input. */ 1848 splx(s); 1849 return (0); 1850 } 1851 } 1852 } 1853#undef diff 1854 if (slp != 0) { 1855 struct timeval tv; /* XXX style bug. */ 1856 1857 tv.tv_sec = slp / 1000000; 1858 tv.tv_usec = slp % 1000000; 1859 slp = tvtohz(&tv); 1860 /* 1861 * XXX bad variable names. slp was the timeout in 1862 * usec. Now it is the timeout in ticks. 1863 */ 1864 } 1865 goto sleep; 1866 } 1867 if (qp->c_cc <= 0) { 1868sleep: 1869 /* 1870 * There is no input, or not enough input and we can block. 1871 */ 1872 error = ttysleep(tp, TSA_HUP_OR_INPUT(tp), TTIPRI | PCATCH, 1873 ISSET(tp->t_state, TS_CONNECTED) ? 1874 "ttyin" : "ttyhup", (int)slp); 1875 splx(s); 1876 if (error == EWOULDBLOCK) 1877 error = 0; 1878 else if (error) 1879 return (error); 1880 /* 1881 * XXX what happens if another process eats some input 1882 * while we are asleep (not just here)? It would be 1883 * safest to detect changes and reset our state variables 1884 * (has_stime and last_cc). 1885 */ 1886 slp = 0; 1887 goto loop; 1888 } 1889read: 1890 splx(s); 1891 /* 1892 * Input present, check for input mapping and processing. 1893 */ 1894 first = 1; 1895 if (ISSET(lflag, ICANON | ISIG)) 1896 goto slowcase; 1897 for (;;) { 1898 char ibuf[IBUFSIZ]; 1899 int icc; 1900 1901 icc = imin(uio->uio_resid, IBUFSIZ); 1902 icc = q_to_b(qp, ibuf, icc); 1903 if (icc <= 0) { 1904 if (first) 1905 goto loop; 1906 break; 1907 } 1908 error = uiomove(ibuf, icc, uio); 1909 /* 1910 * XXX if there was an error then we should ungetc() the 1911 * unmoved chars and reduce icc here. 1912 */ 1913 if (error) 1914 break; 1915 if (uio->uio_resid == 0) 1916 break; 1917 first = 0; 1918 } 1919 goto out; 1920slowcase: 1921 for (;;) { 1922 c = getc(qp); 1923 if (c < 0) { 1924 if (first) 1925 goto loop; 1926 break; 1927 } 1928 /* 1929 * delayed suspend (^Y) 1930 */ 1931 if (CCEQ(cc[VDSUSP], c) && 1932 ISSET(lflag, IEXTEN | ISIG) == (IEXTEN | ISIG)) { 1933 if (tp->t_pgrp != NULL) { 1934 PGRP_LOCK(tp->t_pgrp); 1935 pgsignal(tp->t_pgrp, SIGTSTP, 1); 1936 PGRP_UNLOCK(tp->t_pgrp); 1937 } 1938 if (first) { 1939 error = ttysleep(tp, &lbolt, TTIPRI | PCATCH, 1940 "ttybg3", 0); 1941 if (error) 1942 break; 1943 goto loop; 1944 } 1945 break; 1946 } 1947 /* 1948 * Interpret EOF only in canonical mode. 1949 */ 1950 if (CCEQ(cc[VEOF], c) && ISSET(lflag, ICANON)) 1951 break; 1952 /* 1953 * Give user character. 1954 */ 1955 error = ureadc(c, uio); 1956 if (error) 1957 /* XXX should ungetc(c, qp). */ 1958 break; 1959 if (uio->uio_resid == 0) 1960 break; 1961 /* 1962 * In canonical mode check for a "break character" 1963 * marking the end of a "line of input". 1964 */ 1965 if (ISSET(lflag, ICANON) && TTBREAKC(c, lflag)) 1966 break; 1967 first = 0; 1968 } 1969 1970out: 1971 /* 1972 * Look to unblock input now that (presumably) 1973 * the input queue has gone down. 1974 */ 1975 s = spltty(); 1976 if (ISSET(tp->t_state, TS_TBLOCK) && 1977 tp->t_rawq.c_cc + tp->t_canq.c_cc <= tp->t_ilowat) 1978 ttyunblock(tp); 1979 splx(s); 1980 1981 return (error); 1982} 1983 1984/* 1985 * Check the output queue on tp for space for a kernel message (from uprintf 1986 * or tprintf). Allow some space over the normal hiwater mark so we don't 1987 * lose messages due to normal flow control, but don't let the tty run amok. 1988 * Sleeps here are not interruptible, but we return prematurely if new signals 1989 * arrive. 1990 */ 1991int 1992ttycheckoutq(struct tty *tp, int wait) 1993{ 1994 int hiwat, s; 1995 sigset_t oldmask; 1996 struct thread *td; 1997 struct proc *p; 1998 1999 td = curthread; 2000 p = td->td_proc; 2001 hiwat = tp->t_ohiwat; 2002 SIGEMPTYSET(oldmask); 2003 s = spltty(); 2004 if (wait) { 2005 PROC_LOCK(p); 2006 oldmask = td->td_siglist; 2007 PROC_UNLOCK(p); 2008 } 2009 if (tp->t_outq.c_cc > hiwat + OBUFSIZ + 100) 2010 while (tp->t_outq.c_cc > hiwat) { 2011 ttstart(tp); 2012 if (tp->t_outq.c_cc <= hiwat) 2013 break; 2014 if (!wait) { 2015 splx(s); 2016 return (0); 2017 } 2018 PROC_LOCK(p); 2019 if (!SIGSETEQ(td->td_siglist, oldmask)) { 2020 PROC_UNLOCK(p); 2021 splx(s); 2022 return (0); 2023 } 2024 PROC_UNLOCK(p); 2025 SET(tp->t_state, TS_SO_OLOWAT); 2026 tsleep(TSA_OLOWAT(tp), PZERO - 1, "ttoutq", hz); 2027 } 2028 splx(s); 2029 return (1); 2030} 2031 2032/* 2033 * Process a write call on a tty device. 2034 */ 2035int 2036ttwrite(struct tty *tp, struct uio *uio, int flag) 2037{ 2038 char *cp = NULL; 2039 int cc, ce; 2040 struct thread *td; 2041 struct proc *p; 2042 int i, hiwat, cnt, error, s; 2043 char obuf[OBUFSIZ]; 2044 2045 hiwat = tp->t_ohiwat; 2046 cnt = uio->uio_resid; 2047 error = 0; 2048 cc = 0; 2049 td = curthread; 2050 p = td->td_proc; 2051loop: 2052 s = spltty(); 2053 if (ISSET(tp->t_state, TS_ZOMBIE)) { 2054 splx(s); 2055 if (uio->uio_resid == cnt) 2056 error = EIO; 2057 goto out; 2058 } 2059 if (!ISSET(tp->t_state, TS_CONNECTED)) { 2060 if (flag & IO_NDELAY) { 2061 splx(s); 2062 error = EWOULDBLOCK; 2063 goto out; 2064 } 2065 error = ttysleep(tp, TSA_CARR_ON(tp), TTIPRI | PCATCH, 2066 "ttywdcd", 0); 2067 splx(s); 2068 if (error) 2069 goto out; 2070 goto loop; 2071 } 2072 splx(s); 2073 /* 2074 * Hang the process if it's in the background. 2075 */ 2076 sx_slock(&proctree_lock); 2077 PROC_LOCK(p); 2078 if (isbackground(p, tp) && 2079 ISSET(tp->t_lflag, TOSTOP) && !(p->p_flag & P_PPWAIT) && 2080 !SIGISMEMBER(p->p_sigacts->ps_sigignore, SIGTTOU) && 2081 !SIGISMEMBER(td->td_sigmask, SIGTTOU)) { 2082 if (p->p_pgrp->pg_jobc == 0) { 2083 PROC_UNLOCK(p); 2084 sx_sunlock(&proctree_lock); 2085 error = EIO; 2086 goto out; 2087 } 2088 PROC_UNLOCK(p); 2089 PGRP_LOCK(p->p_pgrp); 2090 sx_sunlock(&proctree_lock); 2091 pgsignal(p->p_pgrp, SIGTTOU, 1); 2092 PGRP_UNLOCK(p->p_pgrp); 2093 error = ttysleep(tp, &lbolt, TTIPRI | PCATCH, "ttybg4", 0); 2094 if (error) 2095 goto out; 2096 goto loop; 2097 } else { 2098 PROC_UNLOCK(p); 2099 sx_sunlock(&proctree_lock); 2100 } 2101 /* 2102 * Process the user's data in at most OBUFSIZ chunks. Perform any 2103 * output translation. Keep track of high water mark, sleep on 2104 * overflow awaiting device aid in acquiring new space. 2105 */ 2106 while (uio->uio_resid > 0 || cc > 0) { 2107 if (ISSET(tp->t_lflag, FLUSHO)) { 2108 uio->uio_resid = 0; 2109 return (0); 2110 } 2111 if (tp->t_outq.c_cc > hiwat) 2112 goto ovhiwat; 2113 /* 2114 * Grab a hunk of data from the user, unless we have some 2115 * leftover from last time. 2116 */ 2117 if (cc == 0) { 2118 cc = imin(uio->uio_resid, OBUFSIZ); 2119 cp = obuf; 2120 error = uiomove(cp, cc, uio); 2121 if (error) { 2122 cc = 0; 2123 break; 2124 } 2125 } 2126 /* 2127 * If nothing fancy need be done, grab those characters we 2128 * can handle without any of ttyoutput's processing and 2129 * just transfer them to the output q. For those chars 2130 * which require special processing (as indicated by the 2131 * bits in char_type), call ttyoutput. After processing 2132 * a hunk of data, look for FLUSHO so ^O's will take effect 2133 * immediately. 2134 */ 2135 while (cc > 0) { 2136 if (!ISSET(tp->t_oflag, OPOST)) 2137 ce = cc; 2138 else { 2139 ce = cc - scanc((u_int)cc, (u_char *)cp, 2140 char_type, CCLASSMASK); 2141 /* 2142 * If ce is zero, then we're processing 2143 * a special character through ttyoutput. 2144 */ 2145 if (ce == 0) { 2146 tp->t_rocount = 0; 2147 if (ttyoutput(*cp, tp) >= 0) { 2148 /* No Clists, wait a bit. */ 2149 ttstart(tp); 2150 if (flag & IO_NDELAY) { 2151 error = EWOULDBLOCK; 2152 goto out; 2153 } 2154 error = ttysleep(tp, &lbolt, 2155 TTOPRI|PCATCH, 2156 "ttybf1", 0); 2157 if (error) 2158 goto out; 2159 goto loop; 2160 } 2161 cp++; 2162 cc--; 2163 if (ISSET(tp->t_lflag, FLUSHO) || 2164 tp->t_outq.c_cc > hiwat) 2165 goto ovhiwat; 2166 continue; 2167 } 2168 } 2169 /* 2170 * A bunch of normal characters have been found. 2171 * Transfer them en masse to the output queue and 2172 * continue processing at the top of the loop. 2173 * If there are any further characters in this 2174 * <= OBUFSIZ chunk, the first should be a character 2175 * requiring special handling by ttyoutput. 2176 */ 2177 tp->t_rocount = 0; 2178 i = b_to_q(cp, ce, &tp->t_outq); 2179 ce -= i; 2180 tp->t_column += ce; 2181 cp += ce, cc -= ce, tk_nout += ce; 2182 tp->t_outcc += ce; 2183 if (i > 0) { 2184 /* No Clists, wait a bit. */ 2185 ttstart(tp); 2186 if (flag & IO_NDELAY) { 2187 error = EWOULDBLOCK; 2188 goto out; 2189 } 2190 error = ttysleep(tp, &lbolt, TTOPRI | PCATCH, 2191 "ttybf2", 0); 2192 if (error) 2193 goto out; 2194 goto loop; 2195 } 2196 if (ISSET(tp->t_lflag, FLUSHO) || 2197 tp->t_outq.c_cc > hiwat) 2198 break; 2199 } 2200 ttstart(tp); 2201 } 2202out: 2203 /* 2204 * If cc is nonzero, we leave the uio structure inconsistent, as the 2205 * offset and iov pointers have moved forward, but it doesn't matter 2206 * (the call will either return short or restart with a new uio). 2207 */ 2208 uio->uio_resid += cc; 2209 return (error); 2210 2211ovhiwat: 2212 ttstart(tp); 2213 s = spltty(); 2214 /* 2215 * This can only occur if FLUSHO is set in t_lflag, 2216 * or if ttstart/oproc is synchronous (or very fast). 2217 */ 2218 if (tp->t_outq.c_cc <= hiwat) { 2219 splx(s); 2220 goto loop; 2221 } 2222 if (flag & IO_NDELAY) { 2223 splx(s); 2224 uio->uio_resid += cc; 2225 return (uio->uio_resid == cnt ? EWOULDBLOCK : 0); 2226 } 2227 SET(tp->t_state, TS_SO_OLOWAT); 2228 error = ttysleep(tp, TSA_OLOWAT(tp), TTOPRI | PCATCH, "ttywri", 2229 tp->t_timeout); 2230 splx(s); 2231 if (error == EWOULDBLOCK) 2232 error = EIO; 2233 if (error) 2234 goto out; 2235 goto loop; 2236} 2237 2238/* 2239 * Rubout one character from the rawq of tp 2240 * as cleanly as possible. 2241 */ 2242static void 2243ttyrub(int c, struct tty *tp) 2244{ 2245 char *cp; 2246 int savecol; 2247 int tabc, s; 2248 2249 if (!ISSET(tp->t_lflag, ECHO) || ISSET(tp->t_lflag, EXTPROC)) 2250 return; 2251 CLR(tp->t_lflag, FLUSHO); 2252 if (ISSET(tp->t_lflag, ECHOE)) { 2253 if (tp->t_rocount == 0) { 2254 /* 2255 * Screwed by ttwrite; retype 2256 */ 2257 ttyretype(tp); 2258 return; 2259 } 2260 if (c == ('\t' | TTY_QUOTE) || c == ('\n' | TTY_QUOTE)) 2261 ttyrubo(tp, 2); 2262 else { 2263 CLR(c, ~TTY_CHARMASK); 2264 switch (CCLASS(c)) { 2265 case ORDINARY: 2266 ttyrubo(tp, 1); 2267 break; 2268 case BACKSPACE: 2269 case CONTROL: 2270 case NEWLINE: 2271 case RETURN: 2272 case VTAB: 2273 if (ISSET(tp->t_lflag, ECHOCTL)) 2274 ttyrubo(tp, 2); 2275 break; 2276 case TAB: 2277 if (tp->t_rocount < tp->t_rawq.c_cc) { 2278 ttyretype(tp); 2279 return; 2280 } 2281 s = spltty(); 2282 savecol = tp->t_column; 2283 SET(tp->t_state, TS_CNTTB); 2284 SET(tp->t_lflag, FLUSHO); 2285 tp->t_column = tp->t_rocol; 2286 cp = tp->t_rawq.c_cf; 2287 if (cp) 2288 tabc = *cp; /* XXX FIX NEXTC */ 2289 for (; cp; cp = nextc(&tp->t_rawq, cp, &tabc)) 2290 ttyecho(tabc, tp); 2291 CLR(tp->t_lflag, FLUSHO); 2292 CLR(tp->t_state, TS_CNTTB); 2293 splx(s); 2294 2295 /* savecol will now be length of the tab. */ 2296 savecol -= tp->t_column; 2297 tp->t_column += savecol; 2298 if (savecol > 8) 2299 savecol = 8; /* overflow screw */ 2300 while (--savecol >= 0) 2301 (void)ttyoutput('\b', tp); 2302 break; 2303 default: /* XXX */ 2304#define PANICSTR "ttyrub: would panic c = %d, val = %d\n" 2305 (void)printf(PANICSTR, c, CCLASS(c)); 2306#ifdef notdef 2307 panic(PANICSTR, c, CCLASS(c)); 2308#endif 2309 } 2310 } 2311 } else if (ISSET(tp->t_lflag, ECHOPRT)) { 2312 if (!ISSET(tp->t_state, TS_ERASE)) { 2313 SET(tp->t_state, TS_ERASE); 2314 (void)ttyoutput('\\', tp); 2315 } 2316 ttyecho(c, tp); 2317 } else { 2318 ttyecho(tp->t_cc[VERASE], tp); 2319 /* 2320 * This code may be executed not only when an ERASE key 2321 * is pressed, but also when ^U (KILL) or ^W (WERASE) are. 2322 * So, I didn't think it was worthwhile to pass the extra 2323 * information (which would need an extra parameter, 2324 * changing every call) needed to distinguish the ERASE2 2325 * case from the ERASE. 2326 */ 2327 } 2328 --tp->t_rocount; 2329} 2330 2331/* 2332 * Back over cnt characters, erasing them. 2333 */ 2334static void 2335ttyrubo(struct tty *tp, int cnt) 2336{ 2337 2338 while (cnt-- > 0) { 2339 (void)ttyoutput('\b', tp); 2340 (void)ttyoutput(' ', tp); 2341 (void)ttyoutput('\b', tp); 2342 } 2343} 2344 2345/* 2346 * ttyretype -- 2347 * Reprint the rawq line. Note, it is assumed that c_cc has already 2348 * been checked. 2349 */ 2350static void 2351ttyretype(struct tty *tp) 2352{ 2353 char *cp; 2354 int s, c; 2355 2356 /* Echo the reprint character. */ 2357 if (tp->t_cc[VREPRINT] != _POSIX_VDISABLE) 2358 ttyecho(tp->t_cc[VREPRINT], tp); 2359 2360 (void)ttyoutput('\n', tp); 2361 2362 /* 2363 * XXX 2364 * FIX: NEXTC IS BROKEN - DOESN'T CHECK QUOTE 2365 * BIT OF FIRST CHAR. 2366 */ 2367 s = spltty(); 2368 for (cp = tp->t_canq.c_cf, c = (cp != NULL ? *cp : 0); 2369 cp != NULL; cp = nextc(&tp->t_canq, cp, &c)) 2370 ttyecho(c, tp); 2371 for (cp = tp->t_rawq.c_cf, c = (cp != NULL ? *cp : 0); 2372 cp != NULL; cp = nextc(&tp->t_rawq, cp, &c)) 2373 ttyecho(c, tp); 2374 CLR(tp->t_state, TS_ERASE); 2375 splx(s); 2376 2377 tp->t_rocount = tp->t_rawq.c_cc; 2378 tp->t_rocol = 0; 2379} 2380 2381/* 2382 * Echo a typed character to the terminal. 2383 */ 2384static void 2385ttyecho(int c, struct tty *tp) 2386{ 2387 2388 if (!ISSET(tp->t_state, TS_CNTTB)) 2389 CLR(tp->t_lflag, FLUSHO); 2390 if ((!ISSET(tp->t_lflag, ECHO) && 2391 (c != '\n' || !ISSET(tp->t_lflag, ECHONL))) || 2392 ISSET(tp->t_lflag, EXTPROC)) 2393 return; 2394 if (ISSET(tp->t_lflag, ECHOCTL) && 2395 ((ISSET(c, TTY_CHARMASK) <= 037 && c != '\t' && c != '\n') || 2396 ISSET(c, TTY_CHARMASK) == 0177)) { 2397 (void)ttyoutput('^', tp); 2398 CLR(c, ~TTY_CHARMASK); 2399 if (c == 0177) 2400 c = '?'; 2401 else 2402 c += 'A' - 1; 2403 } 2404 (void)ttyoutput(c, tp); 2405} 2406 2407/* 2408 * Wake up any readers on a tty. 2409 */ 2410void 2411ttwakeup(struct tty *tp) 2412{ 2413 2414 if (SEL_WAITING(&tp->t_rsel)) 2415 selwakeuppri(&tp->t_rsel, TTIPRI); 2416 if (ISSET(tp->t_state, TS_ASYNC) && tp->t_sigio != NULL) 2417 pgsigio(&tp->t_sigio, SIGIO, (tp->t_session != NULL)); 2418 wakeup(TSA_HUP_OR_INPUT(tp)); 2419 KNOTE_UNLOCKED(&tp->t_rsel.si_note, 0); 2420} 2421 2422/* 2423 * Wake up any writers on a tty. 2424 */ 2425void 2426ttwwakeup(struct tty *tp) 2427{ 2428 2429 if (SEL_WAITING(&tp->t_wsel) && tp->t_outq.c_cc <= tp->t_olowat) 2430 selwakeuppri(&tp->t_wsel, TTOPRI); 2431 if (ISSET(tp->t_state, TS_ASYNC) && tp->t_sigio != NULL) 2432 pgsigio(&tp->t_sigio, SIGIO, (tp->t_session != NULL)); 2433 if (ISSET(tp->t_state, TS_BUSY | TS_SO_OCOMPLETE) == 2434 TS_SO_OCOMPLETE && tp->t_outq.c_cc == 0) { 2435 CLR(tp->t_state, TS_SO_OCOMPLETE); 2436 wakeup(TSA_OCOMPLETE(tp)); 2437 } 2438 if (ISSET(tp->t_state, TS_SO_OLOWAT) && 2439 tp->t_outq.c_cc <= tp->t_olowat) { 2440 CLR(tp->t_state, TS_SO_OLOWAT); 2441 wakeup(TSA_OLOWAT(tp)); 2442 } 2443 KNOTE_UNLOCKED(&tp->t_wsel.si_note, 0); 2444} 2445 2446/* 2447 * Look up a code for a specified speed in a conversion table; 2448 * used by drivers to map software speed values to hardware parameters. 2449 */ 2450int 2451ttspeedtab(int speed, struct speedtab *table) 2452{ 2453 2454 for ( ; table->sp_speed != -1; table++) 2455 if (table->sp_speed == speed) 2456 return (table->sp_code); 2457 return (-1); 2458} 2459 2460/* 2461 * Set input and output watermarks and buffer sizes. For input, the 2462 * high watermark is about one second's worth of input above empty, the 2463 * low watermark is slightly below high water, and the buffer size is a 2464 * driver-dependent amount above high water. For output, the watermarks 2465 * are near the ends of the buffer, with about 1 second's worth of input 2466 * between them. All this only applies to the standard line discipline. 2467 */ 2468void 2469ttsetwater(struct tty *tp) 2470{ 2471 int cps, ttmaxhiwat, x; 2472 2473 /* Input. */ 2474 clist_alloc_cblocks(&tp->t_canq, TTYHOG, 512); 2475 switch (tp->t_ispeedwat) { 2476 case (speed_t)-1: 2477 cps = tp->t_ispeed / 10; 2478 break; 2479 case 0: 2480 /* 2481 * This case is for old drivers that don't know about 2482 * t_ispeedwat. Arrange for them to get the old buffer 2483 * sizes and watermarks. 2484 */ 2485 cps = TTYHOG - 2 * 256; 2486 tp->t_ififosize = 2 * 256; 2487 break; 2488 default: 2489 cps = tp->t_ispeedwat / 10; 2490 break; 2491 } 2492 tp->t_ihiwat = cps; 2493 tp->t_ilowat = 7 * cps / 8; 2494 x = cps + tp->t_ififosize; 2495 clist_alloc_cblocks(&tp->t_rawq, x, x); 2496 2497 /* Output. */ 2498 switch (tp->t_ospeedwat) { 2499 case (speed_t)-1: 2500 cps = tp->t_ospeed / 10; 2501 ttmaxhiwat = 2 * TTMAXHIWAT; 2502 break; 2503 case 0: 2504 cps = tp->t_ospeed / 10; 2505 ttmaxhiwat = TTMAXHIWAT; 2506 break; 2507 default: 2508 cps = tp->t_ospeedwat / 10; 2509 ttmaxhiwat = 8 * TTMAXHIWAT; 2510 break; 2511 } 2512#define CLAMP(x, h, l) ((x) > h ? h : ((x) < l) ? l : (x)) 2513 tp->t_olowat = x = CLAMP(cps / 2, TTMAXLOWAT, TTMINLOWAT); 2514 x += cps; 2515 x = CLAMP(x, ttmaxhiwat, TTMINHIWAT); /* XXX clamps are too magic */ 2516 tp->t_ohiwat = roundup(x, CBSIZE); /* XXX for compat */ 2517 x = imax(tp->t_ohiwat, TTMAXHIWAT); /* XXX for compat/safety */ 2518 x += OBUFSIZ + 100; 2519 clist_alloc_cblocks(&tp->t_outq, x, x); 2520#undef CLAMP 2521} 2522 2523/* 2524 * Report on state of foreground process group. 2525 */ 2526void 2527ttyinfo(struct tty *tp) 2528{ 2529 struct timeval utime, stime; 2530 struct proc *p, *pick; 2531 struct thread *td; 2532 const char *stateprefix, *state; 2533 long rss; 2534 int load, pctcpu; 2535 pid_t pid; 2536 char comm[MAXCOMLEN + 1]; 2537 2538 if (ttycheckoutq(tp,0) == 0) 2539 return; 2540 2541 /* Print load average. */ 2542 load = (averunnable.ldavg[0] * 100 + FSCALE / 2) >> FSHIFT; 2543 ttyprintf(tp, "load: %d.%02d ", load / 100, load % 100); 2544 2545 /* 2546 * On return following a ttyprintf(), we set tp->t_rocount to 0 so 2547 * that pending input will be retyped on BS. 2548 */ 2549 if (tp->t_session == NULL) { 2550 ttyprintf(tp, "not a controlling terminal\n"); 2551 tp->t_rocount = 0; 2552 return; 2553 } 2554 if (tp->t_pgrp == NULL) { 2555 ttyprintf(tp, "no foreground process group\n"); 2556 tp->t_rocount = 0; 2557 return; 2558 } 2559 PGRP_LOCK(tp->t_pgrp); 2560 if (LIST_EMPTY(&tp->t_pgrp->pg_members)) { 2561 PGRP_UNLOCK(tp->t_pgrp); 2562 ttyprintf(tp, "empty foreground process group\n"); 2563 tp->t_rocount = 0; 2564 return; 2565 } 2566 2567 /* 2568 * Pick the most interesting process and copy some of its 2569 * state for printing later. sched_lock must be held for 2570 * most parts of this. Holding it throughout is simplest 2571 * and prevents even unimportant inconsistencies in the 2572 * copy of the state, but may increase interrupt latency 2573 * too much. 2574 */ 2575 pick = NULL; 2576 mtx_lock_spin(&sched_lock); 2577 LIST_FOREACH(p, &tp->t_pgrp->pg_members, p_pglist) 2578 if (proc_compare(pick, p)) 2579 pick = p; 2580 2581 td = FIRST_THREAD_IN_PROC(pick); /* XXXKSE */ 2582#if 0 2583 KASSERT(td != NULL, ("ttyinfo: no thread")); 2584#else 2585 if (td == NULL) { 2586 mtx_unlock_spin(&sched_lock); 2587 PGRP_UNLOCK(tp->t_pgrp); 2588 ttyprintf(tp, "foreground process without thread\n"); 2589 tp->t_rocount = 0; 2590 return; 2591 } 2592#endif 2593 stateprefix = ""; 2594 if (TD_IS_RUNNING(td)) 2595 state = "running"; 2596 else if (TD_ON_RUNQ(td) || TD_CAN_RUN(td)) 2597 state = "runnable"; 2598 else if (TD_IS_SLEEPING(td)) { 2599 /* XXX: If we're sleeping, are we ever not in a queue? */ 2600 if (TD_ON_SLEEPQ(td)) 2601 state = td->td_wmesg; 2602 else 2603 state = "sleeping without queue"; 2604 } else if (TD_ON_LOCK(td)) { 2605 state = td->td_lockname; 2606 stateprefix = "*"; 2607 } else if (TD_IS_SUSPENDED(td)) 2608 state = "suspended"; 2609 else if (TD_AWAITING_INTR(td)) 2610 state = "intrwait"; 2611 else 2612 state = "unknown"; 2613 pctcpu = (sched_pctcpu(td) * 10000 + FSCALE / 2) >> FSHIFT; 2614 if (pick->p_state == PRS_NEW || pick->p_state == PRS_ZOMBIE) 2615 rss = 0; 2616 else 2617 rss = pgtok(vmspace_resident_count(pick->p_vmspace)); 2618 mtx_unlock_spin(&sched_lock); 2619 PROC_LOCK(pick); 2620 PGRP_UNLOCK(tp->t_pgrp); 2621 calcru(pick, &utime, &stime); 2622 pid = pick->p_pid; 2623 bcopy(pick->p_comm, comm, sizeof(comm)); 2624 PROC_UNLOCK(pick); 2625 2626 /* Print command, pid, state, utime, stime, %cpu, and rss. */ 2627 ttyprintf(tp, 2628 " cmd: %s %d [%s%s] %ld.%02ldu %ld.%02lds %d%% %ldk\n", 2629 comm, pid, stateprefix, state, 2630 (long)utime.tv_sec, utime.tv_usec / 10000, 2631 (long)stime.tv_sec, stime.tv_usec / 10000, 2632 pctcpu / 100, rss); 2633 tp->t_rocount = 0; 2634} 2635 2636/* 2637 * Returns 1 if p2 is "better" than p1 2638 * 2639 * The algorithm for picking the "interesting" process is thus: 2640 * 2641 * 1) Only foreground processes are eligible - implied. 2642 * 2) Runnable processes are favored over anything else. The runner 2643 * with the highest cpu utilization is picked (p_estcpu). Ties are 2644 * broken by picking the highest pid. 2645 * 3) The sleeper with the shortest sleep time is next. With ties, 2646 * we pick out just "short-term" sleepers (P_SINTR == 0). 2647 * 4) Further ties are broken by picking the highest pid. 2648 */ 2649#define ISRUN(p, val) \ 2650do { \ 2651 struct thread *td; \ 2652 val = 0; \ 2653 FOREACH_THREAD_IN_PROC(p, td) { \ 2654 if (TD_ON_RUNQ(td) || \ 2655 TD_IS_RUNNING(td)) { \ 2656 val = 1; \ 2657 break; \ 2658 } \ 2659 } \ 2660} while (0) 2661 2662#define TESTAB(a, b) ((a)<<1 | (b)) 2663#define ONLYA 2 2664#define ONLYB 1 2665#define BOTH 3 2666 2667static int 2668proc_compare(struct proc *p1, struct proc *p2) 2669{ 2670 2671 int esta, estb; 2672 struct ksegrp *kg; 2673 mtx_assert(&sched_lock, MA_OWNED); 2674 if (p1 == NULL) 2675 return (1); 2676 2677 ISRUN(p1, esta); 2678 ISRUN(p2, estb); 2679 2680 /* 2681 * see if at least one of them is runnable 2682 */ 2683 switch (TESTAB(esta, estb)) { 2684 case ONLYA: 2685 return (0); 2686 case ONLYB: 2687 return (1); 2688 case BOTH: 2689 /* 2690 * tie - favor one with highest recent cpu utilization 2691 */ 2692 esta = estb = 0; 2693 FOREACH_KSEGRP_IN_PROC(p1,kg) { 2694 esta += kg->kg_estcpu; 2695 } 2696 FOREACH_KSEGRP_IN_PROC(p2,kg) { 2697 estb += kg->kg_estcpu; 2698 } 2699 if (estb > esta) 2700 return (1); 2701 if (esta > estb) 2702 return (0); 2703 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2704 } 2705 /* 2706 * weed out zombies 2707 */ 2708 switch (TESTAB(p1->p_state == PRS_ZOMBIE, p2->p_state == PRS_ZOMBIE)) { 2709 case ONLYA: 2710 return (1); 2711 case ONLYB: 2712 return (0); 2713 case BOTH: 2714 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2715 } 2716 2717#if 0 /* XXXKSE */ 2718 /* 2719 * pick the one with the smallest sleep time 2720 */ 2721 if (p2->p_slptime > p1->p_slptime) 2722 return (0); 2723 if (p1->p_slptime > p2->p_slptime) 2724 return (1); 2725 /* 2726 * favor one sleeping in a non-interruptible sleep 2727 */ 2728 if (p1->p_sflag & PS_SINTR && (p2->p_sflag & PS_SINTR) == 0) 2729 return (1); 2730 if (p2->p_sflag & PS_SINTR && (p1->p_sflag & PS_SINTR) == 0) 2731 return (0); 2732#endif 2733 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2734} 2735 2736/* 2737 * Output char to tty; console putchar style. 2738 */ 2739int 2740tputchar(int c, struct tty *tp) 2741{ 2742 int s; 2743 2744 s = spltty(); 2745 if (!ISSET(tp->t_state, TS_CONNECTED)) { 2746 splx(s); 2747 return (-1); 2748 } 2749 if (c == '\n') 2750 (void)ttyoutput('\r', tp); 2751 (void)ttyoutput(c, tp); 2752 ttstart(tp); 2753 splx(s); 2754 return (0); 2755} 2756 2757/* 2758 * Sleep on chan, returning ERESTART if tty changed while we napped and 2759 * returning any errors (e.g. EINTR/EWOULDBLOCK) reported by tsleep. If 2760 * the tty is revoked, restarting a pending call will redo validation done 2761 * at the start of the call. 2762 */ 2763int 2764ttysleep(struct tty *tp, void *chan, int pri, char *wmesg, int timo) 2765{ 2766 int error; 2767 int gen; 2768 2769 gen = tp->t_gen; 2770 error = tsleep(chan, pri, wmesg, timo); 2771 if (tp->t_state & TS_GONE) 2772 return (ENXIO); 2773 if (error) 2774 return (error); 2775 return (tp->t_gen == gen ? 0 : ERESTART); 2776} 2777 2778/* 2779 * Gain a reference to a TTY 2780 */ 2781int 2782ttyref(struct tty *tp) 2783{ 2784 int i; 2785 2786 mtx_lock(&tp->t_mtx); 2787 KASSERT(tp->t_refcnt > 0, 2788 ("ttyref(): tty refcnt is %d (%s)", 2789 tp->t_refcnt, tp->t_dev != NULL ? devtoname(tp->t_dev) : "??")); 2790 i = ++tp->t_refcnt; 2791 mtx_unlock(&tp->t_mtx); 2792 return (i); 2793} 2794 2795/* 2796 * Drop a reference to a TTY. 2797 * When reference count drops to zero, we free it. 2798 */ 2799int 2800ttyrel(struct tty *tp) 2801{ 2802 int i; 2803 2804 mtx_lock(&tty_list_mutex); 2805 mtx_lock(&tp->t_mtx); 2806 KASSERT(tp->t_refcnt > 0, 2807 ("ttyrel(): tty refcnt is %d (%s)", 2808 tp->t_refcnt, tp->t_dev != NULL ? devtoname(tp->t_dev) : "??")); 2809 i = --tp->t_refcnt; 2810 if (i != 0) { 2811 mtx_unlock(&tp->t_mtx); 2812 mtx_unlock(&tty_list_mutex); 2813 return (i); 2814 } 2815 TAILQ_REMOVE(&tty_list, tp, t_list); 2816 mtx_unlock(&tp->t_mtx); 2817 mtx_unlock(&tty_list_mutex); 2818 knlist_destroy(&tp->t_rsel.si_note); 2819 knlist_destroy(&tp->t_wsel.si_note); 2820 mtx_destroy(&tp->t_mtx); 2821 free(tp, M_TTYS); 2822 return (i); 2823} 2824 2825/* 2826 * Allocate a tty struct. Clists in the struct will be allocated by 2827 * tty_open(). 2828 */ 2829struct tty * 2830ttymalloc(struct tty *tp) 2831{ 2832 2833 if (tp) { 2834 /* 2835 * XXX: Either this argument should go away, or we should 2836 * XXX: require it and do a ttyrel(tp) here and allocate 2837 * XXX: a new tty. For now do nothing. 2838 */ 2839 return(tp); 2840 } 2841 tp = malloc(sizeof *tp, M_TTYS, M_WAITOK | M_ZERO); 2842 mtx_init(&tp->t_mtx, "tty", NULL, MTX_DEF); 2843 2844 /* 2845 * Set up the initial state 2846 */ 2847 tp->t_refcnt = 1; 2848 tp->t_timeout = -1; 2849 tp->t_dtr_wait = 3 * hz; 2850 2851 ttyinitmode(tp, 0, 0); 2852 bcopy(ttydefchars, tp->t_init_in.c_cc, sizeof tp->t_init_in.c_cc); 2853 2854 /* Make callout the same as callin */ 2855 tp->t_init_out = tp->t_init_in; 2856 2857 mtx_lock(&tty_list_mutex); 2858 TAILQ_INSERT_TAIL(&tty_list, tp, t_list); 2859 mtx_unlock(&tty_list_mutex); 2860 knlist_init(&tp->t_rsel.si_note, &tp->t_mtx, NULL, NULL, NULL); 2861 knlist_init(&tp->t_wsel.si_note, &tp->t_mtx, NULL, NULL, NULL); 2862 return (tp); 2863} 2864 2865struct tty * 2866ttyalloc() 2867{ 2868 2869 return (ttymalloc(NULL)); 2870} 2871 2872static void 2873ttypurge(struct cdev *dev) 2874{ 2875 2876 if (dev->si_tty == NULL) 2877 return; 2878 ttygone(dev->si_tty); 2879} 2880 2881/* 2882 * ttycreate() 2883 * 2884 * Create the device entries for this tty thereby opening it for business. 2885 * 2886 * The flags argument controls if "cua" units are created. 2887 * 2888 * The t_sc filed is copied to si_drv1 in the created cdevs. This 2889 * is particularly important for ->t_cioctl() users. 2890 * 2891 * XXX: implement the init and lock devices by cloning. 2892 */ 2893 2894int 2895ttycreate(struct tty *tp, int flags, const char *fmt, ...) 2896{ 2897 char namebuf[SPECNAMELEN - 3]; /* XXX space for "tty" */ 2898 struct cdevsw *csw = NULL; 2899 int unit = 0; 2900 va_list ap; 2901 struct cdev *cp; 2902 int i, minor, sminor, sunit; 2903 2904 mtx_assert(&Giant, MA_OWNED); 2905 2906 if (tty_unit == NULL) 2907 tty_unit = new_unrhdr(0, 0xffff, NULL); 2908 2909 sunit = alloc_unr(tty_unit); 2910 tp->t_devunit = sunit; 2911 2912 if (csw == NULL) { 2913 csw = &tty_cdevsw; 2914 unit = sunit; 2915 } 2916 KASSERT(csw->d_purge == NULL || csw->d_purge == ttypurge, 2917 ("tty should not have d_purge")); 2918 2919 csw->d_purge = ttypurge; 2920 2921 minor = unit2minor(unit); 2922 sminor = unit2minor(sunit); 2923 va_start(ap, fmt); 2924 i = vsnrprintf(namebuf, sizeof namebuf, 32, fmt, ap); 2925 va_end(ap); 2926 KASSERT(i < sizeof namebuf, ("Too long tty name (%s)", namebuf)); 2927 2928 cp = make_dev(csw, minor, 2929 UID_ROOT, GID_WHEEL, 0600, "tty%s", namebuf); 2930 tp->t_dev = cp; 2931 tp->t_mdev = cp; 2932 cp->si_tty = tp; 2933 cp->si_drv1 = tp->t_sc; 2934 2935 cp = make_dev(&ttys_cdevsw, sminor | MINOR_INIT, 2936 UID_ROOT, GID_WHEEL, 0600, "tty%s.init", namebuf); 2937 dev_depends(tp->t_dev, cp); 2938 cp->si_drv1 = tp->t_sc; 2939 cp->si_drv2 = &tp->t_init_in; 2940 cp->si_tty = tp; 2941 2942 cp = make_dev(&ttys_cdevsw, sminor | MINOR_LOCK, 2943 UID_ROOT, GID_WHEEL, 0600, "tty%s.lock", namebuf); 2944 dev_depends(tp->t_dev, cp); 2945 cp->si_drv1 = tp->t_sc; 2946 cp->si_drv2 = &tp->t_lock_in; 2947 cp->si_tty = tp; 2948 2949 if (flags & TS_CALLOUT) { 2950 cp = make_dev(csw, minor | MINOR_CALLOUT, 2951 UID_UUCP, GID_DIALER, 0660, "cua%s", namebuf); 2952 dev_depends(tp->t_dev, cp); 2953 cp->si_drv1 = tp->t_sc; 2954 cp->si_tty = tp; 2955 2956 cp = make_dev(&ttys_cdevsw, sminor | MINOR_CALLOUT | MINOR_INIT, 2957 UID_UUCP, GID_DIALER, 0660, "cua%s.init", namebuf); 2958 dev_depends(tp->t_dev, cp); 2959 cp->si_drv1 = tp->t_sc; 2960 cp->si_drv2 = &tp->t_init_out; 2961 cp->si_tty = tp; 2962 2963 cp = make_dev(&ttys_cdevsw, sminor | MINOR_CALLOUT | MINOR_LOCK, 2964 UID_UUCP, GID_DIALER, 0660, "cua%s.lock", namebuf); 2965 dev_depends(tp->t_dev, cp); 2966 cp->si_drv1 = tp->t_sc; 2967 cp->si_drv2 = &tp->t_lock_out; 2968 cp->si_tty = tp; 2969 } 2970 2971 return (0); 2972} 2973 2974/* 2975 * This function is called when the hardware disappears. We set a flag 2976 * and wake up stuff so all sleeping threads will notice. 2977 */ 2978void 2979ttygone(struct tty *tp) 2980{ 2981 2982 tp->t_state |= TS_GONE; 2983 wakeup(&tp->t_dtr_wait); 2984 wakeup(TSA_CARR_ON(tp)); 2985 wakeup(TSA_HUP_OR_INPUT(tp)); 2986 wakeup(TSA_OCOMPLETE(tp)); 2987 wakeup(TSA_OLOWAT(tp)); 2988 tt_purge(tp); 2989} 2990 2991/* 2992 * ttyfree() 2993 * 2994 * Called when the driver is ready to free the tty structure. 2995 * 2996 * XXX: This shall sleep until all threads have left the driver. 2997 */ 2998 2999void 3000ttyfree(struct tty *tp) 3001{ 3002 u_int unit; 3003 3004 mtx_assert(&Giant, MA_OWNED); 3005 ttygone(tp); 3006 unit = tp->t_devunit; 3007 destroy_dev(tp->t_mdev); 3008 free_unr(tty_unit, unit); 3009} 3010 3011static int 3012sysctl_kern_ttys(SYSCTL_HANDLER_ARGS) 3013{ 3014 struct tty *tp, *tp2; 3015 struct xtty xt; 3016 int error; 3017 3018 error = 0; 3019 mtx_lock(&tty_list_mutex); 3020 tp = TAILQ_FIRST(&tty_list); 3021 if (tp != NULL) 3022 ttyref(tp); 3023 mtx_unlock(&tty_list_mutex); 3024 while (tp != NULL) { 3025 bzero(&xt, sizeof xt); 3026 xt.xt_size = sizeof xt; 3027#define XT_COPY(field) xt.xt_##field = tp->t_##field 3028 xt.xt_rawcc = tp->t_rawq.c_cc; 3029 xt.xt_cancc = tp->t_canq.c_cc; 3030 xt.xt_outcc = tp->t_outq.c_cc; 3031 XT_COPY(line); 3032 if (tp->t_dev != NULL) 3033 xt.xt_dev = dev2udev(tp->t_dev); 3034 XT_COPY(state); 3035 XT_COPY(flags); 3036 XT_COPY(timeout); 3037 if (tp->t_pgrp != NULL) 3038 xt.xt_pgid = tp->t_pgrp->pg_id; 3039 if (tp->t_session != NULL) 3040 xt.xt_sid = tp->t_session->s_sid; 3041 XT_COPY(termios); 3042 XT_COPY(winsize); 3043 XT_COPY(column); 3044 XT_COPY(rocount); 3045 XT_COPY(rocol); 3046 XT_COPY(ififosize); 3047 XT_COPY(ihiwat); 3048 XT_COPY(ilowat); 3049 XT_COPY(ispeedwat); 3050 XT_COPY(ohiwat); 3051 XT_COPY(olowat); 3052 XT_COPY(ospeedwat); 3053#undef XT_COPY 3054 error = SYSCTL_OUT(req, &xt, sizeof xt); 3055 if (error != 0) { 3056 ttyrel(tp); 3057 return (error); 3058 } 3059 mtx_lock(&tty_list_mutex); 3060 tp2 = TAILQ_NEXT(tp, t_list); 3061 if (tp2 != NULL) 3062 ttyref(tp2); 3063 mtx_unlock(&tty_list_mutex); 3064 ttyrel(tp); 3065 tp = tp2; 3066 } 3067 return (0); 3068} 3069 3070SYSCTL_PROC(_kern, OID_AUTO, ttys, CTLTYPE_OPAQUE|CTLFLAG_RD, 3071 0, 0, sysctl_kern_ttys, "S,xtty", "All ttys"); 3072SYSCTL_LONG(_kern, OID_AUTO, tty_nin, CTLFLAG_RD, 3073 &tk_nin, 0, "Total TTY in characters"); 3074SYSCTL_LONG(_kern, OID_AUTO, tty_nout, CTLFLAG_RD, 3075 &tk_nout, 0, "Total TTY out characters"); 3076 3077void 3078nottystop(struct tty *tp, int rw) 3079{ 3080 3081 return; 3082} 3083 3084int 3085ttyopen(struct cdev *dev, int flag, int mode, struct thread *td) 3086{ 3087 int error; 3088 int s; 3089 struct tty *tp; 3090 3091 tp = dev->si_tty; 3092 s = spltty(); 3093 /* 3094 * We jump to this label after all non-interrupted sleeps to pick 3095 * up any changes of the device state. 3096 */ 3097open_top: 3098 if (tp->t_state & TS_GONE) 3099 return (ENXIO); 3100 error = ttydtrwaitsleep(tp); 3101 if (error) 3102 goto out; 3103 if (tp->t_state & TS_ISOPEN) { 3104 /* 3105 * The device is open, so everything has been initialized. 3106 * Handle conflicts. 3107 */ 3108 if (ISCALLOUT(dev) && !tp->t_actout) 3109 return (EBUSY); 3110 if (tp->t_actout && !ISCALLOUT(dev)) { 3111 if (flag & O_NONBLOCK) 3112 return (EBUSY); 3113 error = tsleep(&tp->t_actout, 3114 TTIPRI | PCATCH, "ttybi", 0); 3115 if (error != 0 || (tp->t_flags & TS_GONE)) 3116 goto out; 3117 goto open_top; 3118 } 3119 if (tp->t_state & TS_XCLUDE && suser(td)) 3120 return (EBUSY); 3121 } else { 3122 /* 3123 * The device isn't open, so there are no conflicts. 3124 * Initialize it. Initialization is done twice in many 3125 * cases: to preempt sleeping callin opens if we are 3126 * callout, and to complete a callin open after DCD rises. 3127 */ 3128 tp->t_termios = ISCALLOUT(dev) ? tp->t_init_out : tp->t_init_in; 3129 tp->t_cflag = tp->t_termios.c_cflag; 3130 if (tp->t_modem != NULL) 3131 tt_modem(tp, SER_DTR | SER_RTS, 0); 3132 ++tp->t_wopeners; 3133 error = tt_param(tp, &tp->t_termios); 3134 --tp->t_wopeners; 3135 if (error == 0) 3136 error = tt_open(tp, dev); 3137 if (error != 0) 3138 goto out; 3139 if (ISCALLOUT(dev) || (tt_modem(tp, 0, 0) & SER_DCD)) 3140 ttyld_modem(tp, 1); 3141 } 3142 /* 3143 * Wait for DCD if necessary. 3144 */ 3145 if (!(tp->t_state & TS_CARR_ON) && !ISCALLOUT(dev) 3146 && !(tp->t_cflag & CLOCAL) && !(flag & O_NONBLOCK)) { 3147 ++tp->t_wopeners; 3148 error = tsleep(TSA_CARR_ON(tp), TTIPRI | PCATCH, "ttydcd", 0); 3149 --tp->t_wopeners; 3150 if (error != 0 || (tp->t_state & TS_GONE)) 3151 goto out; 3152 goto open_top; 3153 } 3154 error = ttyld_open(tp, dev); 3155 ttyldoptim(tp); 3156 if (tp->t_state & TS_ISOPEN && ISCALLOUT(dev)) 3157 tp->t_actout = TRUE; 3158out: 3159 splx(s); 3160 if (!(tp->t_state & TS_ISOPEN) && tp->t_wopeners == 0) 3161 tt_close(tp); 3162 return (error); 3163} 3164 3165int 3166ttyclose(struct cdev *dev, int flag, int mode, struct thread *td) 3167{ 3168 struct tty *tp; 3169 3170 tp = dev->si_tty; 3171 ttyld_close(tp, flag); 3172 ttyldoptim(tp); 3173 tt_close(tp); 3174 tp->t_do_timestamp = 0; 3175 if (tp->t_pps != NULL) 3176 tp->t_pps->ppsparam.mode = 0; 3177 tty_close(tp); 3178 return (0); 3179} 3180 3181int 3182ttyread(struct cdev *dev, struct uio *uio, int flag) 3183{ 3184 struct tty *tp; 3185 3186 tp = tty_gettp(dev); 3187 3188 if (tp->t_state & TS_GONE) 3189 return (ENODEV); 3190 return (ttyld_read(tp, uio, flag)); 3191} 3192 3193int 3194ttywrite(struct cdev *dev, struct uio *uio, int flag) 3195{ 3196 struct tty *tp; 3197 3198 tp = tty_gettp(dev); 3199 3200 if (tp->t_state & TS_GONE) 3201 return (ENODEV); 3202 return (ttyld_write(tp, uio, flag)); 3203} 3204 3205int 3206ttyioctl(struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td) 3207{ 3208 struct tty *tp; 3209 int error; 3210 3211 tp = dev->si_tty; 3212 3213 if (cmd == TIOCSETA || cmd == TIOCSETAW || cmd == TIOCSETAF) { 3214 int cc; 3215 struct termios *dt = (struct termios *)data; 3216 struct termios *lt = 3217 ISCALLOUT(dev) ? &tp->t_lock_out : &tp->t_lock_in; 3218 3219 dt->c_iflag = (tp->t_iflag & lt->c_iflag) 3220 | (dt->c_iflag & ~lt->c_iflag); 3221 dt->c_oflag = (tp->t_oflag & lt->c_oflag) 3222 | (dt->c_oflag & ~lt->c_oflag); 3223 dt->c_cflag = (tp->t_cflag & lt->c_cflag) 3224 | (dt->c_cflag & ~lt->c_cflag); 3225 dt->c_lflag = (tp->t_lflag & lt->c_lflag) 3226 | (dt->c_lflag & ~lt->c_lflag); 3227 for (cc = 0; cc < NCCS; ++cc) 3228 if (lt->c_cc[cc] != 0) 3229 dt->c_cc[cc] = tp->t_cc[cc]; 3230 if (lt->c_ispeed != 0) 3231 dt->c_ispeed = tp->t_ispeed; 3232 if (lt->c_ospeed != 0) 3233 dt->c_ospeed = tp->t_ospeed; 3234 } 3235 3236 error = ttyld_ioctl(tp, cmd, data, flag, td); 3237 if (error == ENOIOCTL) 3238 error = ttioctl(tp, cmd, data, flag); 3239 ttyldoptim(tp); 3240 if (error != ENOIOCTL) 3241 return (error); 3242 return (ENOTTY); 3243} 3244 3245void 3246ttyldoptim(struct tty *tp) 3247{ 3248 struct termios *t; 3249 3250 t = &tp->t_termios; 3251 if (!(t->c_iflag & (ICRNL | IGNCR | IMAXBEL | INLCR | ISTRIP | IXON)) 3252 && (!(t->c_iflag & BRKINT) || (t->c_iflag & IGNBRK)) 3253 && (!(t->c_iflag & PARMRK) 3254 || (t->c_iflag & (IGNPAR | IGNBRK)) == (IGNPAR | IGNBRK)) 3255 && !(t->c_lflag & (ECHO | ICANON | IEXTEN | ISIG | PENDIN)) 3256 && linesw[tp->t_line]->l_rint == ttyinput) 3257 tp->t_state |= TS_CAN_BYPASS_L_RINT; 3258 else 3259 tp->t_state &= ~TS_CAN_BYPASS_L_RINT; 3260} 3261 3262static void 3263ttydtrwaitwakeup(void *arg) 3264{ 3265 struct tty *tp; 3266 3267 tp = arg; 3268 tp->t_state &= ~TS_DTR_WAIT; 3269 wakeup(&tp->t_dtr_wait); 3270} 3271 3272 3273void 3274ttydtrwaitstart(struct tty *tp) 3275{ 3276 3277 if (tp->t_dtr_wait == 0) 3278 return; 3279 if (tp->t_state & TS_DTR_WAIT) 3280 return; 3281 timeout(ttydtrwaitwakeup, tp, tp->t_dtr_wait); 3282 tp->t_state |= TS_DTR_WAIT; 3283} 3284 3285int 3286ttydtrwaitsleep(struct tty *tp) 3287{ 3288 int error; 3289 3290 error = 0; 3291 while (error == 0) { 3292 if (tp->t_state & TS_GONE) 3293 error = ENXIO; 3294 else if (!(tp->t_state & TS_DTR_WAIT)) 3295 break; 3296 else 3297 error = tsleep(&tp->t_dtr_wait, TTIPRI | PCATCH, 3298 "dtrwait", 0); 3299 } 3300 return (error); 3301} 3302 3303static int 3304ttysopen(struct cdev *dev, int flag, int mode, struct thread *td) 3305{ 3306 struct tty *tp; 3307 3308 tp = dev->si_tty; 3309 KASSERT(tp != NULL, 3310 ("ttysopen(): no tty pointer on device (%s)", devtoname(dev))); 3311 if (tp->t_state & TS_GONE) 3312 return (ENODEV); 3313 return (0); 3314} 3315 3316static int 3317ttysclose(struct cdev *dev, int flag, int mode, struct thread *td) 3318{ 3319 3320 return (0); 3321} 3322 3323static int 3324ttysrdwr(struct cdev *dev, struct uio *uio, int flag) 3325{ 3326 3327 return (ENODEV); 3328} 3329 3330static int 3331ttysioctl(struct cdev *dev, u_long cmd, caddr_t data, int flag, struct thread *td) 3332{ 3333 struct tty *tp; 3334 int error; 3335 struct termios *ct; 3336 3337 tp = dev->si_tty; 3338 KASSERT(tp != NULL, 3339 ("ttysopen(): no tty pointer on device (%s)", devtoname(dev))); 3340 if (tp->t_state & TS_GONE) 3341 return (ENODEV); 3342 ct = dev->si_drv2; 3343 switch (cmd) { 3344 case TIOCSETA: 3345 error = suser(td); 3346 if (error != 0) 3347 return (error); 3348 *ct = *(struct termios *)data; 3349 return (0); 3350 case TIOCGETA: 3351 *(struct termios *)data = *ct; 3352 return (0); 3353 case TIOCGETD: 3354 *(int *)data = TTYDISC; 3355 return (0); 3356 case TIOCGWINSZ: 3357 bzero(data, sizeof(struct winsize)); 3358 return (0); 3359 default: 3360 if (tp->t_cioctl != NULL) 3361 return(tp->t_cioctl(dev, cmd, data, flag, td)); 3362 return (ENOTTY); 3363 } 3364} 3365 3366/* 3367 * Initialize a tty to sane modes. 3368 */ 3369void 3370ttyinitmode(struct tty *tp, int echo, int speed) 3371{ 3372 3373 if (speed == 0) 3374 speed = TTYDEF_SPEED; 3375 tp->t_init_in.c_iflag = TTYDEF_IFLAG; 3376 tp->t_init_in.c_oflag = TTYDEF_OFLAG; 3377 tp->t_init_in.c_cflag = TTYDEF_CFLAG; 3378 if (echo) 3379 tp->t_init_in.c_lflag = TTYDEF_LFLAG_ECHO; 3380 else 3381 tp->t_init_in.c_lflag = TTYDEF_LFLAG_NOECHO; 3382 3383 tp->t_init_in.c_ispeed = tp->t_init_in.c_ospeed = speed; 3384 termioschars(&tp->t_init_in); 3385 tp->t_init_out = tp->t_init_in; 3386 tp->t_termios = tp->t_init_in; 3387} 3388 3389/* 3390 * Use more "normal" termios paramters for consoles. 3391 */ 3392void 3393ttyconsolemode(struct tty *tp, int speed) 3394{ 3395 3396 if (speed == 0) 3397 speed = TTYDEF_SPEED; 3398 ttyinitmode(tp, 1, speed); 3399 tp->t_init_in.c_cflag |= CLOCAL; 3400 tp->t_lock_out.c_cflag = tp->t_lock_in.c_cflag = CLOCAL; 3401 tp->t_lock_out.c_ispeed = tp->t_lock_out.c_ospeed = 3402 tp->t_lock_in.c_ispeed = tp->t_lock_in.c_ospeed = speed; 3403 tp->t_init_out = tp->t_init_in; 3404 tp->t_termios = tp->t_init_in; 3405 ttsetwater(tp); 3406} 3407 3408/* 3409 * Record the relationship between the serial ports notion of modem control 3410 * signals and the one used in certain ioctls in a way the compiler can enforce 3411 * XXX: We should define TIOCM_* in terms of SER_ if we can limit the 3412 * XXX: consequences of the #include work that would take. 3413 */ 3414CTASSERT(SER_DTR == TIOCM_DTR / 2); 3415CTASSERT(SER_RTS == TIOCM_RTS / 2); 3416CTASSERT(SER_STX == TIOCM_ST / 2); 3417CTASSERT(SER_SRX == TIOCM_SR / 2); 3418CTASSERT(SER_CTS == TIOCM_CTS / 2); 3419CTASSERT(SER_DCD == TIOCM_DCD / 2); 3420CTASSERT(SER_RI == TIOCM_RI / 2); 3421CTASSERT(SER_DSR == TIOCM_DSR / 2); 3422 3423