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