xref: /freebsd/sys/kern/tty_compat.c (revision 8a0a413e)
1 /*-
2  * SPDX-License-Identifier: BSD-3-Clause
3  *
4  * Copyright (c) 1982, 1986, 1991, 1993
5  *	The Regents of the University of California.  All rights reserved.
6  *
7  * Redistribution and use in source and binary forms, with or without
8  * modification, are permitted provided that the following conditions
9  * are met:
10  * 1. Redistributions of source code must retain the above copyright
11  *    notice, this list of conditions and the following disclaimer.
12  * 2. Redistributions in binary form must reproduce the above copyright
13  *    notice, this list of conditions and the following disclaimer in the
14  *    documentation and/or other materials provided with the distribution.
15  * 3. Neither the name of the University nor the names of its contributors
16  *    may be used to endorse or promote products derived from this software
17  *    without specific prior written permission.
18  *
19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
29  * SUCH DAMAGE.
30  *
31  *	@(#)tty_compat.c	8.1 (Berkeley) 6/10/93
32  */
33 
34 #include <sys/cdefs.h>
35 __FBSDID("$FreeBSD$");
36 
37 #include "opt_compat.h"
38 
39 /*
40  * mapping routines for old line discipline (yuck)
41  */
42 
43 #include <sys/param.h>
44 #include <sys/systm.h>
45 #include <sys/ioctl_compat.h>
46 #include <sys/tty.h>
47 #include <sys/kernel.h>
48 #include <sys/sysctl.h>
49 
50 struct speedtab {
51 	int sp_speed;			/* Speed. */
52 	int sp_code;			/* Code. */
53 };
54 
55 static int ttcompatgetflags(struct tty *tp);
56 static void ttcompatsetflags(struct tty *tp, struct termios *t);
57 static void ttcompatsetlflags(struct tty *tp, struct termios *t);
58 static int ttcompatspeedtab(int speed, struct speedtab *table);
59 
60 static int ttydebug = 0;
61 SYSCTL_INT(_debug, OID_AUTO, ttydebug, CTLFLAG_RW, &ttydebug, 0, "");
62 
63 static struct speedtab compatspeeds[] = {
64 #define MAX_SPEED	17
65 	{ 115200, 17 },
66 	{ 57600, 16 },
67 	{ 38400, 15 },
68 	{ 19200, 14 },
69 	{ 9600,	13 },
70 	{ 4800,	12 },
71 	{ 2400,	11 },
72 	{ 1800,	10 },
73 	{ 1200,	9 },
74 	{ 600,	8 },
75 	{ 300,	7 },
76 	{ 200,	6 },
77 	{ 150,	5 },
78 	{ 134,	4 },
79 	{ 110,	3 },
80 	{ 75,	2 },
81 	{ 50,	1 },
82 	{ 0,	0 },
83 	{ -1,	-1 },
84 };
85 static int compatspcodes[] = {
86 	0, 50, 75, 110, 134, 150, 200, 300, 600, 1200,
87 	1800, 2400, 4800, 9600, 19200, 38400, 57600, 115200,
88 };
89 
90 static int
91 ttcompatspeedtab(int speed, struct speedtab *table)
92 {
93 	if (speed == 0)
94 		return (0); /* hangup */
95 	for ( ; table->sp_speed > 0; table++)
96 		if (table->sp_speed <= speed) /* nearest one, rounded down */
97 			return (table->sp_code);
98 	return (1); /* 50, min and not hangup */
99 }
100 
101 static int
102 ttsetcompat(struct tty *tp, u_long *com, caddr_t data, struct termios *term)
103 {
104 	switch (*com) {
105 	case TIOCSETP:
106 	case TIOCSETN: {
107 		struct sgttyb *sg = (struct sgttyb *)data;
108 		int speed;
109 
110 		if ((speed = sg->sg_ispeed) > MAX_SPEED || speed < 0)
111 			return(EINVAL);
112 		else if (speed != ttcompatspeedtab(tp->t_termios.c_ispeed,
113 		    compatspeeds))
114 			term->c_ispeed = compatspcodes[speed];
115 		else
116 			term->c_ispeed = tp->t_termios.c_ispeed;
117 		if ((speed = sg->sg_ospeed) > MAX_SPEED || speed < 0)
118 			return(EINVAL);
119 		else if (speed != ttcompatspeedtab(tp->t_termios.c_ospeed,
120 		    compatspeeds))
121 			term->c_ospeed = compatspcodes[speed];
122 		else
123 			term->c_ospeed = tp->t_termios.c_ospeed;
124 		term->c_cc[VERASE] = sg->sg_erase;
125 		term->c_cc[VKILL] = sg->sg_kill;
126 		tp->t_compatflags = (tp->t_compatflags&0xffff0000) |
127 		    (sg->sg_flags&0xffff);
128 		ttcompatsetflags(tp, term);
129 		*com = (*com == TIOCSETP) ? TIOCSETAF : TIOCSETA;
130 		break;
131 	}
132 	case TIOCSETC: {
133 		struct tchars *tc = (struct tchars *)data;
134 		cc_t *cc;
135 
136 		cc = term->c_cc;
137 		cc[VINTR] = tc->t_intrc;
138 		cc[VQUIT] = tc->t_quitc;
139 		cc[VSTART] = tc->t_startc;
140 		cc[VSTOP] = tc->t_stopc;
141 		cc[VEOF] = tc->t_eofc;
142 		cc[VEOL] = tc->t_brkc;
143 		if (tc->t_brkc == (char)_POSIX_VDISABLE)
144 			cc[VEOL2] = _POSIX_VDISABLE;
145 		*com = TIOCSETA;
146 		break;
147 	}
148 	case TIOCSLTC: {
149 		struct ltchars *ltc = (struct ltchars *)data;
150 		cc_t *cc;
151 
152 		cc = term->c_cc;
153 		cc[VSUSP] = ltc->t_suspc;
154 		cc[VDSUSP] = ltc->t_dsuspc;
155 		cc[VREPRINT] = ltc->t_rprntc;
156 		cc[VDISCARD] = ltc->t_flushc;
157 		cc[VWERASE] = ltc->t_werasc;
158 		cc[VLNEXT] = ltc->t_lnextc;
159 		*com = TIOCSETA;
160 		break;
161 	}
162 	case TIOCLBIS:
163 	case TIOCLBIC:
164 	case TIOCLSET:
165 		if (*com == TIOCLSET)
166 			tp->t_compatflags = (tp->t_compatflags&0xffff) |
167 			    *(int *)data<<16;
168 		else {
169 			tp->t_compatflags = (ttcompatgetflags(tp)&0xffff0000) |
170 			    (tp->t_compatflags&0xffff);
171 			if (*com == TIOCLBIS)
172 				tp->t_compatflags |= *(int *)data<<16;
173 			else
174 				tp->t_compatflags &= ~(*(int *)data<<16);
175 		}
176 		ttcompatsetlflags(tp, term);
177 		*com = TIOCSETA;
178 		break;
179 	}
180 	return 0;
181 }
182 
183 /*ARGSUSED*/
184 int
185 tty_ioctl_compat(struct tty *tp, u_long com, caddr_t data, int fflag,
186     struct thread *td)
187 {
188 	switch (com) {
189 	case TIOCSETP:
190 	case TIOCSETN:
191 	case TIOCSETC:
192 	case TIOCSLTC:
193 	case TIOCLBIS:
194 	case TIOCLBIC:
195 	case TIOCLSET: {
196 		struct termios term;
197 		int error;
198 
199 		term = tp->t_termios;
200 		if ((error = ttsetcompat(tp, &com, data, &term)) != 0)
201 			return error;
202 		return tty_ioctl(tp, com, &term, fflag, td);
203 	}
204 	case TIOCGETP: {
205 		struct sgttyb *sg = (struct sgttyb *)data;
206 		cc_t *cc = tp->t_termios.c_cc;
207 
208 		sg->sg_ospeed = ttcompatspeedtab(tp->t_termios.c_ospeed,
209 		    compatspeeds);
210 		if (tp->t_termios.c_ispeed == 0)
211 			sg->sg_ispeed = sg->sg_ospeed;
212 		else
213 			sg->sg_ispeed = ttcompatspeedtab(tp->t_termios.c_ispeed,
214 			    compatspeeds);
215 		sg->sg_erase = cc[VERASE];
216 		sg->sg_kill = cc[VKILL];
217 		sg->sg_flags = tp->t_compatflags = ttcompatgetflags(tp);
218 		break;
219 	}
220 	case TIOCGETC: {
221 		struct tchars *tc = (struct tchars *)data;
222 		cc_t *cc = tp->t_termios.c_cc;
223 
224 		tc->t_intrc = cc[VINTR];
225 		tc->t_quitc = cc[VQUIT];
226 		tc->t_startc = cc[VSTART];
227 		tc->t_stopc = cc[VSTOP];
228 		tc->t_eofc = cc[VEOF];
229 		tc->t_brkc = cc[VEOL];
230 		break;
231 	}
232 	case TIOCGLTC: {
233 		struct ltchars *ltc = (struct ltchars *)data;
234 		cc_t *cc = tp->t_termios.c_cc;
235 
236 		ltc->t_suspc = cc[VSUSP];
237 		ltc->t_dsuspc = cc[VDSUSP];
238 		ltc->t_rprntc = cc[VREPRINT];
239 		ltc->t_flushc = cc[VDISCARD];
240 		ltc->t_werasc = cc[VWERASE];
241 		ltc->t_lnextc = cc[VLNEXT];
242 		break;
243 	}
244 	case TIOCLGET:
245 		tp->t_compatflags =
246 		 (ttcompatgetflags(tp) & 0xffff0000UL)
247 		   | (tp->t_compatflags & 0xffff);
248 		*(int *)data = tp->t_compatflags>>16;
249 		if (ttydebug)
250 			printf("CLGET: returning %x\n", *(int *)data);
251 		break;
252 
253 	case OTIOCGETD:
254 		*(int *)data = 2;
255 		break;
256 
257 	case OTIOCSETD: {
258 		int ldisczero = 0;
259 
260 		return (tty_ioctl(tp, TIOCSETD,
261 			*(int *)data == 2 ? (caddr_t)&ldisczero : data,
262 			fflag, td));
263 	    }
264 
265 	case OTIOCCONS:
266 		*(int *)data = 1;
267 		return (tty_ioctl(tp, TIOCCONS, data, fflag, td));
268 
269 	default:
270 		return (ENOIOCTL);
271 	}
272 	return (0);
273 }
274 
275 static int
276 ttcompatgetflags(struct tty *tp)
277 {
278 	tcflag_t iflag	= tp->t_termios.c_iflag;
279 	tcflag_t lflag	= tp->t_termios.c_lflag;
280 	tcflag_t oflag	= tp->t_termios.c_oflag;
281 	tcflag_t cflag	= tp->t_termios.c_cflag;
282 	int flags = 0;
283 
284 	if (iflag&IXOFF)
285 		flags |= TANDEM;
286 	if (iflag&ICRNL || oflag&ONLCR)
287 		flags |= CRMOD;
288 	if ((cflag&CSIZE) == CS8) {
289 		flags |= PASS8;
290 		if (iflag&ISTRIP)
291 			flags |= ANYP;
292 	}
293 	else if (cflag&PARENB) {
294 		if (iflag&INPCK) {
295 			if (cflag&PARODD)
296 				flags |= ODDP;
297 			else
298 				flags |= EVENP;
299 		} else
300 			flags |= EVENP | ODDP;
301 	}
302 
303 	if ((lflag&ICANON) == 0) {
304 		/* fudge */
305 		if (iflag&(INPCK|ISTRIP|IXON) || lflag&(IEXTEN|ISIG)
306 		    || (cflag&(CSIZE|PARENB)) != CS8)
307 			flags |= CBREAK;
308 		else
309 			flags |= RAW;
310 	}
311 	if (!(flags&RAW) && !(oflag&OPOST) && (cflag&(CSIZE|PARENB)) == CS8)
312 		flags |= LITOUT;
313 	if (cflag&MDMBUF)
314 		flags |= MDMBUF;
315 	if ((cflag&HUPCL) == 0)
316 		flags |= NOHANG;
317 	if (oflag&TAB3)
318 		flags |= XTABS;
319 	if (lflag&ECHOE)
320 		flags |= CRTERA|CRTBS;
321 	if (lflag&ECHOKE)
322 		flags |= CRTKIL|CRTBS;
323 	if (lflag&ECHOPRT)
324 		flags |= PRTERA;
325 	if (lflag&ECHOCTL)
326 		flags |= CTLECH;
327 	if ((iflag&IXANY) == 0)
328 		flags |= DECCTQ;
329 	flags |= lflag&(ECHO|TOSTOP|FLUSHO|PENDIN|NOFLSH);
330 	if (ttydebug)
331 		printf("getflags: %x\n", flags);
332 	return (flags);
333 }
334 
335 static void
336 ttcompatsetflags(struct tty *tp, struct termios *t)
337 {
338 	int flags = tp->t_compatflags;
339 	tcflag_t iflag	= t->c_iflag;
340 	tcflag_t oflag	= t->c_oflag;
341 	tcflag_t lflag	= t->c_lflag;
342 	tcflag_t cflag	= t->c_cflag;
343 
344 	if (flags & RAW) {
345 		iflag = IGNBRK;
346 		lflag &= ~(ECHOCTL|ISIG|ICANON|IEXTEN);
347 	} else {
348 		iflag &= ~(PARMRK|IGNPAR|IGNCR|INLCR);
349 		iflag |= BRKINT|IXON|IMAXBEL;
350 		lflag |= ISIG|IEXTEN|ECHOCTL;	/* XXX was echoctl on ? */
351 		if (flags & XTABS)
352 			oflag |= TAB3;
353 		else
354 			oflag &= ~TAB3;
355 		if (flags & CBREAK)
356 			lflag &= ~ICANON;
357 		else
358 			lflag |= ICANON;
359 		if (flags&CRMOD) {
360 			iflag |= ICRNL;
361 			oflag |= ONLCR;
362 		} else {
363 			iflag &= ~ICRNL;
364 			oflag &= ~ONLCR;
365 		}
366 	}
367 	if (flags&ECHO)
368 		lflag |= ECHO;
369 	else
370 		lflag &= ~ECHO;
371 
372 	cflag &= ~(CSIZE|PARENB);
373 	if (flags&(RAW|LITOUT|PASS8)) {
374 		cflag |= CS8;
375 		if (!(flags&(RAW|PASS8))
376 		    || (flags&(RAW|PASS8|ANYP)) == (PASS8|ANYP))
377 			iflag |= ISTRIP;
378 		else
379 			iflag &= ~ISTRIP;
380 		if (flags&(RAW|LITOUT))
381 			oflag &= ~OPOST;
382 		else
383 			oflag |= OPOST;
384 	} else {
385 		cflag |= CS7|PARENB;
386 		iflag |= ISTRIP;
387 		oflag |= OPOST;
388 	}
389 	/* XXX don't set INPCK if RAW or PASS8? */
390 	if ((flags&(EVENP|ODDP)) == EVENP) {
391 		iflag |= INPCK;
392 		cflag &= ~PARODD;
393 	} else if ((flags&(EVENP|ODDP)) == ODDP) {
394 		iflag |= INPCK;
395 		cflag |= PARODD;
396 	} else
397 		iflag &= ~INPCK;
398 	if (flags&TANDEM)
399 		iflag |= IXOFF;
400 	else
401 		iflag &= ~IXOFF;
402 	if ((flags&DECCTQ) == 0)
403 		iflag |= IXANY;
404 	else
405 		iflag &= ~IXANY;
406 	t->c_iflag = iflag;
407 	t->c_oflag = oflag;
408 	t->c_lflag = lflag;
409 	t->c_cflag = cflag;
410 }
411 
412 static void
413 ttcompatsetlflags(struct tty *tp, struct termios *t)
414 {
415 	int flags = tp->t_compatflags;
416 	tcflag_t iflag	= t->c_iflag;
417 	tcflag_t oflag	= t->c_oflag;
418 	tcflag_t lflag	= t->c_lflag;
419 	tcflag_t cflag	= t->c_cflag;
420 
421 	iflag &= ~(PARMRK|IGNPAR|IGNCR|INLCR);
422 	if (flags&CRTERA)
423 		lflag |= ECHOE;
424 	else
425 		lflag &= ~ECHOE;
426 	if (flags&CRTKIL)
427 		lflag |= ECHOKE;
428 	else
429 		lflag &= ~ECHOKE;
430 	if (flags&PRTERA)
431 		lflag |= ECHOPRT;
432 	else
433 		lflag &= ~ECHOPRT;
434 	if (flags&CTLECH)
435 		lflag |= ECHOCTL;
436 	else
437 		lflag &= ~ECHOCTL;
438 	if (flags&TANDEM)
439 		iflag |= IXOFF;
440 	else
441 		iflag &= ~IXOFF;
442 	if ((flags&DECCTQ) == 0)
443 		iflag |= IXANY;
444 	else
445 		iflag &= ~IXANY;
446 	if (flags & MDMBUF)
447 		cflag |= MDMBUF;
448 	else
449 		cflag &= ~MDMBUF;
450 	if (flags&NOHANG)
451 		cflag &= ~HUPCL;
452 	else
453 		cflag |= HUPCL;
454 	lflag &= ~(TOSTOP|FLUSHO|PENDIN|NOFLSH);
455 	lflag |= flags&(TOSTOP|FLUSHO|PENDIN|NOFLSH);
456 
457 	/*
458 	 * The next if-else statement is copied from above so don't bother
459 	 * checking it separately.  We could avoid fiddlling with the
460 	 * character size if the mode is already RAW or if neither the
461 	 * LITOUT bit or the PASS8 bit is being changed, but the delta of
462 	 * the change is not available here and skipping the RAW case would
463 	 * make the code different from above.
464 	 */
465 	cflag &= ~(CSIZE|PARENB);
466 	if (flags&(RAW|LITOUT|PASS8)) {
467 		cflag |= CS8;
468 		if (!(flags&(RAW|PASS8))
469 		    || (flags&(RAW|PASS8|ANYP)) == (PASS8|ANYP))
470 			iflag |= ISTRIP;
471 		else
472 			iflag &= ~ISTRIP;
473 		if (flags&(RAW|LITOUT))
474 			oflag &= ~OPOST;
475 		else
476 			oflag |= OPOST;
477 	} else {
478 		cflag |= CS7|PARENB;
479 		iflag |= ISTRIP;
480 		oflag |= OPOST;
481 	}
482 	t->c_iflag = iflag;
483 	t->c_oflag = oflag;
484 	t->c_lflag = lflag;
485 	t->c_cflag = cflag;
486 }
487