Remove the thread argument from all mount->vfs_* function vectors,
[dragonfly.git] / sys / emulation / linux / linux_stats.c
1 /*-
2  * Copyright (c) 1994-1995 Søren Schmidt
3  * All rights reserved.
4  *
5  * Redistribution and use in source and binary forms, with or without
6  * modification, are permitted provided that the following conditions
7  * are met:
8  * 1. Redistributions of source code must retain the above copyright
9  *    notice, this list of conditions and the following disclaimer 
10  *    in this position and unchanged.
11  * 2. Redistributions in binary form must reproduce the above copyright
12  *    notice, this list of conditions and the following disclaimer in the
13  *    documentation and/or other materials provided with the distribution.
14  * 3. The name of the author may not be used to endorse or promote products
15  *    derived from this software withough specific prior written permission
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
18  * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
19  * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20  * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
21  * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
22  * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
23  * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
24  * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
25  * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
26  * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
27  *
28  * $FreeBSD: src/sys/compat/linux/linux_stats.c,v 1.22.2.3 2001/11/05 19:08:23 marcel Exp $
29  * $DragonFly: src/sys/emulation/linux/linux_stats.c,v 1.18 2006/05/06 18:48:50 dillon Exp $
30  */
31
32 #include <sys/param.h>
33 #include <sys/systm.h>
34 #include <sys/conf.h>
35 #include <sys/dirent.h>
36 #include <sys/file.h>
37 #include <sys/filedesc.h>
38 #include <sys/proc.h>
39 #include <sys/mount.h>
40 #include <sys/nlookup.h>
41 #include <sys/stat.h>
42 #include <sys/sysctl.h>
43 #include <sys/systm.h>
44 #include <sys/unistd.h>
45 #include <sys/vnode.h>
46 #include <sys/device.h>
47 #include <sys/file2.h>
48 #include <sys/kern_syscall.h>
49
50 #include <arch_linux/linux.h>
51 #include <arch_linux/linux_proto.h>
52 #include "linux_util.h"
53
54 static int
55 newstat_copyout(struct stat *buf, void *ubuf)
56 {
57         struct l_newstat tbuf;
58         dev_t dev;
59         int error;
60
61         tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
62         tbuf.st_ino = buf->st_ino;
63         tbuf.st_mode = buf->st_mode;
64         tbuf.st_nlink = buf->st_nlink;
65         tbuf.st_uid = buf->st_uid;
66         tbuf.st_gid = buf->st_gid;
67         tbuf.st_rdev = buf->st_rdev;
68         tbuf.st_size = buf->st_size;
69         tbuf.st_atime = buf->st_atime;
70         tbuf.st_mtime = buf->st_mtime;
71         tbuf.st_ctime = buf->st_ctime;
72         tbuf.st_blksize = buf->st_blksize;
73         tbuf.st_blocks = buf->st_blocks;
74
75         /* Lie about disk drives which are character devices
76          * in FreeBSD but block devices under Linux.
77          */
78         if (S_ISCHR(tbuf.st_mode) &&
79             (dev = udev2dev(buf->st_rdev, 0)) != NODEV) {
80                 if (dev_is_good(dev) && (dev_dflags(dev) & D_DISK)) {
81                         tbuf.st_mode &= ~S_IFMT;
82                         tbuf.st_mode |= S_IFBLK;
83
84                         /* XXX this may not be quite right */
85                         /* Map major number to 0 */
86                         tbuf.st_dev = uminor(buf->st_dev) & 0xf;
87                         tbuf.st_rdev = buf->st_rdev & 0xff;
88                 }
89         }
90
91         error = copyout(&tbuf, ubuf, sizeof(tbuf));
92         return (error);
93 }
94
95 int
96 linux_newstat(struct linux_newstat_args *args)
97 {
98         struct stat buf;
99         struct nlookupdata nd;
100         char *path;
101         int error;
102
103         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
104         if (error)
105                 return (error);
106 #ifdef DEBUG
107         if (ldebug(newstat))
108                 printf(ARGS(newstat, "%s, *"), path);
109 #endif
110         error = nlookup_init(&nd, path, UIO_SYSSPACE, NLC_FOLLOW);
111         if (error == 0) {
112                 error = kern_stat(&nd, &buf);
113                 if (error == 0)
114                         error = newstat_copyout(&buf, args->buf);
115                 nlookup_done(&nd);
116         }
117         linux_free_path(&path);
118         return (error);
119 }
120
121 int
122 linux_newlstat(struct linux_newlstat_args *args)
123 {
124         struct stat sb;
125         struct nlookupdata nd;
126         char *path;
127         int error;
128
129         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
130         if (error)
131                 return (error);
132 #ifdef DEBUG
133         if (ldebug(newlstat))
134                 printf(ARGS(newlstat, "%s, *"), path);
135 #endif
136         error = nlookup_init(&nd, path, UIO_SYSSPACE, 0);
137         if (error == 0) {
138                 error = kern_stat(&nd, &sb);
139                 if (error == 0)
140                         error = newstat_copyout(&sb, args->buf);
141                 nlookup_done(&nd);
142         }
143         linux_free_path(&path);
144         return (error);
145 }
146
147 int
148 linux_newfstat(struct linux_newfstat_args *args)
149 {
150         struct stat buf;
151         int error;
152
153 #ifdef DEBUG
154         if (ldebug(newfstat))
155                 printf(ARGS(newfstat, "%d, *"), args->fd);
156 #endif
157         error = kern_fstat(args->fd, &buf);
158
159         if (error == 0)
160                 error = newstat_copyout(&buf, args->buf);
161         return (error);
162 }
163
164 /* XXX - All fields of type l_int are defined as l_long on i386 */
165 struct l_statfs {
166         l_int           f_type;
167         l_int           f_bsize;
168         l_int           f_blocks;
169         l_int           f_bfree;
170         l_int           f_bavail;
171         l_int           f_files;
172         l_int           f_ffree;
173         l_fsid_t        f_fsid;
174         l_int           f_namelen;
175         l_int           f_spare[6];
176 };
177
178 #define LINUX_CODA_SUPER_MAGIC  0x73757245L
179 #define LINUX_EXT2_SUPER_MAGIC  0xEF53L
180 #define LINUX_HPFS_SUPER_MAGIC  0xf995e849L
181 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L
182 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L
183 #define LINUX_NCP_SUPER_MAGIC   0x564cL
184 #define LINUX_NFS_SUPER_MAGIC   0x6969L
185 #define LINUX_NTFS_SUPER_MAGIC  0x5346544EL
186 #define LINUX_PROC_SUPER_MAGIC  0x9fa0L
187 #define LINUX_UFS_SUPER_MAGIC   0x00011954L     /* XXX - UFS_MAGIC in Linux */
188
189 static long
190 bsd_to_linux_ftype(const char *fstypename)
191 {
192         int i;
193         static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
194                 {"ufs",     LINUX_UFS_SUPER_MAGIC},
195                 {"cd9660",  LINUX_ISOFS_SUPER_MAGIC},
196                 {"nfs",     LINUX_NFS_SUPER_MAGIC},
197                 {"ext2fs",  LINUX_EXT2_SUPER_MAGIC},
198                 {"procfs",  LINUX_PROC_SUPER_MAGIC},
199                 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
200                 {"ntfs",    LINUX_NTFS_SUPER_MAGIC},
201                 {"nwfs",    LINUX_NCP_SUPER_MAGIC},
202                 {"hpfs",    LINUX_HPFS_SUPER_MAGIC},
203                 {"coda",    LINUX_CODA_SUPER_MAGIC},
204                 {NULL,      0L}};
205
206         for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
207                 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
208                         return (b2l_tbl[i].linux_type);
209
210         return (0L);
211 }
212
213 static int
214 statfs_copyout(struct statfs *statfs, struct l_statfs_buf *buf, l_int namelen)
215 {
216         struct l_statfs linux_statfs;
217         int error;
218
219         linux_statfs.f_type = bsd_to_linux_ftype(statfs->f_fstypename);
220         linux_statfs.f_bsize = statfs->f_bsize;
221         linux_statfs.f_blocks = statfs->f_blocks;
222         linux_statfs.f_bfree = statfs->f_bfree;
223         linux_statfs.f_bavail = statfs->f_bavail;
224         linux_statfs.f_ffree = statfs->f_ffree;
225         linux_statfs.f_files = statfs->f_files;
226         linux_statfs.f_fsid.val[0] = statfs->f_fsid.val[0];
227         linux_statfs.f_fsid.val[1] = statfs->f_fsid.val[1];
228         linux_statfs.f_namelen = namelen;
229
230         error = copyout(&linux_statfs, buf, sizeof(linux_statfs));
231         return (error);
232 }
233
234 int
235 linux_statfs(struct linux_statfs_args *args)
236 {
237         struct statfs statfs;
238         struct nlookupdata nd;
239         char *path;
240         int error, namelen;
241
242         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
243         if (error)
244                 return (error);
245 #ifdef DEBUG
246         if (ldebug(statfs))
247                 printf(ARGS(statfs, "%s, *"), path);
248 #endif
249         error = nlookup_init(&nd, path, UIO_SYSSPACE, NLC_FOLLOW);
250         if (error == 0)
251                 error = kern_statfs(&nd, &statfs);
252         if (error == 0) {
253                 if (nd.nl_ncp->nc_vp != NULL)
254                         error = vn_get_namelen(nd.nl_ncp->nc_vp, &namelen);
255                 else
256                         error = EINVAL;
257         }
258         nlookup_done(&nd);
259         if (error == 0)
260                 error = statfs_copyout(&statfs, args->buf, (l_int)namelen);
261         linux_free_path(&path);
262         return (error);
263 }
264
265 int
266 linux_fstatfs(struct linux_fstatfs_args *args)
267 {
268         struct proc *p = curthread->td_proc;
269         struct file *fp;
270         struct statfs statfs;
271         int error, namelen;
272
273 #ifdef DEBUG
274         if (ldebug(fstatfs))
275                 printf(ARGS(fstatfs, "%d, *"), args->fd);
276 #endif
277         error = kern_fstatfs(args->fd, &statfs);
278
279         if (error == 0)
280                 error = getvnode(p->p_fd, args->fd, &fp);
281         if (error == 0)
282                 error = vn_get_namelen((struct vnode *)fp->f_data, &namelen);
283         if (error == 0)
284                 error = statfs_copyout(&statfs, args->buf, (l_int)namelen);
285         return (error);
286 }
287
288 struct l_ustat 
289 {
290         l_daddr_t       f_tfree;
291         l_ino_t         f_tinode;
292         char            f_fname[6];
293         char            f_fpack[6];
294 };
295
296 int
297 linux_ustat(struct linux_ustat_args *args)
298 {
299         struct l_ustat lu;
300         dev_t dev;
301         struct vnode *vp;
302         struct statfs *stat;
303         int error;
304
305 #ifdef DEBUG
306         if (ldebug(ustat))
307                 printf(ARGS(ustat, "%d, *"), args->dev);
308 #endif
309
310         /*
311          * lu.f_fname and lu.f_fpack are not used. They are always zeroed.
312          * lu.f_tinode and lu.f_tfree are set from the device's super block.
313          */
314         bzero(&lu, sizeof(lu));
315
316         /*
317          * XXX - Don't return an error if we can't find a vnode for the
318          * device. Our dev_t is 32-bits whereas Linux only has a 16-bits
319          * dev_t. The dev_t that is used now may as well be a truncated
320          * dev_t returned from previous syscalls. Just return a bzeroed
321          * ustat in that case.
322          */
323         dev = udev2dev(makeudev(args->dev >> 8, args->dev & 0xFF), 0);
324         if (dev != NODEV && vfinddev(dev, VCHR, &vp)) {
325                 if (vp->v_mount == NULL) {
326                         return (EINVAL);
327                 }
328                 stat = &(vp->v_mount->mnt_stat);
329                 error = VFS_STATFS(vp->v_mount, stat, curproc->p_ucred);
330                 if (error) {
331                         return (error);
332                 }
333                 lu.f_tfree = stat->f_bfree;
334                 lu.f_tinode = stat->f_ffree;
335         }
336         return (copyout(&lu, args->ubuf, sizeof(lu)));
337 }
338
339 #if defined(__i386__)
340
341 static int
342 stat64_copyout(struct stat *buf, void *ubuf)
343 {
344         struct l_stat64 lbuf;
345         int error;
346
347         bzero(&lbuf, sizeof(lbuf));
348         lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
349         lbuf.st_ino = buf->st_ino;
350         lbuf.st_mode = buf->st_mode;
351         lbuf.st_nlink = buf->st_nlink;
352         lbuf.st_uid = buf->st_uid;
353         lbuf.st_gid = buf->st_gid;
354         lbuf.st_rdev = buf->st_rdev;
355         lbuf.st_size = buf->st_size;
356         lbuf.st_atime = buf->st_atime;
357         lbuf.st_mtime = buf->st_mtime;
358         lbuf.st_ctime = buf->st_ctime;
359         lbuf.st_blksize = buf->st_blksize;
360         lbuf.st_blocks = buf->st_blocks;
361
362         /*
363          * The __st_ino field makes all the difference. In the Linux kernel
364          * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
365          * but without the assignment to __st_ino the runtime linker refuses
366          * to mmap(2) any shared libraries. I guess it's broken alright :-)
367          */
368         lbuf.__st_ino = buf->st_ino;
369
370         error = copyout(&lbuf, ubuf, sizeof(lbuf));
371         return (error);
372 }
373
374 int
375 linux_stat64(struct linux_stat64_args *args)
376 {
377         struct nlookupdata nd;
378         struct stat buf;
379         char *path;
380         int error;
381
382         error = linux_copyin_path(args->filename, &path, LINUX_PATH_EXISTS);
383         if (error)
384                 return (error);
385 #ifdef DEBUG
386         if (ldebug(stat64))
387                 printf(ARGS(stat64, "%s, *"), path);
388 #endif
389         error = nlookup_init(&nd, path, UIO_SYSSPACE, NLC_FOLLOW);
390         if (error == 0) {
391                 error = kern_stat(&nd, &buf);
392                 if (error == 0)
393                         error = stat64_copyout(&buf, args->statbuf);
394                 nlookup_done(&nd);
395         }
396         linux_free_path(&path);
397         return (error);
398 }
399
400 int
401 linux_lstat64(struct linux_lstat64_args *args)
402 {
403         struct nlookupdata nd;
404         struct stat sb;
405         char *path;
406         int error;
407
408         error = linux_copyin_path(args->filename, &path, LINUX_PATH_EXISTS);
409         if (error)
410                 return (error);
411 #ifdef DEBUG
412         if (ldebug(lstat64))
413                 printf(ARGS(lstat64, "%s, *"), path);
414 #endif
415         error = nlookup_init(&nd, path, UIO_SYSSPACE, 0);
416         if (error == 0) {
417                 error = kern_stat(&nd, &sb);
418                 if (error == 0)
419                         error = stat64_copyout(&sb, args->statbuf);
420                 nlookup_done(&nd);
421         }
422         linux_free_path(&path);
423         return (error);
424 }
425
426 int
427 linux_fstat64(struct linux_fstat64_args *args)
428 {
429         struct stat buf;
430         int error;
431
432 #ifdef DEBUG
433         if (ldebug(fstat64))
434                 printf(ARGS(fstat64, "%d, *"), args->fd);
435 #endif
436         error = kern_fstat(args->fd, &buf);
437
438         if (error == 0)
439                 error = stat64_copyout(&buf, args->statbuf);
440         return (error);
441 }
442
443 #endif /* __i386__ */