1 /*	$NetBSD: linux32_socket.c,v 1.30 2019/04/18 17:45:12 christos Exp $ */
2 
3 /*-
4  * Copyright (c) 2006 Emmanuel Dreyfus, 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. All advertising materials mentioning features or use of this software
15  *    must display the following acknowledgement:
16  *	This product includes software developed by Emmanuel Dreyfus
17  * 4. The name of the author may not be used to endorse or promote
18  *    products derived from this software without specific prior written
19  *    permission.
20  *
21  * THIS SOFTWARE IS PROVIDED BY THE THE AUTHOR AND CONTRIBUTORS ``AS IS''
22  * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO,
23  * THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
24  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS
25  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
26  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
27  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
28  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
29  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
30  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
31  * POSSIBILITY OF SUCH DAMAGE.
32  */
33 
34 #include <sys/cdefs.h>
35 
36 __KERNEL_RCSID(0, "$NetBSD: linux32_socket.c,v 1.30 2019/04/18 17:45:12 christos Exp $");
37 
38 #include <sys/types.h>
39 #include <sys/param.h>
40 #include <sys/fstypes.h>
41 #include <sys/signal.h>
42 #include <sys/dirent.h>
43 #include <sys/kernel.h>
44 #include <sys/fcntl.h>
45 #include <sys/select.h>
46 #include <sys/proc.h>
47 #include <sys/ucred.h>
48 #include <sys/swap.h>
49 #include <sys/file.h>
50 #include <sys/vnode.h>
51 #include <sys/filedesc.h>
52 
53 #include <machine/types.h>
54 
55 #include <net/if.h>
56 #include <net/if_dl.h>
57 #include <net/if_types.h>
58 #include <net/route.h>
59 
60 #include <netinet/in.h>
61 #include <netinet/ip_mroute.h>
62 
63 #include <sys/syscallargs.h>
64 
65 #include <compat/netbsd32/netbsd32.h>
66 #include <compat/netbsd32/netbsd32_ioctl.h>
67 #include <compat/netbsd32/netbsd32_conv.h>
68 #include <compat/netbsd32/netbsd32_syscallargs.h>
69 
70 #include <compat/sys/socket.h>
71 #include <compat/sys/sockio.h>
72 
73 #include <compat/linux/common/linux_types.h>
74 #include <compat/linux/common/linux_types.h>
75 #include <compat/linux/common/linux_signal.h>
76 #include <compat/linux/common/linux_machdep.h>
77 #include <compat/linux/common/linux_misc.h>
78 #include <compat/linux/common/linux_oldolduname.h>
79 #include <compat/linux/common/linux_ioctl.h>
80 #include <compat/linux/common/linux_sockio.h>
81 #include <compat/linux/common/linux_ipc.h>
82 #include <compat/linux/common/linux_sem.h>
83 #include <compat/linux/linux_syscallargs.h>
84 
85 #include <compat/linux32/common/linux32_types.h>
86 #include <compat/linux32/common/linux32_signal.h>
87 #include <compat/linux32/common/linux32_machdep.h>
88 #include <compat/linux32/common/linux32_sysctl.h>
89 #include <compat/linux32/common/linux32_socketcall.h>
90 #include <compat/linux32/common/linux32_sockio.h>
91 #include <compat/linux32/common/linux32_ioctl.h>
92 #include <compat/linux32/linux32_syscallargs.h>
93 
94 int linux32_getifname(struct lwp *, register_t *, void *);
95 int linux32_getifconf(struct lwp *, register_t *, void *);
96 int linux32_getifhwaddr(struct lwp *, register_t *, u_int, void *);
97 
98 int
99 linux32_sys_socketpair(struct lwp *l, const struct linux32_sys_socketpair_args *uap, register_t *retval)
100 {
101 	/* {
102 		syscallarg(int) domain;
103 		syscallarg(int) type;
104 		syscallarg(int) protocol;
105 		syscallarg(netbsd32_intp) rsv;
106 	} */
107 	struct linux_sys_socketpair_args ua;
108 
109 	NETBSD32TO64_UAP(domain);
110 	NETBSD32TO64_UAP(type);
111 	NETBSD32TO64_UAP(protocol);
112 	NETBSD32TOP_UAP(rsv, int);
113 
114 	return linux_sys_socketpair(l, &ua, retval);
115 }
116 
117 int
118 linux32_sys_sendto(struct lwp *l, const struct linux32_sys_sendto_args *uap, register_t *retval)
119 {
120 	/* {
121 		syscallarg(int) s;
122 		syscallarg(netbsd32_voidp) msg;
123 		syscallarg(int) len;
124 		syscallarg(int) flags;
125 		syscallarg(netbsd32_osockaddrp_t) to;
126 		syscallarg(int) tolen;
127 	} */
128 	struct linux_sys_sendto_args ua;
129 
130 	NETBSD32TO64_UAP(s);
131 	NETBSD32TOP_UAP(msg, void);
132 	NETBSD32TO64_UAP(len);
133 	NETBSD32TO64_UAP(flags);
134 	NETBSD32TOP_UAP(to, struct osockaddr);
135 	NETBSD32TO64_UAP(tolen);
136 
137 	return linux_sys_sendto(l, &ua, retval);
138 }
139 
140 
141 int
142 linux32_sys_recvfrom(struct lwp *l, const struct linux32_sys_recvfrom_args *uap, register_t *retval)
143 {
144 	/* {
145 		syscallarg(int) s;
146 		syscallarg(netbsd32_voidp) buf;
147 		syscallarg(netbsd32_size_t) len;
148 		syscallarg(int) flags;
149 		syscallarg(netbsd32_osockaddrp_t) from;
150 		syscallarg(netbsd32_intp) fromlenaddr;
151 	} */
152 	struct linux_sys_recvfrom_args ua;
153 
154 	NETBSD32TO64_UAP(s);
155 	NETBSD32TOP_UAP(buf, void);
156 	NETBSD32TO64_UAP(len);
157 	NETBSD32TO64_UAP(flags);
158 	NETBSD32TOP_UAP(from, struct osockaddr);
159 	NETBSD32TOP_UAP(fromlenaddr, unsigned int);
160 
161 	return linux_sys_recvfrom(l, &ua, retval);
162 }
163 
164 int
165 linux32_sys_setsockopt(struct lwp *l, const struct linux32_sys_setsockopt_args *uap, register_t *retval)
166 {
167 	/* {
168 		syscallarg(int) s;
169 		syscallarg(int) level;
170 		syscallarg(int) optname;
171 		syscallarg(netbsd32_voidp) optval;
172 		syscallarg(int) optlen;
173 	} */
174 	struct linux_sys_setsockopt_args ua;
175 
176 	NETBSD32TO64_UAP(s);
177 	NETBSD32TO64_UAP(level);
178 	NETBSD32TO64_UAP(optname);
179 	NETBSD32TOP_UAP(optval, void);
180 	NETBSD32TO64_UAP(optlen);
181 
182 	return linux_sys_setsockopt(l, &ua, retval);
183 }
184 
185 
186 int
187 linux32_sys_getsockopt(struct lwp *l, const struct linux32_sys_getsockopt_args *uap, register_t *retval)
188 {
189 	/* {
190 		syscallarg(int) s;
191 		syscallarg(int) level;
192 		syscallarg(int) optname;
193 		syscallarg(netbsd32_voidp) optval;
194 		syscallarg(netbsd32_intp) optlen;
195 	} */
196 	struct linux_sys_getsockopt_args ua;
197 
198 	NETBSD32TO64_UAP(s);
199 	NETBSD32TO64_UAP(level);
200 	NETBSD32TO64_UAP(optname);
201 	NETBSD32TOP_UAP(optval, void);
202 	NETBSD32TOP_UAP(optlen, int);
203 
204 	return linux_sys_getsockopt(l, &ua, retval);
205 }
206 
207 int
208 linux32_sys_socket(struct lwp *l, const struct linux32_sys_socket_args *uap, register_t *retval)
209 {
210 	/* {
211 		syscallarg(int) domain;
212 		syscallarg(int) type;
213 		syscallarg(int) protocol;
214 	} */
215 	struct linux_sys_socket_args ua;
216 
217 	NETBSD32TO64_UAP(domain);
218 	NETBSD32TO64_UAP(type);
219 	NETBSD32TO64_UAP(protocol);
220 
221 	return linux_sys_socket(l, &ua, retval);
222 }
223 
224 int
225 linux32_sys_bind(struct lwp *l, const struct linux32_sys_bind_args *uap, register_t *retval)
226 {
227 	/* {
228 		syscallarg(int) s;
229 		syscallarg(netbsd32_osockaddrp_t) name;
230 		syscallarg(int) namelen;
231 	} */
232 	struct linux_sys_bind_args ua;
233 
234 	NETBSD32TO64_UAP(s);
235 	NETBSD32TOP_UAP(name, struct osockaddr);
236 	NETBSD32TO64_UAP(namelen);
237 
238 	return linux_sys_bind(l, &ua, retval);
239 }
240 
241 int
242 linux32_sys_connect(struct lwp *l, const struct linux32_sys_connect_args *uap, register_t *retval)
243 {
244 	/* {
245 		syscallarg(int) s;
246 		syscallarg(netbsd32_osockaddrp_t) name;
247 		syscallarg(int) namelen;
248 	} */
249 	struct linux_sys_connect_args ua;
250 
251 	NETBSD32TO64_UAP(s);
252 	NETBSD32TOP_UAP(name, struct osockaddr);
253 	NETBSD32TO64_UAP(namelen);
254 
255 #ifdef DEBUG_LINUX
256 	printf("linux32_sys_connect: s = %d, name = %p, namelen = %d\n",
257 		SCARG(&ua, s), SCARG(&ua, name), SCARG(&ua, namelen));
258 #endif
259 
260 	return linux_sys_connect(l, &ua, retval);
261 }
262 
263 int
264 linux32_sys_accept(struct lwp *l, const struct linux32_sys_accept_args *uap, register_t *retval)
265 {
266 	/* {
267 		syscallarg(int) s;
268 		syscallarg(netbsd32_osockaddrp_t) name;
269 		syscallarg(netbsd32_intp) anamelen;
270 	} */
271 	struct linux_sys_accept_args ua;
272 
273 	NETBSD32TO64_UAP(s);
274 	NETBSD32TOP_UAP(name, struct osockaddr);
275 	NETBSD32TOP_UAP(anamelen, int);
276 
277 	return linux_sys_accept(l, &ua, retval);
278 }
279 
280 int
281 linux32_sys_getpeername(struct lwp *l, const struct linux32_sys_getpeername_args *uap, register_t *retval)
282 {
283 	/* {
284 		syscallarg(int) fdes;
285 		syscallarg(netbsd32_sockaddrp_t) asa;
286 		syscallarg(netbsd32_intp) alen;
287 	} */
288 	struct linux_sys_getpeername_args ua;
289 
290 	NETBSD32TO64_UAP(fdes);
291 	NETBSD32TOP_UAP(asa, struct sockaddr);
292 	NETBSD32TOP_UAP(alen, int);
293 
294 	return linux_sys_getpeername(l, &ua, retval);
295 }
296 
297 int
298 linux32_sys_getsockname(struct lwp *l, const struct linux32_sys_getsockname_args *uap, register_t *retval)
299 {
300 	/* {
301 		syscallarg(int) fdec;
302 		syscallarg(netbsd32_charp) asa;
303 		syscallarg(netbsd32_intp) alen;
304 	} */
305 	struct linux_sys_getsockname_args ua;
306 
307 	NETBSD32TO64_UAP(fdec);
308 	NETBSD32TOP_UAP(asa, char);
309 	NETBSD32TOP_UAP(alen, int);
310 
311 	return linux_sys_getsockname(l, &ua, retval);
312 }
313 
314 int
315 linux32_sys_sendmsg(struct lwp *l, const struct linux32_sys_sendmsg_args *uap, register_t *retval)
316 {
317 	/* {
318 		syscallarg(int) s;
319 		syscallarg(netbsd32_msghdrp_t) msg;
320 		syscallarg(int) flags;
321 	} */
322 	struct linux_sys_sendmsg_args ua;
323 
324 	NETBSD32TO64_UAP(s);
325 	NETBSD32TOP_UAP(msg, struct msghdr);
326 	NETBSD32TO64_UAP(flags);
327 
328 	return linux_sys_sendmsg(l, &ua, retval);
329 }
330 
331 int
332 linux32_sys_recvmsg(struct lwp *l, const struct linux32_sys_recvmsg_args *uap, register_t *retval)
333 {
334 	/* {
335 		syscallarg(int) s;
336 		syscallarg(netbsd32_msghdrp_t) msg;
337 		syscallarg(int) flags;
338 	} */
339 	struct linux_sys_recvmsg_args ua;
340 
341 	NETBSD32TO64_UAP(s);
342 	NETBSD32TOP_UAP(msg, struct msghdr);
343 	NETBSD32TO64_UAP(flags);
344 
345 	return linux_sys_recvmsg(l, &ua, retval);
346 }
347 
348 int
349 linux32_sys_send(struct lwp *l, const struct linux32_sys_send_args *uap, register_t *retval)
350 {
351 	/* {
352 		syscallarg(int) s;
353 		syscallarg(netbsd32_voidp) buf;
354 		syscallarg(int) len;
355 		syscallarg(int) flags;
356 	} */
357 	struct sys_sendto_args ua;
358 
359 	NETBSD32TO64_UAP(s);
360 	NETBSD32TOP_UAP(buf, void);
361 	NETBSD32TO64_UAP(len);
362 	NETBSD32TO64_UAP(flags);
363 	SCARG(&ua, to) = NULL;
364 	SCARG(&ua, tolen) = 0;
365 
366 	return sys_sendto(l, &ua, retval);
367 }
368 
369 int
370 linux32_sys_recv(struct lwp *l, const struct linux32_sys_recv_args *uap, register_t *retval)
371 {
372 	/* {
373 		syscallarg(int) s;
374 		syscallarg(netbsd32_voidp) buf;
375 		syscallarg(int) len;
376 		syscallarg(int) flags;
377 	} */
378 	struct sys_recvfrom_args ua;
379 
380 	NETBSD32TO64_UAP(s);
381 	NETBSD32TOP_UAP(buf, void);
382 	NETBSD32TO64_UAP(len);
383 	NETBSD32TO64_UAP(flags);
384 	SCARG(&ua, from) = NULL;
385 	SCARG(&ua, fromlenaddr) = NULL;
386 
387 	return sys_recvfrom(l, &ua, retval);
388 }
389 
390 int
391 linux32_getifname(struct lwp *l, register_t *retval, void *data)
392 {
393 	struct ifnet *ifp;
394 	struct linux32_ifreq ifr;
395 	int error;
396 	int s;
397 
398 	error = copyin(data, &ifr, sizeof(ifr));
399 	if (error)
400 		return error;
401 
402 	s = pserialize_read_enter();
403 	ifp = if_byindex(ifr.ifr_ifru.ifru_ifindex);
404 	if (ifp == NULL) {
405 		pserialize_read_exit(s);
406 		return ENODEV;
407 	}
408 
409 	strncpy(ifr.ifr_name, ifp->if_xname, sizeof(ifr.ifr_name));
410 	pserialize_read_exit(s);
411 
412 	return copyout(&ifr, data, sizeof(ifr));
413 }
414 
415 int
416 linux32_getifconf(struct lwp *l, register_t *retval, void *data)
417 {
418 	struct linux32_ifreq ifr, *ifrp = NULL;
419 	struct linux32_ifconf ifc;
420 	struct ifnet *ifp;
421 	struct sockaddr *sa;
422 	struct osockaddr *osa;
423 	int space = 0, error;
424 	const int sz = (int)sizeof(ifr);
425 	bool docopy;
426 	int s;
427 	int bound;
428 	struct psref psref;
429 
430 	error = copyin(data, &ifc, sizeof(ifc));
431 	if (error)
432 		return error;
433 
434 	memset(&ifr, 0, sizeof(ifr));
435 	docopy = NETBSD32PTR64(ifc.ifc_req) != NULL;
436 	if (docopy) {
437 		space = ifc.ifc_len;
438 		ifrp = NETBSD32PTR64(ifc.ifc_req);
439 	}
440 
441 	bound = curlwp_bind();
442 	s = pserialize_read_enter();
443 	IFNET_READER_FOREACH(ifp) {
444 		struct ifaddr *ifa;
445 		if_acquire(ifp, &psref);
446 		pserialize_read_exit(s);
447 
448 		(void)strncpy(ifr.ifr_name, ifp->if_xname,
449 		    sizeof(ifr.ifr_name));
450 		if (ifr.ifr_name[sizeof(ifr.ifr_name) - 1] != '\0') {
451 			error = ENAMETOOLONG;
452 			goto release_exit;
453 		}
454 
455 		s = pserialize_read_enter();
456 		IFADDR_READER_FOREACH(ifa, ifp) {
457 			struct psref psref_ifa;
458 			ifa_acquire(ifa, &psref_ifa);
459 			pserialize_read_exit(s);
460 
461 			sa = ifa->ifa_addr;
462 			if (sa->sa_family != AF_INET ||
463 			    sa->sa_len > sizeof(*osa))
464 				goto next;
465 			memcpy(&ifr.ifr_addr, sa, sa->sa_len);
466 			osa = (struct osockaddr *)&ifr.ifr_addr;
467 			osa->sa_family = sa->sa_family;
468 			if (space >= sz) {
469 				error = copyout(&ifr, ifrp, sz);
470 				if (error != 0) {
471 					ifa_release(ifa, &psref_ifa);
472 					goto release_exit;
473 				}
474 				ifrp++;
475 			}
476 			space -= sz;
477 		next:
478 			s = pserialize_read_enter();
479 			ifa_release(ifa, &psref_ifa);
480 		}
481 
482 		KASSERT(pserialize_in_read_section());
483 		if_release(ifp, &psref);
484 	}
485 	pserialize_read_exit(s);
486 	curlwp_bindx(bound);
487 
488 	if (docopy)
489 		ifc.ifc_len -= space;
490 	else
491 		ifc.ifc_len = -space;
492 
493 	return copyout(&ifc, data, sizeof(ifc));
494 
495 release_exit:
496 	if_release(ifp, &psref);
497 	curlwp_bindx(bound);
498 	return error;
499 }
500 
501 int
502 linux32_getifhwaddr(struct lwp *l, register_t *retval, u_int fd,
503     void *data)
504 {
505 	struct linux32_ifreq lreq;
506 	file_t *fp;
507 	struct ifaddr *ifa;
508 	struct ifnet *ifp;
509 	struct sockaddr_dl *sadl;
510 	int error, found;
511 	int index, ifnum;
512 	int s;
513 
514 	/*
515 	 * We can't emulate this ioctl by calling sys_ioctl() to run
516 	 * SIOCGIFCONF, because the user buffer is not of the right
517 	 * type to take those results.  We can't use kernel buffers to
518 	 * receive the results, as the implementation of sys_ioctl()
519 	 * and ifconf() [which implements SIOCGIFCONF] use
520 	 * copyin()/copyout() which will fail on kernel addresses.
521 	 *
522 	 * So, we must duplicate code from sys_ioctl() and ifconf().  Ugh.
523 	 */
524 
525 	if ((fp = fd_getfile(fd)) == NULL)
526 		return (EBADF);
527 
528 	KERNEL_LOCK(1, NULL);
529 
530 	if ((fp->f_flag & (FREAD | FWRITE)) == 0) {
531 		error = EBADF;
532 		goto out;
533 	}
534 
535 	error = copyin(data, &lreq, sizeof(lreq));
536 	if (error)
537 		goto out;
538 	lreq.ifr_name[LINUX32_IFNAMSIZ-1] = '\0';		/* just in case */
539 
540 	/*
541 	 * Try real interface name first, then fake "ethX"
542 	 */
543 	found = 0;
544 	s = pserialize_read_enter();
545 	IFNET_READER_FOREACH(ifp) {
546 		if (found)
547 			break;
548 		if (strcmp(lreq.ifr_name, ifp->if_xname))
549 			/* not this interface */
550 			continue;
551 		found=1;
552 		if (IFADDR_READER_EMPTY(ifp)) {
553 			error = ENODEV;
554 			goto out;
555 		}
556 		IFADDR_READER_FOREACH(ifa, ifp) {
557 			sadl = satosdl(ifa->ifa_addr);
558 			/* only return ethernet addresses */
559 			/* XXX what about FDDI, etc. ? */
560 			if (sadl->sdl_family != AF_LINK ||
561 			    sadl->sdl_type != IFT_ETHER)
562 				continue;
563 			memcpy(&lreq.ifr_hwaddr.sa_data, CLLADDR(sadl),
564 			       MIN(sadl->sdl_alen,
565 				   sizeof(lreq.ifr_hwaddr.sa_data)));
566 			lreq.ifr_hwaddr.sa_family =
567 				sadl->sdl_family;
568 			pserialize_read_exit(s);
569 
570 			error = copyout(&lreq, data, sizeof(lreq));
571 			goto out;
572 		}
573 	}
574 	pserialize_read_exit(s);
575 
576 	if (strncmp(lreq.ifr_name, "eth", 3) == 0) {
577 		for (ifnum = 0, index = 3;
578 		     index < LINUX32_IFNAMSIZ && lreq.ifr_name[index] != '\0';
579 		     index++) {
580 			ifnum *= 10;
581 			ifnum += lreq.ifr_name[index] - '0';
582 		}
583 
584 		error = EINVAL;			/* in case we don't find one */
585 		s = pserialize_read_enter();
586 		IFNET_READER_FOREACH(ifp) {
587 			memcpy(lreq.ifr_name, ifp->if_xname,
588 			       MIN(LINUX32_IFNAMSIZ, IFNAMSIZ));
589 			IFADDR_READER_FOREACH(ifa, ifp) {
590 				sadl = satosdl(ifa->ifa_addr);
591 				/* only return ethernet addresses */
592 				/* XXX what about FDDI, etc. ? */
593 				if (sadl->sdl_family != AF_LINK ||
594 				    sadl->sdl_type != IFT_ETHER)
595 					continue;
596 				if (ifnum--)
597 					/* not the reqested iface */
598 					continue;
599 				memcpy(&lreq.ifr_hwaddr.sa_data,
600 				       CLLADDR(sadl),
601 				       MIN(sadl->sdl_alen,
602 					   sizeof(lreq.ifr_hwaddr.sa_data)));
603 				lreq.ifr_hwaddr.sa_family =
604 					sadl->sdl_family;
605 				pserialize_read_exit(s);
606 
607 				error = copyout(&lreq, data, sizeof(lreq));
608 				goto out;
609 			}
610 		}
611 		pserialize_read_exit(s);
612 	} else {
613 		/* unknown interface, not even an "eth*" name */
614 		error = ENODEV;
615 	}
616 
617 out:
618 	KERNEL_UNLOCK_ONE(NULL);
619 	fd_putfile(fd);
620 	return error;
621 }
622 
623 int
624 linux32_ioctl_socket(struct lwp *l, const struct linux32_sys_ioctl_args *uap, register_t *retval)
625 {
626 	/* {
627 		syscallarg(int) fd;
628 		syscallarg(u_long) com;
629 		syscallarg(void *) data;
630 	} */
631 	u_long com;
632 	int error = 0, isdev = 0, dosys = 1;
633 	struct netbsd32_ioctl_args ia;
634 	file_t *fp;
635 	struct vnode *vp;
636 	int (*ioctlf)(file_t *, u_long, void *);
637 	struct ioctl_pt pt;
638 
639 	if ((fp = fd_getfile(SCARG(uap, fd))) == NULL)
640 		return (EBADF);
641 
642 	if (fp->f_type == DTYPE_VNODE) {
643 		vp = (struct vnode *)fp->f_data;
644 		isdev = vp->v_type == VCHR;
645 	}
646 
647 	/*
648 	 * Don't try to interpret socket ioctl calls that are done
649 	 * on a device filedescriptor, just pass them through, to
650 	 * emulate Linux behaviour. Use PTIOCLINUX so that the
651 	 * device will only handle these if it's prepared to do
652 	 * so, to avoid unexpected things from happening.
653 	 */
654 	if (isdev) {
655 		dosys = 0;
656 		ioctlf = fp->f_ops->fo_ioctl;
657 		pt.com = SCARG(uap, com);
658 		pt.data = (void *)NETBSD32PTR64(SCARG(uap, data));
659 		error = ioctlf(fp, PTIOCLINUX, &pt);
660 		/*
661 		 * XXX hack: if the function returns EJUSTRETURN,
662 		 * it has stuffed a sysctl return value in pt.data.
663 		 */
664 		if (error == EJUSTRETURN) {
665 			retval[0] = (register_t)pt.data;
666 			error = 0;
667 		}
668 		goto out;
669 	}
670 
671 	com = SCARG(uap, com);
672 	retval[0] = 0;
673 
674 	switch (com) {
675 	case LINUX_SIOCGIFNAME:
676 		error = linux32_getifname(l, retval, SCARG_P32(uap, data));
677 		dosys = 0;
678 		break;
679 	case LINUX_SIOCGIFCONF:
680 		error = linux32_getifconf(l, retval, SCARG_P32(uap, data));
681 		dosys = 0;
682 		break;
683 	case LINUX_SIOCGIFFLAGS:
684 		SCARG(&ia, com) = OSIOCGIFFLAGS32;
685 		break;
686 	case LINUX_SIOCSIFFLAGS:
687 		SCARG(&ia, com) = OSIOCSIFFLAGS32;
688 		break;
689 	case LINUX_SIOCGIFADDR:
690 		SCARG(&ia, com) = OOSIOCGIFADDR32;
691 		break;
692 	case LINUX_SIOCGIFDSTADDR:
693 		SCARG(&ia, com) = OOSIOCGIFDSTADDR32;
694 		break;
695 	case LINUX_SIOCGIFBRDADDR:
696 		SCARG(&ia, com) = OOSIOCGIFBRDADDR32;
697 		break;
698 	case LINUX_SIOCGIFNETMASK:
699 		SCARG(&ia, com) = OOSIOCGIFNETMASK32;
700 		break;
701 	case LINUX_SIOCGIFMTU:
702 		SCARG(&ia, com) = OSIOCGIFMTU32;
703 		break;
704 	case LINUX_SIOCADDMULTI:
705 		SCARG(&ia, com) = OSIOCADDMULTI32;
706 		break;
707 	case LINUX_SIOCDELMULTI:
708 		SCARG(&ia, com) = OSIOCDELMULTI32;
709 		break;
710 	case LINUX_SIOCGIFHWADDR:
711 		error = linux32_getifhwaddr(l, retval, SCARG(uap, fd),
712 		    SCARG_P32(uap, data));
713 		dosys = 0;
714 		break;
715 	default:
716 		error = EINVAL;
717 	}
718 
719  out:
720  	fd_putfile(SCARG(uap, fd));
721 
722 	if (error == 0 && dosys) {
723 		SCARG(&ia, fd) = SCARG(uap, fd);
724 		SCARG(&ia, data) = SCARG(uap, data);
725 		error = netbsd32_ioctl(curlwp, &ia, retval);
726 	}
727 
728 	return error;
729 }
730