arch/parisc/hpux/fs.c

   1 /*
   2  *    Implements HPUX syscalls.
   3  *
   4  *    Copyright (C) 1999 Matthew Wilcox <willy with parisc-linux.org>
   5  *    Copyright (C) 2000 Michael Ang <mang with subcarrier.org>
   6  *    Copyright (C) 2000 John Marvin <jsm with parisc-linux.org>
   7  *    Copyright (C) 2000 Philipp Rumpf
   8  *
   9  *    This program is free software; you can redistribute it and/or modify
  10  *    it under the terms of the GNU General Public License as published by
  11  *    the Free Software Foundation; either version 2 of the License, or
  12  *    (at your option) any later version.
  13  *
  14  *    This program is distributed in the hope that it will be useful,
  15  *    but WITHOUT ANY WARRANTY; without even the implied warranty of
  16  *    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  17  *    GNU General Public License for more details.
  18  *
  19  *    You should have received a copy of the GNU General Public License
  20  *    along with this program; if not, write to the Free Software
  21  *    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  22  */
  23
  24 #include <linux/kernel.h>
  25 #include <linux/mm.h>
  26 #include <linux/fs.h>
  27 #include <linux/sched.h>
  28 #include <linux/file.h>
  29 #include <linux/ptrace.h>
  30 #include <linux/slab.h>
  31 #include <asm/errno.h>
  32 #include <asm/uaccess.h>
  33
  34 int hpux_execve(struct pt_regs *regs)
  35 {
  36         return  do_execve(getname((const char __user *) regs->gr[26]),
  37                           (const char __user *const __user *) regs->gr[25],
  38                           (const char __user *const __user *) regs->gr[24]);
  39 }
  40
  41 struct hpux_dirent {
  42         loff_t  d_off;
  43         ino_t   d_ino;
  44         short   d_reclen;
  45         short   d_namlen;
  46         char    d_name[1];
  47 };
  48
  49 struct getdents_callback {
  50         struct dir_context ctx;
  51         struct hpux_dirent __user *current_dir;
  52         struct hpux_dirent __user *previous;
  53         int count;
  54         int error;
  55 };
  56
  57 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
  58
  59 static int filldir(struct dir_context *ctx, const char *name, int namlen,
  60                    loff_t offset, u64 ino, unsigned d_type)
  61 {
  62         struct hpux_dirent __user * dirent;
  63         struct getdents_callback *buf =
  64                 container_of(ctx, struct getdents_callback, ctx);
  65         ino_t d_ino;
  66         int reclen = ALIGN(NAME_OFFSET(dirent) + namlen + 1, sizeof(long));
  67
  68         buf->error = -EINVAL;   /* only used if we fail.. */
  69         if (reclen > buf->count)
  70                 return -EINVAL;
  71         d_ino = ino;
  72         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
  73                 buf->error = -EOVERFLOW;
  74                 return -EOVERFLOW;
  75         }
  76         dirent = buf->previous;
  77         if (dirent)
  78                 if (put_user(offset, &dirent->d_off))
  79                         goto Efault;
  80         dirent = buf->current_dir;
  81         if (put_user(d_ino, &dirent->d_ino) ||
  82             put_user(reclen, &dirent->d_reclen) ||
  83             put_user(namlen, &dirent->d_namlen) ||
  84             copy_to_user(dirent->d_name, name, namlen) ||
  85             put_user(0, dirent->d_name + namlen))
  86                 goto Efault;
  87         buf->previous = dirent;
  88         buf->current_dir = (void __user *)dirent + reclen;
  89         buf->count -= reclen;
  90         return 0;
  91 Efault:
  92         buf->error = -EFAULT;
  93         return -EFAULT;
  94 }
  95
  96 #undef NAME_OFFSET
  97
  98 int hpux_getdents(unsigned int fd, struct hpux_dirent __user *dirent, unsigned int count)
  99 {
 100         struct fd arg;
 101         struct hpux_dirent __user * lastdirent;
 102         struct getdents_callback buf = {
 103                 .ctx.actor = filldir,
 104                 .current_dir = dirent,
 105                 .count = count
 106         };
 107         int error;
 108
 109         arg = fdget(fd);
 110         if (!arg.file)
 111                 return -EBADF;
 112
 113         error = iterate_dir(arg.file, &buf.ctx);
 114         if (error >= 0)
 115                 error = buf.error;
 116         lastdirent = buf.previous;
 117         if (lastdirent) {
 118                 if (put_user(buf.ctx.pos, &lastdirent->d_off))
 119                         error = -EFAULT;
 120                 else
 121                         error = count - buf.count;
 122         }
 123
 124         fdput(arg);
 125         return error;
 126 }
 127
 128 int hpux_mount(const char *fs, const char *path, int mflag,
 129                 const char *fstype, const char *dataptr, int datalen)
 130 {
 131         return -ENOSYS;
 132 }
 133
 134 static int cp_hpux_stat(struct kstat *stat, struct hpux_stat64 __user *statbuf)
 135 {
 136         struct hpux_stat64 tmp;
 137
 138         /* we probably want a different split here - is hpux 12:20? */
 139
 140         if (!new_valid_dev(stat->dev) || !new_valid_dev(stat->rdev))
 141                 return -EOVERFLOW;
 142
 143         memset(&tmp, 0, sizeof(tmp));
 144         tmp.st_dev = new_encode_dev(stat->dev);
 145         tmp.st_ino = stat->ino;
 146         tmp.st_mode = stat->mode;
 147         tmp.st_nlink = stat->nlink;
 148         tmp.st_uid = from_kuid_munged(current_user_ns(), stat->uid);
 149         tmp.st_gid = from_kgid_munged(current_user_ns(), stat->gid);
 150         tmp.st_rdev = new_encode_dev(stat->rdev);
 151         tmp.st_size = stat->size;
 152         tmp.st_atime = stat->atime.tv_sec;
 153         tmp.st_mtime = stat->mtime.tv_sec;
 154         tmp.st_ctime = stat->ctime.tv_sec;
 155         tmp.st_blocks = stat->blocks;
 156         tmp.st_blksize = stat->blksize;
 157         return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
 158 }
 159
 160 long hpux_stat64(const char __user *filename, struct hpux_stat64 __user *statbuf)
 161 {
 162         struct kstat stat;
 163         int error = vfs_stat(filename, &stat);
 164
 165         if (!error)
 166                 error = cp_hpux_stat(&stat, statbuf);
 167
 168         return error;
 169 }
 170
 171 long hpux_fstat64(unsigned int fd, struct hpux_stat64 __user *statbuf)
 172 {
 173         struct kstat stat;
 174         int error = vfs_fstat(fd, &stat);
 175
 176         if (!error)
 177                 error = cp_hpux_stat(&stat, statbuf);
 178
 179         return error;
 180 }
 181
 182 long hpux_lstat64(const char __user *filename,
 183                   struct hpux_stat64 __user *statbuf)
 184 {
 185         struct kstat stat;
 186         int error = vfs_lstat(filename, &stat);
 187
 188         if (!error)
 189                 error = cp_hpux_stat(&stat, statbuf);
 190
 191         return error;
 192 }