proc->thread stage 4: rework the VFS and DEVICE subsystems to take thread
[dragonfly.git] / sys / emulation / svr4 / svr4_ioctl.c
1 /*
2  * Copyright (c) 1998 Mark Newton
3  * Copyright (c) 1994 Christos Zoulas
4  * All rights reserved.
5  *
6  * Redistribution and use in source and binary forms, with or without
7  * modification, are permitted provided that the following conditions
8  * are met:
9  * 1. Redistributions of source code must retain the above copyright
10  *    notice, this list of conditions and the following disclaimer.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software without specific prior written permission
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  * 
28  * $FreeBSD: src/sys/svr4/svr4_ioctl.c,v 1.6 1999/12/08 12:00:48 newton Exp $
29  * $DragonFly: src/sys/emulation/svr4/Attic/svr4_ioctl.c,v 1.6 2003/06/25 03:56:09 dillon Exp $
30  */
31
32 #include <sys/param.h>
33 #include <sys/proc.h>
34 #include <sys/file.h>
35 #include <sys/filedesc.h>
36 #include <sys/fcntl.h>
37 #include <sys/socket.h>
38 #include <sys/socketvar.h>
39 #include <sys/systm.h>
40
41 #include <svr4/svr4.h>
42 #include <svr4/svr4_types.h>
43 #include <svr4/svr4_util.h>
44 #include <svr4/svr4_signal.h>
45 #include <svr4/svr4_proto.h>
46 #include <svr4/svr4_stropts.h>
47 #include <svr4/svr4_ioctl.h>
48 #include <svr4/svr4_termios.h>
49 #include <svr4/svr4_ttold.h>
50 #include <svr4/svr4_filio.h>
51 #include <svr4/svr4_sockio.h>
52
53 #ifdef DEBUG_SVR4
54 static void svr4_decode_cmd __P((u_long, char *, char *, int *, int *));
55 /*
56  * Decode an ioctl command symbolically
57  */
58 static void
59 svr4_decode_cmd(cmd, dir, c, num, argsiz)
60         u_long            cmd;
61         char             *dir, *c;
62         int              *num, *argsiz;
63 {
64         if (cmd & SVR4_IOC_VOID)
65                 *dir++ = 'V';
66         if (cmd & SVR4_IOC_IN)
67                 *dir++ = 'R';
68         if (cmd & SVR4_IOC_OUT)
69                 *dir++ = 'W';
70         *dir = '\0';
71         if (cmd & SVR4_IOC_INOUT)
72                 *argsiz = (cmd >> 16) & 0xff;
73         else
74                 *argsiz = -1;
75
76         *c = (cmd >> 8) & 0xff;
77         *num = cmd & 0xff;
78 }
79 #endif
80
81 int
82 svr4_sys_ioctl(struct svr4_sys_ioctl_args *uap)
83 {
84         struct thread   *td = curthread;
85         struct proc     *p = td->td_proc;
86         int             *retval;
87         struct file     *fp;
88         struct filedesc *fdp;
89         u_long           cmd;
90         int (*fun) __P((struct file *, struct thread *, register_t *,
91                         int, u_long, caddr_t));
92 #ifdef DEBUG_SVR4
93         char             dir[4];
94         char             c;
95         int              num;
96         int              argsiz;
97
98         KKASSERT(p);
99
100         svr4_decode_cmd(SCARG(uap, com), dir, &c, &num, &argsiz);
101
102         DPRINTF(("svr4_ioctl[%lx](%d, _IO%s(%c, %d, %d), %p);\n",
103             SCARG(uap, com), SCARG(uap, fd),
104             dir, c, num, argsiz, SCARG(uap, data)));
105 #endif
106         retval = p->p_retval;
107         fdp = p->p_fd;
108         cmd = SCARG(uap, com);
109
110         if ((u_int)SCARG(uap, fd) >= fdp->fd_nfiles ||
111             (fp = fdp->fd_ofiles[SCARG(uap, fd)]) == NULL)
112                 return EBADF;
113
114         if ((fp->f_flag & (FREAD | FWRITE)) == 0)
115                 return EBADF;
116
117 #if defined(DEBUG_SVR4)
118         if (fp->f_type == DTYPE_SOCKET) {
119                 struct socket *so = (struct socket *)fp->f_data;
120                 DPRINTF(("<<< IN: so_state = 0x%x\n", so->so_state));
121         }
122 #endif
123
124         switch (cmd & 0xff00) {
125         case SVR4_tIOC:
126                 DPRINTF(("ttold\n"));
127                 fun = svr4_ttold_ioctl;
128                 break;
129
130         case SVR4_TIOC:
131                 DPRINTF(("term\n"));
132                 fun = svr4_term_ioctl;
133                 break;
134
135         case SVR4_STR:
136                 DPRINTF(("stream\n"));
137                 fun = svr4_stream_ioctl;
138                 break;
139
140         case SVR4_FIOC:
141                 DPRINTF(("file\n"));
142                 fun = svr4_fil_ioctl;
143                 break;
144
145         case SVR4_SIOC:
146                 DPRINTF(("socket\n"));
147                 fun = svr4_sock_ioctl;
148                 break;
149
150         case SVR4_XIOC:
151                 /* We do not support those */
152                 return EINVAL;
153
154         default:
155                 DPRINTF(("Unimplemented ioctl %lx\n", cmd));
156                 return 0;       /* XXX: really ENOSYS */
157         }
158 #if defined(DEBUG_SVR4)
159         if (fp->f_type == DTYPE_SOCKET) {
160                 struct socket *so = (struct socket *)fp->f_data;
161                 DPRINTF((">>> OUT: so_state = 0x%x\n", so->so_state));
162         }
163 #endif
164         return (*fun)(fp, td, retval, SCARG(uap, fd), cmd, SCARG(uap, data));
165 }