1 files changed, 610 insertions, 0 deletions

diff --git a/sys/compat/linux/linux_stats.c b/sys/compat/linux/linux_stats.c
new file mode 100644
index 000000000000..479ccf3c955c
--- /dev/null
+++ b/sys/compat/linux/linux_stats.c
@@ -0,0 +1,610 @@
+/*-
+ * Copyright (c) 1994-1995 Søren Schmidt
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer
+ *    in this position and unchanged.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ * 3. The name of the author may not be used to endorse or promote products
+ *    derived from this software without specific prior written permission
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+ * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <sys/cdefs.h>
+__FBSDID("$FreeBSD$");
+
+#include "opt_compat.h"
+#include "opt_mac.h"
+
+#include <sys/param.h>
+#include <sys/dirent.h>
+#include <sys/file.h>
+#include <sys/filedesc.h>
+#include <sys/proc.h>
+#include <sys/malloc.h>
+#include <sys/mount.h>
+#include <sys/namei.h>
+#include <sys/stat.h>
+#include <sys/syscallsubr.h>
+#include <sys/systm.h>
+#include <sys/tty.h>
+#include <sys/vnode.h>
+#include <sys/conf.h>
+#include <sys/fcntl.h>
+
+#ifdef COMPAT_LINUX32
+#include <machine/../linux32/linux.h>
+#include <machine/../linux32/linux32_proto.h>
+#else
+#include <machine/../linux/linux.h>
+#include <machine/../linux/linux_proto.h>
+#endif
+
+#include <compat/linux/linux_util.h>
+#include <compat/linux/linux_file.h>
+
+#include <security/mac/mac_framework.h>
+
+static void
+translate_vnhook_major_minor(struct vnode *vp, struct stat *sb)
+{
+	int major, minor;
+
+	if (vp->v_type == VCHR && vp->v_rdev != NULL &&
+	    linux_driver_get_major_minor(vp->v_rdev->si_name,
+	    &major, &minor) == 0) {
+		sb->st_rdev = (major << 8 | minor);
+	}
+}
+
+static int
+linux_kern_statat(struct thread *td, int flag, int fd, char *path,
+    enum uio_seg pathseg, struct stat *sbp)
+{
+
+	return (kern_statat_vnhook(td, flag, fd, path, pathseg, sbp,
+	    translate_vnhook_major_minor));
+}
+
+static int
+linux_kern_stat(struct thread *td, char *path, enum uio_seg pathseg,
+    struct stat *sbp)
+{
+
+	return (linux_kern_statat(td, 0, AT_FDCWD, path, pathseg, sbp));
+}
+
+static int
+linux_kern_lstat(struct thread *td, char *path, enum uio_seg pathseg,
+    struct stat *sbp)
+{
+
+	return (linux_kern_statat(td, AT_SYMLINK_NOFOLLOW, AT_FDCWD, path,
+	    pathseg, sbp));
+}
+
+/*
+ * XXX: This was removed from newstat_copyout(), and almost identical
+ * XXX: code was in stat64_copyout().  findcdev() needs to be replaced
+ * XXX: with something that does lookup and locking properly.
+ * XXX: When somebody fixes this: please try to avoid duplicating it.
+ */
+#if 0
+static void
+disk_foo(struct somestat *tbuf)
+{
+	struct cdevsw *cdevsw;
+	struct cdev *dev;
+
+	/* Lie about disk drives which are character devices
+	 * in FreeBSD but block devices under Linux.
+	 */
+	if (S_ISCHR(tbuf.st_mode) &&
+	    (dev = findcdev(buf->st_rdev)) != NULL) {
+		cdevsw = dev_refthread(dev);
+		if (cdevsw != NULL) {
+			if (cdevsw->d_flags & D_DISK) {
+				tbuf.st_mode &= ~S_IFMT;
+				tbuf.st_mode |= S_IFBLK;
+
+				/* XXX this may not be quite right */
+				/* Map major number to 0 */
+				tbuf.st_dev = minor(buf->st_dev) & 0xf;
+				tbuf.st_rdev = buf->st_rdev & 0xff;
+			}
+			dev_relthread(dev);
+		}
+	}
+
+}
+#endif
+
+static void
+translate_fd_major_minor(struct thread *td, int fd, struct stat *buf)
+{
+	struct file *fp;
+	struct vnode *vp;
+	int major, minor;
+
+	if ((!S_ISCHR(buf->st_mode) && !S_ISBLK(buf->st_mode)) ||
+	    fget(td, fd, &fp) != 0)
+		return;
+	vp = fp->f_vnode;
+	if (vp != NULL && vp->v_rdev != NULL &&
+	    linux_driver_get_major_minor(vp->v_rdev->si_name,
+					 &major, &minor) == 0) {
+		buf->st_rdev = (major << 8 | minor);
+	} else if (fp->f_type == DTYPE_PTS) {
+		struct tty *tp = fp->f_data;
+
+		/* Convert the numbers for the slave device. */
+		if (linux_driver_get_major_minor(tp->t_dev->si_name,
+					 &major, &minor) == 0) {
+			buf->st_rdev = (major << 8 | minor);
+		}
+	}
+	fdrop(fp, td);
+}
+
+static int
+newstat_copyout(struct stat *buf, void *ubuf)
+{
+	struct l_newstat tbuf;
+
+	bzero(&tbuf, sizeof(tbuf));
+	tbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8);
+	tbuf.st_ino = buf->st_ino;
+	tbuf.st_mode = buf->st_mode;
+	tbuf.st_nlink = buf->st_nlink;
+	tbuf.st_uid = buf->st_uid;
+	tbuf.st_gid = buf->st_gid;
+	tbuf.st_rdev = buf->st_rdev;
+	tbuf.st_size = buf->st_size;
+	tbuf.st_atime = buf->st_atime;
+	tbuf.st_mtime = buf->st_mtime;
+	tbuf.st_ctime = buf->st_ctime;
+	tbuf.st_blksize = buf->st_blksize;
+	tbuf.st_blocks = buf->st_blocks;
+
+	return (copyout(&tbuf, ubuf, sizeof(tbuf)));
+}
+
+int
+linux_newstat(struct thread *td, struct linux_newstat_args *args)
+{
+	struct stat buf;
+	char *path;
+	int error;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(newstat))
+		printf(ARGS(newstat, "%s, *"), path);
+#endif
+
+	error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf);
+	LFREEPATH(path);
+	if (error)
+		return (error);
+	return (newstat_copyout(&buf, args->buf));
+}
+
+int
+linux_newlstat(struct thread *td, struct linux_newlstat_args *args)
+{
+	struct stat sb;
+	char *path;
+	int error;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(newlstat))
+		printf(ARGS(newlstat, "%s, *"), path);
+#endif
+
+	error = linux_kern_lstat(td, path, UIO_SYSSPACE, &sb);
+	LFREEPATH(path);
+	if (error)
+		return (error);
+	return (newstat_copyout(&sb, args->buf));
+}
+
+int
+linux_newfstat(struct thread *td, struct linux_newfstat_args *args)
+{
+	struct stat buf;
+	int error;
+
+#ifdef DEBUG
+	if (ldebug(newfstat))
+		printf(ARGS(newfstat, "%d, *"), args->fd);
+#endif
+
+	error = kern_fstat(td, args->fd, &buf);
+	translate_fd_major_minor(td, args->fd, &buf);
+	if (!error)
+		error = newstat_copyout(&buf, args->buf);
+
+	return (error);
+}
+
+static int
+stat_copyout(struct stat *buf, void *ubuf)
+{
+	struct l_stat lbuf;
+	
+	bzero(&lbuf, sizeof(lbuf));
+	lbuf.st_dev = buf->st_dev;
+	lbuf.st_ino = buf->st_ino;
+	lbuf.st_mode = buf->st_mode;
+	lbuf.st_nlink = buf->st_nlink;
+	lbuf.st_uid = buf->st_uid;
+	lbuf.st_gid = buf->st_gid;
+	lbuf.st_rdev = buf->st_rdev;
+	if (buf->st_size < (quad_t)1 << 32)
+		lbuf.st_size = buf->st_size;
+	else
+		lbuf.st_size = -2;
+	lbuf.st_atime = buf->st_atime;
+	lbuf.st_mtime = buf->st_mtime;
+	lbuf.st_ctime = buf->st_ctime;
+	lbuf.st_blksize = buf->st_blksize;
+	lbuf.st_blocks = buf->st_blocks;
+	lbuf.st_flags = buf->st_flags;
+	lbuf.st_gen = buf->st_gen;
+
+	return (copyout(&lbuf, ubuf, sizeof(lbuf)));
+}
+
+int
+linux_stat(struct thread *td, struct linux_stat_args *args)
+{
+	struct stat buf;
+	char *path;
+	int error;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(stat))
+		printf(ARGS(stat, "%s, *"), path);
+#endif
+	error = linux_kern_stat(td, path, UIO_SYSSPACE, &buf);
+	if (error) {
+		LFREEPATH(path);
+		return (error);
+	}
+	LFREEPATH(path);
+	return(stat_copyout(&buf, args->up));
+}
+
+int
+linux_lstat(struct thread *td, struct linux_lstat_args *args)
+{
+	struct stat buf;
+	char *path;
+	int error;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(lstat))
+		printf(ARGS(lstat, "%s, *"), path);
+#endif
+	error = linux_kern_lstat(td, path, UIO_SYSSPACE, &buf);
+	if (error) {
+		LFREEPATH(path);
+		return (error);
+	}
+	LFREEPATH(path);
+	return(stat_copyout(&buf, args->up));
+}
+
+/* XXX - All fields of type l_int are defined as l_long on i386 */
+struct l_statfs {
+	l_int		f_type;
+	l_int		f_bsize;
+	l_int		f_blocks;
+	l_int		f_bfree;
+	l_int		f_bavail;
+	l_int		f_files;
+	l_int		f_ffree;
+	l_fsid_t	f_fsid;
+	l_int		f_namelen;
+	l_int		f_spare[6];
+};
+
+#define	LINUX_CODA_SUPER_MAGIC	0x73757245L
+#define	LINUX_EXT2_SUPER_MAGIC	0xEF53L
+#define	LINUX_HPFS_SUPER_MAGIC	0xf995e849L
+#define	LINUX_ISOFS_SUPER_MAGIC	0x9660L
+#define	LINUX_MSDOS_SUPER_MAGIC	0x4d44L
+#define	LINUX_NCP_SUPER_MAGIC	0x564cL
+#define	LINUX_NFS_SUPER_MAGIC	0x6969L
+#define	LINUX_NTFS_SUPER_MAGIC	0x5346544EL
+#define	LINUX_PROC_SUPER_MAGIC	0x9fa0L
+#define	LINUX_UFS_SUPER_MAGIC	0x00011954L	/* XXX - UFS_MAGIC in Linux */
+#define LINUX_DEVFS_SUPER_MAGIC	0x1373L
+
+static long
+bsd_to_linux_ftype(const char *fstypename)
+{
+	int i;
+	static struct {const char *bsd_name; long linux_type;} b2l_tbl[] = {
+		{"ufs",     LINUX_UFS_SUPER_MAGIC},
+		{"cd9660",  LINUX_ISOFS_SUPER_MAGIC},
+		{"nfs",     LINUX_NFS_SUPER_MAGIC},
+		{"ext2fs",  LINUX_EXT2_SUPER_MAGIC},
+		{"procfs",  LINUX_PROC_SUPER_MAGIC},
+		{"msdosfs", LINUX_MSDOS_SUPER_MAGIC},
+		{"ntfs",    LINUX_NTFS_SUPER_MAGIC},
+		{"nwfs",    LINUX_NCP_SUPER_MAGIC},
+		{"hpfs",    LINUX_HPFS_SUPER_MAGIC},
+		{"coda",    LINUX_CODA_SUPER_MAGIC},
+		{"devfs",   LINUX_DEVFS_SUPER_MAGIC},
+		{NULL,      0L}};
+
+	for (i = 0; b2l_tbl[i].bsd_name != NULL; i++)
+		if (strcmp(b2l_tbl[i].bsd_name, fstypename) == 0)
+			return (b2l_tbl[i].linux_type);
+
+	return (0L);
+}
+
+static void
+bsd_to_linux_statfs(struct statfs *bsd_statfs, struct l_statfs *linux_statfs)
+{
+
+	linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
+	linux_statfs->f_bsize = bsd_statfs->f_bsize;
+	linux_statfs->f_blocks = bsd_statfs->f_blocks;
+	linux_statfs->f_bfree = bsd_statfs->f_bfree;
+	linux_statfs->f_bavail = bsd_statfs->f_bavail;
+	linux_statfs->f_ffree = bsd_statfs->f_ffree;
+	linux_statfs->f_files = bsd_statfs->f_files;
+	linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
+	linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
+	linux_statfs->f_namelen = MAXNAMLEN;
+}
+
+int
+linux_statfs(struct thread *td, struct linux_statfs_args *args)
+{
+	struct l_statfs linux_statfs;
+	struct statfs bsd_statfs;
+	char *path;
+	int error;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(statfs))
+		printf(ARGS(statfs, "%s, *"), path);
+#endif
+	error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
+	LFREEPATH(path);
+	if (error)
+		return (error);
+	bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
+	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
+}
+
+static void
+bsd_to_linux_statfs64(struct statfs *bsd_statfs, struct l_statfs64 *linux_statfs)
+{
+
+	linux_statfs->f_type = bsd_to_linux_ftype(bsd_statfs->f_fstypename);
+	linux_statfs->f_bsize = bsd_statfs->f_bsize;
+	linux_statfs->f_blocks = bsd_statfs->f_blocks;
+	linux_statfs->f_bfree = bsd_statfs->f_bfree;
+	linux_statfs->f_bavail = bsd_statfs->f_bavail;
+	linux_statfs->f_ffree = bsd_statfs->f_ffree;
+	linux_statfs->f_files = bsd_statfs->f_files;
+	linux_statfs->f_fsid.val[0] = bsd_statfs->f_fsid.val[0];
+	linux_statfs->f_fsid.val[1] = bsd_statfs->f_fsid.val[1];
+	linux_statfs->f_namelen = MAXNAMLEN;
+}
+
+int
+linux_statfs64(struct thread *td, struct linux_statfs64_args *args)
+{
+	struct l_statfs64 linux_statfs;
+	struct statfs bsd_statfs;
+	char *path;
+	int error;
+
+	if (args->bufsize != sizeof(struct l_statfs64))
+		return EINVAL;
+
+	LCONVPATHEXIST(td, args->path, &path);
+
+#ifdef DEBUG
+	if (ldebug(statfs64))
+		printf(ARGS(statfs64, "%s, *"), path);
+#endif
+	error = kern_statfs(td, path, UIO_SYSSPACE, &bsd_statfs);
+	LFREEPATH(path);
+	if (error)
+		return (error);
+	bsd_to_linux_statfs64(&bsd_statfs, &linux_statfs);
+	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
+}
+
+int
+linux_fstatfs(struct thread *td, struct linux_fstatfs_args *args)
+{
+	struct l_statfs linux_statfs;
+	struct statfs bsd_statfs;
+	int error;
+
+#ifdef DEBUG
+	if (ldebug(fstatfs))
+		printf(ARGS(fstatfs, "%d, *"), args->fd);
+#endif
+	error = kern_fstatfs(td, args->fd, &bsd_statfs);
+	if (error)
+		return error;
+	bsd_to_linux_statfs(&bsd_statfs, &linux_statfs);
+	return copyout(&linux_statfs, args->buf, sizeof(linux_statfs));
+}
+
+struct l_ustat
+{
+	l_daddr_t	f_tfree;
+	l_ino_t		f_tinode;
+	char		f_fname[6];
+	char		f_fpack[6];
+};
+
+int
+linux_ustat(struct thread *td, struct linux_ustat_args *args)
+{
+#ifdef DEBUG
+	if (ldebug(ustat))
+		printf(ARGS(ustat, "%d, *"), args->dev);
+#endif
+
+	return (EOPNOTSUPP);
+}
+
+#if defined(__i386__) || (defined(__amd64__) && defined(COMPAT_LINUX32))
+
+static int
+stat64_copyout(struct stat *buf, void *ubuf)
+{
+	struct l_stat64 lbuf;
+
+	bzero(&lbuf, sizeof(lbuf));
+	lbuf.st_dev = minor(buf->st_dev) | (major(buf->st_dev) << 8);
+	lbuf.st_ino = buf->st_ino;
+	lbuf.st_mode = buf->st_mode;
+	lbuf.st_nlink = buf->st_nlink;
+	lbuf.st_uid = buf->st_uid;
+	lbuf.st_gid = buf->st_gid;
+	lbuf.st_rdev = buf->st_rdev;
+	lbuf.st_size = buf->st_size;
+	lbuf.st_atime = buf->st_atime;
+	lbuf.st_mtime = buf->st_mtime;
+	lbuf.st_ctime = buf->st_ctime;
+	lbuf.st_blksize = buf->st_blksize;
+	lbuf.st_blocks = buf->st_blocks;
+
+	/*
+	 * The __st_ino field makes all the difference. In the Linux kernel
+	 * it is conditionally compiled based on STAT64_HAS_BROKEN_ST_INO,
+	 * but without the assignment to __st_ino the runtime linker refuses
+	 * to mmap(2) any shared libraries. I guess it's broken alright :-)
+	 */
+	lbuf.__st_ino = buf->st_ino;
+
+	return (copyout(&lbuf, ubuf, sizeof(lbuf)));
+}
+
+int
+linux_stat64(struct thread *td, struct linux_stat64_args *args)
+{
+	struct stat buf;
+	char *filename;
+	int error;
+
+	LCONVPATHEXIST(td, args->filename, &filename);
+
+#ifdef DEBUG
+	if (ldebug(stat64))
+		printf(ARGS(stat64, "%s, *"), filename);
+#endif
+
+	error = linux_kern_stat(td, filename, UIO_SYSSPACE, &buf);
+	LFREEPATH(filename);
+	if (error)
+		return (error);
+	return (stat64_copyout(&buf, args->statbuf));
+}
+
+int
+linux_lstat64(struct thread *td, struct linux_lstat64_args *args)
+{
+	struct stat sb;
+	char *filename;
+	int error;
+
+	LCONVPATHEXIST(td, args->filename, &filename);
+
+#ifdef DEBUG
+	if (ldebug(lstat64))
+		printf(ARGS(lstat64, "%s, *"), args->filename);
+#endif
+
+	error = linux_kern_lstat(td, filename, UIO_SYSSPACE, &sb);
+	LFREEPATH(filename);
+	if (error)
+		return (error);
+	return (stat64_copyout(&sb, args->statbuf));
+}
+
+int
+linux_fstat64(struct thread *td, struct linux_fstat64_args *args)
+{
+	struct stat buf;
+	int error;
+
+#ifdef DEBUG
+	if (ldebug(fstat64))
+		printf(ARGS(fstat64, "%d, *"), args->fd);
+#endif
+
+	error = kern_fstat(td, args->fd, &buf);
+	translate_fd_major_minor(td, args->fd, &buf);
+	if (!error)
+		error = stat64_copyout(&buf, args->statbuf);
+
+	return (error);
+}
+
+int
+linux_fstatat64(struct thread *td, struct linux_fstatat64_args *args)
+{
+	char *path;
+	int error, dfd, flag;
+	struct stat buf;
+
+	if (args->flag & ~LINUX_AT_SYMLINK_NOFOLLOW)
+		return (EINVAL);
+	flag = (args->flag & LINUX_AT_SYMLINK_NOFOLLOW) ?
+	    AT_SYMLINK_NOFOLLOW : 0;
+
+	dfd = (args->dfd == LINUX_AT_FDCWD) ? AT_FDCWD : args->dfd;
+	LCONVPATHEXIST_AT(td, args->pathname, &path, dfd);
+
+#ifdef DEBUG
+	if (ldebug(fstatat64))
+		printf(ARGS(fstatat64, "%i, %s, %i"), args->dfd, path, args->flag);
+#endif
+
+	error = linux_kern_statat(td, flag, dfd, path, UIO_SYSSPACE, &buf);
+	if (!error)
+		error = stat64_copyout(&buf, args->statbuf);
+	LFREEPATH(path);
+
+	return (error);
+}
+
+#endif /* __i386__ || (__amd64__ && COMPAT_LINUX32) */