xref: /netbsd-src/sys/compat/ultrix/ultrix_ioctl.c (revision 81b108b45f75f89f1e3ffad9fb6f074e771c0935)
1 /*	$NetBSD: ultrix_ioctl.c,v 1.4 1996/06/13 18:13:34 jonathan Exp $ */
2 /*	from : NetBSD: sunos_ioctl.c,v 1.21 1995/10/07 06:27:31 mycroft Exp */
3 
4 /*
5  * Copyright (c) 1993 Markus Wild.
6  * All rights reserved.
7  *
8  * Redistribution and use in source and binary forms, with or without
9  * modification, are permitted provided that the following conditions
10  * are met:
11  * 1. Redistributions of source code must retain the above copyright
12  *    notice, this list of conditions and the following disclaimer.
13  * 2. The name of the author may not be used to endorse or promote products
14  *    derived from this software without specific prior written permission
15  *
16  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
17  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
18  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
19  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
20  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
21  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
22  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
23  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
24  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
25  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
26  *
27  * loosely from: Header: sunos_ioctl.c,v 1.7 93/05/28 04:40:43 torek Exp
28  */
29 
30 #include <sys/param.h>
31 #include <sys/proc.h>
32 #include <sys/systm.h>
33 #include <sys/file.h>
34 #include <sys/filedesc.h>
35 #include <sys/ioctl.h>
36 #include <sys/termios.h>
37 #include <sys/tty.h>
38 #include <sys/socket.h>
39 #include <sys/audioio.h>
40 #include <net/if.h>
41 
42 #include <sys/mount.h>
43 
44 #include <compat/ultrix/ultrix_syscallargs.h>
45 #include <sys/syscallargs.h>
46 
47 #include <compat/sunos/sunos.h>
48 
49 #include "ultrix_tty.h"
50 
51 #define emul_termio	ultrix_termio
52 #define emul_termios	ultrix_termios
53 
54 /*
55  * SunOS ioctl calls.
56  * This file is something of a hodge-podge.
57  * Support gets added as things turn up....
58  */
59 
60 static struct speedtab sptab[] = {
61 	{ 0, 0 },
62 	{ 50, 1 },
63 	{ 75, 2 },
64 	{ 110, 3 },
65 	{ 134, 4 },
66 	{ 135, 4 },
67 	{ 150, 5 },
68 	{ 200, 6 },
69 	{ 300, 7 },
70 	{ 600, 8 },
71 	{ 1200, 9 },
72 	{ 1800, 10 },
73 	{ 2400, 11 },
74 	{ 4800, 12 },
75 	{ 9600, 13 },
76 	{ 19200, 14 },
77 	{ 38400, 15 },
78 	{ -1, -1 }
79 };
80 
81 static u_long s2btab[] = {
82 	0,
83 	50,
84 	75,
85 	110,
86 	134,
87 	150,
88 	200,
89 	300,
90 	600,
91 	1200,
92 	1800,
93 	2400,
94 	4800,
95 	9600,
96 	19200,
97 	38400,
98 };
99 
100 
101 /*
102  * Translate a single tty control char from the emulation value
103  * to native termios, and vice-versa. Special-case
104  * the value of POSIX_VDISABLE, mapping it to and from 0.
105  */
106 #define NATIVE_TO_EMUL_CC(bsd_cc) \
107  (((bsd_cc)   != _POSIX_VDISABLE) ? (bsd_cc) : 0)
108 
109 #define EMUL_TO_NATIVE_CC(emul_cc) \
110  (emul_cc) ? (emul_cc) : _POSIX_VDISABLE;
111 
112 
113 
114 /*
115  * these two conversion functions have mostly been done
116  * with some perl cut&paste, then handedited to comment
117  * out what doesn't exist under NetBSD.
118  * A note from Markus's code:
119  *	(l & BITMASK1) / BITMASK1 * BITMASK2  is translated
120  *	optimally by gcc m68k, much better than any ?: stuff.
121  *	Code may vary with different architectures of course.
122  *
123  * I don't know what optimizer you used, but seeing divu's and
124  * bfextu's in the m68k assembly output did not encourage me...
125  * as well, gcc on the sparc definately generates much better
126  * code with ?:.
127  */
128 
129 
130 static void
131 stios2btios(st, bt)
132 	struct emul_termios *st;
133 	struct termios *bt;
134 {
135 	register u_long l, r;
136 
137 	l = st->c_iflag;
138 	r = 	((l & 0x00000001) ? IGNBRK	: 0);
139 	r |=	((l & 0x00000002) ? BRKINT	: 0);
140 	r |=	((l & 0x00000004) ? IGNPAR	: 0);
141 	r |=	((l & 0x00000008) ? PARMRK	: 0);
142 	r |=	((l & 0x00000010) ? INPCK	: 0);
143 	r |=	((l & 0x00000020) ? ISTRIP	: 0);
144 	r |= 	((l & 0x00000040) ? INLCR	: 0);
145 	r |=	((l & 0x00000080) ? IGNCR	: 0);
146 	r |=	((l & 0x00000100) ? ICRNL	: 0);
147 	/*	((l & 0x00000200) ? IUCLC	: 0) */
148 	r |=	((l & 0x00000400) ? IXON	: 0);
149 	r |=	((l & 0x00000800) ? IXANY	: 0);
150 	r |=	((l & 0x00001000) ? IXOFF	: 0);
151 	r |=	((l & 0x00002000) ? IMAXBEL	: 0);
152 	bt->c_iflag = r;
153 
154 	l = st->c_oflag;
155 	r = 	((l & 0x00000001) ? OPOST	: 0);
156 	/*	((l & 0x00000002) ? OLCUC	: 0) */
157 	r |=	((l & 0x00000004) ? ONLCR	: 0);
158 	/*	((l & 0x00000008) ? OCRNL	: 0) */
159 	/*	((l & 0x00000010) ? ONOCR	: 0) */
160 	/*	((l & 0x00000020) ? ONLRET	: 0) */
161 	/*	((l & 0x00000040) ? OFILL	: 0) */
162 	/*	((l & 0x00000080) ? OFDEL	: 0) */
163 	/*	((l & 0x00000100) ? NLDLY	: 0) */
164 	/*	((l & 0x00000100) ? NL1		: 0) */
165 	/*	((l & 0x00000600) ? CRDLY	: 0) */
166 	/*	((l & 0x00000200) ? CR1		: 0) */
167 	/*	((l & 0x00000400) ? CR2		: 0) */
168 	/*	((l & 0x00000600) ? CR3		: 0) */
169 	/*	((l & 0x00001800) ? TABDLY	: 0) */
170 	/*	((l & 0x00000800) ? TAB1	: 0) */
171 	/*	((l & 0x00001000) ? TAB2	: 0) */
172 	r |=	((l & 0x00001800) ? OXTABS	: 0);
173 	/*	((l & 0x00002000) ? BSDLY	: 0) */
174 	/*	((l & 0x00002000) ? BS1		: 0) */
175 	/*	((l & 0x00004000) ? VTDLY	: 0) */
176 	/*	((l & 0x00004000) ? VT1		: 0) */
177 	/*	((l & 0x00008000) ? FFDLY	: 0) */
178 	/*	((l & 0x00008000) ? FF1		: 0) */
179 	/*	((l & 0x00010000) ? PAGEOUT	: 0) */
180 	/*	((l & 0x00020000) ? WRAP	: 0) */
181 	bt->c_oflag = r;
182 
183 	l = st->c_cflag;
184 	switch (l & 0x00000030) {
185 	case 0:
186 		r = CS5;
187 		break;
188 	case 0x00000010:
189 		r = CS6;
190 		break;
191 	case 0x00000020:
192 		r = CS7;
193 		break;
194 	case 0x00000030:
195 		r = CS8;
196 		break;
197 	}
198 	r |=	((l & 0x00000040) ? CSTOPB	: 0);
199 	r |=	((l & 0x00000080) ? CREAD	: 0);
200 	r |= 	((l & 0x00000100) ? PARENB	: 0);
201 	r |=	((l & 0x00000200) ? PARODD	: 0);
202 	r |=	((l & 0x00000400) ? HUPCL	: 0);
203 	r |=	((l & 0x00000800) ? CLOCAL	: 0);
204 	/*	((l & 0x00001000) ? LOBLK	: 0) */
205 	r |=	((l & 0x80000000) ? (CRTS_IFLOW|CCTS_OFLOW) : 0);
206 	bt->c_cflag = r;
207 
208 	bt->c_ispeed = bt->c_ospeed = s2btab[l & 0x0000000f];
209 
210 	l = st->c_lflag;
211 	r = 	((l & 0x00000001) ? ISIG	: 0);
212 	r |=	((l & 0x00000002) ? ICANON	: 0);
213 	/*	((l & 0x00000004) ? XCASE	: 0) */
214 	r |=	((l & 0x00000008) ? ECHO	: 0);
215 	r |=	((l & 0x00000010) ? ECHOE	: 0);
216 	r |=	((l & 0x00000020) ? ECHOK	: 0);
217 	r |=	((l & 0x00000040) ? ECHONL	: 0);
218 	r |= 	((l & 0x00000080) ? NOFLSH	: 0);
219 	r |=	((l & 0x00000100) ? TOSTOP	: 0);
220 	r |=	((l & 0x00000200) ? ECHOCTL	: 0);
221 	r |=	((l & 0x00000400) ? ECHOPRT	: 0);
222 	r |=	((l & 0x00000800) ? ECHOKE	: 0);
223 	/*	((l & 0x00001000) ? DEFECHO	: 0) */
224 	r |=	((l & 0x00002000) ? FLUSHO	: 0);
225 	r |=	((l & 0x00004000) ? PENDIN	: 0);
226 	bt->c_lflag = r;
227 
228 	bt->c_cc[VINTR]    = EMUL_TO_NATIVE_CC(st->c_cc[0]);
229 	bt->c_cc[VQUIT]    = EMUL_TO_NATIVE_CC(st->c_cc[1]);
230 	bt->c_cc[VERASE]   = EMUL_TO_NATIVE_CC(st->c_cc[2]);
231 	bt->c_cc[VKILL]    = EMUL_TO_NATIVE_CC(st->c_cc[3]);
232 	bt->c_cc[VEOF]     = EMUL_TO_NATIVE_CC(st->c_cc[4]);
233 	bt->c_cc[VEOL]     = EMUL_TO_NATIVE_CC(st->c_cc[5]);
234 	bt->c_cc[VEOL2]    = EMUL_TO_NATIVE_CC(st->c_cc[6]);
235 	/* not present on NetBSD */
236 	/* bt->c_cc[VSWTCH]   = EMUL_TO_NATIVE_CC(st->c_cc[7]); */
237 	bt->c_cc[VSTART]   = EMUL_TO_NATIVE_CC(st->c_cc[10]);
238 	bt->c_cc[VSTOP]    = EMUL_TO_NATIVE_CC(st->c_cc[11]);
239 	bt->c_cc[VSUSP]    = EMUL_TO_NATIVE_CC(st->c_cc[12]);
240 	bt->c_cc[VDSUSP]   = EMUL_TO_NATIVE_CC(st->c_cc[13]);
241 	bt->c_cc[VREPRINT] = EMUL_TO_NATIVE_CC(st->c_cc[14]);
242 	bt->c_cc[VDISCARD] = EMUL_TO_NATIVE_CC(st->c_cc[15]);
243 	bt->c_cc[VWERASE]  = EMUL_TO_NATIVE_CC(st->c_cc[16]);
244 	bt->c_cc[VLNEXT]   = EMUL_TO_NATIVE_CC(st->c_cc[17]);
245 	bt->c_cc[VSTATUS]  = EMUL_TO_NATIVE_CC(st->c_cc[18]);
246 
247 #ifdef COMPAT_ULTRIX
248 	/* Ultrix termio/termios has real vmin/vtime */
249 	bt->c_cc[VMIN]	   = EMUL_TO_NATIVE_CC(st->c_cc[8]);
250 	bt->c_cc[VTIME]	   = EMUL_TO_NATIVE_CC(st->c_cc[9]);
251 #else
252 	/* if `raw mode', create native VMIN/VTIME from SunOS VEOF/VEOL */
253 	bt->c_cc[VMIN]	   = (bt->c_lflag & ICANON) ? 1 : bt->c_cc[VEOF];
254 	bt->c_cc[VTIME]	   = (bt->c_lflag & ICANON) ? 1 : bt->c_cc[VEOL];
255 #endif
256 
257 }
258 
259 /*
260  * Convert bsd termios to "sunos" emulated termios
261  */
262 static void
263 btios2stios(bt, st)
264 	struct termios *bt;
265 	struct emul_termios *st;
266 {
267 	register u_long l, r;
268 
269 	l = bt->c_iflag;
270 	r = 	((l &  IGNBRK) ? 0x00000001	: 0);
271 	r |=	((l &  BRKINT) ? 0x00000002	: 0);
272 	r |=	((l &  IGNPAR) ? 0x00000004	: 0);
273 	r |=	((l &  PARMRK) ? 0x00000008	: 0);
274 	r |=	((l &   INPCK) ? 0x00000010	: 0);
275 	r |=	((l &  ISTRIP) ? 0x00000020	: 0);
276 	r |=	((l &   INLCR) ? 0x00000040	: 0);
277 	r |=	((l &   IGNCR) ? 0x00000080	: 0);
278 	r |=	((l &   ICRNL) ? 0x00000100	: 0);
279 	/*	((l &   IUCLC) ? 0x00000200	: 0) */
280 	r |=	((l &    IXON) ? 0x00000400	: 0);
281 	r |=	((l &   IXANY) ? 0x00000800	: 0);
282 	r |=	((l &   IXOFF) ? 0x00001000	: 0);
283 	r |=	((l & IMAXBEL) ? 0x00002000	: 0);
284 	st->c_iflag = r;
285 
286 	l = bt->c_oflag;
287 	r =	((l &   OPOST) ? 0x00000001	: 0);
288 	/*	((l &   OLCUC) ? 0x00000002	: 0) */
289 	r |=	((l &   ONLCR) ? 0x00000004	: 0);
290 	/*	((l &   OCRNL) ? 0x00000008	: 0) */
291 	/*	((l &   ONOCR) ? 0x00000010	: 0) */
292 	/*	((l &  ONLRET) ? 0x00000020	: 0) */
293 	/*	((l &   OFILL) ? 0x00000040	: 0) */
294 	/*	((l &   OFDEL) ? 0x00000080	: 0) */
295 	/*	((l &   NLDLY) ? 0x00000100	: 0) */
296 	/*	((l &     NL1) ? 0x00000100	: 0) */
297 	/*	((l &   CRDLY) ? 0x00000600	: 0) */
298 	/*	((l &     CR1) ? 0x00000200	: 0) */
299 	/*	((l &     CR2) ? 0x00000400	: 0) */
300 	/*	((l &     CR3) ? 0x00000600	: 0) */
301 	/*	((l &  TABDLY) ? 0x00001800	: 0) */
302 	/*	((l &    TAB1) ? 0x00000800	: 0) */
303 	/*	((l &    TAB2) ? 0x00001000	: 0) */
304 	r |=	((l &  OXTABS) ? 0x00001800	: 0);
305 	/*	((l &   BSDLY) ? 0x00002000	: 0) */
306 	/*	((l &     BS1) ? 0x00002000	: 0) */
307 	/*	((l &   VTDLY) ? 0x00004000	: 0) */
308 	/*	((l &     VT1) ? 0x00004000	: 0) */
309 	/*	((l &   FFDLY) ? 0x00008000	: 0) */
310 	/*	((l &     FF1) ? 0x00008000	: 0) */
311 	/*	((l & PAGEOUT) ? 0x00010000	: 0) */
312 	/*	((l &    WRAP) ? 0x00020000	: 0) */
313 	st->c_oflag = r;
314 
315 	l = bt->c_cflag;
316 	switch (l & CSIZE) {
317 	case CS5:
318 		r = 0;
319 		break;
320 	case CS6:
321 		r = 0x00000010;
322 		break;
323 	case CS7:
324 		r = 0x00000020;
325 		break;
326 	case CS8:
327 		r = 0x00000030;
328 		break;
329 	}
330 	r |=	((l &  CSTOPB) ? 0x00000040	: 0);
331 	r |=	((l &   CREAD) ? 0x00000080	: 0);
332 	r |=	((l &  PARENB) ? 0x00000100	: 0);
333 	r |=	((l &  PARODD) ? 0x00000200	: 0);
334 	r |=	((l &   HUPCL) ? 0x00000400	: 0);
335 	r |=	((l &  CLOCAL) ? 0x00000800	: 0);
336 	/*	((l &   LOBLK) ? 0x00001000	: 0) */
337 	r |=	((l & (CRTS_IFLOW|CCTS_OFLOW)) ? 0x80000000 : 0);
338 	st->c_cflag = r;
339 
340 	l = bt->c_lflag;
341 	r =	((l &    ISIG) ? 0x00000001	: 0);
342 	r |=	((l &  ICANON) ? 0x00000002	: 0);
343 	/*	((l &   XCASE) ? 0x00000004	: 0) */
344 	r |=	((l &    ECHO) ? 0x00000008	: 0);
345 	r |=	((l &   ECHOE) ? 0x00000010	: 0);
346 	r |=	((l &   ECHOK) ? 0x00000020	: 0);
347 	r |=	((l &  ECHONL) ? 0x00000040	: 0);
348 	r |=	((l &  NOFLSH) ? 0x00000080	: 0);
349 	r |=	((l &  TOSTOP) ? 0x00000100	: 0);
350 	r |=	((l & ECHOCTL) ? 0x00000200	: 0);
351 	r |=	((l & ECHOPRT) ? 0x00000400	: 0);
352 	r |=	((l &  ECHOKE) ? 0x00000800	: 0);
353 	/*	((l & DEFECHO) ? 0x00001000	: 0) */
354 	r |=	((l &  FLUSHO) ? 0x00002000	: 0);
355 	r |=	((l &  PENDIN) ? 0x00004000	: 0);
356 	st->c_lflag = r;
357 
358 	l = ttspeedtab(bt->c_ospeed, sptab);
359 	if (l >= 0)
360 		st->c_cflag |= l;
361 
362 	st->c_cc[0] = NATIVE_TO_EMUL_CC(bt->c_cc[VINTR]);
363 	st->c_cc[1] = NATIVE_TO_EMUL_CC(bt->c_cc[VQUIT]);
364 	st->c_cc[2] = NATIVE_TO_EMUL_CC(bt->c_cc[VERASE]);
365 	st->c_cc[3] = NATIVE_TO_EMUL_CC(bt->c_cc[VKILL]);
366 	st->c_cc[4] = NATIVE_TO_EMUL_CC(bt->c_cc[VEOF]);
367 	st->c_cc[5] = NATIVE_TO_EMUL_CC(bt->c_cc[VEOL]);
368 	st->c_cc[6] = NATIVE_TO_EMUL_CC(bt->c_cc[VEOL2]);
369 #ifdef CMOPAT_ULTRIX
370 	st->c_cc[7] = NATIVE_TO_EMUL_CC(bt->c_cc[VSWTCH]);
371 #else
372 	st->c_cc[7] = 0;
373 #endif
374 	st->c_cc[10] = NATIVE_TO_EMUL_CC(bt->c_cc[VSTART]);
375 	st->c_cc[11] = NATIVE_TO_EMUL_CC(bt->c_cc[VSTOP]);
376 	st->c_cc[12]= NATIVE_TO_EMUL_CC(bt->c_cc[VSUSP]);
377 	st->c_cc[13]= NATIVE_TO_EMUL_CC(bt->c_cc[VDSUSP]);
378 	st->c_cc[14]= NATIVE_TO_EMUL_CC(bt->c_cc[VREPRINT]);
379 	st->c_cc[15]= NATIVE_TO_EMUL_CC(bt->c_cc[VDISCARD]);
380 	st->c_cc[16]= NATIVE_TO_EMUL_CC(bt->c_cc[VWERASE]);
381 	st->c_cc[17]= NATIVE_TO_EMUL_CC(bt->c_cc[VLNEXT]);
382 	st->c_cc[18]= NATIVE_TO_EMUL_CC(bt->c_cc[VSTATUS]);
383 
384 #ifdef COMPAT_ULTRIX
385 	st->c_cc[8]= NATIVE_TO_EMUL_CC(bt->c_cc[VMIN]);
386 	st->c_cc[9]= NATIVE_TO_EMUL_CC(bt->c_cc[VTIME]);
387 #else
388 	if (!(bt->c_lflag & ICANON)) {
389 		/* SunOS stores VMIN/VTIME in VEOF/VEOL (if ICANON is off) */
390 		st->c_cc[4] = bt->c_cc[VMIN];
391 		st->c_cc[5] = bt->c_cc[VTIME];
392 	}
393 #endif
394 
395 #ifdef COMPAT_SUNOS
396 	st->c_line = 0;	/* 4.3bsd "old" line discipline */
397 #else
398 	st->c_line = 2;	/* 4.3bsd "new" line discipline */
399 #endif
400 }
401 
402 #define TERMIO_NCC 10	/* ultrix termio NCC is 10 */
403 
404 /*
405  * Convert emulated struct termios to termio(?)
406  */
407 static void
408 stios2stio(ts, t)
409 	struct emul_termios *ts;
410 	struct emul_termio *t;
411 {
412 	t->c_iflag = ts->c_iflag;
413 	t->c_oflag = ts->c_oflag;
414 	t->c_cflag = ts->c_cflag;
415 	t->c_lflag = ts->c_lflag;
416 	t->c_line  = ts->c_line;
417 	bcopy(ts->c_cc, t->c_cc, TERMIO_NCC);
418 }
419 
420 /*
421  * Convert the other way
422  */
423 static void
424 stio2stios(t, ts)
425 	struct emul_termio *t;
426 	struct emul_termios *ts;
427 {
428 	ts->c_iflag = t->c_iflag;
429 	ts->c_oflag = t->c_oflag;
430 	ts->c_cflag = t->c_cflag;
431 	ts->c_lflag = t->c_lflag;
432 	ts->c_line  = t->c_line;
433 	bcopy(t->c_cc, ts->c_cc, TERMIO_NCC); /* don't touch the upper fields! */
434 }
435 
436 int
437 ultrix_sys_ioctl(p, v, retval)
438 	register struct proc *p;
439 	void *v;
440 	register_t *retval;
441 {
442 	struct ultrix_sys_ioctl_args *uap = v;
443 	register struct filedesc *fdp = p->p_fd;
444 	register struct file *fp;
445 	register int (*ctl)();
446 	int error;
447 
448 	if ( (unsigned)SCARG(uap, fd) >= fdp->fd_nfiles ||
449 	    (fp = fdp->fd_ofiles[SCARG(uap, fd)]) == NULL)
450 		return EBADF;
451 
452 	if ((fp->f_flag & (FREAD|FWRITE)) == 0)
453 		return EBADF;
454 
455 	ctl = fp->f_ops->fo_ioctl;
456 
457 	switch (SCARG(uap, com)) {
458 	case _IOR('t', 0, int):
459 		SCARG(uap, com) = TIOCGETD;
460 		break;
461 	case _IOW('t', 1, int):
462 	    {
463 		int disc;
464 
465 		if ((error = copyin(SCARG(uap, data), (caddr_t)&disc,
466 		    sizeof disc)) != 0)
467 			return error;
468 
469 		/* map SunOS NTTYDISC into our termios discipline */
470 		if (disc == 2)
471 			disc = 0;
472 		/* all other disciplines are not supported by NetBSD */
473 		if (disc)
474 			return ENXIO;
475 
476 		return (*ctl)(fp, TIOCSETD, (caddr_t)&disc, p);
477 	    }
478 	case _IOW('t', 101, int):	/* sun SUNOS_TIOCSSOFTCAR */
479 	    {
480 		int x;	/* unused */
481 
482 		return copyin((caddr_t)&x, SCARG(uap, data), sizeof x);
483 	    }
484 	case _IOR('t', 100, int):	/* sun SUNOS_TIOCSSOFTCAR */
485 	    {
486 		int x = 0;
487 
488 		return copyout((caddr_t)&x, SCARG(uap, data), sizeof x);
489 	    }
490 	case _IO('t', 36): 		/* sun TIOCCONS, no parameters */
491 	    {
492 		int on = 1;
493 		return (*ctl)(fp, TIOCCONS, (caddr_t)&on, p);
494 	    }
495 	case _IOW('t', 37, struct sunos_ttysize):
496 	    {
497 		struct winsize ws;
498 		struct sunos_ttysize ss;
499 
500 		if ((error = (*ctl)(fp, TIOCGWINSZ, (caddr_t)&ws, p)) != 0)
501 			return (error);
502 
503 		if ((error = copyin (SCARG(uap, data), &ss, sizeof (ss))) != 0)
504 			return error;
505 
506 		ws.ws_row = ss.ts_row;
507 		ws.ws_col = ss.ts_col;
508 
509 		return ((*ctl)(fp, TIOCSWINSZ, (caddr_t)&ws, p));
510 	    }
511 	case _IOW('t', 38, struct sunos_ttysize):
512 	    {
513 		struct winsize ws;
514 		struct sunos_ttysize ss;
515 
516 		if ((error = (*ctl)(fp, TIOCGWINSZ, (caddr_t)&ws, p)) != 0)
517 			return (error);
518 
519 		ss.ts_row = ws.ws_row;
520 		ss.ts_col = ws.ws_col;
521 
522 		return copyout ((caddr_t)&ss, SCARG(uap, data), sizeof (ss));
523 	    }
524 	case _IOW('t', 130, int):
525 		SCARG(uap, com) = TIOCSPGRP;
526 		break;
527 	case _IOR('t', 131, int):
528 		SCARG(uap, com) = TIOCGPGRP;
529 		break;
530 	case _IO('t', 132):
531 		SCARG(uap, com) = TIOCSCTTY;
532 		break;
533 	/* Emulate termio or termios tcget() */
534 	case ULTRIX_TCGETA:
535 	case ULTRIX_TCGETS:
536 	    {
537 		struct termios bts;
538 		struct ultrix_termios sts;
539 		struct ultrix_termio st;
540 
541 		if ((error = (*ctl)(fp, TIOCGETA, (caddr_t)&bts, p)) != 0)
542 			return error;
543 
544 		btios2stios (&bts, &sts);
545 		if (SCARG(uap, com) == ULTRIX_TCGETA) {
546 			stios2stio (&sts, &st);
547 			return copyout((caddr_t)&st, SCARG(uap, data),
548 			    sizeof (st));
549 		} else
550 			return copyout((caddr_t)&sts, SCARG(uap, data),
551 			    sizeof (sts));
552 		/*NOTREACHED*/
553 	    }
554 	/* Emulate termio tcset() */
555 	case ULTRIX_TCSETA:
556 	case ULTRIX_TCSETAW:
557 	case ULTRIX_TCSETAF:
558 	    {
559 		struct termios bts;
560 		struct ultrix_termios sts;
561 		struct ultrix_termio st;
562 		int result;
563 
564 		if ((error = copyin(SCARG(uap, data), (caddr_t)&st,
565 		    sizeof (st))) != 0)
566 			return error;
567 
568 		/* get full BSD termios so we don't lose information */
569 		if ((error = (*ctl)(fp, TIOCGETA, (caddr_t)&bts, p)) != 0)
570 			return error;
571 
572 		/*
573 		 * convert to sun termios, copy in information from
574 		 * termio, and convert back, then set new values.
575 		 */
576 		btios2stios(&bts, &sts);
577 		stio2stios(&st, &sts);
578 		stios2btios(&sts, &bts);
579 
580 		/*
581 		 * map ioctl code: ultrix tcsets are numbered in reverse order
582 		 */
583 #ifdef notyet
584 		return (*ctl)(fp, ULTRIX_TCSETA - SCARG(uap, com) + TIOCSETA,
585 		    (caddr_t)&bts, p);
586 #else
587 		result= (*ctl)(fp, ULTRIX_TCSETA -  SCARG(uap, com) + TIOCSETA,
588 		    (caddr_t)&bts, p);
589 		printf("ultrix TCSETA %lx returns %d\n",
590 		       ULTRIX_TCSETA - SCARG(uap, com), result);
591 		return result;
592 #endif
593 
594 	    }
595 	/* Emulate termios tcset() */
596 	case ULTRIX_TCSETS:
597 	case ULTRIX_TCSETSW:
598 	case ULTRIX_TCSETSF:
599 	    {
600 		struct termios bts;
601 		struct ultrix_termios sts;
602 
603 		if ((error = copyin (SCARG(uap, data), (caddr_t)&sts,
604 		    sizeof (sts))) != 0)
605 			return error;
606 		stios2btios (&sts, &bts);
607 		return (*ctl)(fp, ULTRIX_TCSETS - SCARG(uap, com) + TIOCSETA,
608 		    (caddr_t)&bts, p);
609 	    }
610 /*
611  * Pseudo-tty ioctl translations.
612  */
613 	case _IOW('t', 32, int): {	/* TIOCTCNTL */
614 		int error, on;
615 
616 		error = copyin (SCARG(uap, data), (caddr_t)&on, sizeof (on));
617 		if (error != 0)
618 			return error;
619 		return (*ctl)(fp, TIOCUCNTL, (caddr_t)&on, p);
620 	}
621 	case _IOW('t', 33, int): {	/* TIOCSIGNAL */
622 		int error, sig;
623 
624 		error = copyin (SCARG(uap, data), (caddr_t)&sig, sizeof (sig));
625 		if (error != 0)
626 			return error;
627 		return (*ctl)(fp, TIOCSIG, (caddr_t)&sig, p);
628 	}
629 
630 /*
631  * Socket ioctl translations.
632  */
633 #define IN_TYPE(a, type_t) { \
634 	type_t localbuf; \
635 	if ((error = copyin (SCARG(uap, data), \
636 				(caddr_t)&localbuf, sizeof (type_t))) != 0) \
637 		return error; \
638 	return (*ctl)(fp, a, (caddr_t)&localbuf, p); \
639 }
640 
641 #define INOUT_TYPE(a, type_t) { \
642 	type_t localbuf; \
643 	if ((error = copyin (SCARG(uap, data), (caddr_t)&localbuf,	\
644 			     sizeof (type_t))) != 0) \
645 		return error; \
646 	if ((error = (*ctl)(fp, a, (caddr_t)&localbuf, p)) != 0) \
647 		return error; \
648 	return copyout ((caddr_t)&localbuf, SCARG(uap, data), sizeof (type_t)); \
649 }
650 
651 
652 #define IFREQ_IN(a) { \
653 	struct ifreq ifreq; \
654 	if ((error = copyin (SCARG(uap, data), (caddr_t)&ifreq, sizeof (ifreq))) != 0) \
655 		return error; \
656 	return (*ctl)(fp, a, (caddr_t)&ifreq, p); \
657 }
658 
659 #define IFREQ_INOUT(a) { \
660 	struct ifreq ifreq; \
661 	if ((error = copyin (SCARG(uap, data), (caddr_t)&ifreq, sizeof (ifreq))) != 0) \
662 		return error; \
663 	if ((error = (*ctl)(fp, a, (caddr_t)&ifreq, p)) != 0) \
664 		return error; \
665 	return copyout ((caddr_t)&ifreq, SCARG(uap, data), sizeof (ifreq)); \
666 }
667 
668 	case _IOW('i', 12, struct ifreq):
669 		/* SIOCSIFADDR */
670 		break;
671 
672 	case _IOWR('i', 13, struct ifreq):
673 		IFREQ_INOUT(OSIOCGIFADDR);
674 
675 	case _IOW('i', 14, struct ifreq):
676 		/* SIOCSIFDSTADDR */
677 		break;
678 
679 	case _IOWR('i', 15, struct ifreq):
680 		IFREQ_INOUT(OSIOCGIFDSTADDR);
681 
682 	case _IOW('i', 16, struct ifreq):
683 		/* SIOCSIFFLAGS */
684 		break;
685 
686 	case _IOWR('i', 17, struct ifreq):
687 		/* SIOCGIFFLAGS */
688 		break;
689 
690 	case _IOW('i', 21, struct ifreq):
691 		IFREQ_IN(SIOCSIFMTU);
692 
693 	case _IOWR('i', 22, struct ifreq):
694 		IFREQ_INOUT(SIOCGIFMTU);
695 
696 	case _IOWR('i', 23, struct ifreq):
697 		IFREQ_INOUT(SIOCGIFBRDADDR);
698 
699 	case _IOW('i', 24, struct ifreq):
700 		IFREQ_IN(SIOCSIFBRDADDR);
701 
702 	case _IOWR('i', 25, struct ifreq):
703 		IFREQ_INOUT(OSIOCGIFNETMASK);
704 
705 	case _IOW('i', 26, struct ifreq):
706 		IFREQ_IN(SIOCSIFNETMASK);
707 
708 	case _IOWR('i', 27, struct ifreq):
709 		IFREQ_INOUT(SIOCGIFMETRIC);
710 
711 	case _IOWR('i', 28, struct ifreq):
712 		IFREQ_IN(SIOCSIFMETRIC);
713 
714 	case _IOW('i', 30, struct arpreq):
715 		/* SIOCSARP */
716 		break;
717 
718 	case _IOWR('i', 31, struct arpreq):
719 		/* SIOCGARP */
720 		break;
721 
722 	case _IOW('i', 32, struct arpreq):
723 		/* SIOCDARP */
724 		break;
725 
726 	case _IOW('i', 18, struct ifreq):	/* SIOCSIFMEM */
727 	case _IOWR('i', 19, struct ifreq):	/* SIOCGIFMEM */
728 	case _IOW('i', 40, struct ifreq):	/* SIOCUPPER */
729 	case _IOW('i', 41, struct ifreq):	/* SIOCLOWER */
730 	case _IOW('i', 44, struct ifreq):	/* SIOCSETSYNC */
731 	case _IOWR('i', 45, struct ifreq):	/* SIOCGETSYNC */
732 	case _IOWR('i', 46, struct ifreq):	/* SIOCSDSTATS */
733 	case _IOWR('i', 47, struct ifreq):	/* SIOCSESTATS */
734 	case _IOW('i', 48, int):		/* SIOCSPROMISC */
735 	case _IOW('i', 49, struct ifreq):	/* SIOCADDMULTI */
736 	case _IOW('i', 50, struct ifreq):	/* SIOCDELMULTI */
737 		return EOPNOTSUPP;
738 
739 	case _IOWR('i', 20, struct ifconf):	/* SIOCGIFCONF */
740 	    {
741 		struct ifconf ifconf;
742 
743 		/*
744 		 * XXX: two more problems
745 		 * 1. our sockaddr's are variable length, not always sizeof(sockaddr)
746 		 * 2. this returns a name per protocol, ie. it returns two "lo0"'s
747 		 */
748 		if ((error = copyin (SCARG(uap, data), (caddr_t)&ifconf,
749 				     sizeof (ifconf))) != 0)
750 			return error;
751 		if ((error = (*ctl)(fp, OSIOCGIFCONF,
752 				    * (caddr_t)&ifconf, p)) !=0 )
753 			return error;
754 		return copyout ((caddr_t)&ifconf, SCARG(uap, data),
755 		    sizeof (ifconf));
756 	    }
757 
758 	}
759 	return (sys_ioctl(p, uap, retval));
760 }
761