sync hh.org
[hh.org.git] / arch / parisc / kernel / sys_parisc32.c
blob29be4377aca6c0fb1e2cebd00d4fba4556efdc01
1 /*
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>
15 #include <linux/fs.h>
16 #include <linux/mm.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>
55 #include "sys32.h"
57 #undef DEBUG
59 #ifdef DEBUG
60 #define DBG(x) printk x
61 #else
62 #define DBG(x)
63 #endif
66 * sys32_execve() executes a new program.
69 asmlinkage int sys32_execve(struct pt_regs *regs)
71 int error;
72 char *filename;
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);
77 if (IS_ERR(filename))
78 goto out;
79 error = compat_do_execve(filename, compat_ptr(regs->gr[25]),
80 compat_ptr(regs->gr[24]), regs);
81 if (error == 0) {
82 task_lock(current);
83 current->ptrace &= ~PT_DTRACE;
84 task_unlock(current);
86 putname(filename);
87 out:
89 return error;
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);
97 return -ENOSYS;
100 #ifdef CONFIG_SYSCTL
102 struct __sysctl_args32 {
103 u32 name;
104 int nlen;
105 u32 oldval;
106 u32 oldlenp;
107 u32 newval;
108 u32 newlen;
109 u32 __unused[4];
112 asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args)
114 #ifndef CONFIG_SYSCTL_SYSCALL
115 return -ENOSYS;
116 #else
117 struct __sysctl_args32 tmp;
118 int error;
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)))
126 return -EFAULT;
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
134 anyway. */
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))
140 return -EFAULT;
141 oldlen = oldlen32;
142 if (put_user(oldlen, (size_t *)addr))
143 return -EFAULT;
144 oldlenp = (size_t *)addr;
147 lock_kernel();
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);
151 unlock_kernel();
152 if (oldlenp) {
153 if (!error) {
154 if (get_user(oldlen, (size_t *)addr)) {
155 error = -EFAULT;
156 } else {
157 oldlen32 = oldlen;
158 if (put_user(oldlen32, (u32 *)(u64)tmp.oldlenp))
159 error = -EFAULT;
162 if (copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused)))
163 error = -EFAULT;
165 return error;
166 #endif
169 #endif /* CONFIG_SYSCTL */
171 asmlinkage long sys32_sched_rr_get_interval(pid_t pid,
172 struct compat_timespec __user *interval)
174 struct timespec t;
175 int ret;
177 KERNEL_SYSCALL(ret, sys_sched_rr_get_interval, pid, (struct timespec __user *)&t);
178 if (put_compat_timespec(&t, interval))
179 return -EFAULT;
180 return ret;
183 static int
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)
194 long usec;
196 if (__get_user(o->tv_sec, &i->tv_sec))
197 return -EFAULT;
198 if (__get_user(usec, &i->tv_usec))
199 return -EFAULT;
200 o->tv_nsec = usec * 1000;
201 return 0;
204 asmlinkage int
205 sys32_gettimeofday(struct compat_timeval __user *tv, struct timezone __user *tz)
207 extern void do_gettimeofday(struct timeval *tv);
209 if (tv) {
210 struct timeval ktv;
211 do_gettimeofday(&ktv);
212 if (put_compat_timeval(tv, &ktv))
213 return -EFAULT;
215 if (tz) {
216 extern struct timezone sys_tz;
217 if (copy_to_user(tz, &sys_tz, sizeof(sys_tz)))
218 return -EFAULT;
220 return 0;
223 asmlinkage
224 int sys32_settimeofday(struct compat_timeval __user *tv, struct timezone __user *tz)
226 struct timespec kts;
227 struct timezone ktz;
229 if (tv) {
230 if (get_ts32(&kts, tv))
231 return -EFAULT;
233 if (tz) {
234 if (copy_from_user(&ktz, tz, sizeof(ktz)))
235 return -EFAULT;
238 return do_sys_settimeofday(tv ? &kts : NULL, tz ? &ktz : NULL);
241 int cp_compat_stat(struct kstat *stat, struct compat_stat __user *statbuf)
243 compat_ino_t ino;
244 int err;
246 if (stat->size > MAX_NON_LFS || !new_valid_dev(stat->dev) ||
247 !new_valid_dev(stat->rdev))
248 return -EOVERFLOW;
250 ino = stat->ino;
251 if (sizeof(ino) < sizeof(stat->ino) && ino != stat->ino)
252 return -EOVERFLOW;
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]);
285 return err;
288 struct linux32_dirent {
289 u32 d_ino;
290 compat_off_t d_off;
291 u16 d_reclen;
292 char d_name[1];
295 struct old_linux32_dirent {
296 u32 d_ino;
297 u32 d_offset;
298 u16 d_namlen;
299 char d_name[1];
302 struct getdents32_callback {
303 struct linux32_dirent __user * current_dir;
304 struct linux32_dirent __user * previous;
305 int count;
306 int error;
309 struct readdir32_callback {
310 struct old_linux32_dirent __user * dirent;
311 int count;
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);
322 u32 d_ino;
324 buf->error = -EINVAL; /* only used if we fail.. */
325 if (reclen > buf->count)
326 return -EINVAL;
327 d_ino = ino;
328 if (sizeof(d_ino) < sizeof(ino) && d_ino != ino)
329 return -EOVERFLOW;
330 dirent = buf->previous;
331 if (dirent)
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;
342 return 0;
345 asmlinkage long
346 sys32_getdents (unsigned int fd, void __user * dirent, unsigned int count)
348 struct file * file;
349 struct linux32_dirent __user * lastdirent;
350 struct getdents32_callback buf;
351 int error;
353 error = -EBADF;
354 file = fget(fd);
355 if (!file)
356 goto out;
358 buf.current_dir = (struct linux32_dirent __user *) dirent;
359 buf.previous = NULL;
360 buf.count = count;
361 buf.error = 0;
363 error = vfs_readdir(file, filldir32, &buf);
364 if (error < 0)
365 goto out_putf;
366 error = buf.error;
367 lastdirent = buf.previous;
368 if (lastdirent) {
369 put_user(file->f_pos, &lastdirent->d_off);
370 error = count - buf.count;
373 out_putf:
374 fput(file);
375 out:
376 return error;
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;
384 u32 d_ino;
386 if (buf->count)
387 return -EINVAL;
388 d_ino = ino;
389 if (sizeof(d_ino) < sizeof(ino) && d_ino != ino)
390 return -EOVERFLOW;
391 buf->count++;
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);
398 return 0;
401 asmlinkage long
402 sys32_readdir (unsigned int fd, void __user * dirent, unsigned int count)
404 int error;
405 struct file * file;
406 struct readdir32_callback buf;
408 error = -EBADF;
409 file = fget(fd);
410 if (!file)
411 goto out;
413 buf.count = 0;
414 buf.dirent = dirent;
416 error = vfs_readdir(file, fillonedir32, &buf);
417 if (error >= 0)
418 error = buf.count;
419 fput(file);
420 out:
421 return error;
424 /*** copied from mips64 ***/
426 * Ooo, nasty. We need here to frob 32-bit unsigned longs to
427 * 64-bit unsigned longs.
430 static inline int
431 get_fd_set32(unsigned long n, u32 *ufdset, unsigned long *fdset)
433 n = (n + 8*sizeof(u32) - 1) / (8*sizeof(u32));
434 if (ufdset) {
435 unsigned long odd;
437 if (!access_ok(VERIFY_WRITE, ufdset, n*sizeof(u32)))
438 return -EFAULT;
440 odd = n & 1UL;
441 n &= ~1UL;
442 while (n) {
443 unsigned long h, l;
444 __get_user(l, ufdset);
445 __get_user(h, ufdset+1);
446 ufdset += 2;
447 *fdset++ = h << 32 | l;
448 n -= 2;
450 if (odd)
451 __get_user(*fdset, ufdset);
452 } else {
453 /* Tricky, must clear full unsigned long in the
454 * kernel fdset at the end, this makes sure that
455 * actually happens.
457 memset(fdset, 0, ((n + 1) & ~1)*sizeof(u32));
459 return 0;
462 static inline void
463 set_fd_set32(unsigned long n, u32 *ufdset, unsigned long *fdset)
465 unsigned long odd;
466 n = (n + 8*sizeof(u32) - 1) / (8*sizeof(u32));
468 if (!ufdset)
469 return;
471 odd = n & 1UL;
472 n &= ~1UL;
473 while (n) {
474 unsigned long h, l;
475 l = *fdset++;
476 h = l >> 32;
477 __put_user(l, ufdset);
478 __put_user(h, ufdset+1);
479 ufdset += 2;
480 n -= 2;
482 if (odd)
483 __put_user(*fdset, ufdset);
486 struct msgbuf32 {
487 int mtype;
488 char mtext[1];
491 asmlinkage long sys32_msgsnd(int msqid,
492 struct msgbuf32 __user *umsgp32,
493 size_t msgsz, int msgflg)
495 struct msgbuf *mb;
496 struct msgbuf32 mb32;
497 int err;
499 if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL)
500 return -ENOMEM;
502 err = get_user(mb32.mtype, &umsgp32->mtype);
503 mb->mtype = mb32.mtype;
504 err |= copy_from_user(mb->mtext, &umsgp32->mtext, msgsz);
506 if (err)
507 err = -EFAULT;
508 else
509 KERNEL_SYSCALL(err, sys_msgsnd, msqid, (struct msgbuf __user *)mb, msgsz, msgflg);
511 kfree(mb);
512 return err;
515 asmlinkage long sys32_msgrcv(int msqid,
516 struct msgbuf32 __user *umsgp32,
517 size_t msgsz, long msgtyp, int msgflg)
519 struct msgbuf *mb;
520 struct msgbuf32 mb32;
521 int err, len;
523 if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL)
524 return -ENOMEM;
526 KERNEL_SYSCALL(err, sys_msgrcv, msqid, (struct msgbuf __user *)mb, msgsz, msgtyp, msgflg);
528 if (err >= 0) {
529 len = err;
530 mb32.mtype = mb->mtype;
531 err = put_user(mb32.mtype, &umsgp32->mtype);
532 err |= copy_to_user(&umsgp32->mtext, mb->mtext, len);
533 if (err)
534 err = -EFAULT;
535 else
536 err = len;
539 kfree(mb);
540 return err;
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();
546 int ret;
547 off_t of;
549 if (offset && get_user(of, offset))
550 return -EFAULT;
552 set_fs(KERNEL_DS);
553 ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL, count);
554 set_fs(old_fs);
556 if (offset && put_user(of, offset))
557 return -EFAULT;
559 return ret;
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();
565 int ret;
566 loff_t lof;
568 if (offset && get_user(lof, offset))
569 return -EFAULT;
571 set_fs(KERNEL_DS);
572 ret = sys_sendfile64(out_fd, in_fd, offset ? (loff_t __user *)&lof : NULL, count);
573 set_fs(old_fs);
575 if (offset && put_user(lof, offset))
576 return -EFAULT;
578 return ret;
582 struct sysinfo32 {
583 s32 uptime;
584 u32 loads[3];
585 u32 totalram;
586 u32 freeram;
587 u32 sharedram;
588 u32 bufferram;
589 u32 totalswap;
590 u32 freeswap;
591 unsigned short procs;
592 u32 totalhigh;
593 u32 freehigh;
594 u32 mem_unit;
595 char _f[12];
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)
605 struct sysinfo val;
606 int err;
607 unsigned long seq;
609 /* We don't need a memset here because we copy the
610 * struct to userspace once element at a time.
613 do {
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));
625 si_meminfo(&val);
626 si_swapinfo(&val);
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)
657 union semun u;
659 if (cmd == SETVAL) {
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,
671 size_t len)
673 return sys_lookup_dcookie((u64)cookie_high << 32 | cookie_low,
674 buf, len);