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