xref: /netbsd/sys/compat/common/uipc_syscalls_43.c (revision cc17ee2e)
1 /*	$NetBSD: uipc_syscalls_43.c,v 1.51 2019/01/27 02:08:39 pgoyette 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.51 2019/01/27 02:08:39 pgoyette Exp $");
36 
37 #if defined(_KERNEL_OPT)
38 #include "opt_compat_netbsd.h"
39 #endif
40 
41 #include <sys/param.h>
42 #include <sys/systm.h>
43 #include <sys/filedesc.h>
44 #include <sys/kernel.h>
45 #include <sys/proc.h>
46 #include <sys/file.h>
47 #include <sys/socket.h>
48 #include <sys/socketvar.h>
49 #include <sys/stat.h>
50 #include <sys/ioctl.h>
51 #include <sys/fcntl.h>
52 #include <sys/syslog.h>
53 #include <sys/unistd.h>
54 #include <sys/resourcevar.h>
55 #include <sys/mbuf.h>		/* for MLEN */
56 #include <sys/protosw.h>
57 
58 #include <sys/mount.h>
59 #include <sys/syscall.h>
60 #include <sys/syscallvar.h>
61 #include <sys/syscallargs.h>
62 
63 #include <net/if.h>
64 #include <net/bpf.h>
65 #include <net/route.h>
66 #include <netinet/in.h>
67 #include <netinet/in_systm.h>
68 #include <netinet/ip.h>
69 #include <net/if_gre.h>
70 #include <net/if_tap.h>
71 #include <net80211/ieee80211_ioctl.h>
72 #include <netinet6/in6_var.h>
73 #include <netinet6/nd6.h>
74 #include <compat/sys/socket.h>
75 #include <compat/sys/sockio.h>
76 
77 #include <compat/common/compat_util.h>
78 #include <compat/common/compat_mod.h>
79 
80 #include <uvm/uvm_extern.h>
81 
82 /*
83  * Following 4.3 syscalls were not versioned, even through they should
84  * have been:
85  * connect(2), bind(2), sendto(2)
86  */
87 
88 static struct syscall_package uipc_syscalls_43_syscalls[] = {
89 	{ SYS_compat_43_oaccept, 0, (sy_call_t *)compat_43_sys_accept },
90 	{ SYS_compat_43_ogetpeername, 0,
91 	    (sy_call_t *)compat_43_sys_getpeername },
92 	{ SYS_compat_43_ogetsockname, 0,
93 	    (sy_call_t *)compat_43_sys_getsockname },
94 	{ SYS_compat_43_orecv, 0, (sy_call_t *)compat_43_sys_recv },
95 	{ SYS_compat_43_orecvfrom, 0, (sy_call_t *)compat_43_sys_recvfrom },
96 	{ SYS_compat_43_orecvmsg, 0, (sy_call_t *)compat_43_sys_recvmsg },
97 	{ SYS_compat_43_osend, 0, (sy_call_t *)compat_43_sys_send },
98 	{ SYS_compat_43_osendmsg, 0, (sy_call_t *)compat_43_sys_sendmsg },
99 	{ 0, 0, NULL }
100 };
101 
102 static int compat_43_sa_put(void *);
103 
104 int
compat_43_sys_accept(struct lwp * l,const struct compat_43_sys_accept_args * uap,register_t * retval)105 compat_43_sys_accept(struct lwp *l, const struct compat_43_sys_accept_args *uap, register_t *retval)
106 {
107 	/* {
108 		syscallarg(int) s;
109 		syscallarg(void *) name;
110 		syscallarg(int *) anamelen;
111 	} */
112 	int error;
113 
114 	if ((error = sys_accept(l, (const struct sys_accept_args *)uap, retval)) != 0)
115 		return error;
116 
117 	if (SCARG(uap, name)
118 	    && (error = compat_43_sa_put(SCARG(uap, name))))
119 		return (error);
120 
121 	return 0;
122 }
123 
124 int
compat_43_sys_getpeername(struct lwp * l,const struct compat_43_sys_getpeername_args * uap,register_t * retval)125 compat_43_sys_getpeername(struct lwp *l, const struct compat_43_sys_getpeername_args *uap, register_t *retval)
126 {
127 	/* {
128 		syscallarg(int) fdes;
129 		syscallarg(void *) asa;
130 		syscallarg(int *) alen;
131 	} */
132 
133 	int error;
134 
135 	if ((error = sys_getpeername(l, (const struct sys_getpeername_args *)uap, retval)) != 0)
136 		return error;
137 
138 	if ((error = compat_43_sa_put(SCARG(uap, asa))))
139 		return (error);
140 
141 	return 0;
142 }
143 
144 int
compat_43_sys_getsockname(struct lwp * l,const struct compat_43_sys_getsockname_args * uap,register_t * retval)145 compat_43_sys_getsockname(struct lwp *l, const struct compat_43_sys_getsockname_args *uap, register_t *retval)
146 {
147 	/* {
148 		syscallarg(int) fdes;
149 		syscallarg(void *) asa;
150 		syscallarg(int *) alen;
151 	} */
152 	int error;
153 
154 	if ((error = sys_getsockname(l, (const struct sys_getsockname_args *)uap, retval)) != 0)
155 		return error;
156 
157 	if ((error = compat_43_sa_put(SCARG(uap, asa))))
158 		return (error);
159 
160 	return 0;
161 }
162 
163 int
compat_43_sys_recv(struct lwp * l,const struct compat_43_sys_recv_args * uap,register_t * retval)164 compat_43_sys_recv(struct lwp *l, const struct compat_43_sys_recv_args *uap, register_t *retval)
165 {
166 	/* {
167 		syscallarg(int) s;
168 		syscallarg(void *) buf;
169 		syscallarg(int) len;
170 		syscallarg(int) flags;
171 	} */
172 	struct sys_recvfrom_args bra;
173 
174 	SCARG(&bra, s) = SCARG(uap, s);
175 	SCARG(&bra, buf) = SCARG(uap, buf);
176 	SCARG(&bra, len) = (size_t) SCARG(uap, len);
177 	SCARG(&bra, flags) = SCARG(uap, flags);
178 	SCARG(&bra, from) = NULL;
179 	SCARG(&bra, fromlenaddr) = NULL;
180 
181 	return (sys_recvfrom(l, &bra, retval));
182 }
183 
184 int
compat_43_sys_recvfrom(struct lwp * l,const struct compat_43_sys_recvfrom_args * uap,register_t * retval)185 compat_43_sys_recvfrom(struct lwp *l, const struct compat_43_sys_recvfrom_args *uap, register_t *retval)
186 {
187 	/* {
188 		syscallarg(int) s;
189 		syscallarg(void *) buf;
190 		syscallarg(size_t) len;
191 		syscallarg(int) flags;
192 		syscallarg(void *) from;
193 		syscallarg(int *) fromlenaddr;
194 	} */
195 	int error;
196 
197 	if ((error = sys_recvfrom(l, (const struct sys_recvfrom_args *)uap, retval)))
198 		return (error);
199 
200 	if (SCARG(uap, from) && (error = compat_43_sa_put(SCARG(uap, from))))
201 		return (error);
202 
203 	return (0);
204 }
205 
206 /*
207  * Old recvmsg. Arrange necessary structures, calls generic code and
208  * adjusts results accordingly.
209  */
210 int
compat_43_sys_recvmsg(struct lwp * l,const struct compat_43_sys_recvmsg_args * uap,register_t * retval)211 compat_43_sys_recvmsg(struct lwp *l, const struct compat_43_sys_recvmsg_args *uap, register_t *retval)
212 {
213 	/* {
214 		syscallarg(int) s;
215 		syscallarg(struct omsghdr *) msg;
216 		syscallarg(int) flags;
217 	} */
218 	struct omsghdr omsg;
219 	struct msghdr msg;
220 	struct mbuf *from, *control;
221 	int error;
222 
223 	error = copyin(SCARG(uap, msg), &omsg, sizeof (struct omsghdr));
224 	if (error)
225 		return (error);
226 
227 	if (omsg.msg_accrights == NULL)
228 		omsg.msg_accrightslen = 0;
229 	/* it was this way in 4.4BSD */
230 	if (omsg.msg_accrightslen > MLEN)
231 		return EINVAL;
232 
233 	msg.msg_name	= omsg.msg_name;
234 	msg.msg_namelen = omsg.msg_namelen;
235 	msg.msg_iovlen	= omsg.msg_iovlen;
236 	msg.msg_iov	= omsg.msg_iov;
237 	msg.msg_flags	= (SCARG(uap, flags) & MSG_USERFLAGS) | MSG_IOVUSRSPACE;
238 
239 	error = do_sys_recvmsg(l, SCARG(uap, s), &msg, &from,
240 	    omsg.msg_accrights != NULL ? &control : NULL, retval);
241 	if (error != 0)
242 		return error;
243 
244 	/*
245 	 * If there is any control information and it's SCM_RIGHTS,
246 	 * pass it back to the program.
247 	 * XXX: maybe there can be more than one chunk of control data?
248 	 */
249 	if (omsg.msg_accrights && control != NULL) {
250 		struct cmsghdr *cmsg = mtod(control, struct cmsghdr *);
251 
252 		if (cmsg->cmsg_level == SOL_SOCKET
253 		    && cmsg->cmsg_type == SCM_RIGHTS
254 		    && cmsg->cmsg_len < omsg.msg_accrightslen
255 		    && copyout(CMSG_DATA(cmsg), omsg.msg_accrights,
256 			    cmsg->cmsg_len) == 0) {
257 			omsg.msg_accrightslen = cmsg->cmsg_len;
258 			free_control_mbuf(l, control, control->m_next);
259 		} else {
260 			omsg.msg_accrightslen = 0;
261 			free_control_mbuf(l, control, control);
262 		}
263 	} else
264 		omsg.msg_accrightslen = 0;
265 
266 	if (from != NULL)
267 		/* convert from sockaddr sa_family to osockaddr one here */
268 		mtod(from, struct osockaddr *)->sa_family =
269 				    mtod(from, struct sockaddr *)->sa_family;
270 
271 	error = copyout_sockname((struct sockaddr *)omsg.msg_name, &omsg.msg_namelen, 0, from);
272 	if (from != NULL)
273 		m_free(from);
274 
275 	if (error != 0)
276 		 error = copyout(&omsg, SCARG(uap, msg), sizeof(omsg));
277 
278 	return error;
279 }
280 
281 int
compat_43_sys_send(struct lwp * l,const struct compat_43_sys_send_args * uap,register_t * retval)282 compat_43_sys_send(struct lwp *l, const struct compat_43_sys_send_args *uap, register_t *retval)
283 {
284 	/* {
285 		syscallarg(int) s;
286 		syscallarg(void *) buf;
287 		syscallarg(int) len;
288 		syscallarg(int) flags;
289 	} */
290 	struct sys_sendto_args bsa;
291 
292 	SCARG(&bsa, s)		= SCARG(uap, s);
293 	SCARG(&bsa, buf)	= SCARG(uap, buf);
294 	SCARG(&bsa, len)	= SCARG(uap, len);
295 	SCARG(&bsa, flags)	= SCARG(uap, flags);
296 	SCARG(&bsa, to)		= NULL;
297 	SCARG(&bsa, tolen)	= 0;
298 
299 	return (sys_sendto(l, &bsa, retval));
300 }
301 
302 int
compat43_set_accrights(struct msghdr * msg,void * accrights,int accrightslen)303 compat43_set_accrights(struct msghdr *msg, void *accrights, int accrightslen)
304 {
305 	struct cmsghdr *cmsg;
306 	int error;
307 	struct mbuf *ctl;
308 	u_int clen;
309 
310 	if (accrights == NULL || accrightslen == 0) {
311 		msg->msg_control = NULL;
312 		msg->msg_controllen = 0;
313 		return 0;
314 	}
315 
316 	clen = CMSG_SPACE(accrightslen);
317 	/* it was (almost) this way in 4.4BSD */
318 	if (accrightslen < 0 || clen > MLEN)
319 		return EINVAL;
320 
321 	ctl = m_get(M_WAIT, MT_CONTROL);
322 	ctl->m_len = clen;
323 	cmsg = mtod(ctl, struct cmsghdr *);
324 	cmsg->cmsg_len		= CMSG_SPACE(accrightslen);
325 	cmsg->cmsg_level	= SOL_SOCKET;
326 	cmsg->cmsg_type 	= SCM_RIGHTS;
327 
328 	error = copyin(accrights, CMSG_DATA(cmsg), accrightslen);
329 	if (error) {
330 		m_free(ctl);
331 		return error;
332 	}
333 
334 	msg->msg_control = ctl;
335 	msg->msg_controllen = clen;
336 	msg->msg_flags |= MSG_CONTROLMBUF;
337 	return 0;
338 }
339 
340 /*
341  * Old sendmsg. Arrange necessary structures, call generic code and
342  * adjust the results accordingly for old code.
343  */
344 int
compat_43_sys_sendmsg(struct lwp * l,const struct compat_43_sys_sendmsg_args * uap,register_t * retval)345 compat_43_sys_sendmsg(struct lwp *l, const struct compat_43_sys_sendmsg_args *uap, register_t *retval)
346 {
347 	/* {
348 		syscallarg(int) s;
349 		syscallarg(void *) msg;
350 		syscallarg(int) flags;
351 	} */
352 	struct omsghdr omsg;
353 	struct msghdr msg;
354 	int error;
355 	struct mbuf *nam;
356 	struct osockaddr *osa;
357 	struct sockaddr *sa;
358 
359 	error = copyin(SCARG(uap, msg), &omsg, sizeof (struct omsghdr));
360 	if (error != 0)
361 		return (error);
362 
363 	msg.msg_iovlen = omsg.msg_iovlen;
364 	msg.msg_iov = omsg.msg_iov;
365 
366 	error = sockargs(&nam, omsg.msg_name, omsg.msg_namelen,
367 	    UIO_USERSPACE, MT_SONAME);
368 	if (error != 0)
369 		return (error);
370 
371 	sa = mtod(nam, struct sockaddr *);
372 	osa = mtod(nam, struct osockaddr *);
373 	sa->sa_family = osa->sa_family;
374 	sa->sa_len = omsg.msg_namelen;
375 
376 	msg.msg_flags = MSG_IOVUSRSPACE | MSG_NAMEMBUF;
377 
378 	msg.msg_name = nam;
379 	msg.msg_namelen = omsg.msg_namelen;
380 	error = compat43_set_accrights(&msg, omsg.msg_accrights,
381 	    omsg.msg_accrightslen);
382 	if (error != 0)
383 		goto bad;
384 
385 	return do_sys_sendmsg(l, SCARG(uap, s), &msg, SCARG(uap, flags),
386 	    retval);
387 
388     bad:
389 	if (nam != NULL)
390 		m_free(nam);
391 
392 	return (error);
393 }
394 
395 static int
compat_43_sa_put(void * from)396 compat_43_sa_put(void *from)
397 {
398 	struct osockaddr *osa = (struct osockaddr *) from;
399 	struct sockaddr sa;
400 	struct osockaddr *kosa;
401 	int error, len;
402 
403 	/*
404 	 * Only read/write the sockaddr family and length, the rest is
405 	 * not changed.
406 	 */
407 	len = sizeof(sa.sa_len) + sizeof(sa.sa_family);
408 
409 	error = copyin((void *) osa, (void *) &sa, len);
410 	if (error)
411 		return (error);
412 
413 	/* Note: we convert from sockaddr sa_family to osockaddr one here */
414 	kosa = (struct osockaddr *) &sa;
415 	kosa->sa_family = sa.sa_family;
416 	error = copyout(kosa, osa, len);
417 	if (error)
418 		return (error);
419 
420 	return (0);
421 }
422 
423 int
uipc_syscalls_43_init(void)424 uipc_syscalls_43_init(void)
425 {
426 
427 	return syscall_establish(NULL, uipc_syscalls_43_syscalls);
428 }
429 
430 int
uipc_syscalls_43_fini(void)431 uipc_syscalls_43_fini(void)
432 {
433 
434 	return syscall_disestablish(NULL, uipc_syscalls_43_syscalls);
435 }
436