xref: /netbsd-src/sys/compat/linux/common/linux_file64.c (revision c3de1627bea3f8145539ecad5cb08e7d93cd83ac)
1 /*	$NetBSD: linux_file64.c,v 1.10 2002/03/22 17:14:18 christos Exp $	*/
2 
3 /*-
4  * Copyright (c) 1995, 1998, 2000 The NetBSD Foundation, Inc.
5  * All rights reserved.
6  *
7  * This code is derived from software contributed to The NetBSD Foundation
8  * by Frank van der Linden and Eric Haszlakiewicz.
9  *
10  * Redistribution and use in source and binary forms, with or without
11  * modification, are permitted provided that the following conditions
12  * are met:
13  * 1. Redistributions of source code must retain the above copyright
14  *    notice, this list of conditions and the following disclaimer.
15  * 2. Redistributions in binary form must reproduce the above copyright
16  *    notice, this list of conditions and the following disclaimer in the
17  *    documentation and/or other materials provided with the distribution.
18  * 3. All advertising materials mentioning features or use of this software
19  *    must display the following acknowledgement:
20  *	This product includes software developed by the NetBSD
21  *	Foundation, Inc. and its contributors.
22  * 4. Neither the name of The NetBSD Foundation nor the names of its
23  *    contributors may be used to endorse or promote products derived
24  *    from this software without specific prior written permission.
25  *
26  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36  * POSSIBILITY OF SUCH DAMAGE.
37  */
38 
39 /*
40  * Linux 64bit filesystem calls. Used on 32bit archs, not used on 64bit ones.
41  */
42 
43 #include <sys/cdefs.h>
44 __KERNEL_RCSID(0, "$NetBSD: linux_file64.c,v 1.10 2002/03/22 17:14:18 christos Exp $");
45 
46 #include <sys/param.h>
47 #include <sys/systm.h>
48 #include <sys/namei.h>
49 #include <sys/proc.h>
50 #include <sys/file.h>
51 #include <sys/stat.h>
52 #include <sys/filedesc.h>
53 #include <sys/ioctl.h>
54 #include <sys/kernel.h>
55 #include <sys/mount.h>
56 #include <sys/malloc.h>
57 #include <sys/vnode.h>
58 #include <sys/tty.h>
59 #include <sys/conf.h>
60 
61 #include <sys/syscallargs.h>
62 
63 #include <compat/linux/common/linux_types.h>
64 #include <compat/linux/common/linux_signal.h>
65 #include <compat/linux/common/linux_fcntl.h>
66 #include <compat/linux/common/linux_util.h>
67 #include <compat/linux/common/linux_machdep.h>
68 
69 #include <compat/linux/linux_syscallargs.h>
70 
71 static void bsd_to_linux_stat __P((struct stat *, struct linux_stat64 *));
72 static int linux_do_stat64 __P((struct proc *, void *, register_t *, int));
73 
74 /*
75  * Convert a NetBSD stat structure to a Linux stat structure.
76  * Only the order of the fields and the padding in the structure
77  * is different. linux_fakedev is a machine-dependent function
78  * which optionally converts device driver major/minor numbers
79  * (XXX horrible, but what can you do against code that compares
80  * things against constant major device numbers? sigh)
81  */
82 static void
83 bsd_to_linux_stat(bsp, lsp)
84 	struct stat *bsp;
85 	struct linux_stat64 *lsp;
86 {
87 	lsp->lst_dev     = linux_fakedev(bsp->st_dev, 0);
88 	lsp->lst_ino     = bsp->st_ino;
89 	lsp->lst_mode    = (linux_mode_t)bsp->st_mode;
90 	if (bsp->st_nlink >= (1 << 15))
91 		lsp->lst_nlink = (1 << 15) - 1;
92 	else
93 		lsp->lst_nlink = (linux_nlink_t)bsp->st_nlink;
94 	lsp->lst_uid     = bsp->st_uid;
95 	lsp->lst_gid     = bsp->st_gid;
96 	lsp->lst_rdev    = linux_fakedev(bsp->st_rdev, 1);
97 	lsp->lst_size    = bsp->st_size;
98 	lsp->lst_blksize = bsp->st_blksize;
99 	lsp->lst_blocks  = bsp->st_blocks;
100 	lsp->lst_atime   = bsp->st_atime;
101 	lsp->lst_mtime   = bsp->st_mtime;
102 	lsp->lst_ctime   = bsp->st_ctime;
103 	lsp->lst_ino64   = bsp->st_ino;
104 }
105 
106 /*
107  * The stat functions below are plain sailing. stat and lstat are handled
108  * by one function to avoid code duplication.
109  */
110 int
111 linux_sys_fstat64(p, v, retval)
112 	struct proc *p;
113 	void *v;
114 	register_t *retval;
115 {
116 	struct linux_sys_fstat64_args /* {
117 		syscallarg(int) fd;
118 		syscallarg(struct linux_stat64 *) sp;
119 	} */ *uap = v;
120 	struct sys___fstat13_args fsa;
121 	struct linux_stat64 tmplst;
122 	struct stat *st,tmpst;
123 	caddr_t sg;
124 	int error;
125 
126 	sg = stackgap_init(p, 0);
127 
128 	st = stackgap_alloc(p, &sg, sizeof (struct stat));
129 
130 	SCARG(&fsa, fd) = SCARG(uap, fd);
131 	SCARG(&fsa, sb) = st;
132 
133 	if ((error = sys___fstat13(p, &fsa, retval)))
134 		return error;
135 
136 	if ((error = copyin(st, &tmpst, sizeof tmpst)))
137 		return error;
138 
139 	bsd_to_linux_stat(&tmpst, &tmplst);
140 
141 	if ((error = copyout(&tmplst, SCARG(uap, sp), sizeof tmplst)))
142 		return error;
143 
144 	return 0;
145 }
146 
147 static int
148 linux_do_stat64(p, v, retval, dolstat)
149 	struct proc *p;
150 	void *v;
151 	register_t *retval;
152 	int dolstat;
153 {
154 	struct sys___stat13_args sa;
155 	struct linux_stat64 tmplst;
156 	struct stat *st, tmpst;
157 	caddr_t sg;
158 	int error;
159 	struct linux_sys_stat64_args *uap = v;
160 
161 	sg = stackgap_init(p, 0);
162 	st = stackgap_alloc(p, &sg, sizeof (struct stat));
163 	CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
164 
165 	SCARG(&sa, ub) = st;
166 	SCARG(&sa, path) = SCARG(uap, path);
167 
168 	if ((error = (dolstat ? sys___lstat13(p, &sa, retval) :
169 				sys___stat13(p, &sa, retval))))
170 		return error;
171 
172 	if ((error = copyin(st, &tmpst, sizeof tmpst)))
173 		return error;
174 
175 	bsd_to_linux_stat(&tmpst, &tmplst);
176 
177 	if ((error = copyout(&tmplst, SCARG(uap, sp), sizeof tmplst)))
178 		return error;
179 
180 	return 0;
181 }
182 
183 int
184 linux_sys_stat64(p, v, retval)
185 	struct proc *p;
186 	void *v;
187 	register_t *retval;
188 {
189 	struct linux_sys_stat64_args /* {
190 		syscallarg(const char *) path;
191 		syscallarg(struct linux_stat64 *) sp;
192 	} */ *uap = v;
193 
194 	return linux_do_stat64(p, uap, retval, 0);
195 }
196 
197 int
198 linux_sys_lstat64(p, v, retval)
199 	struct proc *p;
200 	void *v;
201 	register_t *retval;
202 {
203 	struct linux_sys_lstat64_args /* {
204 		syscallarg(const char *) path;
205 		syscallarg(struct linux_stat64 *) sp;
206 	} */ *uap = v;
207 
208 	return linux_do_stat64(p, uap, retval, 1);
209 }
210 
211 int
212 linux_sys_truncate64(p, v, retval)
213 	struct proc *p;
214 	void *v;
215 	register_t *retval;
216 {
217 	struct linux_sys_truncate64_args /* {
218 		syscallarg(const char *) path;
219 		syscallarg(off_t) length;
220 	} */ *uap = v;
221 	caddr_t sg = stackgap_init(p, 0);
222 
223 	CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
224 
225 	return sys_truncate(p, uap, retval);
226 }
227 
228 #if defined(__mips__) || defined(__i386__) /* powerpc could use it too */
229 static void bsd_to_linux_flock64 __P((struct linux_flock64 *,
230     const struct flock *));
231 static void linux_to_bsd_flock64 __P((struct flock *,
232     const struct linux_flock64 *));
233 
234 static void
235 bsd_to_linux_flock64(lfp, bfp)
236 	struct linux_flock64 *lfp;
237 	const struct flock *bfp;
238 {
239 
240 	lfp->l_start = bfp->l_start;
241 	lfp->l_len = bfp->l_len;
242 	lfp->l_pid = bfp->l_pid;
243 	lfp->l_whence = bfp->l_whence;
244 	switch (bfp->l_type) {
245 	case F_RDLCK:
246 		lfp->l_type = LINUX_F_RDLCK;
247 		break;
248 	case F_UNLCK:
249 		lfp->l_type = LINUX_F_UNLCK;
250 		break;
251 	case F_WRLCK:
252 		lfp->l_type = LINUX_F_WRLCK;
253 		break;
254 	}
255 }
256 
257 static void
258 linux_to_bsd_flock64(bfp, lfp)
259 	struct flock *bfp;
260 	const struct linux_flock64 *lfp;
261 {
262 
263 	bfp->l_start = lfp->l_start;
264 	bfp->l_len = lfp->l_len;
265 	bfp->l_pid = lfp->l_pid;
266 	bfp->l_whence = lfp->l_whence;
267 	switch (lfp->l_type) {
268 	case LINUX_F_RDLCK:
269 		bfp->l_type = F_RDLCK;
270 		break;
271 	case LINUX_F_UNLCK:
272 		bfp->l_type = F_UNLCK;
273 		break;
274 	case LINUX_F_WRLCK:
275 		bfp->l_type = F_WRLCK;
276 		break;
277 	}
278 }
279 int
280 linux_sys_fcntl64(p, v, retval)
281 	struct proc *p;
282 	void *v;
283 	register_t *retval;
284 {
285 	struct linux_sys_fcntl64_args /* {
286 		syscallarg(int) fd;
287 		syscallarg(int) cmd;
288 		syscallarg(void *) arg;
289 	} */ *uap = v;
290 	struct sys_fcntl_args fca;
291 	struct linux_flock64 lfl;
292 	struct flock bfl, *bfp;
293 	int error;
294 	caddr_t sg;
295 	void *arg = SCARG(uap, arg);
296 	int cmd = SCARG(uap, cmd);
297 	int fd = SCARG(uap, fd);
298 
299 	switch (cmd) {
300 	case LINUX_F_GETLK64:
301 		sg = stackgap_init(p, 0);
302 		bfp = (struct flock *) stackgap_alloc(p, &sg, sizeof *bfp);
303 		if ((error = copyin(arg, &lfl, sizeof lfl)) != 0)
304 			return error;
305 		linux_to_bsd_flock64(&bfl, &lfl);
306 		if ((error = copyout(&bfl, bfp, sizeof bfl)) != 0)
307 			return error;
308 		SCARG(&fca, fd) = fd;
309 		SCARG(&fca, cmd) = F_GETLK;
310 		SCARG(&fca, arg) = bfp;
311 		if ((error = sys_fcntl(p, &fca, retval)) != 0)
312 			return error;
313 		if ((error = copyin(bfp, &bfl, sizeof bfl)) != 0)
314 			return error;
315 		bsd_to_linux_flock64(&lfl, &bfl);
316 		return copyout(&lfl, arg, sizeof lfl);
317 	case LINUX_F_SETLK64:
318 	case LINUX_F_SETLKW64:
319 		cmd = (cmd == LINUX_F_SETLK64 ? F_SETLK : F_SETLKW);
320 		if ((error = copyin(arg, &lfl, sizeof lfl)) != 0)
321 			return error;
322 		linux_to_bsd_flock64(&bfl, &lfl);
323 		sg = stackgap_init(p, 0);
324 		bfp = (struct flock *) stackgap_alloc(p, &sg, sizeof *bfp);
325 		if ((error = copyout(&bfl, bfp, sizeof bfl)) != 0)
326 			return error;
327 		SCARG(&fca, fd) = fd;
328 		SCARG(&fca, cmd) = cmd;
329 		SCARG(&fca, arg) = bfp;
330 		return sys_fcntl(p, &fca, retval);
331 	default:
332 		return linux_sys_fcntl(p, v, retval);
333 	}
334 
335 	return error;
336 }
337 #endif /* __mips__ || __i386__ */
338