[GFS2] Fix attributes setting logic
[safe/jmp/linux-2.6] / fs / gfs2 / ops_file.c
1 /*
2  * Copyright (C) Sistina Software, Inc.  1997-2003 All rights reserved.
3  * Copyright (C) 2004-2005 Red Hat, Inc.  All rights reserved.
4  *
5  * This copyrighted material is made available to anyone wishing to use,
6  * modify, copy, or redistribute it subject to the terms and conditions
7  * of the GNU General Public License v.2.
8  */
9
10 #include <linux/sched.h>
11 #include <linux/slab.h>
12 #include <linux/spinlock.h>
13 #include <linux/completion.h>
14 #include <linux/buffer_head.h>
15 #include <linux/pagemap.h>
16 #include <linux/uio.h>
17 #include <linux/blkdev.h>
18 #include <linux/mm.h>
19 #include <linux/smp_lock.h>
20 #include <linux/fs.h>
21 #include <linux/gfs2_ondisk.h>
22 #include <linux/ext2_fs.h>
23 #include <linux/crc32.h>
24 #include <linux/iflags.h>
25 #include <asm/semaphore.h>
26 #include <asm/uaccess.h>
27
28 #include "gfs2.h"
29 #include "lm_interface.h"
30 #include "incore.h"
31 #include "bmap.h"
32 #include "dir.h"
33 #include "glock.h"
34 #include "glops.h"
35 #include "inode.h"
36 #include "lm.h"
37 #include "log.h"
38 #include "meta_io.h"
39 #include "ops_file.h"
40 #include "ops_vm.h"
41 #include "quota.h"
42 #include "rgrp.h"
43 #include "trans.h"
44 #include "util.h"
45 #include "eaops.h"
46
47 /* "bad" is for NFS support */
48 struct filldir_bad_entry {
49         char *fbe_name;
50         unsigned int fbe_length;
51         uint64_t fbe_offset;
52         struct gfs2_inum fbe_inum;
53         unsigned int fbe_type;
54 };
55
56 struct filldir_bad {
57         struct gfs2_sbd *fdb_sbd;
58
59         struct filldir_bad_entry *fdb_entry;
60         unsigned int fdb_entry_num;
61         unsigned int fdb_entry_off;
62
63         char *fdb_name;
64         unsigned int fdb_name_size;
65         unsigned int fdb_name_off;
66 };
67
68 /* For regular, non-NFS */
69 struct filldir_reg {
70         struct gfs2_sbd *fdr_sbd;
71         int fdr_prefetch;
72
73         filldir_t fdr_filldir;
74         void *fdr_opaque;
75 };
76
77 /*
78  * Most fields left uninitialised to catch anybody who tries to
79  * use them. f_flags set to prevent file_accessed() from touching
80  * any other part of this. Its use is purely as a flag so that we
81  * know (in readpage()) whether or not do to locking.
82  */
83 struct file gfs2_internal_file_sentinal = {
84         .f_flags = O_NOATIME|O_RDONLY,
85 };
86
87 static int gfs2_read_actor(read_descriptor_t *desc, struct page *page,
88                            unsigned long offset, unsigned long size)
89 {
90         char *kaddr;
91         unsigned long count = desc->count;
92
93         if (size > count)
94                 size = count;
95
96         kaddr = kmap(page);
97         memcpy(desc->arg.buf, kaddr + offset, size);
98         kunmap(page);
99
100         desc->count = count - size;
101         desc->written += size;
102         desc->arg.buf += size;
103         return size;
104 }
105
106 int gfs2_internal_read(struct gfs2_inode *ip, struct file_ra_state *ra_state,
107                        char *buf, loff_t *pos, unsigned size)
108 {
109         struct inode *inode = ip->i_vnode;
110         read_descriptor_t desc;
111         desc.written = 0;
112         desc.arg.buf = buf;
113         desc.count = size;
114         desc.error = 0;
115         do_generic_mapping_read(inode->i_mapping, ra_state,
116                                 &gfs2_internal_file_sentinal, pos, &desc,
117                                 gfs2_read_actor);
118         return desc.written ? desc.written : desc.error;
119 }
120
121 /**
122  * gfs2_llseek - seek to a location in a file
123  * @file: the file
124  * @offset: the offset
125  * @origin: Where to seek from (SEEK_SET, SEEK_CUR, or SEEK_END)
126  *
127  * SEEK_END requires the glock for the file because it references the
128  * file's size.
129  *
130  * Returns: The new offset, or errno
131  */
132
133 static loff_t gfs2_llseek(struct file *file, loff_t offset, int origin)
134 {
135         struct gfs2_inode *ip = file->f_mapping->host->u.generic_ip;
136         struct gfs2_holder i_gh;
137         loff_t error;
138
139         if (origin == 2) {
140                 error = gfs2_glock_nq_init(ip->i_gl, LM_ST_SHARED, LM_FLAG_ANY,
141                                            &i_gh);
142                 if (!error) {
143                         error = remote_llseek(file, offset, origin);
144                         gfs2_glock_dq_uninit(&i_gh);
145                 }
146         } else
147                 error = remote_llseek(file, offset, origin);
148
149         return error;
150 }
151
152
153 static ssize_t gfs2_direct_IO_read(struct kiocb *iocb, const struct iovec *iov,
154                                    loff_t offset, unsigned long nr_segs)
155 {
156         struct file *file = iocb->ki_filp;
157         struct address_space *mapping = file->f_mapping;
158         ssize_t retval;
159
160         retval = filemap_write_and_wait(mapping);
161         if (retval == 0) {
162                 retval = mapping->a_ops->direct_IO(READ, iocb, iov, offset,
163                                                    nr_segs);
164         }
165         return retval;
166 }
167
168 /**
169  * __gfs2_file_aio_read - The main GFS2 read function
170  * 
171  * N.B. This is almost, but not quite the same as __generic_file_aio_read()
172  * the important subtle different being that inode->i_size isn't valid
173  * unless we are holding a lock, and we do this _only_ on the O_DIRECT
174  * path since otherwise locking is done entirely at the page cache
175  * layer.
176  */
177 static ssize_t __gfs2_file_aio_read(struct kiocb *iocb,
178                                     const struct iovec *iov,
179                                     unsigned long nr_segs, loff_t *ppos)
180 {
181         struct file *filp = iocb->ki_filp;
182         struct gfs2_inode *ip = filp->f_mapping->host->u.generic_ip;
183         struct gfs2_holder gh;
184         ssize_t retval;
185         unsigned long seg;
186         size_t count;
187
188         count = 0;
189         for (seg = 0; seg < nr_segs; seg++) {
190                 const struct iovec *iv = &iov[seg];
191
192                 /*
193                  * If any segment has a negative length, or the cumulative
194                  * length ever wraps negative then return -EINVAL.
195                  */
196                 count += iv->iov_len;
197                 if (unlikely((ssize_t)(count|iv->iov_len) < 0))
198                         return -EINVAL;
199                 if (access_ok(VERIFY_WRITE, iv->iov_base, iv->iov_len))
200                         continue;
201                 if (seg == 0)
202                         return -EFAULT;
203                 nr_segs = seg;
204                 count -= iv->iov_len;   /* This segment is no good */
205                 break;
206         }
207
208         /* coalesce the iovecs and go direct-to-BIO for O_DIRECT */
209         if (filp->f_flags & O_DIRECT) {
210                 loff_t pos = *ppos, size;
211                 struct address_space *mapping;
212                 struct inode *inode;
213
214                 mapping = filp->f_mapping;
215                 inode = mapping->host;
216                 retval = 0;
217                 if (!count)
218                         goto out; /* skip atime */
219
220                 gfs2_holder_init(ip->i_gl, LM_ST_SHARED, GL_ATIME, &gh);
221                 retval = gfs2_glock_nq_m_atime(1, &gh);
222                 if (retval)
223                         goto out;
224                 if (gfs2_is_stuffed(ip)) {
225                         gfs2_glock_dq_m(1, &gh);
226                         gfs2_holder_uninit(&gh);
227                         goto fallback_to_normal;
228                 }
229                 size = i_size_read(inode);
230                 if (pos < size) {
231                         retval = gfs2_direct_IO_read(iocb, iov, pos, nr_segs);
232                         if (retval > 0 && !is_sync_kiocb(iocb))
233                                 retval = -EIOCBQUEUED;
234                         if (retval > 0)
235                                 *ppos = pos + retval;
236                 }
237                 file_accessed(filp);
238                 gfs2_glock_dq_m(1, &gh);
239                 gfs2_holder_uninit(&gh);
240                 goto out;
241         }
242
243 fallback_to_normal:
244         retval = 0;
245         if (count) {
246                 for (seg = 0; seg < nr_segs; seg++) {
247                         read_descriptor_t desc;
248
249                         desc.written = 0;
250                         desc.arg.buf = iov[seg].iov_base;
251                         desc.count = iov[seg].iov_len;
252                         if (desc.count == 0)
253                                 continue;
254                         desc.error = 0;
255                         do_generic_file_read(filp,ppos,&desc,file_read_actor);
256                         retval += desc.written;
257                         if (desc.error) {
258                                 retval = retval ?: desc.error;
259                                  break;
260                         }
261                 }
262         }
263 out:
264         return retval;
265 }
266
267 /**
268  * gfs2_read - Read bytes from a file
269  * @file: The file to read from
270  * @buf: The buffer to copy into
271  * @size: The amount of data requested
272  * @offset: The current file offset
273  *
274  * Outputs: Offset - updated according to number of bytes read
275  *
276  * Returns: The number of bytes read, errno on failure
277  */
278
279 static ssize_t gfs2_read(struct file *filp, char __user *buf, size_t size,
280                          loff_t *offset)
281 {
282         struct iovec local_iov = { .iov_base = buf, .iov_len = size };
283         struct kiocb kiocb;
284         ssize_t ret;
285
286         init_sync_kiocb(&kiocb, filp);
287         ret = __gfs2_file_aio_read(&kiocb, &local_iov, 1, offset);
288         if (-EIOCBQUEUED == ret)
289                 ret = wait_on_sync_kiocb(&kiocb);
290         return ret;
291 }
292
293 static ssize_t gfs2_file_readv(struct file *filp, const struct iovec *iov,
294                                unsigned long nr_segs, loff_t *ppos)
295 {
296         struct kiocb kiocb;
297         ssize_t ret;
298
299         init_sync_kiocb(&kiocb, filp);
300         ret = __gfs2_file_aio_read(&kiocb, iov, nr_segs, ppos);
301         if (-EIOCBQUEUED == ret)
302                 ret = wait_on_sync_kiocb(&kiocb);
303         return ret;
304 }
305
306 static ssize_t gfs2_file_aio_read(struct kiocb *iocb, char __user *buf,
307                                   size_t count, loff_t pos)
308 {
309         struct iovec local_iov = { .iov_base = buf, .iov_len = count };
310
311         BUG_ON(iocb->ki_pos != pos);
312         return __gfs2_file_aio_read(iocb, &local_iov, 1, &iocb->ki_pos);
313 }
314
315
316 /**
317  * filldir_reg_func - Report a directory entry to the caller of gfs2_dir_read()
318  * @opaque: opaque data used by the function
319  * @name: the name of the directory entry
320  * @length: the length of the name
321  * @offset: the entry's offset in the directory
322  * @inum: the inode number the entry points to
323  * @type: the type of inode the entry points to
324  *
325  * Returns: 0 on success, 1 if buffer full
326  */
327
328 static int filldir_reg_func(void *opaque, const char *name, unsigned int length,
329                             uint64_t offset, struct gfs2_inum *inum,
330                             unsigned int type)
331 {
332         struct filldir_reg *fdr = (struct filldir_reg *)opaque;
333         struct gfs2_sbd *sdp = fdr->fdr_sbd;
334         int error;
335
336         error = fdr->fdr_filldir(fdr->fdr_opaque, name, length, offset,
337                                  inum->no_formal_ino, type);
338         if (error)
339                 return 1;
340
341         if (fdr->fdr_prefetch && !(length == 1 && *name == '.')) {
342                 gfs2_glock_prefetch_num(sdp,
343                                        inum->no_addr, &gfs2_inode_glops,
344                                        LM_ST_SHARED, LM_FLAG_TRY | LM_FLAG_ANY);
345                 gfs2_glock_prefetch_num(sdp,
346                                        inum->no_addr, &gfs2_iopen_glops,
347                                        LM_ST_SHARED, LM_FLAG_TRY);
348         }
349
350         return 0;
351 }
352
353 /**
354  * readdir_reg - Read directory entries from a directory
355  * @file: The directory to read from
356  * @dirent: Buffer for dirents
357  * @filldir: Function used to do the copying
358  *
359  * Returns: errno
360  */
361
362 static int readdir_reg(struct file *file, void *dirent, filldir_t filldir)
363 {
364         struct inode *dir = file->f_mapping->host;
365         struct gfs2_inode *dip = dir->u.generic_ip;
366         struct filldir_reg fdr;
367         struct gfs2_holder d_gh;
368         uint64_t offset = file->f_pos;
369         int error;
370
371         fdr.fdr_sbd = dip->i_sbd;
372         fdr.fdr_prefetch = 1;
373         fdr.fdr_filldir = filldir;
374         fdr.fdr_opaque = dirent;
375
376         gfs2_holder_init(dip->i_gl, LM_ST_SHARED, GL_ATIME, &d_gh);
377         error = gfs2_glock_nq_atime(&d_gh);
378         if (error) {
379                 gfs2_holder_uninit(&d_gh);
380                 return error;
381         }
382
383         error = gfs2_dir_read(dir, &offset, &fdr, filldir_reg_func);
384
385         gfs2_glock_dq_uninit(&d_gh);
386
387         file->f_pos = offset;
388
389         return error;
390 }
391
392 /**
393  * filldir_bad_func - Report a directory entry to the caller of gfs2_dir_read()
394  * @opaque: opaque data used by the function
395  * @name: the name of the directory entry
396  * @length: the length of the name
397  * @offset: the entry's offset in the directory
398  * @inum: the inode number the entry points to
399  * @type: the type of inode the entry points to
400  *
401  * For supporting NFS.
402  *
403  * Returns: 0 on success, 1 if buffer full
404  */
405
406 static int filldir_bad_func(void *opaque, const char *name, unsigned int length,
407                             uint64_t offset, struct gfs2_inum *inum,
408                             unsigned int type)
409 {
410         struct filldir_bad *fdb = (struct filldir_bad *)opaque;
411         struct gfs2_sbd *sdp = fdb->fdb_sbd;
412         struct filldir_bad_entry *fbe;
413
414         if (fdb->fdb_entry_off == fdb->fdb_entry_num ||
415             fdb->fdb_name_off + length > fdb->fdb_name_size)
416                 return 1;
417
418         fbe = &fdb->fdb_entry[fdb->fdb_entry_off];
419         fbe->fbe_name = fdb->fdb_name + fdb->fdb_name_off;
420         memcpy(fbe->fbe_name, name, length);
421         fbe->fbe_length = length;
422         fbe->fbe_offset = offset;
423         fbe->fbe_inum = *inum;
424         fbe->fbe_type = type;
425
426         fdb->fdb_entry_off++;
427         fdb->fdb_name_off += length;
428
429         if (!(length == 1 && *name == '.')) {
430                 gfs2_glock_prefetch_num(sdp,
431                                        inum->no_addr, &gfs2_inode_glops,
432                                        LM_ST_SHARED, LM_FLAG_TRY | LM_FLAG_ANY);
433                 gfs2_glock_prefetch_num(sdp,
434                                        inum->no_addr, &gfs2_iopen_glops,
435                                        LM_ST_SHARED, LM_FLAG_TRY);
436         }
437
438         return 0;
439 }
440
441 /**
442  * readdir_bad - Read directory entries from a directory
443  * @file: The directory to read from
444  * @dirent: Buffer for dirents
445  * @filldir: Function used to do the copying
446  *
447  * For supporting NFS.
448  *
449  * Returns: errno
450  */
451
452 static int readdir_bad(struct file *file, void *dirent, filldir_t filldir)
453 {
454         struct inode *dir = file->f_mapping->host;
455         struct gfs2_inode *dip = dir->u.generic_ip;
456         struct gfs2_sbd *sdp = dip->i_sbd;
457         struct filldir_reg fdr;
458         unsigned int entries, size;
459         struct filldir_bad *fdb;
460         struct gfs2_holder d_gh;
461         uint64_t offset = file->f_pos;
462         unsigned int x;
463         struct filldir_bad_entry *fbe;
464         int error;
465
466         entries = gfs2_tune_get(sdp, gt_entries_per_readdir);
467         size = sizeof(struct filldir_bad) +
468             entries * (sizeof(struct filldir_bad_entry) + GFS2_FAST_NAME_SIZE);
469
470         fdb = kzalloc(size, GFP_KERNEL);
471         if (!fdb)
472                 return -ENOMEM;
473
474         fdb->fdb_sbd = sdp;
475         fdb->fdb_entry = (struct filldir_bad_entry *)(fdb + 1);
476         fdb->fdb_entry_num = entries;
477         fdb->fdb_name = ((char *)fdb) + sizeof(struct filldir_bad) +
478                 entries * sizeof(struct filldir_bad_entry);
479         fdb->fdb_name_size = entries * GFS2_FAST_NAME_SIZE;
480
481         gfs2_holder_init(dip->i_gl, LM_ST_SHARED, GL_ATIME, &d_gh);
482         error = gfs2_glock_nq_atime(&d_gh);
483         if (error) {
484                 gfs2_holder_uninit(&d_gh);
485                 goto out;
486         }
487
488         error = gfs2_dir_read(dir, &offset, fdb, filldir_bad_func);
489
490         gfs2_glock_dq_uninit(&d_gh);
491
492         fdr.fdr_sbd = sdp;
493         fdr.fdr_prefetch = 0;
494         fdr.fdr_filldir = filldir;
495         fdr.fdr_opaque = dirent;
496
497         for (x = 0; x < fdb->fdb_entry_off; x++) {
498                 fbe = &fdb->fdb_entry[x];
499
500                 error = filldir_reg_func(&fdr,
501                                          fbe->fbe_name, fbe->fbe_length,
502                                          fbe->fbe_offset,
503                                          &fbe->fbe_inum, fbe->fbe_type);
504                 if (error) {
505                         file->f_pos = fbe->fbe_offset;
506                         error = 0;
507                         goto out;
508                 }
509         }
510
511         file->f_pos = offset;
512
513  out:
514         kfree(fdb);
515
516         return error;
517 }
518
519 /**
520  * gfs2_readdir - Read directory entries from a directory
521  * @file: The directory to read from
522  * @dirent: Buffer for dirents
523  * @filldir: Function used to do the copying
524  *
525  * Returns: errno
526  */
527
528 static int gfs2_readdir(struct file *file, void *dirent, filldir_t filldir)
529 {
530         int error;
531
532         if (strcmp(current->comm, "nfsd") != 0)
533                 error = readdir_reg(file, dirent, filldir);
534         else
535                 error = readdir_bad(file, dirent, filldir);
536
537         return error;
538 }
539
540 static const u32 iflags_to_gfs2[32] = {
541         [iflag_Sync] = GFS2_DIF_SYNC,
542         [iflag_Immutable] = GFS2_DIF_IMMUTABLE,
543         [iflag_Append] = GFS2_DIF_APPENDONLY,
544         [iflag_NoAtime] = GFS2_DIF_NOATIME,
545         [iflag_Index] = GFS2_DIF_EXHASH,
546         [iflag_JournalData] = GFS2_DIF_JDATA,
547         [iflag_DirectIO] = GFS2_DIF_DIRECTIO,
548 };
549
550 static const u32 gfs2_to_iflags[32] = {
551         [gfs2fl_Sync] = IFLAG_SYNC,
552         [gfs2fl_Immutable] = IFLAG_IMMUTABLE,
553         [gfs2fl_AppendOnly] = IFLAG_APPEND,
554         [gfs2fl_NoAtime] = IFLAG_NOATIME,
555         [gfs2fl_ExHash] = IFLAG_INDEX,
556         [gfs2fl_Jdata] = IFLAG_JOURNAL_DATA,
557         [gfs2fl_Directio] = IFLAG_DIRECTIO,
558         [gfs2fl_InheritDirectio] = IFLAG_DIRECTIO,
559         [gfs2fl_InheritJdata] = IFLAG_JOURNAL_DATA,
560 };
561
562 static int gfs2_get_flags(struct file *filp, u32 __user *ptr)
563 {
564         struct inode *inode = filp->f_dentry->d_inode;
565         struct gfs2_inode *ip = inode->u.generic_ip;
566         struct gfs2_holder gh;
567         int error;
568         u32 iflags;
569
570         gfs2_holder_init(ip->i_gl, LM_ST_SHARED, GL_ATIME, &gh);
571         error = gfs2_glock_nq_m_atime(1, &gh);
572         if (error)
573                 return error;
574         
575         iflags = iflags_cvt(gfs2_to_iflags, ip->i_di.di_flags);
576         if (put_user(iflags, ptr))
577                 error = -EFAULT;
578
579         gfs2_glock_dq_m(1, &gh);
580         gfs2_holder_uninit(&gh);
581         return error;
582 }
583
584 /* Flags that can be set by user space */
585 #define GFS2_FLAGS_USER_SET (GFS2_DIF_JDATA|                    \
586                              GFS2_DIF_DIRECTIO|                 \
587                              GFS2_DIF_IMMUTABLE|                \
588                              GFS2_DIF_APPENDONLY|               \
589                              GFS2_DIF_NOATIME|                  \
590                              GFS2_DIF_SYNC|                     \
591                              GFS2_DIF_SYSTEM|                   \
592                              GFS2_DIF_INHERIT_DIRECTIO|         \
593                              GFS2_DIF_INHERIT_JDATA)
594
595 /**
596  * gfs2_set_flags - set flags on an inode
597  * @inode: The inode
598  * @flags: The flags to set
599  * @mask: Indicates which flags are valid
600  *
601  */
602 static int do_gfs2_set_flags(struct file *filp, u32 reqflags, u32 mask)
603 {
604         struct inode *inode = filp->f_dentry->d_inode;
605         struct gfs2_inode *ip = inode->u.generic_ip;
606         struct gfs2_sbd *sdp = ip->i_sbd;
607         struct buffer_head *bh;
608         struct gfs2_holder gh;
609         int error;
610         u32 new_flags, flags;
611
612         gfs2_holder_init(ip->i_gl, LM_ST_EXCLUSIVE, 0, &gh);
613         error = gfs2_glock_nq_init(ip->i_gl, LM_ST_EXCLUSIVE, 0, &gh);
614         if (error) {
615                 gfs2_holder_uninit(&gh);
616                 return error;
617         }
618
619         flags = ip->i_di.di_flags;
620         new_flags = (flags & ~mask) | (reqflags & mask);
621         if ((new_flags ^ flags) == 0)
622                 goto out;
623
624         if (S_ISDIR(inode->i_mode)) {
625                 if ((new_flags ^ flags) & GFS2_DIF_JDATA)
626                         new_flags ^= (GFS2_DIF_JDATA|GFS2_DIF_INHERIT_JDATA);
627                 if ((new_flags ^ flags) & GFS2_DIF_DIRECTIO)
628                         new_flags ^= (GFS2_DIF_DIRECTIO|GFS2_DIF_INHERIT_DIRECTIO);
629         }
630
631         error = -EINVAL;
632         if ((new_flags ^ flags) & ~GFS2_FLAGS_USER_SET)
633                 goto out;
634
635         error = -EPERM;
636         if (IS_IMMUTABLE(inode) && (new_flags & GFS2_DIF_IMMUTABLE))
637                 goto out;
638         if (IS_APPEND(inode) && (new_flags & GFS2_DIF_APPENDONLY))
639                 goto out;
640         if (((new_flags ^ flags) & GFS2_DIF_IMMUTABLE) && 
641             !capable(CAP_LINUX_IMMUTABLE))
642                 goto out;
643         if (!IS_IMMUTABLE(inode)) {
644                 error = gfs2_repermission(inode, MAY_WRITE, NULL);
645                 if (error)
646                         goto out;
647         }
648
649         error = gfs2_trans_begin(sdp, RES_DINODE, 0);
650         if (error)
651                 goto out;
652         error = gfs2_meta_inode_buffer(ip, &bh);
653         if (error)
654                 goto out_trans_end;
655         gfs2_trans_add_bh(ip->i_gl, bh, 1);
656         ip->i_di.di_flags = new_flags;
657         gfs2_dinode_out(&ip->i_di, bh->b_data);
658         brelse(bh);
659 out_trans_end:
660         gfs2_trans_end(sdp);
661 out:
662         gfs2_glock_dq_uninit(&gh);
663         return error;
664 }
665
666 static int gfs2_set_flags(struct file *filp, u32 __user *ptr)
667 {
668         u32 iflags, gfsflags;
669         if (get_user(iflags, ptr))
670                 return -EFAULT;
671         gfsflags = iflags_cvt(iflags_to_gfs2, iflags);
672         return do_gfs2_set_flags(filp, gfsflags, ~0);
673 }
674
675 static long gfs2_ioctl(struct file *filp, unsigned int cmd, unsigned long arg)
676 {
677         switch(cmd) {
678         case IFLAGS_GET_IOC:
679                 return gfs2_get_flags(filp, (u32 __user *)arg);
680         case IFLAGS_SET_IOC:
681                 return gfs2_set_flags(filp, (u32 __user *)arg);
682         }
683         return -ENOTTY;
684 }
685
686
687 /**
688  * gfs2_mmap -
689  * @file: The file to map
690  * @vma: The VMA which described the mapping
691  *
692  * Returns: 0 or error code
693  */
694
695 static int gfs2_mmap(struct file *file, struct vm_area_struct *vma)
696 {
697         struct gfs2_inode *ip = file->f_mapping->host->u.generic_ip;
698         struct gfs2_holder i_gh;
699         int error;
700
701         gfs2_holder_init(ip->i_gl, LM_ST_SHARED, GL_ATIME, &i_gh);
702         error = gfs2_glock_nq_atime(&i_gh);
703         if (error) {
704                 gfs2_holder_uninit(&i_gh);
705                 return error;
706         }
707
708         /* This is VM_MAYWRITE instead of VM_WRITE because a call
709            to mprotect() can turn on VM_WRITE later. */
710
711         if ((vma->vm_flags & (VM_MAYSHARE | VM_MAYWRITE)) ==
712             (VM_MAYSHARE | VM_MAYWRITE))
713                 vma->vm_ops = &gfs2_vm_ops_sharewrite;
714         else
715                 vma->vm_ops = &gfs2_vm_ops_private;
716
717         gfs2_glock_dq_uninit(&i_gh);
718
719         return error;
720 }
721
722 /**
723  * gfs2_open - open a file
724  * @inode: the inode to open
725  * @file: the struct file for this opening
726  *
727  * Returns: errno
728  */
729
730 static int gfs2_open(struct inode *inode, struct file *file)
731 {
732         struct gfs2_inode *ip = inode->u.generic_ip;
733         struct gfs2_holder i_gh;
734         struct gfs2_file *fp;
735         int error;
736
737         fp = kzalloc(sizeof(struct gfs2_file), GFP_KERNEL);
738         if (!fp)
739                 return -ENOMEM;
740
741         mutex_init(&fp->f_fl_mutex);
742
743         gfs2_assert_warn(ip->i_sbd, !file->private_data);
744         file->private_data = fp;
745
746         if (S_ISREG(ip->i_di.di_mode)) {
747                 error = gfs2_glock_nq_init(ip->i_gl, LM_ST_SHARED, LM_FLAG_ANY,
748                                            &i_gh);
749                 if (error)
750                         goto fail;
751
752                 if (!(file->f_flags & O_LARGEFILE) &&
753                     ip->i_di.di_size > MAX_NON_LFS) {
754                         error = -EFBIG;
755                         goto fail_gunlock;
756                 }
757
758                 /* Listen to the Direct I/O flag */
759
760                 if (ip->i_di.di_flags & GFS2_DIF_DIRECTIO)
761                         file->f_flags |= O_DIRECT;
762
763                 gfs2_glock_dq_uninit(&i_gh);
764         }
765
766         return 0;
767
768  fail_gunlock:
769         gfs2_glock_dq_uninit(&i_gh);
770
771  fail:
772         file->private_data = NULL;
773         kfree(fp);
774
775         return error;
776 }
777
778 /**
779  * gfs2_close - called to close a struct file
780  * @inode: the inode the struct file belongs to
781  * @file: the struct file being closed
782  *
783  * Returns: errno
784  */
785
786 static int gfs2_close(struct inode *inode, struct file *file)
787 {
788         struct gfs2_sbd *sdp = inode->i_sb->s_fs_info;
789         struct gfs2_file *fp;
790
791         fp = file->private_data;
792         file->private_data = NULL;
793
794         if (gfs2_assert_warn(sdp, fp))
795                 return -EIO;
796
797         kfree(fp);
798
799         return 0;
800 }
801
802 /**
803  * gfs2_fsync - sync the dirty data for a file (across the cluster)
804  * @file: the file that points to the dentry (we ignore this)
805  * @dentry: the dentry that points to the inode to sync
806  *
807  * Returns: errno
808  */
809
810 static int gfs2_fsync(struct file *file, struct dentry *dentry, int datasync)
811 {
812         struct gfs2_inode *ip = dentry->d_inode->u.generic_ip;
813
814         gfs2_log_flush(ip->i_gl->gl_sbd, ip->i_gl);
815
816         return 0;
817 }
818
819 /**
820  * gfs2_lock - acquire/release a posix lock on a file
821  * @file: the file pointer
822  * @cmd: either modify or retrieve lock state, possibly wait
823  * @fl: type and range of lock
824  *
825  * Returns: errno
826  */
827
828 static int gfs2_lock(struct file *file, int cmd, struct file_lock *fl)
829 {
830         struct gfs2_inode *ip = file->f_mapping->host->u.generic_ip;
831         struct gfs2_sbd *sdp = ip->i_sbd;
832         struct lm_lockname name =
833                 { .ln_number = ip->i_num.no_addr,
834                   .ln_type = LM_TYPE_PLOCK };
835
836         if (!(fl->fl_flags & FL_POSIX))
837                 return -ENOLCK;
838         if ((ip->i_di.di_mode & (S_ISGID | S_IXGRP)) == S_ISGID)
839                 return -ENOLCK;
840
841         if (sdp->sd_args.ar_localflocks) {
842                 if (IS_GETLK(cmd)) {
843                         struct file_lock tmp;
844                         int ret;
845                         ret = posix_test_lock(file, fl, &tmp);
846                         fl->fl_type = F_UNLCK;
847                         if (ret)
848                                 memcpy(fl, &tmp, sizeof(struct file_lock));
849                         return 0;
850                 } else {
851                         return posix_lock_file_wait(file, fl);
852                 }
853         }
854
855         if (IS_GETLK(cmd))
856                 return gfs2_lm_plock_get(sdp, &name, file, fl);
857         else if (fl->fl_type == F_UNLCK)
858                 return gfs2_lm_punlock(sdp, &name, file, fl);
859         else
860                 return gfs2_lm_plock(sdp, &name, file, cmd, fl);
861 }
862
863 /**
864  * gfs2_sendfile - Send bytes to a file or socket
865  * @in_file: The file to read from
866  * @out_file: The file to write to
867  * @count: The amount of data
868  * @offset: The beginning file offset
869  *
870  * Outputs: offset - updated according to number of bytes read
871  *
872  * Returns: The number of bytes sent, errno on failure
873  */
874
875 static ssize_t gfs2_sendfile(struct file *in_file, loff_t *offset, size_t count,
876                              read_actor_t actor, void *target)
877 {
878         return generic_file_sendfile(in_file, offset, count, actor, target);
879 }
880
881 static int do_flock(struct file *file, int cmd, struct file_lock *fl)
882 {
883         struct gfs2_file *fp = file->private_data;
884         struct gfs2_holder *fl_gh = &fp->f_fl_gh;
885         struct gfs2_inode *ip = file->f_dentry->d_inode->u.generic_ip;
886         struct gfs2_glock *gl;
887         unsigned int state;
888         int flags;
889         int error = 0;
890
891         state = (fl->fl_type == F_WRLCK) ? LM_ST_EXCLUSIVE : LM_ST_SHARED;
892         flags = ((IS_SETLKW(cmd)) ? 0 : LM_FLAG_TRY) | GL_EXACT | GL_NOCACHE;
893
894         mutex_lock(&fp->f_fl_mutex);
895
896         gl = fl_gh->gh_gl;
897         if (gl) {
898                 if (fl_gh->gh_state == state)
899                         goto out;
900                 gfs2_glock_hold(gl);
901                 flock_lock_file_wait(file,
902                                      &(struct file_lock){.fl_type = F_UNLCK});          
903                 gfs2_glock_dq_uninit(fl_gh);
904         } else {
905                 error = gfs2_glock_get(ip->i_sbd,
906                                       ip->i_num.no_addr, &gfs2_flock_glops,
907                                       CREATE, &gl);
908                 if (error)
909                         goto out;
910         }
911
912         gfs2_holder_init(gl, state, flags, fl_gh);
913         gfs2_glock_put(gl);
914
915         error = gfs2_glock_nq(fl_gh);
916         if (error) {
917                 gfs2_holder_uninit(fl_gh);
918                 if (error == GLR_TRYFAILED)
919                         error = -EAGAIN;
920         } else {
921                 error = flock_lock_file_wait(file, fl);
922                 gfs2_assert_warn(ip->i_sbd, !error);
923         }
924
925  out:
926         mutex_unlock(&fp->f_fl_mutex);
927
928         return error;
929 }
930
931 static void do_unflock(struct file *file, struct file_lock *fl)
932 {
933         struct gfs2_file *fp = file->private_data;
934         struct gfs2_holder *fl_gh = &fp->f_fl_gh;
935
936         mutex_lock(&fp->f_fl_mutex);
937         flock_lock_file_wait(file, fl);
938         if (fl_gh->gh_gl)
939                 gfs2_glock_dq_uninit(fl_gh);
940         mutex_unlock(&fp->f_fl_mutex);
941 }
942
943 /**
944  * gfs2_flock - acquire/release a flock lock on a file
945  * @file: the file pointer
946  * @cmd: either modify or retrieve lock state, possibly wait
947  * @fl: type and range of lock
948  *
949  * Returns: errno
950  */
951
952 static int gfs2_flock(struct file *file, int cmd, struct file_lock *fl)
953 {
954         struct gfs2_inode *ip = file->f_mapping->host->u.generic_ip;
955         struct gfs2_sbd *sdp = ip->i_sbd;
956
957         if (!(fl->fl_flags & FL_FLOCK))
958                 return -ENOLCK;
959         if ((ip->i_di.di_mode & (S_ISGID | S_IXGRP)) == S_ISGID)
960                 return -ENOLCK;
961
962         if (sdp->sd_args.ar_localflocks)
963                 return flock_lock_file_wait(file, fl);
964
965         if (fl->fl_type == F_UNLCK) {
966                 do_unflock(file, fl);
967                 return 0;
968         } else
969                 return do_flock(file, cmd, fl);
970 }
971
972 struct file_operations gfs2_file_fops = {
973         .llseek = gfs2_llseek,
974         .read = gfs2_read,
975         .readv = gfs2_file_readv,
976         .aio_read = gfs2_file_aio_read,
977         .write = generic_file_write,
978         .writev = generic_file_writev,
979         .aio_write = generic_file_aio_write,
980         .unlocked_ioctl = gfs2_ioctl,
981         .mmap = gfs2_mmap,
982         .open = gfs2_open,
983         .release = gfs2_close,
984         .fsync = gfs2_fsync,
985         .lock = gfs2_lock,
986         .sendfile = gfs2_sendfile,
987         .flock = gfs2_flock,
988         .splice_read = generic_file_splice_read,
989         .splice_write = generic_file_splice_write,
990 };
991
992 struct file_operations gfs2_dir_fops = {
993         .readdir = gfs2_readdir,
994         .unlocked_ioctl = gfs2_ioctl,
995         .open = gfs2_open,
996         .release = gfs2_close,
997         .fsync = gfs2_fsync,
998         .lock = gfs2_lock,
999         .flock = gfs2_flock,
1000 };
1001