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