1 /* 2 * sys_parisc32.c: Conversion between 32bit and 64bit native syscalls. 3 * 4 * Copyright (C) 2000-2001 Hewlett Packard Company 5 * Copyright (C) 2000 John Marvin 6 * Copyright (C) 2001 Matthew Wilcox 7 * 8 * These routines maintain argument size conversion between 32bit and 64bit 9 * environment. Based heavily on sys_ia32.c and sys_sparc32.c. 10 */ 11 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/time.h> 22 #include <linux/smp.h> 23 #include <linux/smp_lock.h> 24 #include <linux/sem.h> 25 #include <linux/msg.h> 26 #include <linux/shm.h> 27 #include <linux/slab.h> 28 #include <linux/uio.h> 29 #include <linux/nfs_fs.h> 30 #include <linux/ncp_fs.h> 31 #include <linux/sunrpc/svc.h> 32 #include <linux/nfsd/nfsd.h> 33 #include <linux/nfsd/cache.h> 34 #include <linux/nfsd/xdr.h> 35 #include <linux/nfsd/syscall.h> 36 #include <linux/poll.h> 37 #include <linux/personality.h> 38 #include <linux/stat.h> 39 #include <linux/highmem.h> 40 #include <linux/highuid.h> 41 #include <linux/mman.h> 42 #include <linux/binfmts.h> 43 #include <linux/namei.h> 44 #include <linux/vfs.h> 45 #include <linux/ptrace.h> 46 #include <linux/swap.h> 47 #include <linux/syscalls.h> 48 49 #include <asm/types.h> 50 #include <asm/uaccess.h> 51 #include <asm/mmu_context.h> 52 53 #include "sys32.h" 54 55 #undef DEBUG 56 57 #ifdef DEBUG 58 #define DBG(x) printk x 59 #else 60 #define DBG(x) 61 #endif 62 63 /* 64 * sys32_execve() executes a new program. 65 */ 66 67 asmlinkage int sys32_execve(struct pt_regs *regs) 68 { 69 int error; 70 char *filename; 71 72 DBG(("sys32_execve(%p) r26 = 0x%lx\n", regs, regs->gr[26])); 73 filename = getname((const char __user *) regs->gr[26]); 74 error = PTR_ERR(filename); 75 if (IS_ERR(filename)) 76 goto out; 77 error = compat_do_execve(filename, compat_ptr(regs->gr[25]), 78 compat_ptr(regs->gr[24]), regs); 79 putname(filename); 80 out: 81 82 return error; 83 } 84 85 asmlinkage long sys32_unimplemented(int r26, int r25, int r24, int r23, 86 int r22, int r21, int r20) 87 { 88 printk(KERN_ERR "%s(%d): Unimplemented 32 on 64 syscall #%d!\n", 89 current->comm, current->pid, r20); 90 return -ENOSYS; 91 } 92 93 #ifdef CONFIG_SYSCTL 94 95 struct __sysctl_args32 { 96 u32 name; 97 int nlen; 98 u32 oldval; 99 u32 oldlenp; 100 u32 newval; 101 u32 newlen; 102 u32 __unused[4]; 103 }; 104 105 asmlinkage long sys32_sysctl(struct __sysctl_args32 __user *args) 106 { 107 #ifndef CONFIG_SYSCTL_SYSCALL 108 return -ENOSYS; 109 #else 110 struct __sysctl_args32 tmp; 111 int error; 112 unsigned int oldlen32; 113 size_t oldlen, __user *oldlenp = NULL; 114 unsigned long addr = (((long __force)&args->__unused[0]) + 7) & ~7; 115 116 DBG(("sysctl32(%p)\n", args)); 117 118 if (copy_from_user(&tmp, args, sizeof(tmp))) 119 return -EFAULT; 120 121 if (tmp.oldval && tmp.oldlenp) { 122 /* Duh, this is ugly and might not work if sysctl_args 123 is in read-only memory, but do_sysctl does indirectly 124 a lot of uaccess in both directions and we'd have to 125 basically copy the whole sysctl.c here, and 126 glibc's __sysctl uses rw memory for the structure 127 anyway. */ 128 /* a possibly better hack than this, which will avoid the 129 * problem if the struct is read only, is to push the 130 * 'oldlen' value out to the user's stack instead. -PB 131 */ 132 if (get_user(oldlen32, (u32 *)(u64)tmp.oldlenp)) 133 return -EFAULT; 134 oldlen = oldlen32; 135 if (put_user(oldlen, (size_t *)addr)) 136 return -EFAULT; 137 oldlenp = (size_t *)addr; 138 } 139 140 lock_kernel(); 141 error = do_sysctl((int __user *)(u64)tmp.name, tmp.nlen, 142 (void __user *)(u64)tmp.oldval, oldlenp, 143 (void __user *)(u64)tmp.newval, tmp.newlen); 144 unlock_kernel(); 145 if (oldlenp) { 146 if (!error) { 147 if (get_user(oldlen, (size_t *)addr)) { 148 error = -EFAULT; 149 } else { 150 oldlen32 = oldlen; 151 if (put_user(oldlen32, (u32 *)(u64)tmp.oldlenp)) 152 error = -EFAULT; 153 } 154 } 155 if (copy_to_user(args->__unused, tmp.__unused, sizeof(tmp.__unused))) 156 error = -EFAULT; 157 } 158 return error; 159 #endif 160 } 161 162 #endif /* CONFIG_SYSCTL */ 163 164 asmlinkage long sys32_sched_rr_get_interval(pid_t pid, 165 struct compat_timespec __user *interval) 166 { 167 struct timespec t; 168 int ret; 169 170 KERNEL_SYSCALL(ret, sys_sched_rr_get_interval, pid, (struct timespec __user *)&t); 171 if (put_compat_timespec(&t, interval)) 172 return -EFAULT; 173 return ret; 174 } 175 176 struct msgbuf32 { 177 int mtype; 178 char mtext[1]; 179 }; 180 181 asmlinkage long sys32_msgsnd(int msqid, 182 struct msgbuf32 __user *umsgp32, 183 size_t msgsz, int msgflg) 184 { 185 struct msgbuf *mb; 186 struct msgbuf32 mb32; 187 int err; 188 189 if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL) 190 return -ENOMEM; 191 192 err = get_user(mb32.mtype, &umsgp32->mtype); 193 mb->mtype = mb32.mtype; 194 err |= copy_from_user(mb->mtext, &umsgp32->mtext, msgsz); 195 196 if (err) 197 err = -EFAULT; 198 else 199 KERNEL_SYSCALL(err, sys_msgsnd, msqid, (struct msgbuf __user *)mb, msgsz, msgflg); 200 201 kfree(mb); 202 return err; 203 } 204 205 asmlinkage long sys32_msgrcv(int msqid, 206 struct msgbuf32 __user *umsgp32, 207 size_t msgsz, long msgtyp, int msgflg) 208 { 209 struct msgbuf *mb; 210 struct msgbuf32 mb32; 211 int err, len; 212 213 if ((mb = kmalloc(msgsz + sizeof *mb + 4, GFP_KERNEL)) == NULL) 214 return -ENOMEM; 215 216 KERNEL_SYSCALL(err, sys_msgrcv, msqid, (struct msgbuf __user *)mb, msgsz, msgtyp, msgflg); 217 218 if (err >= 0) { 219 len = err; 220 mb32.mtype = mb->mtype; 221 err = put_user(mb32.mtype, &umsgp32->mtype); 222 err |= copy_to_user(&umsgp32->mtext, mb->mtext, len); 223 if (err) 224 err = -EFAULT; 225 else 226 err = len; 227 } 228 229 kfree(mb); 230 return err; 231 } 232 233 asmlinkage int sys32_sendfile(int out_fd, int in_fd, compat_off_t __user *offset, s32 count) 234 { 235 mm_segment_t old_fs = get_fs(); 236 int ret; 237 off_t of; 238 239 if (offset && get_user(of, offset)) 240 return -EFAULT; 241 242 set_fs(KERNEL_DS); 243 ret = sys_sendfile(out_fd, in_fd, offset ? (off_t __user *)&of : NULL, count); 244 set_fs(old_fs); 245 246 if (offset && put_user(of, offset)) 247 return -EFAULT; 248 249 return ret; 250 } 251 252 asmlinkage int sys32_sendfile64(int out_fd, int in_fd, compat_loff_t __user *offset, s32 count) 253 { 254 mm_segment_t old_fs = get_fs(); 255 int ret; 256 loff_t lof; 257 258 if (offset && get_user(lof, offset)) 259 return -EFAULT; 260 261 set_fs(KERNEL_DS); 262 ret = sys_sendfile64(out_fd, in_fd, offset ? (loff_t __user *)&lof : NULL, count); 263 set_fs(old_fs); 264 265 if (offset && put_user(lof, offset)) 266 return -EFAULT; 267 268 return ret; 269 } 270 271 272 /* lseek() needs a wrapper because 'offset' can be negative, but the top 273 * half of the argument has been zeroed by syscall.S. 274 */ 275 276 asmlinkage int sys32_lseek(unsigned int fd, int offset, unsigned int origin) 277 { 278 return sys_lseek(fd, offset, origin); 279 } 280 281 asmlinkage long sys32_semctl(int semid, int semnum, int cmd, union semun arg) 282 { 283 union semun u; 284 285 if (cmd == SETVAL) { 286 /* Ugh. arg is a union of int,ptr,ptr,ptr, so is 8 bytes. 287 * The int should be in the first 4, but our argument 288 * frobbing has left it in the last 4. 289 */ 290 u.val = *((int *)&arg + 1); 291 return sys_semctl (semid, semnum, cmd, u); 292 } 293 return sys_semctl (semid, semnum, cmd, arg); 294 } 295 296 long sys32_lookup_dcookie(u32 cookie_high, u32 cookie_low, char __user *buf, 297 size_t len) 298 { 299 return sys_lookup_dcookie((u64)cookie_high << 32 | cookie_low, 300 buf, len); 301 } 302 303 asmlinkage long compat_sys_fallocate(int fd, int mode, u32 offhi, u32 offlo, 304 u32 lenhi, u32 lenlo) 305 { 306 return sys_fallocate(fd, mode, ((loff_t)offhi << 32) | offlo, 307 ((loff_t)lenhi << 32) | lenlo); 308 } 309