tty_43.c revision 1.17 1 /* $NetBSD: tty_43.c,v 1.17 2003/08/07 16:30:36 agc Exp $ */
2
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.2 (Berkeley) 1/9/95
32 */
33
34 /*
35 * mapping routines for old line discipline (yuck)
36 */
37
38 #include <sys/cdefs.h>
39 __KERNEL_RCSID(0, "$NetBSD: tty_43.c,v 1.17 2003/08/07 16:30:36 agc Exp $");
40
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/ioctl.h>
44 #include <sys/proc.h>
45 #include <sys/conf.h>
46 #include <sys/tty.h>
47 #include <sys/termios.h>
48 #include <sys/file.h>
49 #include <sys/kernel.h>
50 #include <sys/syslog.h>
51 #include <sys/ioctl_compat.h>
52
53 /*
54 * XXX libcompat files should be included with config attributes
55 */
56 #ifdef COMPAT_OLDTTY
57
58 int ttydebug = 0;
59
60 static struct speedtab compatspeeds[] = {
61 #define MAX_SPEED 17
62 { 115200, 17 },
63 { 57600, 16 },
64 { 38400, 15 },
65 { 19200, 14 },
66 { 9600, 13 },
67 { 4800, 12 },
68 { 2400, 11 },
69 { 1800, 10 },
70 { 1200, 9 },
71 { 600, 8 },
72 { 300, 7 },
73 { 200, 6 },
74 { 150, 5 },
75 { 134, 4 },
76 { 110, 3 },
77 { 75, 2 },
78 { 50, 1 },
79 { 0, 0 },
80 { -1, -1 },
81 };
82 static int compatspcodes[] = {
83 0, 50, 75, 110, 134, 150, 200, 300, 600, 1200,
84 1800, 2400, 4800, 9600, 19200, 38400, 57600, 115200
85 };
86
87 /* Macros to clear/set/test flags. */
88 #define SET(t, f) (t) |= (f)
89 #define CLR(t, f) (t) &= ~(f)
90 #define ISSET(t, f) ((t) & (f))
91
92 int ttcompatgetflags __P((struct tty *));
93 void ttcompatsetflags __P((struct tty *, struct termios *));
94 void ttcompatsetlflags __P((struct tty *, struct termios *));
95
96 /*ARGSUSED*/
97 int
98 ttcompat(tp, com, data, flag, p)
99 struct tty *tp;
100 u_long com;
101 caddr_t data;
102 int flag;
103 struct proc *p;
104 {
105
106 switch (com) {
107 case TIOCGETP: {
108 struct sgttyb *sg = (struct sgttyb *)data;
109 u_char *cc = tp->t_cc;
110 int speed;
111
112 speed = ttspeedtab(tp->t_ospeed, compatspeeds);
113 sg->sg_ospeed = (speed == -1) ? MAX_SPEED : speed;
114 if (tp->t_ispeed == 0)
115 sg->sg_ispeed = sg->sg_ospeed;
116 else {
117 speed = ttspeedtab(tp->t_ispeed, compatspeeds);
118 sg->sg_ispeed = (speed == -1) ? MAX_SPEED : speed;
119 }
120 sg->sg_erase = cc[VERASE];
121 sg->sg_kill = cc[VKILL];
122 sg->sg_flags = ttcompatgetflags(tp);
123 break;
124 }
125
126 case TIOCSETP:
127 case TIOCSETN: {
128 struct sgttyb *sg = (struct sgttyb *)data;
129 struct termios term;
130 int speed;
131
132 term = tp->t_termios;
133 if ((speed = sg->sg_ispeed) > MAX_SPEED || speed < 0)
134 term.c_ispeed = speed;
135 else
136 term.c_ispeed = compatspcodes[speed];
137 if ((speed = sg->sg_ospeed) > MAX_SPEED || speed < 0)
138 term.c_ospeed = speed;
139 else
140 term.c_ospeed = compatspcodes[speed];
141 term.c_cc[VERASE] = sg->sg_erase;
142 term.c_cc[VKILL] = sg->sg_kill;
143 tp->t_flags = (ttcompatgetflags(tp)&0xffff0000) | (sg->sg_flags&0xffff);
144 ttcompatsetflags(tp, &term);
145 return (ttioctl(tp, com == TIOCSETP ? TIOCSETAF : TIOCSETA,
146 (caddr_t)&term, flag, p));
147 }
148
149 case TIOCGETC: {
150 struct tchars *tc = (struct tchars *)data;
151 u_char *cc = tp->t_cc;
152
153 tc->t_intrc = cc[VINTR];
154 tc->t_quitc = cc[VQUIT];
155 tc->t_startc = cc[VSTART];
156 tc->t_stopc = cc[VSTOP];
157 tc->t_eofc = cc[VEOF];
158 tc->t_brkc = cc[VEOL];
159 break;
160 }
161 case TIOCSETC: {
162 struct tchars *tc = (struct tchars *)data;
163 u_char *cc = tp->t_cc;
164
165 cc[VINTR] = tc->t_intrc;
166 cc[VQUIT] = tc->t_quitc;
167 cc[VSTART] = tc->t_startc;
168 cc[VSTOP] = tc->t_stopc;
169 cc[VEOF] = tc->t_eofc;
170 cc[VEOL] = tc->t_brkc;
171 if (tc->t_brkc == (char)-1)
172 cc[VEOL2] = _POSIX_VDISABLE;
173 break;
174 }
175 case TIOCSLTC: {
176 struct ltchars *ltc = (struct ltchars *)data;
177 u_char *cc = tp->t_cc;
178
179 cc[VSUSP] = ltc->t_suspc;
180 cc[VDSUSP] = ltc->t_dsuspc;
181 cc[VREPRINT] = ltc->t_rprntc;
182 cc[VDISCARD] = ltc->t_flushc;
183 cc[VWERASE] = ltc->t_werasc;
184 cc[VLNEXT] = ltc->t_lnextc;
185 break;
186 }
187 case TIOCGLTC: {
188 struct ltchars *ltc = (struct ltchars *)data;
189 u_char *cc = tp->t_cc;
190
191 ltc->t_suspc = cc[VSUSP];
192 ltc->t_dsuspc = cc[VDSUSP];
193 ltc->t_rprntc = cc[VREPRINT];
194 ltc->t_flushc = cc[VDISCARD];
195 ltc->t_werasc = cc[VWERASE];
196 ltc->t_lnextc = cc[VLNEXT];
197 break;
198 }
199 case TIOCLBIS:
200 case TIOCLBIC:
201 case TIOCLSET: {
202 struct termios term;
203 int flags;
204
205 term = tp->t_termios;
206 flags = ttcompatgetflags(tp);
207 switch (com) {
208 case TIOCLSET:
209 tp->t_flags = (flags&0xffff) | (*(int *)data<<16);
210 break;
211 case TIOCLBIS:
212 tp->t_flags = flags | (*(int *)data<<16);
213 break;
214 case TIOCLBIC:
215 tp->t_flags = flags & ~(*(int *)data<<16);
216 break;
217 }
218 ttcompatsetlflags(tp, &term);
219 return (ttioctl(tp, TIOCSETA, (caddr_t)&term, flag, p));
220 }
221 case TIOCLGET:
222 *(int *)data = ttcompatgetflags(tp)>>16;
223 if (ttydebug)
224 printf("CLGET: returning %x\n", *(int *)data);
225 break;
226
227 case OTIOCGETD:
228 *(int *)data = (tp->t_linesw != NULL) ? tp->t_linesw->l_no : 2;
229 break;
230
231 case OTIOCSETD: {
232 int ldisczero = 0;
233
234 return (ttioctl(tp, TIOCSETD,
235 *(int *)data == 2 ? (caddr_t)&ldisczero : data, flag,
236 p));
237 }
238
239 case OTIOCCONS:
240 *(int *)data = 1;
241 return (ttioctl(tp, TIOCCONS, data, flag, p));
242
243 case TIOCHPCL:
244 SET(tp->t_cflag, HUPCL);
245 break;
246
247 case TIOCGSID:
248 if (tp->t_session == NULL)
249 return ENOTTY;
250
251 if (tp->t_session->s_leader == NULL)
252 return ENOTTY;
253
254 *(int *) data = tp->t_session->s_leader->p_pid;
255 break;
256
257 default:
258 return (EPASSTHROUGH);
259 }
260 return (0);
261 }
262
263 int
264 ttcompatgetflags(tp)
265 struct tty *tp;
266 {
267 tcflag_t iflag = tp->t_iflag;
268 tcflag_t lflag = tp->t_lflag;
269 tcflag_t oflag = tp->t_oflag;
270 tcflag_t cflag = tp->t_cflag;
271 int flags = 0;
272
273 if (ISSET(iflag, IXOFF))
274 SET(flags, TANDEM);
275 if (ISSET(iflag, ICRNL) || ISSET(oflag, ONLCR))
276 SET(flags, CRMOD);
277 if (ISSET(cflag, PARENB)) {
278 if (ISSET(iflag, INPCK)) {
279 if (ISSET(cflag, PARODD))
280 SET(flags, ODDP);
281 else
282 SET(flags, EVENP);
283 } else
284 SET(flags, ANYP);
285 }
286
287 if (!ISSET(lflag, ICANON)) {
288 /* fudge */
289 if (ISSET(iflag, IXON) || ISSET(lflag, ISIG|IEXTEN) ||
290 ISSET(cflag, PARENB))
291 SET(flags, CBREAK);
292 else
293 SET(flags, RAW);
294 }
295
296 if (ISSET(flags, RAW))
297 SET(flags, ISSET(tp->t_flags, LITOUT|PASS8));
298 else if (ISSET(cflag, CSIZE) == CS8) {
299 if (!ISSET(oflag, OPOST))
300 SET(flags, LITOUT);
301 if (!ISSET(iflag, ISTRIP))
302 SET(flags, PASS8);
303 }
304
305 if (ISSET(cflag, MDMBUF))
306 SET(flags, MDMBUF);
307 if (!ISSET(cflag, HUPCL))
308 SET(flags, NOHANG);
309 if (ISSET(oflag, OXTABS))
310 SET(flags, XTABS);
311 if (ISSET(lflag, ECHOE))
312 SET(flags, CRTERA|CRTBS);
313 if (ISSET(lflag, ECHOKE))
314 SET(flags, CRTKIL|CRTBS);
315 if (ISSET(lflag, ECHOPRT))
316 SET(flags, PRTERA);
317 if (ISSET(lflag, ECHOCTL))
318 SET(flags, CTLECH);
319 if (!ISSET(iflag, IXANY))
320 SET(flags, DECCTQ);
321 SET(flags, ISSET(lflag, ECHO|TOSTOP|FLUSHO|PENDIN|NOFLSH));
322 if (ttydebug)
323 printf("getflags: %x\n", flags);
324 return (flags);
325 }
326
327 void
328 ttcompatsetflags(tp, t)
329 struct tty *tp;
330 struct termios *t;
331 {
332 int flags = tp->t_flags;
333 tcflag_t iflag = t->c_iflag;
334 tcflag_t oflag = t->c_oflag;
335 tcflag_t lflag = t->c_lflag;
336 tcflag_t cflag = t->c_cflag;
337
338 if (ISSET(flags, TANDEM))
339 SET(iflag, IXOFF);
340 else
341 CLR(iflag, IXOFF);
342 if (ISSET(flags, ECHO))
343 SET(lflag, ECHO);
344 else
345 CLR(lflag, ECHO);
346 if (ISSET(flags, CRMOD)) {
347 SET(iflag, ICRNL);
348 SET(oflag, ONLCR);
349 } else {
350 CLR(iflag, ICRNL);
351 CLR(oflag, ONLCR);
352 }
353 if (ISSET(flags, XTABS))
354 SET(oflag, OXTABS);
355 else
356 CLR(oflag, OXTABS);
357
358
359 if (ISSET(flags, RAW)) {
360 iflag &= IXOFF;
361 CLR(lflag, ISIG|ICANON|IEXTEN);
362 CLR(cflag, PARENB);
363 } else {
364 SET(iflag, BRKINT|IXON|IMAXBEL);
365 SET(lflag, ISIG|IEXTEN);
366 if (ISSET(flags, CBREAK))
367 CLR(lflag, ICANON);
368 else
369 SET(lflag, ICANON);
370 switch (ISSET(flags, ANYP)) {
371 case 0:
372 CLR(cflag, PARENB);
373 break;
374 case ANYP:
375 SET(cflag, PARENB);
376 CLR(iflag, INPCK);
377 break;
378 case EVENP:
379 SET(cflag, PARENB);
380 SET(iflag, INPCK);
381 CLR(cflag, PARODD);
382 break;
383 case ODDP:
384 SET(cflag, PARENB);
385 SET(iflag, INPCK);
386 SET(cflag, PARODD);
387 break;
388 }
389 }
390
391 if (ISSET(flags, RAW|LITOUT|PASS8)) {
392 CLR(cflag, CSIZE);
393 SET(cflag, CS8);
394 if (!ISSET(flags, RAW|PASS8))
395 SET(iflag, ISTRIP);
396 else
397 CLR(iflag, ISTRIP);
398 if (!ISSET(flags, RAW|LITOUT))
399 SET(oflag, OPOST);
400 else
401 CLR(oflag, OPOST);
402 } else {
403 CLR(cflag, CSIZE);
404 SET(cflag, CS7);
405 SET(iflag, ISTRIP);
406 SET(oflag, OPOST);
407 }
408
409 t->c_iflag = iflag;
410 t->c_oflag = oflag;
411 t->c_lflag = lflag;
412 t->c_cflag = cflag;
413 }
414
415 void
416 ttcompatsetlflags(tp, t)
417 struct tty *tp;
418 struct termios *t;
419 {
420 int flags = tp->t_flags;
421 tcflag_t iflag = t->c_iflag;
422 tcflag_t oflag = t->c_oflag;
423 tcflag_t lflag = t->c_lflag;
424 tcflag_t cflag = t->c_cflag;
425
426 /* Nothing we can do with CRTBS. */
427 if (ISSET(flags, PRTERA))
428 SET(lflag, ECHOPRT);
429 else
430 CLR(lflag, ECHOPRT);
431 if (ISSET(flags, CRTERA))
432 SET(lflag, ECHOE);
433 else
434 CLR(lflag, ECHOE);
435 /* Nothing we can do with TILDE. */
436 if (ISSET(flags, MDMBUF))
437 SET(cflag, MDMBUF);
438 else
439 CLR(cflag, MDMBUF);
440 if (ISSET(flags, NOHANG))
441 CLR(cflag, HUPCL);
442 else
443 SET(cflag, HUPCL);
444 if (ISSET(flags, CRTKIL))
445 SET(lflag, ECHOKE);
446 else
447 CLR(lflag, ECHOKE);
448 if (ISSET(flags, CTLECH))
449 SET(lflag, ECHOCTL);
450 else
451 CLR(lflag, ECHOCTL);
452 if (!ISSET(flags, DECCTQ))
453 SET(iflag, IXANY);
454 else
455 CLR(iflag, IXANY);
456 CLR(lflag, TOSTOP|FLUSHO|PENDIN|NOFLSH);
457 SET(lflag, ISSET(flags, TOSTOP|FLUSHO|PENDIN|NOFLSH));
458
459 if (ISSET(flags, RAW|LITOUT|PASS8)) {
460 CLR(cflag, CSIZE);
461 SET(cflag, CS8);
462 if (!ISSET(flags, RAW|PASS8))
463 SET(iflag, ISTRIP);
464 else
465 CLR(iflag, ISTRIP);
466 if (!ISSET(flags, RAW|LITOUT))
467 SET(oflag, OPOST);
468 else
469 CLR(oflag, OPOST);
470 } else {
471 CLR(cflag, CSIZE);
472 SET(cflag, CS7);
473 SET(iflag, ISTRIP);
474 SET(oflag, OPOST);
475 }
476
477 t->c_iflag = iflag;
478 t->c_oflag = oflag;
479 t->c_lflag = lflag;
480 t->c_cflag = cflag;
481 }
482
483 #endif /* COMPAT_OLDTTY */
484