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