[PATCH] sparc64: Fix stat
[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/config.h>
12 #include <linux/kernel.h>
13 #include <linux/sched.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/timex.h>
22 #include <linux/smp.h>
23 #include <linux/smp_lock.h>
24 #include <linux/sem.h>
25 #include <linux/msg.h>
26 #include <linux/shm.h>
27 #include <linux/slab.h>
28 #include <linux/uio.h>
29 #include <linux/nfs_fs.h>
30 #include <linux/quota.h>
31 #include <linux/module.h>
32 #include <linux/sunrpc/svc.h>
33 #include <linux/nfsd/nfsd.h>
34 #include <linux/nfsd/cache.h>
35 #include <linux/nfsd/xdr.h>
36 #include <linux/nfsd/syscall.h>
37 #include <linux/poll.h>
38 #include <linux/personality.h>
39 #include <linux/stat.h>
40 #include <linux/filter.h>
41 #include <linux/highmem.h>
42 #include <linux/highuid.h>
43 #include <linux/mman.h>
44 #include <linux/ipv6.h>
45 #include <linux/in.h>
46 #include <linux/icmpv6.h>
47 #include <linux/syscalls.h>
48 #include <linux/sysctl.h>
49 #include <linux/binfmts.h>
50 #include <linux/dnotify.h>
51 #include <linux/security.h>
52 #include <linux/compat.h>
53 #include <linux/vfs.h>
54 #include <linux/netfilter_ipv4/ip_tables.h>
55 #include <linux/ptrace.h>
56 #include <linux/highuid.h>
57
58 #include <asm/types.h>
59 #include <asm/ipc.h>
60 #include <asm/uaccess.h>
61 #include <asm/fpumacro.h>
62 #include <asm/semaphore.h>
63 #include <asm/mmu_context.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         int err;
341
342         if (stat->size > MAX_NON_LFS || !old_valid_dev(stat->dev) ||
343             !old_valid_dev(stat->rdev))
344                 return -EOVERFLOW;
345
346         err  = put_user(old_encode_dev(stat->dev), &statbuf->st_dev);
347         err |= put_user(stat->ino, &statbuf->st_ino);
348         err |= put_user(stat->mode, &statbuf->st_mode);
349         err |= put_user(stat->nlink, &statbuf->st_nlink);
350         err |= put_user(high2lowuid(stat->uid), &statbuf->st_uid);
351         err |= put_user(high2lowgid(stat->gid), &statbuf->st_gid);
352         err |= put_user(old_encode_dev(stat->rdev), &statbuf->st_rdev);
353         err |= put_user(stat->size, &statbuf->st_size);
354         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
355         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
356         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
357         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
358         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
359         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
360         err |= put_user(stat->blksize, &statbuf->st_blksize);
361         err |= put_user(stat->blocks, &statbuf->st_blocks);
362         err |= put_user(0, &statbuf->__unused4[0]);
363         err |= put_user(0, &statbuf->__unused4[1]);
364
365         return err;
366 }
367
368 int cp_compat_stat64(struct kstat *stat, struct compat_stat64 __user *statbuf)
369 {
370         int err;
371
372         err  = put_user(huge_encode_dev(stat->dev), &statbuf->st_dev);
373         err |= put_user(stat->ino, &statbuf->st_ino);
374         err |= put_user(stat->mode, &statbuf->st_mode);
375         err |= put_user(stat->nlink, &statbuf->st_nlink);
376         err |= put_user(stat->uid, &statbuf->st_uid);
377         err |= put_user(stat->gid, &statbuf->st_gid);
378         err |= put_user(huge_encode_dev(stat->rdev), &statbuf->st_rdev);
379         err |= put_user(0, (unsigned long __user *) &statbuf->__pad3[0]);
380         err |= put_user(stat->size, &statbuf->st_size);
381         err |= put_user(stat->blksize, &statbuf->st_blksize);
382         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[0]);
383         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[4]);
384         err |= put_user(stat->blocks, &statbuf->st_blocks);
385         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
386         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
387         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
388         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
389         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
390         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
391         err |= put_user(0, &statbuf->__unused4);
392         err |= put_user(0, &statbuf->__unused5);
393
394         return err;
395 }
396
397 asmlinkage long compat_sys_stat64(char __user * filename,
398                 struct compat_stat64 __user *statbuf)
399 {
400         struct kstat stat;
401         int error = vfs_stat(filename, &stat);
402
403         if (!error)
404                 error = cp_compat_stat64(&stat, statbuf);
405         return error;
406 }
407
408 asmlinkage long compat_sys_lstat64(char __user * filename,
409                 struct compat_stat64 __user *statbuf)
410 {
411         struct kstat stat;
412         int error = vfs_lstat(filename, &stat);
413
414         if (!error)
415                 error = cp_compat_stat64(&stat, statbuf);
416         return error;
417 }
418
419 asmlinkage long compat_sys_fstat64(unsigned int fd,
420                 struct compat_stat64 __user * statbuf)
421 {
422         struct kstat stat;
423         int error = vfs_fstat(fd, &stat);
424
425         if (!error)
426                 error = cp_compat_stat64(&stat, statbuf);
427         return error;
428 }
429
430 asmlinkage long compat_sys_sysfs(int option, u32 arg1, u32 arg2)
431 {
432         return sys_sysfs(option, arg1, arg2);
433 }
434
435 struct sysinfo32 {
436         s32 uptime;
437         u32 loads[3];
438         u32 totalram;
439         u32 freeram;
440         u32 sharedram;
441         u32 bufferram;
442         u32 totalswap;
443         u32 freeswap;
444         unsigned short procs;
445         unsigned short pad;
446         u32 totalhigh;
447         u32 freehigh;
448         u32 mem_unit;
449         char _f[20-2*sizeof(int)-sizeof(int)];
450 };
451
452 asmlinkage long sys32_sysinfo(struct sysinfo32 __user *info)
453 {
454         struct sysinfo s;
455         int ret, err;
456         int bitcount = 0;
457         mm_segment_t old_fs = get_fs ();
458         
459         set_fs(KERNEL_DS);
460         ret = sys_sysinfo((struct sysinfo __user *) &s);
461         set_fs(old_fs);
462         /* Check to see if any memory value is too large for 32-bit and
463          * scale down if needed.
464          */
465         if ((s.totalram >> 32) || (s.totalswap >> 32)) {
466                 while (s.mem_unit < PAGE_SIZE) {
467                         s.mem_unit <<= 1;
468                         bitcount++;
469                 }
470                 s.totalram >>= bitcount;
471                 s.freeram >>= bitcount;
472                 s.sharedram >>= bitcount;
473                 s.bufferram >>= bitcount;
474                 s.totalswap >>= bitcount;
475                 s.freeswap >>= bitcount;
476                 s.totalhigh >>= bitcount;
477                 s.freehigh >>= bitcount;
478         }
479
480         err = put_user (s.uptime, &info->uptime);
481         err |= __put_user (s.loads[0], &info->loads[0]);
482         err |= __put_user (s.loads[1], &info->loads[1]);
483         err |= __put_user (s.loads[2], &info->loads[2]);
484         err |= __put_user (s.totalram, &info->totalram);
485         err |= __put_user (s.freeram, &info->freeram);
486         err |= __put_user (s.sharedram, &info->sharedram);
487         err |= __put_user (s.bufferram, &info->bufferram);
488         err |= __put_user (s.totalswap, &info->totalswap);
489         err |= __put_user (s.freeswap, &info->freeswap);
490         err |= __put_user (s.procs, &info->procs);
491         err |= __put_user (s.totalhigh, &info->totalhigh);
492         err |= __put_user (s.freehigh, &info->freehigh);
493         err |= __put_user (s.mem_unit, &info->mem_unit);
494         if (err)
495                 return -EFAULT;
496         return ret;
497 }
498
499 asmlinkage long compat_sys_sched_rr_get_interval(compat_pid_t pid, struct compat_timespec __user *interval)
500 {
501         struct timespec t;
502         int ret;
503         mm_segment_t old_fs = get_fs ();
504         
505         set_fs (KERNEL_DS);
506         ret = sys_sched_rr_get_interval(pid, (struct timespec __user *) &t);
507         set_fs (old_fs);
508         if (put_compat_timespec(&t, interval))
509                 return -EFAULT;
510         return ret;
511 }
512
513 asmlinkage long compat_sys_rt_sigprocmask(int how,
514                                           compat_sigset_t __user *set,
515                                           compat_sigset_t __user *oset,
516                                           compat_size_t sigsetsize)
517 {
518         sigset_t s;
519         compat_sigset_t s32;
520         int ret;
521         mm_segment_t old_fs = get_fs();
522         
523         if (set) {
524                 if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
525                         return -EFAULT;
526                 switch (_NSIG_WORDS) {
527                 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
528                 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
529                 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
530                 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
531                 }
532         }
533         set_fs (KERNEL_DS);
534         ret = sys_rt_sigprocmask(how,
535                                  set ? (sigset_t __user *) &s : NULL,
536                                  oset ? (sigset_t __user *) &s : NULL,
537                                  sigsetsize);
538         set_fs (old_fs);
539         if (ret) return ret;
540         if (oset) {
541                 switch (_NSIG_WORDS) {
542                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
543                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
544                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
545                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
546                 }
547                 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
548                         return -EFAULT;
549         }
550         return 0;
551 }
552
553 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
554                                     compat_size_t sigsetsize)
555 {
556         sigset_t s;
557         compat_sigset_t s32;
558         int ret;
559         mm_segment_t old_fs = get_fs();
560                 
561         set_fs (KERNEL_DS);
562         ret = sys_rt_sigpending((sigset_t __user *) &s, sigsetsize);
563         set_fs (old_fs);
564         if (!ret) {
565                 switch (_NSIG_WORDS) {
566                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
567                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
568                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
569                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
570                 }
571                 if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
572                         return -EFAULT;
573         }
574         return ret;
575 }
576
577 asmlinkage long compat_sys_rt_sigqueueinfo(int pid, int sig,
578                                            struct compat_siginfo __user *uinfo)
579 {
580         siginfo_t info;
581         int ret;
582         mm_segment_t old_fs = get_fs();
583         
584         if (copy_siginfo_from_user32(&info, uinfo))
585                 return -EFAULT;
586
587         set_fs (KERNEL_DS);
588         ret = sys_rt_sigqueueinfo(pid, sig, (siginfo_t __user *) &info);
589         set_fs (old_fs);
590         return ret;
591 }
592
593 asmlinkage long compat_sys_sigaction(int sig, struct old_sigaction32 __user *act,
594                                      struct old_sigaction32 __user *oact)
595 {
596         struct k_sigaction new_ka, old_ka;
597         int ret;
598
599         if (sig < 0) {
600                 set_thread_flag(TIF_NEWSIGNALS);
601                 sig = -sig;
602         }
603
604         if (act) {
605                 compat_old_sigset_t mask;
606                 u32 u_handler, u_restorer;
607                 
608                 ret = get_user(u_handler, &act->sa_handler);
609                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
610                 ret |= __get_user(u_restorer, &act->sa_restorer);
611                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
612                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
613                 ret |= __get_user(mask, &act->sa_mask);
614                 if (ret)
615                         return ret;
616                 new_ka.ka_restorer = NULL;
617                 siginitset(&new_ka.sa.sa_mask, mask);
618         }
619
620         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
621
622         if (!ret && oact) {
623                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
624                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
625                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
626                 ret |= __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask);
627         }
628
629         return ret;
630 }
631
632 asmlinkage long compat_sys_rt_sigaction(int sig,
633                                         struct sigaction32 __user *act,
634                                         struct sigaction32 __user *oact,
635                                         void __user *restorer,
636                                         compat_size_t sigsetsize)
637 {
638         struct k_sigaction new_ka, old_ka;
639         int ret;
640         compat_sigset_t set32;
641
642         /* XXX: Don't preclude handling different sized sigset_t's.  */
643         if (sigsetsize != sizeof(compat_sigset_t))
644                 return -EINVAL;
645
646         /* All tasks which use RT signals (effectively) use
647          * new style signals.
648          */
649         set_thread_flag(TIF_NEWSIGNALS);
650
651         if (act) {
652                 u32 u_handler, u_restorer;
653
654                 new_ka.ka_restorer = restorer;
655                 ret = get_user(u_handler, &act->sa_handler);
656                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
657                 ret |= __copy_from_user(&set32, &act->sa_mask, sizeof(compat_sigset_t));
658                 switch (_NSIG_WORDS) {
659                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6] | (((long)set32.sig[7]) << 32);
660                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4] | (((long)set32.sig[5]) << 32);
661                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2] | (((long)set32.sig[3]) << 32);
662                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0] | (((long)set32.sig[1]) << 32);
663                 }
664                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
665                 ret |= __get_user(u_restorer, &act->sa_restorer);
666                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
667                 if (ret)
668                         return -EFAULT;
669         }
670
671         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
672
673         if (!ret && oact) {
674                 switch (_NSIG_WORDS) {
675                 case 4: set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32); set32.sig[6] = old_ka.sa.sa_mask.sig[3];
676                 case 3: set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32); set32.sig[4] = old_ka.sa.sa_mask.sig[2];
677                 case 2: set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32); set32.sig[2] = old_ka.sa.sa_mask.sig[1];
678                 case 1: set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32); set32.sig[0] = old_ka.sa.sa_mask.sig[0];
679                 }
680                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
681                 ret |= __copy_to_user(&oact->sa_mask, &set32, sizeof(compat_sigset_t));
682                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
683                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
684                 if (ret)
685                         ret = -EFAULT;
686         }
687
688         return ret;
689 }
690
691 /*
692  * sparc32_execve() executes a new program after the asm stub has set
693  * things up for us.  This should basically do what I want it to.
694  */
695 asmlinkage long sparc32_execve(struct pt_regs *regs)
696 {
697         int error, base = 0;
698         char *filename;
699
700         /* User register window flush is done by entry.S */
701
702         /* Check for indirect call. */
703         if ((u32)regs->u_regs[UREG_G1] == 0)
704                 base = 1;
705
706         filename = getname(compat_ptr(regs->u_regs[base + UREG_I0]));
707         error = PTR_ERR(filename);
708         if (IS_ERR(filename))
709                 goto out;
710
711         error = compat_do_execve(filename,
712                                  compat_ptr(regs->u_regs[base + UREG_I1]),
713                                  compat_ptr(regs->u_regs[base + UREG_I2]), regs);
714
715         putname(filename);
716
717         if (!error) {
718                 fprs_write(0);
719                 current_thread_info()->xfsr[0] = 0;
720                 current_thread_info()->fpsaved[0] = 0;
721                 regs->tstate &= ~TSTATE_PEF;
722                 task_lock(current);
723                 current->ptrace &= ~PT_DTRACE;
724                 task_unlock(current);
725         }
726 out:
727         return error;
728 }
729
730 #ifdef CONFIG_MODULES
731
732 asmlinkage long sys32_init_module(void __user *umod, u32 len,
733                                   const char __user *uargs)
734 {
735         return sys_init_module(umod, len, uargs);
736 }
737
738 asmlinkage long sys32_delete_module(const char __user *name_user,
739                                     unsigned int flags)
740 {
741         return sys_delete_module(name_user, flags);
742 }
743
744 #else /* CONFIG_MODULES */
745
746 asmlinkage long sys32_init_module(const char __user *name_user,
747                                   struct module __user *mod_user)
748 {
749         return -ENOSYS;
750 }
751
752 asmlinkage long sys32_delete_module(const char __user *name_user)
753 {
754         return -ENOSYS;
755 }
756
757 #endif  /* CONFIG_MODULES */
758
759 /* Translations due to time_t size differences.  Which affects all
760    sorts of things, like timeval and itimerval.  */
761
762 extern struct timezone sys_tz;
763
764 asmlinkage long sys32_gettimeofday(struct compat_timeval __user *tv,
765                                    struct timezone __user *tz)
766 {
767         if (tv) {
768                 struct timeval ktv;
769                 do_gettimeofday(&ktv);
770                 if (put_tv32(tv, &ktv))
771                         return -EFAULT;
772         }
773         if (tz) {
774                 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
775                         return -EFAULT;
776         }
777         return 0;
778 }
779
780 static inline long get_ts32(struct timespec *o, struct compat_timeval __user *i)
781 {
782         long usec;
783
784         if (!access_ok(VERIFY_READ, i, sizeof(*i)))
785                 return -EFAULT;
786         if (__get_user(o->tv_sec, &i->tv_sec))
787                 return -EFAULT;
788         if (__get_user(usec, &i->tv_usec))
789                 return -EFAULT;
790         o->tv_nsec = usec * 1000;
791         return 0;
792 }
793
794 asmlinkage long sys32_settimeofday(struct compat_timeval __user *tv,
795                                    struct timezone __user *tz)
796 {
797         struct timespec kts;
798         struct timezone ktz;
799
800         if (tv) {
801                 if (get_ts32(&kts, tv))
802                         return -EFAULT;
803         }
804         if (tz) {
805                 if (copy_from_user(&ktz, tz, sizeof(ktz)))
806                         return -EFAULT;
807         }
808
809         return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
810 }
811
812 asmlinkage long sys32_utimes(char __user *filename,
813                              struct compat_timeval __user *tvs)
814 {
815         struct timeval ktvs[2];
816
817         if (tvs) {
818                 if (get_tv32(&ktvs[0], tvs) ||
819                     get_tv32(&ktvs[1], 1+tvs))
820                         return -EFAULT;
821         }
822
823         return do_utimes(filename, (tvs ? &ktvs[0] : NULL));
824 }
825
826 /* These are here just in case some old sparc32 binary calls it. */
827 asmlinkage long sys32_pause(void)
828 {
829         current->state = TASK_INTERRUPTIBLE;
830         schedule();
831         return -ERESTARTNOHAND;
832 }
833
834 asmlinkage compat_ssize_t sys32_pread64(unsigned int fd,
835                                         char __user *ubuf,
836                                         compat_size_t count,
837                                         unsigned long poshi,
838                                         unsigned long poslo)
839 {
840         return sys_pread64(fd, ubuf, count, (poshi << 32) | poslo);
841 }
842
843 asmlinkage compat_ssize_t sys32_pwrite64(unsigned int fd,
844                                          char __user *ubuf,
845                                          compat_size_t count,
846                                          unsigned long poshi,
847                                          unsigned long poslo)
848 {
849         return sys_pwrite64(fd, ubuf, count, (poshi << 32) | poslo);
850 }
851
852 asmlinkage long compat_sys_readahead(int fd,
853                                      unsigned long offhi,
854                                      unsigned long offlo,
855                                      compat_size_t count)
856 {
857         return sys_readahead(fd, (offhi << 32) | offlo, count);
858 }
859
860 long compat_sys_fadvise64(int fd,
861                           unsigned long offhi,
862                           unsigned long offlo,
863                           compat_size_t len, int advice)
864 {
865         return sys_fadvise64_64(fd, (offhi << 32) | offlo, len, advice);
866 }
867
868 long compat_sys_fadvise64_64(int fd,
869                              unsigned long offhi, unsigned long offlo,
870                              unsigned long lenhi, unsigned long lenlo,
871                              int advice)
872 {
873         return sys_fadvise64_64(fd,
874                                 (offhi << 32) | offlo,
875                                 (lenhi << 32) | lenlo,
876                                 advice);
877 }
878
879 asmlinkage long compat_sys_sendfile(int out_fd, int in_fd,
880                                     compat_off_t __user *offset,
881                                     compat_size_t count)
882 {
883         mm_segment_t old_fs = get_fs();
884         int ret;
885         off_t of;
886         
887         if (offset && get_user(of, offset))
888                 return -EFAULT;
889                 
890         set_fs(KERNEL_DS);
891         ret = sys_sendfile(out_fd, in_fd,
892                            offset ? (off_t __user *) &of : NULL,
893                            count);
894         set_fs(old_fs);
895         
896         if (offset && put_user(of, offset))
897                 return -EFAULT;
898                 
899         return ret;
900 }
901
902 asmlinkage long compat_sys_sendfile64(int out_fd, int in_fd,
903                                       compat_loff_t __user *offset,
904                                       compat_size_t count)
905 {
906         mm_segment_t old_fs = get_fs();
907         int ret;
908         loff_t lof;
909         
910         if (offset && get_user(lof, offset))
911                 return -EFAULT;
912                 
913         set_fs(KERNEL_DS);
914         ret = sys_sendfile64(out_fd, in_fd,
915                              offset ? (loff_t __user *) &lof : NULL,
916                              count);
917         set_fs(old_fs);
918         
919         if (offset && put_user(lof, offset))
920                 return -EFAULT;
921                 
922         return ret;
923 }
924
925 /* Handle adjtimex compatibility. */
926
927 struct timex32 {
928         u32 modes;
929         s32 offset, freq, maxerror, esterror;
930         s32 status, constant, precision, tolerance;
931         struct compat_timeval time;
932         s32 tick;
933         s32 ppsfreq, jitter, shift, stabil;
934         s32 jitcnt, calcnt, errcnt, stbcnt;
935         s32  :32; s32  :32; s32  :32; s32  :32;
936         s32  :32; s32  :32; s32  :32; s32  :32;
937         s32  :32; s32  :32; s32  :32; s32  :32;
938 };
939
940 extern int do_adjtimex(struct timex *);
941
942 asmlinkage long sys32_adjtimex(struct timex32 __user *utp)
943 {
944         struct timex txc;
945         int ret;
946
947         memset(&txc, 0, sizeof(struct timex));
948
949         if (get_user(txc.modes, &utp->modes) ||
950             __get_user(txc.offset, &utp->offset) ||
951             __get_user(txc.freq, &utp->freq) ||
952             __get_user(txc.maxerror, &utp->maxerror) ||
953             __get_user(txc.esterror, &utp->esterror) ||
954             __get_user(txc.status, &utp->status) ||
955             __get_user(txc.constant, &utp->constant) ||
956             __get_user(txc.precision, &utp->precision) ||
957             __get_user(txc.tolerance, &utp->tolerance) ||
958             __get_user(txc.time.tv_sec, &utp->time.tv_sec) ||
959             __get_user(txc.time.tv_usec, &utp->time.tv_usec) ||
960             __get_user(txc.tick, &utp->tick) ||
961             __get_user(txc.ppsfreq, &utp->ppsfreq) ||
962             __get_user(txc.jitter, &utp->jitter) ||
963             __get_user(txc.shift, &utp->shift) ||
964             __get_user(txc.stabil, &utp->stabil) ||
965             __get_user(txc.jitcnt, &utp->jitcnt) ||
966             __get_user(txc.calcnt, &utp->calcnt) ||
967             __get_user(txc.errcnt, &utp->errcnt) ||
968             __get_user(txc.stbcnt, &utp->stbcnt))
969                 return -EFAULT;
970
971         ret = do_adjtimex(&txc);
972
973         if (put_user(txc.modes, &utp->modes) ||
974             __put_user(txc.offset, &utp->offset) ||
975             __put_user(txc.freq, &utp->freq) ||
976             __put_user(txc.maxerror, &utp->maxerror) ||
977             __put_user(txc.esterror, &utp->esterror) ||
978             __put_user(txc.status, &utp->status) ||
979             __put_user(txc.constant, &utp->constant) ||
980             __put_user(txc.precision, &utp->precision) ||
981             __put_user(txc.tolerance, &utp->tolerance) ||
982             __put_user(txc.time.tv_sec, &utp->time.tv_sec) ||
983             __put_user(txc.time.tv_usec, &utp->time.tv_usec) ||
984             __put_user(txc.tick, &utp->tick) ||
985             __put_user(txc.ppsfreq, &utp->ppsfreq) ||
986             __put_user(txc.jitter, &utp->jitter) ||
987             __put_user(txc.shift, &utp->shift) ||
988             __put_user(txc.stabil, &utp->stabil) ||
989             __put_user(txc.jitcnt, &utp->jitcnt) ||
990             __put_user(txc.calcnt, &utp->calcnt) ||
991             __put_user(txc.errcnt, &utp->errcnt) ||
992             __put_user(txc.stbcnt, &utp->stbcnt))
993                 ret = -EFAULT;
994
995         return ret;
996 }
997
998 /* This is just a version for 32-bit applications which does
999  * not force O_LARGEFILE on.
1000  */
1001
1002 asmlinkage long sparc32_open(const char __user *filename,
1003                              int flags, int mode)
1004 {
1005         char * tmp;
1006         int fd, error;
1007
1008         tmp = getname(filename);
1009         fd = PTR_ERR(tmp);
1010         if (!IS_ERR(tmp)) {
1011                 fd = get_unused_fd();
1012                 if (fd >= 0) {
1013                         struct file * f = filp_open(tmp, flags, mode);
1014                         error = PTR_ERR(f);
1015                         if (IS_ERR(f))
1016                                 goto out_error;
1017                         fd_install(fd, f);
1018                 }
1019 out:
1020                 putname(tmp);
1021         }
1022         return fd;
1023
1024 out_error:
1025         put_unused_fd(fd);
1026         fd = error;
1027         goto out;
1028 }
1029
1030 extern unsigned long do_mremap(unsigned long addr,
1031         unsigned long old_len, unsigned long new_len,
1032         unsigned long flags, unsigned long new_addr);
1033                 
1034 asmlinkage unsigned long sys32_mremap(unsigned long addr,
1035         unsigned long old_len, unsigned long new_len,
1036         unsigned long flags, u32 __new_addr)
1037 {
1038         struct vm_area_struct *vma;
1039         unsigned long ret = -EINVAL;
1040         unsigned long new_addr = __new_addr;
1041
1042         if (old_len > 0xf0000000UL || new_len > 0xf0000000UL)
1043                 goto out;
1044         if (addr > 0xf0000000UL - old_len)
1045                 goto out;
1046         down_write(&current->mm->mmap_sem);
1047         if (flags & MREMAP_FIXED) {
1048                 if (new_addr > 0xf0000000UL - new_len)
1049                         goto out_sem;
1050         } else if (addr > 0xf0000000UL - new_len) {
1051                 unsigned long map_flags = 0;
1052                 struct file *file = NULL;
1053
1054                 ret = -ENOMEM;
1055                 if (!(flags & MREMAP_MAYMOVE))
1056                         goto out_sem;
1057
1058                 vma = find_vma(current->mm, addr);
1059                 if (vma) {
1060                         if (vma->vm_flags & VM_SHARED)
1061                                 map_flags |= MAP_SHARED;
1062                         file = vma->vm_file;
1063                 }
1064
1065                 /* MREMAP_FIXED checked above. */
1066                 new_addr = get_unmapped_area(file, addr, new_len,
1067                                     vma ? vma->vm_pgoff : 0,
1068                                     map_flags);
1069                 ret = new_addr;
1070                 if (new_addr & ~PAGE_MASK)
1071                         goto out_sem;
1072                 flags |= MREMAP_FIXED;
1073         }
1074         ret = do_mremap(addr, old_len, new_len, flags, new_addr);
1075 out_sem:
1076         up_write(&current->mm->mmap_sem);
1077 out:
1078         return ret;       
1079 }
1080
1081 struct __sysctl_args32 {
1082         u32 name;
1083         int nlen;
1084         u32 oldval;
1085         u32 oldlenp;
1086         u32 newval;
1087         u32 newlen;
1088         u32 __unused[4];
1089 };
1090
1091 asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args)
1092 {
1093 #ifndef CONFIG_SYSCTL
1094         return -ENOSYS;
1095 #else
1096         struct __sysctl_args32 tmp;
1097         int error;
1098         size_t oldlen, __user *oldlenp = NULL;
1099         unsigned long addr = (((unsigned long)&args->__unused[0]) + 7UL) & ~7UL;
1100
1101         if (copy_from_user(&tmp, args, sizeof(tmp)))
1102                 return -EFAULT;
1103
1104         if (tmp.oldval && tmp.oldlenp) {
1105                 /* Duh, this is ugly and might not work if sysctl_args
1106                    is in read-only memory, but do_sysctl does indirectly
1107                    a lot of uaccess in both directions and we'd have to
1108                    basically copy the whole sysctl.c here, and
1109                    glibc's __sysctl uses rw memory for the structure
1110                    anyway.  */
1111                 if (get_user(oldlen, (u32 __user *)(unsigned long)tmp.oldlenp) ||
1112                     put_user(oldlen, (size_t __user *)addr))
1113                         return -EFAULT;
1114                 oldlenp = (size_t __user *)addr;
1115         }
1116
1117         lock_kernel();
1118         error = do_sysctl((int __user *)(unsigned long) tmp.name,
1119                           tmp.nlen,
1120                           (void __user *)(unsigned long) tmp.oldval,
1121                           oldlenp,
1122                           (void __user *)(unsigned long) tmp.newval,
1123                           tmp.newlen);
1124         unlock_kernel();
1125         if (oldlenp) {
1126                 if (!error) {
1127                         if (get_user(oldlen, (size_t __user *)addr) ||
1128                             put_user(oldlen, (u32 __user *)(unsigned long) tmp.oldlenp))
1129                                 error = -EFAULT;
1130                 }
1131                 if (copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)))
1132                         error = -EFAULT;
1133         }
1134         return error;
1135 #endif
1136 }
1137
1138 long sys32_lookup_dcookie(unsigned long cookie_high,
1139                           unsigned long cookie_low,
1140                           char __user *buf, size_t len)
1141 {
1142         return sys_lookup_dcookie((cookie_high << 32) | cookie_low,
1143                                   buf, len);
1144 }
1145
1146 extern asmlinkage long
1147 sys_timer_create(clockid_t which_clock,
1148                  struct sigevent __user *timer_event_spec,
1149                  timer_t __user *created_timer_id);
1150
1151 long
1152 sys32_timer_create(u32 clock, struct compat_sigevent __user *se32,
1153                    timer_t __user *timer_id)
1154 {
1155         struct sigevent se;
1156         mm_segment_t oldfs;
1157         timer_t t;
1158         long err;
1159
1160         if (se32 == NULL)
1161                 return sys_timer_create(clock, NULL, timer_id);
1162
1163         if (get_compat_sigevent(&se, se32))
1164                 return -EFAULT;
1165
1166         if (!access_ok(VERIFY_WRITE,timer_id,sizeof(timer_t)))
1167                 return -EFAULT;
1168
1169         oldfs = get_fs();
1170         set_fs(KERNEL_DS);
1171         err = sys_timer_create(clock,
1172                                (struct sigevent __user *) &se,
1173                                (timer_t __user *) &t);
1174         set_fs(oldfs);
1175
1176         if (!err)
1177                 err = __put_user (t, timer_id);
1178
1179         return err;
1180 }