#include "pty.h"
#include <sys/param.h>
#include <sys/systm.h>
#include <sys/ioctl.h>
#include <sys/proc_internal.h>
#include <sys/kauth.h>
#include <sys/tty.h>
#include <sys/conf.h>
#include <sys/file_internal.h>
#include <sys/uio.h>
#include <sys/kernel.h>
#include <sys/vnode.h>
#include <sys/vnode_internal.h>
#include <sys/stat.h>
#include <sys/user.h>
#include <sys/signalvar.h>
#include <sys/sysctl.h>
#include <miscfs/devfs/devfs.h>
#include <miscfs/devfs/devfsdefs.h>
int _devfs_setattr(void *, unsigned short, uid_t, gid_t);
#define FREE_BSDSTATIC __private_extern__
#define d_devtotty_t struct tty **
int ptmx_init(int n_ptys);
static void ptsd_start(struct tty *tp);
static void ptmx_wakeup(struct tty *tp, int flag);
FREE_BSDSTATIC d_open_t ptsd_open;
FREE_BSDSTATIC d_close_t ptsd_close;
FREE_BSDSTATIC d_read_t ptsd_read;
FREE_BSDSTATIC d_write_t ptsd_write;
FREE_BSDSTATIC d_ioctl_t cptyioctl;
FREE_BSDSTATIC d_stop_t ptsd_stop;
FREE_BSDSTATIC d_reset_t ptsd_reset;
FREE_BSDSTATIC d_devtotty_t ptydevtotty;
FREE_BSDSTATIC d_open_t ptmx_open;
FREE_BSDSTATIC d_close_t ptmx_close;
FREE_BSDSTATIC d_read_t ptmx_read;
FREE_BSDSTATIC d_write_t ptmx_write;
FREE_BSDSTATIC d_stop_t ptmx_stop;
FREE_BSDSTATIC d_reset_t ptmx_reset;
FREE_BSDSTATIC d_select_t ptmx_select;
FREE_BSDSTATIC d_select_t ptsd_select;
static int ptmx_major;
static struct cdevsw ptmx_cdev = {
ptmx_open, ptmx_close, ptmx_read, ptmx_write,
cptyioctl, ptmx_stop, ptmx_reset, 0,
ptmx_select, eno_mmap, eno_strat, eno_getc,
eno_putc, D_TTY
};
static int ptsd_major;
static struct cdevsw ptsd_cdev = {
ptsd_open, ptsd_close, ptsd_read, ptsd_write,
cptyioctl, ptsd_stop, ptsd_reset, 0,
ptsd_select, eno_mmap, eno_strat, eno_getc,
eno_putc, D_TTY
};
int
_devfs_setattr(void * handle, unsigned short mode, uid_t uid, gid_t gid)
{
devdirent_t *direntp = (devdirent_t *)handle;
devnode_t *devnodep;
int error = EACCES;
vfs_context_t ctx = vfs_context_current();;
struct vnode_attr va;
VATTR_INIT(&va);
VATTR_SET(&va, va_uid, uid);
VATTR_SET(&va, va_gid, gid);
VATTR_SET(&va, va_mode, mode & ALLPERMS);
if (direntp == NULL || (devnodep = direntp->de_dnp) == NULL) {
error = ERESTART;
goto out;
}
if (devnodep->dn_clone == NULL) {
struct nameidata nd;
char name[128];
snprintf(name, sizeof(name), "/dev/%s", direntp->de_name);
NDINIT(&nd, LOOKUP, FOLLOW, UIO_SYSSPACE, CAST_USER_ADDR_T(name), ctx);
error = namei(&nd);
if (error)
goto out;
error = vnode_setattr(nd.ni_vp, &va, ctx);
vnode_put(nd.ni_vp);
nameidone(&nd);
goto out;
}
out:
return(error);
}
#define BUFSIZ 100
#define PTMX_TEMPLATE "ptmx"
#define PTSD_TEMPLATE "ttys%03d"
#define PTMX_MAX_DEFAULT 127
#define PTMX_MAX_HARD 999
static int ptmx_max = PTMX_MAX_DEFAULT;
static int
sysctl_ptmx_max(__unused struct sysctl_oid *oidp, __unused void *arg1,
__unused int arg2, struct sysctl_req *req)
{
int new_value, changed;
int error = sysctl_io_number(req, ptmx_max, sizeof(int), &new_value, &changed);
if (changed) {
if (new_value > 0 && new_value <= PTMX_MAX_HARD)
ptmx_max = new_value;
else
error = EINVAL;
}
return(error);
}
SYSCTL_NODE(_kern, KERN_TTY, tty, CTLFLAG_RW|CTLFLAG_LOCKED, 0, "TTY");
SYSCTL_PROC(_kern_tty, OID_AUTO, ptmx_max,
CTLTYPE_INT | CTLFLAG_RW,
&ptmx_max, 0, &sysctl_ptmx_max, "I", "ptmx_max");
struct ptmx_ioctl {
struct tty *pt_tty;
int pt_flags;
struct selinfo pt_selr;
struct selinfo pt_selw;
u_char pt_send;
u_char pt_ucntl;
void *pt_devhandle;
};
#define PF_PKT 0x0008
#define PF_STOPPED 0x0010
#define PF_REMOTE 0x0020
#define PF_NOSTOP 0x0040
#define PF_UCNTL 0x0080
#define PF_UNLOCKED 0x0100
#define PF_OPEN_M 0x0200
#define PF_OPEN_S 0x0400
static int ptmx_clone(dev_t dev, int minor);
int
ptmx_init( __unused int config_count)
{
if((ptmx_major = cdevsw_add(-15, &ptmx_cdev)) == -1) {
printf("ptmx_init: failed to obtain /dev/ptmx major number\n");
return (ENOENT);
}
if ((ptsd_major = cdevsw_add(-15, &ptsd_cdev)) == -1) {
(void)cdevsw_remove(ptmx_major, &ptmx_cdev);
printf("ptmx_init: failed to obtain /dev/ptmx major number\n");
return (ENOENT);
}
(void)devfs_make_node_clone(makedev(ptmx_major, 0),
DEVFS_CHAR, UID_ROOT, GID_TTY, 0666,
ptmx_clone, PTMX_TEMPLATE);
return (0);
}
static struct _ptmx_ioctl_state {
struct ptmx_ioctl **pis_ioctl_list;
int pis_total;
int pis_free;
} _state;
#define PTMX_GROW_VECTOR 16
static struct ptmx_ioctl *
ptmx_get_ioctl(int minor, int open_flag)
{
struct ptmx_ioctl *new_ptmx_ioctl;
if (open_flag & PF_OPEN_M) {
if ((_state.pis_total - _state.pis_free) >= ptmx_max) {
return (NULL);
}
MALLOC(new_ptmx_ioctl, struct ptmx_ioctl *, sizeof(struct ptmx_ioctl), M_TTYS, M_WAITOK|M_ZERO);
if (new_ptmx_ioctl == NULL) {
return (NULL);
}
if ((new_ptmx_ioctl->pt_tty = ttymalloc()) == NULL) {
FREE(new_ptmx_ioctl, M_TTYS);
return (NULL);
}
DEVFS_LOCK();
if (_state.pis_free == 0) {
struct ptmx_ioctl **new_pis_ioctl_list;
struct ptmx_ioctl **old_pis_ioctl_list = NULL;
MALLOC(new_pis_ioctl_list, struct ptmx_ioctl **, sizeof(struct ptmx_ioctl *) * (_state.pis_total + PTMX_GROW_VECTOR), M_TTYS, M_WAITOK|M_ZERO);
if (new_pis_ioctl_list == NULL) {
ttyfree(new_ptmx_ioctl->pt_tty);
DEVFS_UNLOCK();
FREE(new_ptmx_ioctl, M_TTYS);
return (NULL);
}
bcopy(_state.pis_ioctl_list, new_pis_ioctl_list, sizeof(struct ptmx_ioctl *) * _state.pis_total);
old_pis_ioctl_list = _state.pis_ioctl_list;
_state.pis_ioctl_list = new_pis_ioctl_list;
_state.pis_free += PTMX_GROW_VECTOR;
_state.pis_total += PTMX_GROW_VECTOR;
if (old_pis_ioctl_list)
FREE(old_pis_ioctl_list, M_TTYS);
}
_state.pis_ioctl_list[minor] = new_ptmx_ioctl;
_state.pis_free--;
_state.pis_ioctl_list[minor]->pt_flags |= PF_OPEN_M;
DEVFS_UNLOCK();
_state.pis_ioctl_list[minor]->pt_devhandle = devfs_make_node(
makedev(ptsd_major, minor),
DEVFS_CHAR, UID_ROOT, GID_TTY, 0620,
PTSD_TEMPLATE, minor);
} else if (open_flag & PF_OPEN_S) {
DEVFS_LOCK();
_state.pis_ioctl_list[minor]->pt_flags |= PF_OPEN_S;
DEVFS_UNLOCK();
}
return (_state.pis_ioctl_list[minor]);
}
static int
ptmx_free_ioctl(int minor, int open_flag)
{
struct ptmx_ioctl *old_ptmx_ioctl = NULL;
DEVFS_LOCK();
#if 5161374
if (_state.pis_ioctl_list[minor] == NULL) {
DEVFS_UNLOCK();
return (ENXIO);
}
#endif
_state.pis_ioctl_list[minor]->pt_flags &= ~(open_flag);
if (!(_state.pis_ioctl_list[minor]->pt_flags & (PF_OPEN_M|PF_OPEN_S))) {
old_ptmx_ioctl = _state.pis_ioctl_list[ minor];
_state.pis_ioctl_list[ minor] = NULL;
_state.pis_free++;
}
DEVFS_UNLOCK();
if (old_ptmx_ioctl != NULL) {
if (old_ptmx_ioctl->pt_devhandle != NULL)
devfs_remove(old_ptmx_ioctl->pt_devhandle);
ttyfree(old_ptmx_ioctl->pt_tty);
FREE(old_ptmx_ioctl, M_TTYS);
}
return (0);
}
static int
ptmx_clone(__unused dev_t dev, int action)
{
int i;
if (action == DEVFS_CLONE_ALLOC) {
if (_state.pis_total == 0)
return (0);
for(i = 0; i < _state.pis_total; i++) {
if (_state.pis_ioctl_list[ i] == NULL)
break;
}
return (i);
}
return(-1);
}
FREE_BSDSTATIC int
ptsd_open(dev_t dev, int flag, __unused int devtype, __unused proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
int error;
boolean_t funnel_state;
if ((pti = ptmx_get_ioctl(minor(dev), 0)) == NULL) {
return (ENXIO);
}
tp = pti->pt_tty;
if (!(pti->pt_flags & PF_UNLOCKED)) {
return (EAGAIN);
}
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if ((tp->t_state & TS_ISOPEN) == 0) {
ttychars(tp);
tp->t_iflag = TTYDEF_IFLAG;
tp->t_oflag = TTYDEF_OFLAG;
tp->t_lflag = TTYDEF_LFLAG;
tp->t_cflag = TTYDEF_CFLAG;
tp->t_ispeed = tp->t_ospeed = TTYDEF_SPEED;
ttsetwater(tp);
} else if (tp->t_state&TS_XCLUDE && suser(kauth_cred_get(), NULL)) {
error = EBUSY;
goto out;
}
if (tp->t_oproc)
(void)(*linesw[tp->t_line].l_modem)(tp, 1);
while ((tp->t_state & TS_CARR_ON) == 0) {
if (flag&FNONBLOCK)
break;
error = ttysleep(tp, TSA_CARR_ON(tp), TTIPRI | PCATCH,
"ptsd_opn", 0);
if (error)
goto out;
}
error = (*linesw[tp->t_line].l_open)(dev, tp);
pti->pt_flags |= PF_OPEN_S;
if (error == 0)
ptmx_wakeup(tp, FREAD|FWRITE);
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}
FREE_BSDSTATIC int
ptsd_close(dev_t dev, int flag, __unused int mode, __unused proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
int err;
boolean_t funnel_state;
#define FIX_VSX_HANG 1
#ifdef FIX_VSX_HANG
int save_timeout;
#endif
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
#ifdef FIX_VSX_HANG
save_timeout = tp->t_timeout;
tp->t_timeout = 60;
#endif
err = (*linesw[tp->t_line].l_close)(tp, flag);
ptsd_stop(tp, FREAD|FWRITE);
(void) ttyclose(tp);
#ifdef FIX_VSX_HANG
tp->t_timeout = save_timeout;
#endif
(void) thread_funnel_set(kernel_flock, funnel_state);
ptmx_free_ioctl(minor(dev), PF_OPEN_S);
return (err);
}
FREE_BSDSTATIC int
ptsd_read(dev_t dev, struct uio *uio, int flag)
{
proc_t p = current_proc();
struct tty *tp;
struct ptmx_ioctl *pti;
int error = 0;
struct uthread *ut;
boolean_t funnel_state;
struct pgrp * pg;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
ut = (struct uthread *)get_bsdthread_info(current_thread());
again:
if (pti->pt_flags & PF_REMOTE) {
while (isbackground(p, tp)) {
if ((p->p_sigignore & sigmask(SIGTTIN)) ||
(ut->uu_sigmask & sigmask(SIGTTIN)) ||
p->p_lflag & P_LPPWAIT) {
error = EIO;
goto out;
}
pg = proc_pgrp(p);
if (pg == PGRP_NULL) {
error = EIO;
goto out;
}
if (pg->pg_jobc == 0) {
pg_rele(pg);
error = EIO;
goto out;
}
pgsignal(pg, SIGTTIN, 1);
pg_rele(pg);
error = ttysleep(tp, &lbolt, TTIPRI | PCATCH | PTTYBLOCK, "ptsd_bg",
0);
if (error)
goto out;
}
if (tp->t_canq.c_cc == 0) {
if (flag & IO_NDELAY)
return (EWOULDBLOCK);
error = ttysleep(tp, TSA_PTS_READ(tp), TTIPRI | PCATCH,
"ptsd_in", 0);
if (error)
goto out;
goto again;
}
while (tp->t_canq.c_cc > 1 && uio_resid(uio) > 0) {
int cc;
char buf[BUFSIZ];
cc = min(uio_resid(uio), BUFSIZ);
cc = min(cc, tp->t_canq.c_cc - 1);
cc = q_to_b(&tp->t_canq, (u_char *)buf, cc);
error = uiomove(buf, cc, uio);
if (error)
break;
}
if (tp->t_canq.c_cc == 1)
(void) getc(&tp->t_canq);
if (tp->t_canq.c_cc)
goto out;
} else
if (tp->t_oproc)
error = (*linesw[tp->t_line].l_read)(tp, uio, flag);
ptmx_wakeup(tp, FWRITE);
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}
FREE_BSDSTATIC int
ptsd_write(dev_t dev, struct uio *uio, int flag)
{
struct tty *tp;
struct ptmx_ioctl *pti;
int error;
boolean_t funnel_state;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
if (tp->t_oproc == 0)
error = EIO;
else
error = (*linesw[tp->t_line].l_write)(tp, uio, flag);
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}
static void
ptsd_start(struct tty *tp)
{
struct ptmx_ioctl *pti;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(tp->t_dev), 0);
#if 5161374
if (pti == NULL)
return;
#endif
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if (tp->t_state & TS_TTSTOP)
goto out;
if (pti->pt_flags & PF_STOPPED) {
pti->pt_flags &= ~PF_STOPPED;
pti->pt_send = TIOCPKT_START;
}
ptmx_wakeup(tp, FREAD);
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return;
}
static void
ptmx_wakeup(struct tty *tp, int flag)
{
struct ptmx_ioctl *pti;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(tp->t_dev), 0);
#if 5161374
if (pti == NULL)
return;
#endif
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if (flag & FREAD) {
selwakeup(&pti->pt_selr);
wakeup(TSA_PTC_READ(tp));
}
if (flag & FWRITE) {
selwakeup(&pti->pt_selw);
wakeup(TSA_PTC_WRITE(tp));
}
(void) thread_funnel_set(kernel_flock, funnel_state);
}
FREE_BSDSTATIC int
ptmx_open(dev_t dev, __unused int flag, __unused int devtype, __unused proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
int error = 0;
boolean_t funnel_state;
if ((pti = ptmx_get_ioctl(minor(dev), PF_OPEN_M)) == NULL) {
return (ENXIO);
}
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if (tp->t_oproc || (tp->t_state & TS_ISOPEN)) {
if (!tp->t_oproc)
ptmx_free_ioctl(minor(dev), PF_OPEN_M);
error = EBUSY;
goto out;
}
tp->t_oproc = ptsd_start;
CLR(tp->t_state, TS_ZOMBIE);
#ifdef sun4c
tp->t_stop = ptsd_stop;
#endif
(void)(*linesw[tp->t_line].l_modem)(tp, 1);
tp->t_lflag &= ~EXTPROC;
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}
FREE_BSDSTATIC int
ptmx_close(dev_t dev, __unused int flags, __unused int fmt, __unused proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
(void)(*linesw[tp->t_line].l_modem)(tp, 0);
if (tp->t_state & TS_ISOPEN) {
tp->t_state &= ~(TS_CARR_ON | TS_CONNECTED);
tp->t_state |= TS_ZOMBIE;
ttyflush(tp, FREAD | FWRITE);
}
tp->t_oproc = 0;
(void) thread_funnel_set(kernel_flock, funnel_state);
ptmx_free_ioctl(minor(dev), PF_OPEN_M);
return (0);
}
FREE_BSDSTATIC int
ptmx_read(dev_t dev, struct uio *uio, int flag)
{
struct tty *tp;
struct ptmx_ioctl *pti;
char buf[BUFSIZ];
int error = 0, cc;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
for (;;) {
if (tp->t_state&TS_ISOPEN) {
if (pti->pt_flags & PF_PKT && pti->pt_send) {
error = ureadc((int)pti->pt_send, uio);
if (error)
goto out;
if (pti->pt_send & TIOCPKT_IOCTL) {
cc = min(uio_resid(uio),
sizeof(tp->t_termios));
uiomove((caddr_t)&tp->t_termios, cc,
uio);
}
pti->pt_send = 0;
goto out;
}
if (pti->pt_flags & PF_UCNTL && pti->pt_ucntl) {
error = ureadc((int)pti->pt_ucntl, uio);
if (error)
goto out;
pti->pt_ucntl = 0;
goto out;
}
if (tp->t_outq.c_cc && (tp->t_state&TS_TTSTOP) == 0)
break;
}
if ((tp->t_state & TS_CONNECTED) == 0)
goto out;
if (flag & IO_NDELAY) {
error = EWOULDBLOCK;
goto out;
}
error = tsleep(TSA_PTC_READ(tp), TTIPRI | PCATCH, "ptmx_in", 0);
if (error)
goto out;
}
if (pti->pt_flags & (PF_PKT|PF_UCNTL))
error = ureadc(0, uio);
while (uio_resid(uio) > 0 && error == 0) {
cc = q_to_b(&tp->t_outq, (u_char *)buf, min(uio_resid(uio), BUFSIZ));
if (cc <= 0)
break;
error = uiomove(buf, cc, uio);
}
(*linesw[tp->t_line].l_start)(tp);
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}
FREE_BSDSTATIC int
ptsd_stop(struct tty *tp, int flush)
{
struct ptmx_ioctl *pti;
int flag;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(tp->t_dev), 0);
#if 5161374
if (pti == NULL)
return(ENXIO);
#endif
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if (flush == 0) {
flush = TIOCPKT_STOP;
pti->pt_flags |= PF_STOPPED;
} else
pti->pt_flags &= ~PF_STOPPED;
pti->pt_send |= flush;
flag = 0;
if (flush & FREAD)
flag |= FWRITE;
if (flush & FWRITE)
flag |= FREAD;
ptmx_wakeup(tp, flag);
(void) thread_funnel_set(kernel_flock, funnel_state);
return (0);
}
FREE_BSDSTATIC int
ptsd_reset(__unused int uban)
{
return (0);
}
static void
ttypend(struct tty *tp)
{
struct clist tq;
int c;
CLR(tp->t_lflag, PENDIN);
SET(tp->t_state, TS_TYPEN);
tq = tp->t_rawq;
tp->t_rawq.c_cc = 0;
tp->t_rawq.c_cf = tp->t_rawq.c_cl = 0;
while ((c = getc(&tq)) >= 0)
ttyinput(c, tp);
CLR(tp->t_state, TS_TYPEN);
}
static int
ttnread(struct tty *tp)
{
int nread;
if (ISSET(tp->t_lflag, PENDIN))
ttypend(tp);
nread = tp->t_canq.c_cc;
if (!ISSET(tp->t_lflag, ICANON)) {
nread += tp->t_rawq.c_cc;
if (nread < tp->t_cc[VMIN] && tp->t_cc[VTIME] == 0)
nread = 0;
}
return (nread);
}
int
ptsd_select(dev_t dev, int rw, void *wql, proc_t p)
{
struct ptmx_ioctl *pti;
struct tty *tp;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
if (tp == NULL)
return (ENXIO);
switch (rw) {
case FREAD:
if (ttnread(tp) > 0 || ISSET(tp->t_state, TS_ZOMBIE))
return(1);
selrecord(p, &tp->t_rsel, wql);
break;
case FWRITE:
if ((tp->t_outq.c_cc <= tp->t_lowat &&
ISSET(tp->t_state, TS_CONNECTED))
|| ISSET(tp->t_state, TS_ZOMBIE)) {
return (1);
}
selrecord(p, &tp->t_wsel, wql);
break;
}
return (0);
}
FREE_BSDSTATIC int
ptmx_select(dev_t dev, int rw, void *wql, proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
int retval = 0;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if ((tp->t_state & TS_CONNECTED) == 0) {
retval = 1;
goto out;
}
switch (rw) {
case FREAD:
if ((tp->t_state&TS_ISOPEN) &&
tp->t_outq.c_cc && (tp->t_state&TS_TTSTOP) == 0) {
retval = 1;
goto out;
}
case 0:
if ((tp->t_state&TS_ISOPEN) &&
((pti->pt_flags & PF_PKT && pti->pt_send) ||
(pti->pt_flags & PF_UCNTL && pti->pt_ucntl))) {
retval = 1;
goto out;
}
selrecord(p, &pti->pt_selr, wql);
break;
case FWRITE:
if (tp->t_state&TS_ISOPEN) {
if (pti->pt_flags & PF_REMOTE) {
if (tp->t_canq.c_cc == 0) {
retval = 1;
goto out;
}
} else {
if (tp->t_rawq.c_cc + tp->t_canq.c_cc < TTYHOG-2) {
retval = 1;
goto out;
}
if (tp->t_canq.c_cc == 0 && (tp->t_lflag&ICANON)) {
retval = 1;
goto out;
}
}
}
selrecord(p, &pti->pt_selw, wql);
break;
}
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (retval);
}
FREE_BSDSTATIC int
ptmx_stop(__unused struct tty *tp, __unused int flush)
{
return (0);
}
FREE_BSDSTATIC int
ptmx_reset(__unused int uban)
{
return (0);
}
FREE_BSDSTATIC int
ptmx_write(dev_t dev, struct uio *uio, int flag)
{
struct tty *tp;
struct ptmx_ioctl *pti;
u_char *cp = NULL;
int cc = 0;
u_char locbuf[BUFSIZ];
int wcnt = 0;
int error = 0;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
again:
if ((tp->t_state&TS_ISOPEN) == 0)
goto block;
if (pti->pt_flags & PF_REMOTE) {
if (tp->t_canq.c_cc)
goto block;
while ((uio_resid(uio) > 0 || cc > 0) &&
tp->t_canq.c_cc < TTYHOG - 1) {
if (cc == 0) {
cc = min(uio_resid(uio), BUFSIZ);
cc = min(cc, TTYHOG - 1 - tp->t_canq.c_cc);
cp = locbuf;
error = uiomove((caddr_t)cp, cc, uio);
if (error)
goto out;
if ((tp->t_state & TS_ISOPEN) == 0) {
uio_setresid(uio, (uio_resid(uio) + cc));
error = EIO;
goto out;
}
}
if (cc > 0) {
cc = b_to_q((u_char *)cp, cc, &tp->t_canq);
if (cc > 0)
break;
}
}
uio_setresid(uio, (uio_resid(uio) + cc));
(void) putc(0, &tp->t_canq);
ttwakeup(tp);
wakeup(TSA_PTS_READ(tp));
goto out;
}
while (uio_resid(uio) > 0 || cc > 0) {
if (cc == 0) {
cc = min(uio_resid(uio), BUFSIZ);
cp = locbuf;
error = uiomove((caddr_t)cp, cc, uio);
if (error)
goto out;
if ((tp->t_state & TS_ISOPEN) == 0) {
uio_setresid(uio, (uio_resid(uio) + cc));
error = EIO;
goto out;
}
}
while (cc > 0) {
if ((tp->t_rawq.c_cc + tp->t_canq.c_cc) >= TTYHOG - 2 &&
(tp->t_canq.c_cc > 0 || !(tp->t_lflag&ICANON))) {
wakeup(TSA_HUP_OR_INPUT(tp));
goto block;
}
(*linesw[tp->t_line].l_rint)(*cp++, tp);
wcnt++;
cc--;
}
cc = 0;
}
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
block:
if ((tp->t_state & TS_CONNECTED) == 0) {
uio_setresid(uio, (uio_resid(uio) + cc));
error = EIO;
goto out;
}
if (flag & IO_NDELAY) {
uio_setresid(uio, (uio_resid(uio) + cc));
if (wcnt == 0)
error = EWOULDBLOCK;
goto out;
}
error = tsleep(TSA_PTC_WRITE(tp), TTOPRI | PCATCH, "ptmx_out", 0);
if (error) {
uio_setresid(uio, (uio_resid(uio) + cc));
goto out;
}
goto again;
}
FREE_BSDSTATIC int
cptyioctl(dev_t dev, u_long cmd, caddr_t data, int flag, proc_t p)
{
struct tty *tp;
struct ptmx_ioctl *pti;
u_char *cc;
int stop, error = 0;
boolean_t funnel_state;
pti = ptmx_get_ioctl(minor(dev), 0);
#if 5161374
if (pti == NULL || pti->pt_tty == NULL)
return(ENXIO);
#endif
tp = pti->pt_tty;
cc = tp->t_cc;
funnel_state = thread_funnel_set(kernel_flock, TRUE);
if (cmd == TIOCEXT) {
if (*(int *)data) {
if (pti->pt_flags & PF_PKT) {
pti->pt_send |= TIOCPKT_IOCTL;
ptmx_wakeup(tp, FREAD);
}
tp->t_lflag |= EXTPROC;
} else {
if ((tp->t_lflag & EXTPROC) &&
(pti->pt_flags & PF_PKT)) {
pti->pt_send |= TIOCPKT_IOCTL;
ptmx_wakeup(tp, FREAD);
}
tp->t_lflag &= ~EXTPROC;
}
goto out;
} else
if (cdevsw[major(dev)].d_open == ptmx_open)
switch (cmd) {
case TIOCGPGRP:
*(int *)data = tp->t_pgrp ? tp->t_pgrp->pg_id : 0;
goto out;
case TIOCPKT:
if (*(int *)data) {
if (pti->pt_flags & PF_UCNTL) {
error = EINVAL;
goto out;
}
pti->pt_flags |= PF_PKT;
} else
pti->pt_flags &= ~PF_PKT;
goto out;
case TIOCUCNTL:
if (*(int *)data) {
if (pti->pt_flags & PF_PKT) {
error = EINVAL;
goto out;
}
pti->pt_flags |= PF_UCNTL;
} else
pti->pt_flags &= ~PF_UCNTL;
goto out;
case TIOCREMOTE:
if (*(int *)data)
pti->pt_flags |= PF_REMOTE;
else
pti->pt_flags &= ~PF_REMOTE;
ttyflush(tp, FREAD|FWRITE);
goto out;
#if COMPAT_43_TTY
case TIOCSETP:
case TIOCSETN:
#endif
case TIOCSETD:
case TIOCSETA:
case TIOCSETAW:
case TIOCSETAF:
ndflush(&tp->t_outq, tp->t_outq.c_cc);
break;
case TIOCSIG:
if (*(unsigned int *)data >= NSIG ||
*(unsigned int *)data == 0) {
error = EINVAL;
goto out;
}
if ((tp->t_lflag&NOFLSH) == 0)
ttyflush(tp, FREAD|FWRITE);
tty_pgsignal(tp, *(unsigned int *)data, 1);
if ((*(unsigned int *)data == SIGINFO) &&
((tp->t_lflag&NOKERNINFO) == 0))
ttyinfo(tp);
goto out;
case TIOCPTYGRANT:
{
error = _devfs_setattr(pti->pt_devhandle, 0620, kauth_getuid(), GID_TTY);
goto out;
}
case TIOCPTYGNAME:
snprintf(data, 128, "/dev/" PTSD_TEMPLATE, minor(dev));
error = 0;
goto out;
case TIOCPTYUNLK:
pti->pt_flags |= PF_UNLOCKED;
error = 0;
goto out;
}
error = (*linesw[tp->t_line].l_ioctl)(tp, cmd, data, flag, p);
if (error == ENOTTY) {
error = ttioctl(tp, cmd, data, flag, p);
if (error == ENOTTY) {
if (pti->pt_flags & PF_UCNTL && (cmd & ~0xff) == UIOCCMD(0)) {
if (cmd & 0xff) {
pti->pt_ucntl = (u_char)cmd;
ptmx_wakeup(tp, FREAD);
}
error = 0;
goto out;
} else if (cmd == TIOCSBRK || cmd == TIOCCBRK) {
error = 0;
goto out;
}
}
}
if ((tp->t_lflag&EXTPROC) && (pti->pt_flags & PF_PKT)) {
switch(cmd) {
case TIOCSETA:
case TIOCSETAW:
case TIOCSETAF:
#if COMPAT_43_TTY
case TIOCSETP:
case TIOCSETN:
#endif
#if COMPAT_43_TTY || defined(COMPAT_SUNOS)
case TIOCSETC:
case TIOCSLTC:
case TIOCLBIS:
case TIOCLBIC:
case TIOCLSET:
#endif
pti->pt_send |= TIOCPKT_IOCTL;
ptmx_wakeup(tp, FREAD);
default:
break;
}
}
stop = (tp->t_iflag & IXON) && CCEQ(cc[VSTOP], CTRL('s'))
&& CCEQ(cc[VSTART], CTRL('q'));
if (pti->pt_flags & PF_NOSTOP) {
if (stop) {
pti->pt_send &= ~TIOCPKT_NOSTOP;
pti->pt_send |= TIOCPKT_DOSTOP;
pti->pt_flags &= ~PF_NOSTOP;
ptmx_wakeup(tp, FREAD);
}
} else {
if (!stop) {
pti->pt_send &= ~TIOCPKT_DOSTOP;
pti->pt_send |= TIOCPKT_NOSTOP;
pti->pt_flags |= PF_NOSTOP;
ptmx_wakeup(tp, FREAD);
}
}
out:
(void) thread_funnel_set(kernel_flock, funnel_state);
return (error);
}