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