sys/compat/svr4_32/svr4_32_ioctl.c

   1 /*      $NetBSD: svr4_32_ioctl.c,v 1.21 2008/04/28 20:23:46 martin Exp $         */
   2
   3 /*-
   4  * Copyright (c) 1994, 2008 The NetBSD Foundation, Inc.
   5  * All rights reserved.
   6  *
   7  * This code is derived from software contributed to The NetBSD Foundation
   8  * by Christos Zoulas.
   9  *
  10  * Redistribution and use in source and binary forms, with or without
  11  * modification, are permitted provided that the following conditions
  12  * are met:
  13  * 1. Redistributions of source code must retain the above copyright
  14  *    notice, this list of conditions and the following disclaimer.
  15  * 2. Redistributions in binary form must reproduce the above copyright
  16  *    notice, this list of conditions and the following disclaimer in the
  17  *    documentation and/or other materials provided with the distribution.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
  20  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
  21  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
  22  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
  23  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
  24  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
  25  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
  26  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
  27  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
  28  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
  29  * POSSIBILITY OF SUCH DAMAGE.
  30  */
  31
  32 #include <sys/cdefs.h>
  33 __KERNEL_RCSID(0, "$NetBSD: svr4_32_ioctl.c,v 1.21 2008/04/28 20:23:46 martin Exp $");
  34
  35 #include <sys/param.h>
  36 #include <sys/proc.h>
  37 #include <sys/systm.h>
  38 #include <sys/file.h>
  39 #include <sys/filedesc.h>
  40 #include <sys/ioctl.h>
  41 #include <sys/termios.h>
  42 #include <sys/tty.h>
  43 #include <sys/socket.h>
  44 #include <sys/mount.h>
  45 #include <net/if.h>
  46 #include <sys/malloc.h>
  47
  48 #include <sys/syscallargs.h>
  49
  50 #include <compat/sys/socket.h>
  51
  52 #include <compat/svr4_32/svr4_32_types.h>
  53 #include <compat/svr4_32/svr4_32_util.h>
  54 #include <compat/svr4_32/svr4_32_signal.h>
  55 #include <compat/svr4_32/svr4_32_lwp.h>
  56 #include <compat/svr4_32/svr4_32_ucontext.h>
  57 #include <compat/svr4_32/svr4_32_syscallargs.h>
  58 #include <compat/svr4_32/svr4_32_stropts.h>
  59 #include <compat/svr4_32/svr4_32_ioctl.h>
  60 #include <compat/svr4_32/svr4_32_termios.h>
  61 #include <compat/svr4/svr4_ttold.h>
  62 #include <compat/svr4/svr4_filio.h>
  63 #include <compat/svr4_32/svr4_32_sockio.h>
  64
  65
  66 #ifdef DEBUG_SVR4
  67 static void svr4_32_decode_cmd(netbsd32_u_long, char *, char *, int *, int *);
  68 /*
  69  * Decode an ioctl command symbolically
  70  */
  71 static void
  72 svr4_32_decode_cmd(netbsd32_u_long cmd, char *dir, char *c, int *num, int *argsiz)
  73 {
  74         if (cmd & SVR4_IOC_VOID)
  75                 *dir++ = 'V';
  76         if (cmd & SVR4_IOC_IN)
  77                 *dir++ = 'R';
  78         if (cmd & SVR4_IOC_OUT)
  79                 *dir++ = 'W';
  80         *dir = '\0';
  81         if (cmd & SVR4_IOC_INOUT)
  82                 *argsiz = (cmd >> 16) & 0xff;
  83         else
  84                 *argsiz = -1;
  85
  86         *c = (cmd >> 8) & 0xff;
  87         *num = cmd & 0xff;
  88 }
  89 #endif
  90
  91 int
  92 svr4_32_sys_ioctl(struct lwp *l, const struct svr4_32_sys_ioctl_args *uap, register_t *retval)
  93 {
  94         file_t          *fp;
  95         u_long           cmd;
  96         int error;
  97         int (*fun)(file_t *, struct lwp *, register_t *, int, u_long, void *);
  98 #ifdef DEBUG_SVR4
  99         char             dir[4];
 100         char             c;
 101         int              num;
 102         int              argsiz;
 103
 104         svr4_32_decode_cmd(SCARG(uap, com), dir, &c, &num, &argsiz);
 105
 106         uprintf("svr4_32_ioctl(%d, _IO%s(%c, %d, %d), %#x);\n", SCARG(uap, fd),
 107             dir, c, num, argsiz, SCARG(uap, data));
 108 #endif
 109         cmd = SCARG(uap, com);
 110
 111         if ((fp = fd_getfile(SCARG(uap, fd))) == NULL)
 112                 return EBADF;
 113
 114         if ((fp->f_flag & (FREAD | FWRITE)) == 0) {
 115                 fd_putfile(SCARG(uap, fd));
 116                 return EBADF;
 117         }
 118
 119         switch (cmd & 0xff00) {
 120         case SVR4_tIOC:
 121                 fun = svr4_ttold_ioctl;
 122                 break;
 123
 124         case SVR4_TIOC:
 125                 fun = svr4_32_term_ioctl;
 126                 break;
 127
 128         case SVR4_STR:
 129                 fun = svr4_32_stream_ioctl;
 130                 break;
 131
 132         case SVR4_FIOC:
 133                 fun = svr4_fil_ioctl;
 134                 break;
 135
 136         case SVR4_SIOC:
 137                 fun = svr4_32_sock_ioctl;
 138                 break;
 139
 140         case SVR4_XIOC:
 141                 /* We do not support those */
 142                 fd_putfile(SCARG(uap, fd));
 143                 return EINVAL;
 144
 145         default:
 146                 DPRINTF(("Unimplemented ioctl %lx\n", cmd));
 147                 fd_putfile(SCARG(uap, fd));
 148                 return 0;       /* XXX: really ENOSYS */
 149         }
 150         error = (*fun)(fp, l, retval, SCARG(uap, fd), cmd, SCARG_P32(uap, data));
 151         fd_putfile(SCARG(uap, fd));
 152         return error;
 153 }