1 /* $NetBSD: tty.c,v 1.208 2007/12/08 19:29:49 pooka Exp $ */ 2 3 /*- 4 * Copyright (c) 1982, 1986, 1990, 1991, 1993 5 * The Regents of the University of California. All rights reserved. 6 * (c) UNIX System Laboratories, Inc. 7 * All or some portions of this file are derived from material licensed 8 * to the University of California by American Telephone and Telegraph 9 * Co. or Unix System Laboratories, Inc. and are reproduced herein with 10 * the permission of UNIX System Laboratories, Inc. 11 * 12 * Redistribution and use in source and binary forms, with or without 13 * modification, are permitted provided that the following conditions 14 * are met: 15 * 1. Redistributions of source code must retain the above copyright 16 * notice, this list of conditions and the following disclaimer. 17 * 2. Redistributions in binary form must reproduce the above copyright 18 * notice, this list of conditions and the following disclaimer in the 19 * documentation and/or other materials provided with the distribution. 20 * 3. Neither the name of the University nor the names of its contributors 21 * may be used to endorse or promote products derived from this software 22 * without specific prior written permission. 23 * 24 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 25 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 26 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 27 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 28 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 29 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 30 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 31 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 32 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 33 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 34 * SUCH DAMAGE. 35 * 36 * @(#)tty.c 8.13 (Berkeley) 1/9/95 37 */ 38 39 #include <sys/cdefs.h> 40 __KERNEL_RCSID(0, "$NetBSD: tty.c,v 1.208 2007/12/08 19:29:49 pooka Exp $"); 41 42 #include <sys/param.h> 43 #include <sys/systm.h> 44 #include <sys/ioctl.h> 45 #include <sys/proc.h> 46 #define TTYDEFCHARS 47 #include <sys/tty.h> 48 #undef TTYDEFCHARS 49 #include <sys/file.h> 50 #include <sys/conf.h> 51 #include <sys/dkstat.h> 52 #include <sys/uio.h> 53 #include <sys/kernel.h> 54 #include <sys/vnode.h> 55 #include <sys/syslog.h> 56 #include <sys/malloc.h> 57 #include <sys/pool.h> 58 #include <sys/signalvar.h> 59 #include <sys/resourcevar.h> 60 #include <sys/poll.h> 61 #include <sys/kprintf.h> 62 #include <sys/namei.h> 63 #include <sys/sysctl.h> 64 #include <sys/kauth.h> 65 #include <sys/intr.h> 66 67 #include <machine/stdarg.h> 68 69 static int ttnread(struct tty *); 70 static void ttyblock(struct tty *); 71 static void ttyecho(int, struct tty *); 72 static void ttyrubo(struct tty *, int); 73 static void ttyprintf_nolock(struct tty *, const char *fmt, ...) 74 __attribute__((__format__(__printf__,2,3))); 75 static int proc_compare(struct proc *, struct proc *); 76 static void ttysigintr(void *); 77 78 /* Symbolic sleep message strings. */ 79 const char ttclos[] = "ttycls"; 80 const char ttopen[] = "ttyopn"; 81 const char ttybg[] = "ttybg"; 82 const char ttyin[] = "ttyin"; 83 const char ttyout[] = "ttyout"; 84 85 /* 86 * Used to determine whether we still have a connection. This is true in 87 * one of 3 cases: 88 * 1) We have carrier. 89 * 2) It's a locally attached terminal, and we are therefore ignoring carrier. 90 * 3) We're using a flow control mechanism that overloads the carrier signal. 91 */ 92 #define CONNECTED(tp) (ISSET(tp->t_state, TS_CARR_ON) || \ 93 ISSET(tp->t_cflag, CLOCAL | MDMBUF)) 94 95 /* 96 * Table with character classes and parity. The 8th bit indicates parity, 97 * the 7th bit indicates the character is an alphameric or underscore (for 98 * ALTWERASE), and the low 6 bits indicate delay type. If the low 6 bits 99 * are 0 then the character needs no special processing on output; classes 100 * other than 0 might be translated or (not currently) require delays. 101 */ 102 #define E 0x00 /* Even parity. */ 103 #define O 0x80 /* Odd parity. */ 104 #define PARITY(c) (char_type[c] & O) 105 106 #define ALPHA 0x40 /* Alpha or underscore. */ 107 #define ISALPHA(c) (char_type[(c) & TTY_CHARMASK] & ALPHA) 108 109 #define CCLASSMASK 0x3f 110 #define CCLASS(c) (char_type[c] & CCLASSMASK) 111 112 #define BS BACKSPACE 113 #define CC CONTROL 114 #define CR RETURN 115 #define NA ORDINARY | ALPHA 116 #define NL NEWLINE 117 #define NO ORDINARY 118 #define TB TAB 119 #define VT VTAB 120 121 unsigned char const char_type[] = { 122 E|CC, O|CC, O|CC, E|CC, O|CC, E|CC, E|CC, O|CC, /* nul - bel */ 123 O|BS, E|TB, E|NL, O|CC, E|VT, O|CR, O|CC, E|CC, /* bs - si */ 124 O|CC, E|CC, E|CC, O|CC, E|CC, O|CC, O|CC, E|CC, /* dle - etb */ 125 E|CC, O|CC, O|CC, E|CC, O|CC, E|CC, E|CC, O|CC, /* can - us */ 126 O|NO, E|NO, E|NO, O|NO, E|NO, O|NO, O|NO, E|NO, /* sp - ' */ 127 E|NO, O|NO, O|NO, E|NO, O|NO, E|NO, E|NO, O|NO, /* ( - / */ 128 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* 0 - 7 */ 129 O|NA, E|NA, E|NO, O|NO, E|NO, O|NO, O|NO, E|NO, /* 8 - ? */ 130 O|NO, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* @ - G */ 131 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* H - O */ 132 E|NA, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* P - W */ 133 O|NA, E|NA, E|NA, O|NO, E|NO, O|NO, O|NO, O|NA, /* X - _ */ 134 E|NO, O|NA, O|NA, E|NA, O|NA, E|NA, E|NA, O|NA, /* ` - g */ 135 O|NA, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* h - o */ 136 O|NA, E|NA, E|NA, O|NA, E|NA, O|NA, O|NA, E|NA, /* p - w */ 137 E|NA, O|NA, O|NA, E|NO, O|NO, E|NO, E|NO, O|CC, /* x - del */ 138 /* 139 * Meta chars; should be settable per character set; 140 * for now, treat them all as normal characters. 141 */ 142 NA, NA, NA, NA, NA, NA, NA, NA, 143 NA, NA, NA, NA, NA, NA, NA, NA, 144 NA, NA, NA, NA, NA, NA, NA, NA, 145 NA, NA, NA, NA, NA, NA, NA, NA, 146 NA, NA, NA, NA, NA, NA, NA, NA, 147 NA, NA, NA, NA, NA, NA, NA, NA, 148 NA, NA, NA, NA, NA, NA, NA, NA, 149 NA, NA, NA, NA, NA, NA, NA, NA, 150 NA, NA, NA, NA, NA, NA, NA, NA, 151 NA, NA, NA, NA, NA, NA, NA, NA, 152 NA, NA, NA, NA, NA, NA, NA, NA, 153 NA, NA, NA, NA, NA, NA, NA, NA, 154 NA, NA, NA, NA, NA, NA, NA, NA, 155 NA, NA, NA, NA, NA, NA, NA, NA, 156 NA, NA, NA, NA, NA, NA, NA, NA, 157 NA, NA, NA, NA, NA, NA, NA, NA, 158 }; 159 #undef BS 160 #undef CC 161 #undef CR 162 #undef NA 163 #undef NL 164 #undef NO 165 #undef TB 166 #undef VT 167 168 static struct ttylist_head tty_sigqueue = TAILQ_HEAD_INITIALIZER(tty_sigqueue); 169 static void *tty_sigsih; 170 171 struct ttylist_head ttylist = TAILQ_HEAD_INITIALIZER(ttylist); 172 int tty_count; 173 kmutex_t tty_lock; 174 175 POOL_INIT(tty_pool, sizeof(struct tty), 0, 0, 0, "ttypl", 176 &pool_allocator_nointr, IPL_NONE); 177 178 uint64_t tk_cancc; 179 uint64_t tk_nin; 180 uint64_t tk_nout; 181 uint64_t tk_rawcc; 182 183 SYSCTL_SETUP(sysctl_kern_tkstat_setup, "sysctl kern.tkstat subtree setup") 184 { 185 186 sysctl_createv(clog, 0, NULL, NULL, 187 CTLFLAG_PERMANENT, 188 CTLTYPE_NODE, "kern", NULL, 189 NULL, 0, NULL, 0, 190 CTL_KERN, CTL_EOL); 191 sysctl_createv(clog, 0, NULL, NULL, 192 CTLFLAG_PERMANENT, 193 CTLTYPE_NODE, "tkstat", 194 SYSCTL_DESCR("Number of characters sent and and " 195 "received on ttys"), 196 NULL, 0, NULL, 0, 197 CTL_KERN, KERN_TKSTAT, CTL_EOL); 198 199 sysctl_createv(clog, 0, NULL, NULL, 200 CTLFLAG_PERMANENT, 201 CTLTYPE_QUAD, "nin", 202 SYSCTL_DESCR("Total number of tty input characters"), 203 NULL, 0, &tk_nin, 0, 204 CTL_KERN, KERN_TKSTAT, KERN_TKSTAT_NIN, CTL_EOL); 205 sysctl_createv(clog, 0, NULL, NULL, 206 CTLFLAG_PERMANENT, 207 CTLTYPE_QUAD, "nout", 208 SYSCTL_DESCR("Total number of tty output characters"), 209 NULL, 0, &tk_nout, 0, 210 CTL_KERN, KERN_TKSTAT, KERN_TKSTAT_NOUT, CTL_EOL); 211 sysctl_createv(clog, 0, NULL, NULL, 212 CTLFLAG_PERMANENT, 213 CTLTYPE_QUAD, "cancc", 214 SYSCTL_DESCR("Number of canonical tty input characters"), 215 NULL, 0, &tk_cancc, 0, 216 CTL_KERN, KERN_TKSTAT, KERN_TKSTAT_CANCC, CTL_EOL); 217 sysctl_createv(clog, 0, NULL, NULL, 218 CTLFLAG_PERMANENT, 219 CTLTYPE_QUAD, "rawcc", 220 SYSCTL_DESCR("Number of raw tty input characters"), 221 NULL, 0, &tk_rawcc, 0, 222 CTL_KERN, KERN_TKSTAT, KERN_TKSTAT_RAWCC, CTL_EOL); 223 } 224 225 int 226 ttyopen(struct tty *tp, int dialout, int nonblock) 227 { 228 int error; 229 230 error = 0; 231 232 mutex_spin_enter(&tty_lock); 233 234 if (dialout) { 235 /* 236 * If the device is already open for non-dialout, fail. 237 * Otherwise, set TS_DIALOUT to block any pending non-dialout 238 * opens. 239 */ 240 if (ISSET(tp->t_state, TS_ISOPEN) && 241 !ISSET(tp->t_state, TS_DIALOUT)) { 242 error = EBUSY; 243 goto out; 244 } 245 SET(tp->t_state, TS_DIALOUT); 246 } else { 247 if (!nonblock) { 248 /* 249 * Wait for carrier. Also wait for any dialout 250 * processes to close the tty first. 251 */ 252 while (ISSET(tp->t_state, TS_DIALOUT) || 253 !CONNECTED(tp)) { 254 tp->t_wopen++; 255 error = ttysleep(tp, &tp->t_rawq.c_cv, true, 0); 256 tp->t_wopen--; 257 if (error) 258 goto out; 259 } 260 } else { 261 /* 262 * Don't allow a non-blocking non-dialout open if the 263 * device is already open for dialout. 264 */ 265 if (ISSET(tp->t_state, TS_DIALOUT)) { 266 error = EBUSY; 267 goto out; 268 } 269 } 270 } 271 272 out: 273 mutex_spin_exit(&tty_lock); 274 return (error); 275 } 276 277 /* 278 * Initial open of tty, or (re)entry to standard tty line discipline. 279 */ 280 int 281 ttylopen(dev_t device, struct tty *tp) 282 { 283 284 mutex_spin_enter(&tty_lock); 285 tp->t_dev = device; 286 if (!ISSET(tp->t_state, TS_ISOPEN)) { 287 SET(tp->t_state, TS_ISOPEN); 288 memset(&tp->t_winsize, 0, sizeof(tp->t_winsize)); 289 #ifdef COMPAT_OLDTTY 290 tp->t_flags = 0; 291 #endif 292 } 293 mutex_spin_exit(&tty_lock); 294 return (0); 295 } 296 297 /* 298 * Handle close() on a tty line: flush and set to initial state, 299 * bumping generation number so that pending read/write calls 300 * can detect recycling of the tty. 301 */ 302 int 303 ttyclose(struct tty *tp) 304 { 305 extern struct tty *constty; /* Temporary virtual console. */ 306 struct session *sess; 307 308 mutex_spin_enter(&tty_lock); 309 310 if (constty == tp) 311 constty = NULL; 312 313 ttyflush(tp, FREAD | FWRITE); 314 315 tp->t_gen++; 316 tp->t_pgrp = NULL; 317 tp->t_state = 0; 318 319 mutex_spin_exit(&tty_lock); 320 321 mutex_enter(&proclist_lock); 322 if ((sess = tp->t_session) != NULL) { 323 SESSRELE(tp->t_session); 324 tp->t_session = NULL; 325 } 326 mutex_exit(&proclist_lock); 327 328 return (0); 329 } 330 331 #define FLUSHQ(q) { \ 332 if ((q)->c_cc) \ 333 ndflush(q, (q)->c_cc); \ 334 } 335 336 /* 337 * This macro is used in canonical mode input processing, where a read 338 * request shall not return unless a 'line delimiter' ('\n') or 'break' 339 * (EOF, EOL, EOL2) character (or a signal) has been received. As EOL2 340 * is an extension to the POSIX.1 defined set of special characters, 341 * recognize it only if IEXTEN is set in the set of local flags. 342 */ 343 #define TTBREAKC(c, lflg) \ 344 ((c) == '\n' || (((c) == cc[VEOF] || (c) == cc[VEOL] || \ 345 ((c) == cc[VEOL2] && ISSET(lflg, IEXTEN))) && (c) != _POSIX_VDISABLE)) 346 347 348 349 /* 350 * ttyinput() helper. 351 * Call with the tty lock held. 352 */ 353 static int 354 ttyinput_wlock(int c, struct tty *tp) 355 { 356 int iflag, lflag, i, error; 357 u_char *cc; 358 359 KASSERT(mutex_owned(&tty_lock)); 360 361 /* 362 * If input is pending take it first. 363 */ 364 lflag = tp->t_lflag; 365 if (ISSET(lflag, PENDIN)) 366 ttypend(tp); 367 /* 368 * Gather stats. 369 */ 370 if (ISSET(lflag, ICANON)) { 371 ++tk_cancc; 372 ++tp->t_cancc; 373 } else { 374 ++tk_rawcc; 375 ++tp->t_rawcc; 376 } 377 ++tk_nin; 378 379 cc = tp->t_cc; 380 381 /* 382 * Handle exceptional conditions (break, parity, framing). 383 */ 384 iflag = tp->t_iflag; 385 if ((error = (ISSET(c, TTY_ERRORMASK))) != 0) { 386 CLR(c, TTY_ERRORMASK); 387 if (ISSET(error, TTY_FE) && c == 0) { /* Break. */ 388 if (ISSET(iflag, IGNBRK)) 389 return (0); 390 else if (ISSET(iflag, BRKINT)) { 391 ttyflush(tp, FREAD | FWRITE); 392 ttysig(tp, TTYSIG_PG1, SIGINT); 393 return (0); 394 } else if (ISSET(iflag, PARMRK)) 395 goto parmrk; 396 } else if ((ISSET(error, TTY_PE) && ISSET(iflag, INPCK)) || 397 ISSET(error, TTY_FE)) { 398 if (ISSET(iflag, IGNPAR)) 399 return (0); 400 else if (ISSET(iflag, PARMRK)) { 401 parmrk: (void)putc(0377 | TTY_QUOTE, &tp->t_rawq); 402 (void)putc(0 | TTY_QUOTE, &tp->t_rawq); 403 (void)putc(c | TTY_QUOTE, &tp->t_rawq); 404 return (0); 405 } else 406 c = 0; 407 } 408 } else if (c == 0377 && 409 ISSET(iflag, ISTRIP|IGNPAR|INPCK|PARMRK) == (INPCK|PARMRK)) { 410 /* "Escape" a valid character of '\377'. */ 411 (void)putc(0377 | TTY_QUOTE, &tp->t_rawq); 412 (void)putc(0377 | TTY_QUOTE, &tp->t_rawq); 413 goto endcase; 414 } 415 416 /* 417 * In tandem mode, check high water mark. 418 */ 419 if (ISSET(iflag, IXOFF) || ISSET(tp->t_cflag, CHWFLOW)) 420 ttyblock(tp); 421 if (!ISSET(tp->t_state, TS_TYPEN) && ISSET(iflag, ISTRIP)) 422 CLR(c, 0x80); 423 if (!ISSET(lflag, EXTPROC)) { 424 /* 425 * Check for literal nexting very first 426 */ 427 if (ISSET(tp->t_state, TS_LNCH)) { 428 SET(c, TTY_QUOTE); 429 CLR(tp->t_state, TS_LNCH); 430 } 431 /* 432 * Scan for special characters. This code 433 * is really just a big case statement with 434 * non-constant cases. The bottom of the 435 * case statement is labeled ``endcase'', so goto 436 * it after a case match, or similar. 437 */ 438 439 /* 440 * Control chars which aren't controlled 441 * by ICANON, ISIG, or IXON. 442 */ 443 if (ISSET(lflag, IEXTEN)) { 444 if (CCEQ(cc[VLNEXT], c)) { 445 if (ISSET(lflag, ECHO)) { 446 if (ISSET(lflag, ECHOE)) { 447 (void)ttyoutput('^', tp); 448 (void)ttyoutput('\b', tp); 449 } else 450 ttyecho(c, tp); 451 } 452 SET(tp->t_state, TS_LNCH); 453 goto endcase; 454 } 455 if (CCEQ(cc[VDISCARD], c)) { 456 if (ISSET(lflag, FLUSHO)) 457 CLR(tp->t_lflag, FLUSHO); 458 else { 459 ttyflush(tp, FWRITE); 460 ttyecho(c, tp); 461 if (tp->t_rawq.c_cc + tp->t_canq.c_cc) 462 ttyretype(tp); 463 SET(tp->t_lflag, FLUSHO); 464 } 465 goto startoutput; 466 } 467 } 468 /* 469 * Signals. 470 */ 471 if (ISSET(lflag, ISIG)) { 472 if (CCEQ(cc[VINTR], c) || CCEQ(cc[VQUIT], c)) { 473 if (!ISSET(lflag, NOFLSH)) 474 ttyflush(tp, FREAD | FWRITE); 475 ttyecho(c, tp); 476 ttysig(tp, TTYSIG_PG1, CCEQ(cc[VINTR], c) ? 477 SIGINT : SIGQUIT); 478 goto endcase; 479 } 480 if (CCEQ(cc[VSUSP], c)) { 481 if (!ISSET(lflag, NOFLSH)) 482 ttyflush(tp, FREAD); 483 ttyecho(c, tp); 484 ttysig(tp, TTYSIG_PG1, SIGTSTP); 485 goto endcase; 486 } 487 } 488 /* 489 * Handle start/stop characters. 490 */ 491 if (ISSET(iflag, IXON)) { 492 if (CCEQ(cc[VSTOP], c)) { 493 if (!ISSET(tp->t_state, TS_TTSTOP)) { 494 SET(tp->t_state, TS_TTSTOP); 495 cdev_stop(tp, 0); 496 return (0); 497 } 498 if (!CCEQ(cc[VSTART], c)) 499 return (0); 500 /* 501 * if VSTART == VSTOP then toggle 502 */ 503 goto endcase; 504 } 505 if (CCEQ(cc[VSTART], c)) 506 goto restartoutput; 507 } 508 /* 509 * IGNCR, ICRNL, & INLCR 510 */ 511 if (c == '\r') { 512 if (ISSET(iflag, IGNCR)) 513 goto endcase; 514 else if (ISSET(iflag, ICRNL)) 515 c = '\n'; 516 } else if (c == '\n' && ISSET(iflag, INLCR)) 517 c = '\r'; 518 } 519 if (!ISSET(lflag, EXTPROC) && ISSET(lflag, ICANON)) { 520 /* 521 * From here on down canonical mode character 522 * processing takes place. 523 */ 524 /* 525 * erase (^H / ^?) 526 */ 527 if (CCEQ(cc[VERASE], c)) { 528 if (tp->t_rawq.c_cc) 529 ttyrub(unputc(&tp->t_rawq), tp); 530 goto endcase; 531 } 532 /* 533 * kill (^U) 534 */ 535 if (CCEQ(cc[VKILL], c)) { 536 if (ISSET(lflag, ECHOKE) && 537 tp->t_rawq.c_cc == tp->t_rocount && 538 !ISSET(lflag, ECHOPRT)) 539 while (tp->t_rawq.c_cc) 540 ttyrub(unputc(&tp->t_rawq), tp); 541 else { 542 ttyecho(c, tp); 543 if (ISSET(lflag, ECHOK) || 544 ISSET(lflag, ECHOKE)) 545 ttyecho('\n', tp); 546 FLUSHQ(&tp->t_rawq); 547 tp->t_rocount = 0; 548 } 549 CLR(tp->t_state, TS_LOCAL); 550 goto endcase; 551 } 552 /* 553 * Extensions to the POSIX.1 GTI set of functions. 554 */ 555 if (ISSET(lflag, IEXTEN)) { 556 /* 557 * word erase (^W) 558 */ 559 if (CCEQ(cc[VWERASE], c)) { 560 int alt = ISSET(lflag, ALTWERASE); 561 int ctype; 562 563 /* 564 * erase whitespace 565 */ 566 while ((c = unputc(&tp->t_rawq)) == ' ' || 567 c == '\t') 568 ttyrub(c, tp); 569 if (c == -1) 570 goto endcase; 571 /* 572 * erase last char of word and remember the 573 * next chars type (for ALTWERASE) 574 */ 575 ttyrub(c, tp); 576 c = unputc(&tp->t_rawq); 577 if (c == -1) 578 goto endcase; 579 if (c == ' ' || c == '\t') { 580 (void)putc(c, &tp->t_rawq); 581 goto endcase; 582 } 583 ctype = ISALPHA(c); 584 /* 585 * erase rest of word 586 */ 587 do { 588 ttyrub(c, tp); 589 c = unputc(&tp->t_rawq); 590 if (c == -1) 591 goto endcase; 592 } while (c != ' ' && c != '\t' && 593 (alt == 0 || ISALPHA(c) == ctype)); 594 (void)putc(c, &tp->t_rawq); 595 goto endcase; 596 } 597 /* 598 * reprint line (^R) 599 */ 600 if (CCEQ(cc[VREPRINT], c)) { 601 ttyretype(tp); 602 goto endcase; 603 } 604 /* 605 * ^T - kernel info and generate SIGINFO 606 */ 607 if (CCEQ(cc[VSTATUS], c)) { 608 if (!ISSET(lflag, NOKERNINFO)) 609 ttyinfo(tp, 1); 610 if (ISSET(lflag, ISIG)) 611 ttysig(tp, TTYSIG_PG1, SIGINFO); 612 goto endcase; 613 } 614 } 615 } 616 /* 617 * Check for input buffer overflow 618 */ 619 if (tp->t_rawq.c_cc + tp->t_canq.c_cc >= TTYHOG) { 620 if (ISSET(iflag, IMAXBEL)) { 621 if (tp->t_outq.c_cc < tp->t_hiwat) 622 (void)ttyoutput(CTRL('g'), tp); 623 } else 624 ttyflush(tp, FREAD | FWRITE); 625 goto endcase; 626 } 627 /* 628 * Put data char in q for user and 629 * wakeup on seeing a line delimiter. 630 */ 631 if (putc(c, &tp->t_rawq) >= 0) { 632 if (!ISSET(lflag, ICANON)) { 633 ttwakeup(tp); 634 ttyecho(c, tp); 635 goto endcase; 636 } 637 if (TTBREAKC(c, lflag)) { 638 tp->t_rocount = 0; 639 catq(&tp->t_rawq, &tp->t_canq); 640 ttwakeup(tp); 641 } else if (tp->t_rocount++ == 0) 642 tp->t_rocol = tp->t_column; 643 if (ISSET(tp->t_state, TS_ERASE)) { 644 /* 645 * end of prterase \.../ 646 */ 647 CLR(tp->t_state, TS_ERASE); 648 (void)ttyoutput('/', tp); 649 } 650 i = tp->t_column; 651 ttyecho(c, tp); 652 if (CCEQ(cc[VEOF], c) && ISSET(lflag, ECHO)) { 653 /* 654 * Place the cursor over the '^' of the ^D. 655 */ 656 i = min(2, tp->t_column - i); 657 while (i > 0) { 658 (void)ttyoutput('\b', tp); 659 i--; 660 } 661 } 662 } 663 endcase: 664 /* 665 * IXANY means allow any character to restart output. 666 */ 667 if (ISSET(tp->t_state, TS_TTSTOP) && 668 !ISSET(iflag, IXANY) && cc[VSTART] != cc[VSTOP]) { 669 return (0); 670 } 671 restartoutput: 672 CLR(tp->t_lflag, FLUSHO); 673 CLR(tp->t_state, TS_TTSTOP); 674 startoutput: 675 return (ttstart(tp)); 676 } 677 678 /* 679 * Process input of a single character received on a tty. 680 * 681 * XXX - this is a hack, all drivers must changed to acquire the 682 * lock before calling linesw->l_rint() 683 */ 684 int 685 ttyinput(int c, struct tty *tp) 686 { 687 int error; 688 689 /* 690 * Unless the receiver is enabled, drop incoming data. 691 */ 692 if (!ISSET(tp->t_cflag, CREAD)) 693 return (0); 694 695 mutex_spin_enter(&tty_lock); 696 error = ttyinput_wlock(c, tp); 697 mutex_spin_exit(&tty_lock); 698 699 return (error); 700 } 701 702 /* 703 * Output a single character on a tty, doing output processing 704 * as needed (expanding tabs, newline processing, etc.). 705 * Returns < 0 if succeeds, otherwise returns char to resend. 706 * Must be recursive. 707 * 708 * Call with tty lock held. 709 */ 710 int 711 ttyoutput(int c, struct tty *tp) 712 { 713 long oflag; 714 int col, notout; 715 716 KASSERT(mutex_owned(&tty_lock)); 717 718 oflag = tp->t_oflag; 719 if (!ISSET(oflag, OPOST)) { 720 tk_nout++; 721 tp->t_outcc++; 722 if (!ISSET(tp->t_lflag, FLUSHO) && putc(c, &tp->t_outq)) 723 return (c); 724 return (-1); 725 } 726 /* 727 * Do tab expansion if OXTABS is set. Special case if we do external 728 * processing, we don't do the tab expansion because we'll probably 729 * get it wrong. If tab expansion needs to be done, let it happen 730 * externally. 731 */ 732 CLR(c, ~TTY_CHARMASK); 733 if (c == '\t' && 734 ISSET(oflag, OXTABS) && !ISSET(tp->t_lflag, EXTPROC)) { 735 c = 8 - (tp->t_column & 7); 736 if (ISSET(tp->t_lflag, FLUSHO)) { 737 notout = 0; 738 } else { 739 notout = b_to_q(" ", c, &tp->t_outq); 740 c -= notout; 741 tk_nout += c; 742 tp->t_outcc += c; 743 } 744 tp->t_column += c; 745 return (notout ? '\t' : -1); 746 } 747 if (c == CEOT && ISSET(oflag, ONOEOT)) 748 return (-1); 749 750 /* 751 * Newline translation: if ONLCR is set, 752 * translate newline into "\r\n". 753 */ 754 if (c == '\n' && ISSET(tp->t_oflag, ONLCR)) { 755 tk_nout++; 756 tp->t_outcc++; 757 if (!ISSET(tp->t_lflag, FLUSHO) && putc('\r', &tp->t_outq)) 758 return (c); 759 } 760 /* If OCRNL is set, translate "\r" into "\n". */ 761 else if (c == '\r' && ISSET(tp->t_oflag, OCRNL)) 762 c = '\n'; 763 /* If ONOCR is set, don't transmit CRs when on column 0. */ 764 else if (c == '\r' && ISSET(tp->t_oflag, ONOCR) && tp->t_column == 0) 765 return (-1); 766 767 tk_nout++; 768 tp->t_outcc++; 769 if (!ISSET(tp->t_lflag, FLUSHO) && putc(c, &tp->t_outq)) 770 return (c); 771 772 col = tp->t_column; 773 switch (CCLASS(c)) { 774 case BACKSPACE: 775 if (col > 0) 776 --col; 777 break; 778 case CONTROL: 779 break; 780 case NEWLINE: 781 if (ISSET(tp->t_oflag, ONLCR | ONLRET)) 782 col = 0; 783 break; 784 case RETURN: 785 col = 0; 786 break; 787 case ORDINARY: 788 ++col; 789 break; 790 case TAB: 791 col = (col + 8) & ~7; 792 break; 793 } 794 tp->t_column = col; 795 return (-1); 796 } 797 798 /* 799 * Ioctls for all tty devices. Called after line-discipline specific ioctl 800 * has been called to do discipline-specific functions and/or reject any 801 * of these ioctl commands. 802 */ 803 /* ARGSUSED */ 804 int 805 ttioctl(struct tty *tp, u_long cmd, void *data, int flag, struct lwp *l) 806 { 807 extern struct tty *constty; /* Temporary virtual console. */ 808 struct proc *p = l ? l->l_proc : NULL; 809 struct linesw *lp; 810 int s, error; 811 struct nameidata nd; 812 813 /* If the ioctl involves modification, hang if in the background. */ 814 switch (cmd) { 815 case TIOCFLUSH: 816 case TIOCDRAIN: 817 case TIOCSBRK: 818 case TIOCCBRK: 819 case TIOCSTART: 820 case TIOCSETA: 821 case TIOCSETD: 822 case TIOCSLINED: 823 case TIOCSETAF: 824 case TIOCSETAW: 825 #ifdef notdef 826 case TIOCSPGRP: 827 case FIOSETOWN: 828 #endif 829 case TIOCSTAT: 830 case TIOCSTI: 831 case TIOCSWINSZ: 832 #ifdef COMPAT_OLDTTY 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 /* XXXSMP */ 843 while (isbackground(curproc, tp) && 844 p->p_pgrp->pg_jobc && (p->p_sflag & PS_PPWAIT) == 0 && 845 !sigismasked(l, SIGTTOU)) { 846 mutex_spin_enter(&tty_lock); 847 ttysig(tp, TTYSIG_PG1, SIGTTOU); 848 error = ttysleep(tp, &lbolt, true, 0); 849 mutex_spin_exit(&tty_lock); 850 if (error) { 851 return (error); 852 } 853 } 854 break; 855 } 856 857 switch (cmd) { /* Process the ioctl. */ 858 case FIOASYNC: /* set/clear async i/o */ 859 mutex_spin_enter(&tty_lock); 860 if (*(int *)data) 861 SET(tp->t_state, TS_ASYNC); 862 else 863 CLR(tp->t_state, TS_ASYNC); 864 mutex_spin_exit(&tty_lock); 865 break; 866 case FIONBIO: /* set/clear non-blocking i/o */ 867 break; /* XXX: delete. */ 868 case FIONREAD: /* get # bytes to read */ 869 mutex_spin_enter(&tty_lock); 870 *(int *)data = ttnread(tp); 871 mutex_spin_exit(&tty_lock); 872 break; 873 case FIONWRITE: /* get # bytes to written & unsent */ 874 mutex_spin_enter(&tty_lock); 875 *(int *)data = tp->t_outq.c_cc; 876 mutex_spin_exit(&tty_lock); 877 break; 878 case FIONSPACE: /* get # bytes to written & unsent */ 879 mutex_spin_enter(&tty_lock); 880 *(int *)data = tp->t_outq.c_cn - tp->t_outq.c_cc; 881 mutex_spin_exit(&tty_lock); 882 break; 883 case TIOCEXCL: /* set exclusive use of tty */ 884 mutex_spin_enter(&tty_lock); 885 SET(tp->t_state, TS_XCLUDE); 886 mutex_spin_exit(&tty_lock); 887 break; 888 case TIOCFLUSH: { /* flush buffers */ 889 int flags = *(int *)data; 890 891 if (flags == 0) 892 flags = FREAD | FWRITE; 893 else 894 flags &= FREAD | FWRITE; 895 mutex_spin_enter(&tty_lock); 896 ttyflush(tp, flags); 897 mutex_spin_exit(&tty_lock); 898 break; 899 } 900 case TIOCCONS: /* become virtual console */ 901 if (*(int *)data) { 902 if (constty && constty != tp && 903 ISSET(constty->t_state, TS_CARR_ON | TS_ISOPEN) == 904 (TS_CARR_ON | TS_ISOPEN)) 905 return EBUSY; 906 907 NDINIT(&nd, LOOKUP, FOLLOW | LOCKLEAF, UIO_SYSSPACE, 908 "/dev/console"); 909 if ((error = namei(&nd)) != 0) 910 return error; 911 error = VOP_ACCESS(nd.ni_vp, VREAD, l->l_cred); 912 vput(nd.ni_vp); 913 if (error) 914 return error; 915 916 constty = tp; 917 } else if (tp == constty) 918 constty = NULL; 919 break; 920 case TIOCDRAIN: /* wait till output drained */ 921 if ((error = ttywait(tp)) != 0) 922 return (error); 923 break; 924 case TIOCGETA: { /* get termios struct */ 925 struct termios *t = (struct termios *)data; 926 927 memcpy(t, &tp->t_termios, sizeof(struct termios)); 928 break; 929 } 930 case TIOCGETD: /* get line discipline (old) */ 931 *(int *)data = tp->t_linesw->l_no; 932 break; 933 case TIOCGLINED: /* get line discipline (new) */ 934 (void)strncpy((char *)data, tp->t_linesw->l_name, 935 TTLINEDNAMELEN - 1); 936 break; 937 case TIOCGWINSZ: /* get window size */ 938 *(struct winsize *)data = tp->t_winsize; 939 break; 940 case FIOGETOWN: 941 if (tp->t_session != NULL && !isctty(p, tp)) 942 return (ENOTTY); 943 *(int *)data = tp->t_pgrp ? -tp->t_pgrp->pg_id : 0; 944 break; 945 case TIOCGPGRP: /* get pgrp of tty */ 946 if (!isctty(p, tp)) 947 return (ENOTTY); 948 *(int *)data = tp->t_pgrp ? tp->t_pgrp->pg_id : NO_PGID; 949 break; 950 case TIOCGSID: /* get sid of tty */ 951 if (!isctty(p, tp)) 952 return (ENOTTY); 953 *(int *)data = tp->t_session->s_sid; 954 break; 955 #ifdef TIOCHPCL 956 case TIOCHPCL: /* hang up on last close */ 957 mutex_spin_enter(&tty_lock); 958 SET(tp->t_cflag, HUPCL); 959 mutex_spin_exit(&tty_lock); 960 break; 961 #endif 962 case TIOCNXCL: /* reset exclusive use of tty */ 963 mutex_spin_enter(&tty_lock); 964 CLR(tp->t_state, TS_XCLUDE); 965 mutex_spin_exit(&tty_lock); 966 break; 967 case TIOCOUTQ: /* output queue size */ 968 *(int *)data = tp->t_outq.c_cc; 969 break; 970 case TIOCSETA: /* set termios struct */ 971 case TIOCSETAW: /* drain output, set */ 972 case TIOCSETAF: { /* drn out, fls in, set */ 973 struct termios *t = (struct termios *)data; 974 975 if (cmd == TIOCSETAW || cmd == TIOCSETAF) { 976 if ((error = ttywait(tp)) != 0) 977 return (error); 978 979 if (cmd == TIOCSETAF) { 980 mutex_spin_enter(&tty_lock); 981 ttyflush(tp, FREAD); 982 mutex_spin_exit(&tty_lock); 983 } 984 } 985 986 s = spltty(); 987 /* 988 * XXXSMP - some drivers call back on us from t_param(), so 989 * don't take the tty spin lock here. 990 * require t_param() to unlock upon callback? 991 */ 992 /* wanted here: mutex_spin_enter(&tty_lock); */ 993 if (!ISSET(t->c_cflag, CIGNORE)) { 994 /* 995 * Set device hardware. 996 */ 997 if (tp->t_param && (error = (*tp->t_param)(tp, t))) { 998 /* wanted here: mutex_spin_exit(&tty_lock); */ 999 splx(s); 1000 return (error); 1001 } else { 1002 tp->t_cflag = t->c_cflag; 1003 tp->t_ispeed = t->c_ispeed; 1004 tp->t_ospeed = t->c_ospeed; 1005 if (t->c_ospeed == 0) 1006 ttysig(tp, TTYSIG_LEADER, SIGHUP); 1007 } 1008 ttsetwater(tp); 1009 } 1010 1011 /* delayed lock acquiring */ 1012 mutex_spin_enter(&tty_lock); 1013 if (cmd != TIOCSETAF) { 1014 if (ISSET(t->c_lflag, ICANON) != 1015 ISSET(tp->t_lflag, ICANON)) { 1016 if (ISSET(t->c_lflag, ICANON)) { 1017 SET(tp->t_lflag, PENDIN); 1018 ttwakeup(tp); 1019 } else { 1020 struct clist tq; 1021 1022 catq(&tp->t_rawq, &tp->t_canq); 1023 tq = tp->t_rawq; 1024 tp->t_rawq = tp->t_canq; 1025 tp->t_canq = tq; 1026 CLR(tp->t_lflag, PENDIN); 1027 } 1028 } 1029 } 1030 tp->t_iflag = t->c_iflag; 1031 tp->t_oflag = t->c_oflag; 1032 /* 1033 * Make the EXTPROC bit read only. 1034 */ 1035 if (ISSET(tp->t_lflag, EXTPROC)) 1036 SET(t->c_lflag, EXTPROC); 1037 else 1038 CLR(t->c_lflag, EXTPROC); 1039 tp->t_lflag = t->c_lflag | ISSET(tp->t_lflag, PENDIN); 1040 memcpy(tp->t_cc, t->c_cc, sizeof(t->c_cc)); 1041 mutex_spin_exit(&tty_lock); 1042 splx(s); 1043 break; 1044 } 1045 case TIOCSETD: /* set line discipline (old) */ 1046 lp = ttyldisc_lookup_bynum(*(int *)data); 1047 goto setldisc; 1048 1049 case TIOCSLINED: { /* set line discipline (new) */ 1050 char *name = (char *)data; 1051 dev_t device; 1052 1053 /* Null terminate to prevent buffer overflow */ 1054 name[TTLINEDNAMELEN - 1] = '\0'; 1055 lp = ttyldisc_lookup(name); 1056 setldisc: 1057 if (lp == NULL) 1058 return (ENXIO); 1059 1060 if (lp != tp->t_linesw) { 1061 device = tp->t_dev; 1062 s = spltty(); 1063 (*tp->t_linesw->l_close)(tp, flag); 1064 error = (*lp->l_open)(device, tp); 1065 if (error) { 1066 (void)(*tp->t_linesw->l_open)(device, tp); 1067 splx(s); 1068 ttyldisc_release(lp); 1069 return (error); 1070 } 1071 ttyldisc_release(tp->t_linesw); 1072 tp->t_linesw = lp; 1073 splx(s); 1074 } else { 1075 /* Drop extra reference. */ 1076 ttyldisc_release(lp); 1077 } 1078 break; 1079 } 1080 case TIOCSTART: /* start output, like ^Q */ 1081 mutex_spin_enter(&tty_lock); 1082 if (ISSET(tp->t_state, TS_TTSTOP) || 1083 ISSET(tp->t_lflag, FLUSHO)) { 1084 CLR(tp->t_lflag, FLUSHO); 1085 CLR(tp->t_state, TS_TTSTOP); 1086 ttstart(tp); 1087 } 1088 mutex_spin_exit(&tty_lock); 1089 break; 1090 case TIOCSTI: /* simulate terminal input */ 1091 if (kauth_authorize_generic(l->l_cred, KAUTH_GENERIC_ISSUSER, 1092 NULL) != 0) { 1093 if (!ISSET(flag, FREAD)) 1094 return (EPERM); 1095 if (!isctty(p, tp)) 1096 return (EACCES); 1097 } 1098 (*tp->t_linesw->l_rint)(*(u_char *)data, tp); 1099 break; 1100 case TIOCSTOP: /* stop output, like ^S */ 1101 { 1102 mutex_spin_enter(&tty_lock); 1103 if (!ISSET(tp->t_state, TS_TTSTOP)) { 1104 SET(tp->t_state, TS_TTSTOP); 1105 cdev_stop(tp, 0); 1106 } 1107 mutex_spin_exit(&tty_lock); 1108 break; 1109 } 1110 case TIOCSCTTY: /* become controlling tty */ 1111 mutex_enter(&proclist_lock); 1112 1113 /* Session ctty vnode pointer set in vnode layer. */ 1114 if (!SESS_LEADER(p) || 1115 ((p->p_session->s_ttyvp || tp->t_session) && 1116 (tp->t_session != p->p_session))) { 1117 mutex_exit(&proclist_lock); 1118 return (EPERM); 1119 } 1120 1121 /* 1122 * `p_session' acquires a reference. 1123 * But note that if `t_session' is set at this point, 1124 * it must equal `p_session', in which case the session 1125 * already has the correct reference count. 1126 */ 1127 if (tp->t_session == NULL) 1128 SESSHOLD(p->p_session); 1129 1130 tp->t_session = p->p_session; 1131 tp->t_pgrp = p->p_pgrp; 1132 p->p_session->s_ttyp = tp; 1133 p->p_lflag |= PL_CONTROLT; 1134 mutex_exit(&proclist_lock); 1135 break; 1136 case FIOSETOWN: { /* set pgrp of tty */ 1137 pid_t pgid = *(int *)data; 1138 struct pgrp *pgrp; 1139 1140 if (tp->t_session != NULL && !isctty(p, tp)) 1141 return (ENOTTY); 1142 1143 mutex_enter(&proclist_lock); 1144 1145 if (pgid < 0) { 1146 pgrp = pg_find(-pgid, PFIND_LOCKED | PFIND_UNLOCK_FAIL); 1147 if (pgrp == NULL) 1148 return (EINVAL); 1149 } else { 1150 struct proc *p1; 1151 p1 = p_find(pgid, PFIND_LOCKED | PFIND_UNLOCK_FAIL); 1152 if (!p1) 1153 return (ESRCH); 1154 pgrp = p1->p_pgrp; 1155 } 1156 1157 if (pgrp->pg_session != p->p_session) { 1158 mutex_exit(&proclist_lock); 1159 return (EPERM); 1160 } 1161 tp->t_pgrp = pgrp; 1162 mutex_exit(&proclist_lock); 1163 break; 1164 } 1165 case TIOCSPGRP: { /* set pgrp of tty */ 1166 struct pgrp *pgrp; 1167 1168 if (!isctty(p, tp)) 1169 return (ENOTTY); 1170 mutex_enter(&proclist_lock); 1171 pgrp = pg_find(*(int *)data, PFIND_LOCKED | PFIND_UNLOCK_FAIL); 1172 if (pgrp == NULL) 1173 return (EINVAL); 1174 if (pgrp->pg_session != p->p_session) { 1175 mutex_exit(&proclist_lock); 1176 return (EPERM); 1177 } 1178 tp->t_pgrp = pgrp; 1179 mutex_exit(&proclist_lock); 1180 break; 1181 } 1182 case TIOCSTAT: /* get load avg stats */ 1183 mutex_spin_enter(&tty_lock); 1184 ttyinfo(tp, 0); 1185 mutex_spin_exit(&tty_lock); 1186 break; 1187 case TIOCSWINSZ: /* set window size */ 1188 mutex_spin_enter(&tty_lock); 1189 if (memcmp((void *)&tp->t_winsize, data, 1190 sizeof(struct winsize))) { 1191 tp->t_winsize = *(struct winsize *)data; 1192 ttysig(tp, TTYSIG_PG1, SIGWINCH); 1193 } 1194 mutex_spin_exit(&tty_lock); 1195 break; 1196 default: 1197 #ifdef COMPAT_OLDTTY 1198 return (ttcompat(tp, cmd, data, flag, l)); 1199 #else 1200 return (EPASSTHROUGH); 1201 #endif 1202 } 1203 return (0); 1204 } 1205 1206 int 1207 ttpoll(struct tty *tp, int events, struct lwp *l) 1208 { 1209 int revents; 1210 1211 revents = 0; 1212 mutex_spin_enter(&tty_lock); 1213 if (events & (POLLIN | POLLRDNORM)) 1214 if (ttnread(tp) > 0) 1215 revents |= events & (POLLIN | POLLRDNORM); 1216 1217 if (events & (POLLOUT | POLLWRNORM)) 1218 if (tp->t_outq.c_cc <= tp->t_lowat) 1219 revents |= events & (POLLOUT | POLLWRNORM); 1220 1221 if (events & POLLHUP) 1222 if (!CONNECTED(tp)) 1223 revents |= POLLHUP; 1224 1225 if (revents == 0) { 1226 if (events & (POLLIN | POLLHUP | POLLRDNORM)) 1227 selrecord(l, &tp->t_rsel); 1228 1229 if (events & (POLLOUT | POLLWRNORM)) 1230 selrecord(l, &tp->t_wsel); 1231 } 1232 1233 mutex_spin_exit(&tty_lock); 1234 1235 return (revents); 1236 } 1237 1238 static void 1239 filt_ttyrdetach(struct knote *kn) 1240 { 1241 struct tty *tp; 1242 1243 tp = kn->kn_hook; 1244 mutex_spin_enter(&tty_lock); 1245 SLIST_REMOVE(&tp->t_rsel.sel_klist, kn, knote, kn_selnext); 1246 mutex_spin_exit(&tty_lock); 1247 } 1248 1249 static int 1250 filt_ttyread(struct knote *kn, long hint) 1251 { 1252 struct tty *tp; 1253 1254 tp = kn->kn_hook; 1255 if ((hint & NOTE_SUBMIT) == 0) 1256 mutex_spin_enter(&tty_lock); 1257 kn->kn_data = ttnread(tp); 1258 if ((hint & NOTE_SUBMIT) == 0) 1259 mutex_spin_exit(&tty_lock); 1260 return (kn->kn_data > 0); 1261 } 1262 1263 static void 1264 filt_ttywdetach(struct knote *kn) 1265 { 1266 struct tty *tp; 1267 1268 tp = kn->kn_hook; 1269 mutex_spin_enter(&tty_lock); 1270 SLIST_REMOVE(&tp->t_wsel.sel_klist, kn, knote, kn_selnext); 1271 mutex_spin_exit(&tty_lock); 1272 } 1273 1274 static int 1275 filt_ttywrite(struct knote *kn, long hint) 1276 { 1277 struct tty *tp; 1278 int canwrite; 1279 1280 tp = kn->kn_hook; 1281 if ((hint & NOTE_SUBMIT) == 0) 1282 mutex_spin_enter(&tty_lock); 1283 kn->kn_data = tp->t_outq.c_cn - tp->t_outq.c_cc; 1284 canwrite = (tp->t_outq.c_cc <= tp->t_lowat) && CONNECTED(tp); 1285 if ((hint & NOTE_SUBMIT) == 0) 1286 mutex_spin_exit(&tty_lock); 1287 return (canwrite); 1288 } 1289 1290 static const struct filterops ttyread_filtops = 1291 { 1, NULL, filt_ttyrdetach, filt_ttyread }; 1292 static const struct filterops ttywrite_filtops = 1293 { 1, NULL, filt_ttywdetach, filt_ttywrite }; 1294 1295 int 1296 ttykqfilter(dev_t dev, struct knote *kn) 1297 { 1298 struct tty *tp; 1299 struct klist *klist; 1300 1301 if ((tp = cdev_tty(dev)) == NULL) 1302 return (ENXIO); 1303 1304 switch (kn->kn_filter) { 1305 case EVFILT_READ: 1306 klist = &tp->t_rsel.sel_klist; 1307 kn->kn_fop = &ttyread_filtops; 1308 break; 1309 case EVFILT_WRITE: 1310 klist = &tp->t_wsel.sel_klist; 1311 kn->kn_fop = &ttywrite_filtops; 1312 break; 1313 default: 1314 return EINVAL; 1315 } 1316 1317 kn->kn_hook = tp; 1318 1319 mutex_spin_enter(&tty_lock); 1320 SLIST_INSERT_HEAD(klist, kn, kn_selnext); 1321 mutex_spin_exit(&tty_lock); 1322 1323 return (0); 1324 } 1325 1326 /* 1327 * Find the number of chars ready to be read from this tty. 1328 * Call with the tty lock held. 1329 */ 1330 static int 1331 ttnread(struct tty *tp) 1332 { 1333 int nread; 1334 1335 KASSERT(mutex_owned(&tty_lock)); 1336 1337 if (ISSET(tp->t_lflag, PENDIN)) 1338 ttypend(tp); 1339 nread = tp->t_canq.c_cc; 1340 if (!ISSET(tp->t_lflag, ICANON)) { 1341 nread += tp->t_rawq.c_cc; 1342 if (nread < tp->t_cc[VMIN] && !tp->t_cc[VTIME]) 1343 nread = 0; 1344 } 1345 return (nread); 1346 } 1347 1348 /* 1349 * Wait for output to drain. 1350 */ 1351 int 1352 ttywait(struct tty *tp) 1353 { 1354 int error; 1355 1356 error = 0; 1357 1358 mutex_spin_enter(&tty_lock); 1359 while ((tp->t_outq.c_cc || ISSET(tp->t_state, TS_BUSY)) && 1360 CONNECTED(tp) && tp->t_oproc) { 1361 (*tp->t_oproc)(tp); 1362 error = ttysleep(tp, &tp->t_outq.c_cv, true, 0); 1363 if (error) 1364 break; 1365 } 1366 mutex_spin_exit(&tty_lock); 1367 1368 return (error); 1369 } 1370 1371 /* 1372 * Flush if successfully wait. 1373 */ 1374 int 1375 ttywflush(struct tty *tp) 1376 { 1377 int error; 1378 1379 if ((error = ttywait(tp)) == 0) { 1380 mutex_spin_enter(&tty_lock); 1381 ttyflush(tp, FREAD); 1382 mutex_spin_exit(&tty_lock); 1383 } 1384 return (error); 1385 } 1386 1387 /* 1388 * Flush tty read and/or write queues, notifying anyone waiting. 1389 * Call with the tty lock held. 1390 */ 1391 void 1392 ttyflush(struct tty *tp, int rw) 1393 { 1394 1395 KASSERT(mutex_owned(&tty_lock)); 1396 1397 if (rw & FREAD) { 1398 FLUSHQ(&tp->t_canq); 1399 FLUSHQ(&tp->t_rawq); 1400 tp->t_rocount = 0; 1401 tp->t_rocol = 0; 1402 CLR(tp->t_state, TS_LOCAL); 1403 ttwakeup(tp); 1404 } 1405 if (rw & FWRITE) { 1406 CLR(tp->t_state, TS_TTSTOP); 1407 cdev_stop(tp, rw); 1408 FLUSHQ(&tp->t_outq); 1409 clwakeup(&tp->t_outq); 1410 selnotify(&tp->t_wsel, NOTE_SUBMIT); 1411 } 1412 } 1413 1414 /* 1415 * Copy in the default termios characters. 1416 */ 1417 void 1418 ttychars(struct tty *tp) 1419 { 1420 1421 memcpy(tp->t_cc, ttydefchars, sizeof(ttydefchars)); 1422 } 1423 1424 /* 1425 * Send stop character on input overflow. 1426 * Call with the tty lock held. 1427 */ 1428 static void 1429 ttyblock(struct tty *tp) 1430 { 1431 int total; 1432 1433 KASSERT(mutex_owned(&tty_lock)); 1434 1435 total = tp->t_rawq.c_cc + tp->t_canq.c_cc; 1436 if (tp->t_rawq.c_cc > TTYHOG) { 1437 ttyflush(tp, FREAD | FWRITE); 1438 CLR(tp->t_state, TS_TBLOCK); 1439 } 1440 /* 1441 * Block further input iff: current input > threshold 1442 * AND input is available to user program. 1443 */ 1444 if (total >= TTYHOG / 2 && 1445 !ISSET(tp->t_state, TS_TBLOCK) && 1446 (!ISSET(tp->t_lflag, ICANON) || tp->t_canq.c_cc > 0)) { 1447 if (ISSET(tp->t_iflag, IXOFF) && 1448 tp->t_cc[VSTOP] != _POSIX_VDISABLE && 1449 putc(tp->t_cc[VSTOP], &tp->t_outq) == 0) { 1450 SET(tp->t_state, TS_TBLOCK); 1451 ttstart(tp); 1452 } 1453 /* Try to block remote output via hardware flow control. */ 1454 if (ISSET(tp->t_cflag, CHWFLOW) && tp->t_hwiflow && 1455 (*tp->t_hwiflow)(tp, 1) != 0) 1456 SET(tp->t_state, TS_TBLOCK); 1457 } 1458 } 1459 1460 /* 1461 * Delayed line discipline output 1462 */ 1463 void 1464 ttrstrt(void *tp_arg) 1465 { 1466 struct tty *tp; 1467 1468 #ifdef DIAGNOSTIC 1469 if (tp_arg == NULL) 1470 panic("ttrstrt"); 1471 #endif 1472 tp = tp_arg; 1473 mutex_spin_enter(&tty_lock); 1474 1475 CLR(tp->t_state, TS_TIMEOUT); 1476 ttstart(tp); /* XXX - Shouldn't this be tp->l_start(tp)? */ 1477 1478 mutex_spin_exit(&tty_lock); 1479 } 1480 1481 /* 1482 * start a line discipline 1483 * Always call with tty lock held? 1484 */ 1485 int 1486 ttstart(struct tty *tp) 1487 { 1488 1489 if (tp->t_oproc != NULL) /* XXX: Kludge for pty. */ 1490 (*tp->t_oproc)(tp); 1491 return (0); 1492 } 1493 1494 /* 1495 * "close" a line discipline 1496 */ 1497 int 1498 ttylclose(struct tty *tp, int flag) 1499 { 1500 1501 if (flag & FNONBLOCK) { 1502 mutex_spin_enter(&tty_lock); 1503 ttyflush(tp, FREAD | FWRITE); 1504 mutex_spin_exit(&tty_lock); 1505 } else 1506 ttywflush(tp); 1507 return (0); 1508 } 1509 1510 /* 1511 * Handle modem control transition on a tty. 1512 * Flag indicates new state of carrier. 1513 * Returns 0 if the line should be turned off, otherwise 1. 1514 */ 1515 int 1516 ttymodem(struct tty *tp, int flag) 1517 { 1518 1519 mutex_spin_enter(&tty_lock); 1520 if (flag == 0) { 1521 if (ISSET(tp->t_state, TS_CARR_ON)) { 1522 /* 1523 * Lost carrier. 1524 */ 1525 CLR(tp->t_state, TS_CARR_ON); 1526 if (ISSET(tp->t_state, TS_ISOPEN) && !CONNECTED(tp)) { 1527 ttysig(tp, TTYSIG_LEADER, SIGHUP); 1528 ttyflush(tp, FREAD | FWRITE); 1529 mutex_spin_exit(&tty_lock); 1530 return (0); 1531 } 1532 } 1533 } else { 1534 if (!ISSET(tp->t_state, TS_CARR_ON)) { 1535 /* 1536 * Carrier now on. 1537 */ 1538 SET(tp->t_state, TS_CARR_ON); 1539 ttwakeup(tp); 1540 } 1541 } 1542 mutex_spin_exit(&tty_lock); 1543 1544 return (1); 1545 } 1546 1547 /* 1548 * Default modem control routine (for other line disciplines). 1549 * Return argument flag, to turn off device on carrier drop. 1550 */ 1551 int 1552 nullmodem(struct tty *tp, int flag) 1553 { 1554 1555 mutex_spin_enter(&tty_lock); 1556 if (flag) 1557 SET(tp->t_state, TS_CARR_ON); 1558 else { 1559 CLR(tp->t_state, TS_CARR_ON); 1560 if (!CONNECTED(tp)) { 1561 ttysig(tp, TTYSIG_LEADER, SIGHUP); 1562 mutex_spin_exit(&tty_lock); 1563 return (0); 1564 } 1565 } 1566 mutex_spin_exit(&tty_lock); 1567 1568 return (1); 1569 } 1570 1571 /* 1572 * Reinput pending characters after state switch. 1573 */ 1574 void 1575 ttypend(struct tty *tp) 1576 { 1577 struct clist tq; 1578 int c; 1579 1580 KASSERT(mutex_owned(&tty_lock)); 1581 1582 CLR(tp->t_lflag, PENDIN); 1583 SET(tp->t_state, TS_TYPEN); 1584 tq = tp->t_rawq; 1585 tp->t_rawq.c_cc = 0; 1586 tp->t_rawq.c_cf = tp->t_rawq.c_cl = 0; 1587 while ((c = getc(&tq)) >= 0) 1588 ttyinput_wlock(c, tp); 1589 CLR(tp->t_state, TS_TYPEN); 1590 } 1591 1592 /* 1593 * Process a read call on a tty device. 1594 */ 1595 int 1596 ttread(struct tty *tp, struct uio *uio, int flag) 1597 { 1598 struct clist *qp; 1599 u_char *cc; 1600 struct proc *p; 1601 int c, first, error, has_stime, last_cc; 1602 long lflag, slp; 1603 struct timeval now, stime; 1604 1605 stime.tv_usec = 0; /* XXX gcc */ 1606 stime.tv_sec = 0; /* XXX gcc */ 1607 1608 cc = tp->t_cc; 1609 p = curproc; 1610 error = 0; 1611 has_stime = 0; 1612 last_cc = 0; 1613 slp = 0; 1614 1615 loop: 1616 mutex_spin_enter(&tty_lock); 1617 lflag = tp->t_lflag; 1618 /* 1619 * take pending input first 1620 */ 1621 if (ISSET(lflag, PENDIN)) 1622 ttypend(tp); 1623 1624 /* 1625 * Hang process if it's in the background. XXXSMP 1626 */ 1627 if (isbackground(p, tp)) { 1628 if (sigismember(&p->p_sigctx.ps_sigignore, SIGTTIN) || 1629 sigismember(&curlwp->l_sigmask, SIGTTIN) || 1630 p->p_sflag & PS_PPWAIT || p->p_pgrp->pg_jobc == 0) { 1631 mutex_spin_exit(&tty_lock); 1632 return (EIO); 1633 } 1634 ttysig(tp, TTYSIG_PG1, SIGTTIN); 1635 error = ttysleep(tp, &lbolt, true, 0); 1636 mutex_spin_exit(&tty_lock); 1637 if (error) 1638 return (error); 1639 goto loop; 1640 } 1641 1642 if (!ISSET(lflag, ICANON)) { 1643 int m = cc[VMIN]; 1644 long t = cc[VTIME]; 1645 1646 qp = &tp->t_rawq; 1647 /* 1648 * Check each of the four combinations. 1649 * (m > 0 && t == 0) is the normal read case. 1650 * It should be fairly efficient, so we check that and its 1651 * companion case (m == 0 && t == 0) first. 1652 * For the other two cases, we compute the target sleep time 1653 * into slp. 1654 */ 1655 if (t == 0) { 1656 if (qp->c_cc < m) 1657 goto sleep; 1658 goto read; 1659 } 1660 t *= hz; /* time in deca-ticks */ 1661 /* 1662 * Time difference in deca-ticks, split division to avoid numeric overflow. 1663 * Ok for hz < ~200kHz 1664 */ 1665 #define diff(t1, t2) (((t1).tv_sec - (t2).tv_sec) * 10 * hz + \ 1666 ((t1).tv_usec - (t2).tv_usec) / 100 * hz / 1000) 1667 if (m > 0) { 1668 if (qp->c_cc <= 0) 1669 goto sleep; 1670 if (qp->c_cc >= m) 1671 goto read; 1672 if (!has_stime) { 1673 /* first character, start timer */ 1674 has_stime = 1; 1675 getmicrotime(&stime); 1676 slp = t; 1677 } else if (qp->c_cc > last_cc) { 1678 /* got a character, restart timer */ 1679 getmicrotime(&stime); 1680 slp = t; 1681 } else { 1682 /* nothing, check expiration */ 1683 getmicrotime(&now); 1684 slp = t - diff(now, stime); 1685 } 1686 } else { /* m == 0 */ 1687 if (qp->c_cc > 0) 1688 goto read; 1689 if (!has_stime) { 1690 has_stime = 1; 1691 getmicrotime(&stime); 1692 slp = t; 1693 } else { 1694 getmicrotime(&now); 1695 slp = t - diff(now, stime); 1696 } 1697 } 1698 last_cc = qp->c_cc; 1699 #undef diff 1700 if (slp > 0) { 1701 /* 1702 * Convert deca-ticks back to ticks. 1703 * Rounding down may make us wake up just short 1704 * of the target, so we round up. 1705 * Maybe we should do 'slp/10 + 1' because the 1706 * first tick maybe almost immediate. 1707 * However it is more useful for a program that sets 1708 * VTIME=10 to wakeup every second not every 1.01 1709 * seconds (if hz=100). 1710 */ 1711 slp = (slp + 9)/ 10; 1712 goto sleep; 1713 } 1714 } else if ((qp = &tp->t_canq)->c_cc <= 0) { 1715 int carrier; 1716 1717 sleep: 1718 /* 1719 * If there is no input, sleep on rawq 1720 * awaiting hardware receipt and notification. 1721 * If we have data, we don't need to check for carrier. 1722 */ 1723 carrier = CONNECTED(tp); 1724 if (!carrier && ISSET(tp->t_state, TS_ISOPEN)) { 1725 mutex_spin_exit(&tty_lock); 1726 return (0); /* EOF */ 1727 } 1728 if (flag & IO_NDELAY) { 1729 mutex_spin_exit(&tty_lock); 1730 return (EWOULDBLOCK); 1731 } 1732 error = ttysleep(tp, &tp->t_rawq.c_cv, true, slp); 1733 mutex_spin_exit(&tty_lock); 1734 /* VMIN == 0: any quantity read satisfies */ 1735 if (cc[VMIN] == 0 && error == EWOULDBLOCK) 1736 return (0); 1737 if (error && error != EWOULDBLOCK) 1738 return (error); 1739 goto loop; 1740 } 1741 read: 1742 mutex_spin_exit(&tty_lock); 1743 1744 /* 1745 * Input present, check for input mapping and processing. 1746 */ 1747 first = 1; 1748 while ((c = getc(qp)) >= 0) { 1749 /* 1750 * delayed suspend (^Y) 1751 */ 1752 if (CCEQ(cc[VDSUSP], c) && 1753 ISSET(lflag, IEXTEN|ISIG) == (IEXTEN|ISIG)) { 1754 mutex_spin_enter(&tty_lock); 1755 ttysig(tp, TTYSIG_PG1, SIGTSTP); 1756 if (first) { 1757 error = ttysleep(tp, &lbolt, true, 0); 1758 mutex_spin_exit(&tty_lock); 1759 if (error) 1760 break; 1761 goto loop; 1762 } else 1763 mutex_spin_exit(&tty_lock); 1764 break; 1765 } 1766 /* 1767 * Interpret EOF only in canonical mode. 1768 */ 1769 if (CCEQ(cc[VEOF], c) && ISSET(lflag, ICANON)) 1770 break; 1771 /* 1772 * Give user character. 1773 */ 1774 error = ureadc(c, uio); 1775 if (error) 1776 break; 1777 if (uio->uio_resid == 0) 1778 break; 1779 /* 1780 * In canonical mode check for a "break character" 1781 * marking the end of a "line of input". 1782 */ 1783 if (ISSET(lflag, ICANON) && TTBREAKC(c, lflag)) 1784 break; 1785 first = 0; 1786 } 1787 /* 1788 * Look to unblock output now that (presumably) 1789 * the input queue has gone down. 1790 */ 1791 mutex_spin_enter(&tty_lock); 1792 if (ISSET(tp->t_state, TS_TBLOCK) && tp->t_rawq.c_cc < TTYHOG / 5) { 1793 if (ISSET(tp->t_iflag, IXOFF) && 1794 cc[VSTART] != _POSIX_VDISABLE && 1795 putc(cc[VSTART], &tp->t_outq) == 0) { 1796 CLR(tp->t_state, TS_TBLOCK); 1797 ttstart(tp); 1798 } 1799 /* Try to unblock remote output via hardware flow control. */ 1800 if (ISSET(tp->t_cflag, CHWFLOW) && tp->t_hwiflow && 1801 (*tp->t_hwiflow)(tp, 0) != 0) 1802 CLR(tp->t_state, TS_TBLOCK); 1803 } 1804 mutex_spin_exit(&tty_lock); 1805 1806 return (error); 1807 } 1808 1809 /* 1810 * Check the output queue on tp for space for a kernel message (from uprintf 1811 * or tprintf). Allow some space over the normal hiwater mark so we don't 1812 * lose messages due to normal flow control, but don't let the tty run amok. 1813 * Sleeps here are not interruptible, but we return prematurely if new signals 1814 * arrive. 1815 * Call with tty lock held. 1816 */ 1817 static int 1818 ttycheckoutq_wlock(struct tty *tp, int wait) 1819 { 1820 int hiwat, error; 1821 1822 KASSERT(mutex_owned(&tty_lock)); 1823 1824 hiwat = tp->t_hiwat; 1825 if (tp->t_outq.c_cc > hiwat + 200) 1826 while (tp->t_outq.c_cc > hiwat) { 1827 ttstart(tp); 1828 if (wait == 0) 1829 return (0); 1830 error = ttysleep(tp, &tp->t_outq.c_cv, true, hz); 1831 if (error == EINTR) 1832 wait = 0; 1833 } 1834 1835 return (1); 1836 } 1837 1838 int 1839 ttycheckoutq(struct tty *tp, int wait) 1840 { 1841 int r; 1842 1843 mutex_spin_enter(&tty_lock); 1844 r = ttycheckoutq_wlock(tp, wait); 1845 mutex_spin_exit(&tty_lock); 1846 1847 return (r); 1848 } 1849 1850 /* 1851 * Process a write call on a tty device. 1852 */ 1853 int 1854 ttwrite(struct tty *tp, struct uio *uio, int flag) 1855 { 1856 u_char *cp; 1857 struct proc *p; 1858 int cc, ce, i, hiwat, error; 1859 size_t cnt; 1860 u_char obuf[OBUFSIZ]; 1861 1862 cp = NULL; 1863 hiwat = tp->t_hiwat; 1864 cnt = uio->uio_resid; 1865 error = 0; 1866 cc = 0; 1867 loop: 1868 mutex_spin_enter(&tty_lock); 1869 if (!CONNECTED(tp)) { 1870 if (ISSET(tp->t_state, TS_ISOPEN)) { 1871 mutex_spin_exit(&tty_lock); 1872 return (EIO); 1873 } else if (flag & IO_NDELAY) { 1874 mutex_spin_exit(&tty_lock); 1875 error = EWOULDBLOCK; 1876 goto out; 1877 } else { 1878 /* Sleep awaiting carrier. */ 1879 error = ttysleep(tp, &tp->t_rawq.c_cv, true, 0); 1880 mutex_spin_exit(&tty_lock); 1881 if (error) 1882 goto out; 1883 goto loop; 1884 } 1885 } 1886 mutex_spin_exit(&tty_lock); 1887 /* 1888 * Hang the process if it's in the background. XXXSMP 1889 */ 1890 p = curproc; 1891 if (isbackground(p, tp) && 1892 ISSET(tp->t_lflag, TOSTOP) && (p->p_sflag & PS_PPWAIT) == 0 && 1893 !sigismember(&p->p_sigctx.ps_sigignore, SIGTTOU) && 1894 !sigismember(&curlwp->l_sigmask, SIGTTOU)) { 1895 if (p->p_pgrp->pg_jobc == 0) { 1896 error = EIO; 1897 goto out; 1898 } 1899 mutex_spin_enter(&tty_lock); 1900 ttysig(tp, TTYSIG_PG1, SIGTTOU); 1901 error = ttysleep(tp, &lbolt, true, 0); 1902 mutex_spin_exit(&tty_lock); 1903 if (error) 1904 goto out; 1905 goto loop; 1906 } 1907 /* 1908 * Process the user's data in at most OBUFSIZ chunks. Perform any 1909 * output translation. Keep track of high water mark, sleep on 1910 * overflow awaiting device aid in acquiring new space. 1911 */ 1912 while (uio->uio_resid > 0 || cc > 0) { 1913 if (ISSET(tp->t_lflag, FLUSHO)) { 1914 uio->uio_resid = 0; 1915 return (0); 1916 } 1917 if (tp->t_outq.c_cc > hiwat) 1918 goto ovhiwat; 1919 /* 1920 * Grab a hunk of data from the user, unless we have some 1921 * leftover from last time. 1922 */ 1923 if (cc == 0) { 1924 cc = min(uio->uio_resid, OBUFSIZ); 1925 cp = obuf; 1926 error = uiomove(cp, cc, uio); 1927 if (error) { 1928 cc = 0; 1929 goto out; 1930 } 1931 } 1932 /* 1933 * If nothing fancy need be done, grab those characters we 1934 * can handle without any of ttyoutput's processing and 1935 * just transfer them to the output q. For those chars 1936 * which require special processing (as indicated by the 1937 * bits in char_type), call ttyoutput. After processing 1938 * a hunk of data, look for FLUSHO so ^O's will take effect 1939 * immediately. 1940 */ 1941 mutex_spin_enter(&tty_lock); 1942 while (cc > 0) { 1943 if (!ISSET(tp->t_oflag, OPOST)) 1944 ce = cc; 1945 else { 1946 ce = cc - scanc((u_int)cc, cp, char_type, 1947 CCLASSMASK); 1948 /* 1949 * If ce is zero, then we're processing 1950 * a special character through ttyoutput. 1951 */ 1952 if (ce == 0) { 1953 tp->t_rocount = 0; 1954 if (ttyoutput(*cp, tp) >= 0) { 1955 /* out of space */ 1956 mutex_spin_exit(&tty_lock); 1957 goto overfull; 1958 } 1959 cp++; 1960 cc--; 1961 if (ISSET(tp->t_lflag, FLUSHO) || 1962 tp->t_outq.c_cc > hiwat) { 1963 mutex_spin_exit(&tty_lock); 1964 goto ovhiwat; 1965 } 1966 continue; 1967 } 1968 } 1969 /* 1970 * A bunch of normal characters have been found. 1971 * Transfer them en masse to the output queue and 1972 * continue processing at the top of the loop. 1973 * If there are any further characters in this 1974 * <= OBUFSIZ chunk, the first should be a character 1975 * requiring special handling by ttyoutput. 1976 */ 1977 tp->t_rocount = 0; 1978 i = b_to_q(cp, ce, &tp->t_outq); 1979 ce -= i; 1980 tp->t_column += ce; 1981 cp += ce, cc -= ce, tk_nout += ce; 1982 tp->t_outcc += ce; 1983 if (i > 0) { 1984 /* out of space */ 1985 mutex_spin_exit(&tty_lock); 1986 goto overfull; 1987 } 1988 if (ISSET(tp->t_lflag, FLUSHO) || 1989 tp->t_outq.c_cc > hiwat) 1990 break; 1991 } 1992 ttstart(tp); 1993 mutex_spin_exit(&tty_lock); 1994 } 1995 1996 out: 1997 /* 1998 * If cc is nonzero, we leave the uio structure inconsistent, as the 1999 * offset and iov pointers have moved forward, but it doesn't matter 2000 * (the call will either return short or restart with a new uio). 2001 */ 2002 uio->uio_resid += cc; 2003 return (error); 2004 2005 overfull: 2006 /* 2007 * Since we are using ring buffers, if we can't insert any more into 2008 * the output queue, we can assume the ring is full and that someone 2009 * forgot to set the high water mark correctly. We set it and then 2010 * proceed as normal. 2011 */ 2012 hiwat = tp->t_outq.c_cc - 1; 2013 2014 ovhiwat: 2015 mutex_spin_enter(&tty_lock); 2016 ttstart(tp); 2017 /* 2018 * This can only occur if FLUSHO is set in t_lflag, 2019 * or if ttstart/oproc is synchronous (or very fast). 2020 */ 2021 if (tp->t_outq.c_cc <= hiwat) { 2022 mutex_spin_exit(&tty_lock); 2023 goto loop; 2024 } 2025 if (flag & IO_NDELAY) { 2026 mutex_spin_exit(&tty_lock); 2027 error = EWOULDBLOCK; 2028 goto out; 2029 } 2030 error = ttysleep(tp, &tp->t_outq.c_cv, true, 0); 2031 mutex_spin_exit(&tty_lock); 2032 if (error) 2033 goto out; 2034 goto loop; 2035 } 2036 2037 /* 2038 * Try to pull more output from the producer. Return non-zero if 2039 * there is output ready to be sent. 2040 */ 2041 bool 2042 ttypull(struct tty *tp) 2043 { 2044 2045 /* XXXSMP not yet KASSERT(mutex_owned(&tty_lock)); */ 2046 2047 if (tp->t_outq.c_cc <= tp->t_lowat) { 2048 clwakeup(&tp->t_outq); 2049 selnotify(&tp->t_wsel, NOTE_SUBMIT); 2050 } 2051 return tp->t_outq.c_cc != 0; 2052 } 2053 2054 /* 2055 * Rubout one character from the rawq of tp 2056 * as cleanly as possible. 2057 * Called with tty lock held. 2058 */ 2059 void 2060 ttyrub(int c, struct tty *tp) 2061 { 2062 u_char *cp; 2063 int savecol, tabc; 2064 2065 KASSERT(mutex_owned(&tty_lock)); 2066 2067 if (!ISSET(tp->t_lflag, ECHO) || ISSET(tp->t_lflag, EXTPROC)) 2068 return; 2069 CLR(tp->t_lflag, FLUSHO); 2070 if (ISSET(tp->t_lflag, ECHOE)) { 2071 if (tp->t_rocount == 0) { 2072 /* 2073 * Screwed by ttwrite; retype 2074 */ 2075 ttyretype(tp); 2076 return; 2077 } 2078 if (c == ('\t' | TTY_QUOTE) || c == ('\n' | TTY_QUOTE)) 2079 ttyrubo(tp, 2); 2080 else { 2081 CLR(c, ~TTY_CHARMASK); 2082 switch (CCLASS(c)) { 2083 case ORDINARY: 2084 ttyrubo(tp, 1); 2085 break; 2086 case BACKSPACE: 2087 case CONTROL: 2088 case NEWLINE: 2089 case RETURN: 2090 case VTAB: 2091 if (ISSET(tp->t_lflag, ECHOCTL)) 2092 ttyrubo(tp, 2); 2093 break; 2094 case TAB: 2095 if (tp->t_rocount < tp->t_rawq.c_cc) { 2096 ttyretype(tp); 2097 return; 2098 } 2099 savecol = tp->t_column; 2100 SET(tp->t_state, TS_CNTTB); 2101 SET(tp->t_lflag, FLUSHO); 2102 tp->t_column = tp->t_rocol; 2103 for (cp = firstc(&tp->t_rawq, &tabc); cp; 2104 cp = nextc(&tp->t_rawq, cp, &tabc)) 2105 ttyecho(tabc, tp); 2106 CLR(tp->t_lflag, FLUSHO); 2107 CLR(tp->t_state, TS_CNTTB); 2108 2109 /* savecol will now be length of the tab. */ 2110 savecol -= tp->t_column; 2111 tp->t_column += savecol; 2112 if (savecol > 8) 2113 savecol = 8; /* overflow screw */ 2114 while (--savecol >= 0) 2115 (void)ttyoutput('\b', tp); 2116 break; 2117 default: /* XXX */ 2118 (void)printf("ttyrub: would panic c = %d, " 2119 "val = %d\n", c, CCLASS(c)); 2120 } 2121 } 2122 } else if (ISSET(tp->t_lflag, ECHOPRT)) { 2123 if (!ISSET(tp->t_state, TS_ERASE)) { 2124 SET(tp->t_state, TS_ERASE); 2125 (void)ttyoutput('\\', tp); 2126 } 2127 ttyecho(c, tp); 2128 } else 2129 ttyecho(tp->t_cc[VERASE], tp); 2130 --tp->t_rocount; 2131 } 2132 2133 /* 2134 * Back over cnt characters, erasing them. 2135 * Called with tty lock held. 2136 */ 2137 static void 2138 ttyrubo(struct tty *tp, int cnt) 2139 { 2140 2141 KASSERT(mutex_owned(&tty_lock)); 2142 2143 while (cnt-- > 0) { 2144 (void)ttyoutput('\b', tp); 2145 (void)ttyoutput(' ', tp); 2146 (void)ttyoutput('\b', tp); 2147 } 2148 } 2149 2150 /* 2151 * ttyretype -- 2152 * Reprint the rawq line. Note, it is assumed that c_cc has already 2153 * been checked. 2154 * 2155 * Called with tty lock held. 2156 */ 2157 void 2158 ttyretype(struct tty *tp) 2159 { 2160 u_char *cp; 2161 int c; 2162 2163 KASSERT(mutex_owned(&tty_lock)); 2164 2165 /* Echo the reprint character. */ 2166 if (tp->t_cc[VREPRINT] != _POSIX_VDISABLE) 2167 ttyecho(tp->t_cc[VREPRINT], tp); 2168 2169 (void)ttyoutput('\n', tp); 2170 2171 for (cp = firstc(&tp->t_canq, &c); cp; cp = nextc(&tp->t_canq, cp, &c)) 2172 ttyecho(c, tp); 2173 for (cp = firstc(&tp->t_rawq, &c); cp; cp = nextc(&tp->t_rawq, cp, &c)) 2174 ttyecho(c, tp); 2175 CLR(tp->t_state, TS_ERASE); 2176 2177 tp->t_rocount = tp->t_rawq.c_cc; 2178 tp->t_rocol = 0; 2179 } 2180 2181 /* 2182 * Echo a typed character to the terminal. 2183 * Called with tty lock held. 2184 */ 2185 static void 2186 ttyecho(int c, struct tty *tp) 2187 { 2188 2189 KASSERT(mutex_owned(&tty_lock)); 2190 2191 if (!ISSET(tp->t_state, TS_CNTTB)) 2192 CLR(tp->t_lflag, FLUSHO); 2193 if ((!ISSET(tp->t_lflag, ECHO) && 2194 (!ISSET(tp->t_lflag, ECHONL) || c != '\n')) || 2195 ISSET(tp->t_lflag, EXTPROC)) 2196 return; 2197 if (((ISSET(tp->t_lflag, ECHOCTL) && 2198 (ISSET(c, TTY_CHARMASK) <= 037 && c != '\t' && c != '\n')) || 2199 ISSET(c, TTY_CHARMASK) == 0177)) { 2200 (void)ttyoutput('^', tp); 2201 CLR(c, ~TTY_CHARMASK); 2202 if (c == 0177) 2203 c = '?'; 2204 else 2205 c += 'A' - 1; 2206 } 2207 (void)ttyoutput(c, tp); 2208 } 2209 2210 /* 2211 * Wake up any readers on a tty. 2212 * Called with tty lock held. 2213 */ 2214 void 2215 ttwakeup(struct tty *tp) 2216 { 2217 2218 KASSERT(mutex_owned(&tty_lock)); 2219 2220 selnotify(&tp->t_rsel, NOTE_SUBMIT); 2221 if (ISSET(tp->t_state, TS_ASYNC)) 2222 ttysig(tp, TTYSIG_PG2, SIGIO); 2223 #if 0 2224 /* XXX tp->t_rawq.c_cv.cv_waiters dropping to zero early!? */ 2225 clwakeup(&tp->t_rawq); 2226 #else 2227 cv_wakeup(&tp->t_rawq.c_cv); 2228 #endif 2229 } 2230 2231 /* 2232 * Look up a code for a specified speed in a conversion table; 2233 * used by drivers to map software speed values to hardware parameters. 2234 */ 2235 int 2236 ttspeedtab(int speed, const struct speedtab *table) 2237 { 2238 2239 for (; table->sp_speed != -1; table++) 2240 if (table->sp_speed == speed) 2241 return (table->sp_code); 2242 return (-1); 2243 } 2244 2245 /* 2246 * Set tty hi and low water marks. 2247 * 2248 * Try to arrange the dynamics so there's about one second 2249 * from hi to low water. 2250 */ 2251 void 2252 ttsetwater(struct tty *tp) 2253 { 2254 int cps, x; 2255 2256 /* XXX not yet KASSERT(mutex_owned(&tty_lock)); */ 2257 2258 #define CLAMP(x, h, l) ((x) > h ? h : ((x) < l) ? l : (x)) 2259 2260 cps = tp->t_ospeed / 10; 2261 tp->t_lowat = x = CLAMP(cps / 2, TTMAXLOWAT, TTMINLOWAT); 2262 x += cps; 2263 x = CLAMP(x, TTMAXHIWAT, TTMINHIWAT); 2264 tp->t_hiwat = roundup(x, CBSIZE); 2265 #undef CLAMP 2266 } 2267 2268 /* 2269 * Report on state of foreground process group. 2270 * Call with tty lock held. 2271 * XXXSMP locking. 2272 */ 2273 void 2274 ttyinfo(struct tty *tp, int fromsig) 2275 { 2276 struct lwp *l; 2277 struct proc *p, *pick = NULL; 2278 struct timeval utime, stime; 2279 int tmp; 2280 fixpt_t pctcpu = 0; 2281 const char *msg; 2282 2283 if (ttycheckoutq_wlock(tp, 0) == 0) 2284 return; 2285 2286 if (tp->t_session == NULL) 2287 msg = "not a controlling terminal\n"; 2288 else if (tp->t_pgrp == NULL) 2289 msg = "no foreground process group\n"; 2290 else if ((p = LIST_FIRST(&tp->t_pgrp->pg_members)) == NULL) 2291 msg = "empty foreground process group\n"; 2292 else { 2293 /* Pick interesting process. */ 2294 for (; p != NULL; p = LIST_NEXT(p, p_pglist)) 2295 if (proc_compare(pick, p)) 2296 pick = p; 2297 if (fromsig && 2298 (SIGACTION_PS(pick->p_sigacts, SIGINFO).sa_flags & 2299 SA_NOKERNINFO)) 2300 return; 2301 msg = NULL; 2302 } 2303 2304 /* Print load average. */ 2305 tmp = (averunnable.ldavg[0] * 100 + FSCALE / 2) >> FSHIFT; 2306 ttyprintf_nolock(tp, "load: %d.%02d ", tmp / 100, tmp % 100); 2307 2308 if (pick == NULL) { 2309 ttyprintf_nolock(tp, msg); 2310 tp->t_rocount = 0; /* so pending input will be retyped if BS */ 2311 return; 2312 } 2313 2314 ttyprintf_nolock(tp, " cmd: %s %d [", pick->p_comm, pick->p_pid); 2315 LIST_FOREACH(l, &pick->p_lwps, l_sibling) { 2316 ttyprintf_nolock(tp, "%s%s", 2317 l->l_stat == LSONPROC ? "running" : 2318 l->l_stat == LSRUN ? "runnable" : 2319 l->l_wmesg ? l->l_wmesg : "iowait", 2320 (LIST_NEXT(l, l_sibling) != NULL) ? " " : "] "); 2321 pctcpu += l->l_pctcpu; 2322 } 2323 pctcpu += pick->p_pctcpu; 2324 2325 mutex_enter(&pick->p_smutex); 2326 calcru(pick, &utime, &stime, NULL, NULL); 2327 mutex_exit(&pick->p_smutex); 2328 2329 /* Round up and print user time. */ 2330 utime.tv_usec += 5000; 2331 if (utime.tv_usec >= 1000000) { 2332 utime.tv_sec += 1; 2333 utime.tv_usec -= 1000000; 2334 } 2335 ttyprintf_nolock(tp, "%ld.%02ldu ", (long int)utime.tv_sec, 2336 (long int)utime.tv_usec / 10000); 2337 2338 /* Round up and print system time. */ 2339 stime.tv_usec += 5000; 2340 if (stime.tv_usec >= 1000000) { 2341 stime.tv_sec += 1; 2342 stime.tv_usec -= 1000000; 2343 } 2344 ttyprintf_nolock(tp, "%ld.%02lds ", (long int)stime.tv_sec, 2345 (long int)stime.tv_usec / 10000); 2346 2347 #define pgtok(a) (((u_long) ((a) * PAGE_SIZE) / 1024)) 2348 /* Print percentage CPU. */ 2349 tmp = (pctcpu * 10000 + FSCALE / 2) >> FSHIFT; 2350 ttyprintf_nolock(tp, "%d%% ", tmp / 100); 2351 2352 /* Print resident set size. */ 2353 if (pick->p_stat == SIDL || P_ZOMBIE(pick)) 2354 tmp = 0; 2355 else { 2356 struct vmspace *vm = pick->p_vmspace; 2357 tmp = pgtok(vm_resident_count(vm)); 2358 } 2359 ttyprintf_nolock(tp, "%dk\n", tmp); 2360 tp->t_rocount = 0; /* so pending input will be retyped if BS */ 2361 } 2362 2363 /* 2364 * Returns 1 if p2 is "better" than p1 2365 * 2366 * The algorithm for picking the "interesting" process is thus: 2367 * 2368 * 1) Only foreground processes are eligible - implied. 2369 * 2) Runnable processes are favored over anything else. The runner 2370 * with the highest CPU utilization is picked (l_pctcpu). Ties are 2371 * broken by picking the highest pid. 2372 * 3) The sleeper with the shortest sleep time is next. With ties, 2373 * we pick out just "short-term" sleepers (P_SINTR == 0). 2374 * 4) Further ties are broken by picking the highest pid. 2375 * 2376 * XXXSMP 2377 */ 2378 #define ISRUN(p) ((p)->p_nrlwps > 0) 2379 #define TESTAB(a, b) ((a)<<1 | (b)) 2380 #define ONLYA 2 2381 #define ONLYB 1 2382 #define BOTH 3 2383 2384 static int 2385 proc_compare(struct proc *p1, struct proc *p2) 2386 { 2387 lwp_t *l1, *l2; 2388 2389 if (p1 == NULL) 2390 return (1); 2391 /* 2392 * see if at least one of them is runnable 2393 */ 2394 switch (TESTAB(ISRUN(p1), ISRUN(p2))) { 2395 case ONLYA: 2396 return (0); 2397 case ONLYB: 2398 return (1); 2399 case BOTH: 2400 /* 2401 * tie - favor one with highest recent CPU utilization 2402 */ 2403 l1 = LIST_FIRST(&p1->p_lwps); 2404 l2 = LIST_FIRST(&p2->p_lwps); 2405 if (l2->l_pctcpu > l1->l_pctcpu) 2406 return (1); 2407 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2408 } 2409 /* 2410 * weed out zombies 2411 */ 2412 switch (TESTAB(P_ZOMBIE(p1), P_ZOMBIE(p2))) { 2413 case ONLYA: 2414 return (1); 2415 case ONLYB: 2416 return (0); 2417 case BOTH: 2418 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2419 } 2420 #if 0 /* XXX NJWLWP */ 2421 /* 2422 * pick the one with the smallest sleep time 2423 */ 2424 if (p2->p_slptime > p1->p_slptime) 2425 return (0); 2426 if (p1->p_slptime > p2->p_slptime) 2427 return (1); 2428 /* 2429 * favor one sleeping in a non-interruptible sleep 2430 */ 2431 if (p1->p_flag & P_SINTR && (p2->p_flag & P_SINTR) == 0) 2432 return (1); 2433 if (p2->p_flag & P_SINTR && (p1->p_flag & P_SINTR) == 0) 2434 return (0); 2435 #endif 2436 return (p2->p_pid > p1->p_pid); /* tie - return highest pid */ 2437 } 2438 2439 /* 2440 * Output char to tty; console putchar style. 2441 * Can be called with tty lock held through kprintf() machinery.. 2442 */ 2443 int 2444 tputchar(int c, int flags, struct tty *tp) 2445 { 2446 int r = 0; 2447 2448 if ((flags & NOLOCK) == 0) 2449 mutex_spin_enter(&tty_lock); 2450 if (!CONNECTED(tp)) { 2451 r = -1; 2452 goto out; 2453 } 2454 if (c == '\n') 2455 (void)ttyoutput('\r', tp); 2456 (void)ttyoutput(c, tp); 2457 ttstart(tp); 2458 out: 2459 if ((flags & NOLOCK) == 0) 2460 mutex_spin_exit(&tty_lock); 2461 return (r); 2462 } 2463 2464 /* 2465 * Sleep on chan, returning ERESTART if tty changed while we napped and 2466 * returning any errors (e.g. EINTR/ETIMEDOUT) reported by tsleep. If 2467 * the tty is revoked, restarting a pending call will redo validation done 2468 * at the start of the call. 2469 * 2470 * Must be called with the tty lock held. 2471 */ 2472 int 2473 ttysleep(struct tty *tp, kcondvar_t *cv, bool catch, int timo) 2474 { 2475 int error; 2476 short gen; 2477 2478 KASSERT(mutex_owned(&tty_lock)); 2479 2480 gen = tp->t_gen; 2481 if (catch) 2482 error = cv_timedwait_sig(cv, &tty_lock, timo); 2483 else 2484 error = cv_timedwait(cv, &tty_lock, timo); 2485 if (error != 0) 2486 return (error); 2487 return (tp->t_gen == gen ? 0 : ERESTART); 2488 } 2489 2490 /* 2491 * Attach a tty to the tty list. 2492 * 2493 * This should be called ONLY once per real tty (including pty's). 2494 * eg, on the sparc, the keyboard and mouse have struct tty's that are 2495 * distinctly NOT usable as tty's, and thus should not be attached to 2496 * the ttylist. This is why this call is not done from ttymalloc(). 2497 * 2498 * Device drivers should attach tty's at a similar time that they are 2499 * ttymalloc()'ed, or, for the case of statically allocated struct tty's 2500 * either in the attach or (first) open routine. 2501 */ 2502 void 2503 tty_attach(struct tty *tp) 2504 { 2505 2506 mutex_spin_enter(&tty_lock); 2507 TAILQ_INSERT_TAIL(&ttylist, tp, tty_link); 2508 ++tty_count; 2509 mutex_spin_exit(&tty_lock); 2510 } 2511 2512 /* 2513 * Remove a tty from the tty list. 2514 */ 2515 void 2516 tty_detach(struct tty *tp) 2517 { 2518 2519 mutex_spin_enter(&tty_lock); 2520 --tty_count; 2521 #ifdef DIAGNOSTIC 2522 if (tty_count < 0) 2523 panic("tty_detach: tty_count < 0"); 2524 #endif 2525 TAILQ_REMOVE(&ttylist, tp, tty_link); 2526 mutex_spin_exit(&tty_lock); 2527 } 2528 2529 /* 2530 * Allocate a tty structure and its associated buffers. 2531 */ 2532 struct tty * 2533 ttymalloc(void) 2534 { 2535 struct tty *tp; 2536 int i; 2537 2538 tp = pool_get(&tty_pool, PR_WAITOK); 2539 memset(tp, 0, sizeof(*tp)); 2540 callout_init(&tp->t_rstrt_ch, 0); 2541 callout_setfunc(&tp->t_rstrt_ch, ttrstrt, tp); 2542 /* XXX: default to 1024 chars for now */ 2543 clalloc(&tp->t_rawq, 1024, 1); 2544 clalloc(&tp->t_canq, 1024, 1); 2545 /* output queue doesn't need quoting */ 2546 clalloc(&tp->t_outq, 1024, 0); 2547 /* Set default line discipline. */ 2548 tp->t_linesw = ttyldisc_default(); 2549 selinit(&tp->t_rsel); 2550 selinit(&tp->t_wsel); 2551 for (i = 0; i < TTYSIG_COUNT; i++) 2552 sigemptyset(&tp->t_sigs[i]); 2553 return (tp); 2554 } 2555 2556 /* 2557 * Free a tty structure and its buffers. 2558 * 2559 * Be sure to call tty_detach() for any tty that has been 2560 * tty_attach()ed. 2561 */ 2562 void 2563 ttyfree(struct tty *tp) 2564 { 2565 int i; 2566 2567 mutex_enter(&tty_lock); 2568 for (i = 0; i < TTYSIG_COUNT; i++) 2569 sigemptyset(&tp->t_sigs[i]); 2570 if (tp->t_sigcount != 0) 2571 TAILQ_REMOVE(&tty_sigqueue, tp, t_sigqueue); 2572 mutex_exit(&tty_lock); 2573 2574 callout_stop(&tp->t_rstrt_ch); 2575 ttyldisc_release(tp->t_linesw); 2576 clfree(&tp->t_rawq); 2577 clfree(&tp->t_canq); 2578 clfree(&tp->t_outq); 2579 callout_destroy(&tp->t_rstrt_ch); 2580 seldestroy(&tp->t_rsel); 2581 seldestroy(&tp->t_wsel); 2582 pool_put(&tty_pool, tp); 2583 } 2584 2585 /* 2586 * ttyprintf_nolock: send a message to a specific tty, without locking. 2587 * 2588 * => should be used only by tty driver or anything that knows the 2589 * underlying tty will not be revoked(2)'d away. [otherwise, 2590 * use tprintf] 2591 */ 2592 static void 2593 ttyprintf_nolock(struct tty *tp, const char *fmt, ...) 2594 { 2595 va_list ap; 2596 2597 /* No mutex needed; going to process TTY. */ 2598 va_start(ap, fmt); 2599 kprintf(fmt, TOTTY|NOLOCK, tp, NULL, ap); 2600 va_end(ap); 2601 } 2602 2603 /* 2604 * Initialize the tty subsystem. 2605 */ 2606 void 2607 tty_init(void) 2608 { 2609 2610 mutex_init(&tty_lock, MUTEX_DEFAULT, IPL_VM); 2611 tty_sigsih = softint_establish(SOFTINT_CLOCK, ttysigintr, NULL); 2612 KASSERT(tty_sigsih != NULL); 2613 } 2614 2615 /* 2616 * Send a signal from a tty to its process group or session leader. 2617 * Handoff to the target is deferred to a soft interrupt. 2618 */ 2619 void 2620 ttysig(struct tty *tp, enum ttysigtype st, int sig) 2621 { 2622 sigset_t *sp; 2623 2624 /* XXXSMP not yet KASSERT(mutex_owned(&tty_lock)); */ 2625 2626 sp = &tp->t_sigs[st]; 2627 if (sigismember(sp, sig)) 2628 return; 2629 sigaddset(sp, sig); 2630 if (tp->t_sigcount++ == 0) 2631 TAILQ_INSERT_TAIL(&tty_sigqueue, tp, t_sigqueue); 2632 softint_schedule(tty_sigsih); 2633 } 2634 2635 /* 2636 * Deliver deferred signals from ttys. Note that the process groups 2637 * and sessions associated with the ttys may have changed from when 2638 * the signal was originally sent, but in practice it should not matter. 2639 * For signals produced as a result of a syscall, the soft interrupt 2640 * will fire before the syscall returns to the user. 2641 */ 2642 static void 2643 ttysigintr(void *cookie) 2644 { 2645 struct tty *tp; 2646 enum ttysigtype st; 2647 struct pgrp *pgrp; 2648 struct session *sess; 2649 int sig; 2650 2651 mutex_enter(&proclist_lock); 2652 for (;;) { 2653 mutex_spin_enter(&tty_lock); 2654 if ((tp = TAILQ_FIRST(&tty_sigqueue)) == NULL) { 2655 mutex_spin_exit(&tty_lock); 2656 break; 2657 } 2658 KASSERT(tp->t_sigcount > 0); 2659 for (st = 0; st < TTYSIG_COUNT; st++) { 2660 if ((sig = firstsig(&tp->t_sigs[st])) != 0) 2661 break; 2662 } 2663 KASSERT(st < TTYSIG_COUNT); 2664 sigdelset(&tp->t_sigs[st], sig); 2665 if (--tp->t_sigcount == 0) 2666 TAILQ_REMOVE(&tty_sigqueue, tp, t_sigqueue); 2667 pgrp = tp->t_pgrp; 2668 sess = tp->t_session; 2669 mutex_spin_exit(&tty_lock); 2670 if (sig == 0) 2671 panic("ttysigintr"); 2672 mutex_enter(&proclist_mutex); 2673 switch (st) { 2674 case TTYSIG_PG1: 2675 if (pgrp != NULL) 2676 pgsignal(pgrp, sig, 1); 2677 break; 2678 case TTYSIG_PG2: 2679 if (pgrp != NULL) 2680 pgsignal(pgrp, sig, sess != NULL); 2681 break; 2682 case TTYSIG_LEADER: 2683 if (sess != NULL && sess->s_leader != NULL) 2684 psignal(sess->s_leader, sig); 2685 break; 2686 default: 2687 /* NOTREACHED */ 2688 break; 2689 } 2690 mutex_exit(&proclist_mutex); 2691 } 2692 mutex_exit(&proclist_lock); 2693 } 2694