patch-2_6_7-vs1_9_1_12
[linux-2.6.git] / fs / open.c
1 /*
2  *  linux/fs/open.c
3  *
4  *  Copyright (C) 1991, 1992  Linus Torvalds
5  */
6
7 #include <linux/string.h>
8 #include <linux/mm.h>
9 #include <linux/utime.h>
10 #include <linux/file.h>
11 #include <linux/smp_lock.h>
12 #include <linux/quotaops.h>
13 #include <linux/dnotify.h>
14 #include <linux/module.h>
15 #include <linux/slab.h>
16 #include <linux/tty.h>
17 #include <linux/namei.h>
18 #include <linux/backing-dev.h>
19 #include <linux/security.h>
20 #include <linux/mount.h>
21 #include <linux/vfs.h>
22 #include <asm/uaccess.h>
23 #include <linux/fs.h>
24 #include <linux/pagemap.h>
25 #include <linux/vs_base.h>
26 #include <linux/vs_limit.h>
27 #include <linux/vs_dlimit.h>
28 #include <linux/vserver/xid.h>
29
30 #include <asm/unistd.h>
31
32 int vfs_statfs(struct super_block *sb, struct kstatfs *buf)
33 {
34         int retval = -ENODEV;
35
36         if (sb) {
37                 retval = -ENOSYS;
38                 if (sb->s_op->statfs) {
39                         memset(buf, 0, sizeof(*buf));
40                         retval = security_sb_statfs(sb);
41                         if (retval)
42                                 return retval;
43                         retval = sb->s_op->statfs(sb, buf);
44                         if (retval == 0 && buf->f_frsize == 0)
45                                 buf->f_frsize = buf->f_bsize;
46                 }
47                 if (!vx_check(0, VX_ADMIN|VX_WATCH))
48                         vx_vsi_statfs(sb, buf);
49         }
50         return retval;
51 }
52
53 EXPORT_SYMBOL(vfs_statfs);
54
55 static int vfs_statfs_native(struct super_block *sb, struct statfs *buf)
56 {
57         struct kstatfs st;
58         int retval;
59
60         retval = vfs_statfs(sb, &st);
61         if (retval)
62                 return retval;
63
64         if (sizeof(*buf) == sizeof(st))
65                 memcpy(buf, &st, sizeof(st));
66         else {
67                 if (sizeof buf->f_blocks == 4) {
68                         if ((st.f_blocks | st.f_bfree | st.f_bavail) &
69                             0xffffffff00000000ULL)
70                                 return -EOVERFLOW;
71                         /*
72                          * f_files and f_ffree may be -1; it's okay to stuff
73                          * that into 32 bits
74                          */
75                         if (st.f_files != -1 &&
76                             (st.f_files & 0xffffffff00000000ULL))
77                                 return -EOVERFLOW;
78                         if (st.f_ffree != -1 &&
79                             (st.f_ffree & 0xffffffff00000000ULL))
80                                 return -EOVERFLOW;
81                 }
82
83                 buf->f_type = st.f_type;
84                 buf->f_bsize = st.f_bsize;
85                 buf->f_blocks = st.f_blocks;
86                 buf->f_bfree = st.f_bfree;
87                 buf->f_bavail = st.f_bavail;
88                 buf->f_files = st.f_files;
89                 buf->f_ffree = st.f_ffree;
90                 buf->f_fsid = st.f_fsid;
91                 buf->f_namelen = st.f_namelen;
92                 buf->f_frsize = st.f_frsize;
93                 memset(buf->f_spare, 0, sizeof(buf->f_spare));
94         }
95         return 0;
96 }
97
98 static int vfs_statfs64(struct super_block *sb, struct statfs64 *buf)
99 {
100         struct kstatfs st;
101         int retval;
102
103         retval = vfs_statfs(sb, &st);
104         if (retval)
105                 return retval;
106
107         if (sizeof(*buf) == sizeof(st))
108                 memcpy(buf, &st, sizeof(st));
109         else {
110                 buf->f_type = st.f_type;
111                 buf->f_bsize = st.f_bsize;
112                 buf->f_blocks = st.f_blocks;
113                 buf->f_bfree = st.f_bfree;
114                 buf->f_bavail = st.f_bavail;
115                 buf->f_files = st.f_files;
116                 buf->f_ffree = st.f_ffree;
117                 buf->f_fsid = st.f_fsid;
118                 buf->f_namelen = st.f_namelen;
119                 buf->f_frsize = st.f_frsize;
120                 memset(buf->f_spare, 0, sizeof(buf->f_spare));
121         }
122         return 0;
123 }
124
125 asmlinkage long sys_statfs(const char __user * path, struct statfs __user * buf)
126 {
127         struct nameidata nd;
128         int error;
129
130         error = user_path_walk(path, &nd);
131         if (!error) {
132                 struct statfs tmp;
133                 error = vfs_statfs_native(nd.dentry->d_inode->i_sb, &tmp);
134                 if (!error && copy_to_user(buf, &tmp, sizeof(tmp)))
135                         error = -EFAULT;
136                 path_release(&nd);
137         }
138         return error;
139 }
140
141
142 asmlinkage long sys_statfs64(const char __user *path, size_t sz, struct statfs64 __user *buf)
143 {
144         struct nameidata nd;
145         long error;
146
147         if (sz != sizeof(*buf))
148                 return -EINVAL;
149         error = user_path_walk(path, &nd);
150         if (!error) {
151                 struct statfs64 tmp;
152                 error = vfs_statfs64(nd.dentry->d_inode->i_sb, &tmp);
153                 if (!error && copy_to_user(buf, &tmp, sizeof(tmp)))
154                         error = -EFAULT;
155                 path_release(&nd);
156         }
157         return error;
158 }
159
160
161 asmlinkage long sys_fstatfs(unsigned int fd, struct statfs __user * buf)
162 {
163         struct file * file;
164         struct statfs tmp;
165         int error;
166
167         error = -EBADF;
168         file = fget(fd);
169         if (!file)
170                 goto out;
171         error = vfs_statfs_native(file->f_dentry->d_inode->i_sb, &tmp);
172         if (!error && copy_to_user(buf, &tmp, sizeof(tmp)))
173                 error = -EFAULT;
174         fput(file);
175 out:
176         return error;
177 }
178
179 asmlinkage long sys_fstatfs64(unsigned int fd, size_t sz, struct statfs64 __user *buf)
180 {
181         struct file * file;
182         struct statfs64 tmp;
183         int error;
184
185         if (sz != sizeof(*buf))
186                 return -EINVAL;
187
188         error = -EBADF;
189         file = fget(fd);
190         if (!file)
191                 goto out;
192         error = vfs_statfs64(file->f_dentry->d_inode->i_sb, &tmp);
193         if (!error && copy_to_user(buf, &tmp, sizeof(tmp)))
194                 error = -EFAULT;
195         fput(file);
196 out:
197         return error;
198 }
199
200 int do_truncate(struct dentry *dentry, loff_t length)
201 {
202         int err;
203         struct iattr newattrs;
204
205         /* Not pretty: "inode->i_size" shouldn't really be signed. But it is. */
206         if (length < 0)
207                 return -EINVAL;
208
209         newattrs.ia_size = length;
210         newattrs.ia_valid = ATTR_SIZE | ATTR_CTIME;
211         down(&dentry->d_inode->i_sem);
212         down_write(&dentry->d_inode->i_alloc_sem);
213         err = notify_change(dentry, &newattrs);
214         up_write(&dentry->d_inode->i_alloc_sem);
215         up(&dentry->d_inode->i_sem);
216         return err;
217 }
218
219 static inline long do_sys_truncate(const char __user * path, loff_t length)
220 {
221         struct nameidata nd;
222         struct inode * inode;
223         int error;
224
225         error = -EINVAL;
226         if (length < 0) /* sorry, but loff_t says... */
227                 goto out;
228
229         error = user_path_walk(path, &nd);
230         if (error)
231                 goto out;
232         inode = nd.dentry->d_inode;
233
234         /* For directories it's -EISDIR, for other non-regulars - -EINVAL */
235         error = -EISDIR;
236         if (S_ISDIR(inode->i_mode))
237                 goto dput_and_out;
238
239         error = -EINVAL;
240         if (!S_ISREG(inode->i_mode))
241                 goto dput_and_out;
242
243         error = permission(inode,MAY_WRITE,&nd);
244         if (error)
245                 goto dput_and_out;
246
247         error = -EROFS;
248         if (IS_RDONLY(inode))
249                 goto dput_and_out;
250
251         error = -EPERM;
252         if (IS_IMMUTABLE(inode) || IS_APPEND(inode))
253                 goto dput_and_out;
254
255         /*
256          * Make sure that there are no leases.
257          */
258         error = break_lease(inode, FMODE_WRITE);
259         if (error)
260                 goto dput_and_out;
261
262         error = get_write_access(inode);
263         if (error)
264                 goto dput_and_out;
265
266         error = locks_verify_truncate(inode, NULL, length);
267         if (!error) {
268                 DQUOT_INIT(inode);
269                 error = do_truncate(nd.dentry, length);
270         }
271         put_write_access(inode);
272
273 dput_and_out:
274         path_release(&nd);
275 out:
276         return error;
277 }
278
279 asmlinkage long sys_truncate(const char __user * path, unsigned long length)
280 {
281         /* on 32-bit boxen it will cut the range 2^31--2^32-1 off */
282         return do_sys_truncate(path, (long)length);
283 }
284
285 static inline long do_sys_ftruncate(unsigned int fd, loff_t length, int small)
286 {
287         struct inode * inode;
288         struct dentry *dentry;
289         struct file * file;
290         int error;
291
292         error = -EINVAL;
293         if (length < 0)
294                 goto out;
295         error = -EBADF;
296         file = fget(fd);
297         if (!file)
298                 goto out;
299
300         /* explicitly opened as large or we are on 64-bit box */
301         if (file->f_flags & O_LARGEFILE)
302                 small = 0;
303
304         dentry = file->f_dentry;
305         inode = dentry->d_inode;
306         error = -EINVAL;
307         if (!S_ISREG(inode->i_mode) || !(file->f_mode & FMODE_WRITE))
308                 goto out_putf;
309
310         error = -EINVAL;
311         /* Cannot ftruncate over 2^31 bytes without large file support */
312         if (small && length > MAX_NON_LFS)
313                 goto out_putf;
314
315         error = -EPERM;
316         if (IS_APPEND(inode))
317                 goto out_putf;
318
319         error = locks_verify_truncate(inode, file, length);
320         if (!error)
321                 error = do_truncate(dentry, length);
322 out_putf:
323         fput(file);
324 out:
325         return error;
326 }
327
328 asmlinkage long sys_ftruncate(unsigned int fd, unsigned long length)
329 {
330         return do_sys_ftruncate(fd, length, 1);
331 }
332
333 /* LFS versions of truncate are only needed on 32 bit machines */
334 #if BITS_PER_LONG == 32
335 asmlinkage long sys_truncate64(const char __user * path, loff_t length)
336 {
337         return do_sys_truncate(path, length);
338 }
339
340 asmlinkage long sys_ftruncate64(unsigned int fd, loff_t length)
341 {
342         return do_sys_ftruncate(fd, length, 0);
343 }
344 #endif
345
346 #ifdef __ARCH_WANT_SYS_UTIME
347
348 /*
349  * sys_utime() can be implemented in user-level using sys_utimes().
350  * Is this for backwards compatibility?  If so, why not move it
351  * into the appropriate arch directory (for those architectures that
352  * need it).
353  */
354
355 /* If times==NULL, set access and modification to current time,
356  * must be owner or have write permission.
357  * Else, update from *times, must be owner or super user.
358  */
359 asmlinkage long sys_utime(char __user * filename, struct utimbuf __user * times)
360 {
361         int error;
362         struct nameidata nd;
363         struct inode * inode;
364         struct iattr newattrs;
365
366         error = user_path_walk(filename, &nd);
367         if (error)
368                 goto out;
369         inode = nd.dentry->d_inode;
370
371         error = -EROFS;
372         if (IS_RDONLY(inode))
373                 goto dput_and_out;
374
375         /* Don't worry, the checks are done in inode_change_ok() */
376         newattrs.ia_valid = ATTR_CTIME | ATTR_MTIME | ATTR_ATIME;
377         if (times) {
378                 error = -EPERM;
379                 if (IS_APPEND(inode) || IS_IMMUTABLE(inode))
380                         goto dput_and_out;
381
382                 error = get_user(newattrs.ia_atime.tv_sec, &times->actime);
383                 newattrs.ia_atime.tv_nsec = 0;
384                 if (!error) 
385                         error = get_user(newattrs.ia_mtime.tv_sec, &times->modtime);
386                 newattrs.ia_mtime.tv_nsec = 0;
387                 if (error)
388                         goto dput_and_out;
389
390                 newattrs.ia_valid |= ATTR_ATIME_SET | ATTR_MTIME_SET;
391         } else {
392                 error = -EACCES;
393                 if (IS_IMMUTABLE(inode))
394                         goto dput_and_out;
395
396                 if (current->fsuid != inode->i_uid &&
397                     (error = permission(inode,MAY_WRITE,&nd)) != 0)
398                         goto dput_and_out;
399         }
400         down(&inode->i_sem);
401         error = notify_change(nd.dentry, &newattrs);
402         up(&inode->i_sem);
403 dput_and_out:
404         path_release(&nd);
405 out:
406         return error;
407 }
408
409 #endif
410
411 /* If times==NULL, set access and modification to current time,
412  * must be owner or have write permission.
413  * Else, update from *times, must be owner or super user.
414  */
415 long do_utimes(char __user * filename, struct timeval * times)
416 {
417         int error;
418         struct nameidata nd;
419         struct inode * inode;
420         struct iattr newattrs;
421
422         error = user_path_walk(filename, &nd);
423
424         if (error)
425                 goto out;
426         inode = nd.dentry->d_inode;
427
428         error = -EROFS;
429         if (IS_RDONLY(inode))
430                 goto dput_and_out;
431
432         /* Don't worry, the checks are done in inode_change_ok() */
433         newattrs.ia_valid = ATTR_CTIME | ATTR_MTIME | ATTR_ATIME;
434         if (times) {
435                 error = -EPERM;
436                 if (IS_APPEND(inode) || IS_IMMUTABLE(inode))
437                         goto dput_and_out;
438
439                 newattrs.ia_atime.tv_sec = times[0].tv_sec;
440                 newattrs.ia_atime.tv_nsec = times[0].tv_usec * 1000;
441                 newattrs.ia_mtime.tv_sec = times[1].tv_sec;
442                 newattrs.ia_mtime.tv_nsec = times[1].tv_usec * 1000;
443                 newattrs.ia_valid |= ATTR_ATIME_SET | ATTR_MTIME_SET;
444         } else {
445                 error = -EACCES;
446                 if (IS_IMMUTABLE(inode))
447                         goto dput_and_out;
448
449                 if (current->fsuid != inode->i_uid &&
450                     (error = permission(inode,MAY_WRITE,&nd)) != 0)
451                         goto dput_and_out;
452         }
453         down(&inode->i_sem);
454         error = notify_change(nd.dentry, &newattrs);
455         up(&inode->i_sem);
456 dput_and_out:
457         path_release(&nd);
458 out:
459         return error;
460 }
461
462 asmlinkage long sys_utimes(char __user * filename, struct timeval __user * utimes)
463 {
464         struct timeval times[2];
465
466         if (utimes && copy_from_user(&times, utimes, sizeof(times)))
467                 return -EFAULT;
468         return do_utimes(filename, utimes ? times : NULL);
469 }
470
471
472 /*
473  * access() needs to use the real uid/gid, not the effective uid/gid.
474  * We do this by temporarily clearing all FS-related capabilities and
475  * switching the fsuid/fsgid around to the real ones.
476  */
477 asmlinkage long sys_access(const char __user * filename, int mode)
478 {
479         struct nameidata nd;
480         int old_fsuid, old_fsgid;
481         kernel_cap_t old_cap;
482         int res;
483
484         if (mode & ~S_IRWXO)    /* where's F_OK, X_OK, W_OK, R_OK? */
485                 return -EINVAL;
486
487         old_fsuid = current->fsuid;
488         old_fsgid = current->fsgid;
489         old_cap = current->cap_effective;
490
491         current->fsuid = current->uid;
492         current->fsgid = current->gid;
493
494         /*
495          * Clear the capabilities if we switch to a non-root user
496          *
497          * FIXME: There is a race here against sys_capset.  The
498          * capabilities can change yet we will restore the old
499          * value below.  We should hold task_capabilities_lock,
500          * but we cannot because user_path_walk can sleep.
501          */
502         if (current->uid)
503                 cap_clear(current->cap_effective);
504         else
505                 current->cap_effective = current->cap_permitted;
506
507         res = __user_walk(filename, LOOKUP_FOLLOW|LOOKUP_ACCESS, &nd);
508         if (!res) {
509                 res = permission(nd.dentry->d_inode, mode, &nd);
510                 /* SuS v2 requires we report a read only fs too */
511                 if(!res && (mode & S_IWOTH) && IS_RDONLY(nd.dentry->d_inode)
512                    && !special_file(nd.dentry->d_inode->i_mode))
513                         res = -EROFS;
514                 path_release(&nd);
515         }
516
517         current->fsuid = old_fsuid;
518         current->fsgid = old_fsgid;
519         current->cap_effective = old_cap;
520
521         return res;
522 }
523
524 asmlinkage long sys_chdir(const char __user * filename)
525 {
526         struct nameidata nd;
527         int error;
528
529         error = __user_walk(filename, LOOKUP_FOLLOW|LOOKUP_DIRECTORY, &nd);
530         if (error)
531                 goto out;
532
533         error = permission(nd.dentry->d_inode,MAY_EXEC,&nd);
534         if (error)
535                 goto dput_and_out;
536
537         set_fs_pwd(current->fs, nd.mnt, nd.dentry);
538
539 dput_and_out:
540         path_release(&nd);
541 out:
542         return error;
543 }
544
545 asmlinkage long sys_fchdir(unsigned int fd)
546 {
547         struct file *file;
548         struct dentry *dentry;
549         struct inode *inode;
550         struct vfsmount *mnt;
551         int error;
552
553         error = -EBADF;
554         file = fget(fd);
555         if (!file)
556                 goto out;
557
558         dentry = file->f_dentry;
559         mnt = file->f_vfsmnt;
560         inode = dentry->d_inode;
561
562         error = -ENOTDIR;
563         if (!S_ISDIR(inode->i_mode))
564                 goto out_putf;
565
566         error = permission(inode, MAY_EXEC, NULL);
567         if (!error)
568                 set_fs_pwd(current->fs, mnt, dentry);
569 out_putf:
570         fput(file);
571 out:
572         return error;
573 }
574
575 asmlinkage long sys_chroot(const char __user * filename)
576 {
577         struct nameidata nd;
578         int error;
579
580         error = __user_walk(filename, LOOKUP_FOLLOW | LOOKUP_DIRECTORY | LOOKUP_NOALT, &nd);
581         if (error)
582                 goto out;
583
584         error = permission(nd.dentry->d_inode,MAY_EXEC,&nd);
585         if (error)
586                 goto dput_and_out;
587
588         error = -EPERM;
589         if (!capable(CAP_SYS_CHROOT))
590                 goto dput_and_out;
591
592         set_fs_root(current->fs, nd.mnt, nd.dentry);
593         set_fs_altroot();
594         error = 0;
595 dput_and_out:
596         path_release(&nd);
597 out:
598         return error;
599 }
600
601 asmlinkage long sys_fchmod(unsigned int fd, mode_t mode)
602 {
603         struct inode * inode;
604         struct dentry * dentry;
605         struct file * file;
606         int err = -EBADF;
607         struct iattr newattrs;
608
609         file = fget(fd);
610         if (!file)
611                 goto out;
612
613         dentry = file->f_dentry;
614         inode = dentry->d_inode;
615
616         err = -EPERM;
617         if (IS_BARRIER(inode) && !vx_check(0, VX_ADMIN))
618                 goto out_putf;
619         err = -EROFS;
620         if (IS_RDONLY(inode))
621                 goto out_putf;
622         err = -EPERM;
623         if (IS_IMMUTABLE(inode) || IS_APPEND(inode))
624                 goto out_putf;
625         down(&inode->i_sem);
626         if (mode == (mode_t) -1)
627                 mode = inode->i_mode;
628         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
629         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
630         err = notify_change(dentry, &newattrs);
631         up(&inode->i_sem);
632
633 out_putf:
634         fput(file);
635 out:
636         return err;
637 }
638
639 asmlinkage long sys_chmod(const char __user * filename, mode_t mode)
640 {
641         struct nameidata nd;
642         struct inode * inode;
643         int error;
644         struct iattr newattrs;
645
646         error = user_path_walk(filename, &nd);
647         if (error)
648                 goto out;
649         inode = nd.dentry->d_inode;
650
651         error = -EPERM;
652         if (IS_BARRIER(inode) && !vx_check(0, VX_ADMIN))
653                 goto dput_and_out;
654
655         error = -EROFS;
656         if (IS_RDONLY(inode))
657                 goto dput_and_out;
658
659         error = -EPERM;
660         if (IS_IMMUTABLE(inode) || IS_APPEND(inode))
661                 goto dput_and_out;
662
663         down(&inode->i_sem);
664         if (mode == (mode_t) -1)
665                 mode = inode->i_mode;
666         newattrs.ia_mode = (mode & S_IALLUGO) | (inode->i_mode & ~S_IALLUGO);
667         newattrs.ia_valid = ATTR_MODE | ATTR_CTIME;
668         error = notify_change(nd.dentry, &newattrs);
669         up(&inode->i_sem);
670
671 dput_and_out:
672         path_release(&nd);
673 out:
674         return error;
675 }
676
677 static int chown_common(struct dentry * dentry, uid_t user, gid_t group)
678 {
679         struct inode * inode;
680         int error;
681         struct iattr newattrs;
682
683         error = -ENOENT;
684         if (!(inode = dentry->d_inode)) {
685                 printk(KERN_ERR "chown_common: NULL inode\n");
686                 goto out;
687         }
688         error = -EROFS;
689         if (IS_RDONLY(inode))
690                 goto out;
691         error = -EPERM;
692         if (IS_IMMUTABLE(inode) || IS_APPEND(inode))
693                 goto out;
694
695         newattrs.ia_valid =  ATTR_CTIME;
696         if (user != (uid_t) -1) {
697                 newattrs.ia_valid |= ATTR_UID;
698                 newattrs.ia_uid = vx_map_uid(user);
699         }
700         if (group != (gid_t) -1) {
701                 newattrs.ia_valid |= ATTR_GID;
702                 newattrs.ia_gid = vx_map_gid(group);
703         }
704         if (!S_ISDIR(inode->i_mode))
705                 newattrs.ia_valid |= ATTR_KILL_SUID|ATTR_KILL_SGID;
706         down(&inode->i_sem);
707         error = notify_change(dentry, &newattrs);
708         up(&inode->i_sem);
709 out:
710         return error;
711 }
712
713 asmlinkage long sys_chown(const char __user * filename, uid_t user, gid_t group)
714 {
715         struct nameidata nd;
716         int error;
717
718         error = user_path_walk(filename, &nd);
719         if (!error) {
720                 error = chown_common(nd.dentry, user, group);
721                 path_release(&nd);
722         }
723         return error;
724 }
725
726 asmlinkage long sys_lchown(const char __user * filename, uid_t user, gid_t group)
727 {
728         struct nameidata nd;
729         int error;
730
731         error = user_path_walk_link(filename, &nd);
732         if (!error) {
733                 error = chown_common(nd.dentry, user, group);
734                 path_release(&nd);
735         }
736         return error;
737 }
738
739
740 asmlinkage long sys_fchown(unsigned int fd, uid_t user, gid_t group)
741 {
742         struct file * file;
743         int error = -EBADF;
744
745         file = fget(fd);
746         if (file) {
747                 error = chown_common(file->f_dentry, user, group);
748                 fput(file);
749         }
750         return error;
751 }
752
753 /*
754  * Note that while the flag value (low two bits) for sys_open means:
755  *      00 - read-only
756  *      01 - write-only
757  *      10 - read-write
758  *      11 - special
759  * it is changed into
760  *      00 - no permissions needed
761  *      01 - read-permission
762  *      10 - write-permission
763  *      11 - read-write
764  * for the internal routines (ie open_namei()/follow_link() etc). 00 is
765  * used by symlinks.
766  */
767 struct file *filp_open(const char * filename, int flags, int mode)
768 {
769         int namei_flags, error;
770         struct nameidata nd;
771
772         namei_flags = flags;
773         if ((namei_flags+1) & O_ACCMODE)
774                 namei_flags++;
775         if (namei_flags & O_TRUNC)
776                 namei_flags |= 2;
777
778         error = open_namei(filename, namei_flags, mode, &nd);
779         if (!error)
780                 return dentry_open(nd.dentry, nd.mnt, flags);
781
782         return ERR_PTR(error);
783 }
784
785 EXPORT_SYMBOL(filp_open);
786
787 struct file *dentry_open(struct dentry *dentry, struct vfsmount *mnt, int flags)
788 {
789         struct file * f;
790         struct inode *inode;
791         int error;
792
793         error = -ENFILE;
794         f = get_empty_filp();
795         if (!f)
796                 goto cleanup_dentry;
797         f->f_flags = flags;
798         f->f_mode = (flags+1) & O_ACCMODE;
799         inode = dentry->d_inode;
800         if (f->f_mode & FMODE_WRITE) {
801                 error = get_write_access(inode);
802                 if (error)
803                         goto cleanup_file;
804         }
805
806         f->f_mapping = inode->i_mapping;
807         f->f_dentry = dentry;
808         f->f_vfsmnt = mnt;
809         f->f_pos = 0;
810         f->f_op = fops_get(inode->i_fop);
811         file_move(f, &inode->i_sb->s_files);
812
813         if (f->f_op && f->f_op->open) {
814                 error = f->f_op->open(inode,f);
815                 if (error)
816                         goto cleanup_all;
817         }
818         f->f_flags &= ~(O_CREAT | O_EXCL | O_NOCTTY | O_TRUNC);
819
820         file_ra_state_init(&f->f_ra, f->f_mapping->host->i_mapping);
821
822         /* NB: we're sure to have correct a_ops only after f_op->open */
823         if (f->f_flags & O_DIRECT) {
824                 if (!f->f_mapping->a_ops || !f->f_mapping->a_ops->direct_IO) {
825                         fput(f);
826                         f = ERR_PTR(-EINVAL);
827                 }
828         }
829
830         return f;
831
832 cleanup_all:
833         fops_put(f->f_op);
834         if (f->f_mode & FMODE_WRITE)
835                 put_write_access(inode);
836         file_kill(f);
837         f->f_dentry = NULL;
838         f->f_vfsmnt = NULL;
839 cleanup_file:
840         put_filp(f);
841 cleanup_dentry:
842         dput(dentry);
843         mntput(mnt);
844         return ERR_PTR(error);
845 }
846
847 EXPORT_SYMBOL(dentry_open);
848
849 /*
850  * Find an empty file descriptor entry, and mark it busy.
851  */
852 int get_unused_fd(void)
853 {
854         struct files_struct * files = current->files;
855         int fd, error;
856
857         error = -EMFILE;
858         spin_lock(&files->file_lock);
859
860 repeat:
861         fd = find_next_zero_bit(files->open_fds->fds_bits, 
862                                 files->max_fdset, 
863                                 files->next_fd);
864
865         /*
866          * N.B. For clone tasks sharing a files structure, this test
867          * will limit the total number of files that can be opened.
868          */
869         if (fd >= current->rlim[RLIMIT_NOFILE].rlim_cur)
870                 goto out;
871
872         /* Do we need to expand the fdset array? */
873         if (fd >= files->max_fdset) {
874                 error = expand_fdset(files, fd);
875                 if (!error) {
876                         error = -EMFILE;
877                         goto repeat;
878                 }
879                 goto out;
880         }
881         
882         /* 
883          * Check whether we need to expand the fd array.
884          */
885         if (fd >= files->max_fds) {
886                 error = expand_fd_array(files, fd);
887                 if (!error) {
888                         error = -EMFILE;
889                         goto repeat;
890                 }
891                 goto out;
892         }
893
894         FD_SET(fd, files->open_fds);
895         FD_CLR(fd, files->close_on_exec);
896         files->next_fd = fd + 1;
897         vx_openfd_inc(fd);
898 #if 1
899         /* Sanity check */
900         if (files->fd[fd] != NULL) {
901                 printk(KERN_WARNING "get_unused_fd: slot %d not NULL!\n", fd);
902                 files->fd[fd] = NULL;
903         }
904 #endif
905         error = fd;
906
907 out:
908         spin_unlock(&files->file_lock);
909         return error;
910 }
911
912 EXPORT_SYMBOL(get_unused_fd);
913
914 static inline void __put_unused_fd(struct files_struct *files, unsigned int fd)
915 {
916         __FD_CLR(fd, files->open_fds);
917         if (fd < files->next_fd)
918                 files->next_fd = fd;
919         vx_openfd_dec(fd);
920 }
921
922 void fastcall put_unused_fd(unsigned int fd)
923 {
924         struct files_struct *files = current->files;
925         spin_lock(&files->file_lock);
926         __put_unused_fd(files, fd);
927         spin_unlock(&files->file_lock);
928 }
929
930 EXPORT_SYMBOL(put_unused_fd);
931
932 /*
933  * Install a file pointer in the fd array.  
934  *
935  * The VFS is full of places where we drop the files lock between
936  * setting the open_fds bitmap and installing the file in the file
937  * array.  At any such point, we are vulnerable to a dup2() race
938  * installing a file in the array before us.  We need to detect this and
939  * fput() the struct file we are about to overwrite in this case.
940  *
941  * It should never happen - if we allow dup2() do it, _really_ bad things
942  * will follow.
943  */
944
945 void fastcall fd_install(unsigned int fd, struct file * file)
946 {
947         struct files_struct *files = current->files;
948         spin_lock(&files->file_lock);
949         if (unlikely(files->fd[fd] != NULL))
950                 BUG();
951         files->fd[fd] = file;
952         spin_unlock(&files->file_lock);
953 }
954
955 EXPORT_SYMBOL(fd_install);
956
957 asmlinkage long sys_open(const char __user * filename, int flags, int mode)
958 {
959         char * tmp;
960         int fd, error;
961
962 #if BITS_PER_LONG != 32
963         flags |= O_LARGEFILE;
964 #endif
965         tmp = getname(filename);
966         fd = PTR_ERR(tmp);
967         if (!IS_ERR(tmp)) {
968                 fd = get_unused_fd();
969                 if (fd >= 0) {
970                         struct file *f = filp_open(tmp, flags, mode);
971                         error = PTR_ERR(f);
972                         if (IS_ERR(f))
973                                 goto out_error;
974                         fd_install(fd, f);
975                 }
976 out:
977                 putname(tmp);
978         }
979         return fd;
980
981 out_error:
982         put_unused_fd(fd);
983         fd = error;
984         goto out;
985 }
986 EXPORT_SYMBOL_GPL(sys_open);
987
988 #ifndef __alpha__
989
990 /*
991  * For backward compatibility?  Maybe this should be moved
992  * into arch/i386 instead?
993  */
994 asmlinkage long sys_creat(const char __user * pathname, int mode)
995 {
996         return sys_open(pathname, O_CREAT | O_WRONLY | O_TRUNC, mode);
997 }
998
999 #endif
1000
1001 /*
1002  * "id" is the POSIX thread ID. We use the
1003  * files pointer for this..
1004  */
1005 int filp_close(struct file *filp, fl_owner_t id)
1006 {
1007         int retval;
1008
1009         /* Report and clear outstanding errors */
1010         retval = filp->f_error;
1011         if (retval)
1012                 filp->f_error = 0;
1013
1014         if (!file_count(filp)) {
1015                 printk(KERN_ERR "VFS: Close: file count is 0\n");
1016                 return retval;
1017         }
1018
1019         if (filp->f_op && filp->f_op->flush) {
1020                 int err = filp->f_op->flush(filp);
1021                 if (!retval)
1022                         retval = err;
1023         }
1024
1025         dnotify_flush(filp, id);
1026         locks_remove_posix(filp, id);
1027         fput(filp);
1028         return retval;
1029 }
1030
1031 EXPORT_SYMBOL(filp_close);
1032
1033 /*
1034  * Careful here! We test whether the file pointer is NULL before
1035  * releasing the fd. This ensures that one clone task can't release
1036  * an fd while another clone is opening it.
1037  */
1038 asmlinkage long sys_close(unsigned int fd)
1039 {
1040         struct file * filp;
1041         struct files_struct *files = current->files;
1042
1043         spin_lock(&files->file_lock);
1044         if (fd >= files->max_fds)
1045                 goto out_unlock;
1046         filp = files->fd[fd];
1047         if (!filp)
1048                 goto out_unlock;
1049         files->fd[fd] = NULL;
1050         FD_CLR(fd, files->close_on_exec);
1051         __put_unused_fd(files, fd);
1052         spin_unlock(&files->file_lock);
1053         return filp_close(filp, files);
1054
1055 out_unlock:
1056         spin_unlock(&files->file_lock);
1057         return -EBADF;
1058 }
1059
1060 EXPORT_SYMBOL(sys_close);
1061
1062 /*
1063  * This routine simulates a hangup on the tty, to arrange that users
1064  * are given clean terminals at login time.
1065  */
1066 asmlinkage long sys_vhangup(void)
1067 {
1068         if (capable(CAP_SYS_TTY_CONFIG)) {
1069                 tty_vhangup(current->signal->tty);
1070                 return 0;
1071         }
1072         return -EPERM;
1073 }
1074
1075 /*
1076  * Called when an inode is about to be open.
1077  * We use this to disallow opening large files on 32bit systems if
1078  * the caller didn't specify O_LARGEFILE.  On 64bit systems we force
1079  * on this flag in sys_open.
1080  */
1081 int generic_file_open(struct inode * inode, struct file * filp)
1082 {
1083         if (!(filp->f_flags & O_LARGEFILE) && i_size_read(inode) > MAX_NON_LFS)
1084                 return -EFBIG;
1085         return 0;
1086 }
1087
1088 EXPORT_SYMBOL(generic_file_open);