6db18c6927fbee68a20125e1eb31e486798eeac0
[linux-2.6.git] / arch / sparc / kernel / sys_sparc32.c
1 /* sys_sparc32.c: Conversion between 32bit and 64bit native syscalls.
2  *
3  * Copyright (C) 1997,1998 Jakub Jelinek (jj@sunsite.mff.cuni.cz)
4  * Copyright (C) 1997, 2007 David S. Miller (davem@davemloft.net)
5  *
6  * These routines maintain argument size conversion between 32bit and 64bit
7  * environment.
8  */
9
10 #include <linux/kernel.h>
11 #include <linux/sched.h>
12 #include <linux/capability.h>
13 #include <linux/fs.h> 
14 #include <linux/mm.h> 
15 #include <linux/file.h> 
16 #include <linux/signal.h>
17 #include <linux/resource.h>
18 #include <linux/times.h>
19 #include <linux/smp.h>
20 #include <linux/sem.h>
21 #include <linux/msg.h>
22 #include <linux/shm.h>
23 #include <linux/uio.h>
24 #include <linux/nfs_fs.h>
25 #include <linux/quota.h>
26 #include <linux/module.h>
27 #include <linux/poll.h>
28 #include <linux/personality.h>
29 #include <linux/stat.h>
30 #include <linux/filter.h>
31 #include <linux/highmem.h>
32 #include <linux/highuid.h>
33 #include <linux/mman.h>
34 #include <linux/ipv6.h>
35 #include <linux/in.h>
36 #include <linux/icmpv6.h>
37 #include <linux/syscalls.h>
38 #include <linux/sysctl.h>
39 #include <linux/binfmts.h>
40 #include <linux/dnotify.h>
41 #include <linux/security.h>
42 #include <linux/compat.h>
43 #include <linux/vfs.h>
44 #include <linux/ptrace.h>
45 #include <linux/slab.h>
46
47 #include <asm/types.h>
48 #include <asm/uaccess.h>
49 #include <asm/fpumacro.h>
50 #include <asm/mmu_context.h>
51 #include <asm/compat_signal.h>
52
53 #ifdef CONFIG_SYSVIPC                                                        
54 asmlinkage long compat_sys_ipc(u32 call, u32 first, u32 second, u32 third, compat_uptr_t ptr, u32 fifth)
55 {
56         int version;
57
58         version = call >> 16; /* hack for backward compatibility */
59         call &= 0xffff;
60
61         switch (call) {
62         case SEMTIMEDOP:
63                 if (fifth)
64                         /* sign extend semid */
65                         return compat_sys_semtimedop((int)first,
66                                                      compat_ptr(ptr), second,
67                                                      compat_ptr(fifth));
68                 /* else fall through for normal semop() */
69         case SEMOP:
70                 /* struct sembuf is the same on 32 and 64bit :)) */
71                 /* sign extend semid */
72                 return sys_semtimedop((int)first, compat_ptr(ptr), second,
73                                       NULL);
74         case SEMGET:
75                 /* sign extend key, nsems */
76                 return sys_semget((int)first, (int)second, third);
77         case SEMCTL:
78                 /* sign extend semid, semnum */
79                 return compat_sys_semctl((int)first, (int)second, third,
80                                          compat_ptr(ptr));
81
82         case MSGSND:
83                 /* sign extend msqid */
84                 return compat_sys_msgsnd((int)first, (int)second, third,
85                                          compat_ptr(ptr));
86         case MSGRCV:
87                 /* sign extend msqid, msgtyp */
88                 return compat_sys_msgrcv((int)first, second, (int)fifth,
89                                          third, version, compat_ptr(ptr));
90         case MSGGET:
91                 /* sign extend key */
92                 return sys_msgget((int)first, second);
93         case MSGCTL:
94                 /* sign extend msqid */
95                 return compat_sys_msgctl((int)first, second, compat_ptr(ptr));
96
97         case SHMAT:
98                 /* sign extend shmid */
99                 return compat_sys_shmat((int)first, second, third, version,
100                                         compat_ptr(ptr));
101         case SHMDT:
102                 return sys_shmdt(compat_ptr(ptr));
103         case SHMGET:
104                 /* sign extend key_t */
105                 return sys_shmget((int)first, second, third);
106         case SHMCTL:
107                 /* sign extend shmid */
108                 return compat_sys_shmctl((int)first, second, compat_ptr(ptr));
109
110         default:
111                 return -ENOSYS;
112         };
113
114         return -ENOSYS;
115 }
116 #endif
117
118 asmlinkage long sys32_truncate64(const char __user * path, unsigned long high, unsigned long low)
119 {
120         if ((int)high < 0)
121                 return -EINVAL;
122         else
123                 return sys_truncate(path, (high << 32) | low);
124 }
125
126 asmlinkage long sys32_ftruncate64(unsigned int fd, unsigned long high, unsigned long low)
127 {
128         if ((int)high < 0)
129                 return -EINVAL;
130         else
131                 return sys_ftruncate(fd, (high << 32) | low);
132 }
133
134 static int cp_compat_stat64(struct kstat *stat,
135                             struct compat_stat64 __user *statbuf)
136 {
137         int err;
138
139         err  = put_user(huge_encode_dev(stat->dev), &statbuf->st_dev);
140         err |= put_user(stat->ino, &statbuf->st_ino);
141         err |= put_user(stat->mode, &statbuf->st_mode);
142         err |= put_user(stat->nlink, &statbuf->st_nlink);
143         err |= put_user(stat->uid, &statbuf->st_uid);
144         err |= put_user(stat->gid, &statbuf->st_gid);
145         err |= put_user(huge_encode_dev(stat->rdev), &statbuf->st_rdev);
146         err |= put_user(0, (unsigned long __user *) &statbuf->__pad3[0]);
147         err |= put_user(stat->size, &statbuf->st_size);
148         err |= put_user(stat->blksize, &statbuf->st_blksize);
149         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[0]);
150         err |= put_user(0, (unsigned int __user *) &statbuf->__pad4[4]);
151         err |= put_user(stat->blocks, &statbuf->st_blocks);
152         err |= put_user(stat->atime.tv_sec, &statbuf->st_atime);
153         err |= put_user(stat->atime.tv_nsec, &statbuf->st_atime_nsec);
154         err |= put_user(stat->mtime.tv_sec, &statbuf->st_mtime);
155         err |= put_user(stat->mtime.tv_nsec, &statbuf->st_mtime_nsec);
156         err |= put_user(stat->ctime.tv_sec, &statbuf->st_ctime);
157         err |= put_user(stat->ctime.tv_nsec, &statbuf->st_ctime_nsec);
158         err |= put_user(0, &statbuf->__unused4);
159         err |= put_user(0, &statbuf->__unused5);
160
161         return err;
162 }
163
164 asmlinkage long compat_sys_stat64(const char __user * filename,
165                 struct compat_stat64 __user *statbuf)
166 {
167         struct kstat stat;
168         int error = vfs_stat(filename, &stat);
169
170         if (!error)
171                 error = cp_compat_stat64(&stat, statbuf);
172         return error;
173 }
174
175 asmlinkage long compat_sys_lstat64(const char __user * filename,
176                 struct compat_stat64 __user *statbuf)
177 {
178         struct kstat stat;
179         int error = vfs_lstat(filename, &stat);
180
181         if (!error)
182                 error = cp_compat_stat64(&stat, statbuf);
183         return error;
184 }
185
186 asmlinkage long compat_sys_fstat64(unsigned int fd,
187                 struct compat_stat64 __user * statbuf)
188 {
189         struct kstat stat;
190         int error = vfs_fstat(fd, &stat);
191
192         if (!error)
193                 error = cp_compat_stat64(&stat, statbuf);
194         return error;
195 }
196
197 asmlinkage long compat_sys_fstatat64(unsigned int dfd,
198                 const char __user *filename,
199                 struct compat_stat64 __user * statbuf, int flag)
200 {
201         struct kstat stat;
202         int error;
203
204         error = vfs_fstatat(dfd, filename, &stat, flag);
205         if (error)
206                 return error;
207         return cp_compat_stat64(&stat, statbuf);
208 }
209
210 asmlinkage long compat_sys_sysfs(int option, u32 arg1, u32 arg2)
211 {
212         return sys_sysfs(option, arg1, arg2);
213 }
214
215 asmlinkage long compat_sys_sched_rr_get_interval(compat_pid_t pid, struct compat_timespec __user *interval)
216 {
217         struct timespec t;
218         int ret;
219         mm_segment_t old_fs = get_fs ();
220         
221         set_fs (KERNEL_DS);
222         ret = sys_sched_rr_get_interval(pid, (struct timespec __user *) &t);
223         set_fs (old_fs);
224         if (put_compat_timespec(&t, interval))
225                 return -EFAULT;
226         return ret;
227 }
228
229 asmlinkage long compat_sys_rt_sigprocmask(int how,
230                                           compat_sigset_t __user *set,
231                                           compat_sigset_t __user *oset,
232                                           compat_size_t sigsetsize)
233 {
234         sigset_t s;
235         compat_sigset_t s32;
236         int ret;
237         mm_segment_t old_fs = get_fs();
238         
239         if (set) {
240                 if (copy_from_user (&s32, set, sizeof(compat_sigset_t)))
241                         return -EFAULT;
242                 switch (_NSIG_WORDS) {
243                 case 4: s.sig[3] = s32.sig[6] | (((long)s32.sig[7]) << 32);
244                 case 3: s.sig[2] = s32.sig[4] | (((long)s32.sig[5]) << 32);
245                 case 2: s.sig[1] = s32.sig[2] | (((long)s32.sig[3]) << 32);
246                 case 1: s.sig[0] = s32.sig[0] | (((long)s32.sig[1]) << 32);
247                 }
248         }
249         set_fs (KERNEL_DS);
250         ret = sys_rt_sigprocmask(how,
251                                  set ? (sigset_t __user *) &s : NULL,
252                                  oset ? (sigset_t __user *) &s : NULL,
253                                  sigsetsize);
254         set_fs (old_fs);
255         if (ret) return ret;
256         if (oset) {
257                 switch (_NSIG_WORDS) {
258                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
259                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
260                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
261                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
262                 }
263                 if (copy_to_user (oset, &s32, sizeof(compat_sigset_t)))
264                         return -EFAULT;
265         }
266         return 0;
267 }
268
269 asmlinkage long sys32_rt_sigpending(compat_sigset_t __user *set,
270                                     compat_size_t sigsetsize)
271 {
272         sigset_t s;
273         compat_sigset_t s32;
274         int ret;
275         mm_segment_t old_fs = get_fs();
276                 
277         set_fs (KERNEL_DS);
278         ret = sys_rt_sigpending((sigset_t __user *) &s, sigsetsize);
279         set_fs (old_fs);
280         if (!ret) {
281                 switch (_NSIG_WORDS) {
282                 case 4: s32.sig[7] = (s.sig[3] >> 32); s32.sig[6] = s.sig[3];
283                 case 3: s32.sig[5] = (s.sig[2] >> 32); s32.sig[4] = s.sig[2];
284                 case 2: s32.sig[3] = (s.sig[1] >> 32); s32.sig[2] = s.sig[1];
285                 case 1: s32.sig[1] = (s.sig[0] >> 32); s32.sig[0] = s.sig[0];
286                 }
287                 if (copy_to_user (set, &s32, sizeof(compat_sigset_t)))
288                         return -EFAULT;
289         }
290         return ret;
291 }
292
293 asmlinkage long compat_sys_rt_sigqueueinfo(int pid, int sig,
294                                            struct compat_siginfo __user *uinfo)
295 {
296         siginfo_t info;
297         int ret;
298         mm_segment_t old_fs = get_fs();
299         
300         if (copy_siginfo_from_user32(&info, uinfo))
301                 return -EFAULT;
302
303         set_fs (KERNEL_DS);
304         ret = sys_rt_sigqueueinfo(pid, sig, (siginfo_t __user *) &info);
305         set_fs (old_fs);
306         return ret;
307 }
308
309 asmlinkage long compat_sys_sigaction(int sig, struct old_sigaction32 __user *act,
310                                      struct old_sigaction32 __user *oact)
311 {
312         struct k_sigaction new_ka, old_ka;
313         int ret;
314
315         WARN_ON_ONCE(sig >= 0);
316         sig = -sig;
317
318         if (act) {
319                 compat_old_sigset_t mask;
320                 u32 u_handler, u_restorer;
321                 
322                 ret = get_user(u_handler, &act->sa_handler);
323                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
324                 ret |= __get_user(u_restorer, &act->sa_restorer);
325                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
326                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
327                 ret |= __get_user(mask, &act->sa_mask);
328                 if (ret)
329                         return ret;
330                 new_ka.ka_restorer = NULL;
331                 siginitset(&new_ka.sa.sa_mask, mask);
332         }
333
334         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
335
336         if (!ret && oact) {
337                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
338                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
339                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
340                 ret |= __put_user(old_ka.sa.sa_mask.sig[0], &oact->sa_mask);
341         }
342
343         return ret;
344 }
345
346 asmlinkage long compat_sys_rt_sigaction(int sig,
347                                         struct sigaction32 __user *act,
348                                         struct sigaction32 __user *oact,
349                                         void __user *restorer,
350                                         compat_size_t sigsetsize)
351 {
352         struct k_sigaction new_ka, old_ka;
353         int ret;
354         compat_sigset_t set32;
355
356         /* XXX: Don't preclude handling different sized sigset_t's.  */
357         if (sigsetsize != sizeof(compat_sigset_t))
358                 return -EINVAL;
359
360         if (act) {
361                 u32 u_handler, u_restorer;
362
363                 new_ka.ka_restorer = restorer;
364                 ret = get_user(u_handler, &act->sa_handler);
365                 new_ka.sa.sa_handler =  compat_ptr(u_handler);
366                 ret |= __copy_from_user(&set32, &act->sa_mask, sizeof(compat_sigset_t));
367                 switch (_NSIG_WORDS) {
368                 case 4: new_ka.sa.sa_mask.sig[3] = set32.sig[6] | (((long)set32.sig[7]) << 32);
369                 case 3: new_ka.sa.sa_mask.sig[2] = set32.sig[4] | (((long)set32.sig[5]) << 32);
370                 case 2: new_ka.sa.sa_mask.sig[1] = set32.sig[2] | (((long)set32.sig[3]) << 32);
371                 case 1: new_ka.sa.sa_mask.sig[0] = set32.sig[0] | (((long)set32.sig[1]) << 32);
372                 }
373                 ret |= __get_user(new_ka.sa.sa_flags, &act->sa_flags);
374                 ret |= __get_user(u_restorer, &act->sa_restorer);
375                 new_ka.sa.sa_restorer = compat_ptr(u_restorer);
376                 if (ret)
377                         return -EFAULT;
378         }
379
380         ret = do_sigaction(sig, act ? &new_ka : NULL, oact ? &old_ka : NULL);
381
382         if (!ret && oact) {
383                 switch (_NSIG_WORDS) {
384                 case 4: set32.sig[7] = (old_ka.sa.sa_mask.sig[3] >> 32); set32.sig[6] = old_ka.sa.sa_mask.sig[3];
385                 case 3: set32.sig[5] = (old_ka.sa.sa_mask.sig[2] >> 32); set32.sig[4] = old_ka.sa.sa_mask.sig[2];
386                 case 2: set32.sig[3] = (old_ka.sa.sa_mask.sig[1] >> 32); set32.sig[2] = old_ka.sa.sa_mask.sig[1];
387                 case 1: set32.sig[1] = (old_ka.sa.sa_mask.sig[0] >> 32); set32.sig[0] = old_ka.sa.sa_mask.sig[0];
388                 }
389                 ret = put_user(ptr_to_compat(old_ka.sa.sa_handler), &oact->sa_handler);
390                 ret |= __copy_to_user(&oact->sa_mask, &set32, sizeof(compat_sigset_t));
391                 ret |= __put_user(old_ka.sa.sa_flags, &oact->sa_flags);
392                 ret |= __put_user(ptr_to_compat(old_ka.sa.sa_restorer), &oact->sa_restorer);
393                 if (ret)
394                         ret = -EFAULT;
395         }
396
397         return ret;
398 }
399
400 /*
401  * sparc32_execve() executes a new program after the asm stub has set
402  * things up for us.  This should basically do what I want it to.
403  */
404 asmlinkage long sparc32_execve(struct pt_regs *regs)
405 {
406         int error, base = 0;
407         char *filename;
408
409         /* User register window flush is done by entry.S */
410
411         /* Check for indirect call. */
412         if ((u32)regs->u_regs[UREG_G1] == 0)
413                 base = 1;
414
415         filename = getname(compat_ptr(regs->u_regs[base + UREG_I0]));
416         error = PTR_ERR(filename);
417         if (IS_ERR(filename))
418                 goto out;
419
420         error = compat_do_execve(filename,
421                                  compat_ptr(regs->u_regs[base + UREG_I1]),
422                                  compat_ptr(regs->u_regs[base + UREG_I2]), regs);
423
424         putname(filename);
425
426         if (!error) {
427                 fprs_write(0);
428                 current_thread_info()->xfsr[0] = 0;
429                 current_thread_info()->fpsaved[0] = 0;
430                 regs->tstate &= ~TSTATE_PEF;
431         }
432 out:
433         return error;
434 }
435
436 #ifdef CONFIG_MODULES
437
438 asmlinkage long sys32_init_module(void __user *umod, u32 len,
439                                   const char __user *uargs)
440 {
441         return sys_init_module(umod, len, uargs);
442 }
443
444 asmlinkage long sys32_delete_module(const char __user *name_user,
445                                     unsigned int flags)
446 {
447         return sys_delete_module(name_user, flags);
448 }
449
450 #else /* CONFIG_MODULES */
451
452 asmlinkage long sys32_init_module(const char __user *name_user,
453                                   struct module __user *mod_user)
454 {
455         return -ENOSYS;
456 }
457
458 asmlinkage long sys32_delete_module(const char __user *name_user)
459 {
460         return -ENOSYS;
461 }
462
463 #endif  /* CONFIG_MODULES */
464
465 asmlinkage compat_ssize_t sys32_pread64(unsigned int fd,
466                                         char __user *ubuf,
467                                         compat_size_t count,
468                                         unsigned long poshi,
469                                         unsigned long poslo)
470 {
471         return sys_pread64(fd, ubuf, count, (poshi << 32) | poslo);
472 }
473
474 asmlinkage compat_ssize_t sys32_pwrite64(unsigned int fd,
475                                          char __user *ubuf,
476                                          compat_size_t count,
477                                          unsigned long poshi,
478                                          unsigned long poslo)
479 {
480         return sys_pwrite64(fd, ubuf, count, (poshi << 32) | poslo);
481 }
482
483 asmlinkage long compat_sys_readahead(int fd,
484                                      unsigned long offhi,
485                                      unsigned long offlo,
486                                      compat_size_t count)
487 {
488         return sys_readahead(fd, (offhi << 32) | offlo, count);
489 }
490
491 long compat_sys_fadvise64(int fd,
492                           unsigned long offhi,
493                           unsigned long offlo,
494                           compat_size_t len, int advice)
495 {
496         return sys_fadvise64_64(fd, (offhi << 32) | offlo, len, advice);
497 }
498
499 long compat_sys_fadvise64_64(int fd,
500                              unsigned long offhi, unsigned long offlo,
501                              unsigned long lenhi, unsigned long lenlo,
502                              int advice)
503 {
504         return sys_fadvise64_64(fd,
505                                 (offhi << 32) | offlo,
506                                 (lenhi << 32) | lenlo,
507                                 advice);
508 }
509
510 asmlinkage long compat_sys_sendfile(int out_fd, int in_fd,
511                                     compat_off_t __user *offset,
512                                     compat_size_t count)
513 {
514         mm_segment_t old_fs = get_fs();
515         int ret;
516         off_t of;
517         
518         if (offset && get_user(of, offset))
519                 return -EFAULT;
520                 
521         set_fs(KERNEL_DS);
522         ret = sys_sendfile(out_fd, in_fd,
523                            offset ? (off_t __user *) &of : NULL,
524                            count);
525         set_fs(old_fs);
526         
527         if (offset && put_user(of, offset))
528                 return -EFAULT;
529                 
530         return ret;
531 }
532
533 asmlinkage long compat_sys_sendfile64(int out_fd, int in_fd,
534                                       compat_loff_t __user *offset,
535                                       compat_size_t count)
536 {
537         mm_segment_t old_fs = get_fs();
538         int ret;
539         loff_t lof;
540         
541         if (offset && get_user(lof, offset))
542                 return -EFAULT;
543                 
544         set_fs(KERNEL_DS);
545         ret = sys_sendfile64(out_fd, in_fd,
546                              offset ? (loff_t __user *) &lof : NULL,
547                              count);
548         set_fs(old_fs);
549         
550         if (offset && put_user(lof, offset))
551                 return -EFAULT;
552                 
553         return ret;
554 }
555
556 /* This is just a version for 32-bit applications which does
557  * not force O_LARGEFILE on.
558  */
559
560 asmlinkage long sparc32_open(const char __user *filename,
561                              int flags, int mode)
562 {
563         return do_sys_open(AT_FDCWD, filename, flags, mode);
564 }
565
566 long sys32_lookup_dcookie(unsigned long cookie_high,
567                           unsigned long cookie_low,
568                           char __user *buf, size_t len)
569 {
570         return sys_lookup_dcookie((cookie_high << 32) | cookie_low,
571                                   buf, len);
572 }
573
574 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)
575 {
576         return sys_sync_file_range(fd,
577                                    (off_high << 32) | off_low,
578                                    (nb_high << 32) | nb_low,
579                                    flags);
580 }
581
582 asmlinkage long compat_sys_fallocate(int fd, int mode, u32 offhi, u32 offlo,
583                                      u32 lenhi, u32 lenlo)
584 {
585         return sys_fallocate(fd, mode, ((loff_t)offhi << 32) | offlo,
586                              ((loff_t)lenhi << 32) | lenlo);
587 }