Home | History | Annotate | Line # | Download | only in common
uipc_syscalls_43.c revision 1.34
      1 /*	$NetBSD: uipc_syscalls_43.c,v 1.34 2007/08/20 16:52:59 martin Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 1982, 1986, 1989, 1990, 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  *	@(#)uipc_syscalls.c	8.4 (Berkeley) 2/21/94
     32  */
     33 
     34 #include <sys/cdefs.h>
     35 __KERNEL_RCSID(0, "$NetBSD: uipc_syscalls_43.c,v 1.34 2007/08/20 16:52:59 martin Exp $");
     36 
     37 #include <sys/param.h>
     38 #include <sys/systm.h>
     39 #include <sys/filedesc.h>
     40 #include <sys/kernel.h>
     41 #include <sys/proc.h>
     42 #include <sys/file.h>
     43 #include <sys/socket.h>
     44 #include <sys/socketvar.h>
     45 #include <sys/stat.h>
     46 #include <sys/ioctl.h>
     47 #include <sys/fcntl.h>
     48 #include <sys/malloc.h>
     49 #include <sys/syslog.h>
     50 #include <sys/unistd.h>
     51 #include <sys/resourcevar.h>
     52 #include <sys/mbuf.h>		/* for MLEN */
     53 #include <sys/protosw.h>
     54 
     55 #include <sys/mount.h>
     56 #include <sys/syscallargs.h>
     57 
     58 #include <net/if.h>
     59 #include <compat/sys/socket.h>
     60 #include <compat/sys/sockio.h>
     61 
     62 #include <compat/common/compat_util.h>
     63 
     64 #include <uvm/uvm_extern.h>
     65 
     66 /*
     67  * Following 4.3 syscalls were not versioned, even through they should
     68  * have been:
     69  * connect(2), bind(2), sendto(2)
     70  */
     71 
     72 static int compat_43_sa_put(void *);
     73 
     74 int
     75 compat_43_sys_accept(struct lwp *l, void *v, register_t *retval)
     76 {
     77 	struct compat_43_sys_accept_args /* {
     78 		syscallarg(int) s;
     79 		syscallarg(void *) name;
     80 		syscallarg(int *) anamelen;
     81 	} */ *uap = v;
     82 	int error;
     83 
     84 	if ((error = sys_accept(l, v, retval)) != 0)
     85 		return error;
     86 
     87 	if (SCARG(uap, name)
     88 	    && (error = compat_43_sa_put(SCARG(uap, name))))
     89 		return (error);
     90 
     91 	return 0;
     92 }
     93 
     94 int
     95 compat_43_sys_getpeername(struct lwp *l, void *v, register_t *retval)
     96 {
     97 	struct compat_43_sys_getpeername_args /* {
     98 		syscallarg(int) fdes;
     99 		syscallarg(void *) asa;
    100 		syscallarg(int *) alen;
    101 	} */ *uap = v;
    102 
    103 	int error;
    104 
    105 	if ((error = sys_getpeername(l, v, retval)) != 0)
    106 		return error;
    107 
    108 	if ((error = compat_43_sa_put(SCARG(uap, asa))))
    109 		return (error);
    110 
    111 	return 0;
    112 }
    113 
    114 int
    115 compat_43_sys_getsockname(struct lwp *l, void *v, register_t *retval)
    116 {
    117 	struct compat_43_sys_getsockname_args /* {
    118 		syscallarg(int) fdes;
    119 		syscallarg(void *) asa;
    120 		syscallarg(int *) alen;
    121 	} */ *uap = v;
    122 	int error;
    123 
    124 	if ((error = sys_getsockname(l, v, retval)) != 0)
    125 		return error;
    126 
    127 	if ((error = compat_43_sa_put(SCARG(uap, asa))))
    128 		return (error);
    129 
    130 	return 0;
    131 }
    132 
    133 int
    134 compat_43_sys_recv(struct lwp *l, void *v, register_t *retval)
    135 {
    136 	struct compat_43_sys_recv_args /* {
    137 		syscallarg(int) s;
    138 		syscallarg(void *) buf;
    139 		syscallarg(int) len;
    140 		syscallarg(int) flags;
    141 	} */ *uap = v;
    142 	struct sys_recvfrom_args bra;
    143 
    144 	SCARG(&bra, s) = SCARG(uap, s);
    145 	SCARG(&bra, buf) = SCARG(uap, buf);
    146 	SCARG(&bra, len) = (size_t) SCARG(uap, len);
    147 	SCARG(&bra, flags) = SCARG(uap, flags);
    148 	SCARG(&bra, from) = NULL;
    149 	SCARG(&bra, fromlenaddr) = NULL;
    150 
    151 	return (sys_recvfrom(l, &bra, retval));
    152 }
    153 
    154 int
    155 compat_43_sys_recvfrom(struct lwp *l, void *v, register_t *retval)
    156 {
    157 	struct compat_43_sys_recvfrom_args /* {
    158 		syscallarg(int) s;
    159 		syscallarg(void *) buf;
    160 		syscallarg(size_t) len;
    161 		syscallarg(int) flags;
    162 		syscallarg(void *) from;
    163 		syscallarg(int *) fromlenaddr;
    164 	} */ *uap = v;
    165 	int error;
    166 
    167 	if ((error = sys_recvfrom(l, v, retval)))
    168 		return (error);
    169 
    170 	if (SCARG(uap, from) && (error = compat_43_sa_put(SCARG(uap, from))))
    171 		return (error);
    172 
    173 	return (0);
    174 }
    175 
    176 /*
    177  * Old recvmsg. Arrange necessary structures, calls generic code and
    178  * adjusts results accordingly.
    179  */
    180 int
    181 compat_43_sys_recvmsg(struct lwp *l, void *v, register_t *retval)
    182 {
    183 	struct compat_43_sys_recvmsg_args /* {
    184 		syscallarg(int) s;
    185 		syscallarg(struct omsghdr *) msg;
    186 		syscallarg(int) flags;
    187 	} */ *uap = v;
    188 	struct omsghdr omsg;
    189 	struct msghdr msg;
    190 	struct mbuf *from, *control;
    191 	int error;
    192 
    193 	error = copyin(SCARG(uap, msg), &omsg, sizeof (struct omsghdr));
    194 	if (error)
    195 		return (error);
    196 
    197 	if (omsg.msg_accrights == NULL)
    198 		omsg.msg_accrightslen = 0;
    199 	/* it was this way in 4.4BSD */
    200 	if (omsg.msg_accrightslen > MLEN)
    201 		return EINVAL;
    202 
    203 	msg.msg_name	= omsg.msg_name;
    204 	msg.msg_namelen = omsg.msg_namelen;
    205 	msg.msg_iovlen	= omsg.msg_iovlen;
    206 	msg.msg_iov	= omsg.msg_iov;
    207 	msg.msg_flags	= (SCARG(uap, flags) & MSG_USERFLAGS) | MSG_IOVUSRSPACE;
    208 
    209 	error = do_sys_recvmsg(l, SCARG(uap, s), &msg, &from,
    210 	    omsg.msg_accrights != NULL ? &control : NULL, retval);
    211 	if (error != 0)
    212 		return error;
    213 
    214 	/*
    215 	 * If there is any control information and it's SCM_RIGHTS,
    216 	 * pass it back to the program.
    217 	 * XXX: maybe there can be more than one chunk of control data?
    218 	 */
    219 	if (omsg.msg_accrights && control != NULL) {
    220 		struct cmsghdr *cmsg = mtod(control, void *);
    221 
    222 		if (cmsg->cmsg_level == SOL_SOCKET
    223 		    && cmsg->cmsg_type == SCM_RIGHTS
    224 		    && cmsg->cmsg_len < omsg.msg_accrightslen
    225 		    && copyout(CMSG_DATA(cmsg), omsg.msg_accrights,
    226 			    cmsg->cmsg_len) == 0) {
    227 			omsg.msg_accrightslen = cmsg->cmsg_len;
    228 			free_control_mbuf(l, control, control->m_next);
    229 		} else {
    230 			omsg.msg_accrightslen = 0;
    231 			free_control_mbuf(l, control, control);
    232 		}
    233 	} else
    234 		omsg.msg_accrightslen = 0;
    235 
    236 	if (from != NULL)
    237 		/* convert from sockaddr sa_family to osockaddr one here */
    238 		mtod(from, struct osockaddr *)->sa_family =
    239 				    mtod(from, struct sockaddr *)->sa_family;
    240 
    241 	error = copyout_sockname(omsg.msg_name, &omsg.msg_namelen, 0, from);
    242 	if (from != NULL)
    243 		m_free(from);
    244 
    245 	if (error != 0)
    246 		 error = copyout(&omsg, SCARG(uap, msg), sizeof(omsg));
    247 
    248 	return error;
    249 }
    250 
    251 int
    252 compat_43_sys_send(struct lwp *l, void *v, register_t *retval)
    253 {
    254 	struct compat_43_sys_send_args /* {
    255 		syscallarg(int) s;
    256 		syscallarg(void *) buf;
    257 		syscallarg(int) len;
    258 		syscallarg(int) flags;
    259 	} */ *uap = v;
    260 	struct sys_sendto_args bsa;
    261 
    262 	SCARG(&bsa, s)		= SCARG(uap, s);
    263 	SCARG(&bsa, buf)	= SCARG(uap, buf);
    264 	SCARG(&bsa, len)	= SCARG(uap, len);
    265 	SCARG(&bsa, flags)	= SCARG(uap, flags);
    266 	SCARG(&bsa, to)		= NULL;
    267 	SCARG(&bsa, tolen)	= 0;
    268 
    269 	return (sys_sendto(l, &bsa, retval));
    270 }
    271 
    272 int
    273 compat43_set_accrights(struct msghdr *msg, void *accrights, int accrightslen)
    274 {
    275 	struct cmsghdr *cmsg;
    276 	int error;
    277 	struct mbuf *ctl;
    278 	u_int clen;
    279 
    280 	if (accrights == NULL || accrightslen == 0) {
    281 		msg->msg_control = NULL;
    282 		msg->msg_controllen = 0;
    283 		return 0;
    284 	}
    285 
    286 	clen = CMSG_SPACE(accrightslen);
    287 	/* it was (almost) this way in 4.4BSD */
    288 	if (accrightslen < 0 || clen > MLEN)
    289 		return EINVAL;
    290 
    291 	ctl = m_get(M_WAIT, MT_CONTROL);
    292 	ctl->m_len = clen;
    293 	cmsg = mtod(ctl, void *);
    294 	cmsg->cmsg_len		= CMSG_SPACE(accrightslen);
    295 	cmsg->cmsg_level	= SOL_SOCKET;
    296 	cmsg->cmsg_type 	= SCM_RIGHTS;
    297 
    298 	error = copyin(accrights, CMSG_DATA(cmsg), accrightslen);
    299 	if (error) {
    300 		m_free(ctl);
    301 		return error;
    302 	}
    303 
    304 	msg->msg_control = ctl;
    305 	msg->msg_controllen = clen;
    306 	msg->msg_flags |= MSG_CONTROLMBUF;
    307 	return 0;
    308 }
    309 
    310 /*
    311  * Old sendmsg. Arrange necessary structures, call generic code and
    312  * adjust the results accordingly for old code.
    313  */
    314 int
    315 compat_43_sys_sendmsg(struct lwp *l, void *v, register_t *retval)
    316 {
    317 	struct compat_43_sys_sendmsg_args /* {
    318 		syscallarg(int) s;
    319 		syscallarg(void *) msg;
    320 		syscallarg(int) flags;
    321 	} */ *uap = v;
    322 	struct omsghdr omsg;
    323 	struct msghdr msg;
    324 	int error;
    325 	struct mbuf *nam;
    326 	struct osockaddr *osa;
    327 	struct sockaddr *sa;
    328 
    329 	error = copyin(SCARG(uap, msg), &omsg, sizeof (struct omsghdr));
    330 	if (error != 0)
    331 		return (error);
    332 
    333 	msg.msg_iovlen = omsg.msg_iovlen;
    334 	msg.msg_iov = omsg.msg_iov;
    335 
    336 	error = sockargs(&nam, omsg.msg_name, omsg.msg_namelen, MT_SONAME);
    337 	if (error != 0)
    338 		return (error);
    339 
    340 	sa = mtod(nam, void *);
    341 	osa = mtod(nam, void *);
    342 	sa->sa_family = osa->sa_family;
    343 	sa->sa_len = omsg.msg_namelen;
    344 
    345 	msg.msg_flags = MSG_IOVUSRSPACE | MSG_NAMEMBUF;
    346 
    347 	msg.msg_name = nam;
    348 	msg.msg_namelen = omsg.msg_namelen;
    349 	error = compat43_set_accrights(&msg, omsg.msg_accrights,
    350 	    omsg.msg_accrightslen);
    351 	if (error != 0)
    352 		goto bad;
    353 
    354 	return do_sys_sendmsg(l, SCARG(uap, s), &msg, SCARG(uap, flags), retval);
    355 
    356     bad:
    357 	if (nam != NULL)
    358 		m_free(nam);
    359 
    360 	return (error);
    361 }
    362 
    363 static int
    364 compat_43_sa_put(from)
    365 	void *from;
    366 {
    367 	struct osockaddr *osa = (struct osockaddr *) from;
    368 	struct sockaddr sa;
    369 	struct osockaddr *kosa;
    370 	int error, len;
    371 
    372 	/*
    373 	 * Only read/write the sockaddr family and length, the rest is
    374 	 * not changed.
    375 	 */
    376 	len = sizeof(sa.sa_len) + sizeof(sa.sa_family);
    377 
    378 	error = copyin((void *) osa, (void *) &sa, len);
    379 	if (error)
    380 		return (error);
    381 
    382 	/* Note: we convert from sockaddr sa_family to osockaddr one here */
    383 	kosa = (struct osockaddr *) &sa;
    384 	kosa->sa_family = sa.sa_family;
    385 	error = copyout(kosa, osa, len);
    386 	if (error)
    387 		return (error);
    388 
    389 	return (0);
    390 }
    391 
    392 
    393 /*
    394  * XXX: The following check depends on the fact that the only struct
    395  * sized 0x20 bytes in the ifioctls is struct oifreq and struct ifcapreq.
    396  * If that changes, then we'll need to use an explicit list here.
    397  * (But the actual list is ~60 entries long and uses includes all over
    398  * the tree...)
    399  */
    400 u_long
    401 compat_cvtcmd(u_long cmd)
    402 {
    403 	u_long ncmd;
    404 
    405 #define ifcapreq(x) ((x) == SIOCGIFCAP || (x) == SIOCSIFCAP)
    406 
    407 	ncmd = ((IOCPARM_LEN(cmd) == sizeof(struct oifreq) && !ifcapreq(cmd)) ?
    408 		((cmd & ~(IOCPARM_MASK << IOCPARM_SHIFT)) |
    409 		 (sizeof(struct ifreq) << IOCPARM_SHIFT)) : cmd);
    410 
    411 	return ncmd;
    412 }
    413 
    414 int
    415 compat_ifioctl(struct socket *so, u_long ocmd, u_long cmd, void *data,
    416     struct lwp *l)
    417 {
    418 	int error;
    419 	struct ifreq *ifr = data;
    420 	struct ifnet *ifp = ifunit(ifr->ifr_name);
    421 	struct sockaddr *sa;
    422 
    423 	if (ifp == NULL)
    424 		return ENXIO;
    425 
    426 	switch (ocmd) {
    427 	case OSIOCSIFADDR:
    428 	case OSIOCSIFDSTADDR:
    429 	case OSIOCSIFBRDADDR:
    430 	case OSIOCSIFNETMASK:
    431 		sa = &ifr->ifr_addr;
    432 #if BYTE_ORDER != BIG_ENDIAN
    433 		if (sa->sa_family == 0 && sa->sa_len < 16) {
    434 			sa->sa_family = sa->sa_len;
    435 			sa->sa_len = 16;
    436 		}
    437 #else
    438 		if (sa->sa_len == 0)
    439 			sa->sa_len = 16;
    440 #endif
    441 		break;
    442 
    443 	case OOSIOCGIFADDR:
    444 		cmd = SIOCGIFADDR;
    445 		break;
    446 
    447 	case OOSIOCGIFDSTADDR:
    448 		cmd = SIOCGIFDSTADDR;
    449 		break;
    450 
    451 	case OOSIOCGIFBRDADDR:
    452 		cmd = SIOCGIFBRDADDR;
    453 		break;
    454 
    455 	case OOSIOCGIFNETMASK:
    456 		cmd = SIOCGIFNETMASK;
    457 	}
    458 
    459 	error = (*so->so_proto->pr_usrreq)(so, PRU_CONTROL,
    460 	    (struct mbuf *)cmd, (struct mbuf *)ifr, (struct mbuf *)ifp, l);
    461 
    462 	switch (ocmd) {
    463 	case OOSIOCGIFADDR:
    464 	case OOSIOCGIFDSTADDR:
    465 	case OOSIOCGIFBRDADDR:
    466 	case OOSIOCGIFNETMASK:
    467 		*(u_int16_t *)&ifr->ifr_addr =
    468 		    ((struct sockaddr *)&ifr->ifr_addr)->sa_family;
    469 	}
    470 	return error;
    471 }
    472