linux_file.c revision 1.25 1 1.25 fvdl /* $NetBSD: linux_file.c,v 1.25 1998/10/04 00:02:33 fvdl Exp $ */
2 1.23 erh
3 1.23 erh /*-
4 1.25 fvdl * Copyright (c) 1995, 1998 The NetBSD Foundation, Inc.
5 1.23 erh * All rights reserved.
6 1.23 erh *
7 1.23 erh * This code is derived from software contributed to The NetBSD Foundation
8 1.25 fvdl * by Frank van der Linden and Eric Haszlakiewicz.
9 1.23 erh *
10 1.23 erh * Redistribution and use in source and binary forms, with or without
11 1.23 erh * modification, are permitted provided that the following conditions
12 1.23 erh * are met:
13 1.23 erh * 1. Redistributions of source code must retain the above copyright
14 1.23 erh * notice, this list of conditions and the following disclaimer.
15 1.23 erh * 2. Redistributions in binary form must reproduce the above copyright
16 1.23 erh * notice, this list of conditions and the following disclaimer in the
17 1.23 erh * documentation and/or other materials provided with the distribution.
18 1.23 erh * 3. All advertising materials mentioning features or use of this software
19 1.23 erh * must display the following acknowledgement:
20 1.23 erh * This product includes software developed by the NetBSD
21 1.23 erh * Foundation, Inc. and its contributors.
22 1.23 erh * 4. Neither the name of The NetBSD Foundation nor the names of its
23 1.23 erh * contributors may be used to endorse or promote products derived
24 1.23 erh * from this software without specific prior written permission.
25 1.23 erh *
26 1.23 erh * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
27 1.23 erh * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
28 1.23 erh * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
29 1.23 erh * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
30 1.23 erh * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
31 1.23 erh * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
32 1.23 erh * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
33 1.23 erh * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
34 1.23 erh * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
35 1.23 erh * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
36 1.23 erh * POSSIBILITY OF SUCH DAMAGE.
37 1.1 fvdl */
38 1.1 fvdl
39 1.23 erh /*
40 1.23 erh * Functions in multiarch:
41 1.23 erh * linux_sys_llseek : linux_llseek.c
42 1.23 erh */
43 1.23 erh
44 1.1 fvdl #include <sys/param.h>
45 1.1 fvdl #include <sys/systm.h>
46 1.1 fvdl #include <sys/namei.h>
47 1.1 fvdl #include <sys/proc.h>
48 1.1 fvdl #include <sys/file.h>
49 1.1 fvdl #include <sys/stat.h>
50 1.1 fvdl #include <sys/filedesc.h>
51 1.1 fvdl #include <sys/ioctl.h>
52 1.1 fvdl #include <sys/kernel.h>
53 1.1 fvdl #include <sys/mount.h>
54 1.1 fvdl #include <sys/malloc.h>
55 1.13 fvdl #include <sys/vnode.h>
56 1.13 fvdl #include <sys/tty.h>
57 1.13 fvdl #include <sys/conf.h>
58 1.1 fvdl
59 1.1 fvdl #include <sys/syscallargs.h>
60 1.1 fvdl
61 1.24 christos #include <compat/linux/common/linux_types.h>
62 1.24 christos #include <compat/linux/common/linux_signal.h>
63 1.24 christos #include <compat/linux/common/linux_siginfo.h>
64 1.24 christos #include <compat/linux/common/linux_fcntl.h>
65 1.24 christos #include <compat/linux/common/linux_util.h>
66 1.24 christos #include <compat/linux/common/linux_machdep.h>
67 1.24 christos
68 1.1 fvdl #include <compat/linux/linux_syscallargs.h>
69 1.14 christos
70 1.14 christos static int linux_to_bsd_ioflags __P((int));
71 1.14 christos static int bsd_to_linux_ioflags __P((int));
72 1.14 christos static void bsd_to_linux_flock __P((struct flock *, struct linux_flock *));
73 1.14 christos static void linux_to_bsd_flock __P((struct linux_flock *, struct flock *));
74 1.14 christos static void bsd_to_linux_stat __P((struct stat *, struct linux_stat *));
75 1.14 christos static int linux_stat1 __P((struct proc *, void *, register_t *, int));
76 1.14 christos
77 1.1 fvdl /*
78 1.1 fvdl * Some file-related calls are handled here. The usual flag conversion
79 1.1 fvdl * an structure conversion is done, and alternate emul path searching.
80 1.1 fvdl */
81 1.1 fvdl
82 1.1 fvdl /*
83 1.1 fvdl * The next two functions convert between the Linux and NetBSD values
84 1.1 fvdl * of the flags used in open(2) and fcntl(2).
85 1.1 fvdl */
86 1.1 fvdl static int
87 1.14 christos linux_to_bsd_ioflags(lflags)
88 1.14 christos int lflags;
89 1.1 fvdl {
90 1.1 fvdl int res = 0;
91 1.1 fvdl
92 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_WRONLY, O_WRONLY);
93 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_RDONLY, O_RDONLY);
94 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_RDWR, O_RDWR);
95 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_CREAT, O_CREAT);
96 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_EXCL, O_EXCL);
97 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_NOCTTY, O_NOCTTY);
98 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_TRUNC, O_TRUNC);
99 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_NDELAY, O_NDELAY);
100 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_SYNC, O_FSYNC);
101 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_FASYNC, O_ASYNC);
102 1.1 fvdl res |= cvtto_bsd_mask(lflags, LINUX_O_APPEND, O_APPEND);
103 1.1 fvdl
104 1.1 fvdl return res;
105 1.1 fvdl }
106 1.1 fvdl
107 1.1 fvdl static int
108 1.14 christos bsd_to_linux_ioflags(bflags)
109 1.14 christos int bflags;
110 1.1 fvdl {
111 1.1 fvdl int res = 0;
112 1.1 fvdl
113 1.1 fvdl res |= cvtto_linux_mask(bflags, O_WRONLY, LINUX_O_WRONLY);
114 1.1 fvdl res |= cvtto_linux_mask(bflags, O_RDONLY, LINUX_O_RDONLY);
115 1.1 fvdl res |= cvtto_linux_mask(bflags, O_RDWR, LINUX_O_RDWR);
116 1.1 fvdl res |= cvtto_linux_mask(bflags, O_CREAT, LINUX_O_CREAT);
117 1.1 fvdl res |= cvtto_linux_mask(bflags, O_EXCL, LINUX_O_EXCL);
118 1.1 fvdl res |= cvtto_linux_mask(bflags, O_NOCTTY, LINUX_O_NOCTTY);
119 1.1 fvdl res |= cvtto_linux_mask(bflags, O_TRUNC, LINUX_O_TRUNC);
120 1.1 fvdl res |= cvtto_linux_mask(bflags, O_NDELAY, LINUX_O_NDELAY);
121 1.1 fvdl res |= cvtto_linux_mask(bflags, O_FSYNC, LINUX_O_SYNC);
122 1.1 fvdl res |= cvtto_linux_mask(bflags, O_ASYNC, LINUX_FASYNC);
123 1.1 fvdl res |= cvtto_linux_mask(bflags, O_APPEND, LINUX_O_APPEND);
124 1.1 fvdl
125 1.1 fvdl return res;
126 1.1 fvdl }
127 1.1 fvdl
128 1.1 fvdl /*
129 1.1 fvdl * creat(2) is an obsolete function, but it's present as a Linux
130 1.1 fvdl * system call, so let's deal with it.
131 1.1 fvdl *
132 1.23 erh * Note: On the Alpha this doesn't really exist in Linux, but it's defined
133 1.23 erh * in syscalls.master anyway so this doesn't have to be special cased.
134 1.23 erh *
135 1.1 fvdl * Just call open(2) with the TRUNC, CREAT and WRONLY flags.
136 1.1 fvdl */
137 1.1 fvdl int
138 1.12 mycroft linux_sys_creat(p, v, retval)
139 1.1 fvdl struct proc *p;
140 1.11 thorpej void *v;
141 1.11 thorpej register_t *retval;
142 1.11 thorpej {
143 1.12 mycroft struct linux_sys_creat_args /* {
144 1.1 fvdl syscallarg(char *) path;
145 1.1 fvdl syscallarg(int) mode;
146 1.11 thorpej } */ *uap = v;
147 1.12 mycroft struct sys_open_args oa;
148 1.1 fvdl caddr_t sg;
149 1.1 fvdl
150 1.5 christos sg = stackgap_init(p->p_emul);
151 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, path));
152 1.1 fvdl
153 1.1 fvdl SCARG(&oa, path) = SCARG(uap, path);
154 1.1 fvdl SCARG(&oa, flags) = O_CREAT | O_TRUNC | O_WRONLY;
155 1.1 fvdl SCARG(&oa, mode) = SCARG(uap, mode);
156 1.12 mycroft
157 1.12 mycroft return sys_open(p, &oa, retval);
158 1.1 fvdl }
159 1.1 fvdl
160 1.1 fvdl /*
161 1.1 fvdl * open(2). Take care of the different flag values, and let the
162 1.1 fvdl * NetBSD syscall do the real work. See if this operation
163 1.1 fvdl * gives the current process a controlling terminal.
164 1.1 fvdl * (XXX is this necessary?)
165 1.1 fvdl */
166 1.1 fvdl int
167 1.12 mycroft linux_sys_open(p, v, retval)
168 1.1 fvdl struct proc *p;
169 1.11 thorpej void *v;
170 1.11 thorpej register_t *retval;
171 1.11 thorpej {
172 1.12 mycroft struct linux_sys_open_args /* {
173 1.1 fvdl syscallarg(char *) path;
174 1.1 fvdl syscallarg(int) flags;
175 1.1 fvdl syscallarg(int) mode;
176 1.11 thorpej } */ *uap = v;
177 1.1 fvdl int error, fl;
178 1.12 mycroft struct sys_open_args boa;
179 1.1 fvdl caddr_t sg;
180 1.1 fvdl
181 1.5 christos sg = stackgap_init(p->p_emul);
182 1.1 fvdl
183 1.2 fvdl fl = linux_to_bsd_ioflags(SCARG(uap, flags));
184 1.1 fvdl
185 1.2 fvdl if (fl & O_CREAT)
186 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, path));
187 1.2 fvdl else
188 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
189 1.1 fvdl
190 1.1 fvdl SCARG(&boa, path) = SCARG(uap, path);
191 1.1 fvdl SCARG(&boa, flags) = fl;
192 1.1 fvdl SCARG(&boa, mode) = SCARG(uap, mode);
193 1.2 fvdl
194 1.12 mycroft if ((error = sys_open(p, &boa, retval)))
195 1.1 fvdl return error;
196 1.1 fvdl
197 1.1 fvdl /*
198 1.1 fvdl * this bit from sunos_misc.c (and svr4_fcntl.c).
199 1.1 fvdl * If we are a session leader, and we don't have a controlling
200 1.1 fvdl * terminal yet, and the O_NOCTTY flag is not set, try to make
201 1.1 fvdl * this the controlling terminal.
202 1.1 fvdl */
203 1.1 fvdl if (!(fl & O_NOCTTY) && SESS_LEADER(p) && !(p->p_flag & P_CONTROLT)) {
204 1.1 fvdl struct filedesc *fdp = p->p_fd;
205 1.1 fvdl struct file *fp = fdp->fd_ofiles[*retval];
206 1.1 fvdl
207 1.1 fvdl /* ignore any error, just give it a try */
208 1.1 fvdl if (fp->f_type == DTYPE_VNODE)
209 1.1 fvdl (fp->f_ops->fo_ioctl) (fp, TIOCSCTTY, (caddr_t) 0, p);
210 1.1 fvdl }
211 1.1 fvdl return 0;
212 1.1 fvdl }
213 1.1 fvdl
214 1.1 fvdl /*
215 1.1 fvdl * The next two functions take care of converting the flock
216 1.1 fvdl * structure back and forth between Linux and NetBSD format.
217 1.1 fvdl * The only difference in the structures is the order of
218 1.1 fvdl * the fields, and the 'whence' value.
219 1.1 fvdl */
220 1.1 fvdl static void
221 1.1 fvdl bsd_to_linux_flock(bfp, lfp)
222 1.1 fvdl struct flock *bfp;
223 1.1 fvdl struct linux_flock *lfp;
224 1.1 fvdl {
225 1.12 mycroft
226 1.1 fvdl lfp->l_start = bfp->l_start;
227 1.1 fvdl lfp->l_len = bfp->l_len;
228 1.1 fvdl lfp->l_pid = bfp->l_pid;
229 1.3 mycroft lfp->l_whence = bfp->l_whence;
230 1.3 mycroft switch (bfp->l_type) {
231 1.1 fvdl case F_RDLCK:
232 1.3 mycroft lfp->l_type = LINUX_F_RDLCK;
233 1.1 fvdl break;
234 1.1 fvdl case F_UNLCK:
235 1.3 mycroft lfp->l_type = LINUX_F_UNLCK;
236 1.1 fvdl break;
237 1.1 fvdl case F_WRLCK:
238 1.3 mycroft lfp->l_type = LINUX_F_WRLCK;
239 1.1 fvdl break;
240 1.1 fvdl }
241 1.1 fvdl }
242 1.1 fvdl
243 1.1 fvdl static void
244 1.1 fvdl linux_to_bsd_flock(lfp, bfp)
245 1.1 fvdl struct linux_flock *lfp;
246 1.1 fvdl struct flock *bfp;
247 1.1 fvdl {
248 1.12 mycroft
249 1.1 fvdl bfp->l_start = lfp->l_start;
250 1.1 fvdl bfp->l_len = lfp->l_len;
251 1.1 fvdl bfp->l_pid = lfp->l_pid;
252 1.3 mycroft bfp->l_whence = lfp->l_whence;
253 1.3 mycroft switch (lfp->l_type) {
254 1.1 fvdl case LINUX_F_RDLCK:
255 1.3 mycroft bfp->l_type = F_RDLCK;
256 1.1 fvdl break;
257 1.1 fvdl case LINUX_F_UNLCK:
258 1.3 mycroft bfp->l_type = F_UNLCK;
259 1.1 fvdl break;
260 1.1 fvdl case LINUX_F_WRLCK:
261 1.3 mycroft bfp->l_type = F_WRLCK;
262 1.1 fvdl break;
263 1.1 fvdl }
264 1.1 fvdl }
265 1.1 fvdl
266 1.1 fvdl /*
267 1.1 fvdl * Most actions in the fcntl() call are straightforward; simply
268 1.1 fvdl * pass control to the NetBSD system call. A few commands need
269 1.1 fvdl * conversions after the actual system call has done its work,
270 1.1 fvdl * because the flag values and lock structure are different.
271 1.1 fvdl */
272 1.1 fvdl int
273 1.12 mycroft linux_sys_fcntl(p, v, retval)
274 1.1 fvdl struct proc *p;
275 1.11 thorpej void *v;
276 1.11 thorpej register_t *retval;
277 1.11 thorpej {
278 1.12 mycroft struct linux_sys_fcntl_args /* {
279 1.1 fvdl syscallarg(int) fd;
280 1.1 fvdl syscallarg(int) cmd;
281 1.1 fvdl syscallarg(void *) arg;
282 1.11 thorpej } */ *uap = v;
283 1.23 erh int fd, cmd, error;
284 1.23 erh u_long val;
285 1.1 fvdl caddr_t arg, sg;
286 1.1 fvdl struct linux_flock lfl;
287 1.1 fvdl struct flock *bfp, bfl;
288 1.12 mycroft struct sys_fcntl_args fca;
289 1.13 fvdl struct filedesc *fdp;
290 1.13 fvdl struct file *fp;
291 1.13 fvdl struct vnode *vp;
292 1.13 fvdl struct vattr va;
293 1.13 fvdl long pgid;
294 1.13 fvdl struct pgrp *pgrp;
295 1.13 fvdl struct tty *tp, *(*d_tty) __P((dev_t));
296 1.1 fvdl
297 1.1 fvdl fd = SCARG(uap, fd);
298 1.1 fvdl cmd = SCARG(uap, cmd);
299 1.1 fvdl arg = (caddr_t) SCARG(uap, arg);
300 1.1 fvdl
301 1.1 fvdl switch (cmd) {
302 1.1 fvdl case LINUX_F_DUPFD:
303 1.1 fvdl cmd = F_DUPFD;
304 1.1 fvdl break;
305 1.1 fvdl case LINUX_F_GETFD:
306 1.1 fvdl cmd = F_GETFD;
307 1.1 fvdl break;
308 1.1 fvdl case LINUX_F_SETFD:
309 1.1 fvdl cmd = F_SETFD;
310 1.1 fvdl break;
311 1.1 fvdl case LINUX_F_GETFL:
312 1.1 fvdl SCARG(&fca, fd) = fd;
313 1.1 fvdl SCARG(&fca, cmd) = F_GETFL;
314 1.1 fvdl SCARG(&fca, arg) = arg;
315 1.12 mycroft if ((error = sys_fcntl(p, &fca, retval)))
316 1.1 fvdl return error;
317 1.1 fvdl retval[0] = bsd_to_linux_ioflags(retval[0]);
318 1.1 fvdl return 0;
319 1.1 fvdl case LINUX_F_SETFL:
320 1.23 erh val = linux_to_bsd_ioflags((unsigned long)SCARG(uap, arg));
321 1.1 fvdl SCARG(&fca, fd) = fd;
322 1.1 fvdl SCARG(&fca, cmd) = F_SETFL;
323 1.6 fvdl SCARG(&fca, arg) = (caddr_t) val;
324 1.12 mycroft return sys_fcntl(p, &fca, retval);
325 1.1 fvdl case LINUX_F_GETLK:
326 1.5 christos sg = stackgap_init(p->p_emul);
327 1.1 fvdl bfp = (struct flock *) stackgap_alloc(&sg, sizeof *bfp);
328 1.18 kleink if ((error = copyin(arg, &lfl, sizeof lfl)))
329 1.18 kleink return error;
330 1.18 kleink linux_to_bsd_flock(&lfl, &bfl);
331 1.18 kleink if ((error = copyout(&bfl, bfp, sizeof bfl)))
332 1.18 kleink return error;
333 1.1 fvdl SCARG(&fca, fd) = fd;
334 1.1 fvdl SCARG(&fca, cmd) = F_GETLK;
335 1.1 fvdl SCARG(&fca, arg) = bfp;
336 1.12 mycroft if ((error = sys_fcntl(p, &fca, retval)))
337 1.1 fvdl return error;
338 1.1 fvdl if ((error = copyin(bfp, &bfl, sizeof bfl)))
339 1.1 fvdl return error;
340 1.1 fvdl bsd_to_linux_flock(&bfl, &lfl);
341 1.1 fvdl return copyout(&lfl, arg, sizeof lfl);
342 1.1 fvdl break;
343 1.1 fvdl case LINUX_F_SETLK:
344 1.1 fvdl case LINUX_F_SETLKW:
345 1.1 fvdl cmd = (cmd == LINUX_F_SETLK ? F_SETLK : F_SETLKW);
346 1.1 fvdl if ((error = copyin(arg, &lfl, sizeof lfl)))
347 1.1 fvdl return error;
348 1.1 fvdl linux_to_bsd_flock(&lfl, &bfl);
349 1.5 christos sg = stackgap_init(p->p_emul);
350 1.1 fvdl bfp = (struct flock *) stackgap_alloc(&sg, sizeof *bfp);
351 1.1 fvdl if ((error = copyout(&bfl, bfp, sizeof bfl)))
352 1.1 fvdl return error;
353 1.1 fvdl SCARG(&fca, fd) = fd;
354 1.1 fvdl SCARG(&fca, cmd) = cmd;
355 1.1 fvdl SCARG(&fca, arg) = bfp;
356 1.12 mycroft return sys_fcntl(p, &fca, retval);
357 1.1 fvdl break;
358 1.1 fvdl case LINUX_F_SETOWN:
359 1.13 fvdl case LINUX_F_GETOWN:
360 1.13 fvdl /*
361 1.13 fvdl * We need to route around the normal fcntl() for these calls,
362 1.13 fvdl * since it uses TIOC{G,S}PGRP, which is too restrictive for
363 1.13 fvdl * Linux F_{G,S}ETOWN semantics. For sockets, this problem
364 1.13 fvdl * does not exist.
365 1.13 fvdl */
366 1.13 fvdl fdp = p->p_fd;
367 1.13 fvdl if ((u_int)fd >= fdp->fd_nfiles ||
368 1.13 fvdl (fp = fdp->fd_ofiles[fd]) == NULL)
369 1.13 fvdl return EBADF;
370 1.13 fvdl if (fp->f_type == DTYPE_SOCKET) {
371 1.13 fvdl cmd = cmd == LINUX_F_SETOWN ? F_SETOWN : F_GETOWN;
372 1.13 fvdl break;
373 1.13 fvdl }
374 1.13 fvdl vp = (struct vnode *)fp->f_data;
375 1.13 fvdl if (vp->v_type != VCHR)
376 1.13 fvdl return EINVAL;
377 1.13 fvdl if ((error = VOP_GETATTR(vp, &va, p->p_ucred, p)))
378 1.13 fvdl return error;
379 1.13 fvdl d_tty = cdevsw[major(va.va_rdev)].d_tty;
380 1.13 fvdl if (!d_tty || (!(tp = (*d_tty)(va.va_rdev))))
381 1.13 fvdl return EINVAL;
382 1.13 fvdl if (cmd == LINUX_F_GETOWN) {
383 1.13 fvdl retval[0] = tp->t_pgrp ? tp->t_pgrp->pg_id : NO_PID;
384 1.13 fvdl return 0;
385 1.13 fvdl }
386 1.13 fvdl if ((long)arg <= 0) {
387 1.13 fvdl pgid = -(long)arg;
388 1.13 fvdl } else {
389 1.13 fvdl struct proc *p1 = pfind((long)arg);
390 1.13 fvdl if (p1 == 0)
391 1.13 fvdl return (ESRCH);
392 1.13 fvdl pgid = (long)p1->p_pgrp->pg_id;
393 1.13 fvdl }
394 1.13 fvdl pgrp = pgfind(pgid);
395 1.13 fvdl if (pgrp == NULL || pgrp->pg_session != p->p_session)
396 1.13 fvdl return EPERM;
397 1.13 fvdl tp->t_pgrp = pgrp;
398 1.13 fvdl return 0;
399 1.1 fvdl default:
400 1.1 fvdl return EOPNOTSUPP;
401 1.1 fvdl }
402 1.1 fvdl
403 1.1 fvdl SCARG(&fca, fd) = fd;
404 1.1 fvdl SCARG(&fca, cmd) = cmd;
405 1.1 fvdl SCARG(&fca, arg) = arg;
406 1.12 mycroft
407 1.12 mycroft return sys_fcntl(p, &fca, retval);
408 1.1 fvdl }
409 1.1 fvdl
410 1.1 fvdl /*
411 1.1 fvdl * Convert a NetBSD stat structure to a Linux stat structure.
412 1.1 fvdl * Only the order of the fields and the padding in the structure
413 1.9 fvdl * is different. linux_fakedev is a machine-dependent function
414 1.9 fvdl * which optionally converts device driver major/minor numbers
415 1.9 fvdl * (XXX horrible, but what can you do against code that compares
416 1.9 fvdl * things against constant major device numbers? sigh)
417 1.1 fvdl */
418 1.1 fvdl static void
419 1.1 fvdl bsd_to_linux_stat(bsp, lsp)
420 1.1 fvdl struct stat *bsp;
421 1.1 fvdl struct linux_stat *lsp;
422 1.1 fvdl {
423 1.12 mycroft
424 1.1 fvdl lsp->lst_dev = bsp->st_dev;
425 1.1 fvdl lsp->lst_ino = bsp->st_ino;
426 1.19 christos lsp->lst_mode = (linux_mode_t)bsp->st_mode;
427 1.19 christos if (bsp->st_nlink >= (1 << 15))
428 1.19 christos lsp->lst_nlink = (1 << 15) - 1;
429 1.19 christos else
430 1.19 christos lsp->lst_nlink = (linux_nlink_t)bsp->st_nlink;
431 1.1 fvdl lsp->lst_uid = bsp->st_uid;
432 1.1 fvdl lsp->lst_gid = bsp->st_gid;
433 1.9 fvdl lsp->lst_rdev = linux_fakedev(bsp->st_rdev);
434 1.1 fvdl lsp->lst_size = bsp->st_size;
435 1.1 fvdl lsp->lst_blksize = bsp->st_blksize;
436 1.1 fvdl lsp->lst_blocks = bsp->st_blocks;
437 1.1 fvdl lsp->lst_atime = bsp->st_atime;
438 1.1 fvdl lsp->lst_mtime = bsp->st_mtime;
439 1.1 fvdl lsp->lst_ctime = bsp->st_ctime;
440 1.1 fvdl }
441 1.1 fvdl
442 1.1 fvdl /*
443 1.1 fvdl * The stat functions below are plain sailing. stat and lstat are handled
444 1.1 fvdl * by one function to avoid code duplication.
445 1.1 fvdl */
446 1.1 fvdl int
447 1.12 mycroft linux_sys_fstat(p, v, retval)
448 1.1 fvdl struct proc *p;
449 1.11 thorpej void *v;
450 1.11 thorpej register_t *retval;
451 1.11 thorpej {
452 1.12 mycroft struct linux_sys_fstat_args /* {
453 1.1 fvdl syscallarg(int) fd;
454 1.1 fvdl syscallarg(linux_stat *) sp;
455 1.11 thorpej } */ *uap = v;
456 1.21 thorpej struct sys___fstat13_args fsa;
457 1.1 fvdl struct linux_stat tmplst;
458 1.1 fvdl struct stat *st,tmpst;
459 1.1 fvdl caddr_t sg;
460 1.1 fvdl int error;
461 1.1 fvdl
462 1.5 christos sg = stackgap_init(p->p_emul);
463 1.1 fvdl
464 1.1 fvdl st = stackgap_alloc(&sg, sizeof (struct stat));
465 1.1 fvdl
466 1.1 fvdl SCARG(&fsa, fd) = SCARG(uap, fd);
467 1.1 fvdl SCARG(&fsa, sb) = st;
468 1.1 fvdl
469 1.21 thorpej if ((error = sys___fstat13(p, &fsa, retval)))
470 1.1 fvdl return error;
471 1.1 fvdl
472 1.1 fvdl if ((error = copyin(st, &tmpst, sizeof tmpst)))
473 1.1 fvdl return error;
474 1.1 fvdl
475 1.1 fvdl bsd_to_linux_stat(&tmpst, &tmplst);
476 1.1 fvdl
477 1.1 fvdl if ((error = copyout(&tmplst, SCARG(uap, sp), sizeof tmplst)))
478 1.1 fvdl return error;
479 1.1 fvdl
480 1.1 fvdl return 0;
481 1.1 fvdl }
482 1.1 fvdl
483 1.1 fvdl static int
484 1.14 christos linux_stat1(p, v, retval, dolstat)
485 1.1 fvdl struct proc *p;
486 1.14 christos void *v;
487 1.1 fvdl register_t *retval;
488 1.1 fvdl int dolstat;
489 1.1 fvdl {
490 1.21 thorpej struct sys___stat13_args sa;
491 1.1 fvdl struct linux_stat tmplst;
492 1.1 fvdl struct stat *st, tmpst;
493 1.1 fvdl caddr_t sg;
494 1.1 fvdl int error;
495 1.14 christos struct linux_sys_stat_args *uap = v;
496 1.1 fvdl
497 1.5 christos sg = stackgap_init(p->p_emul);
498 1.1 fvdl
499 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
500 1.1 fvdl
501 1.1 fvdl st = stackgap_alloc(&sg, sizeof (struct stat));
502 1.1 fvdl SCARG(&sa, ub) = st;
503 1.1 fvdl SCARG(&sa, path) = SCARG(uap, path);
504 1.1 fvdl
505 1.21 thorpej if ((error = (dolstat ? sys___lstat13(p, &sa, retval) :
506 1.21 thorpej sys___stat13(p, &sa, retval))))
507 1.1 fvdl return error;
508 1.1 fvdl
509 1.1 fvdl if ((error = copyin(st, &tmpst, sizeof tmpst)))
510 1.1 fvdl return error;
511 1.1 fvdl
512 1.1 fvdl bsd_to_linux_stat(&tmpst, &tmplst);
513 1.1 fvdl
514 1.1 fvdl if ((error = copyout(&tmplst, SCARG(uap, sp), sizeof tmplst)))
515 1.1 fvdl return error;
516 1.1 fvdl
517 1.1 fvdl return 0;
518 1.1 fvdl }
519 1.1 fvdl
520 1.1 fvdl int
521 1.12 mycroft linux_sys_stat(p, v, retval)
522 1.1 fvdl struct proc *p;
523 1.11 thorpej void *v;
524 1.11 thorpej register_t *retval;
525 1.11 thorpej {
526 1.12 mycroft struct linux_sys_stat_args /* {
527 1.1 fvdl syscallarg(char *) path;
528 1.1 fvdl syscallarg(struct linux_stat *) sp;
529 1.11 thorpej } */ *uap = v;
530 1.11 thorpej
531 1.1 fvdl return linux_stat1(p, uap, retval, 0);
532 1.1 fvdl }
533 1.1 fvdl
534 1.23 erh /* Note: this is "newlstat" in the Linux sources */
535 1.23 erh /* (we don't bother with the old lstat currently) */
536 1.1 fvdl int
537 1.12 mycroft linux_sys_lstat(p, v, retval)
538 1.1 fvdl struct proc *p;
539 1.11 thorpej void *v;
540 1.11 thorpej register_t *retval;
541 1.11 thorpej {
542 1.12 mycroft struct linux_sys_lstat_args /* {
543 1.1 fvdl syscallarg(char *) path;
544 1.1 fvdl syscallarg(struct linux_stat *) sp;
545 1.11 thorpej } */ *uap = v;
546 1.11 thorpej
547 1.1 fvdl return linux_stat1(p, uap, retval, 1);
548 1.1 fvdl }
549 1.1 fvdl
550 1.1 fvdl /*
551 1.10 fvdl * The following syscalls are mostly here because of the alternate path check.
552 1.1 fvdl */
553 1.1 fvdl int
554 1.12 mycroft linux_sys_access(p, v, retval)
555 1.1 fvdl struct proc *p;
556 1.11 thorpej void *v;
557 1.11 thorpej register_t *retval;
558 1.11 thorpej {
559 1.12 mycroft struct linux_sys_access_args /* {
560 1.1 fvdl syscallarg(char *) path;
561 1.1 fvdl syscallarg(int) flags;
562 1.11 thorpej } */ *uap = v;
563 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
564 1.1 fvdl
565 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
566 1.1 fvdl
567 1.12 mycroft return sys_access(p, uap, retval);
568 1.2 fvdl }
569 1.2 fvdl
570 1.2 fvdl int
571 1.12 mycroft linux_sys_unlink(p, v, retval)
572 1.2 fvdl struct proc *p;
573 1.11 thorpej void *v;
574 1.2 fvdl register_t *retval;
575 1.2 fvdl
576 1.2 fvdl {
577 1.12 mycroft struct linux_sys_unlink_args /* {
578 1.11 thorpej syscallarg(char *) path;
579 1.11 thorpej } */ *uap = v;
580 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
581 1.2 fvdl
582 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
583 1.2 fvdl
584 1.12 mycroft return sys_unlink(p, uap, retval);
585 1.2 fvdl }
586 1.2 fvdl
587 1.10 fvdl int
588 1.12 mycroft linux_sys_chdir(p, v, retval)
589 1.2 fvdl struct proc *p;
590 1.11 thorpej void *v;
591 1.11 thorpej register_t *retval;
592 1.11 thorpej {
593 1.12 mycroft struct linux_sys_chdir_args /* {
594 1.2 fvdl syscallarg(char *) path;
595 1.11 thorpej } */ *uap = v;
596 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
597 1.2 fvdl
598 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
599 1.2 fvdl
600 1.12 mycroft return sys_chdir(p, uap, retval);
601 1.2 fvdl }
602 1.2 fvdl
603 1.2 fvdl int
604 1.12 mycroft linux_sys_mknod(p, v, retval)
605 1.2 fvdl struct proc *p;
606 1.11 thorpej void *v;
607 1.11 thorpej register_t *retval;
608 1.11 thorpej {
609 1.12 mycroft struct linux_sys_mknod_args /* {
610 1.2 fvdl syscallarg(char *) path;
611 1.2 fvdl syscallarg(int) mode;
612 1.2 fvdl syscallarg(int) dev;
613 1.11 thorpej } */ *uap = v;
614 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
615 1.21 thorpej struct sys_mkfifo_args bma;
616 1.2 fvdl
617 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, path));
618 1.2 fvdl
619 1.10 fvdl /*
620 1.10 fvdl * BSD handles FIFOs seperately
621 1.10 fvdl */
622 1.21 thorpej if (SCARG(uap, mode) & S_IFIFO) {
623 1.21 thorpej SCARG(&bma, path) = SCARG(uap, path);
624 1.21 thorpej SCARG(&bma, mode) = SCARG(uap, mode);
625 1.21 thorpej return sys_mkfifo(p, uap, retval);
626 1.21 thorpej } else
627 1.21 thorpej return sys_mknod(p, uap, retval);
628 1.2 fvdl }
629 1.2 fvdl
630 1.2 fvdl int
631 1.12 mycroft linux_sys_chmod(p, v, retval)
632 1.2 fvdl struct proc *p;
633 1.11 thorpej void *v;
634 1.11 thorpej register_t *retval;
635 1.11 thorpej {
636 1.12 mycroft struct linux_sys_chmod_args /* {
637 1.2 fvdl syscallarg(char *) path;
638 1.2 fvdl syscallarg(int) mode;
639 1.11 thorpej } */ *uap = v;
640 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
641 1.2 fvdl
642 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
643 1.2 fvdl
644 1.12 mycroft return sys_chmod(p, uap, retval);
645 1.2 fvdl }
646 1.2 fvdl
647 1.2 fvdl int
648 1.12 mycroft linux_sys_chown(p, v, retval)
649 1.2 fvdl struct proc *p;
650 1.11 thorpej void *v;
651 1.11 thorpej register_t *retval;
652 1.11 thorpej {
653 1.12 mycroft struct linux_sys_chown_args /* {
654 1.2 fvdl syscallarg(char *) path;
655 1.2 fvdl syscallarg(int) uid;
656 1.2 fvdl syscallarg(int) gid;
657 1.11 thorpej } */ *uap = v;
658 1.22 kleink struct sys___posix_chown_args bca;
659 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
660 1.2 fvdl
661 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
662 1.2 fvdl
663 1.10 fvdl SCARG(&bca, path) = SCARG(uap, path);
664 1.10 fvdl SCARG(&bca, uid) = ((linux_uid_t)SCARG(uap, uid) == (linux_uid_t)-1) ?
665 1.10 fvdl (uid_t)-1 : SCARG(uap, uid);
666 1.10 fvdl SCARG(&bca, gid) = ((linux_gid_t)SCARG(uap, gid) == (linux_gid_t)-1) ?
667 1.10 fvdl (gid_t)-1 : SCARG(uap, gid);
668 1.10 fvdl
669 1.22 kleink return sys___posix_chown(p, &bca, retval);
670 1.10 fvdl }
671 1.10 fvdl
672 1.10 fvdl int
673 1.12 mycroft linux_sys_fchown(p, v, retval)
674 1.10 fvdl struct proc *p;
675 1.11 thorpej void *v;
676 1.11 thorpej register_t *retval;
677 1.11 thorpej {
678 1.12 mycroft struct linux_sys_fchown_args /* {
679 1.10 fvdl syscallarg(int) fd;
680 1.10 fvdl syscallarg(int) uid;
681 1.10 fvdl syscallarg(int) gid;
682 1.11 thorpej } */ *uap = v;
683 1.22 kleink struct sys___posix_fchown_args bfa;
684 1.10 fvdl
685 1.10 fvdl SCARG(&bfa, fd) = SCARG(uap, fd);
686 1.10 fvdl SCARG(&bfa, uid) = ((linux_uid_t)SCARG(uap, uid) == (linux_uid_t)-1) ?
687 1.10 fvdl (uid_t)-1 : SCARG(uap, uid);
688 1.10 fvdl SCARG(&bfa, gid) = ((linux_gid_t)SCARG(uap, gid) == (linux_gid_t)-1) ?
689 1.10 fvdl (gid_t)-1 : SCARG(uap, gid);
690 1.10 fvdl
691 1.22 kleink return sys___posix_fchown(p, &bfa, retval);
692 1.2 fvdl }
693 1.2 fvdl
694 1.2 fvdl int
695 1.23 erh linux_sys_lchown(p, v, retval)
696 1.23 erh struct proc *p;
697 1.23 erh void *v;
698 1.23 erh register_t *retval;
699 1.23 erh {
700 1.23 erh struct linux_sys_lchown_args /* {
701 1.23 erh syscallarg(char *) path;
702 1.23 erh syscallarg(int) uid;
703 1.23 erh syscallarg(int) gid;
704 1.23 erh } */ *uap = v;
705 1.23 erh struct sys___posix_lchown_args bla;
706 1.23 erh
707 1.23 erh SCARG(&bla, path) = SCARG(uap, path);
708 1.23 erh SCARG(&bla, uid) = ((linux_uid_t)SCARG(uap, uid) == (linux_uid_t)-1) ?
709 1.23 erh (uid_t)-1 : SCARG(uap, uid);
710 1.23 erh SCARG(&bla, gid) = ((linux_gid_t)SCARG(uap, gid) == (linux_gid_t)-1) ?
711 1.23 erh (gid_t)-1 : SCARG(uap, gid);
712 1.23 erh
713 1.23 erh return sys___posix_lchown(p, &bla, retval);
714 1.23 erh }
715 1.23 erh
716 1.23 erh int
717 1.12 mycroft linux_sys_rename(p, v, retval)
718 1.2 fvdl struct proc *p;
719 1.11 thorpej void *v;
720 1.11 thorpej register_t *retval;
721 1.11 thorpej {
722 1.12 mycroft struct linux_sys_rename_args /* {
723 1.2 fvdl syscallarg(char *) from;
724 1.2 fvdl syscallarg(char *) to;
725 1.11 thorpej } */ *uap = v;
726 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
727 1.2 fvdl
728 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, from));
729 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, to));
730 1.2 fvdl
731 1.22 kleink return sys___posix_rename(p, uap, retval);
732 1.2 fvdl }
733 1.2 fvdl
734 1.2 fvdl int
735 1.12 mycroft linux_sys_mkdir(p, v, retval)
736 1.2 fvdl struct proc *p;
737 1.11 thorpej void *v;
738 1.11 thorpej register_t *retval;
739 1.11 thorpej {
740 1.12 mycroft struct linux_sys_mkdir_args /* {
741 1.2 fvdl syscallarg(char *) path;
742 1.7 fvdl syscallarg(int) mode;
743 1.11 thorpej } */ *uap = v;
744 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
745 1.2 fvdl
746 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, path));
747 1.12 mycroft
748 1.12 mycroft return sys_mkdir(p, uap, retval);
749 1.2 fvdl }
750 1.2 fvdl
751 1.2 fvdl int
752 1.12 mycroft linux_sys_rmdir(p, v, retval)
753 1.2 fvdl struct proc *p;
754 1.11 thorpej void *v;
755 1.11 thorpej register_t *retval;
756 1.11 thorpej {
757 1.12 mycroft struct linux_sys_rmdir_args /* {
758 1.2 fvdl syscallarg(char *) path;
759 1.11 thorpej } */ *uap = v;
760 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
761 1.2 fvdl
762 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
763 1.12 mycroft
764 1.12 mycroft return sys_rmdir(p, uap, retval);
765 1.2 fvdl }
766 1.2 fvdl
767 1.2 fvdl int
768 1.12 mycroft linux_sys_symlink(p, v, retval)
769 1.2 fvdl struct proc *p;
770 1.11 thorpej void *v;
771 1.11 thorpej register_t *retval;
772 1.11 thorpej {
773 1.12 mycroft struct linux_sys_symlink_args /* {
774 1.2 fvdl syscallarg(char *) path;
775 1.2 fvdl syscallarg(char *) to;
776 1.11 thorpej } */ *uap = v;
777 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
778 1.2 fvdl
779 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
780 1.5 christos LINUX_CHECK_ALT_CREAT(p, &sg, SCARG(uap, to));
781 1.2 fvdl
782 1.12 mycroft return sys_symlink(p, uap, retval);
783 1.2 fvdl }
784 1.2 fvdl
785 1.2 fvdl int
786 1.12 mycroft linux_sys_readlink(p, v, retval)
787 1.2 fvdl struct proc *p;
788 1.11 thorpej void *v;
789 1.11 thorpej register_t *retval;
790 1.11 thorpej {
791 1.12 mycroft struct linux_sys_readlink_args /* {
792 1.2 fvdl syscallarg(char *) name;
793 1.2 fvdl syscallarg(char *) buf;
794 1.2 fvdl syscallarg(int) count;
795 1.11 thorpej } */ *uap = v;
796 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
797 1.2 fvdl
798 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, name));
799 1.12 mycroft
800 1.12 mycroft return sys_readlink(p, uap, retval);
801 1.2 fvdl }
802 1.2 fvdl
803 1.2 fvdl int
804 1.12 mycroft linux_sys_truncate(p, v, retval)
805 1.2 fvdl struct proc *p;
806 1.11 thorpej void *v;
807 1.11 thorpej register_t *retval;
808 1.11 thorpej {
809 1.12 mycroft struct linux_sys_truncate_args /* {
810 1.2 fvdl syscallarg(char *) path;
811 1.2 fvdl syscallarg(long) length;
812 1.11 thorpej } */ *uap = v;
813 1.5 christos caddr_t sg = stackgap_init(p->p_emul);
814 1.2 fvdl
815 1.5 christos LINUX_CHECK_ALT_EXIST(p, &sg, SCARG(uap, path));
816 1.12 mycroft
817 1.12 mycroft return compat_43_sys_truncate(p, uap, retval);
818 1.15 fvdl }
819 1.15 fvdl
820 1.15 fvdl /*
821 1.15 fvdl * This is just fsync() for now (just as it is in the Linux kernel)
822 1.23 erh * Note: this is not implemented under Linux on Alpha and Arm
823 1.23 erh * but should still be defined in our syscalls.master.
824 1.23 erh * (syscall #148 on the arm)
825 1.15 fvdl */
826 1.15 fvdl int
827 1.15 fvdl linux_sys_fdatasync(p, v, retval)
828 1.15 fvdl struct proc *p;
829 1.15 fvdl void *v;
830 1.15 fvdl register_t *retval;
831 1.15 fvdl {
832 1.16 christos #ifdef notdef
833 1.15 fvdl struct linux_sys_fdatasync_args /* {
834 1.15 fvdl syscallarg(int) fd;
835 1.15 fvdl } */ *uap = v;
836 1.16 christos #endif
837 1.15 fvdl return sys_fsync(p, v, retval);
838 1.1 fvdl }
839