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/config.h>
13 #include <linux/compat.h>
14 #include <linux/kernel.h>
15 #include <linux/sched.h>
18 #include <linux/file.h>
19 #include <linux/signal.h>
20 #include <linux/resource.h>
21 #include <linux/times.h>
22 #include <linux/utsname.h>
23 #include <linux/time.h>
24 #include <linux/timex.h>
25 #include <linux/smp.h>
26 #include <linux/smp_lock.h>
27 #include <linux/sem.h>
28 #include <linux/msg.h>
29 #include <linux/shm.h>
30 #include <linux/slab.h>
31 #include <linux/uio.h>
32 #include <linux/nfs_fs.h>
33 #include <linux/ncp_fs.h>
34 #include <linux/sunrpc/svc.h>
35 #include <linux/nfsd/nfsd.h>
36 #include <linux/nfsd/cache.h>
37 #include <linux/nfsd/xdr.h>
38 #include <linux/nfsd/syscall.h>
39 #include <linux/poll.h>
40 #include <linux/personality.h>
41 #include <linux/stat.h>
42 #include <linux/highmem.h>
43 #include <linux/highuid.h>
44 #include <linux/mman.h>
45 #include <linux/binfmts.h>
46 #include <linux/namei.h>
47 #include <linux/vfs.h>
48 #include <linux/ptrace.h>
49 #include <linux/swap.h>
50 #include <linux/syscalls.h>
52 #include <asm/types.h>
53 #include <asm/uaccess.h>
54 #include <asm/semaphore.h>
55 #include <asm/mmu_context.h>
62 #define DBG(x) printk x
68 * sys32_execve() executes a new program.
71 asmlinkage
int sys32_execve(struct pt_regs
*regs
)
76 DBG(("sys32_execve(%p) r26 = 0x%lx\n", regs
, regs
->gr
[26]));
77 filename
= getname((const char __user
*) regs
->gr
[26]);
78 error
= PTR_ERR(filename
);
81 error
= compat_do_execve(filename
, compat_ptr(regs
->gr
[25]),
82 compat_ptr(regs
->gr
[24]), regs
);
85 current
->ptrace
&= ~PT_DTRACE
;
94 asmlinkage
long sys32_unimplemented(int r26
, int r25
, int r24
, int r23
,
95 int r22
, int r21
, int r20
)
97 printk(KERN_ERR
"%s(%d): Unimplemented 32 on 64 syscall #%d!\n",
98 current
->comm
, current
->pid
, r20
);
104 struct __sysctl_args32
{
114 asmlinkage
long sys32_sysctl(struct __sysctl_args32 __user
*args
)
116 struct __sysctl_args32 tmp
;
118 unsigned int oldlen32
;
119 size_t oldlen
, *oldlenp
= NULL
;
120 unsigned long addr
= (((long __force
)&args
->__unused
[0]) + 7) & ~7;
121 extern int do_sysctl(int *name
, int nlen
, void *oldval
, size_t *oldlenp
,
122 void *newval
, size_t newlen
);
124 DBG(("sysctl32(%p)\n", args
));
126 if (copy_from_user(&tmp
, args
, sizeof(tmp
)))
129 if (tmp
.oldval
&& tmp
.oldlenp
) {
130 /* Duh, this is ugly and might not work if sysctl_args
131 is in read-only memory, but do_sysctl does indirectly
132 a lot of uaccess in both directions and we'd have to
133 basically copy the whole sysctl.c here, and
134 glibc's __sysctl uses rw memory for the structure
136 /* a possibly better hack than this, which will avoid the
137 * problem if the struct is read only, is to push the
138 * 'oldlen' value out to the user's stack instead. -PB
140 if (get_user(oldlen32
, (u32
*)(u64
)tmp
.oldlenp
))
143 if (put_user(oldlen
, (size_t *)addr
))
145 oldlenp
= (size_t *)addr
;
149 error
= do_sysctl((int *)(u64
)tmp
.name
, tmp
.nlen
, (void *)(u64
)tmp
.oldval
,
150 oldlenp
, (void *)(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
[0], tmp
.__unused
, sizeof(tmp
.__unused
)))
168 #endif /* CONFIG_SYSCTL */
170 asmlinkage
long sys32_sched_rr_get_interval(pid_t pid
,
171 struct compat_timespec __user
*interval
)
176 KERNEL_SYSCALL(ret
, sys_sched_rr_get_interval
, pid
, (struct timespec __user
*)&t
);
177 if (put_compat_timespec(&t
, interval
))
183 put_compat_timeval(struct compat_timeval __user
*u
, struct timeval
*t
)
185 struct compat_timeval t32
;
186 t32
.tv_sec
= t
->tv_sec
;
187 t32
.tv_usec
= t
->tv_usec
;
188 return copy_to_user(u
, &t32
, sizeof t32
);
191 static inline long get_ts32(struct timespec
*o
, struct compat_timeval __user
*i
)
195 if (__get_user(o
->tv_sec
, &i
->tv_sec
))
197 if (__get_user(usec
, &i
->tv_usec
))
199 o
->tv_nsec
= usec
* 1000;
204 sys32_gettimeofday(struct compat_timeval __user
*tv
, struct timezone __user
*tz
)
206 extern void do_gettimeofday(struct timeval
*tv
);
210 do_gettimeofday(&ktv
);
211 if (put_compat_timeval(tv
, &ktv
))
215 extern struct timezone sys_tz
;
216 if (copy_to_user(tz
, &sys_tz
, sizeof(sys_tz
)))
223 int sys32_settimeofday(struct compat_timeval __user
*tv
, struct timezone __user
*tz
)
229 if (get_ts32(&kts
, tv
))
233 if (copy_from_user(&ktz
, tz
, sizeof(ktz
)))
237 return do_sys_settimeofday(tv
? &kts
: NULL
, tz
? &ktz
: NULL
);
240 int cp_compat_stat(struct kstat
*stat
, struct compat_stat __user
*statbuf
)
244 if (stat
->size
> MAX_NON_LFS
|| !new_valid_dev(stat
->dev
) ||
245 !new_valid_dev(stat
->rdev
))
248 err
= put_user(new_encode_dev(stat
->dev
), &statbuf
->st_dev
);
249 err
|= put_user(stat
->ino
, &statbuf
->st_ino
);
250 err
|= put_user(stat
->mode
, &statbuf
->st_mode
);
251 err
|= put_user(stat
->nlink
, &statbuf
->st_nlink
);
252 err
|= put_user(0, &statbuf
->st_reserved1
);
253 err
|= put_user(0, &statbuf
->st_reserved2
);
254 err
|= put_user(new_encode_dev(stat
->rdev
), &statbuf
->st_rdev
);
255 err
|= put_user(stat
->size
, &statbuf
->st_size
);
256 err
|= put_user(stat
->atime
.tv_sec
, &statbuf
->st_atime
);
257 err
|= put_user(stat
->atime
.tv_nsec
, &statbuf
->st_atime_nsec
);
258 err
|= put_user(stat
->mtime
.tv_sec
, &statbuf
->st_mtime
);
259 err
|= put_user(stat
->mtime
.tv_nsec
, &statbuf
->st_mtime_nsec
);
260 err
|= put_user(stat
->ctime
.tv_sec
, &statbuf
->st_ctime
);
261 err
|= put_user(stat
->ctime
.tv_nsec
, &statbuf
->st_ctime_nsec
);
262 err
|= put_user(stat
->blksize
, &statbuf
->st_blksize
);
263 err
|= put_user(stat
->blocks
, &statbuf
->st_blocks
);
264 err
|= put_user(0, &statbuf
->__unused1
);
265 err
|= put_user(0, &statbuf
->__unused2
);
266 err
|= put_user(0, &statbuf
->__unused3
);
267 err
|= put_user(0, &statbuf
->__unused4
);
268 err
|= put_user(0, &statbuf
->__unused5
);
269 err
|= put_user(0, &statbuf
->st_fstype
); /* not avail */
270 err
|= put_user(0, &statbuf
->st_realdev
); /* not avail */
271 err
|= put_user(0, &statbuf
->st_basemode
); /* not avail */
272 err
|= put_user(0, &statbuf
->st_spareshort
);
273 err
|= put_user(stat
->uid
, &statbuf
->st_uid
);
274 err
|= put_user(stat
->gid
, &statbuf
->st_gid
);
275 err
|= put_user(0, &statbuf
->st_spare4
[0]);
276 err
|= put_user(0, &statbuf
->st_spare4
[1]);
277 err
|= put_user(0, &statbuf
->st_spare4
[2]);
282 struct linux32_dirent
{
289 struct old_linux32_dirent
{
296 struct getdents32_callback
{
297 struct linux32_dirent __user
* current_dir
;
298 struct linux32_dirent __user
* previous
;
303 struct readdir32_callback
{
304 struct old_linux32_dirent __user
* dirent
;
308 #define ROUND_UP(x,a) ((__typeof__(x))(((unsigned long)(x) + ((a) - 1)) & ~((a) - 1)))
309 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
311 filldir32 (void *__buf
, const char *name
, int namlen
, loff_t offset
, ino_t ino
,
314 struct linux32_dirent __user
* dirent
;
315 struct getdents32_callback
* buf
= (struct getdents32_callback
*) __buf
;
316 int reclen
= ROUND_UP(NAME_OFFSET(dirent
) + namlen
+ 1, 4);
318 buf
->error
= -EINVAL
; /* only used if we fail.. */
319 if (reclen
> buf
->count
)
321 dirent
= buf
->previous
;
323 put_user(offset
, &dirent
->d_off
);
324 dirent
= buf
->current_dir
;
325 buf
->previous
= dirent
;
326 put_user(ino
, &dirent
->d_ino
);
327 put_user(reclen
, &dirent
->d_reclen
);
328 copy_to_user(dirent
->d_name
, name
, namlen
);
329 put_user(0, dirent
->d_name
+ namlen
);
330 dirent
= ((void __user
*)dirent
) + reclen
;
331 buf
->current_dir
= dirent
;
332 buf
->count
-= reclen
;
337 sys32_getdents (unsigned int fd
, void __user
* dirent
, unsigned int count
)
340 struct linux32_dirent __user
* lastdirent
;
341 struct getdents32_callback buf
;
349 buf
.current_dir
= (struct linux32_dirent __user
*) dirent
;
354 error
= vfs_readdir(file
, filldir32
, &buf
);
358 lastdirent
= buf
.previous
;
360 put_user(file
->f_pos
, &lastdirent
->d_off
);
361 error
= count
- buf
.count
;
371 fillonedir32 (void * __buf
, const char * name
, int namlen
, loff_t offset
, ino_t ino
,
374 struct readdir32_callback
* buf
= (struct readdir32_callback
*) __buf
;
375 struct old_linux32_dirent __user
* dirent
;
380 dirent
= buf
->dirent
;
381 put_user(ino
, &dirent
->d_ino
);
382 put_user(offset
, &dirent
->d_offset
);
383 put_user(namlen
, &dirent
->d_namlen
);
384 copy_to_user(dirent
->d_name
, name
, namlen
);
385 put_user(0, dirent
->d_name
+ namlen
);
390 sys32_readdir (unsigned int fd
, void __user
* dirent
, unsigned int count
)
394 struct readdir32_callback buf
;
404 error
= vfs_readdir(file
, fillonedir32
, &buf
);
412 /*** copied from mips64 ***/
414 * Ooo, nasty. We need here to frob 32-bit unsigned longs to
415 * 64-bit unsigned longs.
419 get_fd_set32(unsigned long n
, u32
*ufdset
, unsigned long *fdset
)
421 n
= (n
+ 8*sizeof(u32
) - 1) / (8*sizeof(u32
));
425 if (!access_ok(VERIFY_WRITE
, ufdset
, n
*sizeof(u32
)))
432 __get_user(l
, ufdset
);
433 __get_user(h
, ufdset
+1);
435 *fdset
++ = h
<< 32 | l
;
439 __get_user(*fdset
, ufdset
);
441 /* Tricky, must clear full unsigned long in the
442 * kernel fdset at the end, this makes sure that
445 memset(fdset
, 0, ((n
+ 1) & ~1)*sizeof(u32
));
451 set_fd_set32(unsigned long n
, u32
*ufdset
, unsigned long *fdset
)
454 n
= (n
+ 8*sizeof(u32
) - 1) / (8*sizeof(u32
));
465 __put_user(l
, ufdset
);
466 __put_user(h
, ufdset
+1);
471 __put_user(*fdset
, ufdset
);
479 asmlinkage
long sys32_msgsnd(int msqid
,
480 struct msgbuf32 __user
*umsgp32
,
481 size_t msgsz
, int msgflg
)
484 struct msgbuf32 mb32
;
487 if ((mb
= kmalloc(msgsz
+ sizeof *mb
+ 4, GFP_KERNEL
)) == NULL
)
490 err
= get_user(mb32
.mtype
, &umsgp32
->mtype
);
491 mb
->mtype
= mb32
.mtype
;
492 err
|= copy_from_user(mb
->mtext
, &umsgp32
->mtext
, msgsz
);
497 KERNEL_SYSCALL(err
, sys_msgsnd
, msqid
, (struct msgbuf __user
*)mb
, msgsz
, msgflg
);
503 asmlinkage
long sys32_msgrcv(int msqid
,
504 struct msgbuf32 __user
*umsgp32
,
505 size_t msgsz
, long msgtyp
, int msgflg
)
508 struct msgbuf32 mb32
;
511 if ((mb
= kmalloc(msgsz
+ sizeof *mb
+ 4, GFP_KERNEL
)) == NULL
)
514 KERNEL_SYSCALL(err
, sys_msgrcv
, msqid
, (struct msgbuf __user
*)mb
, msgsz
, msgtyp
, msgflg
);
518 mb32
.mtype
= mb
->mtype
;
519 err
= put_user(mb32
.mtype
, &umsgp32
->mtype
);
520 err
|= copy_to_user(&umsgp32
->mtext
, mb
->mtext
, len
);
531 asmlinkage
int sys32_sendfile(int out_fd
, int in_fd
, compat_off_t __user
*offset
, s32 count
)
533 mm_segment_t old_fs
= get_fs();
537 if (offset
&& get_user(of
, offset
))
541 ret
= sys_sendfile(out_fd
, in_fd
, offset
? (off_t __user
*)&of
: NULL
, count
);
544 if (offset
&& put_user(of
, offset
))
550 asmlinkage
int sys32_sendfile64(int out_fd
, int in_fd
, compat_loff_t __user
*offset
, s32 count
)
552 mm_segment_t old_fs
= get_fs();
556 if (offset
&& get_user(lof
, offset
))
560 ret
= sys_sendfile64(out_fd
, in_fd
, offset
? (loff_t __user
*)&lof
: NULL
, count
);
563 if (offset
&& put_user(lof
, offset
))
571 unsigned int modes
; /* mode selector */
572 int offset
; /* time offset (usec) */
573 int freq
; /* frequency offset (scaled ppm) */
574 int maxerror
; /* maximum error (usec) */
575 int esterror
; /* estimated error (usec) */
576 int status
; /* clock command/status */
577 int constant
; /* pll time constant */
578 int precision
; /* clock precision (usec) (read only) */
579 int tolerance
; /* clock frequency tolerance (ppm)
582 struct compat_timeval time
; /* (read only) */
583 int tick
; /* (modified) usecs between clock ticks */
585 int ppsfreq
; /* pps frequency (scaled ppm) (ro) */
586 int jitter
; /* pps jitter (us) (ro) */
587 int shift
; /* interval duration (s) (shift) (ro) */
588 int stabil
; /* pps stability (scaled ppm) (ro) */
589 int jitcnt
; /* jitter limit exceeded (ro) */
590 int calcnt
; /* calibration intervals (ro) */
591 int errcnt
; /* calibration errors (ro) */
592 int stbcnt
; /* stability limit exceeded (ro) */
594 int :32; int :32; int :32; int :32;
595 int :32; int :32; int :32; int :32;
596 int :32; int :32; int :32; int :32;
599 asmlinkage
long sys32_adjtimex(struct timex32 __user
*txc_p32
)
604 extern int do_adjtimex(struct timex
*txc
);
606 if(copy_from_user(&t32
, txc_p32
, sizeof(struct timex32
)))
609 #define CP(x) txc.x = t32.x
610 CP(modes
); CP(offset
); CP(freq
); CP(maxerror
); CP(esterror
);
611 CP(status
); CP(constant
); CP(precision
); CP(tolerance
);
612 CP(time
.tv_sec
); CP(time
.tv_usec
); CP(tick
); CP(ppsfreq
); CP(jitter
);
613 CP(shift
); CP(stabil
); CP(jitcnt
); CP(calcnt
); CP(errcnt
);
615 ret
= do_adjtimex(&txc
);
617 #define CP(x) t32.x = txc.x
618 CP(modes
); CP(offset
); CP(freq
); CP(maxerror
); CP(esterror
);
619 CP(status
); CP(constant
); CP(precision
); CP(tolerance
);
620 CP(time
.tv_sec
); CP(time
.tv_usec
); CP(tick
); CP(ppsfreq
); CP(jitter
);
621 CP(shift
); CP(stabil
); CP(jitcnt
); CP(calcnt
); CP(errcnt
);
623 return copy_to_user(txc_p32
, &t32
, sizeof(struct timex32
)) ? -EFAULT
: ret
;
636 unsigned short procs
;
643 /* We used to call sys_sysinfo and translate the result. But sys_sysinfo
644 * undoes the good work done elsewhere, and rather than undoing the
645 * damage, I decided to just duplicate the code from sys_sysinfo here.
648 asmlinkage
int sys32_sysinfo(struct sysinfo32 __user
*info
)
654 /* We don't need a memset here because we copy the
655 * struct to userspace once element at a time.
659 seq
= read_seqbegin(&xtime_lock
);
660 val
.uptime
= jiffies
/ HZ
;
662 val
.loads
[0] = avenrun
[0] << (SI_LOAD_SHIFT
- FSHIFT
);
663 val
.loads
[1] = avenrun
[1] << (SI_LOAD_SHIFT
- FSHIFT
);
664 val
.loads
[2] = avenrun
[2] << (SI_LOAD_SHIFT
- FSHIFT
);
666 val
.procs
= nr_threads
;
667 } while (read_seqretry(&xtime_lock
, seq
));
673 err
= put_user (val
.uptime
, &info
->uptime
);
674 err
|= __put_user (val
.loads
[0], &info
->loads
[0]);
675 err
|= __put_user (val
.loads
[1], &info
->loads
[1]);
676 err
|= __put_user (val
.loads
[2], &info
->loads
[2]);
677 err
|= __put_user (val
.totalram
, &info
->totalram
);
678 err
|= __put_user (val
.freeram
, &info
->freeram
);
679 err
|= __put_user (val
.sharedram
, &info
->sharedram
);
680 err
|= __put_user (val
.bufferram
, &info
->bufferram
);
681 err
|= __put_user (val
.totalswap
, &info
->totalswap
);
682 err
|= __put_user (val
.freeswap
, &info
->freeswap
);
683 err
|= __put_user (val
.procs
, &info
->procs
);
684 err
|= __put_user (val
.totalhigh
, &info
->totalhigh
);
685 err
|= __put_user (val
.freehigh
, &info
->freehigh
);
686 err
|= __put_user (val
.mem_unit
, &info
->mem_unit
);
687 return err
? -EFAULT
: 0;
691 /* lseek() needs a wrapper because 'offset' can be negative, but the top
692 * half of the argument has been zeroed by syscall.S.
695 asmlinkage
int sys32_lseek(unsigned int fd
, int offset
, unsigned int origin
)
697 return sys_lseek(fd
, offset
, origin
);
700 asmlinkage
long sys32_semctl(int semid
, int semnum
, int cmd
, union semun arg
)
705 /* Ugh. arg is a union of int,ptr,ptr,ptr, so is 8 bytes.
706 * The int should be in the first 4, but our argument
707 * frobbing has left it in the last 4.
709 u
.val
= *((int *)&arg
+ 1);
710 return sys_semctl (semid
, semnum
, cmd
, u
);
712 return sys_semctl (semid
, semnum
, cmd
, arg
);
715 long sys32_lookup_dcookie(u32 cookie_high
, u32 cookie_low
, char __user
*buf
,
718 return sys_lookup_dcookie((u64
)cookie_high
<< 32 | cookie_low
,