Linux-2.6.12-rc2
[linux-2.6.git] / fs / compat.c
1 /*
2  *  linux/fs/compat.c
3  *
4  *  Kernel compatibililty routines for e.g. 32 bit syscall support
5  *  on 64 bit kernels.
6  *
7  *  Copyright (C) 2002       Stephen Rothwell, IBM Corporation
8  *  Copyright (C) 1997-2000  Jakub Jelinek  (jakub@redhat.com)
9  *  Copyright (C) 1998       Eddie C. Dost  (ecd@skynet.be)
10  *  Copyright (C) 2001,2002  Andi Kleen, SuSE Labs 
11  *  Copyright (C) 2003       Pavel Machek (pavel@suse.cz)
12  *
13  *  This program is free software; you can redistribute it and/or modify
14  *  it under the terms of the GNU General Public License version 2 as
15  *  published by the Free Software Foundation.
16  */
17
18 #include <linux/linkage.h>
19 #include <linux/compat.h>
20 #include <linux/errno.h>
21 #include <linux/time.h>
22 #include <linux/fs.h>
23 #include <linux/fcntl.h>
24 #include <linux/namei.h>
25 #include <linux/file.h>
26 #include <linux/vfs.h>
27 #include <linux/ioctl32.h>
28 #include <linux/ioctl.h>
29 #include <linux/init.h>
30 #include <linux/sockios.h>      /* for SIOCDEVPRIVATE */
31 #include <linux/smb.h>
32 #include <linux/smb_mount.h>
33 #include <linux/ncp_mount.h>
34 #include <linux/smp_lock.h>
35 #include <linux/syscalls.h>
36 #include <linux/ctype.h>
37 #include <linux/module.h>
38 #include <linux/dirent.h>
39 #include <linux/dnotify.h>
40 #include <linux/highuid.h>
41 #include <linux/sunrpc/svc.h>
42 #include <linux/nfsd/nfsd.h>
43 #include <linux/nfsd/syscall.h>
44 #include <linux/personality.h>
45 #include <linux/rwsem.h>
46
47 #include <net/sock.h>           /* siocdevprivate_ioctl */
48
49 #include <asm/uaccess.h>
50 #include <asm/mmu_context.h>
51 #include <asm/ioctls.h>
52
53 /*
54  * Not all architectures have sys_utime, so implement this in terms
55  * of sys_utimes.
56  */
57 asmlinkage long compat_sys_utime(char __user *filename, struct compat_utimbuf __user *t)
58 {
59         struct timeval tv[2];
60
61         if (t) {
62                 if (get_user(tv[0].tv_sec, &t->actime) ||
63                     get_user(tv[1].tv_sec, &t->modtime))
64                         return -EFAULT;
65                 tv[0].tv_usec = 0;
66                 tv[1].tv_usec = 0;
67         }
68         return do_utimes(filename, t ? tv : NULL);
69 }
70
71 asmlinkage long compat_sys_utimes(char __user *filename, struct compat_timeval __user *t)
72 {
73         struct timeval tv[2];
74
75         if (t) { 
76                 if (get_user(tv[0].tv_sec, &t[0].tv_sec) ||
77                     get_user(tv[0].tv_usec, &t[0].tv_usec) ||
78                     get_user(tv[1].tv_sec, &t[1].tv_sec) ||
79                     get_user(tv[1].tv_usec, &t[1].tv_usec))
80                         return -EFAULT; 
81         } 
82         return do_utimes(filename, t ? tv : NULL);
83 }
84
85 asmlinkage long compat_sys_newstat(char __user * filename,
86                 struct compat_stat __user *statbuf)
87 {
88         struct kstat stat;
89         int error = vfs_stat(filename, &stat);
90
91         if (!error)
92                 error = cp_compat_stat(&stat, statbuf);
93         return error;
94 }
95
96 asmlinkage long compat_sys_newlstat(char __user * filename,
97                 struct compat_stat __user *statbuf)
98 {
99         struct kstat stat;
100         int error = vfs_lstat(filename, &stat);
101
102         if (!error)
103                 error = cp_compat_stat(&stat, statbuf);
104         return error;
105 }
106
107 asmlinkage long compat_sys_newfstat(unsigned int fd,
108                 struct compat_stat __user * statbuf)
109 {
110         struct kstat stat;
111         int error = vfs_fstat(fd, &stat);
112
113         if (!error)
114                 error = cp_compat_stat(&stat, statbuf);
115         return error;
116 }
117
118 static int put_compat_statfs(struct compat_statfs __user *ubuf, struct kstatfs *kbuf)
119 {
120         
121         if (sizeof ubuf->f_blocks == 4) {
122                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail) &
123                     0xffffffff00000000ULL)
124                         return -EOVERFLOW;
125                 /* f_files and f_ffree may be -1; it's okay
126                  * to stuff that into 32 bits */
127                 if (kbuf->f_files != 0xffffffffffffffffULL
128                  && (kbuf->f_files & 0xffffffff00000000ULL))
129                         return -EOVERFLOW;
130                 if (kbuf->f_ffree != 0xffffffffffffffffULL
131                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
132                         return -EOVERFLOW;
133         }
134         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
135             __put_user(kbuf->f_type, &ubuf->f_type) ||
136             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
137             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
138             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
139             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
140             __put_user(kbuf->f_files, &ubuf->f_files) ||
141             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
142             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
143             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
144             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
145             __put_user(kbuf->f_frsize, &ubuf->f_frsize) ||
146             __put_user(0, &ubuf->f_spare[0]) || 
147             __put_user(0, &ubuf->f_spare[1]) || 
148             __put_user(0, &ubuf->f_spare[2]) || 
149             __put_user(0, &ubuf->f_spare[3]) || 
150             __put_user(0, &ubuf->f_spare[4]))
151                 return -EFAULT;
152         return 0;
153 }
154
155 /*
156  * The following statfs calls are copies of code from fs/open.c and
157  * should be checked against those from time to time
158  */
159 asmlinkage long compat_sys_statfs(const char __user *path, struct compat_statfs __user *buf)
160 {
161         struct nameidata nd;
162         int error;
163
164         error = user_path_walk(path, &nd);
165         if (!error) {
166                 struct kstatfs tmp;
167                 error = vfs_statfs(nd.dentry->d_inode->i_sb, &tmp);
168                 if (!error && put_compat_statfs(buf, &tmp))
169                         error = -EFAULT;
170                 path_release(&nd);
171         }
172         return error;
173 }
174
175 asmlinkage long compat_sys_fstatfs(unsigned int fd, struct compat_statfs __user *buf)
176 {
177         struct file * file;
178         struct kstatfs tmp;
179         int error;
180
181         error = -EBADF;
182         file = fget(fd);
183         if (!file)
184                 goto out;
185         error = vfs_statfs(file->f_dentry->d_inode->i_sb, &tmp);
186         if (!error && put_compat_statfs(buf, &tmp))
187                 error = -EFAULT;
188         fput(file);
189 out:
190         return error;
191 }
192
193 static int put_compat_statfs64(struct compat_statfs64 __user *ubuf, struct kstatfs *kbuf)
194 {
195         if (sizeof ubuf->f_blocks == 4) {
196                 if ((kbuf->f_blocks | kbuf->f_bfree | kbuf->f_bavail) &
197                     0xffffffff00000000ULL)
198                         return -EOVERFLOW;
199                 /* f_files and f_ffree may be -1; it's okay
200                  * to stuff that into 32 bits */
201                 if (kbuf->f_files != 0xffffffffffffffffULL
202                  && (kbuf->f_files & 0xffffffff00000000ULL))
203                         return -EOVERFLOW;
204                 if (kbuf->f_ffree != 0xffffffffffffffffULL
205                  && (kbuf->f_ffree & 0xffffffff00000000ULL))
206                         return -EOVERFLOW;
207         }
208         if (!access_ok(VERIFY_WRITE, ubuf, sizeof(*ubuf)) ||
209             __put_user(kbuf->f_type, &ubuf->f_type) ||
210             __put_user(kbuf->f_bsize, &ubuf->f_bsize) ||
211             __put_user(kbuf->f_blocks, &ubuf->f_blocks) ||
212             __put_user(kbuf->f_bfree, &ubuf->f_bfree) ||
213             __put_user(kbuf->f_bavail, &ubuf->f_bavail) ||
214             __put_user(kbuf->f_files, &ubuf->f_files) ||
215             __put_user(kbuf->f_ffree, &ubuf->f_ffree) ||
216             __put_user(kbuf->f_namelen, &ubuf->f_namelen) ||
217             __put_user(kbuf->f_fsid.val[0], &ubuf->f_fsid.val[0]) ||
218             __put_user(kbuf->f_fsid.val[1], &ubuf->f_fsid.val[1]) ||
219             __put_user(kbuf->f_frsize, &ubuf->f_frsize))
220                 return -EFAULT;
221         return 0;
222 }
223
224 asmlinkage long compat_sys_statfs64(const char __user *path, compat_size_t sz, struct compat_statfs64 __user *buf)
225 {
226         struct nameidata nd;
227         int error;
228
229         if (sz != sizeof(*buf))
230                 return -EINVAL;
231
232         error = user_path_walk(path, &nd);
233         if (!error) {
234                 struct kstatfs tmp;
235                 error = vfs_statfs(nd.dentry->d_inode->i_sb, &tmp);
236                 if (!error && put_compat_statfs64(buf, &tmp))
237                         error = -EFAULT;
238                 path_release(&nd);
239         }
240         return error;
241 }
242
243 asmlinkage long compat_sys_fstatfs64(unsigned int fd, compat_size_t sz, struct compat_statfs64 __user *buf)
244 {
245         struct file * file;
246         struct kstatfs tmp;
247         int error;
248
249         if (sz != sizeof(*buf))
250                 return -EINVAL;
251
252         error = -EBADF;
253         file = fget(fd);
254         if (!file)
255                 goto out;
256         error = vfs_statfs(file->f_dentry->d_inode->i_sb, &tmp);
257         if (!error && put_compat_statfs64(buf, &tmp))
258                 error = -EFAULT;
259         fput(file);
260 out:
261         return error;
262 }
263
264 /* ioctl32 stuff, used by sparc64, parisc, s390x, ppc64, x86_64, MIPS */
265
266 #define IOCTL_HASHSIZE 256
267 static struct ioctl_trans *ioctl32_hash_table[IOCTL_HASHSIZE];
268 static DECLARE_RWSEM(ioctl32_sem);
269
270 extern struct ioctl_trans ioctl_start[];
271 extern int ioctl_table_size;
272
273 static inline unsigned long ioctl32_hash(unsigned long cmd)
274 {
275         return (((cmd >> 6) ^ (cmd >> 4) ^ cmd)) % IOCTL_HASHSIZE;
276 }
277
278 static void ioctl32_insert_translation(struct ioctl_trans *trans)
279 {
280         unsigned long hash;
281         struct ioctl_trans *t;
282
283         hash = ioctl32_hash (trans->cmd);
284         if (!ioctl32_hash_table[hash])
285                 ioctl32_hash_table[hash] = trans;
286         else {
287                 t = ioctl32_hash_table[hash];
288                 while (t->next)
289                         t = t->next;
290                 trans->next = NULL;
291                 t->next = trans;
292         }
293 }
294
295 static int __init init_sys32_ioctl(void)
296 {
297         int i;
298
299         for (i = 0; i < ioctl_table_size; i++) {
300                 if (ioctl_start[i].next != 0) { 
301                         printk("ioctl translation %d bad\n",i); 
302                         return -1;
303                 }
304
305                 ioctl32_insert_translation(&ioctl_start[i]);
306         }
307         return 0;
308 }
309
310 __initcall(init_sys32_ioctl);
311
312 int register_ioctl32_conversion(unsigned int cmd,
313                                 ioctl_trans_handler_t handler)
314 {
315         struct ioctl_trans *t;
316         struct ioctl_trans *new_t;
317         unsigned long hash = ioctl32_hash(cmd);
318
319         new_t = kmalloc(sizeof(*new_t), GFP_KERNEL);
320         if (!new_t)
321                 return -ENOMEM;
322
323         down_write(&ioctl32_sem);
324         for (t = ioctl32_hash_table[hash]; t; t = t->next) {
325                 if (t->cmd == cmd) {
326                         printk(KERN_ERR "Trying to register duplicated ioctl32 "
327                                         "handler %x\n", cmd);
328                         up_write(&ioctl32_sem);
329                         kfree(new_t);
330                         return -EINVAL; 
331                 }
332         }
333         new_t->next = NULL;
334         new_t->cmd = cmd;
335         new_t->handler = handler;
336         ioctl32_insert_translation(new_t);
337
338         up_write(&ioctl32_sem);
339         return 0;
340 }
341 EXPORT_SYMBOL(register_ioctl32_conversion);
342
343 static inline int builtin_ioctl(struct ioctl_trans *t)
344
345         return t >= ioctl_start && t < (ioctl_start + ioctl_table_size);
346
347
348 /* Problem: 
349    This function cannot unregister duplicate ioctls, because they are not
350    unique.
351    When they happen we need to extend the prototype to pass the handler too. */
352
353 int unregister_ioctl32_conversion(unsigned int cmd)
354 {
355         unsigned long hash = ioctl32_hash(cmd);
356         struct ioctl_trans *t, *t1;
357
358         down_write(&ioctl32_sem);
359
360         t = ioctl32_hash_table[hash];
361         if (!t) { 
362                 up_write(&ioctl32_sem);
363                 return -EINVAL;
364         } 
365
366         if (t->cmd == cmd) { 
367                 if (builtin_ioctl(t)) {
368                         printk("%p tried to unregister builtin ioctl %x\n",
369                                __builtin_return_address(0), cmd);
370                 } else { 
371                         ioctl32_hash_table[hash] = t->next;
372                         up_write(&ioctl32_sem);
373                         kfree(t);
374                         return 0;
375                 }
376         } 
377         while (t->next) {
378                 t1 = t->next;
379                 if (t1->cmd == cmd) { 
380                         if (builtin_ioctl(t1)) {
381                                 printk("%p tried to unregister builtin "
382                                         "ioctl %x\n",
383                                         __builtin_return_address(0), cmd);
384                                 goto out;
385                         } else { 
386                                 t->next = t1->next;
387                                 up_write(&ioctl32_sem);
388                                 kfree(t1);
389                                 return 0;
390                         }
391                 }
392                 t = t1;
393         }
394         printk(KERN_ERR "Trying to free unknown 32bit ioctl handler %x\n",
395                                 cmd);
396 out:
397         up_write(&ioctl32_sem);
398         return -EINVAL;
399 }
400 EXPORT_SYMBOL(unregister_ioctl32_conversion); 
401
402 static void compat_ioctl_error(struct file *filp, unsigned int fd,
403                 unsigned int cmd, unsigned long arg)
404 {
405         char buf[10];
406         char *fn = "?";
407         char *path;
408
409         /* find the name of the device. */
410         path = (char *)__get_free_page(GFP_KERNEL);
411         if (path) {
412                 fn = d_path(filp->f_dentry, filp->f_vfsmnt, path, PAGE_SIZE);
413                 if (IS_ERR(fn))
414                         fn = "?";
415         }
416
417         sprintf(buf,"'%c'", (cmd>>24) & 0x3f);
418         if (!isprint(buf[1]))
419                 sprintf(buf, "%02x", buf[1]);
420         printk("ioctl32(%s:%d): Unknown cmd fd(%d) "
421                         "cmd(%08x){%s} arg(%08x) on %s\n",
422                         current->comm, current->pid,
423                         (int)fd, (unsigned int)cmd, buf,
424                         (unsigned int)arg, fn);
425
426         if (path)
427                 free_page((unsigned long)path);
428 }
429
430 asmlinkage long compat_sys_ioctl(unsigned int fd, unsigned int cmd,
431                                 unsigned long arg)
432 {
433         struct file *filp;
434         int error = -EBADF;
435         struct ioctl_trans *t;
436         int fput_needed;
437
438         filp = fget_light(fd, &fput_needed);
439         if (!filp)
440                 goto out;
441
442         /* RED-PEN how should LSM module know it's handling 32bit? */
443         error = security_file_ioctl(filp, cmd, arg);
444         if (error)
445                 goto out_fput;
446
447         /*
448          * To allow the compat_ioctl handlers to be self contained
449          * we need to check the common ioctls here first.
450          * Just handle them with the standard handlers below.
451          */
452         switch (cmd) {
453         case FIOCLEX:
454         case FIONCLEX:
455         case FIONBIO:
456         case FIOASYNC:
457         case FIOQSIZE:
458                 break;
459
460         case FIBMAP:
461         case FIGETBSZ:
462         case FIONREAD:
463                 if (S_ISREG(filp->f_dentry->d_inode->i_mode))
464                         break;
465                 /*FALL THROUGH*/
466
467         default:
468                 if (filp->f_op && filp->f_op->compat_ioctl) {
469                         error = filp->f_op->compat_ioctl(filp, cmd, arg);
470                         if (error != -ENOIOCTLCMD)
471                                 goto out_fput;
472                 }
473
474                 if (!filp->f_op ||
475                     (!filp->f_op->ioctl && !filp->f_op->unlocked_ioctl))
476                         goto do_ioctl;
477                 break;
478         }
479
480         /* When register_ioctl32_conversion is finally gone remove
481            this lock! -AK */
482         down_read(&ioctl32_sem);
483         for (t = ioctl32_hash_table[ioctl32_hash(cmd)]; t; t = t->next) {
484                 if (t->cmd == cmd)
485                         goto found_handler;
486         }
487         up_read(&ioctl32_sem);
488
489         if (S_ISSOCK(filp->f_dentry->d_inode->i_mode) &&
490             cmd >= SIOCDEVPRIVATE && cmd <= (SIOCDEVPRIVATE + 15)) {
491                 error = siocdevprivate_ioctl(fd, cmd, arg);
492         } else {
493                 static int count;
494
495                 if (++count <= 50)
496                         compat_ioctl_error(filp, fd, cmd, arg);
497                 error = -EINVAL;
498         }
499
500         goto out_fput;
501
502  found_handler:
503         if (t->handler) {
504                 lock_kernel();
505                 error = t->handler(fd, cmd, arg, filp);
506                 unlock_kernel();
507                 up_read(&ioctl32_sem);
508                 goto out_fput;
509         }
510
511         up_read(&ioctl32_sem);
512  do_ioctl:
513         error = vfs_ioctl(filp, fd, cmd, arg);
514  out_fput:
515         fput_light(filp, fput_needed);
516  out:
517         return error;
518 }
519
520 static int get_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
521 {
522         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
523             __get_user(kfl->l_type, &ufl->l_type) ||
524             __get_user(kfl->l_whence, &ufl->l_whence) ||
525             __get_user(kfl->l_start, &ufl->l_start) ||
526             __get_user(kfl->l_len, &ufl->l_len) ||
527             __get_user(kfl->l_pid, &ufl->l_pid))
528                 return -EFAULT;
529         return 0;
530 }
531
532 static int put_compat_flock(struct flock *kfl, struct compat_flock __user *ufl)
533 {
534         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
535             __put_user(kfl->l_type, &ufl->l_type) ||
536             __put_user(kfl->l_whence, &ufl->l_whence) ||
537             __put_user(kfl->l_start, &ufl->l_start) ||
538             __put_user(kfl->l_len, &ufl->l_len) ||
539             __put_user(kfl->l_pid, &ufl->l_pid))
540                 return -EFAULT;
541         return 0;
542 }
543
544 #ifndef HAVE_ARCH_GET_COMPAT_FLOCK64
545 static int get_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
546 {
547         if (!access_ok(VERIFY_READ, ufl, sizeof(*ufl)) ||
548             __get_user(kfl->l_type, &ufl->l_type) ||
549             __get_user(kfl->l_whence, &ufl->l_whence) ||
550             __get_user(kfl->l_start, &ufl->l_start) ||
551             __get_user(kfl->l_len, &ufl->l_len) ||
552             __get_user(kfl->l_pid, &ufl->l_pid))
553                 return -EFAULT;
554         return 0;
555 }
556 #endif
557
558 #ifndef HAVE_ARCH_PUT_COMPAT_FLOCK64
559 static int put_compat_flock64(struct flock *kfl, struct compat_flock64 __user *ufl)
560 {
561         if (!access_ok(VERIFY_WRITE, ufl, sizeof(*ufl)) ||
562             __put_user(kfl->l_type, &ufl->l_type) ||
563             __put_user(kfl->l_whence, &ufl->l_whence) ||
564             __put_user(kfl->l_start, &ufl->l_start) ||
565             __put_user(kfl->l_len, &ufl->l_len) ||
566             __put_user(kfl->l_pid, &ufl->l_pid))
567                 return -EFAULT;
568         return 0;
569 }
570 #endif
571
572 asmlinkage long compat_sys_fcntl64(unsigned int fd, unsigned int cmd,
573                 unsigned long arg)
574 {
575         mm_segment_t old_fs;
576         struct flock f;
577         long ret;
578
579         switch (cmd) {
580         case F_GETLK:
581         case F_SETLK:
582         case F_SETLKW:
583                 ret = get_compat_flock(&f, compat_ptr(arg));
584                 if (ret != 0)
585                         break;
586                 old_fs = get_fs();
587                 set_fs(KERNEL_DS);
588                 ret = sys_fcntl(fd, cmd, (unsigned long)&f);
589                 set_fs(old_fs);
590                 if (cmd == F_GETLK && ret == 0) {
591                         if ((f.l_start >= COMPAT_OFF_T_MAX) ||
592                             ((f.l_start + f.l_len) > COMPAT_OFF_T_MAX))
593                                 ret = -EOVERFLOW;
594                         if (ret == 0)
595                                 ret = put_compat_flock(&f, compat_ptr(arg));
596                 }
597                 break;
598
599         case F_GETLK64:
600         case F_SETLK64:
601         case F_SETLKW64:
602                 ret = get_compat_flock64(&f, compat_ptr(arg));
603                 if (ret != 0)
604                         break;
605                 old_fs = get_fs();
606                 set_fs(KERNEL_DS);
607                 ret = sys_fcntl(fd, (cmd == F_GETLK64) ? F_GETLK :
608                                 ((cmd == F_SETLK64) ? F_SETLK : F_SETLKW),
609                                 (unsigned long)&f);
610                 set_fs(old_fs);
611                 if (cmd == F_GETLK64 && ret == 0) {
612                         if ((f.l_start >= COMPAT_LOFF_T_MAX) ||
613                             ((f.l_start + f.l_len) > COMPAT_LOFF_T_MAX))
614                                 ret = -EOVERFLOW;
615                         if (ret == 0)
616                                 ret = put_compat_flock64(&f, compat_ptr(arg));
617                 }
618                 break;
619
620         default:
621                 ret = sys_fcntl(fd, cmd, arg);
622                 break;
623         }
624         return ret;
625 }
626
627 asmlinkage long compat_sys_fcntl(unsigned int fd, unsigned int cmd,
628                 unsigned long arg)
629 {
630         if ((cmd == F_GETLK64) || (cmd == F_SETLK64) || (cmd == F_SETLKW64))
631                 return -EINVAL;
632         return compat_sys_fcntl64(fd, cmd, arg);
633 }
634
635 asmlinkage long
636 compat_sys_io_setup(unsigned nr_reqs, u32 __user *ctx32p)
637 {
638         long ret;
639         aio_context_t ctx64;
640
641         mm_segment_t oldfs = get_fs();
642         if (unlikely(get_user(ctx64, ctx32p)))
643                 return -EFAULT;
644
645         set_fs(KERNEL_DS);
646         /* The __user pointer cast is valid because of the set_fs() */
647         ret = sys_io_setup(nr_reqs, (aio_context_t __user *) &ctx64);
648         set_fs(oldfs);
649         /* truncating is ok because it's a user address */
650         if (!ret)
651                 ret = put_user((u32) ctx64, ctx32p);
652         return ret;
653 }
654
655 asmlinkage long
656 compat_sys_io_getevents(aio_context_t ctx_id,
657                                  unsigned long min_nr,
658                                  unsigned long nr,
659                                  struct io_event __user *events,
660                                  struct compat_timespec __user *timeout)
661 {
662         long ret;
663         struct timespec t;
664         struct timespec __user *ut = NULL;
665
666         ret = -EFAULT;
667         if (unlikely(!access_ok(VERIFY_WRITE, events, 
668                                 nr * sizeof(struct io_event))))
669                 goto out;
670         if (timeout) {
671                 if (get_compat_timespec(&t, timeout))
672                         goto out;
673
674                 ut = compat_alloc_user_space(sizeof(*ut));
675                 if (copy_to_user(ut, &t, sizeof(t)) )
676                         goto out;
677         } 
678         ret = sys_io_getevents(ctx_id, min_nr, nr, events, ut);
679 out:
680         return ret;
681 }
682
683 static inline long
684 copy_iocb(long nr, u32 __user *ptr32, struct iocb __user * __user *ptr64)
685 {
686         compat_uptr_t uptr;
687         int i;
688
689         for (i = 0; i < nr; ++i) {
690                 if (get_user(uptr, ptr32 + i))
691                         return -EFAULT;
692                 if (put_user(compat_ptr(uptr), ptr64 + i))
693                         return -EFAULT;
694         }
695         return 0;
696 }
697
698 #define MAX_AIO_SUBMITS         (PAGE_SIZE/sizeof(struct iocb *))
699
700 asmlinkage long
701 compat_sys_io_submit(aio_context_t ctx_id, int nr, u32 __user *iocb)
702 {
703         struct iocb __user * __user *iocb64; 
704         long ret;
705
706         if (unlikely(nr < 0))
707                 return -EINVAL;
708
709         if (nr > MAX_AIO_SUBMITS)
710                 nr = MAX_AIO_SUBMITS;
711         
712         iocb64 = compat_alloc_user_space(nr * sizeof(*iocb64));
713         ret = copy_iocb(nr, iocb, iocb64);
714         if (!ret)
715                 ret = sys_io_submit(ctx_id, nr, iocb64);
716         return ret;
717 }
718
719 struct compat_ncp_mount_data {
720         compat_int_t version;
721         compat_uint_t ncp_fd;
722         compat_uid_t mounted_uid;
723         compat_pid_t wdog_pid;
724         unsigned char mounted_vol[NCP_VOLNAME_LEN + 1];
725         compat_uint_t time_out;
726         compat_uint_t retry_count;
727         compat_uint_t flags;
728         compat_uid_t uid;
729         compat_gid_t gid;
730         compat_mode_t file_mode;
731         compat_mode_t dir_mode;
732 };
733
734 struct compat_ncp_mount_data_v4 {
735         compat_int_t version;
736         compat_ulong_t flags;
737         compat_ulong_t mounted_uid;
738         compat_long_t wdog_pid;
739         compat_uint_t ncp_fd;
740         compat_uint_t time_out;
741         compat_uint_t retry_count;
742         compat_ulong_t uid;
743         compat_ulong_t gid;
744         compat_ulong_t file_mode;
745         compat_ulong_t dir_mode;
746 };
747
748 static void *do_ncp_super_data_conv(void *raw_data)
749 {
750         int version = *(unsigned int *)raw_data;
751
752         if (version == 3) {
753                 struct compat_ncp_mount_data *c_n = raw_data;
754                 struct ncp_mount_data *n = raw_data;
755
756                 n->dir_mode = c_n->dir_mode;
757                 n->file_mode = c_n->file_mode;
758                 n->gid = c_n->gid;
759                 n->uid = c_n->uid;
760                 memmove (n->mounted_vol, c_n->mounted_vol, (sizeof (c_n->mounted_vol) + 3 * sizeof (unsigned int)));
761                 n->wdog_pid = c_n->wdog_pid;
762                 n->mounted_uid = c_n->mounted_uid;
763         } else if (version == 4) {
764                 struct compat_ncp_mount_data_v4 *c_n = raw_data;
765                 struct ncp_mount_data_v4 *n = raw_data;
766
767                 n->dir_mode = c_n->dir_mode;
768                 n->file_mode = c_n->file_mode;
769                 n->gid = c_n->gid;
770                 n->uid = c_n->uid;
771                 n->retry_count = c_n->retry_count;
772                 n->time_out = c_n->time_out;
773                 n->ncp_fd = c_n->ncp_fd;
774                 n->wdog_pid = c_n->wdog_pid;
775                 n->mounted_uid = c_n->mounted_uid;
776                 n->flags = c_n->flags;
777         } else if (version != 5) {
778                 return NULL;
779         }
780
781         return raw_data;
782 }
783
784 struct compat_smb_mount_data {
785         compat_int_t version;
786         compat_uid_t mounted_uid;
787         compat_uid_t uid;
788         compat_gid_t gid;
789         compat_mode_t file_mode;
790         compat_mode_t dir_mode;
791 };
792
793 static void *do_smb_super_data_conv(void *raw_data)
794 {
795         struct smb_mount_data *s = raw_data;
796         struct compat_smb_mount_data *c_s = raw_data;
797
798         if (c_s->version != SMB_MOUNT_OLDVERSION)
799                 goto out;
800         s->dir_mode = c_s->dir_mode;
801         s->file_mode = c_s->file_mode;
802         s->gid = c_s->gid;
803         s->uid = c_s->uid;
804         s->mounted_uid = c_s->mounted_uid;
805  out:
806         return raw_data;
807 }
808
809 extern int copy_mount_options (const void __user *, unsigned long *);
810
811 #define SMBFS_NAME      "smbfs"
812 #define NCPFS_NAME      "ncpfs"
813
814 asmlinkage long compat_sys_mount(char __user * dev_name, char __user * dir_name,
815                                  char __user * type, unsigned long flags,
816                                  void __user * data)
817 {
818         unsigned long type_page;
819         unsigned long data_page;
820         unsigned long dev_page;
821         char *dir_page;
822         int retval;
823
824         retval = copy_mount_options (type, &type_page);
825         if (retval < 0)
826                 goto out;
827
828         dir_page = getname(dir_name);
829         retval = PTR_ERR(dir_page);
830         if (IS_ERR(dir_page))
831                 goto out1;
832
833         retval = copy_mount_options (dev_name, &dev_page);
834         if (retval < 0)
835                 goto out2;
836
837         retval = copy_mount_options (data, &data_page);
838         if (retval < 0)
839                 goto out3;
840
841         retval = -EINVAL;
842
843         if (type_page) {
844                 if (!strcmp((char *)type_page, SMBFS_NAME)) {
845                         do_smb_super_data_conv((void *)data_page);
846                 } else if (!strcmp((char *)type_page, NCPFS_NAME)) {
847                         do_ncp_super_data_conv((void *)data_page);
848                 }
849         }
850
851         lock_kernel();
852         retval = do_mount((char*)dev_page, dir_page, (char*)type_page,
853                         flags, (void*)data_page);
854         unlock_kernel();
855
856         free_page(data_page);
857  out3:
858         free_page(dev_page);
859  out2:
860         putname(dir_page);
861  out1:
862         free_page(type_page);
863  out:
864         return retval;
865 }
866
867 #define NAME_OFFSET(de) ((int) ((de)->d_name - (char __user *) (de)))
868 #define COMPAT_ROUND_UP(x) (((x)+sizeof(compat_long_t)-1) & \
869                                 ~(sizeof(compat_long_t)-1))
870
871 struct compat_old_linux_dirent {
872         compat_ulong_t  d_ino;
873         compat_ulong_t  d_offset;
874         unsigned short  d_namlen;
875         char            d_name[1];
876 };
877
878 struct compat_readdir_callback {
879         struct compat_old_linux_dirent __user *dirent;
880         int result;
881 };
882
883 static int compat_fillonedir(void *__buf, const char *name, int namlen,
884                         loff_t offset, ino_t ino, unsigned int d_type)
885 {
886         struct compat_readdir_callback *buf = __buf;
887         struct compat_old_linux_dirent __user *dirent;
888
889         if (buf->result)
890                 return -EINVAL;
891         buf->result++;
892         dirent = buf->dirent;
893         if (!access_ok(VERIFY_WRITE, dirent,
894                         (unsigned long)(dirent->d_name + namlen + 1) -
895                                 (unsigned long)dirent))
896                 goto efault;
897         if (    __put_user(ino, &dirent->d_ino) ||
898                 __put_user(offset, &dirent->d_offset) ||
899                 __put_user(namlen, &dirent->d_namlen) ||
900                 __copy_to_user(dirent->d_name, name, namlen) ||
901                 __put_user(0, dirent->d_name + namlen))
902                 goto efault;
903         return 0;
904 efault:
905         buf->result = -EFAULT;
906         return -EFAULT;
907 }
908
909 asmlinkage long compat_sys_old_readdir(unsigned int fd,
910         struct compat_old_linux_dirent __user *dirent, unsigned int count)
911 {
912         int error;
913         struct file *file;
914         struct compat_readdir_callback buf;
915
916         error = -EBADF;
917         file = fget(fd);
918         if (!file)
919                 goto out;
920
921         buf.result = 0;
922         buf.dirent = dirent;
923
924         error = vfs_readdir(file, compat_fillonedir, &buf);
925         if (error >= 0)
926                 error = buf.result;
927
928         fput(file);
929 out:
930         return error;
931 }
932
933 struct compat_linux_dirent {
934         compat_ulong_t  d_ino;
935         compat_ulong_t  d_off;
936         unsigned short  d_reclen;
937         char            d_name[1];
938 };
939
940 struct compat_getdents_callback {
941         struct compat_linux_dirent __user *current_dir;
942         struct compat_linux_dirent __user *previous;
943         int count;
944         int error;
945 };
946
947 static int compat_filldir(void *__buf, const char *name, int namlen,
948                 loff_t offset, ino_t ino, unsigned int d_type)
949 {
950         struct compat_linux_dirent __user * dirent;
951         struct compat_getdents_callback *buf = __buf;
952         int reclen = COMPAT_ROUND_UP(NAME_OFFSET(dirent) + namlen + 2);
953
954         buf->error = -EINVAL;   /* only used if we fail.. */
955         if (reclen > buf->count)
956                 return -EINVAL;
957         dirent = buf->previous;
958         if (dirent) {
959                 if (__put_user(offset, &dirent->d_off))
960                         goto efault;
961         }
962         dirent = buf->current_dir;
963         if (__put_user(ino, &dirent->d_ino))
964                 goto efault;
965         if (__put_user(reclen, &dirent->d_reclen))
966                 goto efault;
967         if (copy_to_user(dirent->d_name, name, namlen))
968                 goto efault;
969         if (__put_user(0, dirent->d_name + namlen))
970                 goto efault;
971         if (__put_user(d_type, (char  __user *) dirent + reclen - 1))
972                 goto efault;
973         buf->previous = dirent;
974         dirent = (void __user *)dirent + reclen;
975         buf->current_dir = dirent;
976         buf->count -= reclen;
977         return 0;
978 efault:
979         buf->error = -EFAULT;
980         return -EFAULT;
981 }
982
983 asmlinkage long compat_sys_getdents(unsigned int fd,
984                 struct compat_linux_dirent __user *dirent, unsigned int count)
985 {
986         struct file * file;
987         struct compat_linux_dirent __user * lastdirent;
988         struct compat_getdents_callback buf;
989         int error;
990
991         error = -EFAULT;
992         if (!access_ok(VERIFY_WRITE, dirent, count))
993                 goto out;
994
995         error = -EBADF;
996         file = fget(fd);
997         if (!file)
998                 goto out;
999
1000         buf.current_dir = dirent;
1001         buf.previous = NULL;
1002         buf.count = count;
1003         buf.error = 0;
1004
1005         error = vfs_readdir(file, compat_filldir, &buf);
1006         if (error < 0)
1007                 goto out_putf;
1008         error = buf.error;
1009         lastdirent = buf.previous;
1010         if (lastdirent) {
1011                 if (put_user(file->f_pos, &lastdirent->d_off))
1012                         error = -EFAULT;
1013                 else
1014                         error = count - buf.count;
1015         }
1016
1017 out_putf:
1018         fput(file);
1019 out:
1020         return error;
1021 }
1022
1023 #ifndef __ARCH_OMIT_COMPAT_SYS_GETDENTS64
1024 #define COMPAT_ROUND_UP64(x) (((x)+sizeof(u64)-1) & ~(sizeof(u64)-1))
1025
1026 struct compat_getdents_callback64 {
1027         struct linux_dirent64 __user *current_dir;
1028         struct linux_dirent64 __user *previous;
1029         int count;
1030         int error;
1031 };
1032
1033 static int compat_filldir64(void * __buf, const char * name, int namlen, loff_t offset,
1034                      ino_t ino, unsigned int d_type)
1035 {
1036         struct linux_dirent64 __user *dirent;
1037         struct compat_getdents_callback64 *buf = __buf;
1038         int jj = NAME_OFFSET(dirent);
1039         int reclen = COMPAT_ROUND_UP64(jj + namlen + 1);
1040         u64 off;
1041
1042         buf->error = -EINVAL;   /* only used if we fail.. */
1043         if (reclen > buf->count)
1044                 return -EINVAL;
1045         dirent = buf->previous;
1046
1047         if (dirent) {
1048                 if (__put_user_unaligned(offset, &dirent->d_off))
1049                         goto efault;
1050         }
1051         dirent = buf->current_dir;
1052         if (__put_user_unaligned(ino, &dirent->d_ino))
1053                 goto efault;
1054         off = 0;
1055         if (__put_user_unaligned(off, &dirent->d_off))
1056                 goto efault;
1057         if (__put_user(reclen, &dirent->d_reclen))
1058                 goto efault;
1059         if (__put_user(d_type, &dirent->d_type))
1060                 goto efault;
1061         if (copy_to_user(dirent->d_name, name, namlen))
1062                 goto efault;
1063         if (__put_user(0, dirent->d_name + namlen))
1064                 goto efault;
1065         buf->previous = dirent;
1066         dirent = (void __user *)dirent + reclen;
1067         buf->current_dir = dirent;
1068         buf->count -= reclen;
1069         return 0;
1070 efault:
1071         buf->error = -EFAULT;
1072         return -EFAULT;
1073 }
1074
1075 asmlinkage long compat_sys_getdents64(unsigned int fd,
1076                 struct linux_dirent64 __user * dirent, unsigned int count)
1077 {
1078         struct file * file;
1079         struct linux_dirent64 __user * lastdirent;
1080         struct compat_getdents_callback64 buf;
1081         int error;
1082
1083         error = -EFAULT;
1084         if (!access_ok(VERIFY_WRITE, dirent, count))
1085                 goto out;
1086
1087         error = -EBADF;
1088         file = fget(fd);
1089         if (!file)
1090                 goto out;
1091
1092         buf.current_dir = dirent;
1093         buf.previous = NULL;
1094         buf.count = count;
1095         buf.error = 0;
1096
1097         error = vfs_readdir(file, compat_filldir64, &buf);
1098         if (error < 0)
1099                 goto out_putf;
1100         error = buf.error;
1101         lastdirent = buf.previous;
1102         if (lastdirent) {
1103                 typeof(lastdirent->d_off) d_off = file->f_pos;
1104                 __put_user_unaligned(d_off, &lastdirent->d_off);
1105                 error = count - buf.count;
1106         }
1107
1108 out_putf:
1109         fput(file);
1110 out:
1111         return error;
1112 }
1113 #endif /* ! __ARCH_OMIT_COMPAT_SYS_GETDENTS64 */
1114
1115 static ssize_t compat_do_readv_writev(int type, struct file *file,
1116                                const struct compat_iovec __user *uvector,
1117                                unsigned long nr_segs, loff_t *pos)
1118 {
1119         typedef ssize_t (*io_fn_t)(struct file *, char __user *, size_t, loff_t *);
1120         typedef ssize_t (*iov_fn_t)(struct file *, const struct iovec *, unsigned long, loff_t *);
1121
1122         compat_ssize_t tot_len;
1123         struct iovec iovstack[UIO_FASTIOV];
1124         struct iovec *iov=iovstack, *vector;
1125         ssize_t ret;
1126         int seg;
1127         io_fn_t fn;
1128         iov_fn_t fnv;
1129
1130         /*
1131          * SuS says "The readv() function *may* fail if the iovcnt argument
1132          * was less than or equal to 0, or greater than {IOV_MAX}.  Linux has
1133          * traditionally returned zero for zero segments, so...
1134          */
1135         ret = 0;
1136         if (nr_segs == 0)
1137                 goto out;
1138
1139         /*
1140          * First get the "struct iovec" from user memory and
1141          * verify all the pointers
1142          */
1143         ret = -EINVAL;
1144         if ((nr_segs > UIO_MAXIOV) || (nr_segs <= 0))
1145                 goto out;
1146         if (!file->f_op)
1147                 goto out;
1148         if (nr_segs > UIO_FASTIOV) {
1149                 ret = -ENOMEM;
1150                 iov = kmalloc(nr_segs*sizeof(struct iovec), GFP_KERNEL);
1151                 if (!iov)
1152                         goto out;
1153         }
1154         ret = -EFAULT;
1155         if (!access_ok(VERIFY_READ, uvector, nr_segs*sizeof(*uvector)))
1156                 goto out;
1157
1158         /*
1159          * Single unix specification:
1160          * We should -EINVAL if an element length is not >= 0 and fitting an
1161          * ssize_t.  The total length is fitting an ssize_t
1162          *
1163          * Be careful here because iov_len is a size_t not an ssize_t
1164          */
1165         tot_len = 0;
1166         vector = iov;
1167         ret = -EINVAL;
1168         for (seg = 0 ; seg < nr_segs; seg++) {
1169                 compat_ssize_t tmp = tot_len;
1170                 compat_ssize_t len;
1171                 compat_uptr_t buf;
1172
1173                 if (__get_user(len, &uvector->iov_len) ||
1174                     __get_user(buf, &uvector->iov_base)) {
1175                         ret = -EFAULT;
1176                         goto out;
1177                 }
1178                 if (len < 0)    /* size_t not fitting an compat_ssize_t .. */
1179                         goto out;
1180                 tot_len += len;
1181                 if (tot_len < tmp) /* maths overflow on the compat_ssize_t */
1182                         goto out;
1183                 vector->iov_base = compat_ptr(buf);
1184                 vector->iov_len = (compat_size_t) len;
1185                 uvector++;
1186                 vector++;
1187         }
1188         if (tot_len == 0) {
1189                 ret = 0;
1190                 goto out;
1191         }
1192
1193         ret = rw_verify_area(type, file, pos, tot_len);
1194         if (ret)
1195                 goto out;
1196
1197         fnv = NULL;
1198         if (type == READ) {
1199                 fn = file->f_op->read;
1200                 fnv = file->f_op->readv;
1201         } else {
1202                 fn = (io_fn_t)file->f_op->write;
1203                 fnv = file->f_op->writev;
1204         }
1205         if (fnv) {
1206                 ret = fnv(file, iov, nr_segs, pos);
1207                 goto out;
1208         }
1209
1210         /* Do it by hand, with file-ops */
1211         ret = 0;
1212         vector = iov;
1213         while (nr_segs > 0) {
1214                 void __user * base;
1215                 size_t len;
1216                 ssize_t nr;
1217
1218                 base = vector->iov_base;
1219                 len = vector->iov_len;
1220                 vector++;
1221                 nr_segs--;
1222
1223                 nr = fn(file, base, len, pos);
1224
1225                 if (nr < 0) {
1226                         if (!ret) ret = nr;
1227                         break;
1228                 }
1229                 ret += nr;
1230                 if (nr != len)
1231                         break;
1232         }
1233 out:
1234         if (iov != iovstack)
1235                 kfree(iov);
1236         if ((ret + (type == READ)) > 0)
1237                 dnotify_parent(file->f_dentry,
1238                                 (type == READ) ? DN_ACCESS : DN_MODIFY);
1239         return ret;
1240 }
1241
1242 asmlinkage ssize_t
1243 compat_sys_readv(unsigned long fd, const struct compat_iovec __user *vec, unsigned long vlen)
1244 {
1245         struct file *file;
1246         ssize_t ret = -EBADF;
1247
1248         file = fget(fd);
1249         if (!file)
1250                 return -EBADF;
1251
1252         if (!(file->f_mode & FMODE_READ))
1253                 goto out;
1254
1255         ret = -EINVAL;
1256         if (!file->f_op || (!file->f_op->readv && !file->f_op->read))
1257                 goto out;
1258
1259         ret = compat_do_readv_writev(READ, file, vec, vlen, &file->f_pos);
1260
1261 out:
1262         fput(file);
1263         return ret;
1264 }
1265
1266 asmlinkage ssize_t
1267 compat_sys_writev(unsigned long fd, const struct compat_iovec __user *vec, unsigned long vlen)
1268 {
1269         struct file *file;
1270         ssize_t ret = -EBADF;
1271
1272         file = fget(fd);
1273         if (!file)
1274                 return -EBADF;
1275         if (!(file->f_mode & FMODE_WRITE))
1276                 goto out;
1277
1278         ret = -EINVAL;
1279         if (!file->f_op || (!file->f_op->writev && !file->f_op->write))
1280                 goto out;
1281
1282         ret = compat_do_readv_writev(WRITE, file, vec, vlen, &file->f_pos);
1283
1284 out:
1285         fput(file);
1286         return ret;
1287 }
1288
1289 /*
1290  * compat_count() counts the number of arguments/envelopes. It is basically
1291  * a copy of count() from fs/exec.c, except that it works with 32 bit argv
1292  * and envp pointers.
1293  */
1294 static int compat_count(compat_uptr_t __user *argv, int max)
1295 {
1296         int i = 0;
1297
1298         if (argv != NULL) {
1299                 for (;;) {
1300                         compat_uptr_t p;
1301
1302                         if (get_user(p, argv))
1303                                 return -EFAULT;
1304                         if (!p)
1305                                 break;
1306                         argv++;
1307                         if(++i > max)
1308                                 return -E2BIG;
1309                 }
1310         }
1311         return i;
1312 }
1313
1314 /*
1315  * compat_copy_strings() is basically a copy of copy_strings() from fs/exec.c
1316  * except that it works with 32 bit argv and envp pointers.
1317  */
1318 static int compat_copy_strings(int argc, compat_uptr_t __user *argv,
1319                                 struct linux_binprm *bprm)
1320 {
1321         struct page *kmapped_page = NULL;
1322         char *kaddr = NULL;
1323         int ret;
1324
1325         while (argc-- > 0) {
1326                 compat_uptr_t str;
1327                 int len;
1328                 unsigned long pos;
1329
1330                 if (get_user(str, argv+argc) ||
1331                         !(len = strnlen_user(compat_ptr(str), bprm->p))) {
1332                         ret = -EFAULT;
1333                         goto out;
1334                 }
1335
1336                 if (bprm->p < len)  {
1337                         ret = -E2BIG;
1338                         goto out;
1339                 }
1340
1341                 bprm->p -= len;
1342                 /* XXX: add architecture specific overflow check here. */
1343                 pos = bprm->p;
1344
1345                 while (len > 0) {
1346                         int i, new, err;
1347                         int offset, bytes_to_copy;
1348                         struct page *page;
1349
1350                         offset = pos % PAGE_SIZE;
1351                         i = pos/PAGE_SIZE;
1352                         page = bprm->page[i];
1353                         new = 0;
1354                         if (!page) {
1355                                 page = alloc_page(GFP_HIGHUSER);
1356                                 bprm->page[i] = page;
1357                                 if (!page) {
1358                                         ret = -ENOMEM;
1359                                         goto out;
1360                                 }
1361                                 new = 1;
1362                         }
1363
1364                         if (page != kmapped_page) {
1365                                 if (kmapped_page)
1366                                         kunmap(kmapped_page);
1367                                 kmapped_page = page;
1368                                 kaddr = kmap(kmapped_page);
1369                         }
1370                         if (new && offset)
1371                                 memset(kaddr, 0, offset);
1372                         bytes_to_copy = PAGE_SIZE - offset;
1373                         if (bytes_to_copy > len) {
1374                                 bytes_to_copy = len;
1375                                 if (new)
1376                                         memset(kaddr+offset+len, 0,
1377                                                 PAGE_SIZE-offset-len);
1378                         }
1379                         err = copy_from_user(kaddr+offset, compat_ptr(str),
1380                                                 bytes_to_copy);
1381                         if (err) {
1382                                 ret = -EFAULT;
1383                                 goto out;
1384                         }
1385
1386                         pos += bytes_to_copy;
1387                         str += bytes_to_copy;
1388                         len -= bytes_to_copy;
1389                 }
1390         }
1391         ret = 0;
1392 out:
1393         if (kmapped_page)
1394                 kunmap(kmapped_page);
1395         return ret;
1396 }
1397
1398 #ifdef CONFIG_MMU
1399
1400 #define free_arg_pages(bprm) do { } while (0)
1401
1402 #else
1403
1404 static inline void free_arg_pages(struct linux_binprm *bprm)
1405 {
1406         int i;
1407
1408         for (i = 0; i < MAX_ARG_PAGES; i++) {
1409                 if (bprm->page[i])
1410                         __free_page(bprm->page[i]);
1411                 bprm->page[i] = NULL;
1412         }
1413 }
1414
1415 #endif /* CONFIG_MMU */
1416
1417 /*
1418  * compat_do_execve() is mostly a copy of do_execve(), with the exception
1419  * that it processes 32 bit argv and envp pointers.
1420  */
1421 int compat_do_execve(char * filename,
1422         compat_uptr_t __user *argv,
1423         compat_uptr_t __user *envp,
1424         struct pt_regs * regs)
1425 {
1426         struct linux_binprm *bprm;
1427         struct file *file;
1428         int retval;
1429         int i;
1430
1431         retval = -ENOMEM;
1432         bprm = kmalloc(sizeof(*bprm), GFP_KERNEL);
1433         if (!bprm)
1434                 goto out_ret;
1435         memset(bprm, 0, sizeof(*bprm));
1436
1437         file = open_exec(filename);
1438         retval = PTR_ERR(file);
1439         if (IS_ERR(file))
1440                 goto out_kfree;
1441
1442         sched_exec();
1443
1444         bprm->p = PAGE_SIZE*MAX_ARG_PAGES-sizeof(void *);
1445         bprm->file = file;
1446         bprm->filename = filename;
1447         bprm->interp = filename;
1448         bprm->mm = mm_alloc();
1449         retval = -ENOMEM;
1450         if (!bprm->mm)
1451                 goto out_file;
1452
1453         retval = init_new_context(current, bprm->mm);
1454         if (retval < 0)
1455                 goto out_mm;
1456
1457         bprm->argc = compat_count(argv, bprm->p / sizeof(compat_uptr_t));
1458         if ((retval = bprm->argc) < 0)
1459                 goto out_mm;
1460
1461         bprm->envc = compat_count(envp, bprm->p / sizeof(compat_uptr_t));
1462         if ((retval = bprm->envc) < 0)
1463                 goto out_mm;
1464
1465         retval = security_bprm_alloc(bprm);
1466         if (retval)
1467                 goto out;
1468
1469         retval = prepare_binprm(bprm);
1470         if (retval < 0)
1471                 goto out;
1472
1473         retval = copy_strings_kernel(1, &bprm->filename, bprm);
1474         if (retval < 0)
1475                 goto out;
1476
1477         bprm->exec = bprm->p;
1478         retval = compat_copy_strings(bprm->envc, envp, bprm);
1479         if (retval < 0)
1480                 goto out;
1481
1482         retval = compat_copy_strings(bprm->argc, argv, bprm);
1483         if (retval < 0)
1484                 goto out;
1485
1486         retval = search_binary_handler(bprm, regs);
1487         if (retval >= 0) {
1488                 free_arg_pages(bprm);
1489
1490                 /* execve success */
1491                 security_bprm_free(bprm);
1492                 kfree(bprm);
1493                 return retval;
1494         }
1495
1496 out:
1497         /* Something went wrong, return the inode and free the argument pages*/
1498         for (i = 0 ; i < MAX_ARG_PAGES ; i++) {
1499                 struct page * page = bprm->page[i];
1500                 if (page)
1501                         __free_page(page);
1502         }
1503
1504         if (bprm->security)
1505                 security_bprm_free(bprm);
1506
1507 out_mm:
1508         if (bprm->mm)
1509                 mmdrop(bprm->mm);
1510
1511 out_file:
1512         if (bprm->file) {
1513                 allow_write_access(bprm->file);
1514                 fput(bprm->file);
1515         }
1516
1517 out_kfree:
1518         kfree(bprm);
1519
1520 out_ret:
1521         return retval;
1522 }
1523
1524 #define __COMPAT_NFDBITS       (8 * sizeof(compat_ulong_t))
1525
1526 #define ROUND_UP(x,y) (((x)+(y)-1)/(y))
1527
1528 /*
1529  * Ooo, nasty.  We need here to frob 32-bit unsigned longs to
1530  * 64-bit unsigned longs.
1531  */
1532 static inline
1533 int compat_get_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1534                         unsigned long *fdset)
1535 {
1536         nr = ROUND_UP(nr, __COMPAT_NFDBITS);
1537         if (ufdset) {
1538                 unsigned long odd;
1539
1540                 if (!access_ok(VERIFY_WRITE, ufdset, nr*sizeof(compat_ulong_t)))
1541                         return -EFAULT;
1542
1543                 odd = nr & 1UL;
1544                 nr &= ~1UL;
1545                 while (nr) {
1546                         unsigned long h, l;
1547                         __get_user(l, ufdset);
1548                         __get_user(h, ufdset+1);
1549                         ufdset += 2;
1550                         *fdset++ = h << 32 | l;
1551                         nr -= 2;
1552                 }
1553                 if (odd)
1554                         __get_user(*fdset, ufdset);
1555         } else {
1556                 /* Tricky, must clear full unsigned long in the
1557                  * kernel fdset at the end, this makes sure that
1558                  * actually happens.
1559                  */
1560                 memset(fdset, 0, ((nr + 1) & ~1)*sizeof(compat_ulong_t));
1561         }
1562         return 0;
1563 }
1564
1565 static inline
1566 void compat_set_fd_set(unsigned long nr, compat_ulong_t __user *ufdset,
1567                         unsigned long *fdset)
1568 {
1569         unsigned long odd;
1570         nr = ROUND_UP(nr, __COMPAT_NFDBITS);
1571
1572         if (!ufdset)
1573                 return;
1574
1575         odd = nr & 1UL;
1576         nr &= ~1UL;
1577         while (nr) {
1578                 unsigned long h, l;
1579                 l = *fdset++;
1580                 h = l >> 32;
1581                 __put_user(l, ufdset);
1582                 __put_user(h, ufdset+1);
1583                 ufdset += 2;
1584                 nr -= 2;
1585         }
1586         if (odd)
1587                 __put_user(*fdset, ufdset);
1588 }
1589
1590
1591 /*
1592  * This is a virtual copy of sys_select from fs/select.c and probably
1593  * should be compared to it from time to time
1594  */
1595 static void *select_bits_alloc(int size)
1596 {
1597         return kmalloc(6 * size, GFP_KERNEL);
1598 }
1599
1600 static void select_bits_free(void *bits, int size)
1601 {
1602         kfree(bits);
1603 }
1604
1605 /*
1606  * We can actually return ERESTARTSYS instead of EINTR, but I'd
1607  * like to be certain this leads to no problems. So I return
1608  * EINTR just for safety.
1609  *
1610  * Update: ERESTARTSYS breaks at least the xview clock binary, so
1611  * I'm trying ERESTARTNOHAND which restart only when you want to.
1612  */
1613 #define MAX_SELECT_SECONDS \
1614         ((unsigned long) (MAX_SCHEDULE_TIMEOUT / HZ)-1)
1615
1616 asmlinkage long
1617 compat_sys_select(int n, compat_ulong_t __user *inp, compat_ulong_t __user *outp,
1618                 compat_ulong_t __user *exp, struct compat_timeval __user *tvp)
1619 {
1620         fd_set_bits fds;
1621         char *bits;
1622         long timeout;
1623         int size, max_fdset, ret = -EINVAL;
1624
1625         timeout = MAX_SCHEDULE_TIMEOUT;
1626         if (tvp) {
1627                 time_t sec, usec;
1628
1629                 if (!access_ok(VERIFY_READ, tvp, sizeof(*tvp))
1630                     || __get_user(sec, &tvp->tv_sec)
1631                     || __get_user(usec, &tvp->tv_usec)) {
1632                         ret = -EFAULT;
1633                         goto out_nofds;
1634                 }
1635
1636                 if (sec < 0 || usec < 0)
1637                         goto out_nofds;
1638
1639                 if ((unsigned long) sec < MAX_SELECT_SECONDS) {
1640                         timeout = ROUND_UP(usec, 1000000/HZ);
1641                         timeout += sec * (unsigned long) HZ;
1642                 }
1643         }
1644
1645         if (n < 0)
1646                 goto out_nofds;
1647
1648         /* max_fdset can increase, so grab it once to avoid race */
1649         max_fdset = current->files->max_fdset;
1650         if (n > max_fdset)
1651                 n = max_fdset;
1652
1653         /*
1654          * We need 6 bitmaps (in/out/ex for both incoming and outgoing),
1655          * since we used fdset we need to allocate memory in units of
1656          * long-words.
1657          */
1658         ret = -ENOMEM;
1659         size = FDS_BYTES(n);
1660         bits = select_bits_alloc(size);
1661         if (!bits)
1662                 goto out_nofds;
1663         fds.in      = (unsigned long *)  bits;
1664         fds.out     = (unsigned long *) (bits +   size);
1665         fds.ex      = (unsigned long *) (bits + 2*size);
1666         fds.res_in  = (unsigned long *) (bits + 3*size);
1667         fds.res_out = (unsigned long *) (bits + 4*size);
1668         fds.res_ex  = (unsigned long *) (bits + 5*size);
1669
1670         if ((ret = compat_get_fd_set(n, inp, fds.in)) ||
1671             (ret = compat_get_fd_set(n, outp, fds.out)) ||
1672             (ret = compat_get_fd_set(n, exp, fds.ex)))
1673                 goto out;
1674         zero_fd_set(n, fds.res_in);
1675         zero_fd_set(n, fds.res_out);
1676         zero_fd_set(n, fds.res_ex);
1677
1678         ret = do_select(n, &fds, &timeout);
1679
1680         if (tvp && !(current->personality & STICKY_TIMEOUTS)) {
1681                 time_t sec = 0, usec = 0;
1682                 if (timeout) {
1683                         sec = timeout / HZ;
1684                         usec = timeout % HZ;
1685                         usec *= (1000000/HZ);
1686                 }
1687                 if (put_user(sec, &tvp->tv_sec) ||
1688                     put_user(usec, &tvp->tv_usec))
1689                         ret = -EFAULT;
1690         }
1691
1692         if (ret < 0)
1693                 goto out;
1694         if (!ret) {
1695                 ret = -ERESTARTNOHAND;
1696                 if (signal_pending(current))
1697                         goto out;
1698                 ret = 0;
1699         }
1700
1701         compat_set_fd_set(n, inp, fds.res_in);
1702         compat_set_fd_set(n, outp, fds.res_out);
1703         compat_set_fd_set(n, exp, fds.res_ex);
1704
1705 out:
1706         select_bits_free(bits, size);
1707 out_nofds:
1708         return ret;
1709 }
1710
1711 #if defined(CONFIG_NFSD) || defined(CONFIG_NFSD_MODULE)
1712 /* Stuff for NFS server syscalls... */
1713 struct compat_nfsctl_svc {
1714         u16                     svc32_port;
1715         s32                     svc32_nthreads;
1716 };
1717
1718 struct compat_nfsctl_client {
1719         s8                      cl32_ident[NFSCLNT_IDMAX+1];
1720         s32                     cl32_naddr;
1721         struct in_addr          cl32_addrlist[NFSCLNT_ADDRMAX];
1722         s32                     cl32_fhkeytype;
1723         s32                     cl32_fhkeylen;
1724         u8                      cl32_fhkey[NFSCLNT_KEYMAX];
1725 };
1726
1727 struct compat_nfsctl_export {
1728         char            ex32_client[NFSCLNT_IDMAX+1];
1729         char            ex32_path[NFS_MAXPATHLEN+1];
1730         compat_dev_t    ex32_dev;
1731         compat_ino_t    ex32_ino;
1732         compat_int_t    ex32_flags;
1733         compat_uid_t    ex32_anon_uid;
1734         compat_gid_t    ex32_anon_gid;
1735 };
1736
1737 struct compat_nfsctl_fdparm {
1738         struct sockaddr         gd32_addr;
1739         s8                      gd32_path[NFS_MAXPATHLEN+1];
1740         compat_int_t            gd32_version;
1741 };
1742
1743 struct compat_nfsctl_fsparm {
1744         struct sockaddr         gd32_addr;
1745         s8                      gd32_path[NFS_MAXPATHLEN+1];
1746         compat_int_t            gd32_maxlen;
1747 };
1748
1749 struct compat_nfsctl_arg {
1750         compat_int_t            ca32_version;   /* safeguard */
1751         union {
1752                 struct compat_nfsctl_svc        u32_svc;
1753                 struct compat_nfsctl_client     u32_client;
1754                 struct compat_nfsctl_export     u32_export;
1755                 struct compat_nfsctl_fdparm     u32_getfd;
1756                 struct compat_nfsctl_fsparm     u32_getfs;
1757         } u;
1758 #define ca32_svc        u.u32_svc
1759 #define ca32_client     u.u32_client
1760 #define ca32_export     u.u32_export
1761 #define ca32_getfd      u.u32_getfd
1762 #define ca32_getfs      u.u32_getfs
1763 };
1764
1765 union compat_nfsctl_res {
1766         __u8                    cr32_getfh[NFS_FHSIZE];
1767         struct knfsd_fh         cr32_getfs;
1768 };
1769
1770 static int compat_nfs_svc_trans(struct nfsctl_arg *karg, struct compat_nfsctl_arg __user *arg)
1771 {
1772         int err;
1773
1774         err = access_ok(VERIFY_READ, &arg->ca32_svc, sizeof(arg->ca32_svc));
1775         err |= get_user(karg->ca_version, &arg->ca32_version);
1776         err |= __get_user(karg->ca_svc.svc_port, &arg->ca32_svc.svc32_port);
1777         err |= __get_user(karg->ca_svc.svc_nthreads, &arg->ca32_svc.svc32_nthreads);
1778         return (err) ? -EFAULT : 0;
1779 }
1780
1781 static int compat_nfs_clnt_trans(struct nfsctl_arg *karg, struct compat_nfsctl_arg __user *arg)
1782 {
1783         int err;
1784
1785         err = access_ok(VERIFY_READ, &arg->ca32_client, sizeof(arg->ca32_client));
1786         err |= get_user(karg->ca_version, &arg->ca32_version);
1787         err |= __copy_from_user(&karg->ca_client.cl_ident[0],
1788                           &arg->ca32_client.cl32_ident[0],
1789                           NFSCLNT_IDMAX);
1790         err |= __get_user(karg->ca_client.cl_naddr, &arg->ca32_client.cl32_naddr);
1791         err |= __copy_from_user(&karg->ca_client.cl_addrlist[0],
1792                           &arg->ca32_client.cl32_addrlist[0],
1793                           (sizeof(struct in_addr) * NFSCLNT_ADDRMAX));
1794         err |= __get_user(karg->ca_client.cl_fhkeytype,
1795                       &arg->ca32_client.cl32_fhkeytype);
1796         err |= __get_user(karg->ca_client.cl_fhkeylen,
1797                       &arg->ca32_client.cl32_fhkeylen);
1798         err |= __copy_from_user(&karg->ca_client.cl_fhkey[0],
1799                           &arg->ca32_client.cl32_fhkey[0],
1800                           NFSCLNT_KEYMAX);
1801
1802         return (err) ? -EFAULT : 0;
1803 }
1804
1805 static int compat_nfs_exp_trans(struct nfsctl_arg *karg, struct compat_nfsctl_arg __user *arg)
1806 {
1807         int err;
1808
1809         err = access_ok(VERIFY_READ, &arg->ca32_export, sizeof(arg->ca32_export));
1810         err |= get_user(karg->ca_version, &arg->ca32_version);
1811         err |= __copy_from_user(&karg->ca_export.ex_client[0],
1812                           &arg->ca32_export.ex32_client[0],
1813                           NFSCLNT_IDMAX);
1814         err |= __copy_from_user(&karg->ca_export.ex_path[0],
1815                           &arg->ca32_export.ex32_path[0],
1816                           NFS_MAXPATHLEN);
1817         err |= __get_user(karg->ca_export.ex_dev,
1818                       &arg->ca32_export.ex32_dev);
1819         err |= __get_user(karg->ca_export.ex_ino,
1820                       &arg->ca32_export.ex32_ino);
1821         err |= __get_user(karg->ca_export.ex_flags,
1822                       &arg->ca32_export.ex32_flags);
1823         err |= __get_user(karg->ca_export.ex_anon_uid,
1824                       &arg->ca32_export.ex32_anon_uid);
1825         err |= __get_user(karg->ca_export.ex_anon_gid,
1826                       &arg->ca32_export.ex32_anon_gid);
1827         SET_UID(karg->ca_export.ex_anon_uid, karg->ca_export.ex_anon_uid);
1828         SET_GID(karg->ca_export.ex_anon_gid, karg->ca_export.ex_anon_gid);
1829
1830         return (err) ? -EFAULT : 0;
1831 }
1832
1833 static int compat_nfs_getfd_trans(struct nfsctl_arg *karg, struct compat_nfsctl_arg __user *arg)
1834 {
1835         int err;
1836
1837         err = access_ok(VERIFY_READ, &arg->ca32_getfd, sizeof(arg->ca32_getfd));
1838         err |= get_user(karg->ca_version, &arg->ca32_version);
1839         err |= __copy_from_user(&karg->ca_getfd.gd_addr,
1840                           &arg->ca32_getfd.gd32_addr,
1841                           (sizeof(struct sockaddr)));
1842         err |= __copy_from_user(&karg->ca_getfd.gd_path,
1843                           &arg->ca32_getfd.gd32_path,
1844                           (NFS_MAXPATHLEN+1));
1845         err |= __get_user(karg->ca_getfd.gd_version,
1846                       &arg->ca32_getfd.gd32_version);
1847
1848         return (err) ? -EFAULT : 0;
1849 }
1850
1851 static int compat_nfs_getfs_trans(struct nfsctl_arg *karg, struct compat_nfsctl_arg __user *arg)
1852 {
1853         int err;
1854
1855         err = access_ok(VERIFY_READ, &arg->ca32_getfs, sizeof(arg->ca32_getfs));
1856         err |= get_user(karg->ca_version, &arg->ca32_version);
1857         err |= __copy_from_user(&karg->ca_getfs.gd_addr,
1858                           &arg->ca32_getfs.gd32_addr,
1859                           (sizeof(struct sockaddr)));
1860         err |= __copy_from_user(&karg->ca_getfs.gd_path,
1861                           &arg->ca32_getfs.gd32_path,
1862                           (NFS_MAXPATHLEN+1));
1863         err |= __get_user(karg->ca_getfs.gd_maxlen,
1864                       &arg->ca32_getfs.gd32_maxlen);
1865
1866         return (err) ? -EFAULT : 0;
1867 }
1868
1869 /* This really doesn't need translations, we are only passing
1870  * back a union which contains opaque nfs file handle data.
1871  */
1872 static int compat_nfs_getfh_res_trans(union nfsctl_res *kres, union compat_nfsctl_res __user *res)
1873 {
1874         int err;
1875
1876         err = copy_to_user(res, kres, sizeof(*res));
1877
1878         return (err) ? -EFAULT : 0;
1879 }
1880
1881 asmlinkage long compat_sys_nfsservctl(int cmd, struct compat_nfsctl_arg __user *arg,
1882                                         union compat_nfsctl_res __user *res)
1883 {
1884         struct nfsctl_arg *karg;
1885         union nfsctl_res *kres;
1886         mm_segment_t oldfs;
1887         int err;
1888
1889         karg = kmalloc(sizeof(*karg), GFP_USER);
1890         kres = kmalloc(sizeof(*kres), GFP_USER);
1891         if(!karg || !kres) {
1892                 err = -ENOMEM;
1893                 goto done;
1894         }
1895
1896         switch(cmd) {
1897         case NFSCTL_SVC:
1898                 err = compat_nfs_svc_trans(karg, arg);
1899                 break;
1900
1901         case NFSCTL_ADDCLIENT:
1902                 err = compat_nfs_clnt_trans(karg, arg);
1903                 break;
1904
1905         case NFSCTL_DELCLIENT:
1906                 err = compat_nfs_clnt_trans(karg, arg);
1907                 break;
1908
1909         case NFSCTL_EXPORT:
1910         case NFSCTL_UNEXPORT:
1911                 err = compat_nfs_exp_trans(karg, arg);
1912                 break;
1913
1914         case NFSCTL_GETFD:
1915                 err = compat_nfs_getfd_trans(karg, arg);
1916                 break;
1917
1918         case NFSCTL_GETFS:
1919                 err = compat_nfs_getfs_trans(karg, arg);
1920                 break;
1921
1922         default:
1923                 err = -EINVAL;
1924                 goto done;
1925         }
1926
1927         oldfs = get_fs();
1928         set_fs(KERNEL_DS);
1929         /* The __user pointer casts are valid because of the set_fs() */
1930         err = sys_nfsservctl(cmd, (void __user *) karg, (void __user *) kres);
1931         set_fs(oldfs);
1932
1933         if (err)
1934                 goto done;
1935
1936         if((cmd == NFSCTL_GETFD) ||
1937            (cmd == NFSCTL_GETFS))
1938                 err = compat_nfs_getfh_res_trans(kres, res);
1939
1940 done:
1941         kfree(karg);
1942         kfree(kres);
1943         return err;
1944 }
1945 #else /* !NFSD */
1946 long asmlinkage compat_sys_nfsservctl(int cmd, void *notused, void *notused2)
1947 {
1948         return sys_ni_syscall();
1949 }
1950 #endif