1 /* $NetBSD: ibcs2_ioctl.c,v 1.6 1995/03/14 15:12:28 scottb Exp $ */
4 * SPDX-License-Identifier: BSD-2-Clause
6 * Copyright (c) 1994, 1995 Scott Bartram
9 * based on compat/sunos/sun_ioctl.c
11 * Redistribution and use in source and binary forms, with or without
12 * modification, are permitted provided that the following conditions
14 * 1. Redistributions of source code must retain the above copyright
15 * notice, this list of conditions and the following disclaimer.
16 * 2. The name of the author may not be used to endorse or promote products
17 * derived from this software without specific prior written permission
19 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
20 * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
21 * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
22 * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
23 * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
24 * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
25 * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
26 * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
27 * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
28 * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 #include <sys/cdefs.h>
32 __FBSDID("$FreeBSD$");
34 #include <sys/param.h>
35 #include <sys/systm.h>
36 #include <sys/capsicum.h>
37 #include <sys/consio.h>
38 #include <sys/fcntl.h>
40 #include <sys/filedesc.h>
41 #include <sys/filio.h>
44 #include <sys/mutex.h>
45 #include <sys/sysproto.h>
48 #include <i386/ibcs2/ibcs2_signal.h>
49 #include <i386/ibcs2/ibcs2_socksys.h>
50 #include <i386/ibcs2/ibcs2_stropts.h>
51 #include <i386/ibcs2/ibcs2_proto.h>
52 #include <i386/ibcs2/ibcs2_termios.h>
53 #include <i386/ibcs2/ibcs2_util.h>
54 #include <i386/ibcs2/ibcs2_ioctl.h>
56 static void stios2btios(struct ibcs2_termios *, struct termios *);
57 static void btios2stios(struct termios *, struct ibcs2_termios *);
58 static void stios2stio(struct ibcs2_termios *, struct ibcs2_termio *);
59 static void stio2stios(struct ibcs2_termio *, struct ibcs2_termios *);
66 int sp_speed; /* Speed. */
67 int sp_code; /* Code. */
70 static struct speedtab sptab[] = {
91 static u_long s2btab[] = {
111 ttspeedtab(int speed, struct speedtab *table)
114 for ( ; table->sp_speed != -1; table++)
115 if (table->sp_speed == speed)
116 return (table->sp_code);
122 struct ibcs2_termios *st;
125 register u_long l, r;
127 l = st->c_iflag; r = 0;
128 if (l & IBCS2_IGNBRK) r |= IGNBRK;
129 if (l & IBCS2_BRKINT) r |= BRKINT;
130 if (l & IBCS2_IGNPAR) r |= IGNPAR;
131 if (l & IBCS2_PARMRK) r |= PARMRK;
132 if (l & IBCS2_INPCK) r |= INPCK;
133 if (l & IBCS2_ISTRIP) r |= ISTRIP;
134 if (l & IBCS2_INLCR) r |= INLCR;
135 if (l & IBCS2_IGNCR) r |= IGNCR;
136 if (l & IBCS2_ICRNL) r |= ICRNL;
137 if (l & IBCS2_IXON) r |= IXON;
138 if (l & IBCS2_IXANY) r |= IXANY;
139 if (l & IBCS2_IXOFF) r |= IXOFF;
140 if (l & IBCS2_IMAXBEL) r |= IMAXBEL;
143 l = st->c_oflag; r = 0;
144 if (l & IBCS2_OPOST) r |= OPOST;
145 if (l & IBCS2_ONLCR) r |= ONLCR;
146 if (l & IBCS2_TAB3) r |= TAB3;
149 l = st->c_cflag; r = 0;
150 switch (l & IBCS2_CSIZE) {
151 case IBCS2_CS5: r |= CS5; break;
152 case IBCS2_CS6: r |= CS6; break;
153 case IBCS2_CS7: r |= CS7; break;
154 case IBCS2_CS8: r |= CS8; break;
156 if (l & IBCS2_CSTOPB) r |= CSTOPB;
157 if (l & IBCS2_CREAD) r |= CREAD;
158 if (l & IBCS2_PARENB) r |= PARENB;
159 if (l & IBCS2_PARODD) r |= PARODD;
160 if (l & IBCS2_HUPCL) r |= HUPCL;
161 if (l & IBCS2_CLOCAL) r |= CLOCAL;
164 bt->c_ispeed = bt->c_ospeed = s2btab[l & 0x0000000f];
166 l = st->c_lflag; r = 0;
167 if (l & IBCS2_ISIG) r |= ISIG;
168 if (l & IBCS2_ICANON) r |= ICANON;
169 if (l & IBCS2_ECHO) r |= ECHO;
170 if (l & IBCS2_ECHOE) r |= ECHOE;
171 if (l & IBCS2_ECHOK) r |= ECHOK;
172 if (l & IBCS2_ECHONL) r |= ECHONL;
173 if (l & IBCS2_NOFLSH) r |= NOFLSH;
174 if (l & IBCS2_TOSTOP) r |= TOSTOP;
178 st->c_cc[IBCS2_VINTR] ? st->c_cc[IBCS2_VINTR] : _POSIX_VDISABLE;
180 st->c_cc[IBCS2_VQUIT] ? st->c_cc[IBCS2_VQUIT] : _POSIX_VDISABLE;
182 st->c_cc[IBCS2_VERASE] ? st->c_cc[IBCS2_VERASE] : _POSIX_VDISABLE;
184 st->c_cc[IBCS2_VKILL] ? st->c_cc[IBCS2_VKILL] : _POSIX_VDISABLE;
185 if (bt->c_lflag & ICANON) {
187 st->c_cc[IBCS2_VEOF] ? st->c_cc[IBCS2_VEOF] : _POSIX_VDISABLE;
189 st->c_cc[IBCS2_VEOL] ? st->c_cc[IBCS2_VEOL] : _POSIX_VDISABLE;
191 bt->c_cc[VMIN] = st->c_cc[IBCS2_VMIN];
192 bt->c_cc[VTIME] = st->c_cc[IBCS2_VTIME];
195 st->c_cc[IBCS2_VEOL2] ? st->c_cc[IBCS2_VEOL2] : _POSIX_VDISABLE;
198 st->c_cc[IBCS2_VSWTCH] ? st->c_cc[IBCS2_VSWTCH] : _POSIX_VDISABLE;
201 st->c_cc[IBCS2_VSTART] ? st->c_cc[IBCS2_VSTART] : _POSIX_VDISABLE;
203 st->c_cc[IBCS2_VSTOP] ? st->c_cc[IBCS2_VSTOP] : _POSIX_VDISABLE;
205 st->c_cc[IBCS2_VSUSP] ? st->c_cc[IBCS2_VSUSP] : _POSIX_VDISABLE;
206 bt->c_cc[VDSUSP] = _POSIX_VDISABLE;
207 bt->c_cc[VREPRINT] = _POSIX_VDISABLE;
208 bt->c_cc[VDISCARD] = _POSIX_VDISABLE;
209 bt->c_cc[VWERASE] = _POSIX_VDISABLE;
210 bt->c_cc[VLNEXT] = _POSIX_VDISABLE;
211 bt->c_cc[VSTATUS] = _POSIX_VDISABLE;
217 struct ibcs2_termios *st;
219 register u_long l, r;
221 l = bt->c_iflag; r = 0;
222 if (l & IGNBRK) r |= IBCS2_IGNBRK;
223 if (l & BRKINT) r |= IBCS2_BRKINT;
224 if (l & IGNPAR) r |= IBCS2_IGNPAR;
225 if (l & PARMRK) r |= IBCS2_PARMRK;
226 if (l & INPCK) r |= IBCS2_INPCK;
227 if (l & ISTRIP) r |= IBCS2_ISTRIP;
228 if (l & INLCR) r |= IBCS2_INLCR;
229 if (l & IGNCR) r |= IBCS2_IGNCR;
230 if (l & ICRNL) r |= IBCS2_ICRNL;
231 if (l & IXON) r |= IBCS2_IXON;
232 if (l & IXANY) r |= IBCS2_IXANY;
233 if (l & IXOFF) r |= IBCS2_IXOFF;
234 if (l & IMAXBEL) r |= IBCS2_IMAXBEL;
237 l = bt->c_oflag; r = 0;
238 if (l & OPOST) r |= IBCS2_OPOST;
239 if (l & ONLCR) r |= IBCS2_ONLCR;
240 if (l & TAB3) r |= IBCS2_TAB3;
243 l = bt->c_cflag; r = 0;
245 case CS5: r |= IBCS2_CS5; break;
246 case CS6: r |= IBCS2_CS6; break;
247 case CS7: r |= IBCS2_CS7; break;
248 case CS8: r |= IBCS2_CS8; break;
250 if (l & CSTOPB) r |= IBCS2_CSTOPB;
251 if (l & CREAD) r |= IBCS2_CREAD;
252 if (l & PARENB) r |= IBCS2_PARENB;
253 if (l & PARODD) r |= IBCS2_PARODD;
254 if (l & HUPCL) r |= IBCS2_HUPCL;
255 if (l & CLOCAL) r |= IBCS2_CLOCAL;
258 l = bt->c_lflag; r = 0;
259 if (l & ISIG) r |= IBCS2_ISIG;
260 if (l & ICANON) r |= IBCS2_ICANON;
261 if (l & ECHO) r |= IBCS2_ECHO;
262 if (l & ECHOE) r |= IBCS2_ECHOE;
263 if (l & ECHOK) r |= IBCS2_ECHOK;
264 if (l & ECHONL) r |= IBCS2_ECHONL;
265 if (l & NOFLSH) r |= IBCS2_NOFLSH;
266 if (l & TOSTOP) r |= IBCS2_TOSTOP;
269 l = ttspeedtab(bt->c_ospeed, sptab);
273 st->c_cc[IBCS2_VINTR] =
274 bt->c_cc[VINTR] != _POSIX_VDISABLE ? bt->c_cc[VINTR] : 0;
275 st->c_cc[IBCS2_VQUIT] =
276 bt->c_cc[VQUIT] != _POSIX_VDISABLE ? bt->c_cc[VQUIT] : 0;
277 st->c_cc[IBCS2_VERASE] =
278 bt->c_cc[VERASE] != _POSIX_VDISABLE ? bt->c_cc[VERASE] : 0;
279 st->c_cc[IBCS2_VKILL] =
280 bt->c_cc[VKILL] != _POSIX_VDISABLE ? bt->c_cc[VKILL] : 0;
281 if (bt->c_lflag & ICANON) {
282 st->c_cc[IBCS2_VEOF] =
283 bt->c_cc[VEOF] != _POSIX_VDISABLE ? bt->c_cc[VEOF] : 0;
284 st->c_cc[IBCS2_VEOL] =
285 bt->c_cc[VEOL] != _POSIX_VDISABLE ? bt->c_cc[VEOL] : 0;
287 st->c_cc[IBCS2_VMIN] = bt->c_cc[VMIN];
288 st->c_cc[IBCS2_VTIME] = bt->c_cc[VTIME];
290 st->c_cc[IBCS2_VEOL2] =
291 bt->c_cc[VEOL2] != _POSIX_VDISABLE ? bt->c_cc[VEOL2] : 0;
292 st->c_cc[IBCS2_VSWTCH] =
294 st->c_cc[IBCS2_VSUSP] =
295 bt->c_cc[VSUSP] != _POSIX_VDISABLE ? bt->c_cc[VSUSP] : 0;
296 st->c_cc[IBCS2_VSTART] =
297 bt->c_cc[VSTART] != _POSIX_VDISABLE ? bt->c_cc[VSTART] : 0;
298 st->c_cc[IBCS2_VSTOP] =
299 bt->c_cc[VSTOP] != _POSIX_VDISABLE ? bt->c_cc[VSTOP] : 0;
306 struct ibcs2_termios *ts;
307 struct ibcs2_termio *t;
309 t->c_iflag = ts->c_iflag;
310 t->c_oflag = ts->c_oflag;
311 t->c_cflag = ts->c_cflag;
312 t->c_lflag = ts->c_lflag;
313 t->c_line = ts->c_line;
314 bcopy(ts->c_cc, t->c_cc, IBCS2_NCC);
319 struct ibcs2_termio *t;
320 struct ibcs2_termios *ts;
322 ts->c_iflag = t->c_iflag;
323 ts->c_oflag = t->c_oflag;
324 ts->c_cflag = t->c_cflag;
325 ts->c_lflag = t->c_lflag;
326 ts->c_line = t->c_line;
327 bcopy(t->c_cc, ts->c_cc, IBCS2_NCC);
333 struct ibcs2_ioctl_args *uap;
335 struct proc *p = td->td_proc;
340 error = fget(td, uap->fd, cap_rights_init(&rights, CAP_IOCTL), &fp);
342 DPRINTF(("ibcs2_ioctl(%d): bad fd %d ", p->p_pid,
347 if ((fp->f_flag & (FREAD|FWRITE)) == 0) {
349 DPRINTF(("ibcs2_ioctl(%d): bad fp flag ", p->p_pid));
359 struct ibcs2_termios sts;
360 struct ibcs2_termio st;
362 if ((error = fo_ioctl(fp, TIOCGETA, (caddr_t)&bts,
363 td->td_ucred, td)) != 0)
366 btios2stios (&bts, &sts);
367 if (uap->cmd == IBCS2_TCGETA) {
368 stios2stio (&sts, &st);
369 error = copyout((caddr_t)&st, uap->data,
373 DPRINTF(("ibcs2_ioctl(%d): copyout failed ",
378 error = copyout((caddr_t)&sts, uap->data,
390 struct ibcs2_termios sts;
391 struct ibcs2_termio st;
393 if ((error = copyin(uap->data, (caddr_t)&st,
395 DPRINTF(("ibcs2_ioctl(%d): TCSET copyin failed ",
400 /* get full BSD termios so we don't lose information */
401 if ((error = fo_ioctl(fp, TIOCGETA, (caddr_t)&bts,
402 td->td_ucred, td)) != 0) {
403 DPRINTF(("ibcs2_ioctl(%d): TCSET ctl failed fd %d ",
409 * convert to iBCS2 termios, copy in information from
410 * termio, and convert back, then set new values.
412 btios2stios(&bts, &sts);
413 stio2stios(&st, &sts);
414 stios2btios(&sts, &bts);
416 error = fo_ioctl(fp, uap->cmd - IBCS2_TCSETA + TIOCSETA,
417 (caddr_t)&bts, td->td_ucred, td);
426 struct ibcs2_termios sts;
428 if ((error = copyin(uap->data, (caddr_t)&sts,
431 stios2btios (&sts, &bts);
432 error = fo_ioctl(fp, uap->cmd - IBCS2_XCSETA + TIOCSETA,
433 (caddr_t)&bts, td->td_ucred, td);
442 struct ibcs2_termios sts;
444 if ((error = copyin(uap->data, (caddr_t)&sts,
447 stios2btios (&sts, &bts);
448 error = fo_ioctl(fp, uap->cmd - IBCS2_OXCSETA + TIOCSETA,
449 (caddr_t)&bts, td->td_ucred, td);
454 DPRINTF(("ibcs2_ioctl(%d): TCSBRK ", p->p_pid));
460 switch ((int)uap->data) {
463 DPRINTF(("ibcs2_ioctl(%d): TCXONC ", p->p_pid));
467 error = fo_ioctl(fp, TIOCSTOP, (caddr_t)0,
471 error = fo_ioctl(fp, TIOCSTART, (caddr_t)1,
485 switch ((int)uap->data) {
493 arg = FREAD | FWRITE;
499 error = fo_ioctl(fp, TIOCFLUSH, (caddr_t)&arg, td->td_ucred,
504 case IBCS2_TIOCGWINSZ:
505 uap->cmd = TIOCGWINSZ;
506 error = sys_ioctl(td, (struct ioctl_args *)uap);
509 case IBCS2_TIOCSWINSZ:
510 uap->cmd = TIOCSWINSZ;
511 error = sys_ioctl(td, (struct ioctl_args *)uap);
514 case IBCS2_TIOCGPGRP:
519 pg_id = p->p_pgrp->pg_id;
521 error = copyout((caddr_t)&pg_id, uap->data,
526 case IBCS2_TIOCSPGRP: /* XXX - is uap->data a pointer to pgid? */
528 struct setpgid_args sa;
531 sa.pgid = (int)uap->data;
532 error = sys_setpgid(td, &sa);
536 case IBCS2_TCGETSC: /* SCO console - get scancode flags */
537 error = EINTR; /* ENOSYS; */
540 case IBCS2_TCSETSC: /* SCO console - set scancode flags */
541 error = 0; /* ENOSYS; */
544 case IBCS2_JWINSIZE: /* Unix to Jerq I/O control */
546 struct ibcs2_jwinsize {
552 SESS_LOCK(p->p_session);
553 ibcs2_jwinsize.bytex = 80;
554 /* p->p_session->s_ttyp->t_winsize.ws_col; XXX */
555 ibcs2_jwinsize.bytey = 25;
556 /* p->p_session->s_ttyp->t_winsize.ws_row; XXX */
557 ibcs2_jwinsize.bitx =
558 p->p_session->s_ttyp->t_winsize.ws_xpixel;
559 ibcs2_jwinsize.bity =
560 p->p_session->s_ttyp->t_winsize.ws_ypixel;
561 SESS_UNLOCK(p->p_session);
563 error = copyout((caddr_t)&ibcs2_jwinsize, uap->data,
564 sizeof(ibcs2_jwinsize));
568 /* keyboard and display ioctl's -- type 'K' */
569 case IBCS2_KDGKBMODE: /* get keyboard translation mode */
570 uap->cmd = KDGKBMODE;
571 /* printf("ioctl KDGKBMODE = %x\n", uap->cmd);*/
572 error = sys_ioctl(td, (struct ioctl_args *)uap);
575 case IBCS2_KDSKBMODE: /* set keyboard translation mode */
576 uap->cmd = KDSKBMODE;
577 error = sys_ioctl(td, (struct ioctl_args *)uap);
580 case IBCS2_KDMKTONE: /* sound tone */
582 error = sys_ioctl(td, (struct ioctl_args *)uap);
585 case IBCS2_KDGETMODE: /* get text/graphics mode */
586 uap->cmd = KDGETMODE;
587 error = sys_ioctl(td, (struct ioctl_args *)uap);
590 case IBCS2_KDSETMODE: /* set text/graphics mode */
591 uap->cmd = KDSETMODE;
592 error = sys_ioctl(td, (struct ioctl_args *)uap);
595 case IBCS2_KDSBORDER: /* set ega color border */
596 uap->cmd = KDSBORDER;
597 error = sys_ioctl(td, (struct ioctl_args *)uap);
600 case IBCS2_KDGKBSTATE:
601 uap->cmd = KDGKBSTATE;
602 error = sys_ioctl(td, (struct ioctl_args *)uap);
607 error = sys_ioctl(td, (struct ioctl_args *)uap);
610 case IBCS2_KDENABIO: /* enable direct I/O to ports */
612 error = sys_ioctl(td, (struct ioctl_args *)uap);
615 case IBCS2_KDDISABIO: /* disable direct I/O to ports */
616 uap->cmd = KDDISABIO;
617 error = sys_ioctl(td, (struct ioctl_args *)uap);
620 case IBCS2_KIOCSOUND: /* start sound generation */
621 uap->cmd = KIOCSOUND;
622 error = sys_ioctl(td, (struct ioctl_args *)uap);
625 case IBCS2_KDGKBTYPE: /* get keyboard type */
626 uap->cmd = KDGKBTYPE;
627 error = sys_ioctl(td, (struct ioctl_args *)uap);
630 case IBCS2_KDGETLED: /* get keyboard LED status */
632 error = sys_ioctl(td, (struct ioctl_args *)uap);
635 case IBCS2_KDSETLED: /* set keyboard LED status */
637 error = sys_ioctl(td, (struct ioctl_args *)uap);
640 /* Xenix keyboard and display ioctl's from sys/kd.h -- type 'k' */
641 case IBCS2_GETFKEY: /* Get function key */
643 error = sys_ioctl(td, (struct ioctl_args *)uap);
646 case IBCS2_SETFKEY: /* Set function key */
648 error = sys_ioctl(td, (struct ioctl_args *)uap);
651 case IBCS2_GIO_SCRNMAP: /* Get screen output map table */
652 uap->cmd = GIO_SCRNMAP;
653 error = sys_ioctl(td, (struct ioctl_args *)uap);
656 case IBCS2_PIO_SCRNMAP: /* Set screen output map table */
657 uap->cmd = PIO_SCRNMAP;
658 error = sys_ioctl(td, (struct ioctl_args *)uap);
661 case IBCS2_GIO_KEYMAP: /* Get keyboard map table */
662 uap->cmd = OGIO_KEYMAP;
663 error = sys_ioctl(td, (struct ioctl_args *)uap);
666 case IBCS2_PIO_KEYMAP: /* Set keyboard map table */
667 uap->cmd = OPIO_KEYMAP;
668 error = sys_ioctl(td, (struct ioctl_args *)uap);
672 case IBCS2_SIOCSOCKSYS:
673 error = ibcs2_socksys(td, (struct ibcs2_socksys_args *)uap);
677 case IBCS2_I_NREAD: /* STREAMS */
679 error = sys_ioctl(td, (struct ioctl_args *)uap);
683 DPRINTF(("ibcs2_ioctl(%d): unknown cmd 0x%lx ",
684 td->proc->p_pid, uap->cmd));