xref: /freebsd/sys/compat/linux/linux_stats.c (revision d72a078647de20e31ab09295e671f1b8b4ad89b2) 
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 without 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 
29 #include <sys/cdefs.h>
30 __FBSDID("$FreeBSD$");
31 
32 #include "opt_compat.h"
33 #include "opt_mac.h"
34 
35 #include <sys/param.h>
36 #include <sys/dirent.h>
37 #include <sys/file.h>
38 #include <sys/filedesc.h>
39 #include <sys/proc.h>
40 #include <sys/jail.h>
41 #include <sys/mac.h>
42 #include <sys/malloc.h>
43 #include <sys/mount.h>
44 #include <sys/namei.h>
45 #include <sys/stat.h>
46 #include <sys/syscallsubr.h>
47 #include <sys/systm.h>
48 #include <sys/vnode.h>
49 #include <sys/conf.h>
50 #include <sys/fcntl.h>
51 
52 #ifdef COMPAT_LINUX32
53 #include <machine/../linux32/linux.h>
54 #include <machine/../linux32/linux32_proto.h>
55 #else
56 #include <machine/../linux/linux.h>
57 #include <machine/../linux/linux_proto.h>
58 #endif
59 
60 #include <compat/linux/linux_util.h>
61 
62 /*
63  * XXX: This was removed from newstat_copyout(), and almost identical
64  * XXX: code was in stat64_copyout().  findcdev() needs to be replaced
65  * XXX: with something that does lookup and locking properly.
66  * XXX: When somebody fixes this: please try to avoid duplicating it.
67  */
68 #if 0
69 static void
70 disk_foo(struct somestat *tbuf)
71 {
72 	struct cdevsw *cdevsw;
73 	struct cdev *dev;
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 = findcdev(buf->st_rdev)) != NULL) {
80 		cdevsw = dev_refthread(dev);
81 		if (cdevsw != NULL) {
82 			if (cdevsw->d_flags & D_DISK) {
83 				tbuf.st_mode &= ~S_IFMT;
84 				tbuf.st_mode |= S_IFBLK;
85 
86 				/* XXX this may not be quite right */
87 				/* Map major number to 0 */
88 				tbuf.st_dev = uminor(buf->st_dev) & 0xf;
89 				tbuf.st_rdev = buf->st_rdev & 0xff;
90 			}
91 			dev_relthread(dev);
92 		}
93 	}
94 
95 }
96 #endif
97 
98 static void
99 translate_fd_major_minor(struct thread *td, int fd, struct stat *buf)
100 {
101 	struct file *fp;
102 	int error;
103 	int major, minor;
104 
105 	if ((error = fget(td, fd, &fp)) != 0)
106 		return;
107 	if (fp->f_vnode) {
108 		if (fp->f_vnode->v_type == VCHR
109 		    || fp->f_vnode->v_type == VBLK) {
110 			if (fp->f_vnode->v_un.vu_cdev) {
111 				if (linux_driver_get_major_minor(
112 				    fp->f_vnode->v_un.vu_cdev->si_name,
113 				    &major, &minor) == 0) {
114 					buf->st_rdev = (major << 8 | minor);
115 				}
116 			}
117 		}
118 	}
119 	fdrop(fp, td);
120 }
121 
122 static void
123 translate_path_major_minor(struct thread *td, char *path, struct stat *buf)
124 {
125 	struct proc *p = td->td_proc;
126 	struct filedesc *fdp = p->p_fd;
127 	struct file *fp;
128 	int fd;
129 	int temp;
130 
131 	temp = td->td_retval[0];
132 	if (kern_open(td, path, UIO_SYSSPACE, O_RDONLY, 0) != 0)
133 		return;
134 	fd = td->td_retval[0];
135 	td->td_retval[0] = temp;
136 	translate_fd_major_minor(td, fd, buf);
137 	FILEDESC_LOCK(fdp);
138 	fp = fdp->fd_ofiles[fd];
139 	FILEDESC_UNLOCK(fdp);
140 	fdclose(fdp, fdp->fd_ofiles[fd], fd, td);
141 }
142 
143 static int
144 newstat_copyout(struct stat *buf, void *ubuf)
145 {
146 	struct l_newstat tbuf;
147 
148 	bzero(&tbuf, sizeof(tbuf));
149 	tbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
150 	tbuf.st_ino = buf->st_ino;
151 	tbuf.st_mode = buf->st_mode;
152 	tbuf.st_nlink = buf->st_nlink;
153 	tbuf.st_uid = buf->st_uid;
154 	tbuf.st_gid = buf->st_gid;
155 	tbuf.st_rdev = buf->st_rdev;
156 	tbuf.st_size = buf->st_size;
157 	tbuf.st_atime = buf->st_atime;
158 	tbuf.st_mtime = buf->st_mtime;
159 	tbuf.st_ctime = buf->st_ctime;
160 	tbuf.st_blksize = buf->st_blksize;
161 	tbuf.st_blocks = buf->st_blocks;
162 
163 	return (copyout(&tbuf, ubuf, sizeof(tbuf)));
164 }
165 
166 int
167 linux_newstat(struct thread *td, struct linux_newstat_args *args)
168 {
169 	struct stat buf;
170 	char *path;
171 	int error;
172 
173 	LCONVPATHEXIST(td, args->path, &path);
174 
175 #ifdef DEBUG
176 	if (ldebug(newstat))
177 		printf(ARGS(newstat, "%s, *"), path);
178 #endif
179 
180 	error = kern_stat(td, path, UIO_SYSSPACE, &buf);
181 	  if (!error && strlen(path) > strlen("/dev/pts/") &&
182 	      !strncmp(path, "/dev/pts/", strlen("/dev/pts/"))
183 	      && path[9] >= '0' && path[9] <= '9') {
184 		  /*
185 		   * Linux checks major and minors of the slave device to make
186 		   * sure it's a pty device, so let's make him believe it is.
187 		   */
188 		  buf.st_rdev = (136 << 8);
189 	  }
190 
191 	translate_path_major_minor(td, path, &buf);
192 
193 	LFREEPATH(path);
194 	if (error)
195 		return (error);
196 	return (newstat_copyout(&buf, args->buf));
197 }
198 
199 int
200 linux_newlstat(struct thread *td, struct linux_newlstat_args *args)
201 {
202 	struct stat sb;
203 	char *path;
204 	int error;
205 
206 	LCONVPATHEXIST(td, args->path, &path);
207 
208 #ifdef DEBUG
209 	if (ldebug(newlstat))
210 		printf(ARGS(newlstat, "%s, *"), path);
211 #endif
212 
213 	error = kern_lstat(td, path, UIO_SYSSPACE, &sb);
214 	translate_path_major_minor(td, path, &sb);
215 	LFREEPATH(path);
216 	if (error)
217 		return (error);
218 	return (newstat_copyout(&sb, args->buf));
219 }
220 
221 int
222 linux_newfstat(struct thread *td, struct linux_newfstat_args *args)
223 {
224 	struct stat buf;
225 	int error;
226 
227 #ifdef DEBUG
228 	if (ldebug(newfstat))
229 		printf(ARGS(newfstat, "%d, *"), args->fd);
230 #endif
231 
232 	error = kern_fstat(td, args->fd, &buf);
233 	translate_fd_major_minor(td, args->fd, &buf);
234 	if (!error)
235 		error = newstat_copyout(&buf, args->buf);
236 
237 	return (error);
238 }
239 
240 static int
241 stat_copyout(struct stat *buf, void *ubuf)
242 {
243 	struct l_stat lbuf;
244 
245 	bzero(&lbuf, sizeof(lbuf));
246 	lbuf.st_dev = buf->st_dev;
247 	lbuf.st_ino = buf->st_ino;
248 	lbuf.st_mode = buf->st_mode;
249 	lbuf.st_nlink = buf->st_nlink;
250 	lbuf.st_uid = buf->st_uid;
251 	lbuf.st_gid = buf->st_gid;
252 	lbuf.st_rdev = buf->st_rdev;
253 	if (buf->st_size < (quad_t)1 << 32)
254 		lbuf.st_size = buf->st_size;
255 	else
256 		lbuf.st_size = -2;
257 	lbuf.st_atime = buf->st_atime;
258 	lbuf.st_mtime = buf->st_mtime;
259 	lbuf.st_ctime = buf->st_ctime;
260 	lbuf.st_blksize = buf->st_blksize;
261 	lbuf.st_blocks = buf->st_blocks;
262 	lbuf.st_flags = buf->st_flags;
263 	lbuf.st_gen = buf->st_gen;
264 
265 	return (copyout(&lbuf, ubuf, sizeof(lbuf)));
266 }
267 
268 int
269 linux_stat(struct thread *td, struct linux_stat_args *args)
270 {
271 	struct stat buf;
272 	int error;
273 #ifdef DEBUG
274 	if (ldebug(stat))
275 	printf(ARGS(stat, "%s, *"), args->path);
276 #endif
277 	error = kern_stat(td, args->path, UIO_SYSSPACE, &buf);
278 	if (error)
279 		return (error);
280 	translate_path_major_minor(td, args->path, &buf);
281 	return(stat_copyout(&buf, args->up));
282 }
283 
284 int
285 linux_lstat(struct thread *td, struct linux_lstat_args *args)
286 {
287 	struct stat buf;
288 	int error;
289 
290 #ifdef DEBUG
291 	if (ldebug(lstat))
292 	printf(ARGS(lstat, "%s, *"), args->path);
293 #endif
294 	error = kern_lstat(td, args->path, UIO_SYSSPACE, &buf);
295 	if (error)
296 		return (error);
297 	translate_path_major_minor(td, args->path, &buf);
298 	return(stat_copyout(&buf, args->up));
299 }
300 
301 /* XXX - All fields of type l_int are defined as l_long on i386 */
302 struct l_statfs {
303 	l_int		f_type;
304 	l_int		f_bsize;
305 	l_int		f_blocks;
306 	l_int		f_bfree;
307 	l_int		f_bavail;
308 	l_int		f_files;
309 	l_int		f_ffree;
310 	l_fsid_t	f_fsid;
311 	l_int		f_namelen;
312 	l_int		f_spare[6];
313 };
314 
315 struct l_statfs64 {
316 	l_int		f_type;
317 	l_int		f_bsize;
318 	uint64_t	f_blocks;
319 	uint64_t	f_bfree;
320 	uint64_t	f_bavail;
321 	uint64_t	f_files;
322 	uint64_t	f_ffree;
323 	l_fsid_t	f_fsid;
324 	l_int		f_namelen;
325 	l_int		f_spare[6];
326 };
327 
328 #define	LINUX_CODA_SUPER_MAGIC	0x73757245L
329 #define	LINUX_EXT2_SUPER_MAGIC	0xEF53L
330 #define	LINUX_HPFS_SUPER_MAGIC	0xf995e849L
331 #define	LINUX_ISOFS_SUPER_MAGIC	0x9660L
332 #define	LINUX_MSDOS_SUPER_MAGIC	0x4d44L
333 #define	LINUX_NCP_SUPER_MAGIC	0x564cL
334 #define	LINUX_NFS_SUPER_MAGIC	0x6969L
335 #define	LINUX_NTFS_SUPER_MAGIC	0x5346544EL
336 #define	LINUX_PROC_SUPER_MAGIC	0x9fa0L
337 #define	LINUX_UFS_SUPER_MAGIC	0x00011954L	/* XXX - UFS_MAGIC in Linux */
338 #define LINUX_DEVFS_SUPER_MAGIC	0x1373L
339 
340 static long
341 bsd_to_linux_ftype(const char *fstypename)
342 {
343 	int i;
344 	static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
345 		{"ufs",     LINUX_UFS_SUPER_MAGIC},
346 		{"cd9660",  LINUX_ISOFS_SUPER_MAGIC},
347 		{"nfs",     LINUX_NFS_SUPER_MAGIC},
348 		{"ext2fs",  LINUX_EXT2_SUPER_MAGIC},
349 		{"procfs",  LINUX_PROC_SUPER_MAGIC},
350 		{"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
351 		{"ntfs",    LINUX_NTFS_SUPER_MAGIC},
352 		{"nwfs",    LINUX_NCP_SUPER_MAGIC},
353 		{"hpfs",    LINUX_HPFS_SUPER_MAGIC},
354 		{"coda",    LINUX_CODA_SUPER_MAGIC},
355 		{"devfs",   LINUX_DEVFS_SUPER_MAGIC},
356 		{NULL,      0L}};
357 
358 	for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
359 		if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
360 			return (b2l_tbl[i].linux_type);
361 
362 	return (0L);
363 }
364 
365 static void
366 bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs)
367 {
368 
369 	linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
370 	linux_statfs->f_bsize = bsd_statfs->f_bsize;
371 	linux_statfs->f_blocks = bsd_statfs->f_blocks;
372 	linux_statfs->f_bfree = bsd_statfs->f_bfree;
373 	linux_statfs->f_bavail = bsd_statfs->f_bavail;
374 	linux_statfs->f_ffree = bsd_statfs->f_ffree;
375 	linux_statfs->f_files = bsd_statfs->f_files;
376 	linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
377 	linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
378 	linux_statfs->f_namelen = MAXNAMLEN;
379 }
380 
381 int
382 linux_statfs(struct thread *td, struct linux_statfs_args *args)
383 {
384 	struct l_statfs linux_statfs;
385 	struct statfs bsd_statfs;
386 	char *path;
387 	int error;
388 
389 	LCONVPATHEXIST(td, args->path, &path);
390 
391 #ifdef DEBUG
392 	if (ldebug(statfs))
393 		printf(ARGS(statfs, "%s, *"), path);
394 #endif
395 	error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
396 	LFREEPATH(path);
397 	if (error)
398 		return (error);
399 	bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
400 	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
401 }
402 
403 static void
404 bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs)
405 {
406 
407 	linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
408 	linux_statfs->f_bsize = bsd_statfs->f_bsize;
409 	linux_statfs->f_blocks = bsd_statfs->f_blocks;
410 	linux_statfs->f_bfree = bsd_statfs->f_bfree;
411 	linux_statfs->f_bavail = bsd_statfs->f_bavail;
412 	linux_statfs->f_ffree = bsd_statfs->f_ffree;
413 	linux_statfs->f_files = bsd_statfs->f_files;
414 	linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
415 	linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
416 	linux_statfs->f_namelen = MAXNAMLEN;
417 }
418 
419 int
420 linux_statfs64(struct thread *td, struct linux_statfs64_args *args)
421 {
422 	struct l_statfs64 linux_statfs;
423 	struct statfs bsd_statfs;
424 	char *path;
425 	int error;
426 
427 	LCONVPATHEXIST(td, args->path, &path);
428 
429 #ifdef DEBUG
430 	if (ldebug(statfs64))
431 		printf(ARGS(statfs64, "%s, *"), path);
432 #endif
433 	error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
434 	LFREEPATH(path);
435 	if (error)
436 		return (error);
437 	bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs);
438 	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
439 }
440 
441 int
442 linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args)
443 {
444 	struct l_statfs linux_statfs;
445 	struct statfs bsd_statfs;
446 	int error;
447 
448 #ifdef DEBUG
449 	if (ldebug(fstatfs))
450 		printf(ARGS(fstatfs, "%d, *"), args->fd);
451 #endif
452 	error = kern_fstatfs(td, args->fd, &bsd_statfs);
453 	if (error)
454 		return error;
455 	bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
456 	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
457 }
458 
459 struct l_ustat
460 {
461 	l_daddr_t	f_tfree;
462 	l_ino_t		f_tinode;
463 	char		f_fname[6];
464 	char		f_fpack[6];
465 };
466 
467 int
468 linux_ustat(struct thread *td, struct linux_ustat_args *args)
469 {
470 #ifdef DEBUG
471 	if (ldebug(ustat))
472 		printf(ARGS(ustat, "%d, *"), args->dev);
473 #endif
474 
475 	return (EOPNOTSUPP);
476 }
477 
478 #if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
479 
480 static int
481 stat64_copyout(struct stat *buf, void *ubuf)
482 {
483 	struct l_stat64 lbuf;
484 
485 	bzero(&lbuf, sizeof(lbuf));
486 	lbuf.st_dev = uminor(buf->st_dev) | (umajor(buf->st_dev) << 8);
487 	lbuf.st_ino = buf->st_ino;
488 	lbuf.st_mode = buf->st_mode;
489 	lbuf.st_nlink = buf->st_nlink;
490 	lbuf.st_uid = buf->st_uid;
491 	lbuf.st_gid = buf->st_gid;
492 	lbuf.st_rdev = buf->st_rdev;
493 	lbuf.st_size = buf->st_size;
494 	lbuf.st_atime = buf->st_atime;
495 	lbuf.st_mtime = buf->st_mtime;
496 	lbuf.st_ctime = buf->st_ctime;
497 	lbuf.st_blksize = buf->st_blksize;
498 	lbuf.st_blocks = buf->st_blocks;
499 
500 	/*
501 	 * The __st_ino field makes all the difference. In the Linux kernel
502 	 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
503 	 * but without the assignment to __st_ino the runtime linker refuses
504 	 * to mmap(2) any shared libraries. I guess it's broken alright :-)
505 	 */
506 	lbuf.__st_ino = buf->st_ino;
507 
508 	return (copyout(&lbuf, ubuf, sizeof(lbuf)));
509 }
510 
511 int
512 linux_stat64(struct thread *td, struct linux_stat64_args *args)
513 {
514 	struct stat buf;
515 	char *filename;
516 	int error;
517 
518 	LCONVPATHEXIST(td, args->filename, &filename);
519 
520 #ifdef DEBUG
521 	if (ldebug(stat64))
522 		printf(ARGS(stat64, "%s, *"), filename);
523 #endif
524 
525 	error = kern_stat(td, filename, UIO_SYSSPACE, &buf);
526 	if (!error && strlen(filename) > strlen("/dev/pts/") &&
527 	    !strncmp(filename, "/dev/pts/", strlen("/dev/pts/"))
528 	    && filename[9] >= '0' && filename[9] <= '9') {
529 		/*
530 		 * Linux checks major and minors of the slave device to make
531 		 * sure it's a pty deivce, so let's make him believe it is.
532 		 */
533 		buf.st_rdev = (136 << 8);
534 	}
535 
536 	translate_path_major_minor(td, filename, &buf);
537 
538 	LFREEPATH(filename);
539 	if (error)
540 		return (error);
541 	return (stat64_copyout(&buf, args->statbuf));
542 }
543 
544 int
545 linux_lstat64(struct thread *td, struct linux_lstat64_args *args)
546 {
547 	struct stat sb;
548 	char *filename;
549 	int error;
550 
551 	LCONVPATHEXIST(td, args->filename, &filename);
552 
553 #ifdef DEBUG
554 	if (ldebug(lstat64))
555 		printf(ARGS(lstat64, "%s, *"), args->filename);
556 #endif
557 
558 	error = kern_lstat(td, filename, UIO_SYSSPACE, &sb);
559 	translate_path_major_minor(td, filename, &sb);
560 	LFREEPATH(filename);
561 	if (error)
562 		return (error);
563 	return (stat64_copyout(&sb, args->statbuf));
564 }
565 
566 int
567 linux_fstat64(struct thread *td, struct linux_fstat64_args *args)
568 {
569 	struct stat buf;
570 	int error;
571 
572 #ifdef DEBUG
573 	if (ldebug(fstat64))
574 		printf(ARGS(fstat64, "%d, *"), args->fd);
575 #endif
576 
577 	error = kern_fstat(td, args->fd, &buf);
578 	translate_fd_major_minor(td, args->fd, &buf);
579 	if (!error)
580 		error = stat64_copyout(&buf, args->statbuf);
581 
582 	return (error);
583 }
584 
585 #endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */
586