2 * sys_parisc32.c: Conversion between 32bit and 64bit native syscalls.
4 * Copyright (C) 2000-2001 Hewlett Packard Company
5 * Copyright (C) 2000 John Marvin
6 * Copyright (C) 2001 Matthew Wilcox
8 * These routines maintain argument size conversion between 32bit and 64bit
9 * environment. Based heavily on sys_ia32.c and sys_sparc32.c.
12 #include <linux/compat.h>
13 #include <linux/kernel.h>
14 #include <linux/sched.h>
17 #include <linux/file.h>
18 #include <linux/signal.h>
19 #include <linux/resource.h>
20 #include <linux/times.h>
21 #include <linux/utsname.h>
22 #include <linux/time.h>
23 #include <linux/smp.h>
24 #include <linux/smp_lock.h>
25 #include <linux/sem.h>
26 #include <linux/msg.h>
27 #include <linux/shm.h>
28 #include <linux/slab.h>
29 #include <linux/uio.h>
30 #include <linux/nfs_fs.h>
31 #include <linux/ncp_fs.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/highmem.h>
41 #include <linux/highuid.h>
42 #include <linux/mman.h>
43 #include <linux/binfmts.h>
44 #include <linux/namei.h>
45 #include <linux/vfs.h>
46 #include <linux/ptrace.h>
47 #include <linux/swap.h>
48 #include <linux/syscalls.h>
50 #include <asm/types.h>
51 #include <asm/uaccess.h>
52 #include <asm/semaphore.h>
53 #include <asm/mmu_context.h>
60 #define DBG(x) printk x
66 * sys32_execve() executes a new program.
69 asmlinkage
int sys32_execve(struct pt_regs
*regs
)
74 DBG(("sys32_execve(%p) r26 = 0x%lx\n", regs
, regs
->gr
[26]));
75 filename
= getname((const char __user
*) regs
->gr
[26]);
76 error
= PTR_ERR(filename
);
79 error
= compat_do_execve(filename
, compat_ptr(regs
->gr
[25]),
80 compat_ptr(regs
->gr
[24]), regs
);
83 current
->ptrace
&= ~PT_DTRACE
;
92 asmlinkage
long sys32_unimplemented(int r26
, int r25
, int r24
, int r23
,
93 int r22
, int r21
, int r20
)
95 printk(KERN_ERR
"%s(%d): Unimplemented 32 on 64 syscall #%d!\n",
96 current
->comm
, current
->pid
, r20
);
102 struct __sysctl_args32
{
112 asmlinkage
long sys32_sysctl(struct __sysctl_args32 __user
*args
)
114 #ifndef CONFIG_SYSCTL_SYSCALL
117 struct __sysctl_args32 tmp
;
119 unsigned int oldlen32
;
120 size_t oldlen
, __user
*oldlenp
= NULL
;
121 unsigned long addr
= (((long __force
)&args
->__unused
[0]) + 7) & ~7;
123 DBG(("sysctl32(%p)\n", args
));
125 if (copy_from_user(&tmp
, args
, sizeof(tmp
)))
128 if (tmp
.oldval
&& tmp
.oldlenp
) {
129 /* Duh, this is ugly and might not work if sysctl_args
130 is in read-only memory, but do_sysctl does indirectly
131 a lot of uaccess in both directions and we'd have to
132 basically copy the whole sysctl.c here, and
133 glibc's __sysctl uses rw memory for the structure
135 /* a possibly better hack than this, which will avoid the
136 * problem if the struct is read only, is to push the
137 * 'oldlen' value out to the user's stack instead. -PB
139 if (get_user(oldlen32
, (u32
*)(u64
)tmp
.oldlenp
))
142 if (put_user(oldlen
, (size_t *)addr
))
144 oldlenp
= (size_t *)addr
;
148 error
= do_sysctl((int __user
*)(u64
)tmp
.name
, tmp
.nlen
,
149 (void __user
*)(u64
)tmp
.oldval
, oldlenp
,
150 (void __user
*)(u64
)tmp
.newval
, tmp
.newlen
);
154 if (get_user(oldlen
, (size_t *)addr
)) {
158 if (put_user(oldlen32
, (u32
*)(u64
)tmp
.oldlenp
))
162 if (copy_to_user(args
->__unused
, tmp
.__unused
, sizeof(tmp
.__unused
)))
169 #endif /* CONFIG_SYSCTL */
171 asmlinkage
long sys32_sched_rr_get_interval(pid_t pid
,
172 struct compat_timespec __user
*interval
)
177 KERNEL_SYSCALL(ret
, sys_sched_rr_get_interval
, pid
, (struct timespec __user
*)&t
);
178 if (put_compat_timespec(&t
, interval
))
184 put_compat_timeval(struct compat_timeval __user
*u
, struct timeval
*t
)
186 struct compat_timeval t32
;
187 t32
.tv_sec
= t
->tv_sec
;
188 t32
.tv_usec
= t
->tv_usec
;
189 return copy_to_user(u
, &t32
, sizeof t32
);
192 static inline long get_ts32(struct timespec
*o
, struct compat_timeval __user
*i
)
196 if (__get_user(o
->tv_sec
, &i
->tv_sec
))
198 if (__get_user(usec
, &i
->tv_usec
))
200 o
->tv_nsec
= usec
* 1000;
205 sys32_gettimeofday(struct compat_timeval __user
*tv
, struct timezone __user
*tz
)
207 extern void do_gettimeofday(struct timeval
*tv
);
211 do_gettimeofday(&ktv
);
212 if (put_compat_timeval(tv
, &ktv
))
216 extern struct timezone sys_tz
;
217 if (copy_to_user(tz
, &sys_tz
, sizeof(sys_tz
)))
224 int sys32_settimeofday(struct compat_timeval __user
*tv
, struct timezone __user
*tz
)
230 if (get_ts32(&kts
, tv
))
234 if (copy_from_user(&ktz
, tz
, sizeof(ktz
)))
238 return do_sys_settimeofday(tv
? &kts
: NULL
, tz
? &ktz
: NULL
);
241 int cp_compat_stat(struct kstat
*stat
, struct compat_stat __user
*statbuf
)
246 if (stat
->size
> MAX_NON_LFS
|| !new_valid_dev(stat
->dev
) ||
247 !new_valid_dev(stat
->rdev
))
251 if (sizeof(ino
) < sizeof(stat
->ino
) && ino
!= stat
->ino
)
254 err
= put_user(new_encode_dev(stat
->dev
), &statbuf
->st_dev
);
255 err
|= put_user(ino
, &statbuf
->st_ino
);
256 err
|= put_user(stat
->mode
, &statbuf
->st_mode
);
257 err
|= put_user(stat
->nlink
, &statbuf
->st_nlink
);
258 err
|= put_user(0, &statbuf
->st_reserved1
);
259 err
|= put_user(0, &statbuf
->st_reserved2
);
260 err
|= put_user(new_encode_dev(stat
->rdev
), &statbuf
->st_rdev
);
261 err
|= put_user(stat
->size
, &statbuf
->st_size
);
262 err
|= put_user(stat
->atime
.tv_sec
, &statbuf
->st_atime
);
263 err
|= put_user(stat
->atime
.tv_nsec
, &statbuf
->st_atime_nsec
);
264 err
|= put_user(stat
->mtime
.tv_sec
, &statbuf
->st_mtime
);
265 err
|= put_user(stat
->mtime
.tv_nsec
, &statbuf
->st_mtime_nsec
);
266 err
|= put_user(stat
->ctime
.tv_sec
, &statbuf
->st_ctime
);
267 err
|= put_user(stat
->ctime
.tv_nsec
, &statbuf
->st_ctime_nsec
);
268 err
|= put_user(stat
->blksize
, &statbuf
->st_blksize
);
269 err
|= put_user(stat
->blocks
, &statbuf
->st_blocks
);
270 err
|= put_user(0, &statbuf
->__unused1
);
271 err
|= put_user(0, &statbuf
->__unused2
);
272 err
|= put_user(0, &statbuf
->__unused3
);
273 err
|= put_user(0, &statbuf
->__unused4
);
274 err
|= put_user(0, &statbuf
->__unused5
);
275 err
|= put_user(0, &statbuf
->st_fstype
); /* not avail */
276 err
|= put_user(0, &statbuf
->st_realdev
); /* not avail */
277 err
|= put_user(0, &statbuf
->st_basemode
); /* not avail */
278 err
|= put_user(0, &statbuf
->st_spareshort
);
279 err
|= put_user(stat
->uid
, &statbuf
->st_uid
);
280 err
|= put_user(stat
->gid
, &statbuf
->st_gid
);
281 err
|= put_user(0, &statbuf
->st_spare4
[0]);
282 err
|= put_user(0, &statbuf
->st_spare4
[1]);
283 err
|= put_user(0, &statbuf
->st_spare4
[2]);
288 struct linux32_dirent
{
295 struct old_linux32_dirent
{
302 struct getdents32_callback
{
303 struct linux32_dirent __user
* current_dir
;
304 struct linux32_dirent __user
* previous
;
309 struct readdir32_callback
{
310 struct old_linux32_dirent __user
* dirent
;
314 #define ROUND_UP(x,a) ((__typeof__(x))(((unsigned long)(x) + ((a) - 1)) & ~((a) - 1)))
315 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
316 static int filldir32 (void *__buf
, const char *name
, int namlen
,
317 loff_t offset
, u64 ino
, unsigned int d_type
)
319 struct linux32_dirent __user
* dirent
;
320 struct getdents32_callback
* buf
= (struct getdents32_callback
*) __buf
;
321 int reclen
= ROUND_UP(NAME_OFFSET(dirent
) + namlen
+ 1, 4);
324 buf
->error
= -EINVAL
; /* only used if we fail.. */
325 if (reclen
> buf
->count
)
328 if (sizeof(d_ino
) < sizeof(ino
) && d_ino
!= ino
)
330 dirent
= buf
->previous
;
332 put_user(offset
, &dirent
->d_off
);
333 dirent
= buf
->current_dir
;
334 buf
->previous
= dirent
;
335 put_user(d_ino
, &dirent
->d_ino
);
336 put_user(reclen
, &dirent
->d_reclen
);
337 copy_to_user(dirent
->d_name
, name
, namlen
);
338 put_user(0, dirent
->d_name
+ namlen
);
339 dirent
= ((void __user
*)dirent
) + reclen
;
340 buf
->current_dir
= dirent
;
341 buf
->count
-= reclen
;
346 sys32_getdents (unsigned int fd
, void __user
* dirent
, unsigned int count
)
349 struct linux32_dirent __user
* lastdirent
;
350 struct getdents32_callback buf
;
358 buf
.current_dir
= (struct linux32_dirent __user
*) dirent
;
363 error
= vfs_readdir(file
, filldir32
, &buf
);
367 lastdirent
= buf
.previous
;
369 put_user(file
->f_pos
, &lastdirent
->d_off
);
370 error
= count
- buf
.count
;
379 static int fillonedir32(void * __buf
, const char * name
, int namlen
,
380 loff_t offset
, u64 ino
, unsigned int d_type
)
382 struct readdir32_callback
* buf
= (struct readdir32_callback
*) __buf
;
383 struct old_linux32_dirent __user
* dirent
;
389 if (sizeof(d_ino
) < sizeof(ino
) && d_ino
!= ino
)
392 dirent
= buf
->dirent
;
393 put_user(d_ino
, &dirent
->d_ino
);
394 put_user(offset
, &dirent
->d_offset
);
395 put_user(namlen
, &dirent
->d_namlen
);
396 copy_to_user(dirent
->d_name
, name
, namlen
);
397 put_user(0, dirent
->d_name
+ namlen
);
402 sys32_readdir (unsigned int fd
, void __user
* dirent
, unsigned int count
)
406 struct readdir32_callback buf
;
416 error
= vfs_readdir(file
, fillonedir32
, &buf
);
424 /*** copied from mips64 ***/
426 * Ooo, nasty. We need here to frob 32-bit unsigned longs to
427 * 64-bit unsigned longs.
431 get_fd_set32(unsigned long n
, u32
*ufdset
, unsigned long *fdset
)
433 n
= (n
+ 8*sizeof(u32
) - 1) / (8*sizeof(u32
));
437 if (!access_ok(VERIFY_WRITE
, ufdset
, n
*sizeof(u32
)))
444 __get_user(l
, ufdset
);
445 __get_user(h
, ufdset
+1);
447 *fdset
++ = h
<< 32 | l
;
451 __get_user(*fdset
, ufdset
);
453 /* Tricky, must clear full unsigned long in the
454 * kernel fdset at the end, this makes sure that
457 memset(fdset
, 0, ((n
+ 1) & ~1)*sizeof(u32
));
463 set_fd_set32(unsigned long n
, u32
*ufdset
, unsigned long *fdset
)
466 n
= (n
+ 8*sizeof(u32
) - 1) / (8*sizeof(u32
));
477 __put_user(l
, ufdset
);
478 __put_user(h
, ufdset
+1);
483 __put_user(*fdset
, ufdset
);
491 asmlinkage
long sys32_msgsnd(int msqid
,
492 struct msgbuf32 __user
*umsgp32
,
493 size_t msgsz
, int msgflg
)
496 struct msgbuf32 mb32
;
499 if ((mb
= kmalloc(msgsz
+ sizeof *mb
+ 4, GFP_KERNEL
)) == NULL
)
502 err
= get_user(mb32
.mtype
, &umsgp32
->mtype
);
503 mb
->mtype
= mb32
.mtype
;
504 err
|= copy_from_user(mb
->mtext
, &umsgp32
->mtext
, msgsz
);
509 KERNEL_SYSCALL(err
, sys_msgsnd
, msqid
, (struct msgbuf __user
*)mb
, msgsz
, msgflg
);
515 asmlinkage
long sys32_msgrcv(int msqid
,
516 struct msgbuf32 __user
*umsgp32
,
517 size_t msgsz
, long msgtyp
, int msgflg
)
520 struct msgbuf32 mb32
;
523 if ((mb
= kmalloc(msgsz
+ sizeof *mb
+ 4, GFP_KERNEL
)) == NULL
)
526 KERNEL_SYSCALL(err
, sys_msgrcv
, msqid
, (struct msgbuf __user
*)mb
, msgsz
, msgtyp
, msgflg
);
530 mb32
.mtype
= mb
->mtype
;
531 err
= put_user(mb32
.mtype
, &umsgp32
->mtype
);
532 err
|= copy_to_user(&umsgp32
->mtext
, mb
->mtext
, len
);
543 asmlinkage
int sys32_sendfile(int out_fd
, int in_fd
, compat_off_t __user
*offset
, s32 count
)
545 mm_segment_t old_fs
= get_fs();
549 if (offset
&& get_user(of
, offset
))
553 ret
= sys_sendfile(out_fd
, in_fd
, offset
? (off_t __user
*)&of
: NULL
, count
);
556 if (offset
&& put_user(of
, offset
))
562 asmlinkage
int sys32_sendfile64(int out_fd
, int in_fd
, compat_loff_t __user
*offset
, s32 count
)
564 mm_segment_t old_fs
= get_fs();
568 if (offset
&& get_user(lof
, offset
))
572 ret
= sys_sendfile64(out_fd
, in_fd
, offset
? (loff_t __user
*)&lof
: NULL
, count
);
575 if (offset
&& put_user(lof
, offset
))
591 unsigned short procs
;
598 /* We used to call sys_sysinfo and translate the result. But sys_sysinfo
599 * undoes the good work done elsewhere, and rather than undoing the
600 * damage, I decided to just duplicate the code from sys_sysinfo here.
603 asmlinkage
int sys32_sysinfo(struct sysinfo32 __user
*info
)
609 /* We don't need a memset here because we copy the
610 * struct to userspace once element at a time.
614 seq
= read_seqbegin(&xtime_lock
);
615 val
.uptime
= jiffies
/ HZ
;
617 val
.loads
[0] = avenrun
[0] << (SI_LOAD_SHIFT
- FSHIFT
);
618 val
.loads
[1] = avenrun
[1] << (SI_LOAD_SHIFT
- FSHIFT
);
619 val
.loads
[2] = avenrun
[2] << (SI_LOAD_SHIFT
- FSHIFT
);
621 val
.procs
= nr_threads
;
622 } while (read_seqretry(&xtime_lock
, seq
));
628 err
= put_user (val
.uptime
, &info
->uptime
);
629 err
|= __put_user (val
.loads
[0], &info
->loads
[0]);
630 err
|= __put_user (val
.loads
[1], &info
->loads
[1]);
631 err
|= __put_user (val
.loads
[2], &info
->loads
[2]);
632 err
|= __put_user (val
.totalram
, &info
->totalram
);
633 err
|= __put_user (val
.freeram
, &info
->freeram
);
634 err
|= __put_user (val
.sharedram
, &info
->sharedram
);
635 err
|= __put_user (val
.bufferram
, &info
->bufferram
);
636 err
|= __put_user (val
.totalswap
, &info
->totalswap
);
637 err
|= __put_user (val
.freeswap
, &info
->freeswap
);
638 err
|= __put_user (val
.procs
, &info
->procs
);
639 err
|= __put_user (val
.totalhigh
, &info
->totalhigh
);
640 err
|= __put_user (val
.freehigh
, &info
->freehigh
);
641 err
|= __put_user (val
.mem_unit
, &info
->mem_unit
);
642 return err
? -EFAULT
: 0;
646 /* lseek() needs a wrapper because 'offset' can be negative, but the top
647 * half of the argument has been zeroed by syscall.S.
650 asmlinkage
int sys32_lseek(unsigned int fd
, int offset
, unsigned int origin
)
652 return sys_lseek(fd
, offset
, origin
);
655 asmlinkage
long sys32_semctl(int semid
, int semnum
, int cmd
, union semun arg
)
660 /* Ugh. arg is a union of int,ptr,ptr,ptr, so is 8 bytes.
661 * The int should be in the first 4, but our argument
662 * frobbing has left it in the last 4.
664 u
.val
= *((int *)&arg
+ 1);
665 return sys_semctl (semid
, semnum
, cmd
, u
);
667 return sys_semctl (semid
, semnum
, cmd
, arg
);
670 long sys32_lookup_dcookie(u32 cookie_high
, u32 cookie_low
, char __user
*buf
,
673 return sys_lookup_dcookie((u64
)cookie_high
<< 32 | cookie_low
,