PageRenderTime 95ms CodeModel.GetById 11ms app.highlight 77ms RepoModel.GetById 1ms app.codeStats 0ms

/arch/s390/kernel/compat_linux.c

https://bitbucket.org/evzijst/gittest
C | 1045 lines | 846 code | 147 blank | 52 comment | 87 complexity | 26abd1d70a71789b01239a833bc318e4 MD5 | raw file
   1/*
   2 *  arch/s390x/kernel/linux32.c
   3 *
   4 *  S390 version
   5 *    Copyright (C) 2000 IBM Deutschland Entwicklung GmbH, IBM Corporation
   6 *    Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
   7 *               Gerhard Tonn (ton@de.ibm.com)   
   8 *               Thomas Spatzier (tspat@de.ibm.com)
   9 *
  10 *  Conversion between 31bit and 64bit native syscalls.
  11 *
  12 * Heavily inspired by the 32-bit Sparc compat code which is 
  13 * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
  14 * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
  15 *
  16 */
  17
  18
  19#include <linux/config.h>
  20#include <linux/kernel.h>
  21#include <linux/sched.h>
  22#include <linux/fs.h> 
  23#include <linux/mm.h> 
  24#include <linux/file.h> 
  25#include <linux/signal.h>
  26#include <linux/resource.h>
  27#include <linux/times.h>
  28#include <linux/utsname.h>
  29#include <linux/timex.h>
  30#include <linux/smp.h>
  31#include <linux/smp_lock.h>
  32#include <linux/sem.h>
  33#include <linux/msg.h>
  34#include <linux/shm.h>
  35#include <linux/slab.h>
  36#include <linux/uio.h>
  37#include <linux/nfs_fs.h>
  38#include <linux/quota.h>
  39#include <linux/module.h>
  40#include <linux/sunrpc/svc.h>
  41#include <linux/nfsd/nfsd.h>
  42#include <linux/nfsd/cache.h>
  43#include <linux/nfsd/xdr.h>
  44#include <linux/nfsd/syscall.h>
  45#include <linux/poll.h>
  46#include <linux/personality.h>
  47#include <linux/stat.h>
  48#include <linux/filter.h>
  49#include <linux/highmem.h>
  50#include <linux/highuid.h>
  51#include <linux/mman.h>
  52#include <linux/ipv6.h>
  53#include <linux/in.h>
  54#include <linux/icmpv6.h>
  55#include <linux/syscalls.h>
  56#include <linux/sysctl.h>
  57#include <linux/binfmts.h>
  58#include <linux/compat.h>
  59#include <linux/vfs.h>
  60#include <linux/ptrace.h>
  61
  62#include <asm/types.h>
  63#include <asm/ipc.h>
  64#include <asm/uaccess.h>
  65#include <asm/semaphore.h>
  66
  67#include <net/scm.h>
  68#include <net/sock.h>
  69
  70#include "compat_linux.h"
  71
  72 
  73/* For this source file, we want overflow handling. */
  74
  75#undef high2lowuid
  76#undef high2lowgid
  77#undef low2highuid
  78#undef low2highgid
  79#undef SET_UID16
  80#undef SET_GID16
  81#undef NEW_TO_OLD_UID
  82#undef NEW_TO_OLD_GID
  83#undef SET_OLDSTAT_UID
  84#undef SET_OLDSTAT_GID
  85#undef SET_STAT_UID
  86#undef SET_STAT_GID
  87
  88#define high2lowuid(uid) ((uid) > 65535) ? (u16)overflowuid : (u16)(uid)
  89#define high2lowgid(gid) ((gid) > 65535) ? (u16)overflowgid : (u16)(gid)
  90#define low2highuid(uid) ((uid) == (u16)-1) ? (uid_t)-1 : (uid_t)(uid)
  91#define low2highgid(gid) ((gid) == (u16)-1) ? (gid_t)-1 : (gid_t)(gid)
  92#define SET_UID16(var, uid)	var = high2lowuid(uid)
  93#define SET_GID16(var, gid)	var = high2lowgid(gid)
  94#define NEW_TO_OLD_UID(uid)	high2lowuid(uid)
  95#define NEW_TO_OLD_GID(gid)	high2lowgid(gid)
  96#define SET_OLDSTAT_UID(stat, uid)	(stat).st_uid = high2lowuid(uid)
  97#define SET_OLDSTAT_GID(stat, gid)	(stat).st_gid = high2lowgid(gid)
  98#define SET_STAT_UID(stat, uid)		(stat).st_uid = high2lowuid(uid)
  99#define SET_STAT_GID(stat, gid)		(stat).st_gid = high2lowgid(gid)
 100
 101asmlinkage long sys32_chown16(const char * filename, u16 user, u16 group)
 102{
 103	return sys_chown(filename, low2highuid(user), low2highgid(group));
 104}
 105
 106asmlinkage long sys32_lchown16(const char * filename, u16 user, u16 group)
 107{
 108	return sys_lchown(filename, low2highuid(user), low2highgid(group));
 109}
 110
 111asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group)
 112{
 113	return sys_fchown(fd, low2highuid(user), low2highgid(group));
 114}
 115
 116asmlinkage long sys32_setregid16(u16 rgid, u16 egid)
 117{
 118	return sys_setregid(low2highgid(rgid), low2highgid(egid));
 119}
 120
 121asmlinkage long sys32_setgid16(u16 gid)
 122{
 123	return sys_setgid((gid_t)gid);
 124}
 125
 126asmlinkage long sys32_setreuid16(u16 ruid, u16 euid)
 127{
 128	return sys_setreuid(low2highuid(ruid), low2highuid(euid));
 129}
 130
 131asmlinkage long sys32_setuid16(u16 uid)
 132{
 133	return sys_setuid((uid_t)uid);
 134}
 135
 136asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid)
 137{
 138	return sys_setresuid(low2highuid(ruid), low2highuid(euid),
 139		low2highuid(suid));
 140}
 141
 142asmlinkage long sys32_getresuid16(u16 *ruid, u16 *euid, u16 *suid)
 143{
 144	int retval;
 145
 146	if (!(retval = put_user(high2lowuid(current->uid), ruid)) &&
 147	    !(retval = put_user(high2lowuid(current->euid), euid)))
 148		retval = put_user(high2lowuid(current->suid), suid);
 149
 150	return retval;
 151}
 152
 153asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid)
 154{
 155	return sys_setresgid(low2highgid(rgid), low2highgid(egid),
 156		low2highgid(sgid));
 157}
 158
 159asmlinkage long sys32_getresgid16(u16 *rgid, u16 *egid, u16 *sgid)
 160{
 161	int retval;
 162
 163	if (!(retval = put_user(high2lowgid(current->gid), rgid)) &&
 164	    !(retval = put_user(high2lowgid(current->egid), egid)))
 165		retval = put_user(high2lowgid(current->sgid), sgid);
 166
 167	return retval;
 168}
 169
 170asmlinkage long sys32_setfsuid16(u16 uid)
 171{
 172	return sys_setfsuid((uid_t)uid);
 173}
 174
 175asmlinkage long sys32_setfsgid16(u16 gid)
 176{
 177	return sys_setfsgid((gid_t)gid);
 178}
 179
 180static int groups16_to_user(u16 *grouplist, struct group_info *group_info)
 181{
 182	int i;
 183	u16 group;
 184
 185	for (i = 0; i < group_info->ngroups; i++) {
 186		group = (u16)GROUP_AT(group_info, i);
 187		if (put_user(group, grouplist+i))
 188			return -EFAULT;
 189	}
 190
 191	return 0;
 192}
 193
 194static int groups16_from_user(struct group_info *group_info, u16 *grouplist)
 195{
 196	int i;
 197	u16 group;
 198
 199	for (i = 0; i < group_info->ngroups; i++) {
 200		if (get_user(group, grouplist+i))
 201			return  -EFAULT;
 202		GROUP_AT(group_info, i) = (gid_t)group;
 203	}
 204
 205	return 0;
 206}
 207
 208asmlinkage long sys32_getgroups16(int gidsetsize, u16 *grouplist)
 209{
 210	int i;
 211
 212	if (gidsetsize < 0)
 213		return -EINVAL;
 214
 215	get_group_info(current->group_info);
 216	i = current->group_info->ngroups;
 217	if (gidsetsize) {
 218		if (i > gidsetsize) {
 219			i = -EINVAL;
 220			goto out;
 221		}
 222		if (groups16_to_user(grouplist, current->group_info)) {
 223			i = -EFAULT;
 224			goto out;
 225		}
 226	}
 227out:
 228	put_group_info(current->group_info);
 229	return i;
 230}
 231
 232asmlinkage long sys32_setgroups16(int gidsetsize, u16 *grouplist)
 233{
 234	struct group_info *group_info;
 235	int retval;
 236
 237	if (!capable(CAP_SETGID))
 238		return -EPERM;
 239	if ((unsigned)gidsetsize > NGROUPS_MAX)
 240		return -EINVAL;
 241
 242	group_info = groups_alloc(gidsetsize);
 243	if (!group_info)
 244		return -ENOMEM;
 245	retval = groups16_from_user(group_info, grouplist);
 246	if (retval) {
 247		put_group_info(group_info);
 248		return retval;
 249	}
 250
 251	retval = set_current_groups(group_info);
 252	put_group_info(group_info);
 253
 254	return retval;
 255}
 256
 257asmlinkage long sys32_getuid16(void)
 258{
 259	return high2lowuid(current->uid);
 260}
 261
 262asmlinkage long sys32_geteuid16(void)
 263{
 264	return high2lowuid(current->euid);
 265}
 266
 267asmlinkage long sys32_getgid16(void)
 268{
 269	return high2lowgid(current->gid);
 270}
 271
 272asmlinkage long sys32_getegid16(void)
 273{
 274	return high2lowgid(current->egid);
 275}
 276
 277/* 32-bit timeval and related flotsam.  */
 278
 279static inline long get_tv32(struct timeval *o, struct compat_timeval *i)
 280{
 281	return (!access_ok(VERIFY_READ, tv32, sizeof(*tv32)) ||
 282		(__get_user(o->tv_sec, &i->tv_sec) ||
 283		 __get_user(o->tv_usec, &i->tv_usec)));
 284}
 285
 286static inline long put_tv32(struct compat_timeval *o, struct timeval *i)
 287{
 288	return (!access_ok(VERIFY_WRITE, o, sizeof(*o)) ||
 289		(__put_user(i->tv_sec, &o->tv_sec) ||
 290		 __put_user(i->tv_usec, &o->tv_usec)));
 291}
 292
 293/*
 294 * sys32_ipc() is the de-multiplexer for the SysV IPC calls in 32bit emulation.
 295 *
 296 * This is really horribly ugly.
 297 */
 298asmlinkage long sys32_ipc(u32 call, int first, int second, int third, u32 ptr)
 299{
 300	if (call >> 16)		/* hack for backward compatibility */
 301		return -EINVAL;
 302
 303	call &= 0xffff;
 304
 305	switch (call) {
 306	case SEMTIMEDOP:
 307		return compat_sys_semtimedop(first, compat_ptr(ptr),
 308					     second, compat_ptr(third));
 309	case SEMOP:
 310		/* struct sembuf is the same on 32 and 64bit :)) */
 311		return sys_semtimedop(first, compat_ptr(ptr),
 312				      second, NULL);
 313	case SEMGET:
 314		return sys_semget(first, second, third);
 315	case SEMCTL:
 316		return compat_sys_semctl(first, second, third,
 317					 compat_ptr(ptr));
 318	case MSGSND:
 319		return compat_sys_msgsnd(first, second, third,
 320					 compat_ptr(ptr));
 321	case MSGRCV:
 322		return compat_sys_msgrcv(first, second, 0, third,
 323					 0, compat_ptr(ptr));
 324	case MSGGET:
 325		return sys_msgget((key_t) first, second);
 326	case MSGCTL:
 327		return compat_sys_msgctl(first, second, compat_ptr(ptr));
 328	case SHMAT:
 329		return compat_sys_shmat(first, second, third,
 330					0, compat_ptr(ptr));
 331	case SHMDT:
 332		return sys_shmdt(compat_ptr(ptr));
 333	case SHMGET:
 334		return sys_shmget(first, (unsigned)second, third);
 335	case SHMCTL:
 336		return compat_sys_shmctl(first, second, compat_ptr(ptr));
 337	}
 338
 339	return -ENOSYS;
 340}
 341
 342asmlinkage long sys32_truncate64(const char * path, unsigned long high, unsigned long low)
 343{
 344	if ((int)high < 0)
 345		return -EINVAL;
 346	else
 347		return sys_truncate(path, (high << 32) | low);
 348}
 349
 350asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
 351{
 352	if ((int)high < 0)
 353		return -EINVAL;
 354	else
 355		return sys_ftruncate(fd, (high << 32) | low);
 356}
 357
 358int cp_compat_stat(struct kstat *stat, struct compat_stat *statbuf)
 359{
 360	int err;
 361
 362	if (!old_valid_dev(stat->dev) || !old_valid_dev(stat->rdev))
 363		return -EOVERFLOW;
 364
 365	err = put_user(old_encode_dev(stat->dev), &statbuf->st_dev);
 366	err |= put_user(stat->ino, &statbuf->st_ino);
 367	err |= put_user(stat->mode, &statbuf->st_mode);
 368	err |= put_user(stat->nlink, &statbuf->st_nlink);
 369	err |= put_user(high2lowuid(stat->uid), &statbuf->st_uid);
 370	err |= put_user(high2lowgid(stat->gid), &statbuf->st_gid);
 371	err |= put_user(old_encode_dev(stat->rdev), &statbuf->st_rdev);
 372	err |= put_user(stat->size, &statbuf->st_size);
 373	err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
 374	err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
 375	err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
 376	err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
 377	err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
 378	err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
 379	err |= put_user(stat->blksize, &statbuf->st_blksize);
 380	err |= put_user(stat->blocks, &statbuf->st_blocks);
 381/* fixme
 382	err |= put_user(0, &statbuf->__unused4[0]);
 383	err |= put_user(0, &statbuf->__unused4[1]);
 384*/
 385	return err;
 386}
 387
 388struct sysinfo32 {
 389        s32 uptime;
 390        u32 loads[3];
 391        u32 totalram;
 392        u32 freeram;
 393        u32 sharedram;
 394        u32 bufferram;
 395        u32 totalswap;
 396        u32 freeswap;
 397        unsigned short procs;
 398	unsigned short pads;
 399	u32 totalhigh;
 400	u32 freehigh;
 401	unsigned int mem_unit;
 402        char _f[8];
 403};
 404
 405asmlinkage long sys32_sysinfo(struct sysinfo32 __user *info)
 406{
 407	struct sysinfo s;
 408	int ret, err;
 409	mm_segment_t old_fs = get_fs ();
 410	
 411	set_fs (KERNEL_DS);
 412	ret = sys_sysinfo(&s);
 413	set_fs (old_fs);
 414	err = put_user (s.uptime, &info->uptime);
 415	err |= __put_user (s.loads[0], &info->loads[0]);
 416	err |= __put_user (s.loads[1], &info->loads[1]);
 417	err |= __put_user (s.loads[2], &info->loads[2]);
 418	err |= __put_user (s.totalram, &info->totalram);
 419	err |= __put_user (s.freeram, &info->freeram);
 420	err |= __put_user (s.sharedram, &info->sharedram);
 421	err |= __put_user (s.bufferram, &info->bufferram);
 422	err |= __put_user (s.totalswap, &info->totalswap);
 423	err |= __put_user (s.freeswap, &info->freeswap);
 424	err |= __put_user (s.procs, &info->procs);
 425	err |= __put_user (s.totalhigh, &info->totalhigh);
 426	err |= __put_user (s.freehigh, &info->freehigh);
 427	err |= __put_user (s.mem_unit, &info->mem_unit);
 428	if (err)
 429		return -EFAULT;
 430	return ret;
 431}
 432
 433asmlinkage long sys32_sched_rr_get_interval(compat_pid_t pid,
 434				struct compat_timespec __user *interval)
 435{
 436	struct timespec t;
 437	int ret;
 438	mm_segment_t old_fs = get_fs ();
 439	
 440	set_fs (KERNEL_DS);
 441	ret = sys_sched_rr_get_interval(pid, &t);
 442	set_fs (old_fs);
 443	if (put_compat_timespec(&t, interval))
 444		return -EFAULT;
 445	return ret;
 446}
 447
 448asmlinkage long sys32_rt_sigprocmask(int how, compat_sigset_t __user *set,
 449			compat_sigset_t __user *oset, size_t sigsetsize)
 450{
 451	sigset_t s;
 452	compat_sigset_t s32;
 453	int ret;
 454	mm_segment_t old_fs = get_fs();
 455	
 456	if (set) {
 457		if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
 458			return -EFAULT;
 459		switch (_NSIG_WORDS) {
 460		case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
 461		case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
 462		case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
 463		case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
 464		}
 465	}
 466	set_fs (KERNEL_DS);
 467	ret = sys_rt_sigprocmask(how, set ? &s : NULL, oset ? &s : NULL, sigsetsize);
 468	set_fs (old_fs);
 469	if (ret) return ret;
 470	if (oset) {
 471		switch (_NSIG_WORDS) {
 472		case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 473		case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 474		case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 475		case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 476		}
 477		if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
 478			return -EFAULT;
 479	}
 480	return 0;
 481}
 482
 483asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
 484				size_t sigsetsize)
 485{
 486	sigset_t s;
 487	compat_sigset_t s32;
 488	int ret;
 489	mm_segment_t old_fs = get_fs();
 490		
 491	set_fs (KERNEL_DS);
 492	ret = sys_rt_sigpending(&s, sigsetsize);
 493	set_fs (old_fs);
 494	if (!ret) {
 495		switch (_NSIG_WORDS) {
 496		case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
 497		case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
 498		case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
 499		case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
 500		}
 501		if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
 502			return -EFAULT;
 503	}
 504	return ret;
 505}
 506
 507asmlinkage long
 508sys32_rt_sigqueueinfo(int pid, int sig, compat_siginfo_t __user *uinfo)
 509{
 510	siginfo_t info;
 511	int ret;
 512	mm_segment_t old_fs = get_fs();
 513	
 514	if (copy_siginfo_from_user32(&info, uinfo))
 515		return -EFAULT;
 516	set_fs (KERNEL_DS);
 517	ret = sys_rt_sigqueueinfo(pid, sig, &info);
 518	set_fs (old_fs);
 519	return ret;
 520}
 521
 522/*
 523 * sys32_execve() executes a new program after the asm stub has set
 524 * things up for us.  This should basically do what I want it to.
 525 */
 526asmlinkage long
 527sys32_execve(struct pt_regs regs)
 528{
 529        int error;
 530        char * filename;
 531
 532        filename = getname(compat_ptr(regs.orig_gpr2));
 533        error = PTR_ERR(filename);
 534        if (IS_ERR(filename))
 535                goto out;
 536        error = compat_do_execve(filename, compat_ptr(regs.gprs[3]),
 537				 compat_ptr(regs.gprs[4]), &regs);
 538	if (error == 0)
 539	{
 540		task_lock(current);
 541		current->ptrace &= ~PT_DTRACE;
 542		task_unlock(current);
 543		current->thread.fp_regs.fpc=0;
 544		__asm__ __volatile__
 545		        ("sr  0,0\n\t"
 546		         "sfpc 0,0\n\t"
 547			 : : :"0");
 548	}
 549        putname(filename);
 550out:
 551        return error;
 552}
 553
 554
 555#ifdef CONFIG_MODULES
 556
 557asmlinkage long
 558sys32_init_module(void __user *umod, unsigned long len,
 559		const char __user *uargs)
 560{
 561	return sys_init_module(umod, len, uargs);
 562}
 563
 564asmlinkage long
 565sys32_delete_module(const char __user *name_user, unsigned int flags)
 566{
 567	return sys_delete_module(name_user, flags);
 568}
 569
 570#else /* CONFIG_MODULES */
 571
 572asmlinkage long
 573sys32_init_module(void __user *umod, unsigned long len,
 574		const char __user *uargs)
 575{
 576	return -ENOSYS;
 577}
 578
 579asmlinkage long
 580sys32_delete_module(const char __user *name_user, unsigned int flags)
 581{
 582	return -ENOSYS;
 583}
 584
 585#endif  /* CONFIG_MODULES */
 586
 587/* Translations due to time_t size differences.  Which affects all
 588   sorts of things, like timeval and itimerval.  */
 589
 590extern struct timezone sys_tz;
 591
 592asmlinkage long sys32_gettimeofday(struct compat_timeval *tv, struct timezone *tz)
 593{
 594	if (tv) {
 595		struct timeval ktv;
 596		do_gettimeofday(&ktv);
 597		if (put_tv32(tv, &ktv))
 598			return -EFAULT;
 599	}
 600	if (tz) {
 601		if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
 602			return -EFAULT;
 603	}
 604	return 0;
 605}
 606
 607static inline long get_ts32(struct timespec *o, struct compat_timeval *i)
 608{
 609	long usec;
 610
 611	if (!access_ok(VERIFY_READ, i, sizeof(*i)))
 612		return -EFAULT;
 613	if (__get_user(o->tv_sec, &i->tv_sec))
 614		return -EFAULT;
 615	if (__get_user(usec, &i->tv_usec))
 616		return -EFAULT;
 617	o->tv_nsec = usec * 1000;
 618	return 0;
 619}
 620
 621asmlinkage long sys32_settimeofday(struct compat_timeval *tv, struct timezone *tz)
 622{
 623	struct timespec kts;
 624	struct timezone ktz;
 625
 626 	if (tv) {
 627		if (get_ts32(&kts, tv))
 628			return -EFAULT;
 629	}
 630	if (tz) {
 631		if (copy_from_user(&ktz, tz, sizeof(ktz)))
 632			return -EFAULT;
 633	}
 634
 635	return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
 636}
 637
 638/* These are here just in case some old sparc32 binary calls it. */
 639asmlinkage long sys32_pause(void)
 640{
 641	current->state = TASK_INTERRUPTIBLE;
 642	schedule();
 643	return -ERESTARTNOHAND;
 644}
 645
 646asmlinkage long sys32_pread64(unsigned int fd, char *ubuf,
 647				size_t count, u32 poshi, u32 poslo)
 648{
 649	if ((compat_ssize_t) count < 0)
 650		return -EINVAL;
 651	return sys_pread64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
 652}
 653
 654asmlinkage long sys32_pwrite64(unsigned int fd, const char *ubuf,
 655				size_t count, u32 poshi, u32 poslo)
 656{
 657	if ((compat_ssize_t) count < 0)
 658		return -EINVAL;
 659	return sys_pwrite64(fd, ubuf, count, ((loff_t)AA(poshi) << 32) | AA(poslo));
 660}
 661
 662asmlinkage compat_ssize_t sys32_readahead(int fd, u32 offhi, u32 offlo, s32 count)
 663{
 664	return sys_readahead(fd, ((loff_t)AA(offhi) << 32) | AA(offlo), count);
 665}
 666
 667asmlinkage long sys32_sendfile(int out_fd, int in_fd, compat_off_t *offset, size_t count)
 668{
 669	mm_segment_t old_fs = get_fs();
 670	int ret;
 671	off_t of;
 672	
 673	if (offset && get_user(of, offset))
 674		return -EFAULT;
 675		
 676	set_fs(KERNEL_DS);
 677	ret = sys_sendfile(out_fd, in_fd, offset ? &of : NULL, count);
 678	set_fs(old_fs);
 679	
 680	if (!ret && offset && put_user(of, offset))
 681		return -EFAULT;
 682		
 683	return ret;
 684}
 685
 686asmlinkage long sys32_sendfile64(int out_fd, int in_fd,
 687				compat_loff_t *offset, s32 count)
 688{
 689	mm_segment_t old_fs = get_fs();
 690	int ret;
 691	loff_t lof;
 692	
 693	if (offset && get_user(lof, offset))
 694		return -EFAULT;
 695		
 696	set_fs(KERNEL_DS);
 697	ret = sys_sendfile64(out_fd, in_fd, offset ? &lof : NULL, count);
 698	set_fs(old_fs);
 699	
 700	if (offset && put_user(lof, offset))
 701		return -EFAULT;
 702		
 703	return ret;
 704}
 705
 706/* Handle adjtimex compatibility. */
 707
 708struct timex32 {
 709	u32 modes;
 710	s32 offset, freq, maxerror, esterror;
 711	s32 status, constant, precision, tolerance;
 712	struct compat_timeval time;
 713	s32 tick;
 714	s32 ppsfreq, jitter, shift, stabil;
 715	s32 jitcnt, calcnt, errcnt, stbcnt;
 716	s32  :32; s32  :32; s32  :32; s32  :32;
 717	s32  :32; s32  :32; s32  :32; s32  :32;
 718	s32  :32; s32  :32; s32  :32; s32  :32;
 719};
 720
 721extern int do_adjtimex(struct timex *);
 722
 723asmlinkage long sys32_adjtimex(struct timex32 *utp)
 724{
 725	struct timex txc;
 726	int ret;
 727
 728	memset(&txc, 0, sizeof(struct timex));
 729
 730	if(get_user(txc.modes, &utp->modes) ||
 731	   __get_user(txc.offset, &utp->offset) ||
 732	   __get_user(txc.freq, &utp->freq) ||
 733	   __get_user(txc.maxerror, &utp->maxerror) ||
 734	   __get_user(txc.esterror, &utp->esterror) ||
 735	   __get_user(txc.status, &utp->status) ||
 736	   __get_user(txc.constant, &utp->constant) ||
 737	   __get_user(txc.precision, &utp->precision) ||
 738	   __get_user(txc.tolerance, &utp->tolerance) ||
 739	   __get_user(txc.time.tv_sec, &utp->time.tv_sec) ||
 740	   __get_user(txc.time.tv_usec, &utp->time.tv_usec) ||
 741	   __get_user(txc.tick, &utp->tick) ||
 742	   __get_user(txc.ppsfreq, &utp->ppsfreq) ||
 743	   __get_user(txc.jitter, &utp->jitter) ||
 744	   __get_user(txc.shift, &utp->shift) ||
 745	   __get_user(txc.stabil, &utp->stabil) ||
 746	   __get_user(txc.jitcnt, &utp->jitcnt) ||
 747	   __get_user(txc.calcnt, &utp->calcnt) ||
 748	   __get_user(txc.errcnt, &utp->errcnt) ||
 749	   __get_user(txc.stbcnt, &utp->stbcnt))
 750		return -EFAULT;
 751
 752	ret = do_adjtimex(&txc);
 753
 754	if(put_user(txc.modes, &utp->modes) ||
 755	   __put_user(txc.offset, &utp->offset) ||
 756	   __put_user(txc.freq, &utp->freq) ||
 757	   __put_user(txc.maxerror, &utp->maxerror) ||
 758	   __put_user(txc.esterror, &utp->esterror) ||
 759	   __put_user(txc.status, &utp->status) ||
 760	   __put_user(txc.constant, &utp->constant) ||
 761	   __put_user(txc.precision, &utp->precision) ||
 762	   __put_user(txc.tolerance, &utp->tolerance) ||
 763	   __put_user(txc.time.tv_sec, &utp->time.tv_sec) ||
 764	   __put_user(txc.time.tv_usec, &utp->time.tv_usec) ||
 765	   __put_user(txc.tick, &utp->tick) ||
 766	   __put_user(txc.ppsfreq, &utp->ppsfreq) ||
 767	   __put_user(txc.jitter, &utp->jitter) ||
 768	   __put_user(txc.shift, &utp->shift) ||
 769	   __put_user(txc.stabil, &utp->stabil) ||
 770	   __put_user(txc.jitcnt, &utp->jitcnt) ||
 771	   __put_user(txc.calcnt, &utp->calcnt) ||
 772	   __put_user(txc.errcnt, &utp->errcnt) ||
 773	   __put_user(txc.stbcnt, &utp->stbcnt))
 774		ret = -EFAULT;
 775
 776	return ret;
 777}
 778
 779#ifdef CONFIG_SYSCTL
 780struct __sysctl_args32 {
 781	u32 name;
 782	int nlen;
 783	u32 oldval;
 784	u32 oldlenp;
 785	u32 newval;
 786	u32 newlen;
 787	u32 __unused[4];
 788};
 789
 790asmlinkage long sys32_sysctl(struct __sysctl_args32 *args)
 791{
 792	struct __sysctl_args32 tmp;
 793	int error;
 794	size_t oldlen, *oldlenp = NULL;
 795	unsigned long addr = (((long)&args->__unused[0]) + 7) & ~7;
 796
 797	if (copy_from_user(&tmp, args, sizeof(tmp)))
 798		return -EFAULT;
 799
 800	if (tmp.oldval && tmp.oldlenp) {
 801		/* Duh, this is ugly and might not work if sysctl_args
 802		   is in read-only memory, but do_sysctl does indirectly
 803		   a lot of uaccess in both directions and we'd have to
 804		   basically copy the whole sysctl.c here, and
 805		   glibc's __sysctl uses rw memory for the structure
 806		   anyway.  */
 807		if (get_user(oldlen, (u32 *)A(tmp.oldlenp)) ||
 808		    put_user(oldlen, (size_t *)addr))
 809			return -EFAULT;
 810		oldlenp = (size_t *)addr;
 811	}
 812
 813	lock_kernel();
 814	error = do_sysctl((int *)A(tmp.name), tmp.nlen, (void *)A(tmp.oldval),
 815			  oldlenp, (void *)A(tmp.newval), tmp.newlen);
 816	unlock_kernel();
 817	if (oldlenp) {
 818		if (!error) {
 819			if (get_user(oldlen, (size_t *)addr) ||
 820			    put_user(oldlen, (u32 *)A(tmp.oldlenp)))
 821				error = -EFAULT;
 822		}
 823		copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused));
 824	}
 825	return error;
 826}
 827#endif
 828
 829struct stat64_emu31 {
 830	unsigned long long  st_dev;
 831	unsigned int    __pad1;
 832#define STAT64_HAS_BROKEN_ST_INO        1
 833	u32             __st_ino;
 834	unsigned int    st_mode;
 835	unsigned int    st_nlink;
 836	u32             st_uid;
 837	u32             st_gid;
 838	unsigned long long  st_rdev;
 839	unsigned int    __pad3;
 840	long            st_size;
 841	u32             st_blksize;
 842	unsigned char   __pad4[4];
 843	u32             __pad5;     /* future possible st_blocks high bits */
 844	u32             st_blocks;  /* Number 512-byte blocks allocated. */
 845	u32             st_atime;
 846	u32             __pad6;
 847	u32             st_mtime;
 848	u32             __pad7;
 849	u32             st_ctime;
 850	u32             __pad8;     /* will be high 32 bits of ctime someday */
 851	unsigned long   st_ino;
 852};	
 853
 854static int cp_stat64(struct stat64_emu31 *ubuf, struct kstat *stat)
 855{
 856	struct stat64_emu31 tmp;
 857
 858	memset(&tmp, 0, sizeof(tmp));
 859
 860	tmp.st_dev = huge_encode_dev(stat->dev);
 861	tmp.st_ino = stat->ino;
 862	tmp.__st_ino = (u32)stat->ino;
 863	tmp.st_mode = stat->mode;
 864	tmp.st_nlink = (unsigned int)stat->nlink;
 865	tmp.st_uid = stat->uid;
 866	tmp.st_gid = stat->gid;
 867	tmp.st_rdev = huge_encode_dev(stat->rdev);
 868	tmp.st_size = stat->size;
 869	tmp.st_blksize = (u32)stat->blksize;
 870	tmp.st_blocks = (u32)stat->blocks;
 871	tmp.st_atime = (u32)stat->atime.tv_sec;
 872	tmp.st_mtime = (u32)stat->mtime.tv_sec;
 873	tmp.st_ctime = (u32)stat->ctime.tv_sec;
 874
 875	return copy_to_user(ubuf,&tmp,sizeof(tmp)) ? -EFAULT : 0; 
 876}
 877
 878asmlinkage long sys32_stat64(char * filename, struct stat64_emu31 * statbuf)
 879{
 880	struct kstat stat;
 881	int ret = vfs_stat(filename, &stat);
 882	if (!ret)
 883		ret = cp_stat64(statbuf, &stat);
 884	return ret;
 885}
 886
 887asmlinkage long sys32_lstat64(char * filename, struct stat64_emu31 * statbuf)
 888{
 889	struct kstat stat;
 890	int ret = vfs_lstat(filename, &stat);
 891	if (!ret)
 892		ret = cp_stat64(statbuf, &stat);
 893	return ret;
 894}
 895
 896asmlinkage long sys32_fstat64(unsigned long fd, struct stat64_emu31 * statbuf)
 897{
 898	struct kstat stat;
 899	int ret = vfs_fstat(fd, &stat);
 900	if (!ret)
 901		ret = cp_stat64(statbuf, &stat);
 902	return ret;
 903}
 904
 905/*
 906 * Linux/i386 didn't use to be able to handle more than
 907 * 4 system call parameters, so these system calls used a memory
 908 * block for parameter passing..
 909 */
 910
 911struct mmap_arg_struct_emu31 {
 912	u32	addr;
 913	u32	len;
 914	u32	prot;
 915	u32	flags;
 916	u32	fd;
 917	u32	offset;
 918};
 919
 920/* common code for old and new mmaps */
 921static inline long do_mmap2(
 922	unsigned long addr, unsigned long len,
 923	unsigned long prot, unsigned long flags,
 924	unsigned long fd, unsigned long pgoff)
 925{
 926	struct file * file = NULL;
 927	unsigned long error = -EBADF;
 928
 929	flags &= ~(MAP_EXECUTABLE | MAP_DENYWRITE);
 930	if (!(flags & MAP_ANONYMOUS)) {
 931		file = fget(fd);
 932		if (!file)
 933			goto out;
 934	}
 935
 936	down_write(&current->mm->mmap_sem);
 937	error = do_mmap_pgoff(file, addr, len, prot, flags, pgoff);
 938	if (!IS_ERR((void *) error) && error + len >= 0x80000000ULL) {
 939		/* Result is out of bounds.  */
 940		do_munmap(current->mm, addr, len);
 941		error = -ENOMEM;
 942	}
 943	up_write(&current->mm->mmap_sem);
 944
 945	if (file)
 946		fput(file);
 947out:    
 948	return error;
 949}
 950
 951
 952asmlinkage unsigned long
 953old32_mmap(struct mmap_arg_struct_emu31 *arg)
 954{
 955	struct mmap_arg_struct_emu31 a;
 956	int error = -EFAULT;
 957
 958	if (copy_from_user(&a, arg, sizeof(a)))
 959		goto out;
 960
 961	error = -EINVAL;
 962	if (a.offset & ~PAGE_MASK)
 963		goto out;
 964
 965	error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset >> PAGE_SHIFT); 
 966out:
 967	return error;
 968}
 969
 970asmlinkage long 
 971sys32_mmap2(struct mmap_arg_struct_emu31 *arg)
 972{
 973	struct mmap_arg_struct_emu31 a;
 974	int error = -EFAULT;
 975
 976	if (copy_from_user(&a, arg, sizeof(a)))
 977		goto out;
 978	error = do_mmap2(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
 979out:
 980	return error;
 981}
 982
 983asmlinkage long sys32_read(unsigned int fd, char * buf, size_t count)
 984{
 985	if ((compat_ssize_t) count < 0)
 986		return -EINVAL; 
 987
 988	return sys_read(fd, buf, count);
 989}
 990
 991asmlinkage long sys32_write(unsigned int fd, char * buf, size_t count)
 992{
 993	if ((compat_ssize_t) count < 0)
 994		return -EINVAL; 
 995
 996	return sys_write(fd, buf, count);
 997}
 998
 999asmlinkage long sys32_clone(struct pt_regs regs)
1000{
1001        unsigned long clone_flags;
1002        unsigned long newsp;
1003	int *parent_tidptr, *child_tidptr;
1004
1005        clone_flags = regs.gprs[3] & 0xffffffffUL;
1006        newsp = regs.orig_gpr2 & 0x7fffffffUL;
1007	parent_tidptr = (int *) (regs.gprs[4] & 0x7fffffffUL);
1008	child_tidptr = (int *) (regs.gprs[5] & 0x7fffffffUL);
1009        if (!newsp)
1010                newsp = regs.gprs[15];
1011        return do_fork(clone_flags, newsp, &regs, 0,
1012		       parent_tidptr, child_tidptr);
1013}
1014
1015/*
1016 * Wrapper function for sys_timer_create.
1017 */
1018extern asmlinkage long
1019sys_timer_create(clockid_t, struct sigevent *, timer_t *);
1020
1021asmlinkage long
1022sys32_timer_create(clockid_t which_clock, struct compat_sigevent *se32,
1023		timer_t *timer_id)
1024{
1025	struct sigevent se;
1026	timer_t ktimer_id;
1027	mm_segment_t old_fs;
1028	long ret;
1029
1030	if (se32 == NULL)
1031		return sys_timer_create(which_clock, NULL, timer_id);
1032
1033	if (get_compat_sigevent(&se, se32))
1034		return -EFAULT;
1035
1036	old_fs = get_fs();
1037	set_fs(KERNEL_DS);
1038	ret = sys_timer_create(which_clock, &se, &ktimer_id);
1039	set_fs(old_fs);
1040
1041	if (!ret)
1042		ret = put_user (ktimer_id, timer_id);
1043
1044	return ret;
1045}