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