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