]>
Commit | Line | Data |
---|---|---|
1da177e4 LT |
1 | /* |
2 | * arch/s390/kernel/sys_s390.c | |
3 | * | |
4 | * S390 version | |
5 | * Copyright (C) 1999,2000 IBM Deutschland Entwicklung GmbH, IBM Corporation | |
6 | * Author(s): Martin Schwidefsky (schwidefsky@de.ibm.com), | |
7 | * Thomas Spatzier (tspat@de.ibm.com) | |
8 | * | |
9 | * Derived from "arch/i386/kernel/sys_i386.c" | |
10 | * | |
11 | * This file contains various random system calls that | |
12 | * have a non-standard calling sequence on the Linux/s390 | |
13 | * platform. | |
14 | */ | |
15 | ||
16 | #include <linux/errno.h> | |
17 | #include <linux/sched.h> | |
18 | #include <linux/mm.h> | |
4e950f6f | 19 | #include <linux/fs.h> |
1da177e4 | 20 | #include <linux/smp.h> |
1da177e4 LT |
21 | #include <linux/sem.h> |
22 | #include <linux/msg.h> | |
23 | #include <linux/shm.h> | |
24 | #include <linux/stat.h> | |
25 | #include <linux/syscalls.h> | |
26 | #include <linux/mman.h> | |
27 | #include <linux/file.h> | |
28 | #include <linux/utsname.h> | |
1da177e4 | 29 | #include <linux/personality.h> |
fe74290d | 30 | #include <linux/unistd.h> |
cba4fbbf | 31 | #include <linux/ipc.h> |
1da177e4 | 32 | #include <asm/uaccess.h> |
a806170e | 33 | #include "entry.h" |
1da177e4 | 34 | |
1da177e4 | 35 | /* |
a4679373 CH |
36 | * Perform the mmap() system call. Linux for S/390 isn't able to handle more |
37 | * than 5 system call parameters, so this system call uses a memory block | |
38 | * for parameter passing. | |
1da177e4 LT |
39 | */ |
40 | ||
a4679373 | 41 | struct s390_mmap_arg_struct { |
1da177e4 LT |
42 | unsigned long addr; |
43 | unsigned long len; | |
44 | unsigned long prot; | |
45 | unsigned long flags; | |
46 | unsigned long fd; | |
47 | unsigned long offset; | |
48 | }; | |
49 | ||
a4679373 | 50 | SYSCALL_DEFINE1(mmap2, struct s390_mmap_arg_struct __user *, arg) |
1da177e4 | 51 | { |
a4679373 | 52 | struct s390_mmap_arg_struct a; |
1da177e4 LT |
53 | int error = -EFAULT; |
54 | ||
55 | if (copy_from_user(&a, arg, sizeof(a))) | |
56 | goto out; | |
f8b72560 | 57 | error = sys_mmap_pgoff(a.addr, a.len, a.prot, a.flags, a.fd, a.offset); |
1da177e4 LT |
58 | out: |
59 | return error; | |
60 | } | |
61 | ||
1da177e4 LT |
62 | /* |
63 | * sys_ipc() is the de-multiplexer for the SysV IPC calls.. | |
64 | * | |
65 | * This is really horribly ugly. | |
66 | */ | |
baed7fc9 | 67 | SYSCALL_DEFINE5(s390_ipc, uint, call, int, first, unsigned long, second, |
26689452 | 68 | unsigned long, third, void __user *, ptr) |
1da177e4 LT |
69 | { |
70 | struct ipc_kludge tmp; | |
71 | int ret; | |
72 | ||
73 | switch (call) { | |
74 | case SEMOP: | |
75 | return sys_semtimedop(first, (struct sembuf __user *)ptr, | |
76 | (unsigned)second, NULL); | |
77 | case SEMTIMEDOP: | |
78 | return sys_semtimedop(first, (struct sembuf __user *)ptr, | |
79 | (unsigned)second, | |
80 | (const struct timespec __user *) third); | |
81 | case SEMGET: | |
82 | return sys_semget(first, (int)second, third); | |
83 | case SEMCTL: { | |
84 | union semun fourth; | |
85 | if (!ptr) | |
86 | return -EINVAL; | |
87 | if (get_user(fourth.__pad, (void __user * __user *) ptr)) | |
88 | return -EFAULT; | |
89 | return sys_semctl(first, (int)second, third, fourth); | |
90 | } | |
91 | case MSGSND: | |
92 | return sys_msgsnd (first, (struct msgbuf __user *) ptr, | |
93 | (size_t)second, third); | |
94 | break; | |
95 | case MSGRCV: | |
96 | if (!ptr) | |
97 | return -EINVAL; | |
98 | if (copy_from_user (&tmp, (struct ipc_kludge __user *) ptr, | |
99 | sizeof (struct ipc_kludge))) | |
100 | return -EFAULT; | |
101 | return sys_msgrcv (first, tmp.msgp, | |
102 | (size_t)second, tmp.msgtyp, third); | |
103 | case MSGGET: | |
104 | return sys_msgget((key_t)first, (int)second); | |
105 | case MSGCTL: | |
106 | return sys_msgctl(first, (int)second, | |
107 | (struct msqid_ds __user *)ptr); | |
108 | ||
109 | case SHMAT: { | |
110 | ulong raddr; | |
111 | ret = do_shmat(first, (char __user *)ptr, | |
112 | (int)second, &raddr); | |
113 | if (ret) | |
114 | return ret; | |
115 | return put_user (raddr, (ulong __user *) third); | |
116 | break; | |
117 | } | |
118 | case SHMDT: | |
119 | return sys_shmdt ((char __user *)ptr); | |
120 | case SHMGET: | |
121 | return sys_shmget(first, (size_t)second, third); | |
122 | case SHMCTL: | |
123 | return sys_shmctl(first, (int)second, | |
124 | (struct shmid_ds __user *) ptr); | |
125 | default: | |
126 | return -ENOSYS; | |
127 | ||
128 | } | |
129 | ||
130 | return -EINVAL; | |
131 | } | |
132 | ||
347a8dc3 | 133 | #ifdef CONFIG_64BIT |
26689452 | 134 | SYSCALL_DEFINE1(s390_personality, unsigned long, personality) |
1da177e4 LT |
135 | { |
136 | int ret; | |
137 | ||
138 | if (current->personality == PER_LINUX32 && personality == PER_LINUX) | |
139 | personality = PER_LINUX32; | |
140 | ret = sys_personality(personality); | |
141 | if (ret == PER_LINUX32) | |
142 | ret = PER_LINUX; | |
143 | ||
144 | return ret; | |
145 | } | |
347a8dc3 | 146 | #endif /* CONFIG_64BIT */ |
1da177e4 LT |
147 | |
148 | /* | |
149 | * Wrapper function for sys_fadvise64/fadvise64_64 | |
150 | */ | |
347a8dc3 | 151 | #ifndef CONFIG_64BIT |
1da177e4 | 152 | |
26689452 HC |
153 | SYSCALL_DEFINE5(s390_fadvise64, int, fd, u32, offset_high, u32, offset_low, |
154 | size_t, len, int, advice) | |
1da177e4 LT |
155 | { |
156 | return sys_fadvise64(fd, (u64) offset_high << 32 | offset_low, | |
157 | len, advice); | |
158 | } | |
159 | ||
1da177e4 LT |
160 | struct fadvise64_64_args { |
161 | int fd; | |
162 | long long offset; | |
163 | long long len; | |
164 | int advice; | |
165 | }; | |
166 | ||
26689452 | 167 | SYSCALL_DEFINE1(s390_fadvise64_64, struct fadvise64_64_args __user *, args) |
1da177e4 LT |
168 | { |
169 | struct fadvise64_64_args a; | |
170 | ||
171 | if ( copy_from_user(&a, args, sizeof(a)) ) | |
172 | return -EFAULT; | |
173 | return sys_fadvise64_64(a.fd, a.offset, a.len, a.advice); | |
174 | } | |
7a8e0c8d | 175 | |
7a8e0c8d MS |
176 | /* |
177 | * This is a wrapper to call sys_fallocate(). For 31 bit s390 the last | |
178 | * 64 bit argument "len" is split into the upper and lower 32 bits. The | |
179 | * system call wrapper in the user space loads the value to %r6/%r7. | |
180 | * The code in entry.S keeps the values in %r2 - %r6 where they are and | |
181 | * stores %r7 to 96(%r15). But the standard C linkage requires that | |
182 | * the whole 64 bit value for len is stored on the stack and doesn't | |
183 | * use %r6 at all. So s390_fallocate has to convert the arguments from | |
184 | * %r2: fd, %r3: mode, %r4/%r5: offset, %r6/96(%r15)-99(%r15): len | |
185 | * to | |
186 | * %r2: fd, %r3: mode, %r4/%r5: offset, 96(%r15)-103(%r15): len | |
187 | */ | |
26689452 | 188 | SYSCALL_DEFINE(s390_fallocate)(int fd, int mode, loff_t offset, |
7a8e0c8d MS |
189 | u32 len_high, u32 len_low) |
190 | { | |
191 | return sys_fallocate(fd, mode, offset, ((u64)len_high << 32) | len_low); | |
192 | } | |
26689452 HC |
193 | #ifdef CONFIG_HAVE_SYSCALL_WRAPPERS |
194 | asmlinkage long SyS_s390_fallocate(long fd, long mode, loff_t offset, | |
195 | long len_high, long len_low) | |
196 | { | |
197 | return SYSC_s390_fallocate((int) fd, (int) mode, offset, | |
198 | (u32) len_high, (u32) len_low); | |
199 | } | |
200 | SYSCALL_ALIAS(sys_s390_fallocate, SyS_s390_fallocate); | |
201 | #endif | |
202 | ||
7a8e0c8d | 203 | #endif |