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/pipe_fs_i.h>
  35 #include <linux/mount.h>
  36 #include <linux/writeback.h>
  37
  38 #define MLOG_MASK_PREFIX ML_INODE
  39 #include <cluster/masklog.h>
  40
  41 #include "ocfs2.h"
  42
  43 #include "alloc.h"
  44 #include "aops.h"
  45 #include "dir.h"
  46 #include "dlmglue.h"
  47 #include "extent_map.h"
  48 #include "file.h"
  49 #include "sysfile.h"
  50 #include "inode.h"
  51 #include "ioctl.h"
  52 #include "journal.h"
  53 #include "mmap.h"
  54 #include "suballoc.h"
  55 #include "super.h"
  56
  57 #include "buffer_head_io.h"
  58
  59 static int ocfs2_sync_inode(struct inode *inode)
  60 {
  61         filemap_fdatawrite(inode->i_mapping);
  62         return sync_mapping_buffers(inode->i_mapping);
  63 }
  64
  65 static int ocfs2_file_open(struct inode *inode, struct file *file)
  66 {
  67         int status;
  68         int mode = file->f_flags;
  69         struct ocfs2_inode_info *oi = OCFS2_I(inode);
  70
  71         mlog_entry("(0x%p, 0x%p, '%.*s')\n", inode, file,
  72                    file->f_path.dentry->d_name.len, file->f_path.dentry->d_name.name);
  73
  74         spin_lock(&oi->ip_lock);
  75
  76         /* Check that the inode hasn't been wiped from disk by another
  77          * node. If it hasn't then we're safe as long as we hold the
  78          * spin lock until our increment of open count. */
  79         if (OCFS2_I(inode)->ip_flags & OCFS2_INODE_DELETED) {
  80                 spin_unlock(&oi->ip_lock);
  81
  82                 status = -ENOENT;
  83                 goto leave;
  84         }
  85
  86         if (mode & O_DIRECT)
  87                 oi->ip_flags |= OCFS2_INODE_OPEN_DIRECT;
  88
  89         oi->ip_open_count++;
  90         spin_unlock(&oi->ip_lock);
  91         status = 0;
  92 leave:
  93         mlog_exit(status);
  94         return status;
  95 }
  96
  97 static int ocfs2_file_release(struct inode *inode, struct file *file)
  98 {
  99         struct ocfs2_inode_info *oi = OCFS2_I(inode);
 100
 101         mlog_entry("(0x%p, 0x%p, '%.*s')\n", inode, file,
 102                        file->f_path.dentry->d_name.len,
 103                        file->f_path.dentry->d_name.name);
 104
 105         spin_lock(&oi->ip_lock);
 106         if (!--oi->ip_open_count)
 107                 oi->ip_flags &= ~OCFS2_INODE_OPEN_DIRECT;
 108         spin_unlock(&oi->ip_lock);
 109
 110         mlog_exit(0);
 111
 112         return 0;
 113 }
 114
 115 static int ocfs2_sync_file(struct file *file,
 116                            struct dentry *dentry,
 117                            int datasync)
 118 {
 119         int err = 0;
 120         journal_t *journal;
 121         struct inode *inode = dentry->d_inode;
 122         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 123
 124         mlog_entry("(0x%p, 0x%p, %d, '%.*s')\n", file, dentry, datasync,
 125                    dentry->d_name.len, dentry->d_name.name);
 126
 127         err = ocfs2_sync_inode(dentry->d_inode);
 128         if (err)
 129                 goto bail;
 130
 131         journal = osb->journal->j_journal;
 132         err = journal_force_commit(journal);
 133
 134 bail:
 135         mlog_exit(err);
 136
 137         return (err < 0) ? -EIO : 0;
 138 }
 139
 140 int ocfs2_should_update_atime(struct inode *inode,
 141                               struct vfsmount *vfsmnt)
 142 {
 143         struct timespec now;
 144         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 145
 146         if (ocfs2_is_hard_readonly(osb) || ocfs2_is_soft_readonly(osb))
 147                 return 0;
 148
 149         if ((inode->i_flags & S_NOATIME) ||
 150             ((inode->i_sb->s_flags & MS_NODIRATIME) && S_ISDIR(inode->i_mode)))
 151                 return 0;
 152
 153         /*
 154          * We can be called with no vfsmnt structure - NFSD will
 155          * sometimes do this.
 156          *
 157          * Note that our action here is different than touch_atime() -
 158          * if we can't tell whether this is a noatime mount, then we
 159          * don't know whether to trust the value of s_atime_quantum.
 160          */
 161         if (vfsmnt == NULL)
 162                 return 0;
 163
 164         if ((vfsmnt->mnt_flags & MNT_NOATIME) ||
 165             ((vfsmnt->mnt_flags & MNT_NODIRATIME) && S_ISDIR(inode->i_mode)))
 166                 return 0;
 167
 168         if (vfsmnt->mnt_flags & MNT_RELATIME) {
 169                 if ((timespec_compare(&inode->i_atime, &inode->i_mtime) <= 0) ||
 170                     (timespec_compare(&inode->i_atime, &inode->i_ctime) <= 0))
 171                         return 1;
 172
 173                 return 0;
 174         }
 175
 176         now = CURRENT_TIME;
 177         if ((now.tv_sec - inode->i_atime.tv_sec <= osb->s_atime_quantum))
 178                 return 0;
 179         else
 180                 return 1;
 181 }
 182
 183 int ocfs2_update_inode_atime(struct inode *inode,
 184                              struct buffer_head *bh)
 185 {
 186         int ret;
 187         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 188         handle_t *handle;
 189
 190         mlog_entry_void();
 191
 192         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
 193         if (handle == NULL) {
 194                 ret = -ENOMEM;
 195                 mlog_errno(ret);
 196                 goto out;
 197         }
 198
 199         inode->i_atime = CURRENT_TIME;
 200         ret = ocfs2_mark_inode_dirty(handle, inode, bh);
 201         if (ret < 0)
 202                 mlog_errno(ret);
 203
 204         ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
 205 out:
 206         mlog_exit(ret);
 207         return ret;
 208 }
 209
 210 int ocfs2_set_inode_size(handle_t *handle,
 211                          struct inode *inode,
 212                          struct buffer_head *fe_bh,
 213                          u64 new_i_size)
 214 {
 215         int status;
 216
 217         mlog_entry_void();
 218         i_size_write(inode, new_i_size);
 219         inode->i_blocks = ocfs2_align_bytes_to_sectors(new_i_size);
 220         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
 221
 222         status = ocfs2_mark_inode_dirty(handle, inode, fe_bh);
 223         if (status < 0) {
 224                 mlog_errno(status);
 225                 goto bail;
 226         }
 227
 228 bail:
 229         mlog_exit(status);
 230         return status;
 231 }
 232
 233 static int ocfs2_simple_size_update(struct inode *inode,
 234                                     struct buffer_head *di_bh,
 235                                     u64 new_i_size)
 236 {
 237         int ret;
 238         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 239         handle_t *handle = NULL;
 240
 241         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
 242         if (handle == NULL) {
 243                 ret = -ENOMEM;
 244                 mlog_errno(ret);
 245                 goto out;
 246         }
 247
 248         ret = ocfs2_set_inode_size(handle, inode, di_bh,
 249                                    new_i_size);
 250         if (ret < 0)
 251                 mlog_errno(ret);
 252
 253         ocfs2_commit_trans(osb, handle);
 254 out:
 255         return ret;
 256 }
 257
 258 static int ocfs2_orphan_for_truncate(struct ocfs2_super *osb,
 259                                      struct inode *inode,
 260                                      struct buffer_head *fe_bh,
 261                                      u64 new_i_size)
 262 {
 263         int status;
 264         handle_t *handle;
 265         struct ocfs2_dinode *di;
 266
 267         mlog_entry_void();
 268
 269         /* TODO: This needs to actually orphan the inode in this
 270          * transaction. */
 271
 272         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
 273         if (IS_ERR(handle)) {
 274                 status = PTR_ERR(handle);
 275                 mlog_errno(status);
 276                 goto out;
 277         }
 278
 279         status = ocfs2_journal_access(handle, inode, fe_bh,
 280                                       OCFS2_JOURNAL_ACCESS_WRITE);
 281         if (status < 0) {
 282                 mlog_errno(status);
 283                 goto out_commit;
 284         }
 285
 286         /*
 287          * Do this before setting i_size.
 288          */
 289         status = ocfs2_zero_tail_for_truncate(inode, handle, new_i_size);
 290         if (status) {
 291                 mlog_errno(status);
 292                 goto out_commit;
 293         }
 294
 295         i_size_write(inode, new_i_size);
 296         inode->i_blocks = ocfs2_align_bytes_to_sectors(new_i_size);
 297         inode->i_ctime = inode->i_mtime = CURRENT_TIME;
 298
 299         di = (struct ocfs2_dinode *) fe_bh->b_data;
 300         di->i_size = cpu_to_le64(new_i_size);
 301         di->i_ctime = di->i_mtime = cpu_to_le64(inode->i_ctime.tv_sec);
 302         di->i_ctime_nsec = di->i_mtime_nsec = cpu_to_le32(inode->i_ctime.tv_nsec);
 303
 304         status = ocfs2_journal_dirty(handle, fe_bh);
 305         if (status < 0)
 306                 mlog_errno(status);
 307
 308 out_commit:
 309         ocfs2_commit_trans(osb, handle);
 310 out:
 311
 312         mlog_exit(status);
 313         return status;
 314 }
 315
 316 static int ocfs2_truncate_file(struct inode *inode,
 317                                struct buffer_head *di_bh,
 318                                u64 new_i_size)
 319 {
 320         int status = 0;
 321         struct ocfs2_dinode *fe = NULL;
 322         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 323         struct ocfs2_truncate_context *tc = NULL;
 324
 325         mlog_entry("(inode = %llu, new_i_size = %llu\n",
 326                    (unsigned long long)OCFS2_I(inode)->ip_blkno,
 327                    (unsigned long long)new_i_size);
 328
 329         truncate_inode_pages(inode->i_mapping, new_i_size);
 330
 331         fe = (struct ocfs2_dinode *) di_bh->b_data;
 332         if (!OCFS2_IS_VALID_DINODE(fe)) {
 333                 OCFS2_RO_ON_INVALID_DINODE(inode->i_sb, fe);
 334                 status = -EIO;
 335                 goto bail;
 336         }
 337
 338         mlog_bug_on_msg(le64_to_cpu(fe->i_size) != i_size_read(inode),
 339                         "Inode %llu, inode i_size = %lld != di "
 340                         "i_size = %llu, i_flags = 0x%x\n",
 341                         (unsigned long long)OCFS2_I(inode)->ip_blkno,
 342                         i_size_read(inode),
 343                         (unsigned long long)le64_to_cpu(fe->i_size),
 344                         le32_to_cpu(fe->i_flags));
 345
 346         if (new_i_size > le64_to_cpu(fe->i_size)) {
 347                 mlog(0, "asked to truncate file with size (%llu) to size (%llu)!\n",
 348                      (unsigned long long)le64_to_cpu(fe->i_size),
 349                      (unsigned long long)new_i_size);
 350                 status = -EINVAL;
 351                 mlog_errno(status);
 352                 goto bail;
 353         }
 354
 355         mlog(0, "inode %llu, i_size = %llu, new_i_size = %llu\n",
 356              (unsigned long long)le64_to_cpu(fe->i_blkno),
 357              (unsigned long long)le64_to_cpu(fe->i_size),
 358              (unsigned long long)new_i_size);
 359
 360         /* lets handle the simple truncate cases before doing any more
 361          * cluster locking. */
 362         if (new_i_size == le64_to_cpu(fe->i_size))
 363                 goto bail;
 364
 365         /* This forces other nodes to sync and drop their pages. Do
 366          * this even if we have a truncate without allocation change -
 367          * ocfs2 cluster sizes can be much greater than page size, so
 368          * we have to truncate them anyway.  */
 369         status = ocfs2_data_lock(inode, 1);
 370         if (status < 0) {
 371                 mlog_errno(status);
 372                 goto bail;
 373         }
 374
 375         /* alright, we're going to need to do a full blown alloc size
 376          * change. Orphan the inode so that recovery can complete the
 377          * truncate if necessary. This does the task of marking
 378          * i_size. */
 379         status = ocfs2_orphan_for_truncate(osb, inode, di_bh, new_i_size);
 380         if (status < 0) {
 381                 mlog_errno(status);
 382                 goto bail_unlock_data;
 383         }
 384
 385         status = ocfs2_prepare_truncate(osb, inode, di_bh, &tc);
 386         if (status < 0) {
 387                 mlog_errno(status);
 388                 goto bail_unlock_data;
 389         }
 390
 391         status = ocfs2_commit_truncate(osb, inode, di_bh, tc);
 392         if (status < 0) {
 393                 mlog_errno(status);
 394                 goto bail_unlock_data;
 395         }
 396
 397         /* TODO: orphan dir cleanup here. */
 398 bail_unlock_data:
 399         ocfs2_data_unlock(inode, 1);
 400
 401 bail:
 402
 403         mlog_exit(status);
 404         return status;
 405 }
 406
 407 /*
 408  * extend allocation only here.
 409  * we'll update all the disk stuff, and oip->alloc_size
 410  *
 411  * expect stuff to be locked, a transaction started and enough data /
 412  * metadata reservations in the contexts.
 413  *
 414  * Will return -EAGAIN, and a reason if a restart is needed.
 415  * If passed in, *reason will always be set, even in error.
 416  */
 417 int ocfs2_do_extend_allocation(struct ocfs2_super *osb,
 418                                struct inode *inode,
 419                                u32 *logical_offset,
 420                                u32 clusters_to_add,
 421                                struct buffer_head *fe_bh,
 422                                handle_t *handle,
 423                                struct ocfs2_alloc_context *data_ac,
 424                                struct ocfs2_alloc_context *meta_ac,
 425                                enum ocfs2_alloc_restarted *reason_ret)
 426 {
 427         int status = 0;
 428         int free_extents;
 429         struct ocfs2_dinode *fe = (struct ocfs2_dinode *) fe_bh->b_data;
 430         enum ocfs2_alloc_restarted reason = RESTART_NONE;
 431         u32 bit_off, num_bits;
 432         u64 block;
 433
 434         BUG_ON(!clusters_to_add);
 435
 436         free_extents = ocfs2_num_free_extents(osb, inode, fe);
 437         if (free_extents < 0) {
 438                 status = free_extents;
 439                 mlog_errno(status);
 440                 goto leave;
 441         }
 442
 443         /* there are two cases which could cause us to EAGAIN in the
 444          * we-need-more-metadata case:
 445          * 1) we haven't reserved *any*
 446          * 2) we are so fragmented, we've needed to add metadata too
 447          *    many times. */
 448         if (!free_extents && !meta_ac) {
 449                 mlog(0, "we haven't reserved any metadata!\n");
 450                 status = -EAGAIN;
 451                 reason = RESTART_META;
 452                 goto leave;
 453         } else if ((!free_extents)
 454                    && (ocfs2_alloc_context_bits_left(meta_ac)
 455                        < ocfs2_extend_meta_needed(fe))) {
 456                 mlog(0, "filesystem is really fragmented...\n");
 457                 status = -EAGAIN;
 458                 reason = RESTART_META;
 459                 goto leave;
 460         }
 461
 462         status = ocfs2_claim_clusters(osb, handle, data_ac, 1,
 463                                       &bit_off, &num_bits);
 464         if (status < 0) {
 465                 if (status != -ENOSPC)
 466                         mlog_errno(status);
 467                 goto leave;
 468         }
 469
 470         BUG_ON(num_bits > clusters_to_add);
 471
 472         /* reserve our write early -- insert_extent may update the inode */
 473         status = ocfs2_journal_access(handle, inode, fe_bh,
 474                                       OCFS2_JOURNAL_ACCESS_WRITE);
 475         if (status < 0) {
 476                 mlog_errno(status);
 477                 goto leave;
 478         }
 479
 480         block = ocfs2_clusters_to_blocks(osb->sb, bit_off);
 481         mlog(0, "Allocating %u clusters at block %u for inode %llu\n",
 482              num_bits, bit_off, (unsigned long long)OCFS2_I(inode)->ip_blkno);
 483         status = ocfs2_insert_extent(osb, handle, inode, fe_bh,
 484                                      *logical_offset, block, num_bits,
 485                                      meta_ac);
 486         if (status < 0) {
 487                 mlog_errno(status);
 488                 goto leave;
 489         }
 490
 491         status = ocfs2_journal_dirty(handle, fe_bh);
 492         if (status < 0) {
 493                 mlog_errno(status);
 494                 goto leave;
 495         }
 496
 497         clusters_to_add -= num_bits;
 498         *logical_offset += num_bits;
 499
 500         if (clusters_to_add) {
 501                 mlog(0, "need to alloc once more, clusters = %u, wanted = "
 502                      "%u\n", fe->i_clusters, clusters_to_add);
 503                 status = -EAGAIN;
 504                 reason = RESTART_TRANS;
 505         }
 506
 507 leave:
 508         mlog_exit(status);
 509         if (reason_ret)
 510                 *reason_ret = reason;
 511         return status;
 512 }
 513
 514 /*
 515  * For a given allocation, determine which allocators will need to be
 516  * accessed, and lock them, reserving the appropriate number of bits.
 517  *
 518  * Called from ocfs2_extend_allocation() for file systems which don't
 519  * support holes, and from ocfs2_write() for file systems which
 520  * understand sparse inodes.
 521  */
 522 int ocfs2_lock_allocators(struct inode *inode, struct ocfs2_dinode *di,
 523                           u32 clusters_to_add,
 524                           struct ocfs2_alloc_context **data_ac,
 525                           struct ocfs2_alloc_context **meta_ac)
 526 {
 527         int ret, num_free_extents;
 528         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 529
 530         *meta_ac = NULL;
 531         *data_ac = NULL;
 532
 533         mlog(0, "extend inode %llu, i_size = %lld, di->i_clusters = %u, "
 534              "clusters_to_add = %u\n",
 535              (unsigned long long)OCFS2_I(inode)->ip_blkno, i_size_read(inode),
 536              le32_to_cpu(di->i_clusters), clusters_to_add);
 537
 538         num_free_extents = ocfs2_num_free_extents(osb, inode, di);
 539         if (num_free_extents < 0) {
 540                 ret = num_free_extents;
 541                 mlog_errno(ret);
 542                 goto out;
 543         }
 544
 545         /*
 546          * Sparse allocation file systems need to be more conservative
 547          * with reserving room for expansion - the actual allocation
 548          * happens while we've got a journal handle open so re-taking
 549          * a cluster lock (because we ran out of room for another
 550          * extent) will violate ordering rules.
 551          *
 552          * Most of the time we'll only be seeing this 1 cluster at a time
 553          * anyway.
 554          */
 555         if (!num_free_extents ||
 556             (ocfs2_sparse_alloc(osb) && num_free_extents < clusters_to_add)) {
 557                 ret = ocfs2_reserve_new_metadata(osb, di, meta_ac);
 558                 if (ret < 0) {
 559                         if (ret != -ENOSPC)
 560                                 mlog_errno(ret);
 561                         goto out;
 562                 }
 563         }
 564
 565         ret = ocfs2_reserve_clusters(osb, clusters_to_add, data_ac);
 566         if (ret < 0) {
 567                 if (ret != -ENOSPC)
 568                         mlog_errno(ret);
 569                 goto out;
 570         }
 571
 572 out:
 573         if (ret) {
 574                 if (*meta_ac) {
 575                         ocfs2_free_alloc_context(*meta_ac);
 576                         *meta_ac = NULL;
 577                 }
 578
 579                 /*
 580                  * We cannot have an error and a non null *data_ac.
 581                  */
 582         }
 583
 584         return ret;
 585 }
 586
 587 static int ocfs2_extend_allocation(struct inode *inode,
 588                                    u32 clusters_to_add)
 589 {
 590         int status = 0;
 591         int restart_func = 0;
 592         int drop_alloc_sem = 0;
 593         int credits;
 594         u32 prev_clusters, logical_start;
 595         struct buffer_head *bh = NULL;
 596         struct ocfs2_dinode *fe = NULL;
 597         handle_t *handle = NULL;
 598         struct ocfs2_alloc_context *data_ac = NULL;
 599         struct ocfs2_alloc_context *meta_ac = NULL;
 600         enum ocfs2_alloc_restarted why;
 601         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
 602
 603         mlog_entry("(clusters_to_add = %u)\n", clusters_to_add);
 604
 605         /*
 606          * This function only exists for file systems which don't
 607          * support holes.
 608          */
 609         BUG_ON(ocfs2_sparse_alloc(osb));
 610
 611         status = ocfs2_read_block(osb, OCFS2_I(inode)->ip_blkno, &bh,
 612                                   OCFS2_BH_CACHED, inode);
 613         if (status < 0) {
 614                 mlog_errno(status);
 615                 goto leave;
 616         }
 617
 618         fe = (struct ocfs2_dinode *) bh->b_data;
 619         if (!OCFS2_IS_VALID_DINODE(fe)) {
 620                 OCFS2_RO_ON_INVALID_DINODE(inode->i_sb, fe);
 621                 status = -EIO;
 622                 goto leave;
 623         }
 624
 625         logical_start = OCFS2_I(inode)->ip_clusters;
 626
 627 restart_all:
 628         BUG_ON(le32_to_cpu(fe->i_clusters) != OCFS2_I(inode)->ip_clusters);
 629
 630         /* blocks peope in read/write from reading our allocation
 631          * until we're done changing it. We depend on i_mutex to block
 632          * other extend/truncate calls while we're here. Ordering wrt
 633          * start_trans is important here -- always do it before! */
 634         down_write(&OCFS2_I(inode)->ip_alloc_sem);
 635         drop_alloc_sem = 1;
 636
 637         status = ocfs2_lock_allocators(inode, fe, clusters_to_add, &data_ac,
 638                                        &meta_ac);
 639         if (status) {
 640                 mlog_errno(status);
 641                 goto leave;
 642         }
 643
 644         credits = ocfs2_calc_extend_credits(osb->sb, fe, clusters_to_add);
 645         handle = ocfs2_start_trans(osb, credits);
 646         if (IS_ERR(handle)) {
 647                 status = PTR_ERR(handle);
 648                 handle = NULL;
 649                 mlog_errno(status);
 650                 goto leave;
 651         }
 652
 653 restarted_transaction:
 654         /* reserve a write to the file entry early on - that we if we
 655          * run out of credits in the allocation path, we can still
 656          * update i_size. */
 657         status = ocfs2_journal_access(handle, inode, bh,
 658                                       OCFS2_JOURNAL_ACCESS_WRITE);
 659         if (status < 0) {
 660                 mlog_errno(status);
 661                 goto leave;
 662         }
 663
 664         prev_clusters = OCFS2_I(inode)->ip_clusters;
 665
 666         status = ocfs2_do_extend_allocation(osb,
 667                                             inode,
 668                                             &logical_start,
 669                                             clusters_to_add,
 670                                             bh,
 671                                             handle,
 672                                             data_ac,
 673                                             meta_ac,
 674                                             &why);
 675         if ((status < 0) && (status != -EAGAIN)) {
 676                 if (status != -ENOSPC)
 677                         mlog_errno(status);
 678                 goto leave;
 679         }
 680
 681         status = ocfs2_journal_dirty(handle, bh);
 682         if (status < 0) {
 683                 mlog_errno(status);
 684                 goto leave;
 685         }
 686
 687         spin_lock(&OCFS2_I(inode)->ip_lock);
 688         clusters_to_add -= (OCFS2_I(inode)->ip_clusters - prev_clusters);
 689         spin_unlock(&OCFS2_I(inode)->ip_lock);
 690
 691         if (why != RESTART_NONE && clusters_to_add) {
 692                 if (why == RESTART_META) {
 693                         mlog(0, "restarting function.\n");
 694                         restart_func = 1;
 695                 } else {
 696                         BUG_ON(why != RESTART_TRANS);
 697
 698                         mlog(0, "restarting transaction.\n");
 699                         /* TODO: This can be more intelligent. */
 700                         credits = ocfs2_calc_extend_credits(osb->sb,
 701                                                             fe,
 702                                                             clusters_to_add);
 703                         status = ocfs2_extend_trans(handle, credits);
 704                         if (status < 0) {
 705                                 /* handle still has to be committed at
 706                                  * this point. */
 707                                 status = -ENOMEM;
 708                                 mlog_errno(status);
 709                                 goto leave;
 710                         }
 711                         goto restarted_transaction;
 712                 }
 713         }
 714
 715         mlog(0, "fe: i_clusters = %u, i_size=%llu\n",
 716              fe->i_clusters, (unsigned long long)fe->i_size);
 717         mlog(0, "inode: ip_clusters=%u, i_size=%lld\n",
 718              OCFS2_I(inode)->ip_clusters, i_size_read(inode));
 719
 720 leave:
 721         if (drop_alloc_sem) {
 722                 up_write(&OCFS2_I(inode)->ip_alloc_sem);
 723                 drop_alloc_sem = 0;
 724         }
 725         if (handle) {
 726                 ocfs2_commit_trans(osb, handle);
 727                 handle = NULL;
 728         }
 729         if (data_ac) {
 730                 ocfs2_free_alloc_context(data_ac);
 731                 data_ac = NULL;
 732         }
 733         if (meta_ac) {
 734                 ocfs2_free_alloc_context(meta_ac);
 735                 meta_ac = NULL;
 736         }
 737         if ((!status) && restart_func) {
 738                 restart_func = 0;
 739                 goto restart_all;
 740         }
 741         if (bh) {
 742                 brelse(bh);
 743                 bh = NULL;
 744         }
 745
 746         mlog_exit(status);
 747         return status;
 748 }
 749
 750 /* Some parts of this taken from generic_cont_expand, which turned out
 751  * to be too fragile to do exactly what we need without us having to
 752  * worry about recursive locking in ->prepare_write() and
 753  * ->commit_write(). */
 754 static int ocfs2_write_zero_page(struct inode *inode,
 755                                  u64 size)
 756 {
 757         struct address_space *mapping = inode->i_mapping;
 758         struct page *page;
 759         unsigned long index;
 760         unsigned int offset;
 761         handle_t *handle = NULL;
 762         int ret;
 763
 764         offset = (size & (PAGE_CACHE_SIZE-1)); /* Within page */
 765         /* ugh.  in prepare/commit_write, if from==to==start of block, we
 766         ** skip the prepare.  make sure we never send an offset for the start
 767         ** of a block
 768         */
 769         if ((offset & (inode->i_sb->s_blocksize - 1)) == 0) {
 770                 offset++;
 771         }
 772         index = size >> PAGE_CACHE_SHIFT;
 773
 774         page = grab_cache_page(mapping, index);
 775         if (!page) {
 776                 ret = -ENOMEM;
 777                 mlog_errno(ret);
 778                 goto out;
 779         }
 780
 781         ret = ocfs2_prepare_write_nolock(inode, page, offset, offset);
 782         if (ret < 0) {
 783                 mlog_errno(ret);
 784                 goto out_unlock;
 785         }
 786
 787         if (ocfs2_should_order_data(inode)) {
 788                 handle = ocfs2_start_walk_page_trans(inode, page, offset,
 789                                                      offset);
 790                 if (IS_ERR(handle)) {
 791                         ret = PTR_ERR(handle);
 792                         handle = NULL;
 793                         goto out_unlock;
 794                 }
 795         }
 796
 797         /* must not update i_size! */
 798         ret = block_commit_write(page, offset, offset);
 799         if (ret < 0)
 800                 mlog_errno(ret);
 801         else
 802                 ret = 0;
 803
 804         if (handle)
 805                 ocfs2_commit_trans(OCFS2_SB(inode->i_sb), handle);
 806 out_unlock:
 807         unlock_page(page);
 808         page_cache_release(page);
 809 out:
 810         return ret;
 811 }
 812
 813 static int ocfs2_zero_extend(struct inode *inode,
 814                              u64 zero_to_size)
 815 {
 816         int ret = 0;
 817         u64 start_off;
 818         struct super_block *sb = inode->i_sb;
 819
 820         start_off = ocfs2_align_bytes_to_blocks(sb, i_size_read(inode));
 821         while (start_off < zero_to_size) {
 822                 ret = ocfs2_write_zero_page(inode, start_off);
 823                 if (ret < 0) {
 824                         mlog_errno(ret);
 825                         goto out;
 826                 }
 827
 828                 start_off += sb->s_blocksize;
 829
 830                 /*
 831                  * Very large extends have the potential to lock up
 832                  * the cpu for extended periods of time.
 833                  */
 834                 cond_resched();
 835         }
 836
 837 out:
 838         return ret;
 839 }
 840
 841 /*
 842  * A tail_to_skip value > 0 indicates that we're being called from
 843  * ocfs2_file_aio_write(). This has the following implications:
 844  *
 845  * - we don't want to update i_size
 846  * - di_bh will be NULL, which is fine because it's only used in the
 847  *   case where we want to update i_size.
 848  * - ocfs2_zero_extend() will then only be filling the hole created
 849  *   between i_size and the start of the write.
 850  */
 851 static int ocfs2_extend_file(struct inode *inode,
 852                              struct buffer_head *di_bh,
 853                              u64 new_i_size,
 854                              size_t tail_to_skip)
 855 {
 856         int ret = 0;
 857         u32 clusters_to_add = 0;
 858
 859         BUG_ON(!tail_to_skip && !di_bh);
 860
 861         /* setattr sometimes calls us like this. */
 862         if (new_i_size == 0)
 863                 goto out;
 864
 865         if (i_size_read(inode) == new_i_size)
 866                 goto out;
 867         BUG_ON(new_i_size < i_size_read(inode));
 868
 869         if (ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb))) {
 870                 BUG_ON(tail_to_skip != 0);
 871                 goto out_update_size;
 872         }
 873
 874         clusters_to_add = ocfs2_clusters_for_bytes(inode->i_sb, new_i_size) -
 875                 OCFS2_I(inode)->ip_clusters;
 876
 877         /*
 878          * protect the pages that ocfs2_zero_extend is going to be
 879          * pulling into the page cache.. we do this before the
 880          * metadata extend so that we don't get into the situation
 881          * where we've extended the metadata but can't get the data
 882          * lock to zero.
 883          */
 884         ret = ocfs2_data_lock(inode, 1);
 885         if (ret < 0) {
 886                 mlog_errno(ret);
 887                 goto out;
 888         }
 889
 890         if (clusters_to_add) {
 891                 ret = ocfs2_extend_allocation(inode, clusters_to_add);
 892                 if (ret < 0) {
 893                         mlog_errno(ret);
 894                         goto out_unlock;
 895                 }
 896         }
 897
 898         /*
 899          * Call this even if we don't add any clusters to the tree. We
 900          * still need to zero the area between the old i_size and the
 901          * new i_size.
 902          */
 903         ret = ocfs2_zero_extend(inode, (u64)new_i_size - tail_to_skip);
 904         if (ret < 0) {
 905                 mlog_errno(ret);
 906                 goto out_unlock;
 907         }
 908
 909 out_update_size:
 910         if (!tail_to_skip) {
 911                 /* We're being called from ocfs2_setattr() which wants
 912                  * us to update i_size */
 913                 ret = ocfs2_simple_size_update(inode, di_bh, new_i_size);
 914                 if (ret < 0)
 915                         mlog_errno(ret);
 916         }
 917
 918 out_unlock:
 919         if (!ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb)))
 920                 ocfs2_data_unlock(inode, 1);
 921
 922 out:
 923         return ret;
 924 }
 925
 926 int ocfs2_setattr(struct dentry *dentry, struct iattr *attr)
 927 {
 928         int status = 0, size_change;
 929         struct inode *inode = dentry->d_inode;
 930         struct super_block *sb = inode->i_sb;
 931         struct ocfs2_super *osb = OCFS2_SB(sb);
 932         struct buffer_head *bh = NULL;
 933         handle_t *handle = NULL;
 934
 935         mlog_entry("(0x%p, '%.*s')\n", dentry,
 936                    dentry->d_name.len, dentry->d_name.name);
 937
 938         if (attr->ia_valid & ATTR_MODE)
 939                 mlog(0, "mode change: %d\n", attr->ia_mode);
 940         if (attr->ia_valid & ATTR_UID)
 941                 mlog(0, "uid change: %d\n", attr->ia_uid);
 942         if (attr->ia_valid & ATTR_GID)
 943                 mlog(0, "gid change: %d\n", attr->ia_gid);
 944         if (attr->ia_valid & ATTR_SIZE)
 945                 mlog(0, "size change...\n");
 946         if (attr->ia_valid & (ATTR_ATIME | ATTR_MTIME | ATTR_CTIME))
 947                 mlog(0, "time change...\n");
 948
 949 #define OCFS2_VALID_ATTRS (ATTR_ATIME | ATTR_MTIME | ATTR_CTIME | ATTR_SIZE \
 950                            | ATTR_GID | ATTR_UID | ATTR_MODE)
 951         if (!(attr->ia_valid & OCFS2_VALID_ATTRS)) {
 952                 mlog(0, "can't handle attrs: 0x%x\n", attr->ia_valid);
 953                 return 0;
 954         }
 955
 956         status = inode_change_ok(inode, attr);
 957         if (status)
 958                 return status;
 959
 960         size_change = S_ISREG(inode->i_mode) && attr->ia_valid & ATTR_SIZE;
 961         if (size_change) {
 962                 status = ocfs2_rw_lock(inode, 1);
 963                 if (status < 0) {
 964                         mlog_errno(status);
 965                         goto bail;
 966                 }
 967         }
 968
 969         status = ocfs2_meta_lock(inode, &bh, 1);
 970         if (status < 0) {
 971                 if (status != -ENOENT)
 972                         mlog_errno(status);
 973                 goto bail_unlock_rw;
 974         }
 975
 976         if (size_change && attr->ia_size != i_size_read(inode)) {
 977                 if (i_size_read(inode) > attr->ia_size)
 978                         status = ocfs2_truncate_file(inode, bh, attr->ia_size);
 979                 else
 980                         status = ocfs2_extend_file(inode, bh, attr->ia_size, 0);
 981                 if (status < 0) {
 982                         if (status != -ENOSPC)
 983                                 mlog_errno(status);
 984                         status = -ENOSPC;
 985                         goto bail_unlock;
 986                 }
 987         }
 988
 989         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
 990         if (IS_ERR(handle)) {
 991                 status = PTR_ERR(handle);
 992                 mlog_errno(status);
 993                 goto bail_unlock;
 994         }
 995
 996         status = inode_setattr(inode, attr);
 997         if (status < 0) {
 998                 mlog_errno(status);
 999                 goto bail_commit;
1000         }
1001
1002         status = ocfs2_mark_inode_dirty(handle, inode, bh);
1003         if (status < 0)
1004                 mlog_errno(status);
1005
1006 bail_commit:
1007         ocfs2_commit_trans(osb, handle);
1008 bail_unlock:
1009         ocfs2_meta_unlock(inode, 1);
1010 bail_unlock_rw:
1011         if (size_change)
1012                 ocfs2_rw_unlock(inode, 1);
1013 bail:
1014         if (bh)
1015                 brelse(bh);
1016
1017         mlog_exit(status);
1018         return status;
1019 }
1020
1021 int ocfs2_getattr(struct vfsmount *mnt,
1022                   struct dentry *dentry,
1023                   struct kstat *stat)
1024 {
1025         struct inode *inode = dentry->d_inode;
1026         struct super_block *sb = dentry->d_inode->i_sb;
1027         struct ocfs2_super *osb = sb->s_fs_info;
1028         int err;
1029
1030         mlog_entry_void();
1031
1032         err = ocfs2_inode_revalidate(dentry);
1033         if (err) {
1034                 if (err != -ENOENT)
1035                         mlog_errno(err);
1036                 goto bail;
1037         }
1038
1039         generic_fillattr(inode, stat);
1040
1041         /* We set the blksize from the cluster size for performance */
1042         stat->blksize = osb->s_clustersize;
1043
1044 bail:
1045         mlog_exit(err);
1046
1047         return err;
1048 }
1049
1050 int ocfs2_permission(struct inode *inode, int mask, struct nameidata *nd)
1051 {
1052         int ret;
1053
1054         mlog_entry_void();
1055
1056         ret = ocfs2_meta_lock(inode, NULL, 0);
1057         if (ret) {
1058                 if (ret != -ENOENT)
1059                         mlog_errno(ret);
1060                 goto out;
1061         }
1062
1063         ret = generic_permission(inode, mask, NULL);
1064
1065         ocfs2_meta_unlock(inode, 0);
1066 out:
1067         mlog_exit(ret);
1068         return ret;
1069 }
1070
1071 static int ocfs2_write_remove_suid(struct inode *inode)
1072 {
1073         int ret;
1074         struct buffer_head *bh = NULL;
1075         struct ocfs2_inode_info *oi = OCFS2_I(inode);
1076         handle_t *handle;
1077         struct ocfs2_super *osb = OCFS2_SB(inode->i_sb);
1078         struct ocfs2_dinode *di;
1079
1080         mlog_entry("(Inode %llu, mode 0%o)\n",
1081                    (unsigned long long)oi->ip_blkno, inode->i_mode);
1082
1083         handle = ocfs2_start_trans(osb, OCFS2_INODE_UPDATE_CREDITS);
1084         if (handle == NULL) {
1085                 ret = -ENOMEM;
1086                 mlog_errno(ret);
1087                 goto out;
1088         }
1089
1090         ret = ocfs2_read_block(osb, oi->ip_blkno, &bh, OCFS2_BH_CACHED, inode);
1091         if (ret < 0) {
1092                 mlog_errno(ret);
1093                 goto out_trans;
1094         }
1095
1096         ret = ocfs2_journal_access(handle, inode, bh,
1097                                    OCFS2_JOURNAL_ACCESS_WRITE);
1098         if (ret < 0) {
1099                 mlog_errno(ret);
1100                 goto out_bh;
1101         }
1102
1103         inode->i_mode &= ~S_ISUID;
1104         if ((inode->i_mode & S_ISGID) && (inode->i_mode & S_IXGRP))
1105                 inode->i_mode &= ~S_ISGID;
1106
1107         di = (struct ocfs2_dinode *) bh->b_data;
1108         di->i_mode = cpu_to_le16(inode->i_mode);
1109
1110         ret = ocfs2_journal_dirty(handle, bh);
1111         if (ret < 0)
1112                 mlog_errno(ret);
1113 out_bh:
1114         brelse(bh);
1115 out_trans:
1116         ocfs2_commit_trans(osb, handle);
1117 out:
1118         mlog_exit(ret);
1119         return ret;
1120 }
1121
1122 /*
1123  * Will look for holes and unwritten extents in the range starting at
1124  * pos for count bytes (inclusive).
1125  */
1126 static int ocfs2_check_range_for_holes(struct inode *inode, loff_t pos,
1127                                        size_t count)
1128 {
1129         int ret = 0;
1130         unsigned int extent_flags;
1131         u32 cpos, clusters, extent_len, phys_cpos;
1132         struct super_block *sb = inode->i_sb;
1133
1134         cpos = pos >> OCFS2_SB(sb)->s_clustersize_bits;
1135         clusters = ocfs2_clusters_for_bytes(sb, pos + count) - cpos;
1136
1137         while (clusters) {
1138                 ret = ocfs2_get_clusters(inode, cpos, &phys_cpos, &extent_len,
1139                                          &extent_flags);
1140                 if (ret < 0) {
1141                         mlog_errno(ret);
1142                         goto out;
1143                 }
1144
1145                 if (phys_cpos == 0 || (extent_flags & OCFS2_EXT_UNWRITTEN)) {
1146                         ret = 1;
1147                         break;
1148                 }
1149
1150                 if (extent_len > clusters)
1151                         extent_len = clusters;
1152
1153                 clusters -= extent_len;
1154                 cpos += extent_len;
1155         }
1156 out:
1157         return ret;
1158 }
1159
1160 static int ocfs2_prepare_inode_for_write(struct dentry *dentry,
1161                                          loff_t *ppos,
1162                                          size_t count,
1163                                          int appending,
1164                                          int *direct_io)
1165 {
1166         int ret = 0, meta_level = appending;
1167         struct inode *inode = dentry->d_inode;
1168         u32 clusters;
1169         loff_t newsize, saved_pos;
1170
1171         /*
1172          * We sample i_size under a read level meta lock to see if our write
1173          * is extending the file, if it is we back off and get a write level
1174          * meta lock.
1175          */
1176         for(;;) {
1177                 ret = ocfs2_meta_lock(inode, NULL, meta_level);
1178                 if (ret < 0) {
1179                         meta_level = -1;
1180                         mlog_errno(ret);
1181                         goto out;
1182                 }
1183
1184                 /* Clear suid / sgid if necessary. We do this here
1185                  * instead of later in the write path because
1186                  * remove_suid() calls ->setattr without any hint that
1187                  * we may have already done our cluster locking. Since
1188                  * ocfs2_setattr() *must* take cluster locks to
1189                  * proceeed, this will lead us to recursively lock the
1190                  * inode. There's also the dinode i_size state which
1191                  * can be lost via setattr during extending writes (we
1192                  * set inode->i_size at the end of a write. */
1193                 if (should_remove_suid(dentry)) {
1194                         if (meta_level == 0) {
1195                                 ocfs2_meta_unlock(inode, meta_level);
1196                                 meta_level = 1;
1197                                 continue;
1198                         }
1199
1200                         ret = ocfs2_write_remove_suid(inode);
1201                         if (ret < 0) {
1202                                 mlog_errno(ret);
1203                                 goto out_unlock;
1204                         }
1205                 }
1206
1207                 /* work on a copy of ppos until we're sure that we won't have
1208                  * to recalculate it due to relocking. */
1209                 if (appending) {
1210                         saved_pos = i_size_read(inode);
1211                         mlog(0, "O_APPEND: inode->i_size=%llu\n", saved_pos);
1212                 } else {
1213                         saved_pos = *ppos;
1214                 }
1215
1216                 if (ocfs2_sparse_alloc(OCFS2_SB(inode->i_sb))) {
1217                         loff_t end = saved_pos + count;
1218
1219                         /*
1220                          * Skip the O_DIRECT checks if we don't need
1221                          * them.
1222                          */
1223                         if (!direct_io || !(*direct_io))
1224                                 break;
1225
1226                         /*
1227                          * Allowing concurrent direct writes means
1228                          * i_size changes wouldn't be synchronized, so
1229                          * one node could wind up truncating another
1230                          * nodes writes.
1231                          */
1232                         if (end > i_size_read(inode)) {
1233                                 *direct_io = 0;
1234                                 break;
1235                         }
1236
1237                         /*
1238                          * We don't fill holes during direct io, so
1239                          * check for them here. If any are found, the
1240                          * caller will have to retake some cluster
1241                          * locks and initiate the io as buffered.
1242                          */
1243                         ret = ocfs2_check_range_for_holes(inode, saved_pos,
1244                                                           count);
1245                         if (ret == 1) {
1246                                 *direct_io = 0;
1247                                 ret = 0;
1248                         } else if (ret < 0)
1249                                 mlog_errno(ret);
1250                         break;
1251                 }
1252
1253                 /*
1254                  * The rest of this loop is concerned with legacy file
1255                  * systems which don't support sparse files.
1256                  */
1257
1258                 newsize = count + saved_pos;
1259
1260                 mlog(0, "pos=%lld newsize=%lld cursize=%lld\n",
1261                      (long long) saved_pos, (long long) newsize,
1262                      (long long) i_size_read(inode));
1263
1264                 /* No need for a higher level metadata lock if we're
1265                  * never going past i_size. */
1266                 if (newsize <= i_size_read(inode))
1267                         break;
1268
1269                 if (meta_level == 0) {
1270                         ocfs2_meta_unlock(inode, meta_level);
1271                         meta_level = 1;
1272                         continue;
1273                 }
1274
1275                 spin_lock(&OCFS2_I(inode)->ip_lock);
1276                 clusters = ocfs2_clusters_for_bytes(inode->i_sb, newsize) -
1277                         OCFS2_I(inode)->ip_clusters;
1278                 spin_unlock(&OCFS2_I(inode)->ip_lock);
1279
1280                 mlog(0, "Writing at EOF, may need more allocation: "
1281                      "i_size = %lld, newsize = %lld, need %u clusters\n",
1282                      (long long) i_size_read(inode), (long long) newsize,
1283                      clusters);
1284
1285                 /* We only want to continue the rest of this loop if
1286                  * our extend will actually require more
1287                  * allocation. */
1288                 if (!clusters)
1289                         break;
1290
1291                 ret = ocfs2_extend_file(inode, NULL, newsize, count);
1292                 if (ret < 0) {
1293                         if (ret != -ENOSPC)
1294                                 mlog_errno(ret);
1295                         goto out_unlock;
1296                 }
1297                 break;
1298         }
1299
1300         if (appending)
1301                 *ppos = saved_pos;
1302
1303 out_unlock:
1304         ocfs2_meta_unlock(inode, meta_level);
1305
1306 out:
1307         return ret;
1308 }
1309
1310 static inline void
1311 ocfs2_set_next_iovec(const struct iovec **iovp, size_t *basep, size_t bytes)
1312 {
1313         const struct iovec *iov = *iovp;
1314         size_t base = *basep;
1315
1316         do {
1317                 int copy = min(bytes, iov->iov_len - base);
1318
1319                 bytes -= copy;
1320                 base += copy;
1321                 if (iov->iov_len == base) {
1322                         iov++;
1323                         base = 0;
1324                 }
1325         } while (bytes);
1326         *iovp = iov;
1327         *basep = base;
1328 }
1329
1330 static struct page * ocfs2_get_write_source(struct ocfs2_buffered_write_priv *bp,
1331                                             const struct iovec *cur_iov,
1332                                             size_t iov_offset)
1333 {
1334         int ret;
1335         char *buf;
1336         struct page *src_page = NULL;
1337
1338         buf = cur_iov->iov_base + iov_offset;
1339
1340         if (!segment_eq(get_fs(), KERNEL_DS)) {
1341                 /*
1342                  * Pull in the user page. We want to do this outside
1343                  * of the meta data locks in order to preserve locking
1344                  * order in case of page fault.
1345                  */
1346                 ret = get_user_pages(current, current->mm,
1347                                      (unsigned long)buf & PAGE_CACHE_MASK, 1,
1348                                      0, 0, &src_page, NULL);
1349                 if (ret == 1)
1350                         bp->b_src_buf = kmap(src_page);
1351                 else
1352                         src_page = ERR_PTR(-EFAULT);
1353         } else {
1354                 bp->b_src_buf = buf;
1355         }
1356
1357         return src_page;
1358 }
1359
1360 static void ocfs2_put_write_source(struct ocfs2_buffered_write_priv *bp,
1361                                    struct page *page)
1362 {
1363         if (page) {
1364                 kunmap(page);
1365                 page_cache_release(page);
1366         }
1367 }
1368
1369 static ssize_t ocfs2_file_buffered_write(struct file *file, loff_t *ppos,
1370                                          const struct iovec *iov,
1371                                          unsigned long nr_segs,
1372                                          size_t count,
1373                                          ssize_t o_direct_written)
1374 {
1375         int ret = 0;
1376         ssize_t copied, total = 0;
1377         size_t iov_offset = 0;
1378         const struct iovec *cur_iov = iov;
1379         struct ocfs2_buffered_write_priv bp;
1380         struct page *page;
1381
1382         /*
1383          * handle partial DIO write.  Adjust cur_iov if needed.
1384          */
1385         ocfs2_set_next_iovec(&cur_iov, &iov_offset, o_direct_written);
1386
1387         do {
1388                 bp.b_cur_off = iov_offset;
1389                 bp.b_cur_iov = cur_iov;
1390
1391                 page = ocfs2_get_write_source(&bp, cur_iov, iov_offset);
1392                 if (IS_ERR(page)) {
1393                         ret = PTR_ERR(page);
1394                         goto out;
1395                 }
1396
1397                 copied = ocfs2_buffered_write_cluster(file, *ppos, count,
1398                                                       ocfs2_map_and_write_user_data,
1399                                                       &bp);
1400
1401                 ocfs2_put_write_source(&bp, page);
1402
1403                 if (copied < 0) {
1404                         mlog_errno(copied);
1405                         ret = copied;
1406                         goto out;
1407                 }
1408
1409                 total += copied;
1410                 *ppos = *ppos + copied;
1411                 count -= copied;
1412
1413                 ocfs2_set_next_iovec(&cur_iov, &iov_offset, copied);
1414         } while(count);
1415
1416 out:
1417         return total ? total : ret;
1418 }
1419
1420 static int ocfs2_check_iovec(const struct iovec *iov, size_t *counted,
1421                              unsigned long *nr_segs)
1422 {
1423         size_t ocount;          /* original count */
1424         unsigned long seg;
1425
1426         ocount = 0;
1427         for (seg = 0; seg < *nr_segs; seg++) {
1428                 const struct iovec *iv = &iov[seg];
1429
1430                 /*
1431                  * If any segment has a negative length, or the cumulative
1432                  * length ever wraps negative then return -EINVAL.
1433                  */
1434                 ocount += iv->iov_len;
1435                 if (unlikely((ssize_t)(ocount|iv->iov_len) < 0))
1436                         return -EINVAL;
1437                 if (access_ok(VERIFY_READ, iv->iov_base, iv->iov_len))
1438                         continue;
1439                 if (seg == 0)
1440                         return -EFAULT;
1441                 *nr_segs = seg;
1442                 ocount -= iv->iov_len;  /* This segment is no good */
1443                 break;
1444         }
1445
1446         *counted = ocount;
1447         return 0;
1448 }
1449
1450 static ssize_t ocfs2_file_aio_write(struct kiocb *iocb,
1451                                     const struct iovec *iov,
1452                                     unsigned long nr_segs,
1453                                     loff_t pos)
1454 {
1455         int ret, direct_io, appending, rw_level, have_alloc_sem  = 0;
1456         int can_do_direct, sync = 0;
1457         ssize_t written = 0;
1458         size_t ocount;          /* original count */
1459         size_t count;           /* after file limit checks */
1460         loff_t *ppos = &iocb->ki_pos;
1461         struct file *file = iocb->ki_filp;
1462         struct inode *inode = file->f_path.dentry->d_inode;
1463
1464         mlog_entry("(0x%p, %u, '%.*s')\n", file,
1465                    (unsigned int)nr_segs,
1466                    file->f_path.dentry->d_name.len,
1467                    file->f_path.dentry->d_name.name);
1468
1469         if (iocb->ki_left == 0)
1470                 return 0;
1471
1472         ret = ocfs2_check_iovec(iov, &ocount, &nr_segs);
1473         if (ret)
1474                 return ret;
1475
1476         count = ocount;
1477
1478         vfs_check_frozen(inode->i_sb, SB_FREEZE_WRITE);
1479
1480         appending = file->f_flags & O_APPEND ? 1 : 0;
1481         direct_io = file->f_flags & O_DIRECT ? 1 : 0;
1482
1483         mutex_lock(&inode->i_mutex);
1484
1485 relock:
1486         /* to match setattr's i_mutex -> i_alloc_sem -> rw_lock ordering */
1487         if (direct_io) {
1488                 down_read(&inode->i_alloc_sem);
1489                 have_alloc_sem = 1;
1490         }
1491
1492         /* concurrent O_DIRECT writes are allowed */
1493         rw_level = !direct_io;
1494         ret = ocfs2_rw_lock(inode, rw_level);
1495         if (ret < 0) {
1496                 mlog_errno(ret);
1497                 goto out_sems;
1498         }
1499
1500         can_do_direct = direct_io;
1501         ret = ocfs2_prepare_inode_for_write(file->f_path.dentry, ppos,
1502                                             iocb->ki_left, appending,
1503                                             &can_do_direct);
1504         if (ret < 0) {
1505                 mlog_errno(ret);
1506                 goto out;
1507         }
1508
1509         /*
1510          * We can't complete the direct I/O as requested, fall back to
1511          * buffered I/O.
1512          */
1513         if (direct_io && !can_do_direct) {
1514                 ocfs2_rw_unlock(inode, rw_level);
1515                 up_read(&inode->i_alloc_sem);
1516
1517                 have_alloc_sem = 0;
1518                 rw_level = -1;
1519
1520                 direct_io = 0;
1521                 sync = 1;
1522                 goto relock;
1523         }
1524
1525         if (!sync && ((file->f_flags & O_SYNC) || IS_SYNC(inode)))
1526                 sync = 1;
1527
1528         /*
1529          * XXX: Is it ok to execute these checks a second time?
1530          */
1531         ret = generic_write_checks(file, ppos, &count, S_ISBLK(inode->i_mode));
1532         if (ret)
1533                 goto out;
1534
1535         /*
1536          * Set pos so that sync_page_range_nolock() below understands
1537          * where to start from. We might've moved it around via the
1538          * calls above. The range we want to actually sync starts from
1539          * *ppos here.
1540          *
1541          */
1542         pos = *ppos;
1543
1544         /* communicate with ocfs2_dio_end_io */
1545         ocfs2_iocb_set_rw_locked(iocb);
1546
1547         if (direct_io) {
1548                 written = generic_file_direct_write(iocb, iov, &nr_segs, *ppos,
1549                                                     ppos, count, ocount);
1550                 if (written < 0) {
1551                         ret = written;
1552                         goto out_dio;
1553                 }
1554         } else {
1555                 written = ocfs2_file_buffered_write(file, ppos, iov, nr_segs,
1556                                                     count, written);
1557                 if (written < 0) {
1558                         ret = written;
1559                         if (ret != -EFAULT || ret != -ENOSPC)
1560                                 mlog_errno(ret);
1561                         goto out;
1562                 }
1563         }
1564
1565 out_dio:
1566         /* buffered aio wouldn't have proper lock coverage today */
1567         BUG_ON(ret == -EIOCBQUEUED && !(file->f_flags & O_DIRECT));
1568
1569         /*
1570          * deep in g_f_a_w_n()->ocfs2_direct_IO we pass in a ocfs2_dio_end_io
1571          * function pointer which is called when o_direct io completes so that
1572          * it can unlock our rw lock.  (it's the clustered equivalent of
1573          * i_alloc_sem; protects truncate from racing with pending ios).
1574          * Unfortunately there are error cases which call end_io and others
1575          * that don't.  so we don't have to unlock the rw_lock if either an
1576          * async dio is going to do it in the future or an end_io after an
1577          * error has already done it.
1578          */
1579         if (ret == -EIOCBQUEUED || !ocfs2_iocb_is_rw_locked(iocb)) {
1580                 rw_level = -1;
1581                 have_alloc_sem = 0;
1582         }
1583
1584 out:
1585         if (rw_level != -1)
1586                 ocfs2_rw_unlock(inode, rw_level);
1587
1588 out_sems:
1589         if (have_alloc_sem)
1590                 up_read(&inode->i_alloc_sem);
1591
1592         if (written > 0 && sync) {
1593                 ssize_t err;
1594
1595                 err = sync_page_range_nolock(inode, file->f_mapping, pos, count);
1596                 if (err < 0)
1597                         written = err;
1598         }
1599
1600         mutex_unlock(&inode->i_mutex);
1601
1602         mlog_exit(ret);
1603         return written ? written : ret;
1604 }
1605
1606 static ssize_t ocfs2_file_splice_write(struct pipe_inode_info *pipe,
1607                                        struct file *out,
1608                                        loff_t *ppos,
1609                                        size_t len,
1610                                        unsigned int flags)
1611 {
1612         int ret;
1613         struct inode *inode = out->f_path.dentry->d_inode;
1614
1615         mlog_entry("(0x%p, 0x%p, %u, '%.*s')\n", out, pipe,
1616                    (unsigned int)len,
1617                    out->f_path.dentry->d_name.len,
1618                    out->f_path.dentry->d_name.name);
1619
1620         inode_double_lock(inode, pipe->inode);
1621
1622         ret = ocfs2_rw_lock(inode, 1);
1623         if (ret < 0) {
1624                 mlog_errno(ret);
1625                 goto out;
1626         }
1627
1628         ret = ocfs2_prepare_inode_for_write(out->f_path.dentry, ppos, len, 0,
1629                                             NULL);
1630         if (ret < 0) {
1631                 mlog_errno(ret);
1632                 goto out_unlock;
1633         }
1634
1635         /* ok, we're done with i_size and alloc work */
1636         ret = generic_file_splice_write_nolock(pipe, out, ppos, len, flags);
1637
1638 out_unlock:
1639         ocfs2_rw_unlock(inode, 1);
1640 out:
1641         inode_double_unlock(inode, pipe->inode);
1642
1643         mlog_exit(ret);
1644         return ret;
1645 }
1646
1647 static ssize_t ocfs2_file_splice_read(struct file *in,
1648                                       loff_t *ppos,
1649                                       struct pipe_inode_info *pipe,
1650                                       size_t len,
1651                                       unsigned int flags)
1652 {
1653         int ret = 0;
1654         struct inode *inode = in->f_path.dentry->d_inode;
1655
1656         mlog_entry("(0x%p, 0x%p, %u, '%.*s')\n", in, pipe,
1657                    (unsigned int)len,
1658                    in->f_path.dentry->d_name.len,
1659                    in->f_path.dentry->d_name.name);
1660
1661         /*
1662          * See the comment in ocfs2_file_aio_read()
1663          */
1664         ret = ocfs2_meta_lock(inode, NULL, 0);
1665         if (ret < 0) {
1666                 mlog_errno(ret);
1667                 goto bail;
1668         }
1669         ocfs2_meta_unlock(inode, 0);
1670
1671         ret = generic_file_splice_read(in, ppos, pipe, len, flags);
1672
1673 bail:
1674         mlog_exit(ret);
1675         return ret;
1676 }
1677
1678 static ssize_t ocfs2_file_aio_read(struct kiocb *iocb,
1679                                    const struct iovec *iov,
1680                                    unsigned long nr_segs,
1681                                    loff_t pos)
1682 {
1683         int ret = 0, rw_level = -1, have_alloc_sem = 0, lock_level = 0;
1684         struct file *filp = iocb->ki_filp;
1685         struct inode *inode = filp->f_path.dentry->d_inode;
1686
1687         mlog_entry("(0x%p, %u, '%.*s')\n", filp,
1688                    (unsigned int)nr_segs,
1689                    filp->f_path.dentry->d_name.len,
1690                    filp->f_path.dentry->d_name.name);
1691
1692         if (!inode) {
1693                 ret = -EINVAL;
1694                 mlog_errno(ret);
1695                 goto bail;
1696         }
1697
1698         /*
1699          * buffered reads protect themselves in ->readpage().  O_DIRECT reads
1700          * need locks to protect pending reads from racing with truncate.
1701          */
1702         if (filp->f_flags & O_DIRECT) {
1703                 down_read(&inode->i_alloc_sem);
1704                 have_alloc_sem = 1;
1705
1706                 ret = ocfs2_rw_lock(inode, 0);
1707                 if (ret < 0) {
1708                         mlog_errno(ret);
1709                         goto bail;
1710                 }
1711                 rw_level = 0;
1712                 /* communicate with ocfs2_dio_end_io */
1713                 ocfs2_iocb_set_rw_locked(iocb);
1714         }
1715
1716         /*
1717          * We're fine letting folks race truncates and extending
1718          * writes with read across the cluster, just like they can
1719          * locally. Hence no rw_lock during read.
1720          *
1721          * Take and drop the meta data lock to update inode fields
1722          * like i_size. This allows the checks down below
1723          * generic_file_aio_read() a chance of actually working.
1724          */
1725         ret = ocfs2_meta_lock_atime(inode, filp->f_vfsmnt, &lock_level);
1726         if (ret < 0) {
1727                 mlog_errno(ret);
1728                 goto bail;
1729         }
1730         ocfs2_meta_unlock(inode, lock_level);
1731
1732         ret = generic_file_aio_read(iocb, iov, nr_segs, iocb->ki_pos);
1733         if (ret == -EINVAL)
1734                 mlog(ML_ERROR, "generic_file_aio_read returned -EINVAL\n");
1735
1736         /* buffered aio wouldn't have proper lock coverage today */
1737         BUG_ON(ret == -EIOCBQUEUED && !(filp->f_flags & O_DIRECT));
1738
1739         /* see ocfs2_file_aio_write */
1740         if (ret == -EIOCBQUEUED || !ocfs2_iocb_is_rw_locked(iocb)) {
1741                 rw_level = -1;
1742                 have_alloc_sem = 0;
1743         }
1744
1745 bail:
1746         if (have_alloc_sem)
1747                 up_read(&inode->i_alloc_sem);
1748         if (rw_level != -1)
1749                 ocfs2_rw_unlock(inode, rw_level);
1750         mlog_exit(ret);
1751
1752         return ret;
1753 }
1754
1755 const struct inode_operations ocfs2_file_iops = {
1756         .setattr        = ocfs2_setattr,
1757         .getattr        = ocfs2_getattr,
1758         .permission     = ocfs2_permission,
1759 };
1760
1761 const struct inode_operations ocfs2_special_file_iops = {
1762         .setattr        = ocfs2_setattr,
1763         .getattr        = ocfs2_getattr,
1764         .permission     = ocfs2_permission,
1765 };
1766
1767 const struct file_operations ocfs2_fops = {
1768         .read           = do_sync_read,
1769         .write          = do_sync_write,
1770         .sendfile       = generic_file_sendfile,
1771         .mmap           = ocfs2_mmap,
1772         .fsync          = ocfs2_sync_file,
1773         .release        = ocfs2_file_release,
1774         .open           = ocfs2_file_open,
1775         .aio_read       = ocfs2_file_aio_read,
1776         .aio_write      = ocfs2_file_aio_write,
1777         .ioctl          = ocfs2_ioctl,
1778         .splice_read    = ocfs2_file_splice_read,
1779         .splice_write   = ocfs2_file_splice_write,
1780 };
1781
1782 const struct file_operations ocfs2_dops = {
1783         .read           = generic_read_dir,
1784         .readdir        = ocfs2_readdir,
1785         .fsync          = ocfs2_sync_file,
1786         .ioctl          = ocfs2_ioctl,
1787 };