[mirror_ubuntu-zesty-kernel.git] / arch / s390 / kernel / compat_linux.c

/*
 *  S390 version
 *    Copyright IBM Corp. 2000
 *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
 *               Gerhard Tonn (ton@de.ibm.com)   
 *               Thomas Spatzier (tspat@de.ibm.com)
 *
 *  Conversion between 31bit and 64bit native syscalls.
 *
 * Heavily inspired by the 32-bit Sparc compat code which is 
 * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
 * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
 *
 */


#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/fs.h> 
#include <linux/mm.h> 
#include <linux/file.h> 
#include <linux/signal.h>
#include <linux/resource.h>
#include <linux/times.h>
#include <linux/smp.h>
#include <linux/sem.h>
#include <linux/msg.h>
#include <linux/shm.h>
#include <linux/uio.h>
#include <linux/quota.h>
#include <linux/module.h>
#include <linux/poll.h>
#include <linux/personality.h>
#include <linux/stat.h>
#include <linux/filter.h>
#include <linux/highmem.h>
#include <linux/highuid.h>
#include <linux/mman.h>
#include <linux/ipv6.h>
#include <linux/in.h>
#include <linux/icmpv6.h>
#include <linux/syscalls.h>
#include <linux/sysctl.h>
#include <linux/binfmts.h>
#include <linux/capability.h>
#include <linux/compat.h>
#include <linux/vfs.h>
#include <linux/ptrace.h>
#include <linux/fadvise.h>
#include <linux/ipc.h>
#include <linux/slab.h>

#include <asm/types.h>
#include <asm/uaccess.h>

#include <net/scm.h>
#include <net/sock.h>

#include "compat_linux.h"

u32 psw32_user_bits = PSW32_MASK_DAT | PSW32_MASK_IO | PSW32_MASK_EXT |
		      PSW32_DEFAULT_KEY | PSW32_MASK_BASE | PSW32_MASK_MCHECK |
		      PSW32_MASK_PSTATE | PSW32_ASC_HOME;
 
/* For this source file, we want overflow handling. */

#undef high2lowuid
#undef high2lowgid
#undef low2highuid
#undef low2highgid
#undef SET_UID16
#undef SET_GID16
#undef NEW_TO_OLD_UID
#undef NEW_TO_OLD_GID
#undef SET_OLDSTAT_UID
#undef SET_OLDSTAT_GID
#undef SET_STAT_UID
#undef SET_STAT_GID

#define high2lowuid(uid) ((uid) > 65535) ? (u16)overflowuid : (u16)(uid)
#define high2lowgid(gid) ((gid) > 65535) ? (u16)overflowgid : (u16)(gid)
#define low2highuid(uid) ((uid) == (u16)-1) ? (uid_t)-1 : (uid_t)(uid)
#define low2highgid(gid) ((gid) == (u16)-1) ? (gid_t)-1 : (gid_t)(gid)
#define SET_UID16(var, uid)	var = high2lowuid(uid)
#define SET_GID16(var, gid)	var = high2lowgid(gid)
#define NEW_TO_OLD_UID(uid)	high2lowuid(uid)
#define NEW_TO_OLD_GID(gid)	high2lowgid(gid)
#define SET_OLDSTAT_UID(stat, uid)	(stat).st_uid = high2lowuid(uid)
#define SET_OLDSTAT_GID(stat, gid)	(stat).st_gid = high2lowgid(gid)
#define SET_STAT_UID(stat, uid)		(stat).st_uid = high2lowuid(uid)
#define SET_STAT_GID(stat, gid)		(stat).st_gid = high2lowgid(gid)

asmlinkage long sys32_chown16(const char __user * filename, u16 user, u16 group)
{
	return sys_chown(filename, low2highuid(user), low2highgid(group));
}

asmlinkage long sys32_lchown16(const char __user * filename, u16 user, u16 group)
{
	return sys_lchown(filename, low2highuid(user), low2highgid(group));
}

asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group)
{
	return sys_fchown(fd, low2highuid(user), low2highgid(group));
}

asmlinkage long sys32_setregid16(u16 rgid, u16 egid)
{
	return sys_setregid(low2highgid(rgid), low2highgid(egid));
}

asmlinkage long sys32_setgid16(u16 gid)
{
	return sys_setgid((gid_t)gid);
}

asmlinkage long sys32_setreuid16(u16 ruid, u16 euid)
{
	return sys_setreuid(low2highuid(ruid), low2highuid(euid));
}

asmlinkage long sys32_setuid16(u16 uid)
{
	return sys_setuid((uid_t)uid);
}

asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid)
{
	return sys_setresuid(low2highuid(ruid), low2highuid(euid),
		low2highuid(suid));
}

asmlinkage long sys32_getresuid16(u16 __user *ruidp, u16 __user *euidp, u16 __user *suidp)
{
	const struct cred *cred = current_cred();
	int retval;
	u16 ruid, euid, suid;

	ruid = high2lowuid(from_kuid_munged(cred->user_ns, cred->uid));
	euid = high2lowuid(from_kuid_munged(cred->user_ns, cred->euid));
	suid = high2lowuid(from_kuid_munged(cred->user_ns, cred->suid));

	if (!(retval   = put_user(ruid, ruidp)) &&
	    !(retval   = put_user(euid, euidp)))
		retval = put_user(suid, suidp);

	return retval;
}

asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid)
{
	return sys_setresgid(low2highgid(rgid), low2highgid(egid),
		low2highgid(sgid));
}

asmlinkage long sys32_getresgid16(u16 __user *rgidp, u16 __user *egidp, u16 __user *sgidp)
{
	const struct cred *cred = current_cred();
	int retval;
	u16 rgid, egid, sgid;

	rgid = high2lowgid(from_kgid_munged(cred->user_ns, cred->gid));
	egid = high2lowgid(from_kgid_munged(cred->user_ns, cred->egid));
	sgid = high2lowgid(from_kgid_munged(cred->user_ns, cred->sgid));

	if (!(retval   = put_user(rgid, rgidp)) &&
	    !(retval   = put_user(egid, egidp)))
		retval = put_user(sgid, sgidp);

	return retval;
}

asmlinkage long sys32_setfsuid16(u16 uid)
{
	return sys_setfsuid((uid_t)uid);
}

asmlinkage long sys32_setfsgid16(u16 gid)
{
	return sys_setfsgid((gid_t)gid);
}

static int groups16_to_user(u16 __user *grouplist, struct group_info *group_info)
{
	struct user_namespace *user_ns = current_user_ns();
	int i;
	u16 group;
	kgid_t kgid;

	for (i = 0; i < group_info->ngroups; i++) {
		kgid = GROUP_AT(group_info, i);
		group = (u16)from_kgid_munged(user_ns, kgid);
		if (put_user(group, grouplist+i))
			return -EFAULT;
	}

	return 0;
}

static int groups16_from_user(struct group_info *group_info, u16 __user *grouplist)
{
	struct user_namespace *user_ns = current_user_ns();
	int i;
	u16 group;
	kgid_t kgid;

	for (i = 0; i < group_info->ngroups; i++) {
		if (get_user(group, grouplist+i))
			return  -EFAULT;

		kgid = make_kgid(user_ns, (gid_t)group);
		if (!gid_valid(kgid))
			return -EINVAL;

		GROUP_AT(group_info, i) = kgid;
	}

	return 0;
}

asmlinkage long sys32_getgroups16(int gidsetsize, u16 __user *grouplist)
{
	int i;

	if (gidsetsize < 0)
		return -EINVAL;

	get_group_info(current->cred->group_info);
	i = current->cred->group_info->ngroups;
	if (gidsetsize) {
		if (i > gidsetsize) {
			i = -EINVAL;
			goto out;
		}
		if (groups16_to_user(grouplist, current->cred->group_info)) {
			i = -EFAULT;
			goto out;
		}
	}
out:
	put_group_info(current->cred->group_info);
	return i;
}

asmlinkage long sys32_setgroups16(int gidsetsize, u16 __user *grouplist)
{
	struct group_info *group_info;
	int retval;

	if (!capable(CAP_SETGID))
		return -EPERM;
	if ((unsigned)gidsetsize > NGROUPS_MAX)
		return -EINVAL;

	group_info = groups_alloc(gidsetsize);
	if (!group_info)
		return -ENOMEM;
	retval = groups16_from_user(group_info, grouplist);
	if (retval) {
		put_group_info(group_info);
		return retval;
	}

	retval = set_current_groups(group_info);
	put_group_info(group_info);

	return retval;
}

asmlinkage long sys32_getuid16(void)
{
	return high2lowuid(from_kuid_munged(current_user_ns(), current_uid()));
}

asmlinkage long sys32_geteuid16(void)
{
	return high2lowuid(from_kuid_munged(current_user_ns(), current_euid()));
}

asmlinkage long sys32_getgid16(void)
{
	return high2lowgid(from_kgid_munged(current_user_ns(), current_gid()));
}

asmlinkage long sys32_getegid16(void)
{
	return high2lowgid(from_kgid_munged(current_user_ns(), current_egid()));
}

#ifdef CONFIG_SYSVIPC
COMPAT_SYSCALL_DEFINE5(s390_ipc, uint, call, int, first, unsigned long, second,
		unsigned long, third, compat_uptr_t, ptr)
{
	if (call >> 16)		/* hack for backward compatibility */
		return -EINVAL;
	return compat_sys_ipc(call, first, second, third, ptr, third);
}
#endif

asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low)
{
	if ((int)high < 0)
		return -EINVAL;
	else
		return sys_truncate(path, (high << 32) | low);
}

asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
{
	if ((int)high < 0)
		return -EINVAL;
	else
		return sys_ftruncate(fd, (high << 32) | low);
}

asmlinkage long sys32_pread64(unsigned int fd, char __user *ubuf,
				size_t count, u32 poshi, u32 poslo)
{
	if ((compat_ssize_t) count < 0)
		return -EINVAL;
	return sys_pread64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
}

asmlinkage long sys32_pwrite64(unsigned int fd, const char __user *ubuf,
				size_t count, u32 poshi, u32 poslo)
{
	if ((compat_ssize_t) count < 0)
		return -EINVAL;
	return sys_pwrite64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
}

asmlinkage compat_ssize_t sys32_readahead(int fd, u32 offhi, u32 offlo, s32 count)
{
	return sys_readahead(fd, ((loff_t)AA(offhi) << 32) | AA(offlo), count);
}

struct stat64_emu31 {
	unsigned long long  st_dev;
	unsigned int    __pad1;
#define STAT64_HAS_BROKEN_ST_INO        1
	u32             __st_ino;
	unsigned int    st_mode;
	unsigned int    st_nlink;
	u32             st_uid;
	u32             st_gid;
	unsigned long long  st_rdev;
	unsigned int    __pad3;
	long            st_size;
	u32             st_blksize;
	unsigned char   __pad4[4];
	u32             __pad5;     /* future possible st_blocks high bits */
	u32             st_blocks;  /* Number 512-byte blocks allocated. */
	u32             st_atime;
	u32             __pad6;
	u32             st_mtime;
	u32             __pad7;
	u32             st_ctime;
	u32             __pad8;     /* will be high 32 bits of ctime someday */
	unsigned long   st_ino;
};	

static int cp_stat64(struct stat64_emu31 __user *ubuf, struct kstat *stat)
{
	struct stat64_emu31 tmp;

	memset(&tmp, 0, sizeof(tmp));

	tmp.st_dev = huge_encode_dev(stat->dev);
	tmp.st_ino = stat->ino;
	tmp.__st_ino = (u32)stat->ino;
	tmp.st_mode = stat->mode;
	tmp.st_nlink = (unsigned int)stat->nlink;
	tmp.st_uid = from_kuid_munged(current_user_ns(), stat->uid);
	tmp.st_gid = from_kgid_munged(current_user_ns(), stat->gid);
	tmp.st_rdev = huge_encode_dev(stat->rdev);
	tmp.st_size = stat->size;
	tmp.st_blksize = (u32)stat->blksize;
	tmp.st_blocks = (u32)stat->blocks;
	tmp.st_atime = (u32)stat->atime.tv_sec;
	tmp.st_mtime = (u32)stat->mtime.tv_sec;
	tmp.st_ctime = (u32)stat->ctime.tv_sec;

	return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0; 
}

asmlinkage long sys32_stat64(const char __user * filename, struct stat64_emu31 __user * statbuf)
{
	struct kstat stat;
	int ret = vfs_stat(filename, &stat);
	if (!ret)
		ret = cp_stat64(statbuf, &stat);
	return ret;
}

asmlinkage long sys32_lstat64(const char __user * filename, struct stat64_emu31 __user * statbuf)
{
	struct kstat stat;
	int ret = vfs_lstat(filename, &stat);
	if (!ret)
		ret = cp_stat64(statbuf, &stat);
	return ret;
}

asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 __user * statbuf)
{
	struct kstat stat;
	int ret = vfs_fstat(fd, &stat);
	if (!ret)
		ret = cp_stat64(statbuf, &stat);
	return ret;
}

asmlinkage long sys32_fstatat64(unsigned int dfd, const char __user *filename,
				struct stat64_emu31 __user* statbuf, int flag)
{
	struct kstat stat;
	int error;

	error = vfs_fstatat(dfd, filename, &stat, flag);
	if (error)
		return error;
	return cp_stat64(statbuf, &stat);
}

/*
 * Linux/i386 didn't use to be able to handle more than
 * 4 system call parameters, so these system calls used a memory
 * block for parameter passing..
 */

struct mmap_arg_struct_emu31 {
	compat_ulong_t addr;
	compat_ulong_t len;
	compat_ulong_t prot;
	compat_ulong_t flags;
	compat_ulong_t fd;
	compat_ulong_t offset;
};

asmlinkage unsigned long old32_mmap(struct mmap_arg_struct_emu31 __user *arg)
{
	struct mmap_arg_struct_emu31 a;

	if (copy_from_user(&a, arg, sizeof(a)))
		return -EFAULT;
	if (a.offset & ~PAGE_MASK)
		return -EINVAL;
	return sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd,
			      a.offset >> PAGE_SHIFT);
}

asmlinkage long sys32_mmap2(struct mmap_arg_struct_emu31 __user *arg)
{
	struct mmap_arg_struct_emu31 a;

	if (copy_from_user(&a, arg, sizeof(a)))
		return -EFAULT;
	return sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
}

asmlinkage long sys32_read(unsigned int fd, char __user * buf, size_t count)
{
	if ((compat_ssize_t) count < 0)
		return -EINVAL; 

	return sys_read(fd, buf, count);
}

asmlinkage long sys32_write(unsigned int fd, const char __user * buf, size_t count)
{
	if ((compat_ssize_t) count < 0)
		return -EINVAL; 

	return sys_write(fd, buf, count);
}

/*
 * 31 bit emulation wrapper functions for sys_fadvise64/fadvise64_64.
 * These need to rewrite the advise values for POSIX_FADV_{DONTNEED,NOREUSE}
 * because the 31 bit values differ from the 64 bit values.
 */

asmlinkage long
sys32_fadvise64(int fd, loff_t offset, size_t len, int advise)
{
	if (advise == 4)
		advise = POSIX_FADV_DONTNEED;
	else if (advise == 5)
		advise = POSIX_FADV_NOREUSE;
	return sys_fadvise64(fd, offset, len, advise);
}

struct fadvise64_64_args {
	int fd;
	long long offset;
	long long len;
	int advice;
};

asmlinkage long
sys32_fadvise64_64(struct fadvise64_64_args __user *args)
{
	struct fadvise64_64_args a;

	if ( copy_from_user(&a, args, sizeof(a)) )
		return -EFAULT;
	if (a.advice == 4)
		a.advice = POSIX_FADV_DONTNEED;
	else if (a.advice == 5)
		a.advice = POSIX_FADV_NOREUSE;
	return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice);
}
Commit	Line	Data
1da177e4	1	/*
1da177e4	2	* S390 version
a53c8fab	3	* Copyright IBM Corp. 2000
1da177e4 LT	4	* Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
	5	* Gerhard Tonn (ton@de.ibm.com)
	6	* Thomas Spatzier (tspat@de.ibm.com)
	7	*
	8	* Conversion between 31bit and 64bit native syscalls.
	9	*
	10	* Heavily inspired by the 32-bit Sparc compat code which is
	11	* Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
	12	* Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
	13	*
	14	*/
	15
	16
1da177e4 LT	17	#include <linux/kernel.h>
	18	#include <linux/sched.h>
	19	#include <linux/fs.h>
	20	#include <linux/mm.h>
	21	#include <linux/file.h>
	22	#include <linux/signal.h>
	23	#include <linux/resource.h>
	24	#include <linux/times.h>
1da177e4	25	#include <linux/smp.h>
1da177e4 LT	26	#include <linux/sem.h>
	27	#include <linux/msg.h>
	28	#include <linux/shm.h>
1da177e4	29	#include <linux/uio.h>
1da177e4 LT	30	#include <linux/quota.h>
1da177e4 LT	31	#include <linux/module.h>
1da177e4 LT	32	#include <linux/poll.h>
	33	#include <linux/personality.h>
	34	#include <linux/stat.h>
	35	#include <linux/filter.h>
	36	#include <linux/highmem.h>
	37	#include <linux/highuid.h>
	38	#include <linux/mman.h>
	39	#include <linux/ipv6.h>
	40	#include <linux/in.h>
	41	#include <linux/icmpv6.h>
	42	#include <linux/syscalls.h>
	43	#include <linux/sysctl.h>
	44	#include <linux/binfmts.h>
a9415644	45	#include <linux/capability.h>
1da177e4 LT	46	#include <linux/compat.h>
	47	#include <linux/vfs.h>
	48	#include <linux/ptrace.h>
068e1b94	49	#include <linux/fadvise.h>
cba4fbbf	50	#include <linux/ipc.h>
5a0e3ad6	51	#include <linux/slab.h>
1da177e4 LT	52
1da177e4 LT	53	#include <asm/types.h>
1da177e4	54	#include <asm/uaccess.h>
1da177e4 LT	55
	56	#include <net/scm.h>
	57	#include <net/sock.h>
	58
	59	#include "compat_linux.h"
	60
b50511e4 MS	61	u32 psw32_user_bits = PSW32_MASK_DAT \| PSW32_MASK_IO \| PSW32_MASK_EXT \|
	62	PSW32_DEFAULT_KEY \| PSW32_MASK_BASE \| PSW32_MASK_MCHECK \|
	63	PSW32_MASK_PSTATE \| PSW32_ASC_HOME;
1da177e4 LT	64
	65	/* For this source file, we want overflow handling. */
	66
	67	#undef high2lowuid
	68	#undef high2lowgid
	69	#undef low2highuid
	70	#undef low2highgid
	71	#undef SET_UID16
	72	#undef SET_GID16
	73	#undef NEW_TO_OLD_UID
	74	#undef NEW_TO_OLD_GID
	75	#undef SET_OLDSTAT_UID
	76	#undef SET_OLDSTAT_GID
	77	#undef SET_STAT_UID
	78	#undef SET_STAT_GID
	79
	80	#define high2lowuid(uid) ((uid) > 65535) ? (u16)overflowuid : (u16)(uid)
	81	#define high2lowgid(gid) ((gid) > 65535) ? (u16)overflowgid : (u16)(gid)
	82	#define low2highuid(uid) ((uid) == (u16)-1) ? (uid_t)-1 : (uid_t)(uid)
	83	#define low2highgid(gid) ((gid) == (u16)-1) ? (gid_t)-1 : (gid_t)(gid)
	84	#define SET_UID16(var, uid) var = high2lowuid(uid)
	85	#define SET_GID16(var, gid) var = high2lowgid(gid)
	86	#define NEW_TO_OLD_UID(uid) high2lowuid(uid)
	87	#define NEW_TO_OLD_GID(gid) high2lowgid(gid)
	88	#define SET_OLDSTAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid)
	89	#define SET_OLDSTAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid)
	90	#define SET_STAT_UID(stat, uid) (stat).st_uid = high2lowuid(uid)
	91	#define SET_STAT_GID(stat, gid) (stat).st_gid = high2lowgid(gid)
	92
24954a14	93	asmlinkage long sys32_chown16(const char __user * filename, u16 user, u16 group)
1da177e4 LT	94	{
	95	return sys_chown(filename, low2highuid(user), low2highgid(group));
	96	}
	97
24954a14	98	asmlinkage long sys32_lchown16(const char __user * filename, u16 user, u16 group)
1da177e4 LT	99	{
	100	return sys_lchown(filename, low2highuid(user), low2highgid(group));
	101	}
	102
	103	asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group)
	104	{
	105	return sys_fchown(fd, low2highuid(user), low2highgid(group));
	106	}
	107
	108	asmlinkage long sys32_setregid16(u16 rgid, u16 egid)
	109	{
	110	return sys_setregid(low2highgid(rgid), low2highgid(egid));
	111	}
	112
	113	asmlinkage long sys32_setgid16(u16 gid)
	114	{
	115	return sys_setgid((gid_t)gid);
	116	}
	117
	118	asmlinkage long sys32_setreuid16(u16 ruid, u16 euid)
	119	{
	120	return sys_setreuid(low2highuid(ruid), low2highuid(euid));
	121	}
	122
	123	asmlinkage long sys32_setuid16(u16 uid)
	124	{
	125	return sys_setuid((uid_t)uid);
	126	}
	127
	128	asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid)
	129	{
	130	return sys_setresuid(low2highuid(ruid), low2highuid(euid),
	131	low2highuid(suid));
	132	}
	133
558a4479	134	asmlinkage long sys32_getresuid16(u16 __user ruidp, u16 __user euidp, u16 __user *suidp)
1da177e4	135	{
558a4479	136	const struct cred *cred = current_cred();
1da177e4	137	int retval;
558a4479	138	u16 ruid, euid, suid;
1da177e4	139
558a4479 EB	140	ruid = high2lowuid(from_kuid_munged(cred->user_ns, cred->uid));
	141	euid = high2lowuid(from_kuid_munged(cred->user_ns, cred->euid));
	142	suid = high2lowuid(from_kuid_munged(cred->user_ns, cred->suid));
	143
	144	if (!(retval = put_user(ruid, ruidp)) &&
	145	!(retval = put_user(euid, euidp)))
	146	retval = put_user(suid, suidp);
1da177e4 LT	147
	148	return retval;
	149	}
	150
	151	asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid)
	152	{
	153	return sys_setresgid(low2highgid(rgid), low2highgid(egid),
	154	low2highgid(sgid));
	155	}
	156
558a4479	157	asmlinkage long sys32_getresgid16(u16 __user rgidp, u16 __user egidp, u16 __user *sgidp)
1da177e4	158	{
558a4479	159	const struct cred *cred = current_cred();
1da177e4	160	int retval;
558a4479 EB	161	u16 rgid, egid, sgid;
	162
	163	rgid = high2lowgid(from_kgid_munged(cred->user_ns, cred->gid));
	164	egid = high2lowgid(from_kgid_munged(cred->user_ns, cred->egid));
	165	sgid = high2lowgid(from_kgid_munged(cred->user_ns, cred->sgid));
1da177e4	166
558a4479 EB	167	if (!(retval = put_user(rgid, rgidp)) &&
	168	!(retval = put_user(egid, egidp)))
	169	retval = put_user(sgid, sgidp);
1da177e4 LT	170
	171	return retval;
	172	}
	173
	174	asmlinkage long sys32_setfsuid16(u16 uid)
	175	{
	176	return sys_setfsuid((uid_t)uid);
	177	}
	178
	179	asmlinkage long sys32_setfsgid16(u16 gid)
	180	{
	181	return sys_setfsgid((gid_t)gid);
	182	}
	183
24954a14	184	static int groups16_to_user(u16 __user grouplist, struct group_info group_info)
1da177e4	185	{
ae2975bc	186	struct user_namespace *user_ns = current_user_ns();
1da177e4 LT	187	int i;
1da177e4 LT	188	u16 group;
ae2975bc	189	kgid_t kgid;
1da177e4 LT	190
1da177e4 LT	191	for (i = 0; i < group_info->ngroups; i++) {
ae2975bc EB	192	kgid = GROUP_AT(group_info, i);
ae2975bc EB	193	group = (u16)from_kgid_munged(user_ns, kgid);
1da177e4 LT	194	if (put_user(group, grouplist+i))
	195	return -EFAULT;
	196	}
	197
	198	return 0;
	199	}
	200
24954a14	201	static int groups16_from_user(struct group_info group_info, u16 __user grouplist)
1da177e4	202	{
ae2975bc	203	struct user_namespace *user_ns = current_user_ns();
1da177e4 LT	204	int i;
1da177e4 LT	205	u16 group;
ae2975bc	206	kgid_t kgid;
1da177e4 LT	207
	208	for (i = 0; i < group_info->ngroups; i++) {
	209	if (get_user(group, grouplist+i))
	210	return -EFAULT;
ae2975bc EB	211
	212	kgid = make_kgid(user_ns, (gid_t)group);
	213	if (!gid_valid(kgid))
	214	return -EINVAL;
	215
	216	GROUP_AT(group_info, i) = kgid;
1da177e4 LT	217	}
	218
	219	return 0;
	220	}
	221
24954a14	222	asmlinkage long sys32_getgroups16(int gidsetsize, u16 __user *grouplist)
1da177e4 LT	223	{
	224	int i;
	225
	226	if (gidsetsize < 0)
	227	return -EINVAL;
	228
b6dff3ec DH	229	get_group_info(current->cred->group_info);
b6dff3ec DH	230	i = current->cred->group_info->ngroups;
1da177e4 LT	231	if (gidsetsize) {
	232	if (i > gidsetsize) {
	233	i = -EINVAL;
	234	goto out;
	235	}
b6dff3ec	236	if (groups16_to_user(grouplist, current->cred->group_info)) {
1da177e4 LT	237	i = -EFAULT;
	238	goto out;
	239	}
	240	}
	241	out:
b6dff3ec	242	put_group_info(current->cred->group_info);
1da177e4 LT	243	return i;
	244	}
	245
24954a14	246	asmlinkage long sys32_setgroups16(int gidsetsize, u16 __user *grouplist)
1da177e4 LT	247	{
	248	struct group_info *group_info;
	249	int retval;
	250
	251	if (!capable(CAP_SETGID))
	252	return -EPERM;
	253	if ((unsigned)gidsetsize > NGROUPS_MAX)
	254	return -EINVAL;
	255
	256	group_info = groups_alloc(gidsetsize);
	257	if (!group_info)
	258	return -ENOMEM;
	259	retval = groups16_from_user(group_info, grouplist);
	260	if (retval) {
	261	put_group_info(group_info);
	262	return retval;
	263	}
	264
	265	retval = set_current_groups(group_info);
	266	put_group_info(group_info);
	267
	268	return retval;
	269	}
	270
	271	asmlinkage long sys32_getuid16(void)
	272	{
558a4479	273	return high2lowuid(from_kuid_munged(current_user_ns(), current_uid()));
1da177e4 LT	274	}
	275
	276	asmlinkage long sys32_geteuid16(void)
	277	{
558a4479	278	return high2lowuid(from_kuid_munged(current_user_ns(), current_euid()));
1da177e4 LT	279	}
	280
	281	asmlinkage long sys32_getgid16(void)
	282	{
558a4479	283	return high2lowgid(from_kgid_munged(current_user_ns(), current_gid()));
1da177e4 LT	284	}
	285
	286	asmlinkage long sys32_getegid16(void)
	287	{
558a4479	288	return high2lowgid(from_kgid_munged(current_user_ns(), current_egid()));
1da177e4 LT	289	}
1da177e4 LT	290
1df23957	291	#ifdef CONFIG_SYSVIPC
56e41d3c AV	292	COMPAT_SYSCALL_DEFINE5(s390_ipc, uint, call, int, first, unsigned long, second,
56e41d3c AV	293	unsigned long, third, compat_uptr_t, ptr)
1da177e4 LT	294	{
	295	if (call >> 16) /* hack for backward compatibility */
	296	return -EINVAL;
56e41d3c	297	return compat_sys_ipc(call, first, second, third, ptr, third);
1da177e4	298	}
1df23957	299	#endif
1da177e4	300
24954a14	301	asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low)
1da177e4 LT	302	{
	303	if ((int)high < 0)
	304	return -EINVAL;
	305	else
	306	return sys_truncate(path, (high << 32) \| low);
	307	}
	308
	309	asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
	310	{
	311	if ((int)high < 0)
	312	return -EINVAL;
	313	else
	314	return sys_ftruncate(fd, (high << 32) \| low);
	315	}
	316
24954a14	317	asmlinkage long sys32_pread64(unsigned int fd, char __user *ubuf,
1da177e4 LT	318	size_t count, u32 poshi, u32 poslo)
	319	{
	320	if ((compat_ssize_t) count < 0)
	321	return -EINVAL;
	322	return sys_pread64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) \| AA(poslo));
	323	}
	324
24954a14	325	asmlinkage long sys32_pwrite64(unsigned int fd, const char __user *ubuf,
1da177e4 LT	326	size_t count, u32 poshi, u32 poslo)
	327	{
	328	if ((compat_ssize_t) count < 0)
	329	return -EINVAL;
	330	return sys_pwrite64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) \| AA(poslo));
	331	}
	332
	333	asmlinkage compat_ssize_t sys32_readahead(int fd, u32 offhi, u32 offlo, s32 count)
	334	{
	335	return sys_readahead(fd, ((loff_t)AA(offhi) << 32) \| AA(offlo), count);
	336	}
	337
1da177e4 LT	338	struct stat64_emu31 {
	339	unsigned long long st_dev;
	340	unsigned int __pad1;
	341	#define STAT64_HAS_BROKEN_ST_INO 1
	342	u32 __st_ino;
	343	unsigned int st_mode;
	344	unsigned int st_nlink;
	345	u32 st_uid;
	346	u32 st_gid;
	347	unsigned long long st_rdev;
	348	unsigned int __pad3;
	349	long st_size;
	350	u32 st_blksize;
	351	unsigned char __pad4[4];
	352	u32 __pad5; /* future possible st_blocks high bits */
	353	u32 st_blocks; /* Number 512-byte blocks allocated. */
	354	u32 st_atime;
	355	u32 __pad6;
	356	u32 st_mtime;
	357	u32 __pad7;
	358	u32 st_ctime;
	359	u32 __pad8; /* will be high 32 bits of ctime someday */
	360	unsigned long st_ino;
	361	};
	362
24954a14	363	static int cp_stat64(struct stat64_emu31 __user ubuf, struct kstat stat)
1da177e4 LT	364	{
	365	struct stat64_emu31 tmp;
	366
	367	memset(&tmp, 0, sizeof(tmp));
	368
	369	tmp.st_dev = huge_encode_dev(stat->dev);
	370	tmp.st_ino = stat->ino;
	371	tmp.__st_ino = (u32)stat->ino;
	372	tmp.st_mode = stat->mode;
	373	tmp.st_nlink = (unsigned int)stat->nlink;
a7c1938e EB	374	tmp.st_uid = from_kuid_munged(current_user_ns(), stat->uid);
a7c1938e EB	375	tmp.st_gid = from_kgid_munged(current_user_ns(), stat->gid);
1da177e4 LT	376	tmp.st_rdev = huge_encode_dev(stat->rdev);
	377	tmp.st_size = stat->size;
	378	tmp.st_blksize = (u32)stat->blksize;
	379	tmp.st_blocks = (u32)stat->blocks;
	380	tmp.st_atime = (u32)stat->atime.tv_sec;
	381	tmp.st_mtime = (u32)stat->mtime.tv_sec;
	382	tmp.st_ctime = (u32)stat->ctime.tv_sec;
	383
	384	return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
	385	}
	386
c7887325	387	asmlinkage long sys32_stat64(const char __user * filename, struct stat64_emu31 __user * statbuf)
1da177e4 LT	388	{
	389	struct kstat stat;
	390	int ret = vfs_stat(filename, &stat);
	391	if (!ret)
	392	ret = cp_stat64(statbuf, &stat);
	393	return ret;
	394	}
	395
c7887325	396	asmlinkage long sys32_lstat64(const char __user * filename, struct stat64_emu31 __user * statbuf)
1da177e4 LT	397	{
	398	struct kstat stat;
	399	int ret = vfs_lstat(filename, &stat);
	400	if (!ret)
	401	ret = cp_stat64(statbuf, &stat);
	402	return ret;
	403	}
	404
24954a14	405	asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 __user * statbuf)
1da177e4 LT	406	{
	407	struct kstat stat;
	408	int ret = vfs_fstat(fd, &stat);
	409	if (!ret)
	410	ret = cp_stat64(statbuf, &stat);
	411	return ret;
	412	}
	413
c7887325	414	asmlinkage long sys32_fstatat64(unsigned int dfd, const char __user *filename,
ed3d021b	415	struct stat64_emu31 __user* statbuf, int flag)
19bf9cbf HC	416	{
19bf9cbf HC	417	struct kstat stat;
0112fc22	418	int error;
19bf9cbf	419
0112fc22 OD	420	error = vfs_fstatat(dfd, filename, &stat, flag);
	421	if (error)
	422	return error;
	423	return cp_stat64(statbuf, &stat);
19bf9cbf HC	424	}
19bf9cbf HC	425
1da177e4 LT	426	/*
	427	* Linux/i386 didn't use to be able to handle more than
	428	* 4 system call parameters, so these system calls used a memory
	429	* block for parameter passing..
	430	*/
	431
	432	struct mmap_arg_struct_emu31 {
d3815898 HC	433	compat_ulong_t addr;
	434	compat_ulong_t len;
	435	compat_ulong_t prot;
	436	compat_ulong_t flags;
	437	compat_ulong_t fd;
	438	compat_ulong_t offset;
1da177e4 LT	439	};
1da177e4 LT	440
d3815898	441	asmlinkage unsigned long old32_mmap(struct mmap_arg_struct_emu31 __user *arg)
1da177e4 LT	442	{
1da177e4 LT	443	struct mmap_arg_struct_emu31 a;
1da177e4 LT	444
1da177e4 LT	445	if (copy_from_user(&a, arg, sizeof(a)))
d3815898	446	return -EFAULT;
1da177e4	447	if (a.offset & ~PAGE_MASK)
d3815898	448	return -EINVAL;
d3815898 HC	449	return sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd,
d3815898 HC	450	a.offset >> PAGE_SHIFT);
1da177e4 LT	451	}
1da177e4 LT	452
d3815898	453	asmlinkage long sys32_mmap2(struct mmap_arg_struct_emu31 __user *arg)
1da177e4 LT	454	{
1da177e4 LT	455	struct mmap_arg_struct_emu31 a;
1da177e4 LT	456
1da177e4 LT	457	if (copy_from_user(&a, arg, sizeof(a)))
d3815898	458	return -EFAULT;
d3815898	459	return sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
1da177e4 LT	460	}
1da177e4 LT	461
24954a14	462	asmlinkage long sys32_read(unsigned int fd, char __user * buf, size_t count)
1da177e4 LT	463	{
	464	if ((compat_ssize_t) count < 0)
	465	return -EINVAL;
	466
	467	return sys_read(fd, buf, count);
	468	}
	469
c7887325	470	asmlinkage long sys32_write(unsigned int fd, const char __user * buf, size_t count)
1da177e4 LT	471	{
	472	if ((compat_ssize_t) count < 0)
	473	return -EINVAL;
	474
	475	return sys_write(fd, buf, count);
	476	}
	477
068e1b94 MS	478	/*
	479	* 31 bit emulation wrapper functions for sys_fadvise64/fadvise64_64.
	480	* These need to rewrite the advise values for POSIX_FADV_{DONTNEED,NOREUSE}
	481	* because the 31 bit values differ from the 64 bit values.
	482	*/
	483
	484	asmlinkage long
	485	sys32_fadvise64(int fd, loff_t offset, size_t len, int advise)
	486	{
	487	if (advise == 4)
	488	advise = POSIX_FADV_DONTNEED;
	489	else if (advise == 5)
	490	advise = POSIX_FADV_NOREUSE;
	491	return sys_fadvise64(fd, offset, len, advise);
	492	}
	493
	494	struct fadvise64_64_args {
	495	int fd;
	496	long long offset;
	497	long long len;
	498	int advice;
	499	};
	500
	501	asmlinkage long
	502	sys32_fadvise64_64(struct fadvise64_64_args __user *args)
	503	{
	504	struct fadvise64_64_args a;
	505
	506	if ( copy_from_user(&a, args, sizeof(a)) )
	507	return -EFAULT;
	508	if (a.advice == 4)
	509	a.advice = POSIX_FADV_DONTNEED;
	510	else if (a.advice == 5)
	511	a.advice = POSIX_FADV_NOREUSE;
	512	return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice);
	513	}