Merge git://git.infradead.org/battery-2.6
[linux-2.6] / fs / ocfs2 / file.c
1 /* -*- mode: c; c-basic-offset: 8; -*-
2  * vim: noexpandtab sw=8 ts=8 sts=0:
3  *
4  * file.c
5  *
6  * File open, close, extend, truncate
7  *
8  * Copyright (C) 2002, 2004 Oracle.  All rights reserved.
9  *
10  * This program is free software; you can redistribute it and/or
11  * modify it under the terms of the GNU General Public
12  * License as published by the Free Software Foundation; either
13  * version 2 of the License, or (at your option) any later version.
14  *
15  * This program is distributed in the hope that it will be useful,
16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
18  * General Public License for more details.
19  *
20  * You should have received a copy of the GNU General Public
21  * License along with this program; if not, write to the
22  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
23  * Boston, MA 021110-1307, USA.
24  */
25
26 #include <linux/capability.h>
27 #include <linux/fs.h>
28 #include <linux/types.h>
29 #include <linux/slab.h>
30 #include <linux/highmem.h>
31 #include <linux/pagemap.h>
32 #include <linux/uio.h>
33 #include <linux/sched.h>
34 #include <linux/splice.h>
35 #include <linux/mount.h>
36 #include <linux/writeback.h>
37 #include <linux/falloc.h>
38
39 #define MLOG_MASK_PREFIX ML_INODE
40 #include <cluster/masklog.h>
41
42 #include "ocfs2.h"
43
44 #include "alloc.h"
45 #include "aops.h"
46 #include "dir.h"
47 #include "dlmglue.h"
48 #include "extent_map.h"
49 #include "file.h"
50 #include "sysfile.h"
51 #include "inode.h"
52 #include "ioctl.h"
53 #include "journal.h"
54 #include "mmap.h"
55 #include "suballoc.h"
56 #include "super.h"
57
58 #include "buffer_head_io.h"
59
60 static int ocfs2_sync_inode(struct inode *inode)
61 {
62         filemap_fdatawrite(inode->i_mapping);
63         return sync_mapping_buffers(inode->i_mapping);
64 }
65
66 static int ocfs2_file_open(struct inode *inode, struct file *file)
67 {
68         int status;
69         int mode = file->f_flags;
70         struct ocfs2_inode_info *oi = OCFS2_I(inode);
71
72         mlog_entry("(0x%p, 0x%p, '%.*s')\n", inode, file,
73                    file->f_path.dentry->d_name.len, file->f_path.dentry->d_name.name);
74
75         spin_lock(&oi->ip_lock);
76
77         /* Check that the inode hasn't been wiped from disk by another
78          * node. If it hasn't then we're safe as long as we hold the
79          * spin lock until our increment of open count. */
80         if (OCFS2_I(inode)->ip_flags & OCFS2_INODE_DELETED) {
81                 spin_unlock(&oi->ip_lock);
82
83                 status = -ENOENT;
84                 goto leave;
85         }
86
87         if (mode & O_DIRECT)
88                 oi->ip_flags |= OCFS2_INODE_OPEN_DIRECT;
89
90         oi->ip_open_count++;
91         spin_unlock(&oi->ip_lock);
92         status = 0;
93 leave:
94         mlog_exit(status);
95         return status;
96 }
97
98 static int ocfs2_file_release(struct inode *inode, struct file *file)
99 {
100         struct ocfs2_inode_info *oi = OCFS2_I(inode);
101
102         mlog_entry("(0x%p, 0x%p, '%.*s')\n", inode, file,
103                        file->f_path.dentry->d_name.len,
104                        file->f_path.dentry->d_name.name);
105
106         spin_lock(&oi->ip_lock);
107         if (!--oi->ip_open_count)
108                 oi->ip_flags &= ~OCFS2_INODE_OPEN_DIRECT;
109         spin_unlock(&oi->ip_lock);
110
111         mlog_exit(0);
112
113         return 0;
114 }
115
116 static int ocfs2_sync_file(struct file *file,
117                            struct dentry *dentry,
118                            int datasync)
119 {
120         int err = 0;
121         journal_t *journal;
122         struct inode *inode = dentry->d_inode;
123         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
124
125         mlog_entry("(0x%p, 0x%p, %d, '%.*s')\n", file, dentry, datasync,
126                    dentry->d_name.len, dentry->d_name.name);
127
128         err = ocfs2_sync_inode(dentry->d_inode);
129         if (err)
130                 goto bail;
131
132         journal = osb->journal->j_journal;
133         err = journal_force_commit(journal);
134
135 bail:
136         mlog_exit(err);
137
138         return (err < 0) ? -EIO : 0;
139 }
140
141 int ocfs2_should_update_atime(struct inode *inode,
142                               struct vfsmount *vfsmnt)
143 {
144         struct timespec now;
145         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
146
147         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
148                 return 0;
149
150         if ((inode->i_flags & S_NOATIME) ||
151             ((inode->i_sb->s_flags & MS_NODIRATIME) && S_ISDIR(inode->i_mode)))
152                 return 0;
153
154         /*
155          * We can be called with no vfsmnt structure - NFSD will
156          * sometimes do this.
157          *
158          * Note that our action here is different than touch_atime() -
159          * if we can't tell whether this is a noatime mount, then we
160          * don't know whether to trust the value of s_atime_quantum.
161          */
162         if (vfsmnt == NULL)
163                 return 0;
164
165         if ((vfsmnt->mnt_flags & MNT_NOATIME) ||
166             ((vfsmnt->mnt_flags & MNT_NODIRATIME) && S_ISDIR(inode->i_mode)))
167                 return 0;
168
169         if (vfsmnt->mnt_flags & MNT_RELATIME) {
170                 if ((timespec_compare(&inode->i_atime, &inode->i_mtime) <= 0) ||
171                     (timespec_compare(&inode->i_atime, &inode->i_ctime) <= 0))
172                         return 1;
173
174                 return 0;
175         }
176
177         now = CURRENT_TIME;
178         if ((now.tv_sec - inode->i_atime.tv_sec <= osb->s_atime_quantum))
179                 return 0;
180         else
181                 return 1;
182 }
183
184 int ocfs2_update_inode_atime(struct inode *inode,
185                              struct buffer_head *bh)
186 {
187         int ret;
188         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
189         handle_t *handle;
190         struct ocfs2_dinode *di = (struct ocfs2_dinode *) bh->b_data;
191
192         mlog_entry_void();
193
194         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
195         if (handle == NULL) {
196                 ret = -ENOMEM;
197                 mlog_errno(ret);
198                 goto out;
199         }
200
201         ret = ocfs2_journal_access(handle, inode, bh,
202                                    OCFS2_JOURNAL_ACCESS_WRITE);
203         if (ret) {
204                 mlog_errno(ret);
205                 goto out_commit;
206         }
207
208         /*
209          * Don't use ocfs2_mark_inode_dirty() here as we don't always
210          * have i_mutex to guard against concurrent changes to other
211          * inode fields.
212          */
213         inode->i_atime = CURRENT_TIME;
214         di->i_atime = cpu_to_le64(inode->i_atime.tv_sec);
215         di->i_atime_nsec = cpu_to_le32(inode->i_atime.tv_nsec);
216
217         ret = ocfs2_journal_dirty(handle, bh);
218         if (ret < 0)
219                 mlog_errno(ret);
220
221 out_commit:
222         ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
223 out:
224         mlog_exit(ret);
225         return ret;
226 }
227
228 static int ocfs2_set_inode_size(handle_t *handle,
229                                 struct inode *inode,
230                                 struct buffer_head *fe_bh,
231                                 u64 new_i_size)
232 {
233         int status;
234
235         mlog_entry_void();
236         i_size_write(inode, new_i_size);
237         inode->i_blocks = ocfs2_inode_sector_count(inode);
238         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
239
240         status = ocfs2_mark_inode_dirty(handle, inode, fe_bh);
241         if (status < 0) {
242                 mlog_errno(status);
243                 goto bail;
244         }
245
246 bail:
247         mlog_exit(status);
248         return status;
249 }
250
251 static int ocfs2_simple_size_update(struct inode *inode,
252                                     struct buffer_head *di_bh,
253                                     u64 new_i_size)
254 {
255         int ret;
256         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
257         handle_t *handle = NULL;
258
259         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
260         if (handle == NULL) {
261                 ret = -ENOMEM;
262                 mlog_errno(ret);
263                 goto out;
264         }
265
266         ret = ocfs2_set_inode_size(handle, inode, di_bh,
267                                    new_i_size);
268         if (ret < 0)
269                 mlog_errno(ret);
270
271         ocfs2_commit_trans(osb, handle);
272 out:
273         return ret;
274 }
275
276 static int ocfs2_orphan_for_truncate(struct ocfs2_super *osb,
277                                      struct inode *inode,
278                                      struct buffer_head *fe_bh,
279                                      u64 new_i_size)
280 {
281         int status;
282         handle_t *handle;
283         struct ocfs2_dinode *di;
284         u64 cluster_bytes;
285
286         mlog_entry_void();
287
288         /* TODO: This needs to actually orphan the inode in this
289          * transaction. */
290
291         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
292         if (IS_ERR(handle)) {
293                 status = PTR_ERR(handle);
294                 mlog_errno(status);
295                 goto out;
296         }
297
298         status = ocfs2_journal_access(handle, inode, fe_bh,
299                                       OCFS2_JOURNAL_ACCESS_WRITE);
300         if (status < 0) {
301                 mlog_errno(status);
302                 goto out_commit;
303         }
304
305         /*
306          * Do this before setting i_size.
307          */
308         cluster_bytes = ocfs2_align_bytes_to_clusters(inode->i_sb, new_i_size);
309         status = ocfs2_zero_range_for_truncate(inode, handle, new_i_size,
310                                                cluster_bytes);
311         if (status) {
312                 mlog_errno(status);
313                 goto out_commit;
314         }
315
316         i_size_write(inode, new_i_size);
317         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
318
319         di = (struct ocfs2_dinode *) fe_bh->b_data;
320         di->i_size = cpu_to_le64(new_i_size);
321         di->i_ctime = di->i_mtime = cpu_to_le64(inode->i_ctime.tv_sec);
322         di->i_ctime_nsec = di->i_mtime_nsec = cpu_to_le32(inode->i_ctime.tv_nsec);
323
324         status = ocfs2_journal_dirty(handle, fe_bh);
325         if (status < 0)
326                 mlog_errno(status);
327
328 out_commit:
329         ocfs2_commit_trans(osb, handle);
330 out:
331
332         mlog_exit(status);
333         return status;
334 }
335
336 static int ocfs2_truncate_file(struct inode *inode,
337                                struct buffer_head *di_bh,
338                                u64 new_i_size)
339 {
340         int status = 0;
341         struct ocfs2_dinode *fe = NULL;
342         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
343         struct ocfs2_truncate_context *tc = NULL;
344
345         mlog_entry("(inode = %llu, new_i_size = %llu\n",
346                    (unsigned long long)OCFS2_I(inode)->ip_blkno,
347                    (unsigned long long)new_i_size);
348
349         fe = (struct ocfs2_dinode *) di_bh->b_data;
350         if (!OCFS2_IS_VALID_DINODE(fe)) {
351                 OCFS2_RO_ON_INVALID_DINODE(inode->i_sb, fe);
352                 status = -EIO;
353                 goto bail;
354         }
355
356         mlog_bug_on_msg(le64_to_cpu(fe->i_size) != i_size_read(inode),
357                         "Inode %llu, inode i_size = %lld != di "
358                         "i_size = %llu, i_flags = 0x%x\n",
359                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
360                         i_size_read(inode),
361                         (unsigned long long)le64_to_cpu(fe->i_size),
362                         le32_to_cpu(fe->i_flags));
363
364         if (new_i_size > le64_to_cpu(fe->i_size)) {
365                 mlog(0, "asked to truncate file with size (%llu) to size (%llu)!\n",
366                      (unsigned long long)le64_to_cpu(fe->i_size),
367                      (unsigned long long)new_i_size);
368                 status = -EINVAL;
369                 mlog_errno(status);
370                 goto bail;
371         }
372
373         mlog(0, "inode %llu, i_size = %llu, new_i_size = %llu\n",
374              (unsigned long long)le64_to_cpu(fe->i_blkno),
375              (unsigned long long)le64_to_cpu(fe->i_size),
376              (unsigned long long)new_i_size);
377
378         /* lets handle the simple truncate cases before doing any more
379          * cluster locking. */
380         if (new_i_size == le64_to_cpu(fe->i_size))
381                 goto bail;
382
383         down_write(&OCFS2_I(inode)->ip_alloc_sem);
384
385         /* This forces other nodes to sync and drop their pages. Do
386          * this even if we have a truncate without allocation change -
387          * ocfs2 cluster sizes can be much greater than page size, so
388          * we have to truncate them anyway.  */
389         status = ocfs2_data_lock(inode, 1);
390         if (status < 0) {
391                 up_write(&OCFS2_I(inode)->ip_alloc_sem);
392
393                 mlog_errno(status);
394                 goto bail;
395         }
396
397         unmap_mapping_range(inode->i_mapping, new_i_size + PAGE_SIZE - 1, 0, 1);
398         truncate_inode_pages(inode->i_mapping, new_i_size);
399
400         /* alright, we're going to need to do a full blown alloc size
401          * change. Orphan the inode so that recovery can complete the
402          * truncate if necessary. This does the task of marking
403          * i_size. */
404         status = ocfs2_orphan_for_truncate(osb, inode, di_bh, new_i_size);
405         if (status < 0) {
406                 mlog_errno(status);
407                 goto bail_unlock_data;
408         }
409
410         status = ocfs2_prepare_truncate(osb, inode, di_bh, &tc);
411         if (status < 0) {
412                 mlog_errno(status);
413                 goto bail_unlock_data;
414         }
415
416         status = ocfs2_commit_truncate(osb, inode, di_bh, tc);
417         if (status < 0) {
418                 mlog_errno(status);
419                 goto bail_unlock_data;
420         }
421
422         /* TODO: orphan dir cleanup here. */
423 bail_unlock_data:
424         ocfs2_data_unlock(inode, 1);
425
426         up_write(&OCFS2_I(inode)->ip_alloc_sem);
427
428 bail:
429
430         mlog_exit(status);
431         return status;
432 }
433
434 /*
435  * extend allocation only here.
436  * we'll update all the disk stuff, and oip->alloc_size
437  *
438  * expect stuff to be locked, a transaction started and enough data /
439  * metadata reservations in the contexts.
440  *
441  * Will return -EAGAIN, and a reason if a restart is needed.
442  * If passed in, *reason will always be set, even in error.
443  */
444 int ocfs2_do_extend_allocation(struct ocfs2_super *osb,
445                                struct inode *inode,
446                                u32 *logical_offset,
447                                u32 clusters_to_add,
448                                int mark_unwritten,
449                                struct buffer_head *fe_bh,
450                                handle_t *handle,
451                                struct ocfs2_alloc_context *data_ac,
452                                struct ocfs2_alloc_context *meta_ac,
453                                enum ocfs2_alloc_restarted *reason_ret)
454 {
455         int status = 0;
456         int free_extents;
457         struct ocfs2_dinode *fe = (struct ocfs2_dinode *) fe_bh->b_data;
458         enum ocfs2_alloc_restarted reason = RESTART_NONE;
459         u32 bit_off, num_bits;
460         u64 block;
461         u8 flags = 0;
462
463         BUG_ON(!clusters_to_add);
464
465         if (mark_unwritten)
466                 flags = OCFS2_EXT_UNWRITTEN;
467
468         free_extents = ocfs2_num_free_extents(osb, inode, fe);
469         if (free_extents < 0) {
470                 status = free_extents;
471                 mlog_errno(status);
472                 goto leave;
473         }
474
475         /* there are two cases which could cause us to EAGAIN in the
476          * we-need-more-metadata case:
477          * 1) we haven't reserved *any*
478          * 2) we are so fragmented, we've needed to add metadata too
479          *    many times. */
480         if (!free_extents && !meta_ac) {
481                 mlog(0, "we haven't reserved any metadata!\n");
482                 status = -EAGAIN;
483                 reason = RESTART_META;
484                 goto leave;
485         } else if ((!free_extents)
486                    && (ocfs2_alloc_context_bits_left(meta_ac)
487                        < ocfs2_extend_meta_needed(fe))) {
488                 mlog(0, "filesystem is really fragmented...\n");
489                 status = -EAGAIN;
490                 reason = RESTART_META;
491                 goto leave;
492         }
493
494         status = __ocfs2_claim_clusters(osb, handle, data_ac, 1,
495                                         clusters_to_add, &bit_off, &num_bits);
496         if (status < 0) {
497                 if (status != -ENOSPC)
498                         mlog_errno(status);
499                 goto leave;
500         }
501
502         BUG_ON(num_bits > clusters_to_add);
503
504         /* reserve our write early -- insert_extent may update the inode */
505         status = ocfs2_journal_access(handle, inode, fe_bh,
506                                       OCFS2_JOURNAL_ACCESS_WRITE);
507         if (status < 0) {
508                 mlog_errno(status);
509                 goto leave;
510         }
511
512         block = ocfs2_clusters_to_blocks(osb->sb, bit_off);
513         mlog(0, "Allocating %u clusters at block %u for inode %llu\n",
514              num_bits, bit_off, (unsigned long long)OCFS2_I(inode)->ip_blkno);
515         status = ocfs2_insert_extent(osb, handle, inode, fe_bh,
516                                      *logical_offset, block, num_bits,
517                                      flags, meta_ac);
518         if (status < 0) {
519                 mlog_errno(status);
520                 goto leave;
521         }
522
523         status = ocfs2_journal_dirty(handle, fe_bh);
524         if (status < 0) {
525                 mlog_errno(status);
526                 goto leave;
527         }
528
529         clusters_to_add -= num_bits;
530         *logical_offset += num_bits;
531
532         if (clusters_to_add) {
533                 mlog(0, "need to alloc once more, clusters = %u, wanted = "
534                      "%u\n", fe->i_clusters, clusters_to_add);
535                 status = -EAGAIN;
536                 reason = RESTART_TRANS;
537         }
538
539 leave:
540         mlog_exit(status);
541         if (reason_ret)
542                 *reason_ret = reason;
543         return status;
544 }
545
546 /*
547  * For a given allocation, determine which allocators will need to be
548  * accessed, and lock them, reserving the appropriate number of bits.
549  *
550  * Sparse file systems call this from ocfs2_write_begin_nolock()
551  * and ocfs2_allocate_unwritten_extents().
552  *
553  * File systems which don't support holes call this from
554  * ocfs2_extend_allocation().
555  */
556 int ocfs2_lock_allocators(struct inode *inode, struct ocfs2_dinode *di,
557                           u32 clusters_to_add, u32 extents_to_split,
558                           struct ocfs2_alloc_context **data_ac,
559                           struct ocfs2_alloc_context **meta_ac)
560 {
561         int ret = 0, num_free_extents;
562         unsigned int max_recs_needed = clusters_to_add + 2 * extents_to_split;
563         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
564
565         *meta_ac = NULL;
566         if (data_ac)
567                 *data_ac = NULL;
568
569         BUG_ON(clusters_to_add != 0 && data_ac == NULL);
570
571         mlog(0, "extend inode %llu, i_size = %lld, di->i_clusters = %u, "
572              "clusters_to_add = %u, extents_to_split = %u\n",
573              (unsigned long long)OCFS2_I(inode)->ip_blkno, i_size_read(inode),
574              le32_to_cpu(di->i_clusters), clusters_to_add, extents_to_split);
575
576         num_free_extents = ocfs2_num_free_extents(osb, inode, di);
577         if (num_free_extents < 0) {
578                 ret = num_free_extents;
579                 mlog_errno(ret);
580                 goto out;
581         }
582
583         /*
584          * Sparse allocation file systems need to be more conservative
585          * with reserving room for expansion - the actual allocation
586          * happens while we've got a journal handle open so re-taking
587          * a cluster lock (because we ran out of room for another
588          * extent) will violate ordering rules.
589          *
590          * Most of the time we'll only be seeing this 1 cluster at a time
591          * anyway.
592          *
593          * Always lock for any unwritten extents - we might want to
594          * add blocks during a split.
595          */
596         if (!num_free_extents ||
597             (ocfs2_sparse_alloc(osb) && num_free_extents < max_recs_needed)) {
598                 ret = ocfs2_reserve_new_metadata(osb, di, meta_ac);
599                 if (ret < 0) {
600                         if (ret != -ENOSPC)
601                                 mlog_errno(ret);
602                         goto out;
603                 }
604         }
605
606         if (clusters_to_add == 0)
607                 goto out;
608
609         ret = ocfs2_reserve_clusters(osb, clusters_to_add, data_ac);
610         if (ret < 0) {
611                 if (ret != -ENOSPC)
612                         mlog_errno(ret);
613                 goto out;
614         }
615
616 out:
617         if (ret) {
618                 if (*meta_ac) {
619                         ocfs2_free_alloc_context(*meta_ac);
620                         *meta_ac = NULL;
621                 }
622
623                 /*
624                  * We cannot have an error and a non null *data_ac.
625                  */
626         }
627
628         return ret;
629 }
630
631 static int __ocfs2_extend_allocation(struct inode *inode, u32 logical_start,
632                                      u32 clusters_to_add, int mark_unwritten)
633 {
634         int status = 0;
635         int restart_func = 0;
636         int credits;
637         u32 prev_clusters;
638         struct buffer_head *bh = NULL;
639         struct ocfs2_dinode *fe = NULL;
640         handle_t *handle = NULL;
641         struct ocfs2_alloc_context *data_ac = NULL;
642         struct ocfs2_alloc_context *meta_ac = NULL;
643         enum ocfs2_alloc_restarted why;
644         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
645
646         mlog_entry("(clusters_to_add = %u)\n", clusters_to_add);
647
648         /*
649          * This function only exists for file systems which don't
650          * support holes.
651          */
652         BUG_ON(mark_unwritten && !ocfs2_sparse_alloc(osb));
653
654         status = ocfs2_read_block(osb, OCFS2_I(inode)->ip_blkno, &bh,
655                                   OCFS2_BH_CACHED, inode);
656         if (status < 0) {
657                 mlog_errno(status);
658                 goto leave;
659         }
660
661         fe = (struct ocfs2_dinode *) bh->b_data;
662         if (!OCFS2_IS_VALID_DINODE(fe)) {
663                 OCFS2_RO_ON_INVALID_DINODE(inode->i_sb, fe);
664                 status = -EIO;
665                 goto leave;
666         }
667
668 restart_all:
669         BUG_ON(le32_to_cpu(fe->i_clusters) != OCFS2_I(inode)->ip_clusters);
670
671         status = ocfs2_lock_allocators(inode, fe, clusters_to_add, 0, &data_ac,
672                                        &meta_ac);
673         if (status) {
674                 mlog_errno(status);
675                 goto leave;
676         }
677
678         credits = ocfs2_calc_extend_credits(osb->sb, fe, clusters_to_add);
679         handle = ocfs2_start_trans(osb, credits);
680         if (IS_ERR(handle)) {
681                 status = PTR_ERR(handle);
682                 handle = NULL;
683                 mlog_errno(status);
684                 goto leave;
685         }
686
687 restarted_transaction:
688         /* reserve a write to the file entry early on - that we if we
689          * run out of credits in the allocation path, we can still
690          * update i_size. */
691         status = ocfs2_journal_access(handle, inode, bh,
692                                       OCFS2_JOURNAL_ACCESS_WRITE);
693         if (status < 0) {
694                 mlog_errno(status);
695                 goto leave;
696         }
697
698         prev_clusters = OCFS2_I(inode)->ip_clusters;
699
700         status = ocfs2_do_extend_allocation(osb,
701                                             inode,
702                                             &logical_start,
703                                             clusters_to_add,
704                                             mark_unwritten,
705                                             bh,
706                                             handle,
707                                             data_ac,
708                                             meta_ac,
709                                             &why);
710         if ((status < 0) && (status != -EAGAIN)) {
711                 if (status != -ENOSPC)
712                         mlog_errno(status);
713                 goto leave;
714         }
715
716         status = ocfs2_journal_dirty(handle, bh);
717         if (status < 0) {
718                 mlog_errno(status);
719                 goto leave;
720         }
721
722         spin_lock(&OCFS2_I(inode)->ip_lock);
723         clusters_to_add -= (OCFS2_I(inode)->ip_clusters - prev_clusters);
724         spin_unlock(&OCFS2_I(inode)->ip_lock);
725
726         if (why != RESTART_NONE && clusters_to_add) {
727                 if (why == RESTART_META) {
728                         mlog(0, "restarting function.\n");
729                         restart_func = 1;
730                 } else {
731                         BUG_ON(why != RESTART_TRANS);
732
733                         mlog(0, "restarting transaction.\n");
734                         /* TODO: This can be more intelligent. */
735                         credits = ocfs2_calc_extend_credits(osb->sb,
736                                                             fe,
737                                                             clusters_to_add);
738                         status = ocfs2_extend_trans(handle, credits);
739                         if (status < 0) {
740                                 /* handle still has to be committed at
741                                  * this point. */
742                                 status = -ENOMEM;
743                                 mlog_errno(status);
744                                 goto leave;
745                         }
746                         goto restarted_transaction;
747                 }
748         }
749
750         mlog(0, "fe: i_clusters = %u, i_size=%llu\n",
751              le32_to_cpu(fe->i_clusters),
752              (unsigned long long)le64_to_cpu(fe->i_size));
753         mlog(0, "inode: ip_clusters=%u, i_size=%lld\n",
754              OCFS2_I(inode)->ip_clusters, i_size_read(inode));
755
756 leave:
757         if (handle) {
758                 ocfs2_commit_trans(osb, handle);
759                 handle = NULL;
760         }
761         if (data_ac) {
762                 ocfs2_free_alloc_context(data_ac);
763                 data_ac = NULL;
764         }
765         if (meta_ac) {
766                 ocfs2_free_alloc_context(meta_ac);
767                 meta_ac = NULL;
768         }
769         if ((!status) && restart_func) {
770                 restart_func = 0;
771                 goto restart_all;
772         }
773         if (bh) {
774                 brelse(bh);
775                 bh = NULL;
776         }
777
778         mlog_exit(status);
779         return status;
780 }
781
782 static int ocfs2_extend_allocation(struct inode *inode, u32 logical_start,
783                                    u32 clusters_to_add, int mark_unwritten)
784 {
785         int ret;
786
787         /*
788          * The alloc sem blocks peope in read/write from reading our
789          * allocation until we're done changing it. We depend on
790          * i_mutex to block other extend/truncate calls while we're
791          * here.
792          */
793         down_write(&OCFS2_I(inode)->ip_alloc_sem);
794         ret = __ocfs2_extend_allocation(inode, logical_start, clusters_to_add,
795                                         mark_unwritten);
796         up_write(&OCFS2_I(inode)->ip_alloc_sem);
797
798         return ret;
799 }
800
801 /* Some parts of this taken from generic_cont_expand, which turned out
802  * to be too fragile to do exactly what we need without us having to
803  * worry about recursive locking in ->prepare_write() and
804  * ->commit_write(). */
805 static int ocfs2_write_zero_page(struct inode *inode,
806                                  u64 size)
807 {
808         struct address_space *mapping = inode->i_mapping;
809         struct page *page;
810         unsigned long index;
811         unsigned int offset;
812         handle_t *handle = NULL;
813         int ret;
814
815         offset = (size & (PAGE_CACHE_SIZE-1)); /* Within page */
816         /* ugh.  in prepare/commit_write, if from==to==start of block, we 
817         ** skip the prepare.  make sure we never send an offset for the start
818         ** of a block
819         */
820         if ((offset & (inode->i_sb->s_blocksize - 1)) == 0) {
821                 offset++;
822         }
823         index = size >> PAGE_CACHE_SHIFT;
824
825         page = grab_cache_page(mapping, index);
826         if (!page) {
827                 ret = -ENOMEM;
828                 mlog_errno(ret);
829                 goto out;
830         }
831
832         ret = ocfs2_prepare_write_nolock(inode, page, offset, offset);
833         if (ret < 0) {
834                 mlog_errno(ret);
835                 goto out_unlock;
836         }
837
838         if (ocfs2_should_order_data(inode)) {
839                 handle = ocfs2_start_walk_page_trans(inode, page, offset,
840                                                      offset);
841                 if (IS_ERR(handle)) {
842                         ret = PTR_ERR(handle);
843                         handle = NULL;
844                         goto out_unlock;
845                 }
846         }
847
848         /* must not update i_size! */
849         ret = block_commit_write(page, offset, offset);
850         if (ret < 0)
851                 mlog_errno(ret);
852         else
853                 ret = 0;
854
855         if (handle)
856                 ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
857 out_unlock:
858         unlock_page(page);
859         page_cache_release(page);
860 out:
861         return ret;
862 }
863
864 static int ocfs2_zero_extend(struct inode *inode,
865                              u64 zero_to_size)
866 {
867         int ret = 0;
868         u64 start_off;
869         struct super_block *sb = inode->i_sb;
870
871         start_off = ocfs2_align_bytes_to_blocks(sb, i_size_read(inode));
872         while (start_off < zero_to_size) {
873                 ret = ocfs2_write_zero_page(inode, start_off);
874                 if (ret < 0) {
875                         mlog_errno(ret);
876                         goto out;
877                 }
878
879                 start_off += sb->s_blocksize;
880
881                 /*
882                  * Very large extends have the potential to lock up
883                  * the cpu for extended periods of time.
884                  */
885                 cond_resched();
886         }
887
888 out:
889         return ret;
890 }
891
892 /* 
893  * A tail_to_skip value > 0 indicates that we're being called from
894  * ocfs2_file_aio_write(). This has the following implications:
895  *
896  * - we don't want to update i_size
897  * - di_bh will be NULL, which is fine because it's only used in the
898  *   case where we want to update i_size.
899  * - ocfs2_zero_extend() will then only be filling the hole created
900  *   between i_size and the start of the write.
901  */
902 static int ocfs2_extend_file(struct inode *inode,
903                              struct buffer_head *di_bh,
904                              u64 new_i_size,
905                              size_t tail_to_skip)
906 {
907         int ret = 0;
908         u32 clusters_to_add = 0;
909
910         BUG_ON(!tail_to_skip && !di_bh);
911
912         /* setattr sometimes calls us like this. */
913         if (new_i_size == 0)
914                 goto out;
915
916         if (i_size_read(inode) == new_i_size)
917                 goto out;
918         BUG_ON(new_i_size < i_size_read(inode));
919
920         if (ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb))) {
921                 BUG_ON(tail_to_skip != 0);
922                 goto out_update_size;
923         }
924
925         clusters_to_add = ocfs2_clusters_for_bytes(inode->i_sb, new_i_size) - 
926                 OCFS2_I(inode)->ip_clusters;
927
928         /* 
929          * protect the pages that ocfs2_zero_extend is going to be
930          * pulling into the page cache.. we do this before the
931          * metadata extend so that we don't get into the situation
932          * where we've extended the metadata but can't get the data
933          * lock to zero.
934          */
935         ret = ocfs2_data_lock(inode, 1);
936         if (ret < 0) {
937                 mlog_errno(ret);
938                 goto out;
939         }
940
941         if (clusters_to_add) {
942                 ret = ocfs2_extend_allocation(inode,
943                                               OCFS2_I(inode)->ip_clusters,
944                                               clusters_to_add, 0);
945                 if (ret < 0) {
946                         mlog_errno(ret);
947                         goto out_unlock;
948                 }
949         }
950
951         /*
952          * Call this even if we don't add any clusters to the tree. We
953          * still need to zero the area between the old i_size and the
954          * new i_size.
955          */
956         ret = ocfs2_zero_extend(inode, (u64)new_i_size - tail_to_skip);
957         if (ret < 0) {
958                 mlog_errno(ret);
959                 goto out_unlock;
960         }
961
962 out_update_size:
963         if (!tail_to_skip) {
964                 /* We're being called from ocfs2_setattr() which wants
965                  * us to update i_size */
966                 ret = ocfs2_simple_size_update(inode, di_bh, new_i_size);
967                 if (ret < 0)
968                         mlog_errno(ret);
969         }
970
971 out_unlock:
972         if (!ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb)))
973                 ocfs2_data_unlock(inode, 1);
974
975 out:
976         return ret;
977 }
978
979 int ocfs2_setattr(struct dentry *dentry, struct iattr *attr)
980 {
981         int status = 0, size_change;
982         struct inode *inode = dentry->d_inode;
983         struct super_block *sb = inode->i_sb;
984         struct ocfs2_super *osb = OCFS2_SB(sb);
985         struct buffer_head *bh = NULL;
986         handle_t *handle = NULL;
987
988         mlog_entry("(0x%p, '%.*s')\n", dentry,
989                    dentry->d_name.len, dentry->d_name.name);
990
991         if (attr->ia_valid & ATTR_MODE)
992                 mlog(0, "mode change: %d\n", attr->ia_mode);
993         if (attr->ia_valid & ATTR_UID)
994                 mlog(0, "uid change: %d\n", attr->ia_uid);
995         if (attr->ia_valid & ATTR_GID)
996                 mlog(0, "gid change: %d\n", attr->ia_gid);
997         if (attr->ia_valid & ATTR_SIZE)
998                 mlog(0, "size change...\n");
999         if (attr->ia_valid & (ATTR_ATIME | ATTR_MTIME | ATTR_CTIME))
1000                 mlog(0, "time change...\n");
1001
1002 #define OCFS2_VALID_ATTRS (ATTR_ATIME | ATTR_MTIME | ATTR_CTIME | ATTR_SIZE \
1003                            | ATTR_GID | ATTR_UID | ATTR_MODE)
1004         if (!(attr->ia_valid & OCFS2_VALID_ATTRS)) {
1005                 mlog(0, "can't handle attrs: 0x%x\n", attr->ia_valid);
1006                 return 0;
1007         }
1008
1009         status = inode_change_ok(inode, attr);
1010         if (status)
1011                 return status;
1012
1013         size_change = S_ISREG(inode->i_mode) && attr->ia_valid & ATTR_SIZE;
1014         if (size_change) {
1015                 status = ocfs2_rw_lock(inode, 1);
1016                 if (status < 0) {
1017                         mlog_errno(status);
1018                         goto bail;
1019                 }
1020         }
1021
1022         status = ocfs2_meta_lock(inode, &bh, 1);
1023         if (status < 0) {
1024                 if (status != -ENOENT)
1025                         mlog_errno(status);
1026                 goto bail_unlock_rw;
1027         }
1028
1029         if (size_change && attr->ia_size != i_size_read(inode)) {
1030                 if (attr->ia_size > sb->s_maxbytes) {
1031                         status = -EFBIG;
1032                         goto bail_unlock;
1033                 }
1034
1035                 if (i_size_read(inode) > attr->ia_size)
1036                         status = ocfs2_truncate_file(inode, bh, attr->ia_size);
1037                 else
1038                         status = ocfs2_extend_file(inode, bh, attr->ia_size, 0);
1039                 if (status < 0) {
1040                         if (status != -ENOSPC)
1041                                 mlog_errno(status);
1042                         status = -ENOSPC;
1043                         goto bail_unlock;
1044                 }
1045         }
1046
1047         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1048         if (IS_ERR(handle)) {
1049                 status = PTR_ERR(handle);
1050                 mlog_errno(status);
1051                 goto bail_unlock;
1052         }
1053
1054         /*
1055          * This will intentionally not wind up calling vmtruncate(),
1056          * since all the work for a size change has been done above.
1057          * Otherwise, we could get into problems with truncate as
1058          * ip_alloc_sem is used there to protect against i_size
1059          * changes.
1060          */
1061         status = inode_setattr(inode, attr);
1062         if (status < 0) {
1063                 mlog_errno(status);
1064                 goto bail_commit;
1065         }
1066
1067         status = ocfs2_mark_inode_dirty(handle, inode, bh);
1068         if (status < 0)
1069                 mlog_errno(status);
1070
1071 bail_commit:
1072         ocfs2_commit_trans(osb, handle);
1073 bail_unlock:
1074         ocfs2_meta_unlock(inode, 1);
1075 bail_unlock_rw:
1076         if (size_change)
1077                 ocfs2_rw_unlock(inode, 1);
1078 bail:
1079         if (bh)
1080                 brelse(bh);
1081
1082         mlog_exit(status);
1083         return status;
1084 }
1085
1086 int ocfs2_getattr(struct vfsmount *mnt,
1087                   struct dentry *dentry,
1088                   struct kstat *stat)
1089 {
1090         struct inode *inode = dentry->d_inode;
1091         struct super_block *sb = dentry->d_inode->i_sb;
1092         struct ocfs2_super *osb = sb->s_fs_info;
1093         int err;
1094
1095         mlog_entry_void();
1096
1097         err = ocfs2_inode_revalidate(dentry);
1098         if (err) {
1099                 if (err != -ENOENT)
1100                         mlog_errno(err);
1101                 goto bail;
1102         }
1103
1104         generic_fillattr(inode, stat);
1105
1106         /* We set the blksize from the cluster size for performance */
1107         stat->blksize = osb->s_clustersize;
1108
1109 bail:
1110         mlog_exit(err);
1111
1112         return err;
1113 }
1114
1115 int ocfs2_permission(struct inode *inode, int mask, struct nameidata *nd)
1116 {
1117         int ret;
1118
1119         mlog_entry_void();
1120
1121         ret = ocfs2_meta_lock(inode, NULL, 0);
1122         if (ret) {
1123                 if (ret != -ENOENT)
1124                         mlog_errno(ret);
1125                 goto out;
1126         }
1127
1128         ret = generic_permission(inode, mask, NULL);
1129
1130         ocfs2_meta_unlock(inode, 0);
1131 out:
1132         mlog_exit(ret);
1133         return ret;
1134 }
1135
1136 static int __ocfs2_write_remove_suid(struct inode *inode,
1137                                      struct buffer_head *bh)
1138 {
1139         int ret;
1140         handle_t *handle;
1141         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1142         struct ocfs2_dinode *di;
1143
1144         mlog_entry("(Inode %llu, mode 0%o)\n",
1145                    (unsigned long long)OCFS2_I(inode)->ip_blkno, inode->i_mode);
1146
1147         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1148         if (handle == NULL) {
1149                 ret = -ENOMEM;
1150                 mlog_errno(ret);
1151                 goto out;
1152         }
1153
1154         ret = ocfs2_journal_access(handle, inode, bh,
1155                                    OCFS2_JOURNAL_ACCESS_WRITE);
1156         if (ret < 0) {
1157                 mlog_errno(ret);
1158                 goto out_trans;
1159         }
1160
1161         inode->i_mode &= ~S_ISUID;
1162         if ((inode->i_mode & S_ISGID) && (inode->i_mode & S_IXGRP))
1163                 inode->i_mode &= ~S_ISGID;
1164
1165         di = (struct ocfs2_dinode *) bh->b_data;
1166         di->i_mode = cpu_to_le16(inode->i_mode);
1167
1168         ret = ocfs2_journal_dirty(handle, bh);
1169         if (ret < 0)
1170                 mlog_errno(ret);
1171
1172 out_trans:
1173         ocfs2_commit_trans(osb, handle);
1174 out:
1175         mlog_exit(ret);
1176         return ret;
1177 }
1178
1179 /*
1180  * Will look for holes and unwritten extents in the range starting at
1181  * pos for count bytes (inclusive).
1182  */
1183 static int ocfs2_check_range_for_holes(struct inode *inode, loff_t pos,
1184                                        size_t count)
1185 {
1186         int ret = 0;
1187         unsigned int extent_flags;
1188         u32 cpos, clusters, extent_len, phys_cpos;
1189         struct super_block *sb = inode->i_sb;
1190
1191         cpos = pos >> OCFS2_SB(sb)->s_clustersize_bits;
1192         clusters = ocfs2_clusters_for_bytes(sb, pos + count) - cpos;
1193
1194         while (clusters) {
1195                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos, &extent_len,
1196                                          &extent_flags);
1197                 if (ret < 0) {
1198                         mlog_errno(ret);
1199                         goto out;
1200                 }
1201
1202                 if (phys_cpos == 0 || (extent_flags & OCFS2_EXT_UNWRITTEN)) {
1203                         ret = 1;
1204                         break;
1205                 }
1206
1207                 if (extent_len > clusters)
1208                         extent_len = clusters;
1209
1210                 clusters -= extent_len;
1211                 cpos += extent_len;
1212         }
1213 out:
1214         return ret;
1215 }
1216
1217 static int ocfs2_write_remove_suid(struct inode *inode)
1218 {
1219         int ret;
1220         struct buffer_head *bh = NULL;
1221         struct ocfs2_inode_info *oi = OCFS2_I(inode);
1222
1223         ret = ocfs2_read_block(OCFS2_SB(inode->i_sb),
1224                                oi->ip_blkno, &bh, OCFS2_BH_CACHED, inode);
1225         if (ret < 0) {
1226                 mlog_errno(ret);
1227                 goto out;
1228         }
1229
1230         ret =  __ocfs2_write_remove_suid(inode, bh);
1231 out:
1232         brelse(bh);
1233         return ret;
1234 }
1235
1236 /*
1237  * Allocate enough extents to cover the region starting at byte offset
1238  * start for len bytes. Existing extents are skipped, any extents
1239  * added are marked as "unwritten".
1240  */
1241 static int ocfs2_allocate_unwritten_extents(struct inode *inode,
1242                                             u64 start, u64 len)
1243 {
1244         int ret;
1245         u32 cpos, phys_cpos, clusters, alloc_size;
1246
1247         /*
1248          * We consider both start and len to be inclusive.
1249          */
1250         cpos = start >> OCFS2_SB(inode->i_sb)->s_clustersize_bits;
1251         clusters = ocfs2_clusters_for_bytes(inode->i_sb, start + len);
1252         clusters -= cpos;
1253
1254         while (clusters) {
1255                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos,
1256                                          &alloc_size, NULL);
1257                 if (ret) {
1258                         mlog_errno(ret);
1259                         goto out;
1260                 }
1261
1262                 /*
1263                  * Hole or existing extent len can be arbitrary, so
1264                  * cap it to our own allocation request.
1265                  */
1266                 if (alloc_size > clusters)
1267                         alloc_size = clusters;
1268
1269                 if (phys_cpos) {
1270                         /*
1271                          * We already have an allocation at this
1272                          * region so we can safely skip it.
1273                          */
1274                         goto next;
1275                 }
1276
1277                 ret = __ocfs2_extend_allocation(inode, cpos, alloc_size, 1);
1278                 if (ret) {
1279                         if (ret != -ENOSPC)
1280                                 mlog_errno(ret);
1281                         goto out;
1282                 }
1283
1284 next:
1285                 cpos += alloc_size;
1286                 clusters -= alloc_size;
1287         }
1288
1289         ret = 0;
1290 out:
1291         return ret;
1292 }
1293
1294 static int __ocfs2_remove_inode_range(struct inode *inode,
1295                                       struct buffer_head *di_bh,
1296                                       u32 cpos, u32 phys_cpos, u32 len,
1297                                       struct ocfs2_cached_dealloc_ctxt *dealloc)
1298 {
1299         int ret;
1300         u64 phys_blkno = ocfs2_clusters_to_blocks(inode->i_sb, phys_cpos);
1301         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1302         struct inode *tl_inode = osb->osb_tl_inode;
1303         handle_t *handle;
1304         struct ocfs2_alloc_context *meta_ac = NULL;
1305         struct ocfs2_dinode *di = (struct ocfs2_dinode *)di_bh->b_data;
1306
1307         ret = ocfs2_lock_allocators(inode, di, 0, 1, NULL, &meta_ac);
1308         if (ret) {
1309                 mlog_errno(ret);
1310                 return ret;
1311         }
1312
1313         mutex_lock(&tl_inode->i_mutex);
1314
1315         if (ocfs2_truncate_log_needs_flush(osb)) {
1316                 ret = __ocfs2_flush_truncate_log(osb);
1317                 if (ret < 0) {
1318                         mlog_errno(ret);
1319                         goto out;
1320                 }
1321         }
1322
1323         handle = ocfs2_start_trans(osb, OCFS2_REMOVE_EXTENT_CREDITS);
1324         if (handle == NULL) {
1325                 ret = -ENOMEM;
1326                 mlog_errno(ret);
1327                 goto out;
1328         }
1329
1330         ret = ocfs2_journal_access(handle, inode, di_bh,
1331                                    OCFS2_JOURNAL_ACCESS_WRITE);
1332         if (ret) {
1333                 mlog_errno(ret);
1334                 goto out;
1335         }
1336
1337         ret = ocfs2_remove_extent(inode, di_bh, cpos, len, handle, meta_ac,
1338                                   dealloc);
1339         if (ret) {
1340                 mlog_errno(ret);
1341                 goto out_commit;
1342         }
1343
1344         OCFS2_I(inode)->ip_clusters -= len;
1345         di->i_clusters = cpu_to_le32(OCFS2_I(inode)->ip_clusters);
1346
1347         ret = ocfs2_journal_dirty(handle, di_bh);
1348         if (ret) {
1349                 mlog_errno(ret);
1350                 goto out_commit;
1351         }
1352
1353         ret = ocfs2_truncate_log_append(osb, handle, phys_blkno, len);
1354         if (ret)
1355                 mlog_errno(ret);
1356
1357 out_commit:
1358         ocfs2_commit_trans(osb, handle);
1359 out:
1360         mutex_unlock(&tl_inode->i_mutex);
1361
1362         if (meta_ac)
1363                 ocfs2_free_alloc_context(meta_ac);
1364
1365         return ret;
1366 }
1367
1368 /*
1369  * Truncate a byte range, avoiding pages within partial clusters. This
1370  * preserves those pages for the zeroing code to write to.
1371  */
1372 static void ocfs2_truncate_cluster_pages(struct inode *inode, u64 byte_start,
1373                                          u64 byte_len)
1374 {
1375         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1376         loff_t start, end;
1377         struct address_space *mapping = inode->i_mapping;
1378
1379         start = (loff_t)ocfs2_align_bytes_to_clusters(inode->i_sb, byte_start);
1380         end = byte_start + byte_len;
1381         end = end & ~(osb->s_clustersize - 1);
1382
1383         if (start < end) {
1384                 unmap_mapping_range(mapping, start, end - start, 0);
1385                 truncate_inode_pages_range(mapping, start, end - 1);
1386         }
1387 }
1388
1389 static int ocfs2_zero_partial_clusters(struct inode *inode,
1390                                        u64 start, u64 len)
1391 {
1392         int ret = 0;
1393         u64 tmpend, end = start + len;
1394         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1395         unsigned int csize = osb->s_clustersize;
1396         handle_t *handle;
1397
1398         /*
1399          * The "start" and "end" values are NOT necessarily part of
1400          * the range whose allocation is being deleted. Rather, this
1401          * is what the user passed in with the request. We must zero
1402          * partial clusters here. There's no need to worry about
1403          * physical allocation - the zeroing code knows to skip holes.
1404          */
1405         mlog(0, "byte start: %llu, end: %llu\n",
1406              (unsigned long long)start, (unsigned long long)end);
1407
1408         /*
1409          * If both edges are on a cluster boundary then there's no
1410          * zeroing required as the region is part of the allocation to
1411          * be truncated.
1412          */
1413         if ((start & (csize - 1)) == 0 && (end & (csize - 1)) == 0)
1414                 goto out;
1415
1416         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1417         if (handle == NULL) {
1418                 ret = -ENOMEM;
1419                 mlog_errno(ret);
1420                 goto out;
1421         }
1422
1423         /*
1424          * We want to get the byte offset of the end of the 1st cluster.
1425          */
1426         tmpend = (u64)osb->s_clustersize + (start & ~(osb->s_clustersize - 1));
1427         if (tmpend > end)
1428                 tmpend = end;
1429
1430         mlog(0, "1st range: start: %llu, tmpend: %llu\n",
1431              (unsigned long long)start, (unsigned long long)tmpend);
1432
1433         ret = ocfs2_zero_range_for_truncate(inode, handle, start, tmpend);
1434         if (ret)
1435                 mlog_errno(ret);
1436
1437         if (tmpend < end) {
1438                 /*
1439                  * This may make start and end equal, but the zeroing
1440                  * code will skip any work in that case so there's no
1441                  * need to catch it up here.
1442                  */
1443                 start = end & ~(osb->s_clustersize - 1);
1444
1445                 mlog(0, "2nd range: start: %llu, end: %llu\n",
1446                      (unsigned long long)start, (unsigned long long)end);
1447
1448                 ret = ocfs2_zero_range_for_truncate(inode, handle, start, end);
1449                 if (ret)
1450                         mlog_errno(ret);
1451         }
1452
1453         ocfs2_commit_trans(osb, handle);
1454 out:
1455         return ret;
1456 }
1457
1458 static int ocfs2_remove_inode_range(struct inode *inode,
1459                                     struct buffer_head *di_bh, u64 byte_start,
1460                                     u64 byte_len)
1461 {
1462         int ret = 0;
1463         u32 trunc_start, trunc_len, cpos, phys_cpos, alloc_size;
1464         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1465         struct ocfs2_cached_dealloc_ctxt dealloc;
1466
1467         ocfs2_init_dealloc_ctxt(&dealloc);
1468
1469         if (byte_len == 0)
1470                 return 0;
1471
1472         trunc_start = ocfs2_clusters_for_bytes(osb->sb, byte_start);
1473         trunc_len = (byte_start + byte_len) >> osb->s_clustersize_bits;
1474         if (trunc_len >= trunc_start)
1475                 trunc_len -= trunc_start;
1476         else
1477                 trunc_len = 0;
1478
1479         mlog(0, "Inode: %llu, start: %llu, len: %llu, cstart: %u, clen: %u\n",
1480              (unsigned long long)OCFS2_I(inode)->ip_blkno,
1481              (unsigned long long)byte_start,
1482              (unsigned long long)byte_len, trunc_start, trunc_len);
1483
1484         ret = ocfs2_zero_partial_clusters(inode, byte_start, byte_len);
1485         if (ret) {
1486                 mlog_errno(ret);
1487                 goto out;
1488         }
1489
1490         cpos = trunc_start;
1491         while (trunc_len) {
1492                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos,
1493                                          &alloc_size, NULL);
1494                 if (ret) {
1495                         mlog_errno(ret);
1496                         goto out;
1497                 }
1498
1499                 if (alloc_size > trunc_len)
1500                         alloc_size = trunc_len;
1501
1502                 /* Only do work for non-holes */
1503                 if (phys_cpos != 0) {
1504                         ret = __ocfs2_remove_inode_range(inode, di_bh, cpos,
1505                                                          phys_cpos, alloc_size,
1506                                                          &dealloc);
1507                         if (ret) {
1508                                 mlog_errno(ret);
1509                                 goto out;
1510                         }
1511                 }
1512
1513                 cpos += alloc_size;
1514                 trunc_len -= alloc_size;
1515         }
1516
1517         ocfs2_truncate_cluster_pages(inode, byte_start, byte_len);
1518
1519 out:
1520         ocfs2_schedule_truncate_log_flush(osb, 1);
1521         ocfs2_run_deallocs(osb, &dealloc);
1522
1523         return ret;
1524 }
1525
1526 /*
1527  * Parts of this function taken from xfs_change_file_space()
1528  */
1529 static int __ocfs2_change_file_space(struct file *file, struct inode *inode,
1530                                      loff_t f_pos, unsigned int cmd,
1531                                      struct ocfs2_space_resv *sr,
1532                                      int change_size)
1533 {
1534         int ret;
1535         s64 llen;
1536         loff_t size;
1537         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1538         struct buffer_head *di_bh = NULL;
1539         handle_t *handle;
1540         unsigned long long max_off = inode->i_sb->s_maxbytes;
1541
1542         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
1543                 return -EROFS;
1544
1545         mutex_lock(&inode->i_mutex);
1546
1547         /*
1548          * This prevents concurrent writes on other nodes
1549          */
1550         ret = ocfs2_rw_lock(inode, 1);
1551         if (ret) {
1552                 mlog_errno(ret);
1553                 goto out;
1554         }
1555
1556         ret = ocfs2_meta_lock(inode, &di_bh, 1);
1557         if (ret) {
1558                 mlog_errno(ret);
1559                 goto out_rw_unlock;
1560         }
1561
1562         if (inode->i_flags & (S_IMMUTABLE|S_APPEND)) {
1563                 ret = -EPERM;
1564                 goto out_meta_unlock;
1565         }
1566
1567         switch (sr->l_whence) {
1568         case 0: /*SEEK_SET*/
1569                 break;
1570         case 1: /*SEEK_CUR*/
1571                 sr->l_start += f_pos;
1572                 break;
1573         case 2: /*SEEK_END*/
1574                 sr->l_start += i_size_read(inode);
1575                 break;
1576         default:
1577                 ret = -EINVAL;
1578                 goto out_meta_unlock;
1579         }
1580         sr->l_whence = 0;
1581
1582         llen = sr->l_len > 0 ? sr->l_len - 1 : sr->l_len;
1583
1584         if (sr->l_start < 0
1585             || sr->l_start > max_off
1586             || (sr->l_start + llen) < 0
1587             || (sr->l_start + llen) > max_off) {
1588                 ret = -EINVAL;
1589                 goto out_meta_unlock;
1590         }
1591         size = sr->l_start + sr->l_len;
1592
1593         if (cmd == OCFS2_IOC_RESVSP || cmd == OCFS2_IOC_RESVSP64) {
1594                 if (sr->l_len <= 0) {
1595                         ret = -EINVAL;
1596                         goto out_meta_unlock;
1597                 }
1598         }
1599
1600         if (file && should_remove_suid(file->f_path.dentry)) {
1601                 ret = __ocfs2_write_remove_suid(inode, di_bh);
1602                 if (ret) {
1603                         mlog_errno(ret);
1604                         goto out_meta_unlock;
1605                 }
1606         }
1607
1608         down_write(&OCFS2_I(inode)->ip_alloc_sem);
1609         switch (cmd) {
1610         case OCFS2_IOC_RESVSP:
1611         case OCFS2_IOC_RESVSP64:
1612                 /*
1613                  * This takes unsigned offsets, but the signed ones we
1614                  * pass have been checked against overflow above.
1615                  */
1616                 ret = ocfs2_allocate_unwritten_extents(inode, sr->l_start,
1617                                                        sr->l_len);
1618                 break;
1619         case OCFS2_IOC_UNRESVSP:
1620         case OCFS2_IOC_UNRESVSP64:
1621                 ret = ocfs2_remove_inode_range(inode, di_bh, sr->l_start,
1622                                                sr->l_len);
1623                 break;
1624         default:
1625                 ret = -EINVAL;
1626         }
1627         up_write(&OCFS2_I(inode)->ip_alloc_sem);
1628         if (ret) {
1629                 mlog_errno(ret);
1630                 goto out_meta_unlock;
1631         }
1632
1633         /*
1634          * We update c/mtime for these changes
1635          */
1636         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1637         if (IS_ERR(handle)) {
1638                 ret = PTR_ERR(handle);
1639                 mlog_errno(ret);
1640                 goto out_meta_unlock;
1641         }
1642
1643         if (change_size && i_size_read(inode) < size)
1644                 i_size_write(inode, size);
1645
1646         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
1647         ret = ocfs2_mark_inode_dirty(handle, inode, di_bh);
1648         if (ret < 0)
1649                 mlog_errno(ret);
1650
1651         ocfs2_commit_trans(osb, handle);
1652
1653 out_meta_unlock:
1654         brelse(di_bh);
1655         ocfs2_meta_unlock(inode, 1);
1656 out_rw_unlock:
1657         ocfs2_rw_unlock(inode, 1);
1658
1659         mutex_unlock(&inode->i_mutex);
1660 out:
1661         return ret;
1662 }
1663
1664 int ocfs2_change_file_space(struct file *file, unsigned int cmd,
1665                             struct ocfs2_space_resv *sr)
1666 {
1667         struct inode *inode = file->f_path.dentry->d_inode;
1668         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);;
1669
1670         if ((cmd == OCFS2_IOC_RESVSP || cmd == OCFS2_IOC_RESVSP64) &&
1671             !ocfs2_writes_unwritten_extents(osb))
1672                 return -ENOTTY;
1673         else if ((cmd == OCFS2_IOC_UNRESVSP || cmd == OCFS2_IOC_UNRESVSP64) &&
1674                  !ocfs2_sparse_alloc(osb))
1675                 return -ENOTTY;
1676
1677         if (!S_ISREG(inode->i_mode))
1678                 return -EINVAL;
1679
1680         if (!(file->f_mode & FMODE_WRITE))
1681                 return -EBADF;
1682
1683         return __ocfs2_change_file_space(file, inode, file->f_pos, cmd, sr, 0);
1684 }
1685
1686 static long ocfs2_fallocate(struct inode *inode, int mode, loff_t offset,
1687                             loff_t len)
1688 {
1689         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1690         struct ocfs2_space_resv sr;
1691         int change_size = 1;
1692
1693         if (!ocfs2_writes_unwritten_extents(osb))
1694                 return -EOPNOTSUPP;
1695
1696         if (S_ISDIR(inode->i_mode))
1697                 return -ENODEV;
1698
1699         if (mode & FALLOC_FL_KEEP_SIZE)
1700                 change_size = 0;
1701
1702         sr.l_whence = 0;
1703         sr.l_start = (s64)offset;
1704         sr.l_len = (s64)len;
1705
1706         return __ocfs2_change_file_space(NULL, inode, offset,
1707                                          OCFS2_IOC_RESVSP64, &sr, change_size);
1708 }
1709
1710 static int ocfs2_prepare_inode_for_write(struct dentry *dentry,
1711                                          loff_t *ppos,
1712                                          size_t count,
1713                                          int appending,
1714                                          int *direct_io)
1715 {
1716         int ret = 0, meta_level = appending;
1717         struct inode *inode = dentry->d_inode;
1718         u32 clusters;
1719         loff_t newsize, saved_pos;
1720
1721         /* 
1722          * We sample i_size under a read level meta lock to see if our write
1723          * is extending the file, if it is we back off and get a write level
1724          * meta lock.
1725          */
1726         for(;;) {
1727                 ret = ocfs2_meta_lock(inode, NULL, meta_level);
1728                 if (ret < 0) {
1729                         meta_level = -1;
1730                         mlog_errno(ret);
1731                         goto out;
1732                 }
1733
1734                 /* Clear suid / sgid if necessary. We do this here
1735                  * instead of later in the write path because
1736                  * remove_suid() calls ->setattr without any hint that
1737                  * we may have already done our cluster locking. Since
1738                  * ocfs2_setattr() *must* take cluster locks to
1739                  * proceeed, this will lead us to recursively lock the
1740                  * inode. There's also the dinode i_size state which
1741                  * can be lost via setattr during extending writes (we
1742                  * set inode->i_size at the end of a write. */
1743                 if (should_remove_suid(dentry)) {
1744                         if (meta_level == 0) {
1745                                 ocfs2_meta_unlock(inode, meta_level);
1746                                 meta_level = 1;
1747                                 continue;
1748                         }
1749
1750                         ret = ocfs2_write_remove_suid(inode);
1751                         if (ret < 0) {
1752                                 mlog_errno(ret);
1753                                 goto out_unlock;
1754                         }
1755                 }
1756
1757                 /* work on a copy of ppos until we're sure that we won't have
1758                  * to recalculate it due to relocking. */
1759                 if (appending) {
1760                         saved_pos = i_size_read(inode);
1761                         mlog(0, "O_APPEND: inode->i_size=%llu\n", saved_pos);
1762                 } else {
1763                         saved_pos = *ppos;
1764                 }
1765
1766                 if (ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb))) {
1767                         loff_t end = saved_pos + count;
1768
1769                         /*
1770                          * Skip the O_DIRECT checks if we don't need
1771                          * them.
1772                          */
1773                         if (!direct_io || !(*direct_io))
1774                                 break;
1775
1776                         /*
1777                          * Allowing concurrent direct writes means
1778                          * i_size changes wouldn't be synchronized, so
1779                          * one node could wind up truncating another
1780                          * nodes writes.
1781                          */
1782                         if (end > i_size_read(inode)) {
1783                                 *direct_io = 0;
1784                                 break;
1785                         }
1786
1787                         /*
1788                          * We don't fill holes during direct io, so
1789                          * check for them here. If any are found, the
1790                          * caller will have to retake some cluster
1791                          * locks and initiate the io as buffered.
1792                          */
1793                         ret = ocfs2_check_range_for_holes(inode, saved_pos,
1794                                                           count);
1795                         if (ret == 1) {
1796                                 *direct_io = 0;
1797                                 ret = 0;
1798                         } else if (ret < 0)
1799                                 mlog_errno(ret);
1800                         break;
1801                 }
1802
1803                 /*
1804                  * The rest of this loop is concerned with legacy file
1805                  * systems which don't support sparse files.
1806                  */
1807
1808                 newsize = count + saved_pos;
1809
1810                 mlog(0, "pos=%lld newsize=%lld cursize=%lld\n",
1811                      (long long) saved_pos, (long long) newsize,
1812                      (long long) i_size_read(inode));
1813
1814                 /* No need for a higher level metadata lock if we're
1815                  * never going past i_size. */
1816                 if (newsize <= i_size_read(inode))
1817                         break;
1818
1819                 if (meta_level == 0) {
1820                         ocfs2_meta_unlock(inode, meta_level);
1821                         meta_level = 1;
1822                         continue;
1823                 }
1824
1825                 spin_lock(&OCFS2_I(inode)->ip_lock);
1826                 clusters = ocfs2_clusters_for_bytes(inode->i_sb, newsize) -
1827                         OCFS2_I(inode)->ip_clusters;
1828                 spin_unlock(&OCFS2_I(inode)->ip_lock);
1829
1830                 mlog(0, "Writing at EOF, may need more allocation: "
1831                      "i_size = %lld, newsize = %lld, need %u clusters\n",
1832                      (long long) i_size_read(inode), (long long) newsize,
1833                      clusters);
1834
1835                 /* We only want to continue the rest of this loop if
1836                  * our extend will actually require more
1837                  * allocation. */
1838                 if (!clusters)
1839                         break;
1840
1841                 ret = ocfs2_extend_file(inode, NULL, newsize, count);
1842                 if (ret < 0) {
1843                         if (ret != -ENOSPC)
1844                                 mlog_errno(ret);
1845                         goto out_unlock;
1846                 }
1847                 break;
1848         }
1849
1850         if (appending)
1851                 *ppos = saved_pos;
1852
1853 out_unlock:
1854         ocfs2_meta_unlock(inode, meta_level);
1855
1856 out:
1857         return ret;
1858 }
1859
1860 static inline void
1861 ocfs2_set_next_iovec(const struct iovec **iovp, size_t *basep, size_t bytes)
1862 {
1863         const struct iovec *iov = *iovp;
1864         size_t base = *basep;
1865
1866         do {
1867                 int copy = min(bytes, iov->iov_len - base);
1868
1869                 bytes -= copy;
1870                 base += copy;
1871                 if (iov->iov_len == base) {
1872                         iov++;
1873                         base = 0;
1874                 }
1875         } while (bytes);
1876         *iovp = iov;
1877         *basep = base;
1878 }
1879
1880 static struct page * ocfs2_get_write_source(char **ret_src_buf,
1881                                             const struct iovec *cur_iov,
1882                                             size_t iov_offset)
1883 {
1884         int ret;
1885         char *buf = cur_iov->iov_base + iov_offset;
1886         struct page *src_page = NULL;
1887         unsigned long off;
1888
1889         off = (unsigned long)(buf) & ~PAGE_CACHE_MASK;
1890
1891         if (!segment_eq(get_fs(), KERNEL_DS)) {
1892                 /*
1893                  * Pull in the user page. We want to do this outside
1894                  * of the meta data locks in order to preserve locking
1895                  * order in case of page fault.
1896                  */
1897                 ret = get_user_pages(current, current->mm,
1898                                      (unsigned long)buf & PAGE_CACHE_MASK, 1,
1899                                      0, 0, &src_page, NULL);
1900                 if (ret == 1)
1901                         *ret_src_buf = kmap(src_page) + off;
1902                 else
1903                         src_page = ERR_PTR(-EFAULT);
1904         } else {
1905                 *ret_src_buf = buf;
1906         }
1907
1908         return src_page;
1909 }
1910
1911 static void ocfs2_put_write_source(struct page *page)
1912 {
1913         if (page) {
1914                 kunmap(page);
1915                 page_cache_release(page);
1916         }
1917 }
1918
1919 static ssize_t ocfs2_file_buffered_write(struct file *file, loff_t *ppos,
1920                                          const struct iovec *iov,
1921                                          unsigned long nr_segs,
1922                                          size_t count,
1923                                          ssize_t o_direct_written)
1924 {
1925         int ret = 0;
1926         ssize_t copied, total = 0;
1927         size_t iov_offset = 0, bytes;
1928         loff_t pos;
1929         const struct iovec *cur_iov = iov;
1930         struct page *user_page, *page;
1931         char * uninitialized_var(buf);
1932         char *dst;
1933         void *fsdata;
1934
1935         /*
1936          * handle partial DIO write.  Adjust cur_iov if needed.
1937          */
1938         ocfs2_set_next_iovec(&cur_iov, &iov_offset, o_direct_written);
1939
1940         do {
1941                 pos = *ppos;
1942
1943                 user_page = ocfs2_get_write_source(&buf, cur_iov, iov_offset);
1944                 if (IS_ERR(user_page)) {
1945                         ret = PTR_ERR(user_page);
1946                         goto out;
1947                 }
1948
1949                 /* Stay within our page boundaries */
1950                 bytes = min((PAGE_CACHE_SIZE - ((unsigned long)pos & ~PAGE_CACHE_MASK)),
1951                             (PAGE_CACHE_SIZE - ((unsigned long)buf & ~PAGE_CACHE_MASK)));
1952                 /* Stay within the vector boundary */
1953                 bytes = min_t(size_t, bytes, cur_iov->iov_len - iov_offset);
1954                 /* Stay within count */
1955                 bytes = min(bytes, count);
1956
1957                 page = NULL;
1958                 ret = ocfs2_write_begin(file, file->f_mapping, pos, bytes, 0,
1959                                         &page, &fsdata);
1960                 if (ret) {
1961                         mlog_errno(ret);
1962                         goto out;
1963                 }
1964
1965                 dst = kmap_atomic(page, KM_USER0);
1966                 memcpy(dst + (pos & (loff_t)(PAGE_CACHE_SIZE - 1)), buf, bytes);
1967                 kunmap_atomic(dst, KM_USER0);
1968                 flush_dcache_page(page);
1969                 ocfs2_put_write_source(user_page);
1970
1971                 copied = ocfs2_write_end(file, file->f_mapping, pos, bytes,
1972                                          bytes, page, fsdata);
1973                 if (copied < 0) {
1974                         mlog_errno(copied);
1975                         ret = copied;
1976                         goto out;
1977                 }
1978
1979                 total += copied;
1980                 *ppos = pos + copied;
1981                 count -= copied;
1982
1983                 ocfs2_set_next_iovec(&cur_iov, &iov_offset, copied);
1984         } while(count);
1985
1986 out:
1987         return total ? total : ret;
1988 }
1989
1990 static ssize_t ocfs2_file_aio_write(struct kiocb *iocb,
1991                                     const struct iovec *iov,
1992                                     unsigned long nr_segs,
1993                                     loff_t pos)
1994 {
1995         int ret, direct_io, appending, rw_level, have_alloc_sem  = 0;
1996         int can_do_direct, sync = 0;
1997         ssize_t written = 0;
1998         size_t ocount;          /* original count */
1999         size_t count;           /* after file limit checks */
2000         loff_t *ppos = &iocb->ki_pos;
2001         struct file *file = iocb->ki_filp;
2002         struct inode *inode = file->f_path.dentry->d_inode;
2003
2004         mlog_entry("(0x%p, %u, '%.*s')\n", file,
2005                    (unsigned int)nr_segs,
2006                    file->f_path.dentry->d_name.len,
2007                    file->f_path.dentry->d_name.name);
2008
2009         if (iocb->ki_left == 0)
2010                 return 0;
2011
2012         ret = generic_segment_checks(iov, &nr_segs, &ocount, VERIFY_READ);
2013         if (ret)
2014                 return ret;
2015
2016         count = ocount;
2017
2018         vfs_check_frozen(inode->i_sb, SB_FREEZE_WRITE);
2019
2020         appending = file->f_flags & O_APPEND ? 1 : 0;
2021         direct_io = file->f_flags & O_DIRECT ? 1 : 0;
2022
2023         mutex_lock(&inode->i_mutex);
2024
2025 relock:
2026         /* to match setattr's i_mutex -> i_alloc_sem -> rw_lock ordering */
2027         if (direct_io) {
2028                 down_read(&inode->i_alloc_sem);
2029                 have_alloc_sem = 1;
2030         }
2031
2032         /* concurrent O_DIRECT writes are allowed */
2033         rw_level = !direct_io;
2034         ret = ocfs2_rw_lock(inode, rw_level);
2035         if (ret < 0) {
2036                 mlog_errno(ret);
2037                 goto out_sems;
2038         }
2039
2040         can_do_direct = direct_io;
2041         ret = ocfs2_prepare_inode_for_write(file->f_path.dentry, ppos,
2042                                             iocb->ki_left, appending,
2043                                             &can_do_direct);
2044         if (ret < 0) {
2045                 mlog_errno(ret);
2046                 goto out;
2047         }
2048
2049         /*
2050          * We can't complete the direct I/O as requested, fall back to
2051          * buffered I/O.
2052          */
2053         if (direct_io && !can_do_direct) {
2054                 ocfs2_rw_unlock(inode, rw_level);
2055                 up_read(&inode->i_alloc_sem);
2056
2057                 have_alloc_sem = 0;
2058                 rw_level = -1;
2059
2060                 direct_io = 0;
2061                 sync = 1;
2062                 goto relock;
2063         }
2064
2065         if (!sync && ((file->f_flags & O_SYNC) || IS_SYNC(inode)))
2066                 sync = 1;
2067
2068         /*
2069          * XXX: Is it ok to execute these checks a second time?
2070          */
2071         ret = generic_write_checks(file, ppos, &count, S_ISBLK(inode->i_mode));
2072         if (ret)
2073                 goto out;
2074
2075         /*
2076          * Set pos so that sync_page_range_nolock() below understands
2077          * where to start from. We might've moved it around via the
2078          * calls above. The range we want to actually sync starts from
2079          * *ppos here.
2080          *
2081          */
2082         pos = *ppos;
2083
2084         /* communicate with ocfs2_dio_end_io */
2085         ocfs2_iocb_set_rw_locked(iocb, rw_level);
2086
2087         if (direct_io) {
2088                 written = generic_file_direct_write(iocb, iov, &nr_segs, *ppos,
2089                                                     ppos, count, ocount);
2090                 if (written < 0) {
2091                         ret = written;
2092                         goto out_dio;
2093                 }
2094         } else {
2095                 written = ocfs2_file_buffered_write(file, ppos, iov, nr_segs,
2096                                                     count, written);
2097                 if (written < 0) {
2098                         ret = written;
2099                         if (ret != -EFAULT || ret != -ENOSPC)
2100                                 mlog_errno(ret);
2101                         goto out;
2102                 }
2103         }
2104
2105 out_dio:
2106         /* buffered aio wouldn't have proper lock coverage today */
2107         BUG_ON(ret == -EIOCBQUEUED && !(file->f_flags & O_DIRECT));
2108
2109         /* 
2110          * deep in g_f_a_w_n()->ocfs2_direct_IO we pass in a ocfs2_dio_end_io
2111          * function pointer which is called when o_direct io completes so that
2112          * it can unlock our rw lock.  (it's the clustered equivalent of
2113          * i_alloc_sem; protects truncate from racing with pending ios).
2114          * Unfortunately there are error cases which call end_io and others
2115          * that don't.  so we don't have to unlock the rw_lock if either an
2116          * async dio is going to do it in the future or an end_io after an
2117          * error has already done it.
2118          */
2119         if (ret == -EIOCBQUEUED || !ocfs2_iocb_is_rw_locked(iocb)) {
2120                 rw_level = -1;
2121                 have_alloc_sem = 0;
2122         }
2123
2124 out:
2125         if (rw_level != -1)
2126                 ocfs2_rw_unlock(inode, rw_level);
2127
2128 out_sems:
2129         if (have_alloc_sem)
2130                 up_read(&inode->i_alloc_sem);
2131
2132         if (written > 0 && sync) {
2133                 ssize_t err;
2134
2135                 err = sync_page_range_nolock(inode, file->f_mapping, pos, count);
2136                 if (err < 0)
2137                         written = err;
2138         }
2139
2140         mutex_unlock(&inode->i_mutex);
2141
2142         mlog_exit(ret);
2143         return written ? written : ret;
2144 }
2145
2146 static int ocfs2_splice_write_actor(struct pipe_inode_info *pipe,
2147                                     struct pipe_buffer *buf,
2148                                     struct splice_desc *sd)
2149 {
2150         int ret, count;
2151         ssize_t copied = 0;
2152         struct file *file = sd->u.file;
2153         unsigned int offset;
2154         struct page *page = NULL;
2155         void *fsdata;
2156         char *src, *dst;
2157
2158         ret = buf->ops->confirm(pipe, buf);
2159         if (ret)
2160                 goto out;
2161
2162         offset = sd->pos & ~PAGE_CACHE_MASK;
2163         count = sd->len;
2164         if (count + offset > PAGE_CACHE_SIZE)
2165                 count = PAGE_CACHE_SIZE - offset;
2166
2167         ret = ocfs2_write_begin(file, file->f_mapping, sd->pos, count, 0,
2168                                 &page, &fsdata);
2169         if (ret) {
2170                 mlog_errno(ret);
2171                 goto out;
2172         }
2173
2174         src = buf->ops->map(pipe, buf, 1);
2175         dst = kmap_atomic(page, KM_USER1);
2176         memcpy(dst + offset, src + buf->offset, count);
2177         kunmap_atomic(dst, KM_USER1);
2178         buf->ops->unmap(pipe, buf, src);
2179
2180         copied = ocfs2_write_end(file, file->f_mapping, sd->pos, count, count,
2181                                  page, fsdata);
2182         if (copied < 0) {
2183                 mlog_errno(copied);
2184                 ret = copied;
2185                 goto out;
2186         }
2187 out:
2188
2189         return copied ? copied : ret;
2190 }
2191
2192 static ssize_t __ocfs2_file_splice_write(struct pipe_inode_info *pipe,
2193                                          struct file *out,
2194                                          loff_t *ppos,
2195                                          size_t len,
2196                                          unsigned int flags)
2197 {
2198         int ret, err;
2199         struct address_space *mapping = out->f_mapping;
2200         struct inode *inode = mapping->host;
2201         struct splice_desc sd = {
2202                 .total_len = len,
2203                 .flags = flags,
2204                 .pos = *ppos,
2205                 .u.file = out,
2206         };
2207
2208         ret = __splice_from_pipe(pipe, &sd, ocfs2_splice_write_actor);
2209         if (ret > 0) {
2210                 *ppos += ret;
2211
2212                 if (unlikely((out->f_flags & O_SYNC) || IS_SYNC(inode))) {
2213                         err = generic_osync_inode(inode, mapping,
2214                                                   OSYNC_METADATA|OSYNC_DATA);
2215                         if (err)
2216                                 ret = err;
2217                 }
2218         }
2219
2220         return ret;
2221 }
2222
2223 static ssize_t ocfs2_file_splice_write(struct pipe_inode_info *pipe,
2224                                        struct file *out,
2225                                        loff_t *ppos,
2226                                        size_t len,
2227                                        unsigned int flags)
2228 {
2229         int ret;
2230         struct inode *inode = out->f_path.dentry->d_inode;
2231
2232         mlog_entry("(0x%p, 0x%p, %u, '%.*s')\n", out, pipe,
2233                    (unsigned int)len,
2234                    out->f_path.dentry->d_name.len,
2235                    out->f_path.dentry->d_name.name);
2236
2237         inode_double_lock(inode, pipe->inode);
2238
2239         ret = ocfs2_rw_lock(inode, 1);
2240         if (ret < 0) {
2241                 mlog_errno(ret);
2242                 goto out;
2243         }
2244
2245         ret = ocfs2_prepare_inode_for_write(out->f_path.dentry, ppos, len, 0,
2246                                             NULL);
2247         if (ret < 0) {
2248                 mlog_errno(ret);
2249                 goto out_unlock;
2250         }
2251
2252         /* ok, we're done with i_size and alloc work */
2253         ret = __ocfs2_file_splice_write(pipe, out, ppos, len, flags);
2254
2255 out_unlock:
2256         ocfs2_rw_unlock(inode, 1);
2257 out:
2258         inode_double_unlock(inode, pipe->inode);
2259
2260         mlog_exit(ret);
2261         return ret;
2262 }
2263
2264 static ssize_t ocfs2_file_splice_read(struct file *in,
2265                                       loff_t *ppos,
2266                                       struct pipe_inode_info *pipe,
2267                                       size_t len,
2268                                       unsigned int flags)
2269 {
2270         int ret = 0;
2271         struct inode *inode = in->f_path.dentry->d_inode;
2272
2273         mlog_entry("(0x%p, 0x%p, %u, '%.*s')\n", in, pipe,
2274                    (unsigned int)len,
2275                    in->f_path.dentry->d_name.len,
2276                    in->f_path.dentry->d_name.name);
2277
2278         /*
2279          * See the comment in ocfs2_file_aio_read()
2280          */
2281         ret = ocfs2_meta_lock(inode, NULL, 0);
2282         if (ret < 0) {
2283                 mlog_errno(ret);
2284                 goto bail;
2285         }
2286         ocfs2_meta_unlock(inode, 0);
2287
2288         ret = generic_file_splice_read(in, ppos, pipe, len, flags);
2289
2290 bail:
2291         mlog_exit(ret);
2292         return ret;
2293 }
2294
2295 static ssize_t ocfs2_file_aio_read(struct kiocb *iocb,
2296                                    const struct iovec *iov,
2297                                    unsigned long nr_segs,
2298                                    loff_t pos)
2299 {
2300         int ret = 0, rw_level = -1, have_alloc_sem = 0, lock_level = 0;
2301         struct file *filp = iocb->ki_filp;
2302         struct inode *inode = filp->f_path.dentry->d_inode;
2303
2304         mlog_entry("(0x%p, %u, '%.*s')\n", filp,
2305                    (unsigned int)nr_segs,
2306                    filp->f_path.dentry->d_name.len,
2307                    filp->f_path.dentry->d_name.name);
2308
2309         if (!inode) {
2310                 ret = -EINVAL;
2311                 mlog_errno(ret);
2312                 goto bail;
2313         }
2314
2315         /* 
2316          * buffered reads protect themselves in ->readpage().  O_DIRECT reads
2317          * need locks to protect pending reads from racing with truncate.
2318          */
2319         if (filp->f_flags & O_DIRECT) {
2320                 down_read(&inode->i_alloc_sem);
2321                 have_alloc_sem = 1;
2322
2323                 ret = ocfs2_rw_lock(inode, 0);
2324                 if (ret < 0) {
2325                         mlog_errno(ret);
2326                         goto bail;
2327                 }
2328                 rw_level = 0;
2329                 /* communicate with ocfs2_dio_end_io */
2330                 ocfs2_iocb_set_rw_locked(iocb, rw_level);
2331         }
2332
2333         /*
2334          * We're fine letting folks race truncates and extending
2335          * writes with read across the cluster, just like they can
2336          * locally. Hence no rw_lock during read.
2337          * 
2338          * Take and drop the meta data lock to update inode fields
2339          * like i_size. This allows the checks down below
2340          * generic_file_aio_read() a chance of actually working. 
2341          */
2342         ret = ocfs2_meta_lock_atime(inode, filp->f_vfsmnt, &lock_level);
2343         if (ret < 0) {
2344                 mlog_errno(ret);
2345                 goto bail;
2346         }
2347         ocfs2_meta_unlock(inode, lock_level);
2348
2349         ret = generic_file_aio_read(iocb, iov, nr_segs, iocb->ki_pos);
2350         if (ret == -EINVAL)
2351                 mlog(ML_ERROR, "generic_file_aio_read returned -EINVAL\n");
2352
2353         /* buffered aio wouldn't have proper lock coverage today */
2354         BUG_ON(ret == -EIOCBQUEUED && !(filp->f_flags & O_DIRECT));
2355
2356         /* see ocfs2_file_aio_write */
2357         if (ret == -EIOCBQUEUED || !ocfs2_iocb_is_rw_locked(iocb)) {
2358                 rw_level = -1;
2359                 have_alloc_sem = 0;
2360         }
2361
2362 bail:
2363         if (have_alloc_sem)
2364                 up_read(&inode->i_alloc_sem);
2365         if (rw_level != -1) 
2366                 ocfs2_rw_unlock(inode, rw_level);
2367         mlog_exit(ret);
2368
2369         return ret;
2370 }
2371
2372 const struct inode_operations ocfs2_file_iops = {
2373         .setattr        = ocfs2_setattr,
2374         .getattr        = ocfs2_getattr,
2375         .permission     = ocfs2_permission,
2376         .fallocate      = ocfs2_fallocate,
2377 };
2378
2379 const struct inode_operations ocfs2_special_file_iops = {
2380         .setattr        = ocfs2_setattr,
2381         .getattr        = ocfs2_getattr,
2382         .permission     = ocfs2_permission,
2383 };
2384
2385 const struct file_operations ocfs2_fops = {
2386         .read           = do_sync_read,
2387         .write          = do_sync_write,
2388         .mmap           = ocfs2_mmap,
2389         .fsync          = ocfs2_sync_file,
2390         .release        = ocfs2_file_release,
2391         .open           = ocfs2_file_open,
2392         .aio_read       = ocfs2_file_aio_read,
2393         .aio_write      = ocfs2_file_aio_write,
2394         .ioctl          = ocfs2_ioctl,
2395 #ifdef CONFIG_COMPAT
2396         .compat_ioctl   = ocfs2_compat_ioctl,
2397 #endif
2398         .splice_read    = ocfs2_file_splice_read,
2399         .splice_write   = ocfs2_file_splice_write,
2400 };
2401
2402 const struct file_operations ocfs2_dops = {
2403         .read           = generic_read_dir,
2404         .readdir        = ocfs2_readdir,
2405         .fsync          = ocfs2_sync_file,
2406         .ioctl          = ocfs2_ioctl,
2407 #ifdef CONFIG_COMPAT
2408         .compat_ioctl   = ocfs2_compat_ioctl,
2409 #endif
2410 };