Style(9) cleanup to src/sys/vfs, stage 20/21: umapfs.
[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.11 2003/11/13 04:04:42 daver 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/namei.h>
41 #include <sys/stat.h>
42 #include <sys/sysctl.h>
43 #include <sys/systm.h>
44 #include <sys/vnode.h>
45 #include <sys/device.h>
46 #include <sys/file2.h>
47 #include <sys/kern_syscall.h>
48
49 #include <arch_linux/linux.h>
50 #include <arch_linux/linux_proto.h>
51 #include "linux_util.h"
52
53 static int
54 newstat_copyout(struct stat *buf, void *ubuf)
55 {
56         struct l_newstat tbuf;
57         dev_t dev;
58         int error;
59
60         tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
61         tbuf.st_ino = buf->st_ino;
62         tbuf.st_mode = buf->st_mode;
63         tbuf.st_nlink = buf->st_nlink;
64         tbuf.st_uid = buf->st_uid;
65         tbuf.st_gid = buf->st_gid;
66         tbuf.st_rdev = buf->st_rdev;
67         tbuf.st_size = buf->st_size;
68         tbuf.st_atime = buf->st_atime;
69         tbuf.st_mtime = buf->st_mtime;
70         tbuf.st_ctime = buf->st_ctime;
71         tbuf.st_blksize = buf->st_blksize;
72         tbuf.st_blocks = buf->st_blocks;
73
74         /* Lie about disk drives which are character devices
75          * in FreeBSD but block devices under Linux.
76          */
77         if (S_ISCHR(tbuf.st_mode) &&
78             (dev = udev2dev(buf->st_rdev, 0)) != NODEV) {
79                 if (dev_dport(dev) != NULL && (dev_dflags(dev) & D_DISK)) {
80                         tbuf.st_mode &= ~S_IFMT;
81                         tbuf.st_mode |= S_IFBLK;
82
83                         /* XXX this may not be quite right */
84                         /* Map major number to 0 */
85                         tbuf.st_dev = uminor(buf->st_dev) & 0xf;
86                         tbuf.st_rdev = buf->st_rdev & 0xff;
87                 }
88         }
89
90         error = copyout(&tbuf, ubuf, sizeof(tbuf));
91         return (error);
92 }
93
94 int
95 linux_newstat(struct linux_newstat_args *args)
96 {
97         struct thread *td = curthread;
98         struct stat buf;
99         struct nameidata 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         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW | CNP_LOCKLEAF | CNP_NOOBJ,
111             UIO_SYSSPACE, path, td);
112
113         error = kern_stat(&nd, &buf);
114
115         if (error == 0)
116                 error = newstat_copyout(&buf, args->buf);
117         linux_free_path(&path);
118         return (error);
119 }
120
121 int
122 linux_newlstat(struct linux_newlstat_args *args)
123 {
124         struct thread *td = curthread;
125         struct stat sb;
126         struct nameidata nd;
127         char *path;
128         int error;
129
130         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
131         if (error)
132                 return (error);
133 #ifdef DEBUG
134         if (ldebug(newlstat))
135                 printf(ARGS(newlstat, "%s, *"), path);
136 #endif
137         NDINIT(&nd, NAMEI_LOOKUP, CNP_LOCKLEAF | CNP_NOOBJ,
138             UIO_SYSSPACE, path, td);
139
140         error = kern_stat(&nd, &sb);
141
142         if (error == 0)
143                 error = newstat_copyout(&sb, args->buf);
144         linux_free_path(&path);
145         return (error);
146 }
147
148 int
149 linux_newfstat(struct linux_newfstat_args *args)
150 {
151         struct stat buf;
152         int error;
153
154 #ifdef DEBUG
155         if (ldebug(newfstat))
156                 printf(ARGS(newfstat, "%d, *"), args->fd);
157 #endif
158         error = kern_fstat(args->fd, &buf);
159
160         if (error == 0)
161                 error = newstat_copyout(&buf, args->buf);
162         return (error);
163 }
164
165 /* XXX - All fields of type l_int are defined as l_long on i386 */
166 struct l_statfs {
167         l_int           f_type;
168         l_int           f_bsize;
169         l_int           f_blocks;
170         l_int           f_bfree;
171         l_int           f_bavail;
172         l_int           f_files;
173         l_int           f_ffree;
174         l_fsid_t        f_fsid;
175         l_int           f_namelen;
176         l_int           f_spare[6];
177 };
178
179 #define LINUX_CODA_SUPER_MAGIC  0x73757245L
180 #define LINUX_EXT2_SUPER_MAGIC  0xEF53L
181 #define LINUX_HPFS_SUPER_MAGIC  0xf995e849L
182 #define LINUX_ISOFS_SUPER_MAGIC 0x9660L
183 #define LINUX_MSDOS_SUPER_MAGIC 0x4d44L
184 #define LINUX_NCP_SUPER_MAGIC   0x564cL
185 #define LINUX_NFS_SUPER_MAGIC   0x6969L
186 #define LINUX_NTFS_SUPER_MAGIC  0x5346544EL
187 #define LINUX_PROC_SUPER_MAGIC  0x9fa0L
188 #define LINUX_UFS_SUPER_MAGIC   0x00011954L     /* XXX - UFS_MAGIC in Linux */
189
190 static long
191 bsd_to_linux_ftype(const char *fstypename)
192 {
193         int i;
194         static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
195                 {"ufs",     LINUX_UFS_SUPER_MAGIC},
196                 {"cd9660",  LINUX_ISOFS_SUPER_MAGIC},
197                 {"nfs",     LINUX_NFS_SUPER_MAGIC},
198                 {"ext2fs",  LINUX_EXT2_SUPER_MAGIC},
199                 {"procfs",  LINUX_PROC_SUPER_MAGIC},
200                 {"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
201                 {"ntfs",    LINUX_NTFS_SUPER_MAGIC},
202                 {"nwfs",    LINUX_NCP_SUPER_MAGIC},
203                 {"hpfs",    LINUX_HPFS_SUPER_MAGIC},
204                 {"coda",    LINUX_CODA_SUPER_MAGIC},
205                 {NULL,      0L}};
206
207         for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
208                 if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
209                         return (b2l_tbl[i].linux_type);
210
211         return (0L);
212 }
213
214 static int
215 statfs_copyout(struct statfs *statfs, struct l_statfs_buf *buf)
216 {
217         struct l_statfs linux_statfs;
218         int error;
219
220         linux_statfs.f_type = bsd_to_linux_ftype(statfs->f_fstypename);
221         linux_statfs.f_bsize = statfs->f_bsize;
222         linux_statfs.f_blocks = statfs->f_blocks;
223         linux_statfs.f_bfree = statfs->f_bfree;
224         linux_statfs.f_bavail = statfs->f_bavail;
225         linux_statfs.f_ffree = statfs->f_ffree;
226         linux_statfs.f_files = statfs->f_files;
227         linux_statfs.f_fsid.val[0] = statfs->f_fsid.val[0];
228         linux_statfs.f_fsid.val[1] = statfs->f_fsid.val[1];
229         linux_statfs.f_namelen = MAXNAMLEN; /* Bogus */
230
231         error = copyout(&linux_statfs, buf, sizeof(linux_statfs));
232         return (error);
233 }
234
235 int
236 linux_statfs(struct linux_statfs_args *args)
237 {
238         struct thread *td = curthread;
239         struct statfs statfs;
240         struct nameidata nd;
241         char *path;
242         int error;
243
244         error = linux_copyin_path(args->path, &path, LINUX_PATH_EXISTS);
245         if (error)
246                 return (error);
247 #ifdef DEBUG
248         if (ldebug(statfs))
249                 printf(ARGS(statfs, "%s, *"), path);
250 #endif
251         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW, UIO_SYSSPACE, path, td);
252
253         error = kern_statfs(&nd, &statfs);
254
255         if (error == 0)
256                 error = statfs_copyout(&statfs, args->buf);
257         linux_free_path(&path);
258         return (error);
259 }
260
261 int
262 linux_fstatfs(struct linux_fstatfs_args *args)
263 {
264         struct statfs statfs;
265         int error;
266
267 #ifdef DEBUG
268         if (ldebug(fstatfs))
269                 printf(ARGS(fstatfs, "%d, *"), args->fd);
270 #endif
271         error = kern_fstatfs(args->fd, &statfs);
272
273         if (error == 0)
274                 error = statfs_copyout(&statfs, args->buf);
275         return (error);
276 }
277
278 struct l_ustat 
279 {
280         l_daddr_t       f_tfree;
281         l_ino_t         f_tinode;
282         char            f_fname[6];
283         char            f_fpack[6];
284 };
285
286 int
287 linux_ustat(struct linux_ustat_args *args)
288 {
289         struct thread *td = curthread;
290         struct l_ustat lu;
291         dev_t dev;
292         struct vnode *vp;
293         struct statfs *stat;
294         int error;
295
296 #ifdef DEBUG
297         if (ldebug(ustat))
298                 printf(ARGS(ustat, "%d, *"), args->dev);
299 #endif
300
301         /*
302          * lu.f_fname and lu.f_fpack are not used. They are always zeroed.
303          * lu.f_tinode and lu.f_tfree are set from the device's super block.
304          */
305         bzero(&lu, sizeof(lu));
306
307         /*
308          * XXX - Don't return an error if we can't find a vnode for the
309          * device. Our dev_t is 32-bits whereas Linux only has a 16-bits
310          * dev_t. The dev_t that is used now may as well be a truncated
311          * dev_t returned from previous syscalls. Just return a bzeroed
312          * ustat in that case.
313          */
314         dev = makedev(args->dev >> 8, args->dev & 0xFF);
315         if (vfinddev(dev, VCHR, &vp)) {
316                 if (vp->v_mount == NULL)
317                         return (EINVAL);
318                 stat = &(vp->v_mount->mnt_stat);
319                 error = VFS_STATFS(vp->v_mount, stat, td);
320                 if (error)
321                         return (error);
322
323                 lu.f_tfree = stat->f_bfree;
324                 lu.f_tinode = stat->f_ffree;
325         }
326
327         return (copyout(&lu, args->ubuf, sizeof(lu)));
328 }
329
330 #if defined(__i386__)
331
332 static int
333 stat64_copyout(struct stat *buf, void *ubuf)
334 {
335         struct l_stat64 lbuf;
336         int error;
337
338         bzero(&lbuf, sizeof(lbuf));
339         lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
340         lbuf.st_ino = buf->st_ino;
341         lbuf.st_mode = buf->st_mode;
342         lbuf.st_nlink = buf->st_nlink;
343         lbuf.st_uid = buf->st_uid;
344         lbuf.st_gid = buf->st_gid;
345         lbuf.st_rdev = buf->st_rdev;
346         lbuf.st_size = buf->st_size;
347         lbuf.st_atime = buf->st_atime;
348         lbuf.st_mtime = buf->st_mtime;
349         lbuf.st_ctime = buf->st_ctime;
350         lbuf.st_blksize = buf->st_blksize;
351         lbuf.st_blocks = buf->st_blocks;
352
353         /*
354          * The __st_ino field makes all the difference. In the Linux kernel
355          * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
356          * but without the assignment to __st_ino the runtime linker refuses
357          * to mmap(2) any shared libraries. I guess it's broken alright :-)
358          */
359         lbuf.__st_ino = buf->st_ino;
360
361         error = copyout(&lbuf, ubuf, sizeof(lbuf));
362         return (error);
363 }
364
365 int
366 linux_stat64(struct linux_stat64_args *args)
367 {
368         struct thread *td = curthread;
369         struct nameidata nd;
370         struct stat buf;
371         char *path;
372         int error;
373
374         error = linux_copyin_path(args->filename, &path, LINUX_PATH_EXISTS);
375         if (error)
376                 return (error);
377 #ifdef DEBUG
378         if (ldebug(stat64))
379                 printf(ARGS(stat64, "%s, *"), path);
380 #endif
381         NDINIT(&nd, NAMEI_LOOKUP, CNP_FOLLOW | CNP_LOCKLEAF | CNP_NOOBJ,
382                 UIO_SYSSPACE, path, td);
383
384         error = kern_stat(&nd, &buf);
385
386         if (error == 0)
387                 error = stat64_copyout(&buf, args->statbuf);
388         linux_free_path(&path);
389         return (error);
390 }
391
392 int
393 linux_lstat64(struct linux_lstat64_args *args)
394 {
395         struct thread *td = curthread;
396         struct nameidata nd;
397         struct stat sb;
398         char *path;
399         int error;
400
401         error = linux_copyin_path(args->filename, &path, LINUX_PATH_EXISTS);
402         if (error)
403                 return (error);
404 #ifdef DEBUG
405         if (ldebug(lstat64))
406                 printf(ARGS(lstat64, "%s, *"), path);
407 #endif
408         NDINIT(&nd, NAMEI_LOOKUP, CNP_LOCKLEAF | CNP_NOOBJ,
409             UIO_SYSSPACE, path, td);
410
411         error = kern_stat(&nd, &sb);
412
413         if (error == 0)
414                 error = stat64_copyout(&sb, args->statbuf);
415         linux_free_path(&path);
416         return (error);
417 }
418
419 int
420 linux_fstat64(struct linux_fstat64_args *args)
421 {
422         struct stat buf;
423         int error;
424
425 #ifdef DEBUG
426         if (ldebug(fstat64))
427                 printf(ARGS(fstat64, "%d, *"), args->fd);
428 #endif
429         error = kern_fstat(args->fd, &buf);
430
431         if (error == 0)
432                 error = stat64_copyout(&buf, args->statbuf);
433         return (error);
434 }
435
436 #endif /* __i386__ */