xref: /openbmc/linux/arch/arm/kernel/sys_oabi-compat.c (revision 96de0e252cedffad61b3cb5e05662c591898e69a)
1 /*
2  *  arch/arm/kernel/sys_oabi-compat.c
3  *
4  *  Compatibility wrappers for syscalls that are used from
5  *  old ABI user space binaries with an EABI kernel.
6  *
7  *  Author:	Nicolas Pitre
8  *  Created:	Oct 7, 2005
9  *  Copyright:	MontaVista Software, Inc.
10  *
11  *  This program is free software; you can redistribute it and/or modify
12  *  it under the terms of the GNU General Public License version 2 as
13  *  published by the Free Software Foundation.
14  */
15 
16 /*
17  * The legacy ABI and the new ARM EABI have different rules making some
18  * syscalls incompatible especially with structure arguments.
19  * Most notably, Eabi says 64-bit members should be 64-bit aligned instead of
20  * simply word aligned.  EABI also pads structures to the size of the largest
21  * member it contains instead of the invariant 32-bit.
22  *
23  * The following syscalls are affected:
24  *
25  * sys_stat64:
26  * sys_lstat64:
27  * sys_fstat64:
28  *
29  *   struct stat64 has different sizes and some members are shifted
30  *   Compatibility wrappers are needed for them and provided below.
31  *
32  * sys_fcntl64:
33  *
34  *   struct flock64 has different sizes and some members are shifted
35  *   A compatibility wrapper is needed and provided below.
36  *
37  * sys_statfs64:
38  * sys_fstatfs64:
39  *
40  *   struct statfs64 has extra padding with EABI growing its size from
41  *   84 to 88.  This struct is now __attribute__((packed,aligned(4)))
42  *   with a small assembly wrapper to force the sz argument to 84 if it is 88
43  *   to avoid copying the extra padding over user space unexpecting it.
44  *
45  * sys_newuname:
46  *
47  *   struct new_utsname has no padding with EABI.  No problem there.
48  *
49  * sys_epoll_ctl:
50  * sys_epoll_wait:
51  *
52  *   struct epoll_event has its second member shifted also affecting the
53  *   structure size. Compatibility wrappers are needed and provided below.
54  *
55  * sys_ipc:
56  * sys_semop:
57  * sys_semtimedop:
58  *
59  *   struct sembuf loses its padding with EABI.  Since arrays of them are
60  *   used they have to be copyed to remove the padding. Compatibility wrappers
61  *   provided below.
62  *
63  * sys_bind:
64  * sys_connect:
65  * sys_sendmsg:
66  * sys_sendto:
67  * sys_socketcall:
68  *
69  *   struct sockaddr_un loses its padding with EABI.  Since the size of the
70  *   structure is used as a validation test in unix_mkname(), we need to
71  *   change the length argument to 110 whenever it is 112.  Compatibility
72  *   wrappers provided below.
73  */
74 
75 #include <linux/syscalls.h>
76 #include <linux/errno.h>
77 #include <linux/fs.h>
78 #include <linux/fcntl.h>
79 #include <linux/eventpoll.h>
80 #include <linux/sem.h>
81 #include <linux/socket.h>
82 #include <linux/net.h>
83 #include <linux/ipc.h>
84 #include <asm/uaccess.h>
85 
86 struct oldabi_stat64 {
87 	unsigned long long st_dev;
88 	unsigned int	__pad1;
89 	unsigned long	__st_ino;
90 	unsigned int	st_mode;
91 	unsigned int	st_nlink;
92 
93 	unsigned long	st_uid;
94 	unsigned long	st_gid;
95 
96 	unsigned long long st_rdev;
97 	unsigned int	__pad2;
98 
99 	long long	st_size;
100 	unsigned long	st_blksize;
101 	unsigned long long st_blocks;
102 
103 	unsigned long	st_atime;
104 	unsigned long	st_atime_nsec;
105 
106 	unsigned long	st_mtime;
107 	unsigned long	st_mtime_nsec;
108 
109 	unsigned long	st_ctime;
110 	unsigned long	st_ctime_nsec;
111 
112 	unsigned long long st_ino;
113 } __attribute__ ((packed,aligned(4)));
114 
115 static long cp_oldabi_stat64(struct kstat *stat,
116 			     struct oldabi_stat64 __user *statbuf)
117 {
118 	struct oldabi_stat64 tmp;
119 
120 	tmp.st_dev = huge_encode_dev(stat->dev);
121 	tmp.__pad1 = 0;
122 	tmp.__st_ino = stat->ino;
123 	tmp.st_mode = stat->mode;
124 	tmp.st_nlink = stat->nlink;
125 	tmp.st_uid = stat->uid;
126 	tmp.st_gid = stat->gid;
127 	tmp.st_rdev = huge_encode_dev(stat->rdev);
128 	tmp.st_size = stat->size;
129 	tmp.st_blocks = stat->blocks;
130 	tmp.__pad2 = 0;
131 	tmp.st_blksize = stat->blksize;
132 	tmp.st_atime = stat->atime.tv_sec;
133 	tmp.st_atime_nsec = stat->atime.tv_nsec;
134 	tmp.st_mtime = stat->mtime.tv_sec;
135 	tmp.st_mtime_nsec = stat->mtime.tv_nsec;
136 	tmp.st_ctime = stat->ctime.tv_sec;
137 	tmp.st_ctime_nsec = stat->ctime.tv_nsec;
138 	tmp.st_ino = stat->ino;
139 	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
140 }
141 
142 asmlinkage long sys_oabi_stat64(char __user * filename,
143 				struct oldabi_stat64 __user * statbuf)
144 {
145 	struct kstat stat;
146 	int error = vfs_stat(filename, &stat);
147 	if (!error)
148 		error = cp_oldabi_stat64(&stat, statbuf);
149 	return error;
150 }
151 
152 asmlinkage long sys_oabi_lstat64(char __user * filename,
153 				 struct oldabi_stat64 __user * statbuf)
154 {
155 	struct kstat stat;
156 	int error = vfs_lstat(filename, &stat);
157 	if (!error)
158 		error = cp_oldabi_stat64(&stat, statbuf);
159 	return error;
160 }
161 
162 asmlinkage long sys_oabi_fstat64(unsigned long fd,
163 				 struct oldabi_stat64 __user * statbuf)
164 {
165 	struct kstat stat;
166 	int error = vfs_fstat(fd, &stat);
167 	if (!error)
168 		error = cp_oldabi_stat64(&stat, statbuf);
169 	return error;
170 }
171 
172 struct oabi_flock64 {
173 	short	l_type;
174 	short	l_whence;
175 	loff_t	l_start;
176 	loff_t	l_len;
177 	pid_t	l_pid;
178 } __attribute__ ((packed,aligned(4)));
179 
180 asmlinkage long sys_oabi_fcntl64(unsigned int fd, unsigned int cmd,
181 				 unsigned long arg)
182 {
183 	struct oabi_flock64 user;
184 	struct flock64 kernel;
185 	mm_segment_t fs = USER_DS; /* initialized to kill a warning */
186 	unsigned long local_arg = arg;
187 	int ret;
188 
189 	switch (cmd) {
190 	case F_GETLK64:
191 	case F_SETLK64:
192 	case F_SETLKW64:
193 		if (copy_from_user(&user, (struct oabi_flock64 __user *)arg,
194 				   sizeof(user)))
195 			return -EFAULT;
196 		kernel.l_type	= user.l_type;
197 		kernel.l_whence	= user.l_whence;
198 		kernel.l_start	= user.l_start;
199 		kernel.l_len	= user.l_len;
200 		kernel.l_pid	= user.l_pid;
201 		local_arg = (unsigned long)&kernel;
202 		fs = get_fs();
203 		set_fs(KERNEL_DS);
204 	}
205 
206 	ret = sys_fcntl64(fd, cmd, local_arg);
207 
208 	switch (cmd) {
209 	case F_GETLK64:
210 		if (!ret) {
211 			user.l_type	= kernel.l_type;
212 			user.l_whence	= kernel.l_whence;
213 			user.l_start	= kernel.l_start;
214 			user.l_len	= kernel.l_len;
215 			user.l_pid	= kernel.l_pid;
216 			if (copy_to_user((struct oabi_flock64 __user *)arg,
217 					 &user, sizeof(user)))
218 				ret = -EFAULT;
219 		}
220 	case F_SETLK64:
221 	case F_SETLKW64:
222 		set_fs(fs);
223 	}
224 
225 	return ret;
226 }
227 
228 struct oabi_epoll_event {
229 	__u32 events;
230 	__u64 data;
231 } __attribute__ ((packed,aligned(4)));
232 
233 asmlinkage long sys_oabi_epoll_ctl(int epfd, int op, int fd,
234 				   struct oabi_epoll_event __user *event)
235 {
236 	struct oabi_epoll_event user;
237 	struct epoll_event kernel;
238 	mm_segment_t fs;
239 	long ret;
240 
241 	if (op == EPOLL_CTL_DEL)
242 		return sys_epoll_ctl(epfd, op, fd, NULL);
243 	if (copy_from_user(&user, event, sizeof(user)))
244 		return -EFAULT;
245 	kernel.events = user.events;
246 	kernel.data   = user.data;
247 	fs = get_fs();
248 	set_fs(KERNEL_DS);
249 	ret = sys_epoll_ctl(epfd, op, fd, &kernel);
250 	set_fs(fs);
251 	return ret;
252 }
253 
254 asmlinkage long sys_oabi_epoll_wait(int epfd,
255 				    struct oabi_epoll_event __user *events,
256 				    int maxevents, int timeout)
257 {
258 	struct epoll_event *kbuf;
259 	mm_segment_t fs;
260 	long ret, err, i;
261 
262 	if (maxevents <= 0 || maxevents > (INT_MAX/sizeof(struct epoll_event)))
263 		return -EINVAL;
264 	kbuf = kmalloc(sizeof(*kbuf) * maxevents, GFP_KERNEL);
265 	if (!kbuf)
266 		return -ENOMEM;
267 	fs = get_fs();
268 	set_fs(KERNEL_DS);
269 	ret = sys_epoll_wait(epfd, kbuf, maxevents, timeout);
270 	set_fs(fs);
271 	err = 0;
272 	for (i = 0; i < ret; i++) {
273 		__put_user_error(kbuf[i].events, &events->events, err);
274 		__put_user_error(kbuf[i].data,   &events->data,   err);
275 		events++;
276 	}
277 	kfree(kbuf);
278 	return err ? -EFAULT : ret;
279 }
280 
281 struct oabi_sembuf {
282 	unsigned short	sem_num;
283 	short		sem_op;
284 	short		sem_flg;
285 	unsigned short	__pad;
286 };
287 
288 asmlinkage long sys_oabi_semtimedop(int semid,
289 				    struct oabi_sembuf __user *tsops,
290 				    unsigned nsops,
291 				    const struct timespec __user *timeout)
292 {
293 	struct sembuf *sops;
294 	struct timespec local_timeout;
295 	long err;
296 	int i;
297 
298 	if (nsops < 1)
299 		return -EINVAL;
300 	sops = kmalloc(sizeof(*sops) * nsops, GFP_KERNEL);
301 	if (!sops)
302 		return -ENOMEM;
303 	err = 0;
304 	for (i = 0; i < nsops; i++) {
305 		__get_user_error(sops[i].sem_num, &tsops->sem_num, err);
306 		__get_user_error(sops[i].sem_op,  &tsops->sem_op,  err);
307 		__get_user_error(sops[i].sem_flg, &tsops->sem_flg, err);
308 		tsops++;
309 	}
310 	if (timeout) {
311 		/* copy this as well before changing domain protection */
312 		err |= copy_from_user(&local_timeout, timeout, sizeof(*timeout));
313 		timeout = &local_timeout;
314 	}
315 	if (err) {
316 		err = -EFAULT;
317 	} else {
318 		mm_segment_t fs = get_fs();
319 		set_fs(KERNEL_DS);
320 		err = sys_semtimedop(semid, sops, nsops, timeout);
321 		set_fs(fs);
322 	}
323 	kfree(sops);
324 	return err;
325 }
326 
327 asmlinkage long sys_oabi_semop(int semid, struct oabi_sembuf __user *tsops,
328 			       unsigned nsops)
329 {
330 	return sys_oabi_semtimedop(semid, tsops, nsops, NULL);
331 }
332 
333 extern asmlinkage int sys_ipc(uint call, int first, int second, int third,
334 			      void __user *ptr, long fifth);
335 
336 asmlinkage int sys_oabi_ipc(uint call, int first, int second, int third,
337 			    void __user *ptr, long fifth)
338 {
339 	switch (call & 0xffff) {
340 	case SEMOP:
341 		return  sys_oabi_semtimedop(first,
342 					    (struct oabi_sembuf __user *)ptr,
343 					    second, NULL);
344 	case SEMTIMEDOP:
345 		return  sys_oabi_semtimedop(first,
346 					    (struct oabi_sembuf __user *)ptr,
347 					    second,
348 					    (const struct timespec __user *)fifth);
349 	default:
350 		return sys_ipc(call, first, second, third, ptr, fifth);
351 	}
352 }
353 
354 asmlinkage long sys_oabi_bind(int fd, struct sockaddr __user *addr, int addrlen)
355 {
356 	sa_family_t sa_family;
357 	if (addrlen == 112 &&
358 	    get_user(sa_family, &addr->sa_family) == 0 &&
359 	    sa_family == AF_UNIX)
360 			addrlen = 110;
361 	return sys_bind(fd, addr, addrlen);
362 }
363 
364 asmlinkage long sys_oabi_connect(int fd, struct sockaddr __user *addr, int addrlen)
365 {
366 	sa_family_t sa_family;
367 	if (addrlen == 112 &&
368 	    get_user(sa_family, &addr->sa_family) == 0 &&
369 	    sa_family == AF_UNIX)
370 			addrlen = 110;
371 	return sys_connect(fd, addr, addrlen);
372 }
373 
374 asmlinkage long sys_oabi_sendto(int fd, void __user *buff,
375 				size_t len, unsigned flags,
376 				struct sockaddr __user *addr,
377 				int addrlen)
378 {
379 	sa_family_t sa_family;
380 	if (addrlen == 112 &&
381 	    get_user(sa_family, &addr->sa_family) == 0 &&
382 	    sa_family == AF_UNIX)
383 			addrlen = 110;
384 	return sys_sendto(fd, buff, len, flags, addr, addrlen);
385 }
386 
387 asmlinkage long sys_oabi_sendmsg(int fd, struct msghdr __user *msg, unsigned flags)
388 {
389 	struct sockaddr __user *addr;
390 	int msg_namelen;
391 	sa_family_t sa_family;
392 	if (msg &&
393 	    get_user(msg_namelen, &msg->msg_namelen) == 0 &&
394 	    msg_namelen == 112 &&
395 	    get_user(addr, &msg->msg_name) == 0 &&
396 	    get_user(sa_family, &addr->sa_family) == 0 &&
397 	    sa_family == AF_UNIX)
398 	{
399 		/*
400 		 * HACK ALERT: there is a limit to how much backward bending
401 		 * we should do for what is actually a transitional
402 		 * compatibility layer.  This already has known flaws with
403 		 * a few ioctls that we don't intend to fix.  Therefore
404 		 * consider this blatent hack as another one... and take care
405 		 * to run for cover.  In most cases it will "just work fine".
406 		 * If it doesn't, well, tough.
407 		 */
408 		put_user(110, &msg->msg_namelen);
409 	}
410 	return sys_sendmsg(fd, msg, flags);
411 }
412 
413 asmlinkage long sys_oabi_socketcall(int call, unsigned long __user *args)
414 {
415 	unsigned long r = -EFAULT, a[6];
416 
417 	switch (call) {
418 	case SYS_BIND:
419 		if (copy_from_user(a, args, 3 * sizeof(long)) == 0)
420 			r = sys_oabi_bind(a[0], (struct sockaddr __user *)a[1], a[2]);
421 		break;
422 	case SYS_CONNECT:
423 		if (copy_from_user(a, args, 3 * sizeof(long)) == 0)
424 			r = sys_oabi_connect(a[0], (struct sockaddr __user *)a[1], a[2]);
425 		break;
426 	case SYS_SENDTO:
427 		if (copy_from_user(a, args, 6 * sizeof(long)) == 0)
428 			r = sys_oabi_sendto(a[0], (void __user *)a[1], a[2], a[3],
429 					    (struct sockaddr __user *)a[4], a[5]);
430 		break;
431 	case SYS_SENDMSG:
432 		if (copy_from_user(a, args, 3 * sizeof(long)) == 0)
433 			r = sys_oabi_sendmsg(a[0], (struct msghdr __user *)a[1], a[2]);
434 		break;
435 	default:
436 		r = sys_socketcall(call, args);
437 	}
438 
439 	return r;
440 }
441