Merge to Fedora kernel-2.6.18-1.2255_FC5-vs2.0.2.2-rc9 patched with stable patch...
[linux-2.6.git] / arch / sparc64 / kernel / sys_sparc32.c
1 /* $Id: sys_sparc32.c,v 1.184 2002/02/09 19:49:31 davem Exp $
2  * sys_sparc32.c: Conversion between 32bit and 64bit native syscalls.
3  *
4  * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
5  * Copyright (C) 1997 David S. Miller (davem@caip.rutgers.edu)
6  *
7  * These routines maintain argument size conversion between 32bit and 64bit
8  * environment.
9  */
10
11 #include <linux/kernel.h>
12 #include <linux/sched.h>
13 #include <linux/capability.h>
14 #include <linux/fs.h> 
15 #include <linux/mm.h> 
16 #include <linux/file.h> 
17 #include <linux/signal.h>
18 #include <linux/resource.h>
19 #include <linux/times.h>
20 #include <linux/utsname.h>
21 #include <linux/smp.h>
22 #include <linux/smp_lock.h>
23 #include <linux/sem.h>
24 #include <linux/msg.h>
25 #include <linux/shm.h>
26 #include <linux/slab.h>
27 #include <linux/uio.h>
28 #include <linux/nfs_fs.h>
29 #include <linux/quota.h>
30 #include <linux/module.h>
31 #include <linux/sunrpc/svc.h>
32 #include <linux/nfsd/nfsd.h>
33 #include <linux/nfsd/cache.h>
34 #include <linux/nfsd/xdr.h>
35 #include <linux/nfsd/syscall.h>
36 #include <linux/poll.h>
37 #include <linux/personality.h>
38 #include <linux/stat.h>
39 #include <linux/filter.h>
40 #include <linux/highmem.h>
41 #include <linux/highuid.h>
42 #include <linux/mman.h>
43 #include <linux/ipv6.h>
44 #include <linux/in.h>
45 #include <linux/icmpv6.h>
46 #include <linux/syscalls.h>
47 #include <linux/sysctl.h>
48 #include <linux/binfmts.h>
49 #include <linux/dnotify.h>
50 #include <linux/security.h>
51 #include <linux/compat.h>
52 #include <linux/vfs.h>
53 #include <linux/netfilter_ipv4/ip_tables.h>
54 #include <linux/ptrace.h>
55 #include <linux/highuid.h>
56
57 #include <asm/types.h>
58 #include <asm/ipc.h>
59 #include <asm/uaccess.h>
60 #include <asm/fpumacro.h>
61 #include <asm/semaphore.h>
62 #include <asm/mmu_context.h>
63 #include <asm/a.out.h>
64
65 asmlinkage long sys32_chown16(const char __user * filename, u16 user, u16 group)
66 {
67         return sys_chown(filename, low2highuid(user), low2highgid(group));
68 }
69
70 asmlinkage long sys32_lchown16(const char __user * filename, u16 user, u16 group)
71 {
72         return sys_lchown(filename, low2highuid(user), low2highgid(group));
73 }
74
75 asmlinkage long sys32_fchown16(unsigned int fd, u16 user, u16 group)
76 {
77         return sys_fchown(fd, low2highuid(user), low2highgid(group));
78 }
79
80 asmlinkage long sys32_setregid16(u16 rgid, u16 egid)
81 {
82         return sys_setregid(low2highgid(rgid), low2highgid(egid));
83 }
84
85 asmlinkage long sys32_setgid16(u16 gid)
86 {
87         return sys_setgid((gid_t)gid);
88 }
89
90 asmlinkage long sys32_setreuid16(u16 ruid, u16 euid)
91 {
92         return sys_setreuid(low2highuid(ruid), low2highuid(euid));
93 }
94
95 asmlinkage long sys32_setuid16(u16 uid)
96 {
97         return sys_setuid((uid_t)uid);
98 }
99
100 asmlinkage long sys32_setresuid16(u16 ruid, u16 euid, u16 suid)
101 {
102         return sys_setresuid(low2highuid(ruid), low2highuid(euid),
103                 low2highuid(suid));
104 }
105
106 asmlinkage long sys32_getresuid16(u16 __user *ruid, u16 __user *euid, u16 __user *suid)
107 {
108         int retval;
109
110         if (!(retval = put_user(high2lowuid(current->uid), ruid)) &&
111             !(retval = put_user(high2lowuid(current->euid), euid)))
112                 retval = put_user(high2lowuid(current->suid), suid);
113
114         return retval;
115 }
116
117 asmlinkage long sys32_setresgid16(u16 rgid, u16 egid, u16 sgid)
118 {
119         return sys_setresgid(low2highgid(rgid), low2highgid(egid),
120                 low2highgid(sgid));
121 }
122
123 asmlinkage long sys32_getresgid16(u16 __user *rgid, u16 __user *egid, u16 __user *sgid)
124 {
125         int retval;
126
127         if (!(retval = put_user(high2lowgid(current->gid), rgid)) &&
128             !(retval = put_user(high2lowgid(current->egid), egid)))
129                 retval = put_user(high2lowgid(current->sgid), sgid);
130
131         return retval;
132 }
133
134 asmlinkage long sys32_setfsuid16(u16 uid)
135 {
136         return sys_setfsuid((uid_t)uid);
137 }
138
139 asmlinkage long sys32_setfsgid16(u16 gid)
140 {
141         return sys_setfsgid((gid_t)gid);
142 }
143
144 static int groups16_to_user(u16 __user *grouplist, struct group_info *group_info)
145 {
146         int i;
147         u16 group;
148
149         for (i = 0; i < group_info->ngroups; i++) {
150                 group = (u16)GROUP_AT(group_info, i);
151                 if (put_user(group, grouplist+i))
152                         return -EFAULT;
153         }
154
155         return 0;
156 }
157
158 static int groups16_from_user(struct group_info *group_info, u16 __user *grouplist)
159 {
160         int i;
161         u16 group;
162
163         for (i = 0; i < group_info->ngroups; i++) {
164                 if (get_user(group, grouplist+i))
165                         return  -EFAULT;
166                 GROUP_AT(group_info, i) = (gid_t)group;
167         }
168
169         return 0;
170 }
171
172 asmlinkage long sys32_getgroups16(int gidsetsize, u16 __user *grouplist)
173 {
174         int i;
175
176         if (gidsetsize < 0)
177                 return -EINVAL;
178
179         get_group_info(current->group_info);
180         i = current->group_info->ngroups;
181         if (gidsetsize) {
182                 if (i > gidsetsize) {
183                         i = -EINVAL;
184                         goto out;
185                 }
186                 if (groups16_to_user(grouplist, current->group_info)) {
187                         i = -EFAULT;
188                         goto out;
189                 }
190         }
191 out:
192         put_group_info(current->group_info);
193         return i;
194 }
195
196 asmlinkage long sys32_setgroups16(int gidsetsize, u16 __user *grouplist)
197 {
198         struct group_info *group_info;
199         int retval;
200
201         if (!capable(CAP_SETGID))
202                 return -EPERM;
203         if ((unsigned)gidsetsize > NGROUPS_MAX)
204                 return -EINVAL;
205
206         group_info = groups_alloc(gidsetsize);
207         if (!group_info)
208                 return -ENOMEM;
209         retval = groups16_from_user(group_info, grouplist);
210         if (retval) {
211                 put_group_info(group_info);
212                 return retval;
213         }
214
215         retval = set_current_groups(group_info);
216         put_group_info(group_info);
217
218         return retval;
219 }
220
221 asmlinkage long sys32_getuid16(void)
222 {
223         return high2lowuid(current->uid);
224 }
225
226 asmlinkage long sys32_geteuid16(void)
227 {
228         return high2lowuid(current->euid);
229 }
230
231 asmlinkage long sys32_getgid16(void)
232 {
233         return high2lowgid(current->gid);
234 }
235
236 asmlinkage long sys32_getegid16(void)
237 {
238         return high2lowgid(current->egid);
239 }
240
241 /* 32-bit timeval and related flotsam.  */
242
243 static long get_tv32(struct timeval *o, struct compat_timeval __user *i)
244 {
245         return (!access_ok(VERIFY_READ, i, sizeof(*i)) ||
246                 (__get_user(o->tv_sec, &i->tv_sec) |
247                  __get_user(o->tv_usec, &i->tv_usec)));
248 }
249
250 static inline long put_tv32(struct compat_timeval __user *o, struct timeval *i)
251 {
252         return (!access_ok(VERIFY_WRITE, o, sizeof(*o)) ||
253                 (__put_user(i->tv_sec, &o->tv_sec) |
254                  __put_user(i->tv_usec, &o->tv_usec)));
255 }
256
257 #ifdef CONFIG_SYSVIPC                                                        
258 asmlinkage long compat_sys_ipc(u32 call, u32 first, u32 second, u32 third, compat_uptr_t ptr, u32 fifth)
259 {
260         int version;
261
262         version = call >> 16; /* hack for backward compatibility */
263         call &= 0xffff;
264
265         switch (call) {
266         case SEMTIMEDOP:
267                 if (fifth)
268                         /* sign extend semid */
269                         return compat_sys_semtimedop((int)first,
270                                                      compat_ptr(ptr), second,
271                                                      compat_ptr(fifth));
272                 /* else fall through for normal semop() */
273         case SEMOP:
274                 /* struct sembuf is the same on 32 and 64bit :)) */
275                 /* sign extend semid */
276                 return sys_semtimedop((int)first, compat_ptr(ptr), second,
277                                       NULL);
278         case SEMGET:
279                 /* sign extend key, nsems */
280                 return sys_semget((int)first, (int)second, third);
281         case SEMCTL:
282                 /* sign extend semid, semnum */
283                 return compat_sys_semctl((int)first, (int)second, third,
284                                          compat_ptr(ptr));
285
286         case MSGSND:
287                 /* sign extend msqid */
288                 return compat_sys_msgsnd((int)first, (int)second, third,
289                                          compat_ptr(ptr));
290         case MSGRCV:
291                 /* sign extend msqid, msgtyp */
292                 return compat_sys_msgrcv((int)first, second, (int)fifth,
293                                          third, version, compat_ptr(ptr));
294         case MSGGET:
295                 /* sign extend key */
296                 return sys_msgget((int)first, second);
297         case MSGCTL:
298                 /* sign extend msqid */
299                 return compat_sys_msgctl((int)first, second, compat_ptr(ptr));
300
301         case SHMAT:
302                 /* sign extend shmid */
303                 return compat_sys_shmat((int)first, second, third, version,
304                                         compat_ptr(ptr));
305         case SHMDT:
306                 return sys_shmdt(compat_ptr(ptr));
307         case SHMGET:
308                 /* sign extend key_t */
309                 return sys_shmget((int)first, second, third);
310         case SHMCTL:
311                 /* sign extend shmid */
312                 return compat_sys_shmctl((int)first, second, compat_ptr(ptr));
313
314         default:
315                 return -ENOSYS;
316         };
317
318         return -ENOSYS;
319 }
320 #endif
321
322 asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low)
323 {
324         if ((int)high < 0)
325                 return -EINVAL;
326         else
327                 return sys_truncate(path, (high << 32) | low);
328 }
329
330 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
331 {
332         if ((int)high < 0)
333                 return -EINVAL;
334         else
335                 return sys_ftruncate(fd, (high << 32) | low);
336 }
337
338 int cp_compat_stat(struct kstat *stat, struct compat_stat __user *statbuf)
339 {
340         compat_ino_t ino;
341         int err;
342
343         if (stat->size > MAX_NON_LFS || !old_valid_dev(stat->dev) ||
344             !old_valid_dev(stat->rdev))
345                 return -EOVERFLOW;
346
347         ino = stat->ino;
348         if (sizeof(ino) < sizeof(stat->ino) && ino != stat->ino)
349                 return -EOVERFLOW;
350
351         err  = put_user(old_encode_dev(stat->dev), &statbuf->st_dev);
352         err |= put_user(stat->ino, &statbuf->st_ino);
353         err |= put_user(stat->mode, &statbuf->st_mode);
354         err |= put_user(stat->nlink, &statbuf->st_nlink);
355         err |= put_user(high2lowuid(stat->uid), &statbuf->st_uid);
356         err |= put_user(high2lowgid(stat->gid), &statbuf->st_gid);
357         err |= put_user(old_encode_dev(stat->rdev), &statbuf->st_rdev);
358         err |= put_user(stat->size, &statbuf->st_size);
359         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
360         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
361         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
362         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
363         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
364         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
365         err |= put_user(stat->blksize, &statbuf->st_blksize);
366         err |= put_user(stat->blocks, &statbuf->st_blocks);
367         err |= put_user(0, &statbuf->__unused4[0]);
368         err |= put_user(0, &statbuf->__unused4[1]);
369
370         return err;
371 }
372
373 int cp_compat_stat64(struct kstat *stat, struct compat_stat64 __user *statbuf)
374 {
375         int err;
376
377         err  = put_user(huge_encode_dev(stat->dev), &statbuf->st_dev);
378         err |= put_user(stat->ino, &statbuf->st_ino);
379         err |= put_user(stat->mode, &statbuf->st_mode);
380         err |= put_user(stat->nlink, &statbuf->st_nlink);
381         err |= put_user(stat->uid, &statbuf->st_uid);
382         err |= put_user(stat->gid, &statbuf->st_gid);
383         err |= put_user(huge_encode_dev(stat->rdev), &statbuf->st_rdev);
384         err |= put_user(0, (unsigned long __user *) &statbuf->__pad3[0]);
385         err |= put_user(stat->size, &statbuf->st_size);
386         err |= put_user(stat->blksize, &statbuf->st_blksize);
387         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[0]);
388         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[4]);
389         err |= put_user(stat->blocks, &statbuf->st_blocks);
390         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
391         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
392         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
393         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
394         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
395         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
396         err |= put_user(0, &statbuf->__unused4);
397         err |= put_user(0, &statbuf->__unused5);
398
399         return err;
400 }
401
402 asmlinkage long compat_sys_stat64(char __user * filename,
403                 struct compat_stat64 __user *statbuf)
404 {
405         struct kstat stat;
406         int error = vfs_stat(filename, &stat);
407
408         if (!error)
409                 error = cp_compat_stat64(&stat, statbuf);
410         return error;
411 }
412
413 asmlinkage long compat_sys_lstat64(char __user * filename,
414                 struct compat_stat64 __user *statbuf)
415 {
416         struct kstat stat;
417         int error = vfs_lstat(filename, &stat);
418
419         if (!error)
420                 error = cp_compat_stat64(&stat, statbuf);
421         return error;
422 }
423
424 asmlinkage long compat_sys_fstat64(unsigned int fd,
425                 struct compat_stat64 __user * statbuf)
426 {
427         struct kstat stat;
428         int error = vfs_fstat(fd, &stat);
429
430         if (!error)
431                 error = cp_compat_stat64(&stat, statbuf);
432         return error;
433 }
434
435 asmlinkage long compat_sys_fstatat64(unsigned int dfd, char __user *filename,
436                 struct compat_stat64 __user * statbuf, int flag)
437 {
438         struct kstat stat;
439         int error = -EINVAL;
440
441         if ((flag & ~AT_SYMLINK_NOFOLLOW) != 0)
442                 goto out;
443
444         if (flag & AT_SYMLINK_NOFOLLOW)
445                 error = vfs_lstat_fd(dfd, filename, &stat);
446         else
447                 error = vfs_stat_fd(dfd, filename, &stat);
448
449         if (!error)
450                 error = cp_compat_stat64(&stat, statbuf);
451
452 out:
453         return error;
454 }
455
456 asmlinkage long compat_sys_sysfs(int option, u32 arg1, u32 arg2)
457 {
458         return sys_sysfs(option, arg1, arg2);
459 }
460
461 struct sysinfo32 {
462         s32 uptime;
463         u32 loads[3];
464         u32 totalram;
465         u32 freeram;
466         u32 sharedram;
467         u32 bufferram;
468         u32 totalswap;
469         u32 freeswap;
470         unsigned short procs;
471         unsigned short pad;
472         u32 totalhigh;
473         u32 freehigh;
474         u32 mem_unit;
475         char _f[20-2*sizeof(int)-sizeof(int)];
476 };
477
478 asmlinkage long sys32_sysinfo(struct sysinfo32 __user *info)
479 {
480         struct sysinfo s;
481         int ret, err;
482         int bitcount = 0;
483         mm_segment_t old_fs = get_fs ();
484         
485         set_fs(KERNEL_DS);
486         ret = sys_sysinfo((struct sysinfo __user *) &s);
487         set_fs(old_fs);
488         /* Check to see if any memory value is too large for 32-bit and
489          * scale down if needed.
490          */
491         if ((s.totalram >> 32) || (s.totalswap >> 32)) {
492                 while (s.mem_unit < PAGE_SIZE) {
493                         s.mem_unit <<= 1;
494                         bitcount++;
495                 }
496                 s.totalram >>= bitcount;
497                 s.freeram >>= bitcount;
498                 s.sharedram >>= bitcount;
499                 s.bufferram >>= bitcount;
500                 s.totalswap >>= bitcount;
501                 s.freeswap >>= bitcount;
502                 s.totalhigh >>= bitcount;
503                 s.freehigh >>= bitcount;
504         }
505
506         err = put_user (s.uptime, &info->uptime);
507         err |= __put_user (s.loads[0], &info->loads[0]);
508         err |= __put_user (s.loads[1], &info->loads[1]);
509         err |= __put_user (s.loads[2], &info->loads[2]);
510         err |= __put_user (s.totalram, &info->totalram);
511         err |= __put_user (s.freeram, &info->freeram);
512         err |= __put_user (s.sharedram, &info->sharedram);
513         err |= __put_user (s.bufferram, &info->bufferram);
514         err |= __put_user (s.totalswap, &info->totalswap);
515         err |= __put_user (s.freeswap, &info->freeswap);
516         err |= __put_user (s.procs, &info->procs);
517         err |= __put_user (s.totalhigh, &info->totalhigh);
518         err |= __put_user (s.freehigh, &info->freehigh);
519         err |= __put_user (s.mem_unit, &info->mem_unit);
520         if (err)
521                 return -EFAULT;
522         return ret;
523 }
524
525 asmlinkage long compat_sys_sched_rr_get_interval(compat_pid_t pid, struct compat_timespec __user *interval)
526 {
527         struct timespec t;
528         int ret;
529         mm_segment_t old_fs = get_fs ();
530         
531         set_fs (KERNEL_DS);
532         ret = sys_sched_rr_get_interval(pid, (struct timespec __user *) &t);
533         set_fs (old_fs);
534         if (put_compat_timespec(&t, interval))
535                 return -EFAULT;
536         return ret;
537 }
538
539 asmlinkage long compat_sys_rt_sigprocmask(int how,
540                                           compat_sigset_t __user *set,
541                                           compat_sigset_t __user *oset,
542                                           compat_size_t sigsetsize)
543 {
544         sigset_t s;
545         compat_sigset_t s32;
546         int ret;
547         mm_segment_t old_fs = get_fs();
548         
549         if (set) {
550                 if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
551                         return -EFAULT;
552                 switch (_NSIG_WORDS) {
553                 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
554                 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
555                 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
556                 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
557                 }
558         }
559         set_fs (KERNEL_DS);
560         ret = sys_rt_sigprocmask(how,
561                                  set ? (sigset_t __user *) &s : NULL,
562                                  oset ? (sigset_t __user *) &s : NULL,
563                                  sigsetsize);
564         set_fs (old_fs);
565         if (ret) return ret;
566         if (oset) {
567                 switch (_NSIG_WORDS) {
568                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
569                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
570                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
571                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
572                 }
573                 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
574                         return -EFAULT;
575         }
576         return 0;
577 }
578
579 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
580                                     compat_size_t sigsetsize)
581 {
582         sigset_t s;
583         compat_sigset_t s32;
584         int ret;
585         mm_segment_t old_fs = get_fs();
586                 
587         set_fs (KERNEL_DS);
588         ret = sys_rt_sigpending((sigset_t __user *) &s, sigsetsize);
589         set_fs (old_fs);
590         if (!ret) {
591                 switch (_NSIG_WORDS) {
592                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
593                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
594                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
595                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
596                 }
597                 if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
598                         return -EFAULT;
599         }
600         return ret;
601 }
602
603 asmlinkage long compat_sys_rt_sigqueueinfo(int pid, int sig,
604                                            struct compat_siginfo __user *uinfo)
605 {
606         siginfo_t info;
607         int ret;
608         mm_segment_t old_fs = get_fs();
609         
610         if (copy_siginfo_from_user32(&info, uinfo))
611                 return -EFAULT;
612
613         set_fs (KERNEL_DS);
614         ret = sys_rt_sigqueueinfo(pid, sig, (siginfo_t __user *) &info);
615         set_fs (old_fs);
616         return ret;
617 }
618
619 asmlinkage long compat_sys_sigaction(int sig, struct old_sigaction32 __user *act,
620                                      struct old_sigaction32 __user *oact)
621 {
622         struct k_sigaction new_ka, old_ka;
623         int ret;
624
625         if (sig < 0) {
626                 set_thread_flag(TIF_NEWSIGNALS);
627                 sig = -sig;
628         }
629
630         if (act) {
631                 compat_old_sigset_t mask;
632                 u32 u_handler, u_restorer;
633                 
634                 ret = get_user(u_handler, &act->sa_handler);
635                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
636                 ret |= __get_user(u_restorer, &act->sa_restorer);
637                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
638                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
639                 ret |= __get_user(mask, &act->sa_mask);
640                 if (ret)
641                         return ret;
642                 new_ka.ka_restorer = NULL;
643                 siginitset(&new_ka.sa.sa_mask, mask);
644         }
645
646         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
647
648         if (!ret && oact) {
649                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
650                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
651                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
652                 ret |= __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask);
653         }
654
655         return ret;
656 }
657
658 asmlinkage long compat_sys_rt_sigaction(int sig,
659                                         struct sigaction32 __user *act,
660                                         struct sigaction32 __user *oact,
661                                         void __user *restorer,
662                                         compat_size_t sigsetsize)
663 {
664         struct k_sigaction new_ka, old_ka;
665         int ret;
666         compat_sigset_t set32;
667
668         /* XXX: Don't preclude handling different sized sigset_t's.  */
669         if (sigsetsize != sizeof(compat_sigset_t))
670                 return -EINVAL;
671
672         /* All tasks which use RT signals (effectively) use
673          * new style signals.
674          */
675         set_thread_flag(TIF_NEWSIGNALS);
676
677         if (act) {
678                 u32 u_handler, u_restorer;
679
680                 new_ka.ka_restorer = restorer;
681                 ret = get_user(u_handler, &act->sa_handler);
682                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
683                 ret |= __copy_from_user(&set32, &act->sa_mask, sizeof(compat_sigset_t));
684                 switch (_NSIG_WORDS) {
685                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6] | (((long)set32.sig[7]) << 32);
686                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4] | (((long)set32.sig[5]) << 32);
687                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2] | (((long)set32.sig[3]) << 32);
688                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0] | (((long)set32.sig[1]) << 32);
689                 }
690                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
691                 ret |= __get_user(u_restorer, &act->sa_restorer);
692                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
693                 if (ret)
694                         return -EFAULT;
695         }
696
697         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
698
699         if (!ret && oact) {
700                 switch (_NSIG_WORDS) {
701                 case 4: set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32); set32.sig[6] = old_ka.sa.sa_mask.sig[3];
702                 case 3: set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32); set32.sig[4] = old_ka.sa.sa_mask.sig[2];
703                 case 2: set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32); set32.sig[2] = old_ka.sa.sa_mask.sig[1];
704                 case 1: set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32); set32.sig[0] = old_ka.sa.sa_mask.sig[0];
705                 }
706                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
707                 ret |= __copy_to_user(&oact->sa_mask, &set32, sizeof(compat_sigset_t));
708                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
709                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
710                 if (ret)
711                         ret = -EFAULT;
712         }
713
714         return ret;
715 }
716
717 /*
718  * sparc32_execve() executes a new program after the asm stub has set
719  * things up for us.  This should basically do what I want it to.
720  */
721 asmlinkage long sparc32_execve(struct pt_regs *regs)
722 {
723         int error, base = 0;
724         char *filename;
725
726         /* User register window flush is done by entry.S */
727
728         /* Check for indirect call. */
729         if ((u32)regs->u_regs[UREG_G1] == 0)
730                 base = 1;
731
732         filename = getname(compat_ptr(regs->u_regs[base + UREG_I0]));
733         error = PTR_ERR(filename);
734         if (IS_ERR(filename))
735                 goto out;
736
737         error = compat_do_execve(filename,
738                                  compat_ptr(regs->u_regs[base + UREG_I1]),
739                                  compat_ptr(regs->u_regs[base + UREG_I2]), regs);
740
741         putname(filename);
742
743         if (!error) {
744                 fprs_write(0);
745                 current_thread_info()->xfsr[0] = 0;
746                 current_thread_info()->fpsaved[0] = 0;
747                 regs->tstate &= ~TSTATE_PEF;
748                 task_lock(current);
749                 current->ptrace &= ~PT_DTRACE;
750                 task_unlock(current);
751         }
752 out:
753         return error;
754 }
755
756 #ifdef CONFIG_MODULES
757
758 asmlinkage long sys32_init_module(void __user *umod, u32 len,
759                                   const char __user *uargs)
760 {
761         return sys_init_module(umod, len, uargs);
762 }
763
764 asmlinkage long sys32_delete_module(const char __user *name_user,
765                                     unsigned int flags)
766 {
767         return sys_delete_module(name_user, flags);
768 }
769
770 #else /* CONFIG_MODULES */
771
772 asmlinkage long sys32_init_module(const char __user *name_user,
773                                   struct module __user *mod_user)
774 {
775         return -ENOSYS;
776 }
777
778 asmlinkage long sys32_delete_module(const char __user *name_user)
779 {
780         return -ENOSYS;
781 }
782
783 #endif  /* CONFIG_MODULES */
784
785 /* Translations due to time_t size differences.  Which affects all
786    sorts of things, like timeval and itimerval.  */
787
788 extern struct timezone sys_tz;
789
790 asmlinkage long sys32_gettimeofday(struct compat_timeval __user *tv,
791                                    struct timezone __user *tz)
792 {
793         if (tv) {
794                 struct timeval ktv;
795                 do_gettimeofday(&ktv);
796                 if (put_tv32(tv, &ktv))
797                         return -EFAULT;
798         }
799         if (tz) {
800                 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
801                         return -EFAULT;
802         }
803         return 0;
804 }
805
806 static inline long get_ts32(struct timespec *o, struct compat_timeval __user *i)
807 {
808         long usec;
809
810         if (!access_ok(VERIFY_READ, i, sizeof(*i)))
811                 return -EFAULT;
812         if (__get_user(o->tv_sec, &i->tv_sec))
813                 return -EFAULT;
814         if (__get_user(usec, &i->tv_usec))
815                 return -EFAULT;
816         o->tv_nsec = usec * 1000;
817         return 0;
818 }
819
820 asmlinkage long sys32_settimeofday(struct compat_timeval __user *tv,
821                                    struct timezone __user *tz)
822 {
823         struct timespec kts;
824         struct timezone ktz;
825
826         if (tv) {
827                 if (get_ts32(&kts, tv))
828                         return -EFAULT;
829         }
830         if (tz) {
831                 if (copy_from_user(&ktz, tz, sizeof(ktz)))
832                         return -EFAULT;
833         }
834
835         return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
836 }
837
838 asmlinkage long sys32_utimes(char __user *filename,
839                              struct compat_timeval __user *tvs)
840 {
841         struct timeval ktvs[2];
842
843         if (tvs) {
844                 if (get_tv32(&ktvs[0], tvs) ||
845                     get_tv32(&ktvs[1], 1+tvs))
846                         return -EFAULT;
847         }
848
849         return do_utimes(AT_FDCWD, filename, (tvs ? &ktvs[0] : NULL));
850 }
851
852 /* These are here just in case some old sparc32 binary calls it. */
853 asmlinkage long sys32_pause(void)
854 {
855         current->state = TASK_INTERRUPTIBLE;
856         schedule();
857         return -ERESTARTNOHAND;
858 }
859
860 asmlinkage compat_ssize_t sys32_pread64(unsigned int fd,
861                                         char __user *ubuf,
862                                         compat_size_t count,
863                                         unsigned long poshi,
864                                         unsigned long poslo)
865 {
866         return sys_pread64(fd, ubuf, count, (poshi << 32) | poslo);
867 }
868
869 asmlinkage compat_ssize_t sys32_pwrite64(unsigned int fd,
870                                          char __user *ubuf,
871                                          compat_size_t count,
872                                          unsigned long poshi,
873                                          unsigned long poslo)
874 {
875         return sys_pwrite64(fd, ubuf, count, (poshi << 32) | poslo);
876 }
877
878 asmlinkage long compat_sys_readahead(int fd,
879                                      unsigned long offhi,
880                                      unsigned long offlo,
881                                      compat_size_t count)
882 {
883         return sys_readahead(fd, (offhi << 32) | offlo, count);
884 }
885
886 long compat_sys_fadvise64(int fd,
887                           unsigned long offhi,
888                           unsigned long offlo,
889                           compat_size_t len, int advice)
890 {
891         return sys_fadvise64_64(fd, (offhi << 32) | offlo, len, advice);
892 }
893
894 long compat_sys_fadvise64_64(int fd,
895                              unsigned long offhi, unsigned long offlo,
896                              unsigned long lenhi, unsigned long lenlo,
897                              int advice)
898 {
899         return sys_fadvise64_64(fd,
900                                 (offhi << 32) | offlo,
901                                 (lenhi << 32) | lenlo,
902                                 advice);
903 }
904
905 asmlinkage long compat_sys_sendfile(int out_fd, int in_fd,
906                                     compat_off_t __user *offset,
907                                     compat_size_t count)
908 {
909         mm_segment_t old_fs = get_fs();
910         int ret;
911         off_t of;
912         
913         if (offset && get_user(of, offset))
914                 return -EFAULT;
915                 
916         set_fs(KERNEL_DS);
917         ret = sys_sendfile(out_fd, in_fd,
918                            offset ? (off_t __user *) &of : NULL,
919                            count);
920         set_fs(old_fs);
921         
922         if (offset && put_user(of, offset))
923                 return -EFAULT;
924                 
925         return ret;
926 }
927
928 asmlinkage long compat_sys_sendfile64(int out_fd, int in_fd,
929                                       compat_loff_t __user *offset,
930                                       compat_size_t count)
931 {
932         mm_segment_t old_fs = get_fs();
933         int ret;
934         loff_t lof;
935         
936         if (offset && get_user(lof, offset))
937                 return -EFAULT;
938                 
939         set_fs(KERNEL_DS);
940         ret = sys_sendfile64(out_fd, in_fd,
941                              offset ? (loff_t __user *) &lof : NULL,
942                              count);
943         set_fs(old_fs);
944         
945         if (offset && put_user(lof, offset))
946                 return -EFAULT;
947                 
948         return ret;
949 }
950
951 /* This is just a version for 32-bit applications which does
952  * not force O_LARGEFILE on.
953  */
954
955 asmlinkage long sparc32_open(const char __user *filename,
956                              int flags, int mode)
957 {
958         return do_sys_open(AT_FDCWD, filename, flags, mode);
959 }
960
961 extern unsigned long do_mremap(unsigned long addr,
962         unsigned long old_len, unsigned long new_len,
963         unsigned long flags, unsigned long new_addr);
964                 
965 asmlinkage unsigned long sys32_mremap(unsigned long addr,
966         unsigned long old_len, unsigned long new_len,
967         unsigned long flags, u32 __new_addr)
968 {
969         struct vm_area_struct *vma;
970         unsigned long ret = -EINVAL;
971         unsigned long new_addr = __new_addr;
972
973         if (old_len > STACK_TOP32 || new_len > STACK_TOP32)
974                 goto out;
975         if (addr > STACK_TOP32 - old_len)
976                 goto out;
977         down_write(&current->mm->mmap_sem);
978         if (flags & MREMAP_FIXED) {
979                 if (new_addr > STACK_TOP32 - new_len)
980                         goto out_sem;
981         } else if (addr > STACK_TOP32 - new_len) {
982                 unsigned long map_flags = 0;
983                 struct file *file = NULL;
984
985                 ret = -ENOMEM;
986                 if (!(flags & MREMAP_MAYMOVE))
987                         goto out_sem;
988
989                 vma = find_vma(current->mm, addr);
990                 if (vma) {
991                         if (vma->vm_flags & VM_SHARED)
992                                 map_flags |= MAP_SHARED;
993                         file = vma->vm_file;
994                 }
995
996                 /* MREMAP_FIXED checked above. */
997                 new_addr = get_unmapped_area(file, addr, new_len,
998                                     vma ? vma->vm_pgoff : 0,
999                                     map_flags);
1000                 ret = new_addr;
1001                 if (new_addr & ~PAGE_MASK)
1002                         goto out_sem;
1003                 flags |= MREMAP_FIXED;
1004         }
1005         ret = do_mremap(addr, old_len, new_len, flags, new_addr);
1006 out_sem:
1007         up_write(&current->mm->mmap_sem);
1008 out:
1009         return ret;       
1010 }
1011
1012 struct __sysctl_args32 {
1013         u32 name;
1014         int nlen;
1015         u32 oldval;
1016         u32 oldlenp;
1017         u32 newval;
1018         u32 newlen;
1019         u32 __unused[4];
1020 };
1021
1022 asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args)
1023 {
1024 #ifndef CONFIG_SYSCTL
1025         return -ENOSYS;
1026 #else
1027         struct __sysctl_args32 tmp;
1028         int error;
1029         size_t oldlen, __user *oldlenp = NULL;
1030         unsigned long addr = (((unsigned long)&args->__unused[0]) + 7UL) & ~7UL;
1031
1032         if (copy_from_user(&tmp, args, sizeof(tmp)))
1033                 return -EFAULT;
1034
1035         if (tmp.oldval && tmp.oldlenp) {
1036                 /* Duh, this is ugly and might not work if sysctl_args
1037                    is in read-only memory, but do_sysctl does indirectly
1038                    a lot of uaccess in both directions and we'd have to
1039                    basically copy the whole sysctl.c here, and
1040                    glibc's __sysctl uses rw memory for the structure
1041                    anyway.  */
1042                 if (get_user(oldlen, (u32 __user *)(unsigned long)tmp.oldlenp) ||
1043                     put_user(oldlen, (size_t __user *)addr))
1044                         return -EFAULT;
1045                 oldlenp = (size_t __user *)addr;
1046         }
1047
1048         lock_kernel();
1049         error = do_sysctl((int __user *)(unsigned long) tmp.name,
1050                           tmp.nlen,
1051                           (void __user *)(unsigned long) tmp.oldval,
1052                           oldlenp,
1053                           (void __user *)(unsigned long) tmp.newval,
1054                           tmp.newlen);
1055         unlock_kernel();
1056         if (oldlenp) {
1057                 if (!error) {
1058                         if (get_user(oldlen, (size_t __user *)addr) ||
1059                             put_user(oldlen, (u32 __user *)(unsigned long) tmp.oldlenp))
1060                                 error = -EFAULT;
1061                 }
1062                 if (copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)))
1063                         error = -EFAULT;
1064         }
1065         return error;
1066 #endif
1067 }
1068
1069 long sys32_lookup_dcookie(unsigned long cookie_high,
1070                           unsigned long cookie_low,
1071                           char __user *buf, size_t len)
1072 {
1073         return sys_lookup_dcookie((cookie_high << 32) | cookie_low,
1074                                   buf, len);
1075 }
1076
1077 long compat_sync_file_range(int fd, unsigned long off_high, unsigned long off_low, unsigned long nb_high, unsigned long nb_low, int flags)
1078 {
1079         return sys_sync_file_range(fd,
1080                                    (off_high << 32) | off_low,
1081                                    (nb_high << 32) | nb_low,
1082                                    flags);
1083 }