1/*
2 * Copyright (c) 1982, 1986, 1989, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 *
33 * @(#)tty_pty.c 8.4 (Berkeley) 2/20/95
| 1/*
2 * Copyright (c) 1982, 1986, 1989, 1993
3 * The Regents of the University of California. All rights reserved.
4 *
5 * Redistribution and use in source and binary forms, with or without
6 * modification, are permitted provided that the following conditions
7 * are met:
8 * 1. Redistributions of source code must retain the above copyright
9 * notice, this list of conditions and the following disclaimer.
10 * 2. Redistributions in binary form must reproduce the above copyright
11 * notice, this list of conditions and the following disclaimer in the
12 * documentation and/or other materials provided with the distribution.
13 * 3. All advertising materials mentioning features or use of this software
14 * must display the following acknowledgement:
15 * This product includes software developed by the University of
16 * California, Berkeley and its contributors.
17 * 4. Neither the name of the University nor the names of its contributors
18 * may be used to endorse or promote products derived from this software
19 * without specific prior written permission.
20 *
21 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
22 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
23 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
24 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
25 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
26 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
27 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
28 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
29 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
30 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
31 * SUCH DAMAGE.
32 *
33 * @(#)tty_pty.c 8.4 (Berkeley) 2/20/95
|
35 */
36
37/*
38 * Pseudo-teletype Driver
39 * (Actually two drivers, requiring two entries in 'cdevsw')
40 */
41#include "opt_compat.h"
42#include <sys/param.h>
43#include <sys/systm.h>
44#if defined(COMPAT_43) || defined(COMPAT_SUNOS)
45#include <sys/ioctl_compat.h>
46#endif
47#include <sys/proc.h>
48#include <sys/tty.h>
49#include <sys/conf.h>
50#include <sys/fcntl.h>
51#include <sys/poll.h>
52#include <sys/kernel.h>
53#include <sys/vnode.h>
54#include <sys/signalvar.h>
55#include <sys/malloc.h>
56
57static MALLOC_DEFINE(M_PTY, "ptys", "pty data structures");
58
59static void ptsstart __P((struct tty *tp));
60static void ptsstop __P((struct tty *tp, int rw));
61static void ptcwakeup __P((struct tty *tp, int flag));
62static dev_t ptyinit __P((dev_t cdev));
63
64static d_open_t ptsopen;
65static d_close_t ptsclose;
66static d_read_t ptsread;
67static d_write_t ptswrite;
68static d_ioctl_t ptyioctl;
69static d_open_t ptcopen;
70static d_close_t ptcclose;
71static d_read_t ptcread;
72static d_write_t ptcwrite;
73static d_poll_t ptcpoll;
74
75#define CDEV_MAJOR_S 5
76static struct cdevsw pts_cdevsw = {
77 /* open */ ptsopen,
78 /* close */ ptsclose,
79 /* read */ ptsread,
80 /* write */ ptswrite,
81 /* ioctl */ ptyioctl,
82 /* poll */ ttypoll,
83 /* mmap */ nommap,
84 /* strategy */ nostrategy,
85 /* name */ "pts",
86 /* maj */ CDEV_MAJOR_S,
87 /* dump */ nodump,
88 /* psize */ nopsize,
89 /* flags */ D_TTY | D_KQFILTER,
90 /* kqfilter */ ttykqfilter,
91};
92
93#define CDEV_MAJOR_C 6
94static struct cdevsw ptc_cdevsw = {
95 /* open */ ptcopen,
96 /* close */ ptcclose,
97 /* read */ ptcread,
98 /* write */ ptcwrite,
99 /* ioctl */ ptyioctl,
100 /* poll */ ptcpoll,
101 /* mmap */ nommap,
102 /* strategy */ nostrategy,
103 /* name */ "ptc",
104 /* maj */ CDEV_MAJOR_C,
105 /* dump */ nodump,
106 /* psize */ nopsize,
107 /* flags */ D_TTY | D_KQFILTER,
108 /* kqfilter */ ttykqfilter,
109};
110
111#define BUFSIZ 100 /* Chunk size iomoved to/from user */
112
113struct pt_ioctl {
114 int pt_flags;
115 struct selinfo pt_selr, pt_selw;
116 u_char pt_send;
117 u_char pt_ucntl;
118 struct tty pt_tty;
119 dev_t devs, devc;
120 struct prison *pt_prison;
121};
122
123#define PF_PKT 0x08 /* packet mode */
124#define PF_STOPPED 0x10 /* user told stopped */
125#define PF_REMOTE 0x20 /* remote and flow controlled input */
126#define PF_NOSTOP 0x40
127#define PF_UCNTL 0x80 /* user control mode */
128
129static char *names = "pqrsPQRS";
130/*
131 * This function creates and initializes a pts/ptc pair
132 *
133 * pts == /dev/tty[pqrsPQRS][0123456789abcdefghijklmnopqrstuv]
134 * ptc == /dev/pty[pqrsPQRS][0123456789abcdefghijklmnopqrstuv]
135 *
136 * XXX: define and add mapping of upper minor bits to allow more
137 * than 256 ptys.
138 */
139static dev_t
140ptyinit(dev_t devc)
141{
142 dev_t devs;
143 struct pt_ioctl *pt;
144 int n;
145
146 n = minor(devc);
147 /* For now we only map the lower 8 bits of the minor */
148 if (n & ~0xff)
149 return (NODEV);
150
151 devc->si_flags &= ~SI_CHEAPCLONE;
152
153 pt = malloc(sizeof(*pt), M_PTY, M_WAITOK | M_ZERO);
154 pt->devs = devs = make_dev(&pts_cdevsw, n,
155 UID_ROOT, GID_WHEEL, 0666, "tty%c%r", names[n / 32], n % 32);
156 pt->devc = devc;
157
158 devs->si_drv1 = devc->si_drv1 = pt;
159 devs->si_tty = devc->si_tty = &pt->pt_tty;
160 pt->pt_tty.t_dev = devs;
161 ttyregister(&pt->pt_tty);
162 return (devc);
163}
164
165/*ARGSUSED*/
166static int
167ptsopen(dev, flag, devtype, td)
168 dev_t dev;
169 int flag, devtype;
170 struct thread *td;
171{
172 struct proc *p = td->td_proc;
173 register struct tty *tp;
174 int error;
175 struct pt_ioctl *pti;
176
177 if (!dev->si_drv1)
178 return(ENXIO);
179 pti = dev->si_drv1;
180 tp = dev->si_tty;
181 if ((tp->t_state & TS_ISOPEN) == 0) {
182 ttychars(tp); /* Set up default chars */
183 tp->t_iflag = TTYDEF_IFLAG;
184 tp->t_oflag = TTYDEF_OFLAG;
185 tp->t_lflag = TTYDEF_LFLAG;
186 tp->t_cflag = TTYDEF_CFLAG;
187 tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
188 } else if (tp->t_state & TS_XCLUDE && suser_xxx(p->p_ucred, NULL, 0)) {
189 return (EBUSY);
190 } else if (pti->pt_prison != p->p_ucred->cr_prison) {
191 return (EBUSY);
192 }
193 if (tp->t_oproc) /* Ctrlr still around. */
194 (void)(*linesw[tp->t_line].l_modem)(tp, 1);
195 while ((tp->t_state & TS_CARR_ON) == 0) {
196 if (flag&FNONBLOCK)
197 break;
198 error = ttysleep(tp, TSA_CARR_ON(tp), TTIPRI | PCATCH,
199 "ptsopn", 0);
200 if (error)
201 return (error);
202 }
203 error = (*linesw[tp->t_line].l_open)(dev, tp);
204 if (error == 0)
205 ptcwakeup(tp, FREAD|FWRITE);
206 return (error);
207}
208
209static int
210ptsclose(dev, flag, mode, td)
211 dev_t dev;
212 int flag, mode;
213 struct thread *td;
214{
215 register struct tty *tp;
216 int err;
217
218 tp = dev->si_tty;
219 err = (*linesw[tp->t_line].l_close)(tp, flag);
220 ptsstop(tp, FREAD|FWRITE);
221 (void) ttyclose(tp);
222 return (err);
223}
224
225static int
226ptsread(dev, uio, flag)
227 dev_t dev;
228 struct uio *uio;
229 int flag;
230{
231 struct thread *td = curthread;
232 struct proc *p = td->td_proc;
233 register struct tty *tp = dev->si_tty;
234 register struct pt_ioctl *pti = dev->si_drv1;
235 int error = 0;
236
237again:
238 if (pti->pt_flags & PF_REMOTE) {
239 while (isbackground(p, tp)) {
240 if (SIGISMEMBER(p->p_sigignore, SIGTTIN) ||
241 SIGISMEMBER(p->p_sigmask, SIGTTIN) ||
242 p->p_pgrp->pg_jobc == 0 || p->p_flag & P_PPWAIT)
243 return (EIO);
244 pgsignal(p->p_pgrp, SIGTTIN, 1);
245 error = ttysleep(tp, &lbolt, TTIPRI | PCATCH, "ptsbg",
246 0);
247 if (error)
248 return (error);
249 }
250 if (tp->t_canq.c_cc == 0) {
251 if (flag & IO_NDELAY)
252 return (EWOULDBLOCK);
253 error = ttysleep(tp, TSA_PTS_READ(tp), TTIPRI | PCATCH,
254 "ptsin", 0);
255 if (error)
256 return (error);
257 goto again;
258 }
259 while (tp->t_canq.c_cc > 1 && uio->uio_resid > 0)
260 if (ureadc(getc(&tp->t_canq), uio) < 0) {
261 error = EFAULT;
262 break;
263 }
264 if (tp->t_canq.c_cc == 1)
265 (void) getc(&tp->t_canq);
266 if (tp->t_canq.c_cc)
267 return (error);
268 } else
269 if (tp->t_oproc)
270 error = (*linesw[tp->t_line].l_read)(tp, uio, flag);
271 ptcwakeup(tp, FWRITE);
272 return (error);
273}
274
275/*
276 * Write to pseudo-tty.
277 * Wakeups of controlling tty will happen
278 * indirectly, when tty driver calls ptsstart.
279 */
280static int
281ptswrite(dev, uio, flag)
282 dev_t dev;
283 struct uio *uio;
284 int flag;
285{
286 register struct tty *tp;
287
288 tp = dev->si_tty;
289 if (tp->t_oproc == 0)
290 return (EIO);
291 return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
292}
293
294/*
295 * Start output on pseudo-tty.
296 * Wake up process selecting or sleeping for input from controlling tty.
297 */
298static void
299ptsstart(tp)
300 struct tty *tp;
301{
302 register struct pt_ioctl *pti = tp->t_dev->si_drv1;
303
304 if (tp->t_state & TS_TTSTOP)
305 return;
306 if (pti->pt_flags & PF_STOPPED) {
307 pti->pt_flags &= ~PF_STOPPED;
308 pti->pt_send = TIOCPKT_START;
309 }
310 ptcwakeup(tp, FREAD);
311}
312
313static void
314ptcwakeup(tp, flag)
315 struct tty *tp;
316 int flag;
317{
318 struct pt_ioctl *pti = tp->t_dev->si_drv1;
319
320 if (flag & FREAD) {
321 selwakeup(&pti->pt_selr);
322 wakeup(TSA_PTC_READ(tp));
323 }
324 if (flag & FWRITE) {
325 selwakeup(&pti->pt_selw);
326 wakeup(TSA_PTC_WRITE(tp));
327 }
328}
329
330static int
331ptcopen(dev, flag, devtype, td)
332 dev_t dev;
333 int flag, devtype;
334 struct thread *td;
335{
336 struct proc *p = td->td_proc;
337 register struct tty *tp;
338 struct pt_ioctl *pti;
339
340 if (!dev->si_drv1)
341 ptyinit(dev);
342 if (!dev->si_drv1)
343 return(ENXIO);
344 tp = dev->si_tty;
345 if (tp->t_oproc)
346 return (EIO);
347 tp->t_timeout = -1;
348 tp->t_oproc = ptsstart;
349 tp->t_stop = ptsstop;
350 (void)(*linesw[tp->t_line].l_modem)(tp, 1);
351 tp->t_lflag &= ~EXTPROC;
352 pti = dev->si_drv1;
353 pti->pt_prison = p->p_ucred->cr_prison;
354 pti->pt_flags = 0;
355 pti->pt_send = 0;
356 pti->pt_ucntl = 0;
357 return (0);
358}
359
360static int
361ptcclose(dev, flags, fmt, td)
362 dev_t dev;
363 int flags;
364 int fmt;
365 struct thread *td;
366{
367 register struct tty *tp;
368
369 tp = dev->si_tty;
370 (void)(*linesw[tp->t_line].l_modem)(tp, 0);
371
372 /*
373 * XXX MDMBUF makes no sense for ptys but would inhibit the above
374 * l_modem(). CLOCAL makes sense but isn't supported. Special
375 * l_modem()s that ignore carrier drop make no sense for ptys but
376 * may be in use because other parts of the line discipline make
377 * sense for ptys. Recover by doing everything that a normal
378 * ttymodem() would have done except for sending a SIGHUP.
379 */
380 if (tp->t_state & TS_ISOPEN) {
381 tp->t_state &= ~(TS_CARR_ON | TS_CONNECTED);
382 tp->t_state |= TS_ZOMBIE;
383 ttyflush(tp, FREAD | FWRITE);
384 }
385
386 tp->t_oproc = 0; /* mark closed */
387 return (0);
388}
389
390static int
391ptcread(dev, uio, flag)
392 dev_t dev;
393 struct uio *uio;
394 int flag;
395{
396 register struct tty *tp = dev->si_tty;
397 struct pt_ioctl *pti = dev->si_drv1;
398 char buf[BUFSIZ];
399 int error = 0, cc;
400
401 /*
402 * We want to block until the slave
403 * is open, and there's something to read;
404 * but if we lost the slave or we're NBIO,
405 * then return the appropriate error instead.
406 */
407 for (;;) {
408 if (tp->t_state&TS_ISOPEN) {
409 if (pti->pt_flags&PF_PKT && pti->pt_send) {
410 error = ureadc((int)pti->pt_send, uio);
411 if (error)
412 return (error);
413 if (pti->pt_send & TIOCPKT_IOCTL) {
414 cc = min(uio->uio_resid,
415 sizeof(tp->t_termios));
416 uiomove((caddr_t)&tp->t_termios, cc,
417 uio);
418 }
419 pti->pt_send = 0;
420 return (0);
421 }
422 if (pti->pt_flags&PF_UCNTL && pti->pt_ucntl) {
423 error = ureadc((int)pti->pt_ucntl, uio);
424 if (error)
425 return (error);
426 pti->pt_ucntl = 0;
427 return (0);
428 }
429 if (tp->t_outq.c_cc && (tp->t_state&TS_TTSTOP) == 0)
430 break;
431 }
432 if ((tp->t_state & TS_CONNECTED) == 0)
433 return (0); /* EOF */
434 if (flag & IO_NDELAY)
435 return (EWOULDBLOCK);
436 error = tsleep(TSA_PTC_READ(tp), TTIPRI | PCATCH, "ptcin", 0);
437 if (error)
438 return (error);
439 }
440 if (pti->pt_flags & (PF_PKT|PF_UCNTL))
441 error = ureadc(0, uio);
442 while (uio->uio_resid > 0 && error == 0) {
443 cc = q_to_b(&tp->t_outq, buf, min(uio->uio_resid, BUFSIZ));
444 if (cc <= 0)
445 break;
446 error = uiomove(buf, cc, uio);
447 }
448 ttwwakeup(tp);
449 return (error);
450}
451
452static void
453ptsstop(tp, flush)
454 register struct tty *tp;
455 int flush;
456{
457 struct pt_ioctl *pti = tp->t_dev->si_drv1;
458 int flag;
459
460 /* note: FLUSHREAD and FLUSHWRITE already ok */
461 if (flush == 0) {
462 flush = TIOCPKT_STOP;
463 pti->pt_flags |= PF_STOPPED;
464 } else
465 pti->pt_flags &= ~PF_STOPPED;
466 pti->pt_send |= flush;
467 /* change of perspective */
468 flag = 0;
469 if (flush & FREAD)
470 flag |= FWRITE;
471 if (flush & FWRITE)
472 flag |= FREAD;
473 ptcwakeup(tp, flag);
474}
475
476static int
477ptcpoll(dev, events, td)
478 dev_t dev;
479 int events;
480 struct thread *td;
481{
482 register struct tty *tp = dev->si_tty;
483 struct pt_ioctl *pti = dev->si_drv1;
484 int revents = 0;
485 int s;
486
487 if ((tp->t_state & TS_CONNECTED) == 0)
488 return (seltrue(dev, events, td) | POLLHUP);
489
490 /*
491 * Need to block timeouts (ttrstart).
492 */
493 s = spltty();
494
495 if (events & (POLLIN | POLLRDNORM))
496 if ((tp->t_state & TS_ISOPEN) &&
497 ((tp->t_outq.c_cc && (tp->t_state & TS_TTSTOP) == 0) ||
498 ((pti->pt_flags & PF_PKT) && pti->pt_send) ||
499 ((pti->pt_flags & PF_UCNTL) && pti->pt_ucntl)))
500 revents |= events & (POLLIN | POLLRDNORM);
501
502 if (events & (POLLOUT | POLLWRNORM))
503 if (tp->t_state & TS_ISOPEN &&
504 ((pti->pt_flags & PF_REMOTE) ?
505 (tp->t_canq.c_cc == 0) :
506 ((tp->t_rawq.c_cc + tp->t_canq.c_cc < TTYHOG - 2) ||
| 35 */
36
37/*
38 * Pseudo-teletype Driver
39 * (Actually two drivers, requiring two entries in 'cdevsw')
40 */
41#include "opt_compat.h"
42#include <sys/param.h>
43#include <sys/systm.h>
44#if defined(COMPAT_43) || defined(COMPAT_SUNOS)
45#include <sys/ioctl_compat.h>
46#endif
47#include <sys/proc.h>
48#include <sys/tty.h>
49#include <sys/conf.h>
50#include <sys/fcntl.h>
51#include <sys/poll.h>
52#include <sys/kernel.h>
53#include <sys/vnode.h>
54#include <sys/signalvar.h>
55#include <sys/malloc.h>
56
57static MALLOC_DEFINE(M_PTY, "ptys", "pty data structures");
58
59static void ptsstart __P((struct tty *tp));
60static void ptsstop __P((struct tty *tp, int rw));
61static void ptcwakeup __P((struct tty *tp, int flag));
62static dev_t ptyinit __P((dev_t cdev));
63
64static d_open_t ptsopen;
65static d_close_t ptsclose;
66static d_read_t ptsread;
67static d_write_t ptswrite;
68static d_ioctl_t ptyioctl;
69static d_open_t ptcopen;
70static d_close_t ptcclose;
71static d_read_t ptcread;
72static d_write_t ptcwrite;
73static d_poll_t ptcpoll;
74
75#define CDEV_MAJOR_S 5
76static struct cdevsw pts_cdevsw = {
77 /* open */ ptsopen,
78 /* close */ ptsclose,
79 /* read */ ptsread,
80 /* write */ ptswrite,
81 /* ioctl */ ptyioctl,
82 /* poll */ ttypoll,
83 /* mmap */ nommap,
84 /* strategy */ nostrategy,
85 /* name */ "pts",
86 /* maj */ CDEV_MAJOR_S,
87 /* dump */ nodump,
88 /* psize */ nopsize,
89 /* flags */ D_TTY | D_KQFILTER,
90 /* kqfilter */ ttykqfilter,
91};
92
93#define CDEV_MAJOR_C 6
94static struct cdevsw ptc_cdevsw = {
95 /* open */ ptcopen,
96 /* close */ ptcclose,
97 /* read */ ptcread,
98 /* write */ ptcwrite,
99 /* ioctl */ ptyioctl,
100 /* poll */ ptcpoll,
101 /* mmap */ nommap,
102 /* strategy */ nostrategy,
103 /* name */ "ptc",
104 /* maj */ CDEV_MAJOR_C,
105 /* dump */ nodump,
106 /* psize */ nopsize,
107 /* flags */ D_TTY | D_KQFILTER,
108 /* kqfilter */ ttykqfilter,
109};
110
111#define BUFSIZ 100 /* Chunk size iomoved to/from user */
112
113struct pt_ioctl {
114 int pt_flags;
115 struct selinfo pt_selr, pt_selw;
116 u_char pt_send;
117 u_char pt_ucntl;
118 struct tty pt_tty;
119 dev_t devs, devc;
120 struct prison *pt_prison;
121};
122
123#define PF_PKT 0x08 /* packet mode */
124#define PF_STOPPED 0x10 /* user told stopped */
125#define PF_REMOTE 0x20 /* remote and flow controlled input */
126#define PF_NOSTOP 0x40
127#define PF_UCNTL 0x80 /* user control mode */
128
129static char *names = "pqrsPQRS";
130/*
131 * This function creates and initializes a pts/ptc pair
132 *
133 * pts == /dev/tty[pqrsPQRS][0123456789abcdefghijklmnopqrstuv]
134 * ptc == /dev/pty[pqrsPQRS][0123456789abcdefghijklmnopqrstuv]
135 *
136 * XXX: define and add mapping of upper minor bits to allow more
137 * than 256 ptys.
138 */
139static dev_t
140ptyinit(dev_t devc)
141{
142 dev_t devs;
143 struct pt_ioctl *pt;
144 int n;
145
146 n = minor(devc);
147 /* For now we only map the lower 8 bits of the minor */
148 if (n & ~0xff)
149 return (NODEV);
150
151 devc->si_flags &= ~SI_CHEAPCLONE;
152
153 pt = malloc(sizeof(*pt), M_PTY, M_WAITOK | M_ZERO);
154 pt->devs = devs = make_dev(&pts_cdevsw, n,
155 UID_ROOT, GID_WHEEL, 0666, "tty%c%r", names[n / 32], n % 32);
156 pt->devc = devc;
157
158 devs->si_drv1 = devc->si_drv1 = pt;
159 devs->si_tty = devc->si_tty = &pt->pt_tty;
160 pt->pt_tty.t_dev = devs;
161 ttyregister(&pt->pt_tty);
162 return (devc);
163}
164
165/*ARGSUSED*/
166static int
167ptsopen(dev, flag, devtype, td)
168 dev_t dev;
169 int flag, devtype;
170 struct thread *td;
171{
172 struct proc *p = td->td_proc;
173 register struct tty *tp;
174 int error;
175 struct pt_ioctl *pti;
176
177 if (!dev->si_drv1)
178 return(ENXIO);
179 pti = dev->si_drv1;
180 tp = dev->si_tty;
181 if ((tp->t_state & TS_ISOPEN) == 0) {
182 ttychars(tp); /* Set up default chars */
183 tp->t_iflag = TTYDEF_IFLAG;
184 tp->t_oflag = TTYDEF_OFLAG;
185 tp->t_lflag = TTYDEF_LFLAG;
186 tp->t_cflag = TTYDEF_CFLAG;
187 tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
188 } else if (tp->t_state & TS_XCLUDE && suser_xxx(p->p_ucred, NULL, 0)) {
189 return (EBUSY);
190 } else if (pti->pt_prison != p->p_ucred->cr_prison) {
191 return (EBUSY);
192 }
193 if (tp->t_oproc) /* Ctrlr still around. */
194 (void)(*linesw[tp->t_line].l_modem)(tp, 1);
195 while ((tp->t_state & TS_CARR_ON) == 0) {
196 if (flag&FNONBLOCK)
197 break;
198 error = ttysleep(tp, TSA_CARR_ON(tp), TTIPRI | PCATCH,
199 "ptsopn", 0);
200 if (error)
201 return (error);
202 }
203 error = (*linesw[tp->t_line].l_open)(dev, tp);
204 if (error == 0)
205 ptcwakeup(tp, FREAD|FWRITE);
206 return (error);
207}
208
209static int
210ptsclose(dev, flag, mode, td)
211 dev_t dev;
212 int flag, mode;
213 struct thread *td;
214{
215 register struct tty *tp;
216 int err;
217
218 tp = dev->si_tty;
219 err = (*linesw[tp->t_line].l_close)(tp, flag);
220 ptsstop(tp, FREAD|FWRITE);
221 (void) ttyclose(tp);
222 return (err);
223}
224
225static int
226ptsread(dev, uio, flag)
227 dev_t dev;
228 struct uio *uio;
229 int flag;
230{
231 struct thread *td = curthread;
232 struct proc *p = td->td_proc;
233 register struct tty *tp = dev->si_tty;
234 register struct pt_ioctl *pti = dev->si_drv1;
235 int error = 0;
236
237again:
238 if (pti->pt_flags & PF_REMOTE) {
239 while (isbackground(p, tp)) {
240 if (SIGISMEMBER(p->p_sigignore, SIGTTIN) ||
241 SIGISMEMBER(p->p_sigmask, SIGTTIN) ||
242 p->p_pgrp->pg_jobc == 0 || p->p_flag & P_PPWAIT)
243 return (EIO);
244 pgsignal(p->p_pgrp, SIGTTIN, 1);
245 error = ttysleep(tp, &lbolt, TTIPRI | PCATCH, "ptsbg",
246 0);
247 if (error)
248 return (error);
249 }
250 if (tp->t_canq.c_cc == 0) {
251 if (flag & IO_NDELAY)
252 return (EWOULDBLOCK);
253 error = ttysleep(tp, TSA_PTS_READ(tp), TTIPRI | PCATCH,
254 "ptsin", 0);
255 if (error)
256 return (error);
257 goto again;
258 }
259 while (tp->t_canq.c_cc > 1 && uio->uio_resid > 0)
260 if (ureadc(getc(&tp->t_canq), uio) < 0) {
261 error = EFAULT;
262 break;
263 }
264 if (tp->t_canq.c_cc == 1)
265 (void) getc(&tp->t_canq);
266 if (tp->t_canq.c_cc)
267 return (error);
268 } else
269 if (tp->t_oproc)
270 error = (*linesw[tp->t_line].l_read)(tp, uio, flag);
271 ptcwakeup(tp, FWRITE);
272 return (error);
273}
274
275/*
276 * Write to pseudo-tty.
277 * Wakeups of controlling tty will happen
278 * indirectly, when tty driver calls ptsstart.
279 */
280static int
281ptswrite(dev, uio, flag)
282 dev_t dev;
283 struct uio *uio;
284 int flag;
285{
286 register struct tty *tp;
287
288 tp = dev->si_tty;
289 if (tp->t_oproc == 0)
290 return (EIO);
291 return ((*linesw[tp->t_line].l_write)(tp, uio, flag));
292}
293
294/*
295 * Start output on pseudo-tty.
296 * Wake up process selecting or sleeping for input from controlling tty.
297 */
298static void
299ptsstart(tp)
300 struct tty *tp;
301{
302 register struct pt_ioctl *pti = tp->t_dev->si_drv1;
303
304 if (tp->t_state & TS_TTSTOP)
305 return;
306 if (pti->pt_flags & PF_STOPPED) {
307 pti->pt_flags &= ~PF_STOPPED;
308 pti->pt_send = TIOCPKT_START;
309 }
310 ptcwakeup(tp, FREAD);
311}
312
313static void
314ptcwakeup(tp, flag)
315 struct tty *tp;
316 int flag;
317{
318 struct pt_ioctl *pti = tp->t_dev->si_drv1;
319
320 if (flag & FREAD) {
321 selwakeup(&pti->pt_selr);
322 wakeup(TSA_PTC_READ(tp));
323 }
324 if (flag & FWRITE) {
325 selwakeup(&pti->pt_selw);
326 wakeup(TSA_PTC_WRITE(tp));
327 }
328}
329
330static int
331ptcopen(dev, flag, devtype, td)
332 dev_t dev;
333 int flag, devtype;
334 struct thread *td;
335{
336 struct proc *p = td->td_proc;
337 register struct tty *tp;
338 struct pt_ioctl *pti;
339
340 if (!dev->si_drv1)
341 ptyinit(dev);
342 if (!dev->si_drv1)
343 return(ENXIO);
344 tp = dev->si_tty;
345 if (tp->t_oproc)
346 return (EIO);
347 tp->t_timeout = -1;
348 tp->t_oproc = ptsstart;
349 tp->t_stop = ptsstop;
350 (void)(*linesw[tp->t_line].l_modem)(tp, 1);
351 tp->t_lflag &= ~EXTPROC;
352 pti = dev->si_drv1;
353 pti->pt_prison = p->p_ucred->cr_prison;
354 pti->pt_flags = 0;
355 pti->pt_send = 0;
356 pti->pt_ucntl = 0;
357 return (0);
358}
359
360static int
361ptcclose(dev, flags, fmt, td)
362 dev_t dev;
363 int flags;
364 int fmt;
365 struct thread *td;
366{
367 register struct tty *tp;
368
369 tp = dev->si_tty;
370 (void)(*linesw[tp->t_line].l_modem)(tp, 0);
371
372 /*
373 * XXX MDMBUF makes no sense for ptys but would inhibit the above
374 * l_modem(). CLOCAL makes sense but isn't supported. Special
375 * l_modem()s that ignore carrier drop make no sense for ptys but
376 * may be in use because other parts of the line discipline make
377 * sense for ptys. Recover by doing everything that a normal
378 * ttymodem() would have done except for sending a SIGHUP.
379 */
380 if (tp->t_state & TS_ISOPEN) {
381 tp->t_state &= ~(TS_CARR_ON | TS_CONNECTED);
382 tp->t_state |= TS_ZOMBIE;
383 ttyflush(tp, FREAD | FWRITE);
384 }
385
386 tp->t_oproc = 0; /* mark closed */
387 return (0);
388}
389
390static int
391ptcread(dev, uio, flag)
392 dev_t dev;
393 struct uio *uio;
394 int flag;
395{
396 register struct tty *tp = dev->si_tty;
397 struct pt_ioctl *pti = dev->si_drv1;
398 char buf[BUFSIZ];
399 int error = 0, cc;
400
401 /*
402 * We want to block until the slave
403 * is open, and there's something to read;
404 * but if we lost the slave or we're NBIO,
405 * then return the appropriate error instead.
406 */
407 for (;;) {
408 if (tp->t_state&TS_ISOPEN) {
409 if (pti->pt_flags&PF_PKT && pti->pt_send) {
410 error = ureadc((int)pti->pt_send, uio);
411 if (error)
412 return (error);
413 if (pti->pt_send & TIOCPKT_IOCTL) {
414 cc = min(uio->uio_resid,
415 sizeof(tp->t_termios));
416 uiomove((caddr_t)&tp->t_termios, cc,
417 uio);
418 }
419 pti->pt_send = 0;
420 return (0);
421 }
422 if (pti->pt_flags&PF_UCNTL && pti->pt_ucntl) {
423 error = ureadc((int)pti->pt_ucntl, uio);
424 if (error)
425 return (error);
426 pti->pt_ucntl = 0;
427 return (0);
428 }
429 if (tp->t_outq.c_cc && (tp->t_state&TS_TTSTOP) == 0)
430 break;
431 }
432 if ((tp->t_state & TS_CONNECTED) == 0)
433 return (0); /* EOF */
434 if (flag & IO_NDELAY)
435 return (EWOULDBLOCK);
436 error = tsleep(TSA_PTC_READ(tp), TTIPRI | PCATCH, "ptcin", 0);
437 if (error)
438 return (error);
439 }
440 if (pti->pt_flags & (PF_PKT|PF_UCNTL))
441 error = ureadc(0, uio);
442 while (uio->uio_resid > 0 && error == 0) {
443 cc = q_to_b(&tp->t_outq, buf, min(uio->uio_resid, BUFSIZ));
444 if (cc <= 0)
445 break;
446 error = uiomove(buf, cc, uio);
447 }
448 ttwwakeup(tp);
449 return (error);
450}
451
452static void
453ptsstop(tp, flush)
454 register struct tty *tp;
455 int flush;
456{
457 struct pt_ioctl *pti = tp->t_dev->si_drv1;
458 int flag;
459
460 /* note: FLUSHREAD and FLUSHWRITE already ok */
461 if (flush == 0) {
462 flush = TIOCPKT_STOP;
463 pti->pt_flags |= PF_STOPPED;
464 } else
465 pti->pt_flags &= ~PF_STOPPED;
466 pti->pt_send |= flush;
467 /* change of perspective */
468 flag = 0;
469 if (flush & FREAD)
470 flag |= FWRITE;
471 if (flush & FWRITE)
472 flag |= FREAD;
473 ptcwakeup(tp, flag);
474}
475
476static int
477ptcpoll(dev, events, td)
478 dev_t dev;
479 int events;
480 struct thread *td;
481{
482 register struct tty *tp = dev->si_tty;
483 struct pt_ioctl *pti = dev->si_drv1;
484 int revents = 0;
485 int s;
486
487 if ((tp->t_state & TS_CONNECTED) == 0)
488 return (seltrue(dev, events, td) | POLLHUP);
489
490 /*
491 * Need to block timeouts (ttrstart).
492 */
493 s = spltty();
494
495 if (events & (POLLIN | POLLRDNORM))
496 if ((tp->t_state & TS_ISOPEN) &&
497 ((tp->t_outq.c_cc && (tp->t_state & TS_TTSTOP) == 0) ||
498 ((pti->pt_flags & PF_PKT) && pti->pt_send) ||
499 ((pti->pt_flags & PF_UCNTL) && pti->pt_ucntl)))
500 revents |= events & (POLLIN | POLLRDNORM);
501
502 if (events & (POLLOUT | POLLWRNORM))
503 if (tp->t_state & TS_ISOPEN &&
504 ((pti->pt_flags & PF_REMOTE) ?
505 (tp->t_canq.c_cc == 0) :
506 ((tp->t_rawq.c_cc + tp->t_canq.c_cc < TTYHOG - 2) ||
|
600 wakeup(TSA_HUP_OR_INPUT(tp));
601 goto block;
602 }
603 (*linesw[tp->t_line].l_rint)(*cp++, tp);
604 cnt++;
605 cc--;
606 }
607 cc = 0;
608 }
609 return (0);
610block:
611 /*
612 * Come here to wait for slave to open, for space
613 * in outq, or space in rawq, or an empty canq.
614 */
615 if ((tp->t_state & TS_CONNECTED) == 0) {
616 /* adjust for data copied in but not written */
617 uio->uio_resid += cc;
618 return (EIO);
619 }
620 if (flag & IO_NDELAY) {
621 /* adjust for data copied in but not written */
622 uio->uio_resid += cc;
623 if (cnt == 0)
624 return (EWOULDBLOCK);
625 return (0);
626 }
627 error = tsleep(TSA_PTC_WRITE(tp), TTOPRI | PCATCH, "ptcout", 0);
628 if (error) {
629 /* adjust for data copied in but not written */
630 uio->uio_resid += cc;
631 return (error);
632 }
633 goto again;
634}
635
636/*ARGSUSED*/
637static int
638ptyioctl(dev, cmd, data, flag, td)
639 dev_t dev;
640 u_long cmd;
641 caddr_t data;
642 int flag;
643 struct thread *td;
644{
645 register struct tty *tp = dev->si_tty;
646 register struct pt_ioctl *pti = dev->si_drv1;
647 register u_char *cc = tp->t_cc;
648 int stop, error;
649
650 if (devsw(dev)->d_open == ptcopen) {
651 switch (cmd) {
652
653 case TIOCGPGRP:
654 /*
655 * We avoid calling ttioctl on the controller since,
656 * in that case, tp must be the controlling terminal.
657 */
658 *(int *)data = tp->t_pgrp ? tp->t_pgrp->pg_id : 0;
659 return (0);
660
661 case TIOCPKT:
662 if (*(int *)data) {
663 if (pti->pt_flags & PF_UCNTL)
664 return (EINVAL);
665 pti->pt_flags |= PF_PKT;
666 } else
667 pti->pt_flags &= ~PF_PKT;
668 return (0);
669
670 case TIOCUCNTL:
671 if (*(int *)data) {
672 if (pti->pt_flags & PF_PKT)
673 return (EINVAL);
674 pti->pt_flags |= PF_UCNTL;
675 } else
676 pti->pt_flags &= ~PF_UCNTL;
677 return (0);
678
679 case TIOCREMOTE:
680 if (*(int *)data)
681 pti->pt_flags |= PF_REMOTE;
682 else
683 pti->pt_flags &= ~PF_REMOTE;
684 ttyflush(tp, FREAD|FWRITE);
685 return (0);
686 }
687
688 /*
689 * The rest of the ioctls shouldn't be called until
690 * the slave is open.
691 */
692 if ((tp->t_state & TS_ISOPEN) == 0)
693 return (EAGAIN);
694
695 switch (cmd) {
696#ifdef COMPAT_43
697 case TIOCSETP:
698 case TIOCSETN:
699#endif
700 case TIOCSETD:
701 case TIOCSETA:
702 case TIOCSETAW:
703 case TIOCSETAF:
704 /*
705 * IF CONTROLLER STTY THEN MUST FLUSH TO PREVENT A HANG.
706 * ttywflush(tp) will hang if there are characters in
707 * the outq.
708 */
709 ndflush(&tp->t_outq, tp->t_outq.c_cc);
710 break;
711
712 case TIOCSIG:
713 if (*(unsigned int *)data >= NSIG ||
714 *(unsigned int *)data == 0)
715 return(EINVAL);
716 if ((tp->t_lflag&NOFLSH) == 0)
717 ttyflush(tp, FREAD|FWRITE);
718 pgsignal(tp->t_pgrp, *(unsigned int *)data, 1);
719 if ((*(unsigned int *)data == SIGINFO) &&
720 ((tp->t_lflag&NOKERNINFO) == 0))
721 ttyinfo(tp);
722 return(0);
723 }
724 }
725 if (cmd == TIOCEXT) {
726 /*
727 * When the EXTPROC bit is being toggled, we need
728 * to send an TIOCPKT_IOCTL if the packet driver
729 * is turned on.
730 */
731 if (*(int *)data) {
732 if (pti->pt_flags & PF_PKT) {
733 pti->pt_send |= TIOCPKT_IOCTL;
734 ptcwakeup(tp, FREAD);
735 }
736 tp->t_lflag |= EXTPROC;
737 } else {
738 if ((tp->t_lflag & EXTPROC) &&
739 (pti->pt_flags & PF_PKT)) {
740 pti->pt_send |= TIOCPKT_IOCTL;
741 ptcwakeup(tp, FREAD);
742 }
743 tp->t_lflag &= ~EXTPROC;
744 }
745 return(0);
746 }
747 error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, td);
748 if (error == ENOIOCTL)
749 error = ttioctl(tp, cmd, data, flag);
750 if (error == ENOIOCTL) {
751 if (pti->pt_flags & PF_UCNTL &&
752 (cmd & ~0xff) == UIOCCMD(0)) {
753 if (cmd & 0xff) {
754 pti->pt_ucntl = (u_char)cmd;
755 ptcwakeup(tp, FREAD);
756 }
757 return (0);
758 }
759 error = ENOTTY;
760 }
761 /*
762 * If external processing and packet mode send ioctl packet.
763 */
764 if ((tp->t_lflag&EXTPROC) && (pti->pt_flags & PF_PKT)) {
765 switch(cmd) {
766 case TIOCSETA:
767 case TIOCSETAW:
768 case TIOCSETAF:
769#ifdef COMPAT_43
770 case TIOCSETP:
771 case TIOCSETN:
772#endif
773#if defined(COMPAT_43) || defined(COMPAT_SUNOS)
774 case TIOCSETC:
775 case TIOCSLTC:
776 case TIOCLBIS:
777 case TIOCLBIC:
778 case TIOCLSET:
779#endif
780 pti->pt_send |= TIOCPKT_IOCTL;
781 ptcwakeup(tp, FREAD);
782 default:
783 break;
784 }
785 }
786 stop = (tp->t_iflag & IXON) && CCEQ(cc[VSTOP], CTRL('s'))
787 && CCEQ(cc[VSTART], CTRL('q'));
788 if (pti->pt_flags & PF_NOSTOP) {
789 if (stop) {
790 pti->pt_send &= ~TIOCPKT_NOSTOP;
791 pti->pt_send |= TIOCPKT_DOSTOP;
792 pti->pt_flags &= ~PF_NOSTOP;
793 ptcwakeup(tp, FREAD);
794 }
795 } else {
796 if (!stop) {
797 pti->pt_send &= ~TIOCPKT_DOSTOP;
798 pti->pt_send |= TIOCPKT_NOSTOP;
799 pti->pt_flags |= PF_NOSTOP;
800 ptcwakeup(tp, FREAD);
801 }
802 }
803 return (error);
804}
805
806
807static void ptc_drvinit __P((void *unused));
808
809static void pty_clone __P((void *arg, char *name, int namelen, dev_t *dev));
810
811static void
812pty_clone(arg, name, namelen, dev)
813 void *arg;
814 char *name;
815 int namelen;
816 dev_t *dev;
817{
818 int u;
819
820 if (*dev != NODEV)
821 return;
822 if (bcmp(name, "pty", 3) != 0)
823 return;
824 if (name[5] != '\0')
825 return;
826 switch (name[3]) {
827 case 'p': u = 0; break;
828 case 'q': u = 32; break;
829 case 'r': u = 64; break;
830 case 's': u = 96; break;
831 case 'P': u = 128; break;
832 case 'Q': u = 160; break;
833 case 'R': u = 192; break;
834 case 'S': u = 224; break;
835 default: return;
836 }
837 if (name[4] >= '0' && name[4] <= '9')
838 u += name[4] - '0';
839 else if (name[4] >= 'a' && name[4] <= 'v')
840 u += name[4] - 'a' + 10;
841 else
842 return;
843 *dev = make_dev(&ptc_cdevsw, u,
844 UID_ROOT, GID_WHEEL, 0666, "pty%c%r", names[u / 32], u % 32);
845 (*dev)->si_flags |= SI_CHEAPCLONE;
846 return;
847}
848
849static void
850ptc_drvinit(unused)
851 void *unused;
852{
853 EVENTHANDLER_REGISTER(dev_clone, pty_clone, 0, 1000);
854 cdevsw_add(&pts_cdevsw);
855 cdevsw_add(&ptc_cdevsw);
856}
857
858SYSINIT(ptcdev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR_C,ptc_drvinit,NULL)
| 600 wakeup(TSA_HUP_OR_INPUT(tp));
601 goto block;
602 }
603 (*linesw[tp->t_line].l_rint)(*cp++, tp);
604 cnt++;
605 cc--;
606 }
607 cc = 0;
608 }
609 return (0);
610block:
611 /*
612 * Come here to wait for slave to open, for space
613 * in outq, or space in rawq, or an empty canq.
614 */
615 if ((tp->t_state & TS_CONNECTED) == 0) {
616 /* adjust for data copied in but not written */
617 uio->uio_resid += cc;
618 return (EIO);
619 }
620 if (flag & IO_NDELAY) {
621 /* adjust for data copied in but not written */
622 uio->uio_resid += cc;
623 if (cnt == 0)
624 return (EWOULDBLOCK);
625 return (0);
626 }
627 error = tsleep(TSA_PTC_WRITE(tp), TTOPRI | PCATCH, "ptcout", 0);
628 if (error) {
629 /* adjust for data copied in but not written */
630 uio->uio_resid += cc;
631 return (error);
632 }
633 goto again;
634}
635
636/*ARGSUSED*/
637static int
638ptyioctl(dev, cmd, data, flag, td)
639 dev_t dev;
640 u_long cmd;
641 caddr_t data;
642 int flag;
643 struct thread *td;
644{
645 register struct tty *tp = dev->si_tty;
646 register struct pt_ioctl *pti = dev->si_drv1;
647 register u_char *cc = tp->t_cc;
648 int stop, error;
649
650 if (devsw(dev)->d_open == ptcopen) {
651 switch (cmd) {
652
653 case TIOCGPGRP:
654 /*
655 * We avoid calling ttioctl on the controller since,
656 * in that case, tp must be the controlling terminal.
657 */
658 *(int *)data = tp->t_pgrp ? tp->t_pgrp->pg_id : 0;
659 return (0);
660
661 case TIOCPKT:
662 if (*(int *)data) {
663 if (pti->pt_flags & PF_UCNTL)
664 return (EINVAL);
665 pti->pt_flags |= PF_PKT;
666 } else
667 pti->pt_flags &= ~PF_PKT;
668 return (0);
669
670 case TIOCUCNTL:
671 if (*(int *)data) {
672 if (pti->pt_flags & PF_PKT)
673 return (EINVAL);
674 pti->pt_flags |= PF_UCNTL;
675 } else
676 pti->pt_flags &= ~PF_UCNTL;
677 return (0);
678
679 case TIOCREMOTE:
680 if (*(int *)data)
681 pti->pt_flags |= PF_REMOTE;
682 else
683 pti->pt_flags &= ~PF_REMOTE;
684 ttyflush(tp, FREAD|FWRITE);
685 return (0);
686 }
687
688 /*
689 * The rest of the ioctls shouldn't be called until
690 * the slave is open.
691 */
692 if ((tp->t_state & TS_ISOPEN) == 0)
693 return (EAGAIN);
694
695 switch (cmd) {
696#ifdef COMPAT_43
697 case TIOCSETP:
698 case TIOCSETN:
699#endif
700 case TIOCSETD:
701 case TIOCSETA:
702 case TIOCSETAW:
703 case TIOCSETAF:
704 /*
705 * IF CONTROLLER STTY THEN MUST FLUSH TO PREVENT A HANG.
706 * ttywflush(tp) will hang if there are characters in
707 * the outq.
708 */
709 ndflush(&tp->t_outq, tp->t_outq.c_cc);
710 break;
711
712 case TIOCSIG:
713 if (*(unsigned int *)data >= NSIG ||
714 *(unsigned int *)data == 0)
715 return(EINVAL);
716 if ((tp->t_lflag&NOFLSH) == 0)
717 ttyflush(tp, FREAD|FWRITE);
718 pgsignal(tp->t_pgrp, *(unsigned int *)data, 1);
719 if ((*(unsigned int *)data == SIGINFO) &&
720 ((tp->t_lflag&NOKERNINFO) == 0))
721 ttyinfo(tp);
722 return(0);
723 }
724 }
725 if (cmd == TIOCEXT) {
726 /*
727 * When the EXTPROC bit is being toggled, we need
728 * to send an TIOCPKT_IOCTL if the packet driver
729 * is turned on.
730 */
731 if (*(int *)data) {
732 if (pti->pt_flags & PF_PKT) {
733 pti->pt_send |= TIOCPKT_IOCTL;
734 ptcwakeup(tp, FREAD);
735 }
736 tp->t_lflag |= EXTPROC;
737 } else {
738 if ((tp->t_lflag & EXTPROC) &&
739 (pti->pt_flags & PF_PKT)) {
740 pti->pt_send |= TIOCPKT_IOCTL;
741 ptcwakeup(tp, FREAD);
742 }
743 tp->t_lflag &= ~EXTPROC;
744 }
745 return(0);
746 }
747 error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, td);
748 if (error == ENOIOCTL)
749 error = ttioctl(tp, cmd, data, flag);
750 if (error == ENOIOCTL) {
751 if (pti->pt_flags & PF_UCNTL &&
752 (cmd & ~0xff) == UIOCCMD(0)) {
753 if (cmd & 0xff) {
754 pti->pt_ucntl = (u_char)cmd;
755 ptcwakeup(tp, FREAD);
756 }
757 return (0);
758 }
759 error = ENOTTY;
760 }
761 /*
762 * If external processing and packet mode send ioctl packet.
763 */
764 if ((tp->t_lflag&EXTPROC) && (pti->pt_flags & PF_PKT)) {
765 switch(cmd) {
766 case TIOCSETA:
767 case TIOCSETAW:
768 case TIOCSETAF:
769#ifdef COMPAT_43
770 case TIOCSETP:
771 case TIOCSETN:
772#endif
773#if defined(COMPAT_43) || defined(COMPAT_SUNOS)
774 case TIOCSETC:
775 case TIOCSLTC:
776 case TIOCLBIS:
777 case TIOCLBIC:
778 case TIOCLSET:
779#endif
780 pti->pt_send |= TIOCPKT_IOCTL;
781 ptcwakeup(tp, FREAD);
782 default:
783 break;
784 }
785 }
786 stop = (tp->t_iflag & IXON) && CCEQ(cc[VSTOP], CTRL('s'))
787 && CCEQ(cc[VSTART], CTRL('q'));
788 if (pti->pt_flags & PF_NOSTOP) {
789 if (stop) {
790 pti->pt_send &= ~TIOCPKT_NOSTOP;
791 pti->pt_send |= TIOCPKT_DOSTOP;
792 pti->pt_flags &= ~PF_NOSTOP;
793 ptcwakeup(tp, FREAD);
794 }
795 } else {
796 if (!stop) {
797 pti->pt_send &= ~TIOCPKT_DOSTOP;
798 pti->pt_send |= TIOCPKT_NOSTOP;
799 pti->pt_flags |= PF_NOSTOP;
800 ptcwakeup(tp, FREAD);
801 }
802 }
803 return (error);
804}
805
806
807static void ptc_drvinit __P((void *unused));
808
809static void pty_clone __P((void *arg, char *name, int namelen, dev_t *dev));
810
811static void
812pty_clone(arg, name, namelen, dev)
813 void *arg;
814 char *name;
815 int namelen;
816 dev_t *dev;
817{
818 int u;
819
820 if (*dev != NODEV)
821 return;
822 if (bcmp(name, "pty", 3) != 0)
823 return;
824 if (name[5] != '\0')
825 return;
826 switch (name[3]) {
827 case 'p': u = 0; break;
828 case 'q': u = 32; break;
829 case 'r': u = 64; break;
830 case 's': u = 96; break;
831 case 'P': u = 128; break;
832 case 'Q': u = 160; break;
833 case 'R': u = 192; break;
834 case 'S': u = 224; break;
835 default: return;
836 }
837 if (name[4] >= '0' && name[4] <= '9')
838 u += name[4] - '0';
839 else if (name[4] >= 'a' && name[4] <= 'v')
840 u += name[4] - 'a' + 10;
841 else
842 return;
843 *dev = make_dev(&ptc_cdevsw, u,
844 UID_ROOT, GID_WHEEL, 0666, "pty%c%r", names[u / 32], u % 32);
845 (*dev)->si_flags |= SI_CHEAPCLONE;
846 return;
847}
848
849static void
850ptc_drvinit(unused)
851 void *unused;
852{
853 EVENTHANDLER_REGISTER(dev_clone, pty_clone, 0, 1000);
854 cdevsw_add(&pts_cdevsw);
855 cdevsw_add(&ptc_cdevsw);
856}
857
858SYSINIT(ptcdev,SI_SUB_DRIVERS,SI_ORDER_MIDDLE+CDEV_MAJOR_C,ptc_drvinit,NULL)
|