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/slab.h>
  30 #include <linux/ptrace.h>
  31 #include <asm/errno.h>
  32 #include <asm/uaccess.h>
  33
  34 int hpux_execve(struct pt_regs *regs)
  35 {
  36         int error;
  37         char *filename;
  38
  39         filename = getname((char __user *) regs->gr[26]);
  40         error = PTR_ERR(filename);
  41         if (IS_ERR(filename))
  42                 goto out;
  43
  44         error = do_execve(filename, (char __user * __user *) regs->gr[25],
  45                 (char __user * __user *) regs->gr[24], regs);
  46
  47         if (error == 0) {
  48                 task_lock(current);
  49                 current->ptrace &= ~PT_DTRACE;
  50                 task_unlock(current);
  51         }
  52         putname(filename);
  53
  54 out:
  55         return error;
  56 }
  57
  58 struct hpux_dirent {
  59         loff_t  d_off;
  60         ino_t   d_ino;
  61         short   d_reclen;
  62         short   d_namlen;
  63         char    d_name[1];
  64 };
  65
  66 struct getdents_callback {
  67         struct hpux_dirent __user *current_dir;
  68         struct hpux_dirent __user *previous;
  69         int count;
  70         int error;
  71 };
  72
  73 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
  74
  75 static int filldir(void * __buf, const char * name, int namlen, loff_t offset,
  76                 u64 ino, unsigned d_type)
  77 {
  78         struct hpux_dirent __user * dirent;
  79         struct getdents_callback * buf = (struct getdents_callback *) __buf;
  80         ino_t d_ino;
  81         int reclen = ALIGN(NAME_OFFSET(dirent) + namlen + 1, sizeof(long));
  82
  83         buf->error = -EINVAL;   /* only used if we fail.. */
  84         if (reclen > buf->count)
  85                 return -EINVAL;
  86         d_ino = ino;
  87         if (sizeof(d_ino) < sizeof(ino) && d_ino != ino) {
  88                 buf->error = -EOVERFLOW;
  89                 return -EOVERFLOW;
  90         }
  91         dirent = buf->previous;
  92         if (dirent)
  93                 if (put_user(offset, &dirent->d_off))
  94                         goto Efault;
  95         dirent = buf->current_dir;
  96         if (put_user(d_ino, &dirent->d_ino) ||
  97             put_user(reclen, &dirent->d_reclen) ||
  98             put_user(namlen, &dirent->d_namlen) ||
  99             copy_to_user(dirent->d_name, name, namlen) ||
 100             put_user(0, dirent->d_name + namlen))
 101                 goto Efault;
 102         buf->previous = dirent;
 103         buf->current_dir = (void __user *)dirent + reclen;
 104         buf->count -= reclen;
 105         return 0;
 106 Efault:
 107         buf->error = -EFAULT;
 108         return -EFAULT;
 109 }
 110
 111 #undef NAME_OFFSET
 112
 113 int hpux_getdents(unsigned int fd, struct hpux_dirent __user *dirent, unsigned int count)
 114 {
 115         struct file * file;
 116         struct hpux_dirent __user * lastdirent;
 117         struct getdents_callback buf;
 118         int error = -EBADF;
 119
 120         file = fget(fd);
 121         if (!file)
 122                 goto out;
 123
 124         buf.current_dir = dirent;
 125         buf.previous = NULL;
 126         buf.count = count;
 127         buf.error = 0;
 128
 129         error = vfs_readdir(file, filldir, &buf);
 130         if (error >= 0)
 131                 error = buf.error;
 132         lastdirent = buf.previous;
 133         if (lastdirent) {
 134                 if (put_user(file->f_pos, &lastdirent->d_off))
 135                         error = -EFAULT;
 136                 else
 137                         error = count - buf.count;
 138         }
 139
 140 out_putf:
 141         fput(file);
 142 out:
 143         return error;
 144 }
 145
 146 int hpux_mount(const char *fs, const char *path, int mflag,
 147                 const char *fstype, const char *dataptr, int datalen)
 148 {
 149         return -ENOSYS;
 150 }
 151
 152 static int cp_hpux_stat(struct kstat *stat, struct hpux_stat64 __user *statbuf)
 153 {
 154         struct hpux_stat64 tmp;
 155
 156         /* we probably want a different split here - is hpux 12:20? */
 157
 158         if (!new_valid_dev(stat->dev) || !new_valid_dev(stat->rdev))
 159                 return -EOVERFLOW;
 160
 161         memset(&tmp, 0, sizeof(tmp));
 162         tmp.st_dev = new_encode_dev(stat->dev);
 163         tmp.st_ino = stat->ino;
 164         tmp.st_mode = stat->mode;
 165         tmp.st_nlink = stat->nlink;
 166         tmp.st_uid = stat->uid;
 167         tmp.st_gid = stat->gid;
 168         tmp.st_rdev = new_encode_dev(stat->rdev);
 169         tmp.st_size = stat->size;
 170         tmp.st_atime = stat->atime.tv_sec;
 171         tmp.st_mtime = stat->mtime.tv_sec;
 172         tmp.st_ctime = stat->ctime.tv_sec;
 173         tmp.st_blocks = stat->blocks;
 174         tmp.st_blksize = stat->blksize;
 175         return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
 176 }
 177
 178 long hpux_stat64(char __user *filename, struct hpux_stat64 __user *statbuf)
 179 {
 180         struct kstat stat;
 181         int error = vfs_stat(filename, &stat);
 182
 183         if (!error)
 184                 error = cp_hpux_stat(&stat, statbuf);
 185
 186         return error;
 187 }
 188
 189 long hpux_fstat64(unsigned int fd, struct hpux_stat64 __user *statbuf)
 190 {
 191         struct kstat stat;
 192         int error = vfs_fstat(fd, &stat);
 193
 194         if (!error)
 195                 error = cp_hpux_stat(&stat, statbuf);
 196
 197         return error;
 198 }
 199
 200 long hpux_lstat64(char __user *filename, struct hpux_stat64 __user *statbuf)
 201 {
 202         struct kstat stat;
 203         int error = vfs_lstat(filename, &stat);
 204
 205         if (!error)
 206                 error = cp_hpux_stat(&stat, statbuf);
 207
 208         return error;
 209 }