/*
       *  linux/fs/stat.c
       *
       *  Copyright (C) 1991, 1992  Linus Torvalds
       */
      
      #include <linux/mm.h>
      #include <linux/errno.h>
      #include <linux/file.h>
      #include <linux/smp_lock.h>
      #include <linux/highuid.h>
      
      #include <asm/uaccess.h>
      
      /*
       * Revalidate the inode. This is required for proper NFS attribute caching.
       */
      static __inline__ int
  19  do_revalidate(struct dentry *dentry)
      {
      	struct inode * inode = dentry->d_inode;
  22  	if (inode->i_op && inode->i_op->revalidate)
  23  		return inode->i_op->revalidate(dentry);
  24  	return 0;
      }
      
      
      #if !defined(__alpha__) && !defined(__sparc__) && !defined(__ia64__) && !defined(__s390__) && !defined(__hppa__)
      
      /*
       * For backward compatibility?  Maybe this should be moved
       * into arch/i386 instead?
       */
  34  static int cp_old_stat(struct inode * inode, struct __old_kernel_stat * statbuf)
      {
      	static int warncount = 5;
      	struct __old_kernel_stat tmp;
      
  39  	if (warncount > 0) {
      		warncount--;
      		printk("VFS: Warning: %s using old stat() call. Recompile your binary.\n",
      			current->comm);
  43  	} else if (warncount < 0) {
      		/* it's laughable, but... */
      		warncount = 0;
      	}
      
      	tmp.st_dev = kdev_t_to_nr(inode->i_dev);
      	tmp.st_ino = inode->i_ino;
      	tmp.st_mode = inode->i_mode;
      	tmp.st_nlink = inode->i_nlink;
      	SET_OLDSTAT_UID(tmp, inode->i_uid);
      	SET_OLDSTAT_GID(tmp, inode->i_gid);
      	tmp.st_rdev = kdev_t_to_nr(inode->i_rdev);
      #if BITS_PER_LONG == 32
  56  	if (inode->i_size > 0x7fffffff)
  57  		return -EOVERFLOW;
      #endif	
      	tmp.st_size = inode->i_size;
      	tmp.st_atime = inode->i_atime;
      	tmp.st_mtime = inode->i_mtime;
      	tmp.st_ctime = inode->i_ctime;
  63  	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
      }
      
      #endif
      
  68  static int cp_new_stat(struct inode * inode, struct stat * statbuf)
      {
      	struct stat tmp;
      	unsigned int blocks, indirect;
      
      	memset(&tmp, 0, sizeof(tmp));
      	tmp.st_dev = kdev_t_to_nr(inode->i_dev);
      	tmp.st_ino = inode->i_ino;
      	tmp.st_mode = inode->i_mode;
      	tmp.st_nlink = inode->i_nlink;
      	SET_STAT_UID(tmp, inode->i_uid);
      	SET_STAT_GID(tmp, inode->i_gid);
      	tmp.st_rdev = kdev_t_to_nr(inode->i_rdev);
      #if BITS_PER_LONG == 32
  82  	if (inode->i_size > 0x7fffffff)
  83  		return -EOVERFLOW;
      #endif	
      	tmp.st_size = inode->i_size;
      	tmp.st_atime = inode->i_atime;
      	tmp.st_mtime = inode->i_mtime;
      	tmp.st_ctime = inode->i_ctime;
      /*
       * st_blocks and st_blksize are approximated with a simple algorithm if
       * they aren't supported directly by the filesystem. The minix and msdos
       * filesystems don't keep track of blocks, so they would either have to
       * be counted explicitly (by delving into the file itself), or by using
       * this simple algorithm to get a reasonable (although not 100% accurate)
       * value.
       */
      
      /*
       * Use minix fs values for the number of direct and indirect blocks.  The
       * count is now exact for the minix fs except that it counts zero blocks.
       * Everything is in units of BLOCK_SIZE until the assignment to
       * tmp.st_blksize.
       */
      #define D_B   7
      #define I_B   (BLOCK_SIZE / sizeof(unsigned short))
      
 107  	if (!inode->i_blksize) {
      		blocks = (tmp.st_size + BLOCK_SIZE - 1) / BLOCK_SIZE;
 109  		if (blocks > D_B) {
      			indirect = (blocks - D_B + I_B - 1) / I_B;
      			blocks += indirect;
 112  			if (indirect > 1) {
      				indirect = (indirect - 1 + I_B - 1) / I_B;
      				blocks += indirect;
 115  				if (indirect > 1)
      					blocks++;
      			}
      		}
      		tmp.st_blocks = (BLOCK_SIZE / 512) * blocks;
      		tmp.st_blksize = BLOCK_SIZE;
 121  	} else {
      		tmp.st_blocks = inode->i_blocks;
      		tmp.st_blksize = inode->i_blksize;
      	}
 125  	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
      }
      
      
      #if !defined(__alpha__) && !defined(__sparc__) && !defined(__ia64__) && !defined(__s390__) && !defined(__hppa__)
      /*
       * For backward compatibility?  Maybe this should be moved
       * into arch/i386 instead?
       */
 134  asmlinkage long sys_stat(char * filename, struct __old_kernel_stat * statbuf)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk(filename, &nd);
 140  	if (!error) {
      		error = do_revalidate(nd.dentry);
 142  		if (!error)
      			error = cp_old_stat(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 146  	return error;
      }
      #endif
      
 150  asmlinkage long sys_newstat(char * filename, struct stat * statbuf)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk(filename, &nd);
 156  	if (!error) {
      		error = do_revalidate(nd.dentry);
 158  		if (!error)
      			error = cp_new_stat(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 162  	return error;
      }
      
      #if !defined(__alpha__) && !defined(__sparc__) && !defined(__ia64__) && !defined(__s390__) && !defined(__hppa__)
      
      /*
       * For backward compatibility?  Maybe this should be moved
       * into arch/i386 instead?
       */
 171  asmlinkage long sys_lstat(char * filename, struct __old_kernel_stat * statbuf)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk_link(filename, &nd);
 177  	if (!error) {
      		error = do_revalidate(nd.dentry);
 179  		if (!error)
      			error = cp_old_stat(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 183  	return error;
      }
      
      #endif
      
 188  asmlinkage long sys_newlstat(char * filename, struct stat * statbuf)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk_link(filename, &nd);
 194  	if (!error) {
      		error = do_revalidate(nd.dentry);
 196  		if (!error)
      			error = cp_new_stat(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 200  	return error;
      }
      
      #if !defined(__alpha__) && !defined(__sparc__) && !defined(__ia64__) && !defined(__s390__) && !defined(__hppa__)
      
      /*
       * For backward compatibility?  Maybe this should be moved
       * into arch/i386 instead?
       */
 209  asmlinkage long sys_fstat(unsigned int fd, struct __old_kernel_stat * statbuf)
      {
      	struct file * f;
      	int err = -EBADF;
      
      	f = fget(fd);
 215  	if (f) {
      		struct dentry * dentry = f->f_dentry;
      
      		err = do_revalidate(dentry);
 219  		if (!err)
      			err = cp_old_stat(dentry->d_inode, statbuf);
      		fput(f);
      	}
 223  	return err;
      }
      
      #endif
      
 228  asmlinkage long sys_newfstat(unsigned int fd, struct stat * statbuf)
      {
      	struct file * f;
      	int err = -EBADF;
      
      	f = fget(fd);
 234  	if (f) {
      		struct dentry * dentry = f->f_dentry;
      
      		err = do_revalidate(dentry);
 238  		if (!err)
      			err = cp_new_stat(dentry->d_inode, statbuf);
      		fput(f);
      	}
 242  	return err;
      }
      
 245  asmlinkage long sys_readlink(const char * path, char * buf, int bufsiz)
      {
      	struct nameidata nd;
      	int error;
      
 250  	if (bufsiz <= 0)
 251  		return -EINVAL;
      
      	error = user_path_walk_link(path, &nd);
 254  	if (!error) {
      		struct inode * inode = nd.dentry->d_inode;
      
      		error = -EINVAL;
      		if (inode->i_op && inode->i_op->readlink &&
 259  		    !(error = do_revalidate(nd.dentry))) {
      			UPDATE_ATIME(inode);
      			error = inode->i_op->readlink(nd.dentry, buf, bufsiz);
      		}
      		path_release(&nd);
      	}
 265  	return error;
      }
      
      
      /* ---------- LFS-64 ----------- */
      #if !defined(__alpha__) && !defined (__ia64__) && !defined(__mips64)
      
 272  static long cp_new_stat64(struct inode * inode, struct stat64 * statbuf)
      {
      	struct stat64 tmp;
      	unsigned int blocks, indirect;
      
      	memset(&tmp, 0, sizeof(tmp));
      	tmp.st_dev = kdev_t_to_nr(inode->i_dev);
      	tmp.st_ino = inode->i_ino;
      #ifdef STAT64_HAS_BROKEN_ST_INO
      	tmp.__st_ino = inode->i_ino;
      #endif
      	tmp.st_mode = inode->i_mode;
      	tmp.st_nlink = inode->i_nlink;
      	tmp.st_uid = inode->i_uid;
      	tmp.st_gid = inode->i_gid;
      	tmp.st_rdev = kdev_t_to_nr(inode->i_rdev);
      	tmp.st_atime = inode->i_atime;
      	tmp.st_mtime = inode->i_mtime;
      	tmp.st_ctime = inode->i_ctime;
      	tmp.st_size = inode->i_size;
      /*
       * st_blocks and st_blksize are approximated with a simple algorithm if
       * they aren't supported directly by the filesystem. The minix and msdos
       * filesystems don't keep track of blocks, so they would either have to
       * be counted explicitly (by delving into the file itself), or by using
       * this simple algorithm to get a reasonable (although not 100% accurate)
       * value.
       */
      
      /*
       * Use minix fs values for the number of direct and indirect blocks.  The
       * count is now exact for the minix fs except that it counts zero blocks.
       * Everything is in units of BLOCK_SIZE until the assignment to
       * tmp.st_blksize.
       */
      #define D_B   7
      #define I_B   (BLOCK_SIZE / sizeof(unsigned short))
      
 310  	if (!inode->i_blksize) {
      		blocks = (tmp.st_size + BLOCK_SIZE - 1) >> BLOCK_SIZE_BITS;
 312  		if (blocks > D_B) {
      			indirect = (blocks - D_B + I_B - 1) / I_B;
      			blocks += indirect;
 315  			if (indirect > 1) {
      				indirect = (indirect - 1 + I_B - 1) / I_B;
      				blocks += indirect;
 318  				if (indirect > 1)
      					blocks++;
      			}
      		}
      		tmp.st_blocks = (BLOCK_SIZE / 512) * blocks;
      		tmp.st_blksize = BLOCK_SIZE;
 324  	} else {
      		tmp.st_blocks = inode->i_blocks;
      		tmp.st_blksize = inode->i_blksize;
      	}
 328  	return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
      }
      
 331  asmlinkage long sys_stat64(char * filename, struct stat64 * statbuf, long flags)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk(filename, &nd);
 337  	if (!error) {
      		error = do_revalidate(nd.dentry);
 339  		if (!error)
      			error = cp_new_stat64(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 343  	return error;
      }
      
 346  asmlinkage long sys_lstat64(char * filename, struct stat64 * statbuf, long flags)
      {
      	struct nameidata nd;
      	int error;
      
      	error = user_path_walk_link(filename, &nd);
 352  	if (!error) {
      		error = do_revalidate(nd.dentry);
 354  		if (!error)
      			error = cp_new_stat64(nd.dentry->d_inode, statbuf);
      		path_release(&nd);
      	}
 358  	return error;
      }
      
 361  asmlinkage long sys_fstat64(unsigned long fd, struct stat64 * statbuf, long flags)
      {
      	struct file * f;
      	int err = -EBADF;
      
      	f = fget(fd);
 367  	if (f) {
      		struct dentry * dentry = f->f_dentry;
      
      		err = do_revalidate(dentry);
 371  		if (!err)
      			err = cp_new_stat64(dentry->d_inode, statbuf);
      		fput(f);
      	}
 375  	return err;
      }
      
      #endif /* LFS-64 */