1/*
2 * 32bit Socket syscall emulation. Based on arch/sparc64/kernel/sys_sparc32.c.
3 *
4 * Copyright (C) 2000		VA Linux Co
5 * Copyright (C) 2000		Don Dugger <n0ano@valinux.com>
6 * Copyright (C) 1999 		Arun Sharma <arun.sharma@intel.com>
7 * Copyright (C) 1997,1998 	Jakub Jelinek (jj@sunsite.mff.cuni.cz)
8 * Copyright (C) 1997 		David S. Miller (davem@caip.rutgers.edu)
9 * Copyright (C) 2000		Hewlett-Packard Co.
10 * Copyright (C) 2000		David Mosberger-Tang <davidm@hpl.hp.com>
11 * Copyright (C) 2000,2001	Andi Kleen, SuSE Labs
12 */
13
14#include <linux/kernel.h>
15#include <linux/fs.h>
16#include <linux/types.h>
17#include <linux/file.h>
18#include <linux/icmpv6.h>
19#include <linux/socket.h>
20#include <linux/syscalls.h>
21#include <linux/filter.h>
22#include <linux/compat.h>
23#include <linux/netfilter_ipv4/ip_tables.h>
24#include <linux/security.h>
25
26#include <net/scm.h>
27#include <net/sock.h>
28#include <asm/uaccess.h>
29#include <net/compat.h>
30
31static inline int iov_from_user_compat_to_kern(struct iovec *kiov,
32					  struct compat_iovec __user *uiov32,
33					  int niov)
34{
35	int tot_len = 0;
36
37	while (niov > 0) {
38		compat_uptr_t buf;
39		compat_size_t len;
40
41		if (get_user(len, &uiov32->iov_len) ||
42		   get_user(buf, &uiov32->iov_base)) {
43			tot_len = -EFAULT;
44			break;
45		}
46		tot_len += len;
47		kiov->iov_base = compat_ptr(buf);
48		kiov->iov_len = (__kernel_size_t) len;
49		uiov32++;
50		kiov++;
51		niov--;
52	}
53	return tot_len;
54}
55
56int get_compat_msghdr(struct msghdr *kmsg, struct compat_msghdr __user *umsg)
57{
58	compat_uptr_t tmp1, tmp2, tmp3;
59
60	if (!access_ok(VERIFY_READ, umsg, sizeof(*umsg)) ||
61	    __get_user(tmp1, &umsg->msg_name) ||
62	    __get_user(kmsg->msg_namelen, &umsg->msg_namelen) ||
63	    __get_user(tmp2, &umsg->msg_iov) ||
64	    __get_user(kmsg->msg_iovlen, &umsg->msg_iovlen) ||
65	    __get_user(tmp3, &umsg->msg_control) ||
66	    __get_user(kmsg->msg_controllen, &umsg->msg_controllen) ||
67	    __get_user(kmsg->msg_flags, &umsg->msg_flags))
68		return -EFAULT;
69	kmsg->msg_name = compat_ptr(tmp1);
70	kmsg->msg_iov = compat_ptr(tmp2);
71	kmsg->msg_control = compat_ptr(tmp3);
72	return 0;
73}
74
75/* I've named the args so it is easy to tell whose space the pointers are in. */
76int verify_compat_iovec(struct msghdr *kern_msg, struct iovec *kern_iov,
77		   char *kern_address, int mode)
78{
79	int tot_len;
80
81	if (kern_msg->msg_namelen) {
82		if (mode==VERIFY_READ) {
83			int err = move_addr_to_kernel(kern_msg->msg_name,
84						      kern_msg->msg_namelen,
85						      kern_address);
86			if (err < 0)
87				return err;
88		}
89		kern_msg->msg_name = kern_address;
90	} else
91		kern_msg->msg_name = NULL;
92
93	tot_len = iov_from_user_compat_to_kern(kern_iov,
94					  (struct compat_iovec __user *)kern_msg->msg_iov,
95					  kern_msg->msg_iovlen);
96	if (tot_len >= 0)
97		kern_msg->msg_iov = kern_iov;
98
99	return tot_len;
100}
101
102/* Bleech... */
103#define CMSG_COMPAT_ALIGN(len)	ALIGN((len), sizeof(s32))
104
105#define CMSG_COMPAT_DATA(cmsg)				\
106	((void __user *)((char __user *)(cmsg) + CMSG_COMPAT_ALIGN(sizeof(struct compat_cmsghdr))))
107#define CMSG_COMPAT_SPACE(len)				\
108	(CMSG_COMPAT_ALIGN(sizeof(struct compat_cmsghdr)) + CMSG_COMPAT_ALIGN(len))
109#define CMSG_COMPAT_LEN(len)				\
110	(CMSG_COMPAT_ALIGN(sizeof(struct compat_cmsghdr)) + (len))
111
112#define CMSG_COMPAT_FIRSTHDR(msg)			\
113	(((msg)->msg_controllen) >= sizeof(struct compat_cmsghdr) ?	\
114	 (struct compat_cmsghdr __user *)((msg)->msg_control) :		\
115	 (struct compat_cmsghdr __user *)NULL)
116
117#define CMSG_COMPAT_OK(ucmlen, ucmsg, mhdr) \
118	((ucmlen) >= sizeof(struct compat_cmsghdr) && \
119	 (ucmlen) <= (unsigned long) \
120	 ((mhdr)->msg_controllen - \
121	  ((char *)(ucmsg) - (char *)(mhdr)->msg_control)))
122
123static inline struct compat_cmsghdr __user *cmsg_compat_nxthdr(struct msghdr *msg,
124		struct compat_cmsghdr __user *cmsg, int cmsg_len)
125{
126	char __user *ptr = (char __user *)cmsg + CMSG_COMPAT_ALIGN(cmsg_len);
127	if ((unsigned long)(ptr + 1 - (char __user *)msg->msg_control) >
128			msg->msg_controllen)
129		return NULL;
130	return (struct compat_cmsghdr __user *)ptr;
131}
132
133/* There is a lot of hair here because the alignment rules (and
134 * thus placement) of cmsg headers and length are different for
135 * 32-bit apps.  -DaveM
136 */
137int cmsghdr_from_user_compat_to_kern(struct msghdr *kmsg, struct sock *sk,
138			       unsigned char *stackbuf, int stackbuf_size)
139{
140	struct compat_cmsghdr __user *ucmsg;
141	struct cmsghdr *kcmsg, *kcmsg_base;
142	compat_size_t ucmlen;
143	__kernel_size_t kcmlen, tmp;
144	int err = -EFAULT;
145
146	kcmlen = 0;
147	kcmsg_base = kcmsg = (struct cmsghdr *)stackbuf;
148	ucmsg = CMSG_COMPAT_FIRSTHDR(kmsg);
149	while (ucmsg != NULL) {
150		if (get_user(ucmlen, &ucmsg->cmsg_len))
151			return -EFAULT;
152
153		/* Catch bogons. */
154		if (!CMSG_COMPAT_OK(ucmlen, ucmsg, kmsg))
155			return -EINVAL;
156
157		tmp = ((ucmlen - CMSG_COMPAT_ALIGN(sizeof(*ucmsg))) +
158		       CMSG_ALIGN(sizeof(struct cmsghdr)));
159		tmp = CMSG_ALIGN(tmp);
160		kcmlen += tmp;
161		ucmsg = cmsg_compat_nxthdr(kmsg, ucmsg, ucmlen);
162	}
163	if (kcmlen == 0)
164		return -EINVAL;
165
166	/* The kcmlen holds the 64-bit version of the control length.
167	 * It may not be modified as we do not stick it into the kmsg
168	 * until we have successfully copied over all of the data
169	 * from the user.
170	 */
171	if (kcmlen > stackbuf_size)
172		kcmsg_base = kcmsg = sock_kmalloc(sk, kcmlen, GFP_KERNEL);
173	if (kcmsg == NULL)
174		return -ENOBUFS;
175
176	/* Now copy them over neatly. */
177	memset(kcmsg, 0, kcmlen);
178	ucmsg = CMSG_COMPAT_FIRSTHDR(kmsg);
179	while (ucmsg != NULL) {
180		if (__get_user(ucmlen, &ucmsg->cmsg_len))
181			goto Efault;
182		if (!CMSG_COMPAT_OK(ucmlen, ucmsg, kmsg))
183			goto Einval;
184		tmp = ((ucmlen - CMSG_COMPAT_ALIGN(sizeof(*ucmsg))) +
185		       CMSG_ALIGN(sizeof(struct cmsghdr)));
186		if ((char *)kcmsg_base + kcmlen - (char *)kcmsg < CMSG_ALIGN(tmp))
187			goto Einval;
188		kcmsg->cmsg_len = tmp;
189		tmp = CMSG_ALIGN(tmp);
190		if (__get_user(kcmsg->cmsg_level, &ucmsg->cmsg_level) ||
191		    __get_user(kcmsg->cmsg_type, &ucmsg->cmsg_type) ||
192		    copy_from_user(CMSG_DATA(kcmsg),
193				   CMSG_COMPAT_DATA(ucmsg),
194				   (ucmlen - CMSG_COMPAT_ALIGN(sizeof(*ucmsg)))))
195			goto Efault;
196
197		/* Advance. */
198		kcmsg = (struct cmsghdr *)((char *)kcmsg + tmp);
199		ucmsg = cmsg_compat_nxthdr(kmsg, ucmsg, ucmlen);
200	}
201
202	/* Ok, looks like we made it.  Hook it up and return success. */
203	kmsg->msg_control = kcmsg_base;
204	kmsg->msg_controllen = kcmlen;
205	return 0;
206
207Einval:
208	err = -EINVAL;
209Efault:
210	if (kcmsg_base != (struct cmsghdr *)stackbuf)
211		sock_kfree_s(sk, kcmsg_base, kcmlen);
212	return err;
213}
214
215int put_cmsg_compat(struct msghdr *kmsg, int level, int type, int len, void *data)
216{
217	struct compat_timeval ctv;
218	struct compat_timespec cts;
219	struct compat_cmsghdr __user *cm = (struct compat_cmsghdr __user *) kmsg->msg_control;
220	struct compat_cmsghdr cmhdr;
221	int cmlen;
222
223	if (cm == NULL || kmsg->msg_controllen < sizeof(*cm)) {
224		kmsg->msg_flags |= MSG_CTRUNC;
225		return 0;
226	}
227
228	if (level == SOL_SOCKET && type == SO_TIMESTAMP) {
229		struct timeval *tv = (struct timeval *)data;
230		ctv.tv_sec = tv->tv_sec;
231		ctv.tv_usec = tv->tv_usec;
232		data = &ctv;
233		len = sizeof(ctv);
234	}
235	if (level == SOL_SOCKET && type == SO_TIMESTAMPNS) {
236		struct timespec *ts = (struct timespec *)data;
237		cts.tv_sec = ts->tv_sec;
238		cts.tv_nsec = ts->tv_nsec;
239		data = &cts;
240		len = sizeof(cts);
241	}
242
243	cmlen = CMSG_COMPAT_LEN(len);
244	if (kmsg->msg_controllen < cmlen) {
245		kmsg->msg_flags |= MSG_CTRUNC;
246		cmlen = kmsg->msg_controllen;
247	}
248	cmhdr.cmsg_level = level;
249	cmhdr.cmsg_type = type;
250	cmhdr.cmsg_len = cmlen;
251
252	if (copy_to_user(cm, &cmhdr, sizeof cmhdr))
253		return -EFAULT;
254	if (copy_to_user(CMSG_COMPAT_DATA(cm), data, cmlen - sizeof(struct compat_cmsghdr)))
255		return -EFAULT;
256	cmlen = CMSG_COMPAT_SPACE(len);
257	kmsg->msg_control += cmlen;
258	kmsg->msg_controllen -= cmlen;
259	return 0;
260}
261
262void scm_detach_fds_compat(struct msghdr *kmsg, struct scm_cookie *scm)
263{
264	struct compat_cmsghdr __user *cm = (struct compat_cmsghdr __user *) kmsg->msg_control;
265	int fdmax = (kmsg->msg_controllen - sizeof(struct compat_cmsghdr)) / sizeof(int);
266	int fdnum = scm->fp->count;
267	struct file **fp = scm->fp->fp;
268	int __user *cmfptr;
269	int err = 0, i;
270
271	if (fdnum < fdmax)
272		fdmax = fdnum;
273
274	for (i = 0, cmfptr = (int __user *) CMSG_COMPAT_DATA(cm); i < fdmax; i++, cmfptr++) {
275		int new_fd;
276		err = security_file_receive(fp[i]);
277		if (err)
278			break;
279		err = get_unused_fd();
280		if (err < 0)
281			break;
282		new_fd = err;
283		err = put_user(new_fd, cmfptr);
284		if (err) {
285			put_unused_fd(new_fd);
286			break;
287		}
288		/* Bump the usage count and install the file. */
289		get_file(fp[i]);
290		fd_install(new_fd, fp[i]);
291	}
292
293	if (i > 0) {
294		int cmlen = CMSG_COMPAT_LEN(i * sizeof(int));
295		err = put_user(SOL_SOCKET, &cm->cmsg_level);
296		if (!err)
297			err = put_user(SCM_RIGHTS, &cm->cmsg_type);
298		if (!err)
299			err = put_user(cmlen, &cm->cmsg_len);
300		if (!err) {
301			cmlen = CMSG_COMPAT_SPACE(i * sizeof(int));
302			kmsg->msg_control += cmlen;
303			kmsg->msg_controllen -= cmlen;
304		}
305	}
306	if (i < fdnum)
307		kmsg->msg_flags |= MSG_CTRUNC;
308
309	/*
310	 * All of the files that fit in the message have had their
311	 * usage counts incremented, so we just free the list.
312	 */
313	__scm_destroy(scm);
314}
315
316struct compat_ipt_replace {
317	char			name[IPT_TABLE_MAXNAMELEN];
318	u32			valid_hooks;
319	u32			num_entries;
320	u32			size;
321	u32			hook_entry[NF_IP_NUMHOOKS];
322	u32			underflow[NF_IP_NUMHOOKS];
323	u32			num_counters;
324	compat_uptr_t		counters;	/* struct ipt_counters * */
325	struct ipt_entry	entries[0];
326};
327
328static int do_netfilter_replace(int fd, int level, int optname,
329				char __user *optval, int optlen)
330{
331	struct compat_ipt_replace __user *urepl;
332	struct ipt_replace __user *repl_nat;
333	char name[IPT_TABLE_MAXNAMELEN];
334	u32 origsize, tmp32, num_counters;
335	unsigned int repl_nat_size;
336	int ret;
337	int i;
338	compat_uptr_t ucntrs;
339
340	urepl = (struct compat_ipt_replace __user *)optval;
341	if (get_user(origsize, &urepl->size))
342		return -EFAULT;
343
344	/* Hack: Causes ipchains to give correct error msg --RR */
345	if (optlen != sizeof(*urepl) + origsize)
346		return -ENOPROTOOPT;
347
348	repl_nat_size = sizeof(*repl_nat) + origsize;
349	repl_nat = compat_alloc_user_space(repl_nat_size);
350
351	ret = -EFAULT;
352	if (put_user(origsize, &repl_nat->size))
353		goto out;
354
355	if (!access_ok(VERIFY_READ, urepl, optlen) ||
356	    !access_ok(VERIFY_WRITE, repl_nat, optlen))
357		goto out;
358
359	if (__copy_from_user(name, urepl->name, sizeof(urepl->name)) ||
360	    __copy_to_user(repl_nat->name, name, sizeof(repl_nat->name)))
361		goto out;
362
363	if (__get_user(tmp32, &urepl->valid_hooks) ||
364	    __put_user(tmp32, &repl_nat->valid_hooks))
365		goto out;
366
367	if (__get_user(tmp32, &urepl->num_entries) ||
368	    __put_user(tmp32, &repl_nat->num_entries))
369		goto out;
370
371	if (__get_user(num_counters, &urepl->num_counters) ||
372	    __put_user(num_counters, &repl_nat->num_counters))
373		goto out;
374
375	if (__get_user(ucntrs, &urepl->counters) ||
376	    __put_user(compat_ptr(ucntrs), &repl_nat->counters))
377		goto out;
378
379	if (__copy_in_user(&repl_nat->entries[0],
380			   &urepl->entries[0],
381			   origsize))
382		goto out;
383
384	for (i = 0; i < NF_IP_NUMHOOKS; i++) {
385		if (__get_user(tmp32, &urepl->hook_entry[i]) ||
386		    __put_user(tmp32, &repl_nat->hook_entry[i]) ||
387		    __get_user(tmp32, &urepl->underflow[i]) ||
388		    __put_user(tmp32, &repl_nat->underflow[i]))
389			goto out;
390	}
391
392	/*
393	 * Since struct ipt_counters just contains two u_int64_t members
394	 * we can just do the access_ok check here and pass the (converted)
395	 * pointer into the standard syscall.  We hope that the pointer is
396	 * not misaligned ...
397	 */
398	if (!access_ok(VERIFY_WRITE, compat_ptr(ucntrs),
399		       num_counters * sizeof(struct ipt_counters)))
400		goto out;
401
402
403	ret = sys_setsockopt(fd, level, optname,
404			     (char __user *)repl_nat, repl_nat_size);
405
406out:
407	return ret;
408}
409
410/*
411 * A struct sock_filter is architecture independent.
412 */
413struct compat_sock_fprog {
414	u16		len;
415	compat_uptr_t	filter;		/* struct sock_filter * */
416};
417
418static int do_set_attach_filter(struct socket *sock, int level, int optname,
419				char __user *optval, int optlen)
420{
421	struct compat_sock_fprog __user *fprog32 = (struct compat_sock_fprog __user *)optval;
422	struct sock_fprog __user *kfprog = compat_alloc_user_space(sizeof(struct sock_fprog));
423	compat_uptr_t ptr;
424	u16 len;
425
426	if (!access_ok(VERIFY_READ, fprog32, sizeof(*fprog32)) ||
427	    !access_ok(VERIFY_WRITE, kfprog, sizeof(struct sock_fprog)) ||
428	    __get_user(len, &fprog32->len) ||
429	    __get_user(ptr, &fprog32->filter) ||
430	    __put_user(len, &kfprog->len) ||
431	    __put_user(compat_ptr(ptr), &kfprog->filter))
432		return -EFAULT;
433
434	return sock_setsockopt(sock, level, optname, (char __user *)kfprog,
435			      sizeof(struct sock_fprog));
436}
437
438static int do_set_sock_timeout(struct socket *sock, int level,
439		int optname, char __user *optval, int optlen)
440{
441	struct compat_timeval __user *up = (struct compat_timeval __user *) optval;
442	struct timeval ktime;
443	mm_segment_t old_fs;
444	int err;
445
446	if (optlen < sizeof(*up))
447		return -EINVAL;
448	if (!access_ok(VERIFY_READ, up, sizeof(*up)) ||
449	    __get_user(ktime.tv_sec, &up->tv_sec) ||
450	    __get_user(ktime.tv_usec, &up->tv_usec))
451		return -EFAULT;
452	old_fs = get_fs();
453	set_fs(KERNEL_DS);
454	err = sock_setsockopt(sock, level, optname, (char *) &ktime, sizeof(ktime));
455	set_fs(old_fs);
456
457	return err;
458}
459
460static int compat_sock_setsockopt(struct socket *sock, int level, int optname,
461				char __user *optval, int optlen)
462{
463	if (optname == SO_ATTACH_FILTER)
464		return do_set_attach_filter(sock, level, optname,
465					    optval, optlen);
466	if (optname == SO_RCVTIMEO || optname == SO_SNDTIMEO)
467		return do_set_sock_timeout(sock, level, optname, optval, optlen);
468
469	return sock_setsockopt(sock, level, optname, optval, optlen);
470}
471
472asmlinkage long compat_sys_setsockopt(int fd, int level, int optname,
473				char __user *optval, int optlen)
474{
475	int err;
476	struct socket *sock;
477
478	if (level == SOL_IPV6 && optname == IPT_SO_SET_REPLACE)
479		return do_netfilter_replace(fd, level, optname,
480					    optval, optlen);
481
482	if (optlen < 0)
483		return -EINVAL;
484
485	if ((sock = sockfd_lookup(fd, &err))!=NULL)
486	{
487		err = security_socket_setsockopt(sock,level,optname);
488		if (err) {
489			sockfd_put(sock);
490			return err;
491		}
492
493		if (level == SOL_SOCKET)
494			err = compat_sock_setsockopt(sock, level,
495					optname, optval, optlen);
496		else if (sock->ops->compat_setsockopt)
497			err = sock->ops->compat_setsockopt(sock, level,
498					optname, optval, optlen);
499		else
500			err = sock->ops->setsockopt(sock, level,
501					optname, optval, optlen);
502		sockfd_put(sock);
503	}
504	return err;
505}
506
507static int do_get_sock_timeout(struct socket *sock, int level, int optname,
508		char __user *optval, int __user *optlen)
509{
510	struct compat_timeval __user *up;
511	struct timeval ktime;
512	mm_segment_t old_fs;
513	int len, err;
514
515	up = (struct compat_timeval __user *) optval;
516	if (get_user(len, optlen))
517		return -EFAULT;
518	if (len < sizeof(*up))
519		return -EINVAL;
520	len = sizeof(ktime);
521	old_fs = get_fs();
522	set_fs(KERNEL_DS);
523	err = sock_getsockopt(sock, level, optname, (char *) &ktime, &len);
524	set_fs(old_fs);
525
526	if (!err) {
527		if (put_user(sizeof(*up), optlen) ||
528		    !access_ok(VERIFY_WRITE, up, sizeof(*up)) ||
529		    __put_user(ktime.tv_sec, &up->tv_sec) ||
530		    __put_user(ktime.tv_usec, &up->tv_usec))
531			err = -EFAULT;
532	}
533	return err;
534}
535
536static int compat_sock_getsockopt(struct socket *sock, int level, int optname,
537				char __user *optval, int __user *optlen)
538{
539	if (optname == SO_RCVTIMEO || optname == SO_SNDTIMEO)
540		return do_get_sock_timeout(sock, level, optname, optval, optlen);
541	return sock_getsockopt(sock, level, optname, optval, optlen);
542}
543
544int compat_sock_get_timestamp(struct sock *sk, struct timeval __user *userstamp)
545{
546	struct compat_timeval __user *ctv =
547			(struct compat_timeval __user*) userstamp;
548	int err = -ENOENT;
549	struct timeval tv;
550
551	if (!sock_flag(sk, SOCK_TIMESTAMP))
552		sock_enable_timestamp(sk);
553	tv = ktime_to_timeval(sk->sk_stamp);
554	if (tv.tv_sec == -1)
555		return err;
556	if (tv.tv_sec == 0) {
557		sk->sk_stamp = ktime_get_real();
558		tv = ktime_to_timeval(sk->sk_stamp);
559	}
560	err = 0;
561	if (put_user(tv.tv_sec, &ctv->tv_sec) ||
562			put_user(tv.tv_usec, &ctv->tv_usec))
563		err = -EFAULT;
564	return err;
565}
566EXPORT_SYMBOL(compat_sock_get_timestamp);
567
568int compat_sock_get_timestampns(struct sock *sk, struct timespec __user *userstamp)
569{
570	struct compat_timespec __user *ctv =
571			(struct compat_timespec __user*) userstamp;
572	int err = -ENOENT;
573	struct timespec ts;
574
575	if (!sock_flag(sk, SOCK_TIMESTAMP))
576		sock_enable_timestamp(sk);
577	ts = ktime_to_timespec(sk->sk_stamp);
578	if (ts.tv_sec == -1)
579		return err;
580	if (ts.tv_sec == 0) {
581		sk->sk_stamp = ktime_get_real();
582		ts = ktime_to_timespec(sk->sk_stamp);
583	}
584	err = 0;
585	if (put_user(ts.tv_sec, &ctv->tv_sec) ||
586			put_user(ts.tv_nsec, &ctv->tv_nsec))
587		err = -EFAULT;
588	return err;
589}
590EXPORT_SYMBOL(compat_sock_get_timestampns);
591
592asmlinkage long compat_sys_getsockopt(int fd, int level, int optname,
593				char __user *optval, int __user *optlen)
594{
595	int err;
596	struct socket *sock;
597
598	if ((sock = sockfd_lookup(fd, &err))!=NULL)
599	{
600		err = security_socket_getsockopt(sock, level,
601							   optname);
602		if (err) {
603			sockfd_put(sock);
604			return err;
605		}
606
607		if (level == SOL_SOCKET)
608			err = compat_sock_getsockopt(sock, level,
609					optname, optval, optlen);
610		else if (sock->ops->compat_getsockopt)
611			err = sock->ops->compat_getsockopt(sock, level,
612					optname, optval, optlen);
613		else
614			err = sock->ops->getsockopt(sock, level,
615					optname, optval, optlen);
616		sockfd_put(sock);
617	}
618	return err;
619}
620/* Argument list sizes for compat_sys_socketcall */
621#define AL(x) ((x) * sizeof(u32))
622static unsigned char nas[18]={AL(0),AL(3),AL(3),AL(3),AL(2),AL(3),
623				AL(3),AL(3),AL(4),AL(4),AL(4),AL(6),
624				AL(6),AL(2),AL(5),AL(5),AL(3),AL(3)};
625#undef AL
626
627asmlinkage long compat_sys_sendmsg(int fd, struct compat_msghdr __user *msg, unsigned flags)
628{
629	return sys_sendmsg(fd, (struct msghdr __user *)msg, flags | MSG_CMSG_COMPAT);
630}
631
632asmlinkage long compat_sys_recvmsg(int fd, struct compat_msghdr __user *msg, unsigned int flags)
633{
634	return sys_recvmsg(fd, (struct msghdr __user *)msg, flags | MSG_CMSG_COMPAT);
635}
636
637asmlinkage long compat_sys_socketcall(int call, u32 __user *args)
638{
639	int ret;
640	u32 a[6];
641	u32 a0, a1;
642
643	if (call < SYS_SOCKET || call > SYS_RECVMSG)
644		return -EINVAL;
645	if (copy_from_user(a, args, nas[call]))
646		return -EFAULT;
647	a0 = a[0];
648	a1 = a[1];
649
650	switch (call) {
651	case SYS_SOCKET:
652		ret = sys_socket(a0, a1, a[2]);
653		break;
654	case SYS_BIND:
655		ret = sys_bind(a0, compat_ptr(a1), a[2]);
656		break;
657	case SYS_CONNECT:
658		ret = sys_connect(a0, compat_ptr(a1), a[2]);
659		break;
660	case SYS_LISTEN:
661		ret = sys_listen(a0, a1);
662		break;
663	case SYS_ACCEPT:
664		ret = sys_accept(a0, compat_ptr(a1), compat_ptr(a[2]));
665		break;
666	case SYS_GETSOCKNAME:
667		ret = sys_getsockname(a0, compat_ptr(a1), compat_ptr(a[2]));
668		break;
669	case SYS_GETPEERNAME:
670		ret = sys_getpeername(a0, compat_ptr(a1), compat_ptr(a[2]));
671		break;
672	case SYS_SOCKETPAIR:
673		ret = sys_socketpair(a0, a1, a[2], compat_ptr(a[3]));
674		break;
675	case SYS_SEND:
676		ret = sys_send(a0, compat_ptr(a1), a[2], a[3]);
677		break;
678	case SYS_SENDTO:
679		ret = sys_sendto(a0, compat_ptr(a1), a[2], a[3], compat_ptr(a[4]), a[5]);
680		break;
681	case SYS_RECV:
682		ret = sys_recv(a0, compat_ptr(a1), a[2], a[3]);
683		break;
684	case SYS_RECVFROM:
685		ret = sys_recvfrom(a0, compat_ptr(a1), a[2], a[3], compat_ptr(a[4]), compat_ptr(a[5]));
686		break;
687	case SYS_SHUTDOWN:
688		ret = sys_shutdown(a0,a1);
689		break;
690	case SYS_SETSOCKOPT:
691		ret = compat_sys_setsockopt(a0, a1, a[2],
692				compat_ptr(a[3]), a[4]);
693		break;
694	case SYS_GETSOCKOPT:
695		ret = compat_sys_getsockopt(a0, a1, a[2],
696				compat_ptr(a[3]), compat_ptr(a[4]));
697		break;
698	case SYS_SENDMSG:
699		ret = compat_sys_sendmsg(a0, compat_ptr(a1), a[2]);
700		break;
701	case SYS_RECVMSG:
702		ret = compat_sys_recvmsg(a0, compat_ptr(a1), a[2]);
703		break;
704	default:
705		ret = -EINVAL;
706		break;
707	}
708	return ret;
709}
710