Merge branch 'bjorn-cleanups' into release
[linux-2.6] / 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         fput(file);
141 out:
142         return error;
143 }
144
145 int hpux_mount(const char *fs, const char *path, int mflag,
146                 const char *fstype, const char *dataptr, int datalen)
147 {
148         return -ENOSYS;
149 }
150
151 static int cp_hpux_stat(struct kstat *stat, struct hpux_stat64 __user *statbuf)
152 {
153         struct hpux_stat64 tmp;
154
155         /* we probably want a different split here - is hpux 12:20? */
156
157         if (!new_valid_dev(stat->dev) || !new_valid_dev(stat->rdev))
158                 return -EOVERFLOW;
159
160         memset(&tmp, 0, sizeof(tmp));
161         tmp.st_dev = new_encode_dev(stat->dev);
162         tmp.st_ino = stat->ino;
163         tmp.st_mode = stat->mode;
164         tmp.st_nlink = stat->nlink;
165         tmp.st_uid = stat->uid;
166         tmp.st_gid = stat->gid;
167         tmp.st_rdev = new_encode_dev(stat->rdev);
168         tmp.st_size = stat->size;
169         tmp.st_atime = stat->atime.tv_sec;
170         tmp.st_mtime = stat->mtime.tv_sec;
171         tmp.st_ctime = stat->ctime.tv_sec;
172         tmp.st_blocks = stat->blocks;
173         tmp.st_blksize = stat->blksize;
174         return copy_to_user(statbuf,&tmp,sizeof(tmp)) ? -EFAULT : 0;
175 }
176
177 long hpux_stat64(char __user *filename, struct hpux_stat64 __user *statbuf)
178 {
179         struct kstat stat;
180         int error = vfs_stat(filename, &stat);
181
182         if (!error)
183                 error = cp_hpux_stat(&stat, statbuf);
184
185         return error;
186 }
187
188 long hpux_fstat64(unsigned int fd, struct hpux_stat64 __user *statbuf)
189 {
190         struct kstat stat;
191         int error = vfs_fstat(fd, &stat);
192
193         if (!error)
194                 error = cp_hpux_stat(&stat, statbuf);
195
196         return error;
197 }
198
199 long hpux_lstat64(char __user *filename, struct hpux_stat64 __user *statbuf)
200 {
201         struct kstat stat;
202         int error = vfs_lstat(filename, &stat);
203
204         if (!error)
205                 error = cp_hpux_stat(&stat, statbuf);
206
207         return error;
208 }