blob: d0964d22adb5aecb66d94005483e04c7c282b657 [file] [log] [blame]
Linus Torvalds1da177e2005-04-16 15:20:36 -07001/*
Linus Torvalds1da177e2005-04-16 15:20:36 -07002 * S390 version
Heiko Carstensa53c8fa2012-07-20 11:15:04 +02003 * Copyright IBM Corp. 1999, 2000
Linus Torvalds1da177e2005-04-16 15:20:36 -07004 * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com),
5 * Thomas Spatzier (tspat@de.ibm.com)
6 *
7 * Derived from "arch/i386/kernel/sys_i386.c"
8 *
9 * This file contains various random system calls that
10 * have a non-standard calling sequence on the Linux/s390
11 * platform.
12 */
13
14#include <linux/errno.h>
15#include <linux/sched.h>
16#include <linux/mm.h>
Alexey Dobriyan4e950f62007-07-30 02:36:13 +040017#include <linux/fs.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070018#include <linux/smp.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070019#include <linux/sem.h>
20#include <linux/msg.h>
21#include <linux/shm.h>
22#include <linux/stat.h>
23#include <linux/syscalls.h>
24#include <linux/mman.h>
25#include <linux/file.h>
26#include <linux/utsname.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070027#include <linux/personality.h>
Arnd Bergmannfe742902006-10-02 02:18:34 -070028#include <linux/unistd.h>
Adrian Bunkcba4fbb2007-10-16 23:29:24 -070029#include <linux/ipc.h>
Linus Torvalds1da177e2005-04-16 15:20:36 -070030#include <asm/uaccess.h>
Heiko Carstensa8061702008-04-17 07:46:26 +020031#include "entry.h"
Linus Torvalds1da177e2005-04-16 15:20:36 -070032
Linus Torvalds1da177e2005-04-16 15:20:36 -070033/*
Christoph Hellwiga4679372010-03-10 15:21:15 -080034 * Perform the mmap() system call. Linux for S/390 isn't able to handle more
35 * than 5 system call parameters, so this system call uses a memory block
36 * for parameter passing.
Linus Torvalds1da177e2005-04-16 15:20:36 -070037 */
38
Christoph Hellwiga4679372010-03-10 15:21:15 -080039struct s390_mmap_arg_struct {
Linus Torvalds1da177e2005-04-16 15:20:36 -070040 unsigned long addr;
41 unsigned long len;
42 unsigned long prot;
43 unsigned long flags;
44 unsigned long fd;
45 unsigned long offset;
46};
47
Christoph Hellwiga4679372010-03-10 15:21:15 -080048SYSCALL_DEFINE1(mmap2, struct s390_mmap_arg_struct __user *, arg)
Linus Torvalds1da177e2005-04-16 15:20:36 -070049{
Christoph Hellwiga4679372010-03-10 15:21:15 -080050 struct s390_mmap_arg_struct a;
Linus Torvalds1da177e2005-04-16 15:20:36 -070051 int error = -EFAULT;
52
53 if (copy_from_user(&a, arg, sizeof(a)))
54 goto out;
Al Virof8b72562009-11-30 17:37:04 -050055 error = sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd, a.offset);
Linus Torvalds1da177e2005-04-16 15:20:36 -070056out:
57 return error;
58}
59
Linus Torvalds1da177e2005-04-16 15:20:36 -070060/*
Heiko Carstens3a3954c2011-12-27 11:27:21 +010061 * sys_ipc() is the de-multiplexer for the SysV IPC calls.
Linus Torvalds1da177e2005-04-16 15:20:36 -070062 */
Christoph Hellwigbaed7fc2010-03-10 15:21:18 -080063SYSCALL_DEFINE5(s390_ipc, uint, call, int, first, unsigned long, second,
Heiko Carstens26689452009-01-14 14:14:36 +010064 unsigned long, third, void __user *, ptr)
Linus Torvalds1da177e2005-04-16 15:20:36 -070065{
Heiko Carstens3a3954c2011-12-27 11:27:21 +010066 if (call >> 16)
67 return -EINVAL;
68 /* The s390 sys_ipc variant has only five parameters instead of six
69 * like the generic variant. The only difference is the handling of
70 * the SEMTIMEDOP subcall where on s390 the third parameter is used
71 * as a pointer to a struct timespec where the generic variant uses
72 * the fifth parameter.
73 * Therefore we can call the generic variant by simply passing the
74 * third parameter also as fifth parameter.
75 */
76 return sys_ipc(call, first, second, third, ptr, third);
Linus Torvalds1da177e2005-04-16 15:20:36 -070077}
78
Martin Schwidefsky347a8dc2006-01-06 00:19:28 -080079#ifdef CONFIG_64BIT
Heiko Carstens3a110372010-08-13 10:06:39 +020080SYSCALL_DEFINE1(s390_personality, unsigned int, personality)
Linus Torvalds1da177e2005-04-16 15:20:36 -070081{
Heiko Carstens3a110372010-08-13 10:06:39 +020082 unsigned int ret;
Linus Torvalds1da177e2005-04-16 15:20:36 -070083
Jiri Kosina5ab37e12012-08-02 09:11:23 +020084 if (personality(current->personality) == PER_LINUX32 &&
85 personality(personality) == PER_LINUX)
86 personality |= PER_LINUX32;
Linus Torvalds1da177e2005-04-16 15:20:36 -070087 ret = sys_personality(personality);
Jiri Kosina5ab37e12012-08-02 09:11:23 +020088 if (personality(ret) == PER_LINUX32)
89 ret &= ~PER_LINUX32;
Linus Torvalds1da177e2005-04-16 15:20:36 -070090
91 return ret;
92}
Martin Schwidefsky347a8dc2006-01-06 00:19:28 -080093#endif /* CONFIG_64BIT */
Linus Torvalds1da177e2005-04-16 15:20:36 -070094
95/*
96 * Wrapper function for sys_fadvise64/fadvise64_64
97 */
Martin Schwidefsky347a8dc2006-01-06 00:19:28 -080098#ifndef CONFIG_64BIT
Linus Torvalds1da177e2005-04-16 15:20:36 -070099
Heiko Carstens26689452009-01-14 14:14:36 +0100100SYSCALL_DEFINE5(s390_fadvise64, int, fd, u32, offset_high, u32, offset_low,
101 size_t, len, int, advice)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700102{
103 return sys_fadvise64(fd, (u64) offset_high << 32 | offset_low,
104 len, advice);
105}
106
Linus Torvalds1da177e2005-04-16 15:20:36 -0700107struct fadvise64_64_args {
108 int fd;
109 long long offset;
110 long long len;
111 int advice;
112};
113
Heiko Carstens26689452009-01-14 14:14:36 +0100114SYSCALL_DEFINE1(s390_fadvise64_64, struct fadvise64_64_args __user *, args)
Linus Torvalds1da177e2005-04-16 15:20:36 -0700115{
116 struct fadvise64_64_args a;
117
118 if ( copy_from_user(&a, args, sizeof(a)) )
119 return -EFAULT;
120 return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice);
121}
Martin Schwidefsky7a8e0c82007-07-27 12:29:16 +0200122
Martin Schwidefsky7a8e0c82007-07-27 12:29:16 +0200123/*
124 * This is a wrapper to call sys_fallocate(). For 31 bit s390 the last
125 * 64 bit argument "len" is split into the upper and lower 32 bits. The
126 * system call wrapper in the user space loads the value to %r6/%r7.
127 * The code in entry.S keeps the values in %r2 - %r6 where they are and
128 * stores %r7 to 96(%r15). But the standard C linkage requires that
129 * the whole 64 bit value for len is stored on the stack and doesn't
130 * use %r6 at all. So s390_fallocate has to convert the arguments from
131 * %r2: fd, %r3: mode, %r4/%r5: offset, %r6/96(%r15)-99(%r15): len
132 * to
133 * %r2: fd, %r3: mode, %r4/%r5: offset, 96(%r15)-103(%r15): len
134 */
Heiko Carstens26689452009-01-14 14:14:36 +0100135SYSCALL_DEFINE(s390_fallocate)(int fd, int mode, loff_t offset,
Martin Schwidefsky7a8e0c82007-07-27 12:29:16 +0200136 u32 len_high, u32 len_low)
137{
138 return sys_fallocate(fd, mode, offset, ((u64)len_high << 32) | len_low);
139}
Heiko Carstens26689452009-01-14 14:14:36 +0100140#ifdef CONFIG_HAVE_SYSCALL_WRAPPERS
141asmlinkage long SyS_s390_fallocate(long fd, long mode, loff_t offset,
142 long len_high, long len_low)
143{
144 return SYSC_s390_fallocate((int) fd, (int) mode, offset,
145 (u32) len_high, (u32) len_low);
146}
147SYSCALL_ALIAS(sys_s390_fallocate, SyS_s390_fallocate);
148#endif
149
Martin Schwidefsky7a8e0c82007-07-27 12:29:16 +0200150#endif