ocfs2: fix race between dio and recover orphan
[cascardo/linux.git] / 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 #include <linux/quotaops.h>
39 #include <linux/blkdev.h>
40 #include <linux/backing-dev.h>
41
42 #include <cluster/masklog.h>
43
44 #include "ocfs2.h"
45
46 #include "alloc.h"
47 #include "aops.h"
48 #include "dir.h"
49 #include "dlmglue.h"
50 #include "extent_map.h"
51 #include "file.h"
52 #include "sysfile.h"
53 #include "inode.h"
54 #include "ioctl.h"
55 #include "journal.h"
56 #include "locks.h"
57 #include "mmap.h"
58 #include "suballoc.h"
59 #include "super.h"
60 #include "xattr.h"
61 #include "acl.h"
62 #include "quota.h"
63 #include "refcounttree.h"
64 #include "ocfs2_trace.h"
65
66 #include "buffer_head_io.h"
67
68 static int ocfs2_init_file_private(struct inode *inode, struct file *file)
69 {
70         struct ocfs2_file_private *fp;
71
72         fp = kzalloc(sizeof(struct ocfs2_file_private), GFP_KERNEL);
73         if (!fp)
74                 return -ENOMEM;
75
76         fp->fp_file = file;
77         mutex_init(&fp->fp_mutex);
78         ocfs2_file_lock_res_init(&fp->fp_flock, fp);
79         file->private_data = fp;
80
81         return 0;
82 }
83
84 static void ocfs2_free_file_private(struct inode *inode, struct file *file)
85 {
86         struct ocfs2_file_private *fp = file->private_data;
87         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
88
89         if (fp) {
90                 ocfs2_simple_drop_lockres(osb, &fp->fp_flock);
91                 ocfs2_lock_res_free(&fp->fp_flock);
92                 kfree(fp);
93                 file->private_data = NULL;
94         }
95 }
96
97 static int ocfs2_file_open(struct inode *inode, struct file *file)
98 {
99         int status;
100         int mode = file->f_flags;
101         struct ocfs2_inode_info *oi = OCFS2_I(inode);
102
103         trace_ocfs2_file_open(inode, file, file->f_path.dentry,
104                               (unsigned long long)OCFS2_I(inode)->ip_blkno,
105                               file->f_path.dentry->d_name.len,
106                               file->f_path.dentry->d_name.name, mode);
107
108         if (file->f_mode & FMODE_WRITE) {
109                 status = dquot_initialize(inode);
110                 if (status)
111                         goto leave;
112         }
113
114         spin_lock(&oi->ip_lock);
115
116         /* Check that the inode hasn't been wiped from disk by another
117          * node. If it hasn't then we're safe as long as we hold the
118          * spin lock until our increment of open count. */
119         if (OCFS2_I(inode)->ip_flags & OCFS2_INODE_DELETED) {
120                 spin_unlock(&oi->ip_lock);
121
122                 status = -ENOENT;
123                 goto leave;
124         }
125
126         if (mode & O_DIRECT)
127                 oi->ip_flags |= OCFS2_INODE_OPEN_DIRECT;
128
129         oi->ip_open_count++;
130         spin_unlock(&oi->ip_lock);
131
132         status = ocfs2_init_file_private(inode, file);
133         if (status) {
134                 /*
135                  * We want to set open count back if we're failing the
136                  * open.
137                  */
138                 spin_lock(&oi->ip_lock);
139                 oi->ip_open_count--;
140                 spin_unlock(&oi->ip_lock);
141         }
142
143 leave:
144         return status;
145 }
146
147 static int ocfs2_file_release(struct inode *inode, struct file *file)
148 {
149         struct ocfs2_inode_info *oi = OCFS2_I(inode);
150
151         spin_lock(&oi->ip_lock);
152         if (!--oi->ip_open_count)
153                 oi->ip_flags &= ~OCFS2_INODE_OPEN_DIRECT;
154
155         trace_ocfs2_file_release(inode, file, file->f_path.dentry,
156                                  oi->ip_blkno,
157                                  file->f_path.dentry->d_name.len,
158                                  file->f_path.dentry->d_name.name,
159                                  oi->ip_open_count);
160         spin_unlock(&oi->ip_lock);
161
162         ocfs2_free_file_private(inode, file);
163
164         return 0;
165 }
166
167 static int ocfs2_dir_open(struct inode *inode, struct file *file)
168 {
169         return ocfs2_init_file_private(inode, file);
170 }
171
172 static int ocfs2_dir_release(struct inode *inode, struct file *file)
173 {
174         ocfs2_free_file_private(inode, file);
175         return 0;
176 }
177
178 static int ocfs2_sync_file(struct file *file, loff_t start, loff_t end,
179                            int datasync)
180 {
181         int err = 0;
182         struct inode *inode = file->f_mapping->host;
183         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
184         struct ocfs2_inode_info *oi = OCFS2_I(inode);
185         journal_t *journal = osb->journal->j_journal;
186         int ret;
187         tid_t commit_tid;
188         bool needs_barrier = false;
189
190         trace_ocfs2_sync_file(inode, file, file->f_path.dentry,
191                               OCFS2_I(inode)->ip_blkno,
192                               file->f_path.dentry->d_name.len,
193                               file->f_path.dentry->d_name.name,
194                               (unsigned long long)datasync);
195
196         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
197                 return -EROFS;
198
199         err = filemap_write_and_wait_range(inode->i_mapping, start, end);
200         if (err)
201                 return err;
202
203         commit_tid = datasync ? oi->i_datasync_tid : oi->i_sync_tid;
204         if (journal->j_flags & JBD2_BARRIER &&
205             !jbd2_trans_will_send_data_barrier(journal, commit_tid))
206                 needs_barrier = true;
207         err = jbd2_complete_transaction(journal, commit_tid);
208         if (needs_barrier) {
209                 ret = blkdev_issue_flush(inode->i_sb->s_bdev, GFP_KERNEL, NULL);
210                 if (!err)
211                         err = ret;
212         }
213
214         if (err)
215                 mlog_errno(err);
216
217         return (err < 0) ? -EIO : 0;
218 }
219
220 int ocfs2_should_update_atime(struct inode *inode,
221                               struct vfsmount *vfsmnt)
222 {
223         struct timespec now;
224         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
225
226         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
227                 return 0;
228
229         if ((inode->i_flags & S_NOATIME) ||
230             ((inode->i_sb->s_flags & MS_NODIRATIME) && S_ISDIR(inode->i_mode)))
231                 return 0;
232
233         /*
234          * We can be called with no vfsmnt structure - NFSD will
235          * sometimes do this.
236          *
237          * Note that our action here is different than touch_atime() -
238          * if we can't tell whether this is a noatime mount, then we
239          * don't know whether to trust the value of s_atime_quantum.
240          */
241         if (vfsmnt == NULL)
242                 return 0;
243
244         if ((vfsmnt->mnt_flags & MNT_NOATIME) ||
245             ((vfsmnt->mnt_flags & MNT_NODIRATIME) && S_ISDIR(inode->i_mode)))
246                 return 0;
247
248         if (vfsmnt->mnt_flags & MNT_RELATIME) {
249                 if ((timespec_compare(&inode->i_atime, &inode->i_mtime) <= 0) ||
250                     (timespec_compare(&inode->i_atime, &inode->i_ctime) <= 0))
251                         return 1;
252
253                 return 0;
254         }
255
256         now = CURRENT_TIME;
257         if ((now.tv_sec - inode->i_atime.tv_sec <= osb->s_atime_quantum))
258                 return 0;
259         else
260                 return 1;
261 }
262
263 int ocfs2_update_inode_atime(struct inode *inode,
264                              struct buffer_head *bh)
265 {
266         int ret;
267         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
268         handle_t *handle;
269         struct ocfs2_dinode *di = (struct ocfs2_dinode *) bh->b_data;
270
271         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
272         if (IS_ERR(handle)) {
273                 ret = PTR_ERR(handle);
274                 mlog_errno(ret);
275                 goto out;
276         }
277
278         ret = ocfs2_journal_access_di(handle, INODE_CACHE(inode), bh,
279                                       OCFS2_JOURNAL_ACCESS_WRITE);
280         if (ret) {
281                 mlog_errno(ret);
282                 goto out_commit;
283         }
284
285         /*
286          * Don't use ocfs2_mark_inode_dirty() here as we don't always
287          * have i_mutex to guard against concurrent changes to other
288          * inode fields.
289          */
290         inode->i_atime = CURRENT_TIME;
291         di->i_atime = cpu_to_le64(inode->i_atime.tv_sec);
292         di->i_atime_nsec = cpu_to_le32(inode->i_atime.tv_nsec);
293         ocfs2_update_inode_fsync_trans(handle, inode, 0);
294         ocfs2_journal_dirty(handle, bh);
295
296 out_commit:
297         ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
298 out:
299         return ret;
300 }
301
302 int ocfs2_set_inode_size(handle_t *handle,
303                                 struct inode *inode,
304                                 struct buffer_head *fe_bh,
305                                 u64 new_i_size)
306 {
307         int status;
308
309         i_size_write(inode, new_i_size);
310         inode->i_blocks = ocfs2_inode_sector_count(inode);
311         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
312
313         status = ocfs2_mark_inode_dirty(handle, inode, fe_bh);
314         if (status < 0) {
315                 mlog_errno(status);
316                 goto bail;
317         }
318
319 bail:
320         return status;
321 }
322
323 int ocfs2_simple_size_update(struct inode *inode,
324                              struct buffer_head *di_bh,
325                              u64 new_i_size)
326 {
327         int ret;
328         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
329         handle_t *handle = NULL;
330
331         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
332         if (IS_ERR(handle)) {
333                 ret = PTR_ERR(handle);
334                 mlog_errno(ret);
335                 goto out;
336         }
337
338         ret = ocfs2_set_inode_size(handle, inode, di_bh,
339                                    new_i_size);
340         if (ret < 0)
341                 mlog_errno(ret);
342
343         ocfs2_update_inode_fsync_trans(handle, inode, 0);
344         ocfs2_commit_trans(osb, handle);
345 out:
346         return ret;
347 }
348
349 static int ocfs2_cow_file_pos(struct inode *inode,
350                               struct buffer_head *fe_bh,
351                               u64 offset)
352 {
353         int status;
354         u32 phys, cpos = offset >> OCFS2_SB(inode->i_sb)->s_clustersize_bits;
355         unsigned int num_clusters = 0;
356         unsigned int ext_flags = 0;
357
358         /*
359          * If the new offset is aligned to the range of the cluster, there is
360          * no space for ocfs2_zero_range_for_truncate to fill, so no need to
361          * CoW either.
362          */
363         if ((offset & (OCFS2_SB(inode->i_sb)->s_clustersize - 1)) == 0)
364                 return 0;
365
366         status = ocfs2_get_clusters(inode, cpos, &phys,
367                                     &num_clusters, &ext_flags);
368         if (status) {
369                 mlog_errno(status);
370                 goto out;
371         }
372
373         if (!(ext_flags & OCFS2_EXT_REFCOUNTED))
374                 goto out;
375
376         return ocfs2_refcount_cow(inode, fe_bh, cpos, 1, cpos+1);
377
378 out:
379         return status;
380 }
381
382 static int ocfs2_orphan_for_truncate(struct ocfs2_super *osb,
383                                      struct inode *inode,
384                                      struct buffer_head *fe_bh,
385                                      u64 new_i_size)
386 {
387         int status;
388         handle_t *handle;
389         struct ocfs2_dinode *di;
390         u64 cluster_bytes;
391
392         /*
393          * We need to CoW the cluster contains the offset if it is reflinked
394          * since we will call ocfs2_zero_range_for_truncate later which will
395          * write "0" from offset to the end of the cluster.
396          */
397         status = ocfs2_cow_file_pos(inode, fe_bh, new_i_size);
398         if (status) {
399                 mlog_errno(status);
400                 return status;
401         }
402
403         /* TODO: This needs to actually orphan the inode in this
404          * transaction. */
405
406         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
407         if (IS_ERR(handle)) {
408                 status = PTR_ERR(handle);
409                 mlog_errno(status);
410                 goto out;
411         }
412
413         status = ocfs2_journal_access_di(handle, INODE_CACHE(inode), fe_bh,
414                                          OCFS2_JOURNAL_ACCESS_WRITE);
415         if (status < 0) {
416                 mlog_errno(status);
417                 goto out_commit;
418         }
419
420         /*
421          * Do this before setting i_size.
422          */
423         cluster_bytes = ocfs2_align_bytes_to_clusters(inode->i_sb, new_i_size);
424         status = ocfs2_zero_range_for_truncate(inode, handle, new_i_size,
425                                                cluster_bytes);
426         if (status) {
427                 mlog_errno(status);
428                 goto out_commit;
429         }
430
431         i_size_write(inode, new_i_size);
432         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
433
434         di = (struct ocfs2_dinode *) fe_bh->b_data;
435         di->i_size = cpu_to_le64(new_i_size);
436         di->i_ctime = di->i_mtime = cpu_to_le64(inode->i_ctime.tv_sec);
437         di->i_ctime_nsec = di->i_mtime_nsec = cpu_to_le32(inode->i_ctime.tv_nsec);
438         ocfs2_update_inode_fsync_trans(handle, inode, 0);
439
440         ocfs2_journal_dirty(handle, fe_bh);
441
442 out_commit:
443         ocfs2_commit_trans(osb, handle);
444 out:
445         return status;
446 }
447
448 int ocfs2_truncate_file(struct inode *inode,
449                                struct buffer_head *di_bh,
450                                u64 new_i_size)
451 {
452         int status = 0;
453         struct ocfs2_dinode *fe = NULL;
454         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
455
456         /* We trust di_bh because it comes from ocfs2_inode_lock(), which
457          * already validated it */
458         fe = (struct ocfs2_dinode *) di_bh->b_data;
459
460         trace_ocfs2_truncate_file((unsigned long long)OCFS2_I(inode)->ip_blkno,
461                                   (unsigned long long)le64_to_cpu(fe->i_size),
462                                   (unsigned long long)new_i_size);
463
464         mlog_bug_on_msg(le64_to_cpu(fe->i_size) != i_size_read(inode),
465                         "Inode %llu, inode i_size = %lld != di "
466                         "i_size = %llu, i_flags = 0x%x\n",
467                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
468                         i_size_read(inode),
469                         (unsigned long long)le64_to_cpu(fe->i_size),
470                         le32_to_cpu(fe->i_flags));
471
472         if (new_i_size > le64_to_cpu(fe->i_size)) {
473                 trace_ocfs2_truncate_file_error(
474                         (unsigned long long)le64_to_cpu(fe->i_size),
475                         (unsigned long long)new_i_size);
476                 status = -EINVAL;
477                 mlog_errno(status);
478                 goto bail;
479         }
480
481         down_write(&OCFS2_I(inode)->ip_alloc_sem);
482
483         ocfs2_resv_discard(&osb->osb_la_resmap,
484                            &OCFS2_I(inode)->ip_la_data_resv);
485
486         /*
487          * The inode lock forced other nodes to sync and drop their
488          * pages, which (correctly) happens even if we have a truncate
489          * without allocation change - ocfs2 cluster sizes can be much
490          * greater than page size, so we have to truncate them
491          * anyway.
492          */
493         unmap_mapping_range(inode->i_mapping, new_i_size + PAGE_SIZE - 1, 0, 1);
494         truncate_inode_pages(inode->i_mapping, new_i_size);
495
496         if (OCFS2_I(inode)->ip_dyn_features & OCFS2_INLINE_DATA_FL) {
497                 status = ocfs2_truncate_inline(inode, di_bh, new_i_size,
498                                                i_size_read(inode), 1);
499                 if (status)
500                         mlog_errno(status);
501
502                 goto bail_unlock_sem;
503         }
504
505         /* alright, we're going to need to do a full blown alloc size
506          * change. Orphan the inode so that recovery can complete the
507          * truncate if necessary. This does the task of marking
508          * i_size. */
509         status = ocfs2_orphan_for_truncate(osb, inode, di_bh, new_i_size);
510         if (status < 0) {
511                 mlog_errno(status);
512                 goto bail_unlock_sem;
513         }
514
515         status = ocfs2_commit_truncate(osb, inode, di_bh);
516         if (status < 0) {
517                 mlog_errno(status);
518                 goto bail_unlock_sem;
519         }
520
521         /* TODO: orphan dir cleanup here. */
522 bail_unlock_sem:
523         up_write(&OCFS2_I(inode)->ip_alloc_sem);
524
525 bail:
526         if (!status && OCFS2_I(inode)->ip_clusters == 0)
527                 status = ocfs2_try_remove_refcount_tree(inode, di_bh);
528
529         return status;
530 }
531
532 /*
533  * extend file allocation only here.
534  * we'll update all the disk stuff, and oip->alloc_size
535  *
536  * expect stuff to be locked, a transaction started and enough data /
537  * metadata reservations in the contexts.
538  *
539  * Will return -EAGAIN, and a reason if a restart is needed.
540  * If passed in, *reason will always be set, even in error.
541  */
542 int ocfs2_add_inode_data(struct ocfs2_super *osb,
543                          struct inode *inode,
544                          u32 *logical_offset,
545                          u32 clusters_to_add,
546                          int mark_unwritten,
547                          struct buffer_head *fe_bh,
548                          handle_t *handle,
549                          struct ocfs2_alloc_context *data_ac,
550                          struct ocfs2_alloc_context *meta_ac,
551                          enum ocfs2_alloc_restarted *reason_ret)
552 {
553         int ret;
554         struct ocfs2_extent_tree et;
555
556         ocfs2_init_dinode_extent_tree(&et, INODE_CACHE(inode), fe_bh);
557         ret = ocfs2_add_clusters_in_btree(handle, &et, logical_offset,
558                                           clusters_to_add, mark_unwritten,
559                                           data_ac, meta_ac, reason_ret);
560
561         return ret;
562 }
563
564 static int __ocfs2_extend_allocation(struct inode *inode, u32 logical_start,
565                                      u32 clusters_to_add, int mark_unwritten)
566 {
567         int status = 0;
568         int restart_func = 0;
569         int credits;
570         u32 prev_clusters;
571         struct buffer_head *bh = NULL;
572         struct ocfs2_dinode *fe = NULL;
573         handle_t *handle = NULL;
574         struct ocfs2_alloc_context *data_ac = NULL;
575         struct ocfs2_alloc_context *meta_ac = NULL;
576         enum ocfs2_alloc_restarted why = RESTART_NONE;
577         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
578         struct ocfs2_extent_tree et;
579         int did_quota = 0;
580
581         /*
582          * Unwritten extent only exists for file systems which
583          * support holes.
584          */
585         BUG_ON(mark_unwritten && !ocfs2_sparse_alloc(osb));
586
587         status = ocfs2_read_inode_block(inode, &bh);
588         if (status < 0) {
589                 mlog_errno(status);
590                 goto leave;
591         }
592         fe = (struct ocfs2_dinode *) bh->b_data;
593
594 restart_all:
595         BUG_ON(le32_to_cpu(fe->i_clusters) != OCFS2_I(inode)->ip_clusters);
596
597         ocfs2_init_dinode_extent_tree(&et, INODE_CACHE(inode), bh);
598         status = ocfs2_lock_allocators(inode, &et, clusters_to_add, 0,
599                                        &data_ac, &meta_ac);
600         if (status) {
601                 mlog_errno(status);
602                 goto leave;
603         }
604
605         credits = ocfs2_calc_extend_credits(osb->sb, &fe->id2.i_list);
606         handle = ocfs2_start_trans(osb, credits);
607         if (IS_ERR(handle)) {
608                 status = PTR_ERR(handle);
609                 handle = NULL;
610                 mlog_errno(status);
611                 goto leave;
612         }
613
614 restarted_transaction:
615         trace_ocfs2_extend_allocation(
616                 (unsigned long long)OCFS2_I(inode)->ip_blkno,
617                 (unsigned long long)i_size_read(inode),
618                 le32_to_cpu(fe->i_clusters), clusters_to_add,
619                 why, restart_func);
620
621         status = dquot_alloc_space_nodirty(inode,
622                         ocfs2_clusters_to_bytes(osb->sb, clusters_to_add));
623         if (status)
624                 goto leave;
625         did_quota = 1;
626
627         /* reserve a write to the file entry early on - that we if we
628          * run out of credits in the allocation path, we can still
629          * update i_size. */
630         status = ocfs2_journal_access_di(handle, INODE_CACHE(inode), bh,
631                                          OCFS2_JOURNAL_ACCESS_WRITE);
632         if (status < 0) {
633                 mlog_errno(status);
634                 goto leave;
635         }
636
637         prev_clusters = OCFS2_I(inode)->ip_clusters;
638
639         status = ocfs2_add_inode_data(osb,
640                                       inode,
641                                       &logical_start,
642                                       clusters_to_add,
643                                       mark_unwritten,
644                                       bh,
645                                       handle,
646                                       data_ac,
647                                       meta_ac,
648                                       &why);
649         if ((status < 0) && (status != -EAGAIN)) {
650                 if (status != -ENOSPC)
651                         mlog_errno(status);
652                 goto leave;
653         }
654         ocfs2_update_inode_fsync_trans(handle, inode, 1);
655         ocfs2_journal_dirty(handle, bh);
656
657         spin_lock(&OCFS2_I(inode)->ip_lock);
658         clusters_to_add -= (OCFS2_I(inode)->ip_clusters - prev_clusters);
659         spin_unlock(&OCFS2_I(inode)->ip_lock);
660         /* Release unused quota reservation */
661         dquot_free_space(inode,
662                         ocfs2_clusters_to_bytes(osb->sb, clusters_to_add));
663         did_quota = 0;
664
665         if (why != RESTART_NONE && clusters_to_add) {
666                 if (why == RESTART_META) {
667                         restart_func = 1;
668                         status = 0;
669                 } else {
670                         BUG_ON(why != RESTART_TRANS);
671
672                         status = ocfs2_allocate_extend_trans(handle, 1);
673                         if (status < 0) {
674                                 /* handle still has to be committed at
675                                  * this point. */
676                                 status = -ENOMEM;
677                                 mlog_errno(status);
678                                 goto leave;
679                         }
680                         goto restarted_transaction;
681                 }
682         }
683
684         trace_ocfs2_extend_allocation_end(OCFS2_I(inode)->ip_blkno,
685              le32_to_cpu(fe->i_clusters),
686              (unsigned long long)le64_to_cpu(fe->i_size),
687              OCFS2_I(inode)->ip_clusters,
688              (unsigned long long)i_size_read(inode));
689
690 leave:
691         if (status < 0 && did_quota)
692                 dquot_free_space(inode,
693                         ocfs2_clusters_to_bytes(osb->sb, clusters_to_add));
694         if (handle) {
695                 ocfs2_commit_trans(osb, handle);
696                 handle = NULL;
697         }
698         if (data_ac) {
699                 ocfs2_free_alloc_context(data_ac);
700                 data_ac = NULL;
701         }
702         if (meta_ac) {
703                 ocfs2_free_alloc_context(meta_ac);
704                 meta_ac = NULL;
705         }
706         if ((!status) && restart_func) {
707                 restart_func = 0;
708                 goto restart_all;
709         }
710         brelse(bh);
711         bh = NULL;
712
713         return status;
714 }
715
716 int ocfs2_extend_allocation(struct inode *inode, u32 logical_start,
717                 u32 clusters_to_add, int mark_unwritten)
718 {
719         return __ocfs2_extend_allocation(inode, logical_start,
720                         clusters_to_add, mark_unwritten);
721 }
722
723 /*
724  * While a write will already be ordering the data, a truncate will not.
725  * Thus, we need to explicitly order the zeroed pages.
726  */
727 static handle_t *ocfs2_zero_start_ordered_transaction(struct inode *inode,
728                                                 struct buffer_head *di_bh)
729 {
730         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
731         handle_t *handle = NULL;
732         int ret = 0;
733
734         if (!ocfs2_should_order_data(inode))
735                 goto out;
736
737         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
738         if (IS_ERR(handle)) {
739                 ret = -ENOMEM;
740                 mlog_errno(ret);
741                 goto out;
742         }
743
744         ret = ocfs2_jbd2_file_inode(handle, inode);
745         if (ret < 0) {
746                 mlog_errno(ret);
747                 goto out;
748         }
749
750         ret = ocfs2_journal_access_di(handle, INODE_CACHE(inode), di_bh,
751                                       OCFS2_JOURNAL_ACCESS_WRITE);
752         if (ret)
753                 mlog_errno(ret);
754         ocfs2_update_inode_fsync_trans(handle, inode, 1);
755
756 out:
757         if (ret) {
758                 if (!IS_ERR(handle))
759                         ocfs2_commit_trans(osb, handle);
760                 handle = ERR_PTR(ret);
761         }
762         return handle;
763 }
764
765 /* Some parts of this taken from generic_cont_expand, which turned out
766  * to be too fragile to do exactly what we need without us having to
767  * worry about recursive locking in ->write_begin() and ->write_end(). */
768 static int ocfs2_write_zero_page(struct inode *inode, u64 abs_from,
769                                  u64 abs_to, struct buffer_head *di_bh)
770 {
771         struct address_space *mapping = inode->i_mapping;
772         struct page *page;
773         unsigned long index = abs_from >> PAGE_CACHE_SHIFT;
774         handle_t *handle;
775         int ret = 0;
776         unsigned zero_from, zero_to, block_start, block_end;
777         struct ocfs2_dinode *di = (struct ocfs2_dinode *)di_bh->b_data;
778
779         BUG_ON(abs_from >= abs_to);
780         BUG_ON(abs_to > (((u64)index + 1) << PAGE_CACHE_SHIFT));
781         BUG_ON(abs_from & (inode->i_blkbits - 1));
782
783         handle = ocfs2_zero_start_ordered_transaction(inode, di_bh);
784         if (IS_ERR(handle)) {
785                 ret = PTR_ERR(handle);
786                 goto out;
787         }
788
789         page = find_or_create_page(mapping, index, GFP_NOFS);
790         if (!page) {
791                 ret = -ENOMEM;
792                 mlog_errno(ret);
793                 goto out_commit_trans;
794         }
795
796         /* Get the offsets within the page that we want to zero */
797         zero_from = abs_from & (PAGE_CACHE_SIZE - 1);
798         zero_to = abs_to & (PAGE_CACHE_SIZE - 1);
799         if (!zero_to)
800                 zero_to = PAGE_CACHE_SIZE;
801
802         trace_ocfs2_write_zero_page(
803                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
804                         (unsigned long long)abs_from,
805                         (unsigned long long)abs_to,
806                         index, zero_from, zero_to);
807
808         /* We know that zero_from is block aligned */
809         for (block_start = zero_from; block_start < zero_to;
810              block_start = block_end) {
811                 block_end = block_start + (1 << inode->i_blkbits);
812
813                 /*
814                  * block_start is block-aligned.  Bump it by one to force
815                  * __block_write_begin and block_commit_write to zero the
816                  * whole block.
817                  */
818                 ret = __block_write_begin(page, block_start + 1, 0,
819                                           ocfs2_get_block);
820                 if (ret < 0) {
821                         mlog_errno(ret);
822                         goto out_unlock;
823                 }
824
825
826                 /* must not update i_size! */
827                 ret = block_commit_write(page, block_start + 1,
828                                          block_start + 1);
829                 if (ret < 0)
830                         mlog_errno(ret);
831                 else
832                         ret = 0;
833         }
834
835         /*
836          * fs-writeback will release the dirty pages without page lock
837          * whose offset are over inode size, the release happens at
838          * block_write_full_page().
839          */
840         i_size_write(inode, abs_to);
841         inode->i_blocks = ocfs2_inode_sector_count(inode);
842         di->i_size = cpu_to_le64((u64)i_size_read(inode));
843         inode->i_mtime = inode->i_ctime = CURRENT_TIME;
844         di->i_mtime = di->i_ctime = cpu_to_le64(inode->i_mtime.tv_sec);
845         di->i_ctime_nsec = cpu_to_le32(inode->i_mtime.tv_nsec);
846         di->i_mtime_nsec = di->i_ctime_nsec;
847         if (handle) {
848                 ocfs2_journal_dirty(handle, di_bh);
849                 ocfs2_update_inode_fsync_trans(handle, inode, 1);
850         }
851
852 out_unlock:
853         unlock_page(page);
854         page_cache_release(page);
855 out_commit_trans:
856         if (handle)
857                 ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
858 out:
859         return ret;
860 }
861
862 /*
863  * Find the next range to zero.  We do this in terms of bytes because
864  * that's what ocfs2_zero_extend() wants, and it is dealing with the
865  * pagecache.  We may return multiple extents.
866  *
867  * zero_start and zero_end are ocfs2_zero_extend()s current idea of what
868  * needs to be zeroed.  range_start and range_end return the next zeroing
869  * range.  A subsequent call should pass the previous range_end as its
870  * zero_start.  If range_end is 0, there's nothing to do.
871  *
872  * Unwritten extents are skipped over.  Refcounted extents are CoWd.
873  */
874 static int ocfs2_zero_extend_get_range(struct inode *inode,
875                                        struct buffer_head *di_bh,
876                                        u64 zero_start, u64 zero_end,
877                                        u64 *range_start, u64 *range_end)
878 {
879         int rc = 0, needs_cow = 0;
880         u32 p_cpos, zero_clusters = 0;
881         u32 zero_cpos =
882                 zero_start >> OCFS2_SB(inode->i_sb)->s_clustersize_bits;
883         u32 last_cpos = ocfs2_clusters_for_bytes(inode->i_sb, zero_end);
884         unsigned int num_clusters = 0;
885         unsigned int ext_flags = 0;
886
887         while (zero_cpos < last_cpos) {
888                 rc = ocfs2_get_clusters(inode, zero_cpos, &p_cpos,
889                                         &num_clusters, &ext_flags);
890                 if (rc) {
891                         mlog_errno(rc);
892                         goto out;
893                 }
894
895                 if (p_cpos && !(ext_flags & OCFS2_EXT_UNWRITTEN)) {
896                         zero_clusters = num_clusters;
897                         if (ext_flags & OCFS2_EXT_REFCOUNTED)
898                                 needs_cow = 1;
899                         break;
900                 }
901
902                 zero_cpos += num_clusters;
903         }
904         if (!zero_clusters) {
905                 *range_end = 0;
906                 goto out;
907         }
908
909         while ((zero_cpos + zero_clusters) < last_cpos) {
910                 rc = ocfs2_get_clusters(inode, zero_cpos + zero_clusters,
911                                         &p_cpos, &num_clusters,
912                                         &ext_flags);
913                 if (rc) {
914                         mlog_errno(rc);
915                         goto out;
916                 }
917
918                 if (!p_cpos || (ext_flags & OCFS2_EXT_UNWRITTEN))
919                         break;
920                 if (ext_flags & OCFS2_EXT_REFCOUNTED)
921                         needs_cow = 1;
922                 zero_clusters += num_clusters;
923         }
924         if ((zero_cpos + zero_clusters) > last_cpos)
925                 zero_clusters = last_cpos - zero_cpos;
926
927         if (needs_cow) {
928                 rc = ocfs2_refcount_cow(inode, di_bh, zero_cpos,
929                                         zero_clusters, UINT_MAX);
930                 if (rc) {
931                         mlog_errno(rc);
932                         goto out;
933                 }
934         }
935
936         *range_start = ocfs2_clusters_to_bytes(inode->i_sb, zero_cpos);
937         *range_end = ocfs2_clusters_to_bytes(inode->i_sb,
938                                              zero_cpos + zero_clusters);
939
940 out:
941         return rc;
942 }
943
944 /*
945  * Zero one range returned from ocfs2_zero_extend_get_range().  The caller
946  * has made sure that the entire range needs zeroing.
947  */
948 static int ocfs2_zero_extend_range(struct inode *inode, u64 range_start,
949                                    u64 range_end, struct buffer_head *di_bh)
950 {
951         int rc = 0;
952         u64 next_pos;
953         u64 zero_pos = range_start;
954
955         trace_ocfs2_zero_extend_range(
956                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
957                         (unsigned long long)range_start,
958                         (unsigned long long)range_end);
959         BUG_ON(range_start >= range_end);
960
961         while (zero_pos < range_end) {
962                 next_pos = (zero_pos & PAGE_CACHE_MASK) + PAGE_CACHE_SIZE;
963                 if (next_pos > range_end)
964                         next_pos = range_end;
965                 rc = ocfs2_write_zero_page(inode, zero_pos, next_pos, di_bh);
966                 if (rc < 0) {
967                         mlog_errno(rc);
968                         break;
969                 }
970                 zero_pos = next_pos;
971
972                 /*
973                  * Very large extends have the potential to lock up
974                  * the cpu for extended periods of time.
975                  */
976                 cond_resched();
977         }
978
979         return rc;
980 }
981
982 int ocfs2_zero_extend(struct inode *inode, struct buffer_head *di_bh,
983                       loff_t zero_to_size)
984 {
985         int ret = 0;
986         u64 zero_start, range_start = 0, range_end = 0;
987         struct super_block *sb = inode->i_sb;
988
989         zero_start = ocfs2_align_bytes_to_blocks(sb, i_size_read(inode));
990         trace_ocfs2_zero_extend((unsigned long long)OCFS2_I(inode)->ip_blkno,
991                                 (unsigned long long)zero_start,
992                                 (unsigned long long)i_size_read(inode));
993         while (zero_start < zero_to_size) {
994                 ret = ocfs2_zero_extend_get_range(inode, di_bh, zero_start,
995                                                   zero_to_size,
996                                                   &range_start,
997                                                   &range_end);
998                 if (ret) {
999                         mlog_errno(ret);
1000                         break;
1001                 }
1002                 if (!range_end)
1003                         break;
1004                 /* Trim the ends */
1005                 if (range_start < zero_start)
1006                         range_start = zero_start;
1007                 if (range_end > zero_to_size)
1008                         range_end = zero_to_size;
1009
1010                 ret = ocfs2_zero_extend_range(inode, range_start,
1011                                               range_end, di_bh);
1012                 if (ret) {
1013                         mlog_errno(ret);
1014                         break;
1015                 }
1016                 zero_start = range_end;
1017         }
1018
1019         return ret;
1020 }
1021
1022 int ocfs2_extend_no_holes(struct inode *inode, struct buffer_head *di_bh,
1023                           u64 new_i_size, u64 zero_to)
1024 {
1025         int ret;
1026         u32 clusters_to_add;
1027         struct ocfs2_inode_info *oi = OCFS2_I(inode);
1028
1029         /*
1030          * Only quota files call this without a bh, and they can't be
1031          * refcounted.
1032          */
1033         BUG_ON(!di_bh && (oi->ip_dyn_features & OCFS2_HAS_REFCOUNT_FL));
1034         BUG_ON(!di_bh && !(oi->ip_flags & OCFS2_INODE_SYSTEM_FILE));
1035
1036         clusters_to_add = ocfs2_clusters_for_bytes(inode->i_sb, new_i_size);
1037         if (clusters_to_add < oi->ip_clusters)
1038                 clusters_to_add = 0;
1039         else
1040                 clusters_to_add -= oi->ip_clusters;
1041
1042         if (clusters_to_add) {
1043                 ret = __ocfs2_extend_allocation(inode, oi->ip_clusters,
1044                                                 clusters_to_add, 0);
1045                 if (ret) {
1046                         mlog_errno(ret);
1047                         goto out;
1048                 }
1049         }
1050
1051         /*
1052          * Call this even if we don't add any clusters to the tree. We
1053          * still need to zero the area between the old i_size and the
1054          * new i_size.
1055          */
1056         ret = ocfs2_zero_extend(inode, di_bh, zero_to);
1057         if (ret < 0)
1058                 mlog_errno(ret);
1059
1060 out:
1061         return ret;
1062 }
1063
1064 static int ocfs2_extend_file(struct inode *inode,
1065                              struct buffer_head *di_bh,
1066                              u64 new_i_size)
1067 {
1068         int ret = 0;
1069         struct ocfs2_inode_info *oi = OCFS2_I(inode);
1070
1071         BUG_ON(!di_bh);
1072
1073         /* setattr sometimes calls us like this. */
1074         if (new_i_size == 0)
1075                 goto out;
1076
1077         if (i_size_read(inode) == new_i_size)
1078                 goto out;
1079         BUG_ON(new_i_size < i_size_read(inode));
1080
1081         /*
1082          * The alloc sem blocks people in read/write from reading our
1083          * allocation until we're done changing it. We depend on
1084          * i_mutex to block other extend/truncate calls while we're
1085          * here.  We even have to hold it for sparse files because there
1086          * might be some tail zeroing.
1087          */
1088         down_write(&oi->ip_alloc_sem);
1089
1090         if (oi->ip_dyn_features & OCFS2_INLINE_DATA_FL) {
1091                 /*
1092                  * We can optimize small extends by keeping the inodes
1093                  * inline data.
1094                  */
1095                 if (ocfs2_size_fits_inline_data(di_bh, new_i_size)) {
1096                         up_write(&oi->ip_alloc_sem);
1097                         goto out_update_size;
1098                 }
1099
1100                 ret = ocfs2_convert_inline_data_to_extents(inode, di_bh);
1101                 if (ret) {
1102                         up_write(&oi->ip_alloc_sem);
1103                         mlog_errno(ret);
1104                         goto out;
1105                 }
1106         }
1107
1108         if (ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb)))
1109                 ret = ocfs2_zero_extend(inode, di_bh, new_i_size);
1110         else
1111                 ret = ocfs2_extend_no_holes(inode, di_bh, new_i_size,
1112                                             new_i_size);
1113
1114         up_write(&oi->ip_alloc_sem);
1115
1116         if (ret < 0) {
1117                 mlog_errno(ret);
1118                 goto out;
1119         }
1120
1121 out_update_size:
1122         ret = ocfs2_simple_size_update(inode, di_bh, new_i_size);
1123         if (ret < 0)
1124                 mlog_errno(ret);
1125
1126 out:
1127         return ret;
1128 }
1129
1130 int ocfs2_setattr(struct dentry *dentry, struct iattr *attr)
1131 {
1132         int status = 0, size_change;
1133         struct inode *inode = d_inode(dentry);
1134         struct super_block *sb = inode->i_sb;
1135         struct ocfs2_super *osb = OCFS2_SB(sb);
1136         struct buffer_head *bh = NULL;
1137         handle_t *handle = NULL;
1138         struct dquot *transfer_to[MAXQUOTAS] = { };
1139         int qtype;
1140
1141         trace_ocfs2_setattr(inode, dentry,
1142                             (unsigned long long)OCFS2_I(inode)->ip_blkno,
1143                             dentry->d_name.len, dentry->d_name.name,
1144                             attr->ia_valid, attr->ia_mode,
1145                             from_kuid(&init_user_ns, attr->ia_uid),
1146                             from_kgid(&init_user_ns, attr->ia_gid));
1147
1148         /* ensuring we don't even attempt to truncate a symlink */
1149         if (S_ISLNK(inode->i_mode))
1150                 attr->ia_valid &= ~ATTR_SIZE;
1151
1152 #define OCFS2_VALID_ATTRS (ATTR_ATIME | ATTR_MTIME | ATTR_CTIME | ATTR_SIZE \
1153                            | ATTR_GID | ATTR_UID | ATTR_MODE)
1154         if (!(attr->ia_valid & OCFS2_VALID_ATTRS))
1155                 return 0;
1156
1157         status = inode_change_ok(inode, attr);
1158         if (status)
1159                 return status;
1160
1161         if (is_quota_modification(inode, attr)) {
1162                 status = dquot_initialize(inode);
1163                 if (status)
1164                         return status;
1165         }
1166         size_change = S_ISREG(inode->i_mode) && attr->ia_valid & ATTR_SIZE;
1167         if (size_change) {
1168                 status = ocfs2_rw_lock(inode, 1);
1169                 if (status < 0) {
1170                         mlog_errno(status);
1171                         goto bail;
1172                 }
1173         }
1174
1175         status = ocfs2_inode_lock(inode, &bh, 1);
1176         if (status < 0) {
1177                 if (status != -ENOENT)
1178                         mlog_errno(status);
1179                 goto bail_unlock_rw;
1180         }
1181
1182         if (size_change) {
1183                 status = inode_newsize_ok(inode, attr->ia_size);
1184                 if (status)
1185                         goto bail_unlock;
1186
1187                 inode_dio_wait(inode);
1188
1189                 if (i_size_read(inode) >= attr->ia_size) {
1190                         if (ocfs2_should_order_data(inode)) {
1191                                 status = ocfs2_begin_ordered_truncate(inode,
1192                                                                       attr->ia_size);
1193                                 if (status)
1194                                         goto bail_unlock;
1195                         }
1196                         status = ocfs2_truncate_file(inode, bh, attr->ia_size);
1197                 } else
1198                         status = ocfs2_extend_file(inode, bh, attr->ia_size);
1199                 if (status < 0) {
1200                         if (status != -ENOSPC)
1201                                 mlog_errno(status);
1202                         status = -ENOSPC;
1203                         goto bail_unlock;
1204                 }
1205         }
1206
1207         if ((attr->ia_valid & ATTR_UID && !uid_eq(attr->ia_uid, inode->i_uid)) ||
1208             (attr->ia_valid & ATTR_GID && !gid_eq(attr->ia_gid, inode->i_gid))) {
1209                 /*
1210                  * Gather pointers to quota structures so that allocation /
1211                  * freeing of quota structures happens here and not inside
1212                  * dquot_transfer() where we have problems with lock ordering
1213                  */
1214                 if (attr->ia_valid & ATTR_UID && !uid_eq(attr->ia_uid, inode->i_uid)
1215                     && OCFS2_HAS_RO_COMPAT_FEATURE(sb,
1216                     OCFS2_FEATURE_RO_COMPAT_USRQUOTA)) {
1217                         transfer_to[USRQUOTA] = dqget(sb, make_kqid_uid(attr->ia_uid));
1218                         if (IS_ERR(transfer_to[USRQUOTA])) {
1219                                 status = PTR_ERR(transfer_to[USRQUOTA]);
1220                                 goto bail_unlock;
1221                         }
1222                 }
1223                 if (attr->ia_valid & ATTR_GID && !gid_eq(attr->ia_gid, inode->i_gid)
1224                     && OCFS2_HAS_RO_COMPAT_FEATURE(sb,
1225                     OCFS2_FEATURE_RO_COMPAT_GRPQUOTA)) {
1226                         transfer_to[GRPQUOTA] = dqget(sb, make_kqid_gid(attr->ia_gid));
1227                         if (IS_ERR(transfer_to[GRPQUOTA])) {
1228                                 status = PTR_ERR(transfer_to[GRPQUOTA]);
1229                                 goto bail_unlock;
1230                         }
1231                 }
1232                 handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS +
1233                                            2 * ocfs2_quota_trans_credits(sb));
1234                 if (IS_ERR(handle)) {
1235                         status = PTR_ERR(handle);
1236                         mlog_errno(status);
1237                         goto bail_unlock;
1238                 }
1239                 status = __dquot_transfer(inode, transfer_to);
1240                 if (status < 0)
1241                         goto bail_commit;
1242         } else {
1243                 handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1244                 if (IS_ERR(handle)) {
1245                         status = PTR_ERR(handle);
1246                         mlog_errno(status);
1247                         goto bail_unlock;
1248                 }
1249         }
1250
1251         setattr_copy(inode, attr);
1252         mark_inode_dirty(inode);
1253
1254         status = ocfs2_mark_inode_dirty(handle, inode, bh);
1255         if (status < 0)
1256                 mlog_errno(status);
1257
1258 bail_commit:
1259         ocfs2_commit_trans(osb, handle);
1260 bail_unlock:
1261         ocfs2_inode_unlock(inode, 1);
1262 bail_unlock_rw:
1263         if (size_change)
1264                 ocfs2_rw_unlock(inode, 1);
1265 bail:
1266         brelse(bh);
1267
1268         /* Release quota pointers in case we acquired them */
1269         for (qtype = 0; qtype < OCFS2_MAXQUOTAS; qtype++)
1270                 dqput(transfer_to[qtype]);
1271
1272         if (!status && attr->ia_valid & ATTR_MODE) {
1273                 status = posix_acl_chmod(inode, inode->i_mode);
1274                 if (status < 0)
1275                         mlog_errno(status);
1276         }
1277
1278         return status;
1279 }
1280
1281 int ocfs2_getattr(struct vfsmount *mnt,
1282                   struct dentry *dentry,
1283                   struct kstat *stat)
1284 {
1285         struct inode *inode = d_inode(dentry);
1286         struct super_block *sb = d_inode(dentry)->i_sb;
1287         struct ocfs2_super *osb = sb->s_fs_info;
1288         int err;
1289
1290         err = ocfs2_inode_revalidate(dentry);
1291         if (err) {
1292                 if (err != -ENOENT)
1293                         mlog_errno(err);
1294                 goto bail;
1295         }
1296
1297         generic_fillattr(inode, stat);
1298
1299         /* We set the blksize from the cluster size for performance */
1300         stat->blksize = osb->s_clustersize;
1301
1302 bail:
1303         return err;
1304 }
1305
1306 int ocfs2_permission(struct inode *inode, int mask)
1307 {
1308         int ret;
1309
1310         if (mask & MAY_NOT_BLOCK)
1311                 return -ECHILD;
1312
1313         ret = ocfs2_inode_lock(inode, NULL, 0);
1314         if (ret) {
1315                 if (ret != -ENOENT)
1316                         mlog_errno(ret);
1317                 goto out;
1318         }
1319
1320         ret = generic_permission(inode, mask);
1321
1322         ocfs2_inode_unlock(inode, 0);
1323 out:
1324         return ret;
1325 }
1326
1327 static int __ocfs2_write_remove_suid(struct inode *inode,
1328                                      struct buffer_head *bh)
1329 {
1330         int ret;
1331         handle_t *handle;
1332         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1333         struct ocfs2_dinode *di;
1334
1335         trace_ocfs2_write_remove_suid(
1336                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
1337                         inode->i_mode);
1338
1339         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1340         if (IS_ERR(handle)) {
1341                 ret = PTR_ERR(handle);
1342                 mlog_errno(ret);
1343                 goto out;
1344         }
1345
1346         ret = ocfs2_journal_access_di(handle, INODE_CACHE(inode), bh,
1347                                       OCFS2_JOURNAL_ACCESS_WRITE);
1348         if (ret < 0) {
1349                 mlog_errno(ret);
1350                 goto out_trans;
1351         }
1352
1353         inode->i_mode &= ~S_ISUID;
1354         if ((inode->i_mode & S_ISGID) && (inode->i_mode & S_IXGRP))
1355                 inode->i_mode &= ~S_ISGID;
1356
1357         di = (struct ocfs2_dinode *) bh->b_data;
1358         di->i_mode = cpu_to_le16(inode->i_mode);
1359         ocfs2_update_inode_fsync_trans(handle, inode, 0);
1360
1361         ocfs2_journal_dirty(handle, bh);
1362
1363 out_trans:
1364         ocfs2_commit_trans(osb, handle);
1365 out:
1366         return ret;
1367 }
1368
1369 /*
1370  * Will look for holes and unwritten extents in the range starting at
1371  * pos for count bytes (inclusive).
1372  */
1373 static int ocfs2_check_range_for_holes(struct inode *inode, loff_t pos,
1374                                        size_t count)
1375 {
1376         int ret = 0;
1377         unsigned int extent_flags;
1378         u32 cpos, clusters, extent_len, phys_cpos;
1379         struct super_block *sb = inode->i_sb;
1380
1381         cpos = pos >> OCFS2_SB(sb)->s_clustersize_bits;
1382         clusters = ocfs2_clusters_for_bytes(sb, pos + count) - cpos;
1383
1384         while (clusters) {
1385                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos, &extent_len,
1386                                          &extent_flags);
1387                 if (ret < 0) {
1388                         mlog_errno(ret);
1389                         goto out;
1390                 }
1391
1392                 if (phys_cpos == 0 || (extent_flags & OCFS2_EXT_UNWRITTEN)) {
1393                         ret = 1;
1394                         break;
1395                 }
1396
1397                 if (extent_len > clusters)
1398                         extent_len = clusters;
1399
1400                 clusters -= extent_len;
1401                 cpos += extent_len;
1402         }
1403 out:
1404         return ret;
1405 }
1406
1407 static int ocfs2_write_remove_suid(struct inode *inode)
1408 {
1409         int ret;
1410         struct buffer_head *bh = NULL;
1411
1412         ret = ocfs2_read_inode_block(inode, &bh);
1413         if (ret < 0) {
1414                 mlog_errno(ret);
1415                 goto out;
1416         }
1417
1418         ret =  __ocfs2_write_remove_suid(inode, bh);
1419 out:
1420         brelse(bh);
1421         return ret;
1422 }
1423
1424 /*
1425  * Allocate enough extents to cover the region starting at byte offset
1426  * start for len bytes. Existing extents are skipped, any extents
1427  * added are marked as "unwritten".
1428  */
1429 static int ocfs2_allocate_unwritten_extents(struct inode *inode,
1430                                             u64 start, u64 len)
1431 {
1432         int ret;
1433         u32 cpos, phys_cpos, clusters, alloc_size;
1434         u64 end = start + len;
1435         struct buffer_head *di_bh = NULL;
1436
1437         if (OCFS2_I(inode)->ip_dyn_features & OCFS2_INLINE_DATA_FL) {
1438                 ret = ocfs2_read_inode_block(inode, &di_bh);
1439                 if (ret) {
1440                         mlog_errno(ret);
1441                         goto out;
1442                 }
1443
1444                 /*
1445                  * Nothing to do if the requested reservation range
1446                  * fits within the inode.
1447                  */
1448                 if (ocfs2_size_fits_inline_data(di_bh, end))
1449                         goto out;
1450
1451                 ret = ocfs2_convert_inline_data_to_extents(inode, di_bh);
1452                 if (ret) {
1453                         mlog_errno(ret);
1454                         goto out;
1455                 }
1456         }
1457
1458         /*
1459          * We consider both start and len to be inclusive.
1460          */
1461         cpos = start >> OCFS2_SB(inode->i_sb)->s_clustersize_bits;
1462         clusters = ocfs2_clusters_for_bytes(inode->i_sb, start + len);
1463         clusters -= cpos;
1464
1465         while (clusters) {
1466                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos,
1467                                          &alloc_size, NULL);
1468                 if (ret) {
1469                         mlog_errno(ret);
1470                         goto out;
1471                 }
1472
1473                 /*
1474                  * Hole or existing extent len can be arbitrary, so
1475                  * cap it to our own allocation request.
1476                  */
1477                 if (alloc_size > clusters)
1478                         alloc_size = clusters;
1479
1480                 if (phys_cpos) {
1481                         /*
1482                          * We already have an allocation at this
1483                          * region so we can safely skip it.
1484                          */
1485                         goto next;
1486                 }
1487
1488                 ret = __ocfs2_extend_allocation(inode, cpos, alloc_size, 1);
1489                 if (ret) {
1490                         if (ret != -ENOSPC)
1491                                 mlog_errno(ret);
1492                         goto out;
1493                 }
1494
1495 next:
1496                 cpos += alloc_size;
1497                 clusters -= alloc_size;
1498         }
1499
1500         ret = 0;
1501 out:
1502
1503         brelse(di_bh);
1504         return ret;
1505 }
1506
1507 /*
1508  * Truncate a byte range, avoiding pages within partial clusters. This
1509  * preserves those pages for the zeroing code to write to.
1510  */
1511 static void ocfs2_truncate_cluster_pages(struct inode *inode, u64 byte_start,
1512                                          u64 byte_len)
1513 {
1514         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1515         loff_t start, end;
1516         struct address_space *mapping = inode->i_mapping;
1517
1518         start = (loff_t)ocfs2_align_bytes_to_clusters(inode->i_sb, byte_start);
1519         end = byte_start + byte_len;
1520         end = end & ~(osb->s_clustersize - 1);
1521
1522         if (start < end) {
1523                 unmap_mapping_range(mapping, start, end - start, 0);
1524                 truncate_inode_pages_range(mapping, start, end - 1);
1525         }
1526 }
1527
1528 static int ocfs2_zero_partial_clusters(struct inode *inode,
1529                                        u64 start, u64 len)
1530 {
1531         int ret = 0;
1532         u64 tmpend, end = start + len;
1533         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1534         unsigned int csize = osb->s_clustersize;
1535         handle_t *handle;
1536
1537         /*
1538          * The "start" and "end" values are NOT necessarily part of
1539          * the range whose allocation is being deleted. Rather, this
1540          * is what the user passed in with the request. We must zero
1541          * partial clusters here. There's no need to worry about
1542          * physical allocation - the zeroing code knows to skip holes.
1543          */
1544         trace_ocfs2_zero_partial_clusters(
1545                 (unsigned long long)OCFS2_I(inode)->ip_blkno,
1546                 (unsigned long long)start, (unsigned long long)end);
1547
1548         /*
1549          * If both edges are on a cluster boundary then there's no
1550          * zeroing required as the region is part of the allocation to
1551          * be truncated.
1552          */
1553         if ((start & (csize - 1)) == 0 && (end & (csize - 1)) == 0)
1554                 goto out;
1555
1556         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1557         if (IS_ERR(handle)) {
1558                 ret = PTR_ERR(handle);
1559                 mlog_errno(ret);
1560                 goto out;
1561         }
1562
1563         /*
1564          * We want to get the byte offset of the end of the 1st cluster.
1565          */
1566         tmpend = (u64)osb->s_clustersize + (start & ~(osb->s_clustersize - 1));
1567         if (tmpend > end)
1568                 tmpend = end;
1569
1570         trace_ocfs2_zero_partial_clusters_range1((unsigned long long)start,
1571                                                  (unsigned long long)tmpend);
1572
1573         ret = ocfs2_zero_range_for_truncate(inode, handle, start, tmpend);
1574         if (ret)
1575                 mlog_errno(ret);
1576
1577         if (tmpend < end) {
1578                 /*
1579                  * This may make start and end equal, but the zeroing
1580                  * code will skip any work in that case so there's no
1581                  * need to catch it up here.
1582                  */
1583                 start = end & ~(osb->s_clustersize - 1);
1584
1585                 trace_ocfs2_zero_partial_clusters_range2(
1586                         (unsigned long long)start, (unsigned long long)end);
1587
1588                 ret = ocfs2_zero_range_for_truncate(inode, handle, start, end);
1589                 if (ret)
1590                         mlog_errno(ret);
1591         }
1592         ocfs2_update_inode_fsync_trans(handle, inode, 1);
1593
1594         ocfs2_commit_trans(osb, handle);
1595 out:
1596         return ret;
1597 }
1598
1599 static int ocfs2_find_rec(struct ocfs2_extent_list *el, u32 pos)
1600 {
1601         int i;
1602         struct ocfs2_extent_rec *rec = NULL;
1603
1604         for (i = le16_to_cpu(el->l_next_free_rec) - 1; i >= 0; i--) {
1605
1606                 rec = &el->l_recs[i];
1607
1608                 if (le32_to_cpu(rec->e_cpos) < pos)
1609                         break;
1610         }
1611
1612         return i;
1613 }
1614
1615 /*
1616  * Helper to calculate the punching pos and length in one run, we handle the
1617  * following three cases in order:
1618  *
1619  * - remove the entire record
1620  * - remove a partial record
1621  * - no record needs to be removed (hole-punching completed)
1622 */
1623 static void ocfs2_calc_trunc_pos(struct inode *inode,
1624                                  struct ocfs2_extent_list *el,
1625                                  struct ocfs2_extent_rec *rec,
1626                                  u32 trunc_start, u32 *trunc_cpos,
1627                                  u32 *trunc_len, u32 *trunc_end,
1628                                  u64 *blkno, int *done)
1629 {
1630         int ret = 0;
1631         u32 coff, range;
1632
1633         range = le32_to_cpu(rec->e_cpos) + ocfs2_rec_clusters(el, rec);
1634
1635         if (le32_to_cpu(rec->e_cpos) >= trunc_start) {
1636                 /*
1637                  * remove an entire extent record.
1638                  */
1639                 *trunc_cpos = le32_to_cpu(rec->e_cpos);
1640                 /*
1641                  * Skip holes if any.
1642                  */
1643                 if (range < *trunc_end)
1644                         *trunc_end = range;
1645                 *trunc_len = *trunc_end - le32_to_cpu(rec->e_cpos);
1646                 *blkno = le64_to_cpu(rec->e_blkno);
1647                 *trunc_end = le32_to_cpu(rec->e_cpos);
1648         } else if (range > trunc_start) {
1649                 /*
1650                  * remove a partial extent record, which means we're
1651                  * removing the last extent record.
1652                  */
1653                 *trunc_cpos = trunc_start;
1654                 /*
1655                  * skip hole if any.
1656                  */
1657                 if (range < *trunc_end)
1658                         *trunc_end = range;
1659                 *trunc_len = *trunc_end - trunc_start;
1660                 coff = trunc_start - le32_to_cpu(rec->e_cpos);
1661                 *blkno = le64_to_cpu(rec->e_blkno) +
1662                                 ocfs2_clusters_to_blocks(inode->i_sb, coff);
1663                 *trunc_end = trunc_start;
1664         } else {
1665                 /*
1666                  * It may have two following possibilities:
1667                  *
1668                  * - last record has been removed
1669                  * - trunc_start was within a hole
1670                  *
1671                  * both two cases mean the completion of hole punching.
1672                  */
1673                 ret = 1;
1674         }
1675
1676         *done = ret;
1677 }
1678
1679 static int ocfs2_remove_inode_range(struct inode *inode,
1680                                     struct buffer_head *di_bh, u64 byte_start,
1681                                     u64 byte_len)
1682 {
1683         int ret = 0, flags = 0, done = 0, i;
1684         u32 trunc_start, trunc_len, trunc_end, trunc_cpos, phys_cpos;
1685         u32 cluster_in_el;
1686         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1687         struct ocfs2_cached_dealloc_ctxt dealloc;
1688         struct address_space *mapping = inode->i_mapping;
1689         struct ocfs2_extent_tree et;
1690         struct ocfs2_path *path = NULL;
1691         struct ocfs2_extent_list *el = NULL;
1692         struct ocfs2_extent_rec *rec = NULL;
1693         struct ocfs2_dinode *di = (struct ocfs2_dinode *)di_bh->b_data;
1694         u64 blkno, refcount_loc = le64_to_cpu(di->i_refcount_loc);
1695
1696         ocfs2_init_dinode_extent_tree(&et, INODE_CACHE(inode), di_bh);
1697         ocfs2_init_dealloc_ctxt(&dealloc);
1698
1699         trace_ocfs2_remove_inode_range(
1700                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
1701                         (unsigned long long)byte_start,
1702                         (unsigned long long)byte_len);
1703
1704         if (byte_len == 0)
1705                 return 0;
1706
1707         if (OCFS2_I(inode)->ip_dyn_features & OCFS2_INLINE_DATA_FL) {
1708                 ret = ocfs2_truncate_inline(inode, di_bh, byte_start,
1709                                             byte_start + byte_len, 0);
1710                 if (ret) {
1711                         mlog_errno(ret);
1712                         goto out;
1713                 }
1714                 /*
1715                  * There's no need to get fancy with the page cache
1716                  * truncate of an inline-data inode. We're talking
1717                  * about less than a page here, which will be cached
1718                  * in the dinode buffer anyway.
1719                  */
1720                 unmap_mapping_range(mapping, 0, 0, 0);
1721                 truncate_inode_pages(mapping, 0);
1722                 goto out;
1723         }
1724
1725         /*
1726          * For reflinks, we may need to CoW 2 clusters which might be
1727          * partially zero'd later, if hole's start and end offset were
1728          * within one cluster(means is not exactly aligned to clustersize).
1729          */
1730
1731         if (OCFS2_I(inode)->ip_dyn_features & OCFS2_HAS_REFCOUNT_FL) {
1732
1733                 ret = ocfs2_cow_file_pos(inode, di_bh, byte_start);
1734                 if (ret) {
1735                         mlog_errno(ret);
1736                         goto out;
1737                 }
1738
1739                 ret = ocfs2_cow_file_pos(inode, di_bh, byte_start + byte_len);
1740                 if (ret) {
1741                         mlog_errno(ret);
1742                         goto out;
1743                 }
1744         }
1745
1746         trunc_start = ocfs2_clusters_for_bytes(osb->sb, byte_start);
1747         trunc_end = (byte_start + byte_len) >> osb->s_clustersize_bits;
1748         cluster_in_el = trunc_end;
1749
1750         ret = ocfs2_zero_partial_clusters(inode, byte_start, byte_len);
1751         if (ret) {
1752                 mlog_errno(ret);
1753                 goto out;
1754         }
1755
1756         path = ocfs2_new_path_from_et(&et);
1757         if (!path) {
1758                 ret = -ENOMEM;
1759                 mlog_errno(ret);
1760                 goto out;
1761         }
1762
1763         while (trunc_end > trunc_start) {
1764
1765                 ret = ocfs2_find_path(INODE_CACHE(inode), path,
1766                                       cluster_in_el);
1767                 if (ret) {
1768                         mlog_errno(ret);
1769                         goto out;
1770                 }
1771
1772                 el = path_leaf_el(path);
1773
1774                 i = ocfs2_find_rec(el, trunc_end);
1775                 /*
1776                  * Need to go to previous extent block.
1777                  */
1778                 if (i < 0) {
1779                         if (path->p_tree_depth == 0)
1780                                 break;
1781
1782                         ret = ocfs2_find_cpos_for_left_leaf(inode->i_sb,
1783                                                             path,
1784                                                             &cluster_in_el);
1785                         if (ret) {
1786                                 mlog_errno(ret);
1787                                 goto out;
1788                         }
1789
1790                         /*
1791                          * We've reached the leftmost extent block,
1792                          * it's safe to leave.
1793                          */
1794                         if (cluster_in_el == 0)
1795                                 break;
1796
1797                         /*
1798                          * The 'pos' searched for previous extent block is
1799                          * always one cluster less than actual trunc_end.
1800                          */
1801                         trunc_end = cluster_in_el + 1;
1802
1803                         ocfs2_reinit_path(path, 1);
1804
1805                         continue;
1806
1807                 } else
1808                         rec = &el->l_recs[i];
1809
1810                 ocfs2_calc_trunc_pos(inode, el, rec, trunc_start, &trunc_cpos,
1811                                      &trunc_len, &trunc_end, &blkno, &done);
1812                 if (done)
1813                         break;
1814
1815                 flags = rec->e_flags;
1816                 phys_cpos = ocfs2_blocks_to_clusters(inode->i_sb, blkno);
1817
1818                 ret = ocfs2_remove_btree_range(inode, &et, trunc_cpos,
1819                                                phys_cpos, trunc_len, flags,
1820                                                &dealloc, refcount_loc, false);
1821                 if (ret < 0) {
1822                         mlog_errno(ret);
1823                         goto out;
1824                 }
1825
1826                 cluster_in_el = trunc_end;
1827
1828                 ocfs2_reinit_path(path, 1);
1829         }
1830
1831         ocfs2_truncate_cluster_pages(inode, byte_start, byte_len);
1832
1833 out:
1834         ocfs2_free_path(path);
1835         ocfs2_schedule_truncate_log_flush(osb, 1);
1836         ocfs2_run_deallocs(osb, &dealloc);
1837
1838         return ret;
1839 }
1840
1841 /*
1842  * Parts of this function taken from xfs_change_file_space()
1843  */
1844 static int __ocfs2_change_file_space(struct file *file, struct inode *inode,
1845                                      loff_t f_pos, unsigned int cmd,
1846                                      struct ocfs2_space_resv *sr,
1847                                      int change_size)
1848 {
1849         int ret;
1850         s64 llen;
1851         loff_t size;
1852         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1853         struct buffer_head *di_bh = NULL;
1854         handle_t *handle;
1855         unsigned long long max_off = inode->i_sb->s_maxbytes;
1856
1857         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
1858                 return -EROFS;
1859
1860         mutex_lock(&inode->i_mutex);
1861
1862         /*
1863          * This prevents concurrent writes on other nodes
1864          */
1865         ret = ocfs2_rw_lock(inode, 1);
1866         if (ret) {
1867                 mlog_errno(ret);
1868                 goto out;
1869         }
1870
1871         ret = ocfs2_inode_lock(inode, &di_bh, 1);
1872         if (ret) {
1873                 mlog_errno(ret);
1874                 goto out_rw_unlock;
1875         }
1876
1877         if (inode->i_flags & (S_IMMUTABLE|S_APPEND)) {
1878                 ret = -EPERM;
1879                 goto out_inode_unlock;
1880         }
1881
1882         switch (sr->l_whence) {
1883         case 0: /*SEEK_SET*/
1884                 break;
1885         case 1: /*SEEK_CUR*/
1886                 sr->l_start += f_pos;
1887                 break;
1888         case 2: /*SEEK_END*/
1889                 sr->l_start += i_size_read(inode);
1890                 break;
1891         default:
1892                 ret = -EINVAL;
1893                 goto out_inode_unlock;
1894         }
1895         sr->l_whence = 0;
1896
1897         llen = sr->l_len > 0 ? sr->l_len - 1 : sr->l_len;
1898
1899         if (sr->l_start < 0
1900             || sr->l_start > max_off
1901             || (sr->l_start + llen) < 0
1902             || (sr->l_start + llen) > max_off) {
1903                 ret = -EINVAL;
1904                 goto out_inode_unlock;
1905         }
1906         size = sr->l_start + sr->l_len;
1907
1908         if (cmd == OCFS2_IOC_RESVSP || cmd == OCFS2_IOC_RESVSP64 ||
1909             cmd == OCFS2_IOC_UNRESVSP || cmd == OCFS2_IOC_UNRESVSP64) {
1910                 if (sr->l_len <= 0) {
1911                         ret = -EINVAL;
1912                         goto out_inode_unlock;
1913                 }
1914         }
1915
1916         if (file && should_remove_suid(file->f_path.dentry)) {
1917                 ret = __ocfs2_write_remove_suid(inode, di_bh);
1918                 if (ret) {
1919                         mlog_errno(ret);
1920                         goto out_inode_unlock;
1921                 }
1922         }
1923
1924         down_write(&OCFS2_I(inode)->ip_alloc_sem);
1925         switch (cmd) {
1926         case OCFS2_IOC_RESVSP:
1927         case OCFS2_IOC_RESVSP64:
1928                 /*
1929                  * This takes unsigned offsets, but the signed ones we
1930                  * pass have been checked against overflow above.
1931                  */
1932                 ret = ocfs2_allocate_unwritten_extents(inode, sr->l_start,
1933                                                        sr->l_len);
1934                 break;
1935         case OCFS2_IOC_UNRESVSP:
1936         case OCFS2_IOC_UNRESVSP64:
1937                 ret = ocfs2_remove_inode_range(inode, di_bh, sr->l_start,
1938                                                sr->l_len);
1939                 break;
1940         default:
1941                 ret = -EINVAL;
1942         }
1943         up_write(&OCFS2_I(inode)->ip_alloc_sem);
1944         if (ret) {
1945                 mlog_errno(ret);
1946                 goto out_inode_unlock;
1947         }
1948
1949         /*
1950          * We update c/mtime for these changes
1951          */
1952         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1953         if (IS_ERR(handle)) {
1954                 ret = PTR_ERR(handle);
1955                 mlog_errno(ret);
1956                 goto out_inode_unlock;
1957         }
1958
1959         if (change_size && i_size_read(inode) < size)
1960                 i_size_write(inode, size);
1961
1962         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
1963         ret = ocfs2_mark_inode_dirty(handle, inode, di_bh);
1964         if (ret < 0)
1965                 mlog_errno(ret);
1966
1967         if (file && (file->f_flags & O_SYNC))
1968                 handle->h_sync = 1;
1969
1970         ocfs2_commit_trans(osb, handle);
1971
1972 out_inode_unlock:
1973         brelse(di_bh);
1974         ocfs2_inode_unlock(inode, 1);
1975 out_rw_unlock:
1976         ocfs2_rw_unlock(inode, 1);
1977
1978 out:
1979         mutex_unlock(&inode->i_mutex);
1980         return ret;
1981 }
1982
1983 int ocfs2_change_file_space(struct file *file, unsigned int cmd,
1984                             struct ocfs2_space_resv *sr)
1985 {
1986         struct inode *inode = file_inode(file);
1987         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1988         int ret;
1989
1990         if ((cmd == OCFS2_IOC_RESVSP || cmd == OCFS2_IOC_RESVSP64) &&
1991             !ocfs2_writes_unwritten_extents(osb))
1992                 return -ENOTTY;
1993         else if ((cmd == OCFS2_IOC_UNRESVSP || cmd == OCFS2_IOC_UNRESVSP64) &&
1994                  !ocfs2_sparse_alloc(osb))
1995                 return -ENOTTY;
1996
1997         if (!S_ISREG(inode->i_mode))
1998                 return -EINVAL;
1999
2000         if (!(file->f_mode & FMODE_WRITE))
2001                 return -EBADF;
2002
2003         ret = mnt_want_write_file(file);
2004         if (ret)
2005                 return ret;
2006         ret = __ocfs2_change_file_space(file, inode, file->f_pos, cmd, sr, 0);
2007         mnt_drop_write_file(file);
2008         return ret;
2009 }
2010
2011 static long ocfs2_fallocate(struct file *file, int mode, loff_t offset,
2012                             loff_t len)
2013 {
2014         struct inode *inode = file_inode(file);
2015         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
2016         struct ocfs2_space_resv sr;
2017         int change_size = 1;
2018         int cmd = OCFS2_IOC_RESVSP64;
2019
2020         if (mode & ~(FALLOC_FL_KEEP_SIZE | FALLOC_FL_PUNCH_HOLE))
2021                 return -EOPNOTSUPP;
2022         if (!ocfs2_writes_unwritten_extents(osb))
2023                 return -EOPNOTSUPP;
2024
2025         if (mode & FALLOC_FL_KEEP_SIZE)
2026                 change_size = 0;
2027
2028         if (mode & FALLOC_FL_PUNCH_HOLE)
2029                 cmd = OCFS2_IOC_UNRESVSP64;
2030
2031         sr.l_whence = 0;
2032         sr.l_start = (s64)offset;
2033         sr.l_len = (s64)len;
2034
2035         return __ocfs2_change_file_space(NULL, inode, offset, cmd, &sr,
2036                                          change_size);
2037 }
2038
2039 int ocfs2_check_range_for_refcount(struct inode *inode, loff_t pos,
2040                                    size_t count)
2041 {
2042         int ret = 0;
2043         unsigned int extent_flags;
2044         u32 cpos, clusters, extent_len, phys_cpos;
2045         struct super_block *sb = inode->i_sb;
2046
2047         if (!ocfs2_refcount_tree(OCFS2_SB(inode->i_sb)) ||
2048             !(OCFS2_I(inode)->ip_dyn_features & OCFS2_HAS_REFCOUNT_FL) ||
2049             OCFS2_I(inode)->ip_dyn_features & OCFS2_INLINE_DATA_FL)
2050                 return 0;
2051
2052         cpos = pos >> OCFS2_SB(sb)->s_clustersize_bits;
2053         clusters = ocfs2_clusters_for_bytes(sb, pos + count) - cpos;
2054
2055         while (clusters) {
2056                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos, &extent_len,
2057                                          &extent_flags);
2058                 if (ret < 0) {
2059                         mlog_errno(ret);
2060                         goto out;
2061                 }
2062
2063                 if (phys_cpos && (extent_flags & OCFS2_EXT_REFCOUNTED)) {
2064                         ret = 1;
2065                         break;
2066                 }
2067
2068                 if (extent_len > clusters)
2069                         extent_len = clusters;
2070
2071                 clusters -= extent_len;
2072                 cpos += extent_len;
2073         }
2074 out:
2075         return ret;
2076 }
2077
2078 static int ocfs2_is_io_unaligned(struct inode *inode, size_t count, loff_t pos)
2079 {
2080         int blockmask = inode->i_sb->s_blocksize - 1;
2081         loff_t final_size = pos + count;
2082
2083         if ((pos & blockmask) || (final_size & blockmask))
2084                 return 1;
2085         return 0;
2086 }
2087
2088 static int ocfs2_prepare_inode_for_refcount(struct inode *inode,
2089                                             struct file *file,
2090                                             loff_t pos, size_t count,
2091                                             int *meta_level)
2092 {
2093         int ret;
2094         struct buffer_head *di_bh = NULL;
2095         u32 cpos = pos >> OCFS2_SB(inode->i_sb)->s_clustersize_bits;
2096         u32 clusters =
2097                 ocfs2_clusters_for_bytes(inode->i_sb, pos + count) - cpos;
2098
2099         ret = ocfs2_inode_lock(inode, &di_bh, 1);
2100         if (ret) {
2101                 mlog_errno(ret);
2102                 goto out;
2103         }
2104
2105         *meta_level = 1;
2106
2107         ret = ocfs2_refcount_cow(inode, di_bh, cpos, clusters, UINT_MAX);
2108         if (ret)
2109                 mlog_errno(ret);
2110 out:
2111         brelse(di_bh);
2112         return ret;
2113 }
2114
2115 static int ocfs2_prepare_inode_for_write(struct file *file,
2116                                          loff_t pos,
2117                                          size_t count,
2118                                          int appending,
2119                                          int *direct_io,
2120                                          int *has_refcount)
2121 {
2122         int ret = 0, meta_level = 0;
2123         struct dentry *dentry = file->f_path.dentry;
2124         struct inode *inode = d_inode(dentry);
2125         loff_t end;
2126         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
2127         int full_coherency = !(osb->s_mount_opt &
2128                 OCFS2_MOUNT_COHERENCY_BUFFERED);
2129
2130         /*
2131          * We start with a read level meta lock and only jump to an ex
2132          * if we need to make modifications here.
2133          */
2134         for(;;) {
2135                 ret = ocfs2_inode_lock(inode, NULL, meta_level);
2136                 if (ret < 0) {
2137                         meta_level = -1;
2138                         mlog_errno(ret);
2139                         goto out;
2140                 }
2141
2142                 /* Clear suid / sgid if necessary. We do this here
2143                  * instead of later in the write path because
2144                  * remove_suid() calls ->setattr without any hint that
2145                  * we may have already done our cluster locking. Since
2146                  * ocfs2_setattr() *must* take cluster locks to
2147                  * proceed, this will lead us to recursively lock the
2148                  * inode. There's also the dinode i_size state which
2149                  * can be lost via setattr during extending writes (we
2150                  * set inode->i_size at the end of a write. */
2151                 if (should_remove_suid(dentry)) {
2152                         if (meta_level == 0) {
2153                                 ocfs2_inode_unlock(inode, meta_level);
2154                                 meta_level = 1;
2155                                 continue;
2156                         }
2157
2158                         ret = ocfs2_write_remove_suid(inode);
2159                         if (ret < 0) {
2160                                 mlog_errno(ret);
2161                                 goto out_unlock;
2162                         }
2163                 }
2164
2165                 end = pos + count;
2166
2167                 ret = ocfs2_check_range_for_refcount(inode, pos, count);
2168                 if (ret == 1) {
2169                         ocfs2_inode_unlock(inode, meta_level);
2170                         meta_level = -1;
2171
2172                         ret = ocfs2_prepare_inode_for_refcount(inode,
2173                                                                file,
2174                                                                pos,
2175                                                                count,
2176                                                                &meta_level);
2177                         if (has_refcount)
2178                                 *has_refcount = 1;
2179                         if (direct_io)
2180                                 *direct_io = 0;
2181                 }
2182
2183                 if (ret < 0) {
2184                         mlog_errno(ret);
2185                         goto out_unlock;
2186                 }
2187
2188                 /*
2189                  * Skip the O_DIRECT checks if we don't need
2190                  * them.
2191                  */
2192                 if (!direct_io || !(*direct_io))
2193                         break;
2194
2195                 /*
2196                  * There's no sane way to do direct writes to an inode
2197                  * with inline data.
2198                  */
2199                 if (OCFS2_I(inode)->ip_dyn_features & OCFS2_INLINE_DATA_FL) {
2200                         *direct_io = 0;
2201                         break;
2202                 }
2203
2204                 /*
2205                  * Allowing concurrent direct writes means
2206                  * i_size changes wouldn't be synchronized, so
2207                  * one node could wind up truncating another
2208                  * nodes writes.
2209                  */
2210                 if (end > i_size_read(inode) && !full_coherency) {
2211                         *direct_io = 0;
2212                         break;
2213                 }
2214
2215                 /*
2216                  * Fallback to old way if the feature bit is not set.
2217                  */
2218                 if (end > i_size_read(inode) &&
2219                                 !ocfs2_supports_append_dio(osb)) {
2220                         *direct_io = 0;
2221                         break;
2222                 }
2223
2224                 /*
2225                  * We don't fill holes during direct io, so
2226                  * check for them here. If any are found, the
2227                  * caller will have to retake some cluster
2228                  * locks and initiate the io as buffered.
2229                  */
2230                 ret = ocfs2_check_range_for_holes(inode, pos, count);
2231                 if (ret == 1) {
2232                         /*
2233                          * Fallback to old way if the feature bit is not set.
2234                          * Otherwise try dio first and then complete the rest
2235                          * request through buffer io.
2236                          */
2237                         if (!ocfs2_supports_append_dio(osb))
2238                                 *direct_io = 0;
2239                         ret = 0;
2240                 } else if (ret < 0)
2241                         mlog_errno(ret);
2242                 break;
2243         }
2244
2245 out_unlock:
2246         trace_ocfs2_prepare_inode_for_write(OCFS2_I(inode)->ip_blkno,
2247                                             pos, appending, count,
2248                                             direct_io, has_refcount);
2249
2250         if (meta_level >= 0)
2251                 ocfs2_inode_unlock(inode, meta_level);
2252
2253 out:
2254         return ret;
2255 }
2256
2257 static ssize_t ocfs2_file_write_iter(struct kiocb *iocb,
2258                                     struct iov_iter *from)
2259 {
2260         int direct_io, appending, rw_level;
2261         int can_do_direct, has_refcount = 0;
2262         ssize_t written = 0;
2263         ssize_t ret;
2264         size_t count = iov_iter_count(from), orig_count;
2265         loff_t old_size;
2266         u32 old_clusters;
2267         struct file *file = iocb->ki_filp;
2268         struct inode *inode = file_inode(file);
2269         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
2270         int full_coherency = !(osb->s_mount_opt &
2271                                OCFS2_MOUNT_COHERENCY_BUFFERED);
2272         int unaligned_dio = 0;
2273         int dropped_dio = 0;
2274
2275         trace_ocfs2_file_aio_write(inode, file, file->f_path.dentry,
2276                 (unsigned long long)OCFS2_I(inode)->ip_blkno,
2277                 file->f_path.dentry->d_name.len,
2278                 file->f_path.dentry->d_name.name,
2279                 (unsigned int)from->nr_segs);   /* GRRRRR */
2280
2281         if (count == 0)
2282                 return 0;
2283
2284         appending = iocb->ki_flags & IOCB_APPEND ? 1 : 0;
2285         direct_io = iocb->ki_flags & IOCB_DIRECT ? 1 : 0;
2286
2287         mutex_lock(&inode->i_mutex);
2288
2289 relock:
2290         /*
2291          * Concurrent O_DIRECT writes are allowed with
2292          * mount_option "coherency=buffered".
2293          */
2294         rw_level = (!direct_io || full_coherency);
2295
2296         ret = ocfs2_rw_lock(inode, rw_level);
2297         if (ret < 0) {
2298                 mlog_errno(ret);
2299                 goto out_mutex;
2300         }
2301
2302         /*
2303          * O_DIRECT writes with "coherency=full" need to take EX cluster
2304          * inode_lock to guarantee coherency.
2305          */
2306         if (direct_io && full_coherency) {
2307                 /*
2308                  * We need to take and drop the inode lock to force
2309                  * other nodes to drop their caches.  Buffered I/O
2310                  * already does this in write_begin().
2311                  */
2312                 ret = ocfs2_inode_lock(inode, NULL, 1);
2313                 if (ret < 0) {
2314                         mlog_errno(ret);
2315                         goto out;
2316                 }
2317
2318                 ocfs2_inode_unlock(inode, 1);
2319         }
2320
2321         orig_count = iov_iter_count(from);
2322         ret = generic_write_checks(iocb, from);
2323         if (ret <= 0) {
2324                 if (ret)
2325                         mlog_errno(ret);
2326                 goto out;
2327         }
2328         count = ret;
2329
2330         can_do_direct = direct_io;
2331         ret = ocfs2_prepare_inode_for_write(file, iocb->ki_pos, count, appending,
2332                                             &can_do_direct, &has_refcount);
2333         if (ret < 0) {
2334                 mlog_errno(ret);
2335                 goto out;
2336         }
2337
2338         if (direct_io && !is_sync_kiocb(iocb))
2339                 unaligned_dio = ocfs2_is_io_unaligned(inode, count, iocb->ki_pos);
2340
2341         /*
2342          * We can't complete the direct I/O as requested, fall back to
2343          * buffered I/O.
2344          */
2345         if (direct_io && !can_do_direct) {
2346                 ocfs2_rw_unlock(inode, rw_level);
2347
2348                 rw_level = -1;
2349
2350                 direct_io = 0;
2351                 iocb->ki_flags &= ~IOCB_DIRECT;
2352                 iov_iter_reexpand(from, orig_count);
2353                 dropped_dio = 1;
2354                 goto relock;
2355         }
2356
2357         if (unaligned_dio) {
2358                 /*
2359                  * Wait on previous unaligned aio to complete before
2360                  * proceeding.
2361                  */
2362                 mutex_lock(&OCFS2_I(inode)->ip_unaligned_aio);
2363                 /* Mark the iocb as needing an unlock in ocfs2_dio_end_io */
2364                 ocfs2_iocb_set_unaligned_aio(iocb);
2365         }
2366
2367         /*
2368          * To later detect whether a journal commit for sync writes is
2369          * necessary, we sample i_size, and cluster count here.
2370          */
2371         old_size = i_size_read(inode);
2372         old_clusters = OCFS2_I(inode)->ip_clusters;
2373
2374         /* communicate with ocfs2_dio_end_io */
2375         ocfs2_iocb_set_rw_locked(iocb, rw_level);
2376
2377         written = __generic_file_write_iter(iocb, from);
2378         /* buffered aio wouldn't have proper lock coverage today */
2379         BUG_ON(written == -EIOCBQUEUED && !(iocb->ki_flags & IOCB_DIRECT));
2380
2381         /*
2382          * deep in g_f_a_w_n()->ocfs2_direct_IO we pass in a ocfs2_dio_end_io
2383          * function pointer which is called when o_direct io completes so that
2384          * it can unlock our rw lock.
2385          * Unfortunately there are error cases which call end_io and others
2386          * that don't.  so we don't have to unlock the rw_lock if either an
2387          * async dio is going to do it in the future or an end_io after an
2388          * error has already done it.
2389          */
2390         if ((written == -EIOCBQUEUED) || (!ocfs2_iocb_is_rw_locked(iocb))) {
2391                 rw_level = -1;
2392                 unaligned_dio = 0;
2393         }
2394
2395         if (unlikely(written <= 0))
2396                 goto no_sync;
2397
2398         if (((file->f_flags & O_DSYNC) && !direct_io) ||
2399             IS_SYNC(inode) || dropped_dio) {
2400                 ret = filemap_fdatawrite_range(file->f_mapping,
2401                                                iocb->ki_pos - written,
2402                                                iocb->ki_pos - 1);
2403                 if (ret < 0)
2404                         written = ret;
2405
2406                 if (!ret) {
2407                         ret = jbd2_journal_force_commit(osb->journal->j_journal);
2408                         if (ret < 0)
2409                                 written = ret;
2410                 }
2411
2412                 if (!ret)
2413                         ret = filemap_fdatawait_range(file->f_mapping,
2414                                                       iocb->ki_pos - written,
2415                                                       iocb->ki_pos - 1);
2416         }
2417
2418 no_sync:
2419         if (unaligned_dio && ocfs2_iocb_is_unaligned_aio(iocb)) {
2420                 ocfs2_iocb_clear_unaligned_aio(iocb);
2421                 mutex_unlock(&OCFS2_I(inode)->ip_unaligned_aio);
2422         }
2423
2424 out:
2425         if (rw_level != -1)
2426                 ocfs2_rw_unlock(inode, rw_level);
2427
2428 out_mutex:
2429         mutex_unlock(&inode->i_mutex);
2430
2431         if (written)
2432                 ret = written;
2433         return ret;
2434 }
2435
2436 static ssize_t ocfs2_file_splice_read(struct file *in,
2437                                       loff_t *ppos,
2438                                       struct pipe_inode_info *pipe,
2439                                       size_t len,
2440                                       unsigned int flags)
2441 {
2442         int ret = 0, lock_level = 0;
2443         struct inode *inode = file_inode(in);
2444
2445         trace_ocfs2_file_splice_read(inode, in, in->f_path.dentry,
2446                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
2447                         in->f_path.dentry->d_name.len,
2448                         in->f_path.dentry->d_name.name, len);
2449
2450         /*
2451          * See the comment in ocfs2_file_read_iter()
2452          */
2453         ret = ocfs2_inode_lock_atime(inode, in->f_path.mnt, &lock_level);
2454         if (ret < 0) {
2455                 mlog_errno(ret);
2456                 goto bail;
2457         }
2458         ocfs2_inode_unlock(inode, lock_level);
2459
2460         ret = generic_file_splice_read(in, ppos, pipe, len, flags);
2461
2462 bail:
2463         return ret;
2464 }
2465
2466 static ssize_t ocfs2_file_read_iter(struct kiocb *iocb,
2467                                    struct iov_iter *to)
2468 {
2469         int ret = 0, rw_level = -1, lock_level = 0;
2470         struct file *filp = iocb->ki_filp;
2471         struct inode *inode = file_inode(filp);
2472
2473         trace_ocfs2_file_aio_read(inode, filp, filp->f_path.dentry,
2474                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
2475                         filp->f_path.dentry->d_name.len,
2476                         filp->f_path.dentry->d_name.name,
2477                         to->nr_segs);   /* GRRRRR */
2478
2479
2480         if (!inode) {
2481                 ret = -EINVAL;
2482                 mlog_errno(ret);
2483                 goto bail;
2484         }
2485
2486         /*
2487          * buffered reads protect themselves in ->readpage().  O_DIRECT reads
2488          * need locks to protect pending reads from racing with truncate.
2489          */
2490         if (iocb->ki_flags & IOCB_DIRECT) {
2491                 ret = ocfs2_rw_lock(inode, 0);
2492                 if (ret < 0) {
2493                         mlog_errno(ret);
2494                         goto bail;
2495                 }
2496                 rw_level = 0;
2497                 /* communicate with ocfs2_dio_end_io */
2498                 ocfs2_iocb_set_rw_locked(iocb, rw_level);
2499         }
2500
2501         /*
2502          * We're fine letting folks race truncates and extending
2503          * writes with read across the cluster, just like they can
2504          * locally. Hence no rw_lock during read.
2505          *
2506          * Take and drop the meta data lock to update inode fields
2507          * like i_size. This allows the checks down below
2508          * generic_file_aio_read() a chance of actually working.
2509          */
2510         ret = ocfs2_inode_lock_atime(inode, filp->f_path.mnt, &lock_level);
2511         if (ret < 0) {
2512                 mlog_errno(ret);
2513                 goto bail;
2514         }
2515         ocfs2_inode_unlock(inode, lock_level);
2516
2517         ret = generic_file_read_iter(iocb, to);
2518         trace_generic_file_aio_read_ret(ret);
2519
2520         /* buffered aio wouldn't have proper lock coverage today */
2521         BUG_ON(ret == -EIOCBQUEUED && !(iocb->ki_flags & IOCB_DIRECT));
2522
2523         /* see ocfs2_file_write_iter */
2524         if (ret == -EIOCBQUEUED || !ocfs2_iocb_is_rw_locked(iocb)) {
2525                 rw_level = -1;
2526         }
2527
2528 bail:
2529         if (rw_level != -1)
2530                 ocfs2_rw_unlock(inode, rw_level);
2531
2532         return ret;
2533 }
2534
2535 /* Refer generic_file_llseek_unlocked() */
2536 static loff_t ocfs2_file_llseek(struct file *file, loff_t offset, int whence)
2537 {
2538         struct inode *inode = file->f_mapping->host;
2539         int ret = 0;
2540
2541         mutex_lock(&inode->i_mutex);
2542
2543         switch (whence) {
2544         case SEEK_SET:
2545                 break;
2546         case SEEK_END:
2547                 /* SEEK_END requires the OCFS2 inode lock for the file
2548                  * because it references the file's size.
2549                  */
2550                 ret = ocfs2_inode_lock(inode, NULL, 0);
2551                 if (ret < 0) {
2552                         mlog_errno(ret);
2553                         goto out;
2554                 }
2555                 offset += i_size_read(inode);
2556                 ocfs2_inode_unlock(inode, 0);
2557                 break;
2558         case SEEK_CUR:
2559                 if (offset == 0) {
2560                         offset = file->f_pos;
2561                         goto out;
2562                 }
2563                 offset += file->f_pos;
2564                 break;
2565         case SEEK_DATA:
2566         case SEEK_HOLE:
2567                 ret = ocfs2_seek_data_hole_offset(file, &offset, whence);
2568                 if (ret)
2569                         goto out;
2570                 break;
2571         default:
2572                 ret = -EINVAL;
2573                 goto out;
2574         }
2575
2576         offset = vfs_setpos(file, offset, inode->i_sb->s_maxbytes);
2577
2578 out:
2579         mutex_unlock(&inode->i_mutex);
2580         if (ret)
2581                 return ret;
2582         return offset;
2583 }
2584
2585 const struct inode_operations ocfs2_file_iops = {
2586         .setattr        = ocfs2_setattr,
2587         .getattr        = ocfs2_getattr,
2588         .permission     = ocfs2_permission,
2589         .setxattr       = generic_setxattr,
2590         .getxattr       = generic_getxattr,
2591         .listxattr      = ocfs2_listxattr,
2592         .removexattr    = generic_removexattr,
2593         .fiemap         = ocfs2_fiemap,
2594         .get_acl        = ocfs2_iop_get_acl,
2595         .set_acl        = ocfs2_iop_set_acl,
2596 };
2597
2598 const struct inode_operations ocfs2_special_file_iops = {
2599         .setattr        = ocfs2_setattr,
2600         .getattr        = ocfs2_getattr,
2601         .permission     = ocfs2_permission,
2602         .get_acl        = ocfs2_iop_get_acl,
2603         .set_acl        = ocfs2_iop_set_acl,
2604 };
2605
2606 /*
2607  * Other than ->lock, keep ocfs2_fops and ocfs2_dops in sync with
2608  * ocfs2_fops_no_plocks and ocfs2_dops_no_plocks!
2609  */
2610 const struct file_operations ocfs2_fops = {
2611         .llseek         = ocfs2_file_llseek,
2612         .mmap           = ocfs2_mmap,
2613         .fsync          = ocfs2_sync_file,
2614         .release        = ocfs2_file_release,
2615         .open           = ocfs2_file_open,
2616         .read_iter      = ocfs2_file_read_iter,
2617         .write_iter     = ocfs2_file_write_iter,
2618         .unlocked_ioctl = ocfs2_ioctl,
2619 #ifdef CONFIG_COMPAT
2620         .compat_ioctl   = ocfs2_compat_ioctl,
2621 #endif
2622         .lock           = ocfs2_lock,
2623         .flock          = ocfs2_flock,
2624         .splice_read    = ocfs2_file_splice_read,
2625         .splice_write   = iter_file_splice_write,
2626         .fallocate      = ocfs2_fallocate,
2627 };
2628
2629 const struct file_operations ocfs2_dops = {
2630         .llseek         = generic_file_llseek,
2631         .read           = generic_read_dir,
2632         .iterate        = ocfs2_readdir,
2633         .fsync          = ocfs2_sync_file,
2634         .release        = ocfs2_dir_release,
2635         .open           = ocfs2_dir_open,
2636         .unlocked_ioctl = ocfs2_ioctl,
2637 #ifdef CONFIG_COMPAT
2638         .compat_ioctl   = ocfs2_compat_ioctl,
2639 #endif
2640         .lock           = ocfs2_lock,
2641         .flock          = ocfs2_flock,
2642 };
2643
2644 /*
2645  * POSIX-lockless variants of our file_operations.
2646  *
2647  * These will be used if the underlying cluster stack does not support
2648  * posix file locking, if the user passes the "localflocks" mount
2649  * option, or if we have a local-only fs.
2650  *
2651  * ocfs2_flock is in here because all stacks handle UNIX file locks,
2652  * so we still want it in the case of no stack support for
2653  * plocks. Internally, it will do the right thing when asked to ignore
2654  * the cluster.
2655  */
2656 const struct file_operations ocfs2_fops_no_plocks = {
2657         .llseek         = ocfs2_file_llseek,
2658         .mmap           = ocfs2_mmap,
2659         .fsync          = ocfs2_sync_file,
2660         .release        = ocfs2_file_release,
2661         .open           = ocfs2_file_open,
2662         .read_iter      = ocfs2_file_read_iter,
2663         .write_iter     = ocfs2_file_write_iter,
2664         .unlocked_ioctl = ocfs2_ioctl,
2665 #ifdef CONFIG_COMPAT
2666         .compat_ioctl   = ocfs2_compat_ioctl,
2667 #endif
2668         .flock          = ocfs2_flock,
2669         .splice_read    = ocfs2_file_splice_read,
2670         .splice_write   = iter_file_splice_write,
2671         .fallocate      = ocfs2_fallocate,
2672 };
2673
2674 const struct file_operations ocfs2_dops_no_plocks = {
2675         .llseek         = generic_file_llseek,
2676         .read           = generic_read_dir,
2677         .iterate        = ocfs2_readdir,
2678         .fsync          = ocfs2_sync_file,
2679         .release        = ocfs2_dir_release,
2680         .open           = ocfs2_dir_open,
2681         .unlocked_ioctl = ocfs2_ioctl,
2682 #ifdef CONFIG_COMPAT
2683         .compat_ioctl   = ocfs2_compat_ioctl,
2684 #endif
2685         .flock          = ocfs2_flock,
2686 };