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