drivers/staging/lustre/lustre/llite/file.c

   1 // SPDX-License-Identifier: GPL-2.0
   2 /*
   3  * GPL HEADER START
   4  *
   5  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   6  *
   7  * This program is free software; you can redistribute it and/or modify
   8  * it under the terms of the GNU General Public License version 2 only,
   9  * as published by the Free Software Foundation.
  10  *
  11  * This program is distributed in the hope that it will be useful, but
  12  * WITHOUT ANY WARRANTY; without even the implied warranty of
  13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  14  * General Public License version 2 for more details (a copy is included
  15  * in the LICENSE file that accompanied this code).
  16  *
  17  * You should have received a copy of the GNU General Public License
  18  * version 2 along with this program; If not, see
  19  * http://www.gnu.org/licenses/gpl-2.0.html
  20  *
  21  * GPL HEADER END
  22  */
  23 /*
  24  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
  25  * Use is subject to license terms.
  26  *
  27  * Copyright (c) 2011, 2015, Intel Corporation.
  28  */
  29 /*
  30  * This file is part of Lustre, http://www.lustre.org/
  31  * Lustre is a trademark of Sun Microsystems, Inc.
  32  *
  33  * lustre/llite/file.c
  34  *
  35  * Author: Peter Braam <braam@clusterfs.com>
  36  * Author: Phil Schwan <phil@clusterfs.com>
  37  * Author: Andreas Dilger <adilger@clusterfs.com>
  38  */
  39
  40 #define DEBUG_SUBSYSTEM S_LLITE
  41 #include <lustre_dlm.h>
  42 #include <linux/pagemap.h>
  43 #include <linux/file.h>
  44 #include <linux/sched.h>
  45 #include <linux/mount.h>
  46 #include <uapi/linux/lustre/lustre_fiemap.h>
  47 #include <uapi/linux/lustre/lustre_ioctl.h>
  48 #include <lustre_swab.h>
  49
  50 #include <cl_object.h>
  51 #include "llite_internal.h"
  52
  53 static int
  54 ll_put_grouplock(struct inode *inode, struct file *file, unsigned long arg);
  55
  56 static int ll_lease_close(struct obd_client_handle *och, struct inode *inode,
  57                           bool *lease_broken);
  58
  59 static enum llioc_iter
  60 ll_iocontrol_call(struct inode *inode, struct file *file,
  61                   unsigned int cmd, unsigned long arg, int *rcp);
  62
  63 static struct ll_file_data *ll_file_data_get(void)
  64 {
  65         struct ll_file_data *fd;
  66
  67         fd = kmem_cache_zalloc(ll_file_data_slab, GFP_NOFS);
  68         if (!fd)
  69                 return NULL;
  70         fd->fd_write_failed = false;
  71         return fd;
  72 }
  73
  74 static void ll_file_data_put(struct ll_file_data *fd)
  75 {
  76         if (fd)
  77                 kmem_cache_free(ll_file_data_slab, fd);
  78 }
  79
  80 /**
  81  * Packs all the attributes into @op_data for the CLOSE rpc.
  82  */
  83 static void ll_prepare_close(struct inode *inode, struct md_op_data *op_data,
  84                              struct obd_client_handle *och)
  85 {
  86         struct ll_inode_info *lli = ll_i2info(inode);
  87
  88         ll_prep_md_op_data(op_data, inode, NULL, NULL,
  89                            0, 0, LUSTRE_OPC_ANY, NULL);
  90
  91         op_data->op_attr.ia_mode = inode->i_mode;
  92         op_data->op_attr.ia_atime = inode->i_atime;
  93         op_data->op_attr.ia_mtime = inode->i_mtime;
  94         op_data->op_attr.ia_ctime = inode->i_ctime;
  95         op_data->op_attr.ia_size = i_size_read(inode);
  96         op_data->op_attr.ia_valid |= ATTR_MODE | ATTR_ATIME | ATTR_ATIME_SET |
  97                                      ATTR_MTIME | ATTR_MTIME_SET |
  98                                      ATTR_CTIME | ATTR_CTIME_SET;
  99         op_data->op_attr_blocks = inode->i_blocks;
 100         op_data->op_attr_flags = ll_inode_to_ext_flags(inode->i_flags);
 101         op_data->op_handle = och->och_fh;
 102
 103         /*
 104          * For HSM: if inode data has been modified, pack it so that
 105          * MDT can set data dirty flag in the archive.
 106          */
 107         if (och->och_flags & FMODE_WRITE &&
 108             test_and_clear_bit(LLIF_DATA_MODIFIED, &lli->lli_flags))
 109                 op_data->op_bias |= MDS_DATA_MODIFIED;
 110 }
 111
 112 /**
 113  * Perform a close, possibly with a bias.
 114  * The meaning of "data" depends on the value of "bias".
 115  *
 116  * If \a bias is MDS_HSM_RELEASE then \a data is a pointer to the data version.
 117  * If \a bias is MDS_CLOSE_LAYOUT_SWAP then \a data is a pointer to the inode to
 118  * swap layouts with.
 119  */
 120 static int ll_close_inode_openhandle(struct inode *inode,
 121                                      struct obd_client_handle *och,
 122                                      enum mds_op_bias bias,
 123                                      void *data)
 124 {
 125         const struct ll_inode_info *lli = ll_i2info(inode);
 126         struct obd_export *md_exp = ll_i2mdexp(inode);
 127         struct md_op_data *op_data;
 128         struct ptlrpc_request *req = NULL;
 129         int rc;
 130
 131         if (!class_exp2obd(md_exp)) {
 132                 CERROR("%s: invalid MDC connection handle closing " DFID "\n",
 133                        ll_get_fsname(inode->i_sb, NULL, 0),
 134                        PFID(&lli->lli_fid));
 135                 rc = 0;
 136                 goto out;
 137         }
 138
 139         op_data = kzalloc(sizeof(*op_data), GFP_NOFS);
 140         /*
 141          * We leak openhandle and request here on error, but not much to be
 142          * done in OOM case since app won't retry close on error either.
 143          */
 144         if (!op_data) {
 145                 rc = -ENOMEM;
 146                 goto out;
 147         }
 148
 149         ll_prepare_close(inode, op_data, och);
 150         switch (bias) {
 151         case MDS_CLOSE_LAYOUT_SWAP:
 152                 LASSERT(data);
 153                 op_data->op_bias |= MDS_CLOSE_LAYOUT_SWAP;
 154                 op_data->op_data_version = 0;
 155                 op_data->op_lease_handle = och->och_lease_handle;
 156                 op_data->op_fid2 = *ll_inode2fid(data);
 157                 break;
 158
 159         case MDS_HSM_RELEASE:
 160                 LASSERT(data);
 161                 op_data->op_bias |= MDS_HSM_RELEASE;
 162                 op_data->op_data_version = *(__u64 *)data;
 163                 op_data->op_lease_handle = och->och_lease_handle;
 164                 op_data->op_attr.ia_valid |= ATTR_SIZE | ATTR_BLOCKS;
 165                 break;
 166
 167         default:
 168                 LASSERT(!data);
 169                 break;
 170         }
 171
 172         rc = md_close(md_exp, op_data, och->och_mod, &req);
 173         if (rc && rc != -EINTR) {
 174                 CERROR("%s: inode " DFID " mdc close failed: rc = %d\n",
 175                        md_exp->exp_obd->obd_name, PFID(&lli->lli_fid), rc);
 176         }
 177
 178         if (op_data->op_bias & (MDS_HSM_RELEASE | MDS_CLOSE_LAYOUT_SWAP) &&
 179             !rc) {
 180                 struct mdt_body *body;
 181
 182                 body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
 183                 if (!(body->mbo_valid & OBD_MD_CLOSE_INTENT_EXECED))
 184                         rc = -EBUSY;
 185         }
 186
 187         ll_finish_md_op_data(op_data);
 188
 189 out:
 190         md_clear_open_replay_data(md_exp, och);
 191         och->och_fh.cookie = DEAD_HANDLE_MAGIC;
 192         kfree(och);
 193
 194         ptlrpc_req_finished(req);
 195         return rc;
 196 }
 197
 198 int ll_md_real_close(struct inode *inode, fmode_t fmode)
 199 {
 200         struct ll_inode_info *lli = ll_i2info(inode);
 201         struct obd_client_handle **och_p;
 202         struct obd_client_handle *och;
 203         __u64 *och_usecount;
 204         int rc = 0;
 205
 206         if (fmode & FMODE_WRITE) {
 207                 och_p = &lli->lli_mds_write_och;
 208                 och_usecount = &lli->lli_open_fd_write_count;
 209         } else if (fmode & FMODE_EXEC) {
 210                 och_p = &lli->lli_mds_exec_och;
 211                 och_usecount = &lli->lli_open_fd_exec_count;
 212         } else {
 213                 LASSERT(fmode & FMODE_READ);
 214                 och_p = &lli->lli_mds_read_och;
 215                 och_usecount = &lli->lli_open_fd_read_count;
 216         }
 217
 218         mutex_lock(&lli->lli_och_mutex);
 219         if (*och_usecount > 0) {
 220                 /* There are still users of this handle, so skip
 221                  * freeing it.
 222                  */
 223                 mutex_unlock(&lli->lli_och_mutex);
 224                 return 0;
 225         }
 226
 227         och = *och_p;
 228         *och_p = NULL;
 229         mutex_unlock(&lli->lli_och_mutex);
 230
 231         if (och) {
 232                 /* There might be a race and this handle may already
 233                  * be closed.
 234                  */
 235                 rc = ll_close_inode_openhandle(inode, och, 0, NULL);
 236         }
 237
 238         return rc;
 239 }
 240
 241 static int ll_md_close(struct inode *inode, struct file *file)
 242 {
 243         struct ll_file_data *fd = LUSTRE_FPRIVATE(file);
 244         struct ll_inode_info *lli = ll_i2info(inode);
 245         int lockmode;
 246         __u64 flags = LDLM_FL_BLOCK_GRANTED | LDLM_FL_TEST_LOCK;
 247         struct lustre_handle lockh;
 248         union ldlm_policy_data policy = {
 249                 .l_inodebits = { MDS_INODELOCK_OPEN }
 250         };
 251         int rc = 0;
 252
 253         /* clear group lock, if present */
 254         if (unlikely(fd->fd_flags & LL_FILE_GROUP_LOCKED))
 255                 ll_put_grouplock(inode, file, fd->fd_grouplock.lg_gid);
 256
 257         if (fd->fd_lease_och) {
 258                 bool lease_broken;
 259
 260                 /* Usually the lease is not released when the
 261                  * application crashed, we need to release here.
 262                  */
 263                 rc = ll_lease_close(fd->fd_lease_och, inode, &lease_broken);
 264                 CDEBUG(rc ? D_ERROR : D_INODE,
 265                        "Clean up lease " DFID " %d/%d\n",
 266                        PFID(&lli->lli_fid), rc, lease_broken);
 267
 268                 fd->fd_lease_och = NULL;
 269         }
 270
 271         if (fd->fd_och) {
 272                 rc = ll_close_inode_openhandle(inode, fd->fd_och, 0, NULL);
 273                 fd->fd_och = NULL;
 274                 goto out;
 275         }
 276
 277         /* Let's see if we have good enough OPEN lock on the file and if
 278          * we can skip talking to MDS
 279          */
 280
 281         mutex_lock(&lli->lli_och_mutex);
 282         if (fd->fd_omode & FMODE_WRITE) {
 283                 lockmode = LCK_CW;
 284                 LASSERT(lli->lli_open_fd_write_count);
 285                 lli->lli_open_fd_write_count--;
 286         } else if (fd->fd_omode & FMODE_EXEC) {
 287                 lockmode = LCK_PR;
 288                 LASSERT(lli->lli_open_fd_exec_count);
 289                 lli->lli_open_fd_exec_count--;
 290         } else {
 291                 lockmode = LCK_CR;
 292                 LASSERT(lli->lli_open_fd_read_count);
 293                 lli->lli_open_fd_read_count--;
 294         }
 295         mutex_unlock(&lli->lli_och_mutex);
 296
 297         if (!md_lock_match(ll_i2mdexp(inode), flags, ll_inode2fid(inode),
 298                            LDLM_IBITS, &policy, lockmode, &lockh))
 299                 rc = ll_md_real_close(inode, fd->fd_omode);
 300
 301 out:
 302         LUSTRE_FPRIVATE(file) = NULL;
 303         ll_file_data_put(fd);
 304
 305         return rc;
 306 }
 307
 308 /* While this returns an error code, fput() the caller does not, so we need
 309  * to make every effort to clean up all of our state here.  Also, applications
 310  * rarely check close errors and even if an error is returned they will not
 311  * re-try the close call.
 312  */
 313 int ll_file_release(struct inode *inode, struct file *file)
 314 {
 315         struct ll_file_data *fd;
 316         struct ll_sb_info *sbi = ll_i2sbi(inode);
 317         struct ll_inode_info *lli = ll_i2info(inode);
 318         int rc;
 319
 320         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p)\n",
 321                PFID(ll_inode2fid(inode)), inode);
 322
 323         if (!is_root_inode(inode))
 324                 ll_stats_ops_tally(sbi, LPROC_LL_RELEASE, 1);
 325         fd = LUSTRE_FPRIVATE(file);
 326         LASSERT(fd);
 327
 328         /* The last ref on @file, maybe not be the owner pid of statahead,
 329          * because parent and child process can share the same file handle.
 330          */
 331         if (S_ISDIR(inode->i_mode) && lli->lli_opendir_key == fd)
 332                 ll_deauthorize_statahead(inode, fd);
 333
 334         if (is_root_inode(inode)) {
 335                 LUSTRE_FPRIVATE(file) = NULL;
 336                 ll_file_data_put(fd);
 337                 return 0;
 338         }
 339
 340         if (!S_ISDIR(inode->i_mode)) {
 341                 if (lli->lli_clob)
 342                         lov_read_and_clear_async_rc(lli->lli_clob);
 343                 lli->lli_async_rc = 0;
 344         }
 345
 346         rc = ll_md_close(inode, file);
 347
 348         if (CFS_FAIL_TIMEOUT_MS(OBD_FAIL_PTLRPC_DUMP_LOG, cfs_fail_val))
 349                 libcfs_debug_dumplog();
 350
 351         return rc;
 352 }
 353
 354 static int ll_intent_file_open(struct dentry *de, void *lmm, int lmmsize,
 355                                struct lookup_intent *itp)
 356 {
 357         struct inode *inode = d_inode(de);
 358         struct ll_sb_info *sbi = ll_i2sbi(inode);
 359         struct dentry *parent = de->d_parent;
 360         const char *name = NULL;
 361         struct md_op_data *op_data;
 362         struct ptlrpc_request *req = NULL;
 363         int len = 0, rc;
 364
 365         LASSERT(parent);
 366         LASSERT(itp->it_flags & MDS_OPEN_BY_FID);
 367
 368         /*
 369          * if server supports open-by-fid, or file name is invalid, don't pack
 370          * name in open request
 371          */
 372         if (!(exp_connect_flags(sbi->ll_md_exp) & OBD_CONNECT_OPEN_BY_FID) &&
 373             lu_name_is_valid_2(de->d_name.name, de->d_name.len)) {
 374                 name = de->d_name.name;
 375                 len = de->d_name.len;
 376         }
 377
 378         op_data  = ll_prep_md_op_data(NULL, d_inode(parent), inode, name, len,
 379                                       O_RDWR, LUSTRE_OPC_ANY, NULL);
 380         if (IS_ERR(op_data))
 381                 return PTR_ERR(op_data);
 382         op_data->op_data = lmm;
 383         op_data->op_data_size = lmmsize;
 384
 385         rc = md_intent_lock(sbi->ll_md_exp, op_data, itp, &req,
 386                             &ll_md_blocking_ast, 0);
 387         ll_finish_md_op_data(op_data);
 388         if (rc == -ESTALE) {
 389                 /* reason for keep own exit path - don`t flood log
 390                  * with messages with -ESTALE errors.
 391                  */
 392                 if (!it_disposition(itp, DISP_OPEN_OPEN) ||
 393                     it_open_error(DISP_OPEN_OPEN, itp))
 394                         goto out;
 395                 ll_release_openhandle(inode, itp);
 396                 goto out;
 397         }
 398
 399         if (it_disposition(itp, DISP_LOOKUP_NEG)) {
 400                 rc = -ENOENT;
 401                 goto out;
 402         }
 403
 404         if (rc != 0 || it_open_error(DISP_OPEN_OPEN, itp)) {
 405                 rc = rc ? rc : it_open_error(DISP_OPEN_OPEN, itp);
 406                 CDEBUG(D_VFSTRACE, "lock enqueue: err: %d\n", rc);
 407                 goto out;
 408         }
 409
 410         rc = ll_prep_inode(&inode, req, NULL, itp);
 411         if (!rc && itp->it_lock_mode)
 412                 ll_set_lock_data(sbi->ll_md_exp, inode, itp, NULL);
 413
 414 out:
 415         ptlrpc_req_finished(req);
 416         ll_intent_drop_lock(itp);
 417
 418         /*
 419          * We did open by fid, but by the time we got to the server,
 420          * the object disappeared. If this is a create, we cannot really
 421          * tell the userspace that the file it was trying to create
 422          * does not exist. Instead let's return -ESTALE, and the VFS will
 423          * retry the create with LOOKUP_REVAL that we are going to catch
 424          * in ll_revalidate_dentry() and use lookup then.
 425          */
 426         if (rc == -ENOENT && itp->it_op & IT_CREAT)
 427                 rc = -ESTALE;
 428
 429         return rc;
 430 }
 431
 432 static int ll_och_fill(struct obd_export *md_exp, struct lookup_intent *it,
 433                        struct obd_client_handle *och)
 434 {
 435         struct mdt_body *body;
 436
 437         body = req_capsule_server_get(&it->it_request->rq_pill, &RMF_MDT_BODY);
 438         och->och_fh = body->mbo_handle;
 439         och->och_fid = body->mbo_fid1;
 440         och->och_lease_handle.cookie = it->it_lock_handle;
 441         och->och_magic = OBD_CLIENT_HANDLE_MAGIC;
 442         och->och_flags = it->it_flags;
 443
 444         return md_set_open_replay_data(md_exp, och, it);
 445 }
 446
 447 static int ll_local_open(struct file *file, struct lookup_intent *it,
 448                          struct ll_file_data *fd, struct obd_client_handle *och)
 449 {
 450         struct inode *inode = file_inode(file);
 451
 452         LASSERT(!LUSTRE_FPRIVATE(file));
 453
 454         LASSERT(fd);
 455
 456         if (och) {
 457                 int rc;
 458
 459                 rc = ll_och_fill(ll_i2sbi(inode)->ll_md_exp, it, och);
 460                 if (rc != 0)
 461                         return rc;
 462         }
 463
 464         LUSTRE_FPRIVATE(file) = fd;
 465         ll_readahead_init(inode, &fd->fd_ras);
 466         fd->fd_omode = it->it_flags & (FMODE_READ | FMODE_WRITE | FMODE_EXEC);
 467
 468         /* ll_cl_context initialize */
 469         rwlock_init(&fd->fd_lock);
 470         INIT_LIST_HEAD(&fd->fd_lccs);
 471
 472         return 0;
 473 }
 474
 475 /* Open a file, and (for the very first open) create objects on the OSTs at
 476  * this time.  If opened with O_LOV_DELAY_CREATE, then we don't do the object
 477  * creation or open until ll_lov_setstripe() ioctl is called.
 478  *
 479  * If we already have the stripe MD locally then we don't request it in
 480  * md_open(), by passing a lmm_size = 0.
 481  *
 482  * It is up to the application to ensure no other processes open this file
 483  * in the O_LOV_DELAY_CREATE case, or the default striping pattern will be
 484  * used.  We might be able to avoid races of that sort by getting lli_open_sem
 485  * before returning in the O_LOV_DELAY_CREATE case and dropping it here
 486  * or in ll_file_release(), but I'm not sure that is desirable/necessary.
 487  */
 488 int ll_file_open(struct inode *inode, struct file *file)
 489 {
 490         struct ll_inode_info *lli = ll_i2info(inode);
 491         struct lookup_intent *it, oit = { .it_op = IT_OPEN,
 492                                           .it_flags = file->f_flags };
 493         struct obd_client_handle **och_p = NULL;
 494         __u64 *och_usecount = NULL;
 495         struct ll_file_data *fd;
 496         int rc = 0;
 497
 498         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p), flags %o\n",
 499                PFID(ll_inode2fid(inode)), inode, file->f_flags);
 500
 501         it = file->private_data; /* XXX: compat macro */
 502         file->private_data = NULL; /* prevent ll_local_open assertion */
 503
 504         fd = ll_file_data_get();
 505         if (!fd) {
 506                 rc = -ENOMEM;
 507                 goto out_openerr;
 508         }
 509
 510         fd->fd_file = file;
 511         if (S_ISDIR(inode->i_mode))
 512                 ll_authorize_statahead(inode, fd);
 513
 514         if (is_root_inode(inode)) {
 515                 LUSTRE_FPRIVATE(file) = fd;
 516                 return 0;
 517         }
 518
 519         if (!it || !it->it_disposition) {
 520                 /* Convert f_flags into access mode. We cannot use file->f_mode,
 521                  * because everything but O_ACCMODE mask was stripped from
 522                  * there
 523                  */
 524                 if ((oit.it_flags + 1) & O_ACCMODE)
 525                         oit.it_flags++;
 526                 if (file->f_flags & O_TRUNC)
 527                         oit.it_flags |= FMODE_WRITE;
 528
 529                 /* kernel only call f_op->open in dentry_open.  filp_open calls
 530                  * dentry_open after call to open_namei that checks permissions.
 531                  * Only nfsd_open call dentry_open directly without checking
 532                  * permissions and because of that this code below is safe.
 533                  */
 534                 if (oit.it_flags & (FMODE_WRITE | FMODE_READ))
 535                         oit.it_flags |= MDS_OPEN_OWNEROVERRIDE;
 536
 537                 /* We do not want O_EXCL here, presumably we opened the file
 538                  * already? XXX - NFS implications?
 539                  */
 540                 oit.it_flags &= ~O_EXCL;
 541
 542                 /* bug20584, if "it_flags" contains O_CREAT, the file will be
 543                  * created if necessary, then "IT_CREAT" should be set to keep
 544                  * consistent with it
 545                  */
 546                 if (oit.it_flags & O_CREAT)
 547                         oit.it_op |= IT_CREAT;
 548
 549                 it = &oit;
 550         }
 551
 552 restart:
 553         /* Let's see if we have file open on MDS already. */
 554         if (it->it_flags & FMODE_WRITE) {
 555                 och_p = &lli->lli_mds_write_och;
 556                 och_usecount = &lli->lli_open_fd_write_count;
 557         } else if (it->it_flags & FMODE_EXEC) {
 558                 och_p = &lli->lli_mds_exec_och;
 559                 och_usecount = &lli->lli_open_fd_exec_count;
 560         } else {
 561                 och_p = &lli->lli_mds_read_och;
 562                 och_usecount = &lli->lli_open_fd_read_count;
 563         }
 564
 565         mutex_lock(&lli->lli_och_mutex);
 566         if (*och_p) { /* Open handle is present */
 567                 if (it_disposition(it, DISP_OPEN_OPEN)) {
 568                         /* Well, there's extra open request that we do not need,
 569                          * let's close it somehow. This will decref request.
 570                          */
 571                         rc = it_open_error(DISP_OPEN_OPEN, it);
 572                         if (rc) {
 573                                 mutex_unlock(&lli->lli_och_mutex);
 574                                 goto out_openerr;
 575                         }
 576
 577                         ll_release_openhandle(inode, it);
 578                 }
 579                 (*och_usecount)++;
 580
 581                 rc = ll_local_open(file, it, fd, NULL);
 582                 if (rc) {
 583                         (*och_usecount)--;
 584                         mutex_unlock(&lli->lli_och_mutex);
 585                         goto out_openerr;
 586                 }
 587         } else {
 588                 LASSERT(*och_usecount == 0);
 589                 if (!it->it_disposition) {
 590                         /* We cannot just request lock handle now, new ELC code
 591                          * means that one of other OPEN locks for this file
 592                          * could be cancelled, and since blocking ast handler
 593                          * would attempt to grab och_mutex as well, that would
 594                          * result in a deadlock
 595                          */
 596                         mutex_unlock(&lli->lli_och_mutex);
 597                         /*
 598                          * Normally called under two situations:
 599                          * 1. NFS export.
 600                          * 2. revalidate with IT_OPEN (revalidate doesn't
 601                          *    execute this intent any more).
 602                          *
 603                          * Always fetch MDS_OPEN_LOCK if this is not setstripe.
 604                          *
 605                          * Always specify MDS_OPEN_BY_FID because we don't want
 606                          * to get file with different fid.
 607                          */
 608                         it->it_flags |= MDS_OPEN_LOCK | MDS_OPEN_BY_FID;
 609                         rc = ll_intent_file_open(file->f_path.dentry,
 610                                                  NULL, 0, it);
 611                         if (rc)
 612                                 goto out_openerr;
 613
 614                         goto restart;
 615                 }
 616                 *och_p = kzalloc(sizeof(struct obd_client_handle), GFP_NOFS);
 617                 if (!*och_p) {
 618                         rc = -ENOMEM;
 619                         goto out_och_free;
 620                 }
 621
 622                 (*och_usecount)++;
 623
 624                 /* md_intent_lock() didn't get a request ref if there was an
 625                  * open error, so don't do cleanup on the request here
 626                  * (bug 3430)
 627                  */
 628                 /* XXX (green): Should not we bail out on any error here, not
 629                  * just open error?
 630                  */
 631                 rc = it_open_error(DISP_OPEN_OPEN, it);
 632                 if (rc)
 633                         goto out_och_free;
 634
 635                 LASSERTF(it_disposition(it, DISP_ENQ_OPEN_REF),
 636                          "inode %p: disposition %x, status %d\n", inode,
 637                          it_disposition(it, ~0), it->it_status);
 638
 639                 rc = ll_local_open(file, it, fd, *och_p);
 640                 if (rc)
 641                         goto out_och_free;
 642         }
 643         mutex_unlock(&lli->lli_och_mutex);
 644         fd = NULL;
 645
 646         /* Must do this outside lli_och_mutex lock to prevent deadlock where
 647          * different kind of OPEN lock for this same inode gets cancelled
 648          * by ldlm_cancel_lru
 649          */
 650         if (!S_ISREG(inode->i_mode))
 651                 goto out_och_free;
 652
 653         cl_lov_delay_create_clear(&file->f_flags);
 654         goto out_och_free;
 655
 656 out_och_free:
 657         if (rc) {
 658                 if (och_p && *och_p) {
 659                         kfree(*och_p);
 660                         *och_p = NULL;
 661                         (*och_usecount)--;
 662                 }
 663                 mutex_unlock(&lli->lli_och_mutex);
 664
 665 out_openerr:
 666                 if (lli->lli_opendir_key == fd)
 667                         ll_deauthorize_statahead(inode, fd);
 668                 if (fd)
 669                         ll_file_data_put(fd);
 670         } else {
 671                 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_OPEN, 1);
 672         }
 673
 674         if (it && it_disposition(it, DISP_ENQ_OPEN_REF)) {
 675                 ptlrpc_req_finished(it->it_request);
 676                 it_clear_disposition(it, DISP_ENQ_OPEN_REF);
 677         }
 678
 679         return rc;
 680 }
 681
 682 static int ll_md_blocking_lease_ast(struct ldlm_lock *lock,
 683                                     struct ldlm_lock_desc *desc,
 684                                     void *data, int flag)
 685 {
 686         int rc;
 687         struct lustre_handle lockh;
 688
 689         switch (flag) {
 690         case LDLM_CB_BLOCKING:
 691                 ldlm_lock2handle(lock, &lockh);
 692                 rc = ldlm_cli_cancel(&lockh, LCF_ASYNC);
 693                 if (rc < 0) {
 694                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
 695                         return rc;
 696                 }
 697                 break;
 698         case LDLM_CB_CANCELING:
 699                 /* do nothing */
 700                 break;
 701         }
 702         return 0;
 703 }
 704
 705 /**
 706  * Acquire a lease and open the file.
 707  */
 708 static struct obd_client_handle *
 709 ll_lease_open(struct inode *inode, struct file *file, fmode_t fmode,
 710               __u64 open_flags)
 711 {
 712         struct lookup_intent it = { .it_op = IT_OPEN };
 713         struct ll_sb_info *sbi = ll_i2sbi(inode);
 714         struct md_op_data *op_data;
 715         struct ptlrpc_request *req = NULL;
 716         struct lustre_handle old_handle = { 0 };
 717         struct obd_client_handle *och = NULL;
 718         int rc;
 719         int rc2;
 720
 721         if (fmode != FMODE_WRITE && fmode != FMODE_READ)
 722                 return ERR_PTR(-EINVAL);
 723
 724         if (file) {
 725                 struct ll_inode_info *lli = ll_i2info(inode);
 726                 struct ll_file_data *fd = LUSTRE_FPRIVATE(file);
 727                 struct obd_client_handle **och_p;
 728                 __u64 *och_usecount;
 729
 730                 if (!(fmode & file->f_mode) || (file->f_mode & FMODE_EXEC))
 731                         return ERR_PTR(-EPERM);
 732
 733                 /* Get the openhandle of the file */
 734                 rc = -EBUSY;
 735                 mutex_lock(&lli->lli_och_mutex);
 736                 if (fd->fd_lease_och) {
 737                         mutex_unlock(&lli->lli_och_mutex);
 738                         return ERR_PTR(rc);
 739                 }
 740
 741                 if (!fd->fd_och) {
 742                         if (file->f_mode & FMODE_WRITE) {
 743                                 LASSERT(lli->lli_mds_write_och);
 744                                 och_p = &lli->lli_mds_write_och;
 745                                 och_usecount = &lli->lli_open_fd_write_count;
 746                         } else {
 747                                 LASSERT(lli->lli_mds_read_och);
 748                                 och_p = &lli->lli_mds_read_och;
 749                                 och_usecount = &lli->lli_open_fd_read_count;
 750                         }
 751                         if (*och_usecount == 1) {
 752                                 fd->fd_och = *och_p;
 753                                 *och_p = NULL;
 754                                 *och_usecount = 0;
 755                                 rc = 0;
 756                         }
 757                 }
 758                 mutex_unlock(&lli->lli_och_mutex);
 759                 if (rc < 0) /* more than 1 opener */
 760                         return ERR_PTR(rc);
 761
 762                 LASSERT(fd->fd_och);
 763                 old_handle = fd->fd_och->och_fh;
 764         }
 765
 766         och = kzalloc(sizeof(*och), GFP_NOFS);
 767         if (!och)
 768                 return ERR_PTR(-ENOMEM);
 769
 770         op_data = ll_prep_md_op_data(NULL, inode, inode, NULL, 0, 0,
 771                                      LUSTRE_OPC_ANY, NULL);
 772         if (IS_ERR(op_data)) {
 773                 rc = PTR_ERR(op_data);
 774                 goto out;
 775         }
 776
 777         /* To tell the MDT this openhandle is from the same owner */
 778         op_data->op_handle = old_handle;
 779
 780         it.it_flags = fmode | open_flags;
 781         it.it_flags |= MDS_OPEN_LOCK | MDS_OPEN_BY_FID | MDS_OPEN_LEASE;
 782         rc = md_intent_lock(sbi->ll_md_exp, op_data, &it, &req,
 783                             &ll_md_blocking_lease_ast,
 784         /* LDLM_FL_NO_LRU: To not put the lease lock into LRU list, otherwise
 785          * it can be cancelled which may mislead applications that the lease is
 786          * broken;
 787          * LDLM_FL_EXCL: Set this flag so that it won't be matched by normal
 788          * open in ll_md_blocking_ast(). Otherwise as ll_md_blocking_lease_ast
 789          * doesn't deal with openhandle, so normal openhandle will be leaked.
 790          */
 791                             LDLM_FL_NO_LRU | LDLM_FL_EXCL);
 792         ll_finish_md_op_data(op_data);
 793         ptlrpc_req_finished(req);
 794         if (rc < 0)
 795                 goto out_release_it;
 796
 797         if (it_disposition(&it, DISP_LOOKUP_NEG)) {
 798                 rc = -ENOENT;
 799                 goto out_release_it;
 800         }
 801
 802         rc = it_open_error(DISP_OPEN_OPEN, &it);
 803         if (rc)
 804                 goto out_release_it;
 805
 806         LASSERT(it_disposition(&it, DISP_ENQ_OPEN_REF));
 807         ll_och_fill(sbi->ll_md_exp, &it, och);
 808
 809         if (!it_disposition(&it, DISP_OPEN_LEASE)) /* old server? */ {
 810                 rc = -EOPNOTSUPP;
 811                 goto out_close;
 812         }
 813
 814         /* already get lease, handle lease lock */
 815         ll_set_lock_data(sbi->ll_md_exp, inode, &it, NULL);
 816         if (it.it_lock_mode == 0 ||
 817             it.it_lock_bits != MDS_INODELOCK_OPEN) {
 818                 /* open lock must return for lease */
 819                 CERROR(DFID "lease granted but no open lock, %d/%llu.\n",
 820                        PFID(ll_inode2fid(inode)), it.it_lock_mode,
 821                        it.it_lock_bits);
 822                 rc = -EPROTO;
 823                 goto out_close;
 824         }
 825
 826         ll_intent_release(&it);
 827         return och;
 828
 829 out_close:
 830         /* Cancel open lock */
 831         if (it.it_lock_mode != 0) {
 832                 ldlm_lock_decref_and_cancel(&och->och_lease_handle,
 833                                             it.it_lock_mode);
 834                 it.it_lock_mode = 0;
 835                 och->och_lease_handle.cookie = 0ULL;
 836         }
 837         rc2 = ll_close_inode_openhandle(inode, och, 0, NULL);
 838         if (rc2 < 0)
 839                 CERROR("%s: error closing file " DFID ": %d\n",
 840                        ll_get_fsname(inode->i_sb, NULL, 0),
 841                        PFID(&ll_i2info(inode)->lli_fid), rc2);
 842         och = NULL; /* och has been freed in ll_close_inode_openhandle() */
 843 out_release_it:
 844         ll_intent_release(&it);
 845 out:
 846         kfree(och);
 847         return ERR_PTR(rc);
 848 }
 849
 850 /**
 851  * Check whether a layout swap can be done between two inodes.
 852  *
 853  * \param[in] inode1  First inode to check
 854  * \param[in] inode2  Second inode to check
 855  *
 856  * \retval 0 on success, layout swap can be performed between both inodes
 857  * \retval negative error code if requirements are not met
 858  */
 859 static int ll_check_swap_layouts_validity(struct inode *inode1,
 860                                           struct inode *inode2)
 861 {
 862         if (!S_ISREG(inode1->i_mode) || !S_ISREG(inode2->i_mode))
 863                 return -EINVAL;
 864
 865         if (inode_permission(inode1, MAY_WRITE) ||
 866             inode_permission(inode2, MAY_WRITE))
 867                 return -EPERM;
 868
 869         if (inode1->i_sb != inode2->i_sb)
 870                 return -EXDEV;
 871
 872         return 0;
 873 }
 874
 875 static int ll_swap_layouts_close(struct obd_client_handle *och,
 876                                  struct inode *inode, struct inode *inode2)
 877 {
 878         const struct lu_fid *fid1 = ll_inode2fid(inode);
 879         const struct lu_fid *fid2;
 880         int rc;
 881
 882         CDEBUG(D_INODE, "%s: biased close of file " DFID "\n",
 883                ll_get_fsname(inode->i_sb, NULL, 0), PFID(fid1));
 884
 885         rc = ll_check_swap_layouts_validity(inode, inode2);
 886         if (rc < 0)
 887                 goto out_free_och;
 888
 889         /* We now know that inode2 is a lustre inode */
 890         fid2 = ll_inode2fid(inode2);
 891
 892         rc = lu_fid_cmp(fid1, fid2);
 893         if (!rc) {
 894                 rc = -EINVAL;
 895                 goto out_free_och;
 896         }
 897
 898         /*
 899          * Close the file and swap layouts between inode & inode2.
 900          * NB: lease lock handle is released in mdc_close_layout_swap_pack()
 901          * because we still need it to pack l_remote_handle to MDT.
 902          */
 903         rc = ll_close_inode_openhandle(inode, och, MDS_CLOSE_LAYOUT_SWAP,
 904                                        inode2);
 905
 906         och = NULL; /* freed in ll_close_inode_openhandle() */
 907
 908 out_free_och:
 909         kfree(och);
 910         return rc;
 911 }
 912
 913 /**
 914  * Release lease and close the file.
 915  * It will check if the lease has ever broken.
 916  */
 917 static int ll_lease_close(struct obd_client_handle *och, struct inode *inode,
 918                           bool *lease_broken)
 919 {
 920         struct ldlm_lock *lock;
 921         bool cancelled = true;
 922
 923         lock = ldlm_handle2lock(&och->och_lease_handle);
 924         if (lock) {
 925                 lock_res_and_lock(lock);
 926                 cancelled = ldlm_is_cancel(lock);
 927                 unlock_res_and_lock(lock);
 928                 LDLM_LOCK_PUT(lock);
 929         }
 930
 931         CDEBUG(D_INODE, "lease for " DFID " broken? %d\n",
 932                PFID(&ll_i2info(inode)->lli_fid), cancelled);
 933
 934         if (!cancelled)
 935                 ldlm_cli_cancel(&och->och_lease_handle, 0);
 936         if (lease_broken)
 937                 *lease_broken = cancelled;
 938
 939         return ll_close_inode_openhandle(inode, och, 0, NULL);
 940 }
 941
 942 int ll_merge_attr(const struct lu_env *env, struct inode *inode)
 943 {
 944         struct ll_inode_info *lli = ll_i2info(inode);
 945         struct cl_object *obj = lli->lli_clob;
 946         struct cl_attr *attr = vvp_env_thread_attr(env);
 947         s64 atime;
 948         s64 mtime;
 949         s64 ctime;
 950         int rc = 0;
 951
 952         ll_inode_size_lock(inode);
 953
 954         /* merge timestamps the most recently obtained from mds with
 955          * timestamps obtained from osts
 956          */
 957         LTIME_S(inode->i_atime) = lli->lli_atime;
 958         LTIME_S(inode->i_mtime) = lli->lli_mtime;
 959         LTIME_S(inode->i_ctime) = lli->lli_ctime;
 960
 961         mtime = LTIME_S(inode->i_mtime);
 962         atime = LTIME_S(inode->i_atime);
 963         ctime = LTIME_S(inode->i_ctime);
 964
 965         cl_object_attr_lock(obj);
 966         rc = cl_object_attr_get(env, obj, attr);
 967         cl_object_attr_unlock(obj);
 968
 969         if (rc != 0)
 970                 goto out_size_unlock;
 971
 972         if (atime < attr->cat_atime)
 973                 atime = attr->cat_atime;
 974
 975         if (ctime < attr->cat_ctime)
 976                 ctime = attr->cat_ctime;
 977
 978         if (mtime < attr->cat_mtime)
 979                 mtime = attr->cat_mtime;
 980
 981         CDEBUG(D_VFSTRACE, DFID " updating i_size %llu\n",
 982                PFID(&lli->lli_fid), attr->cat_size);
 983
 984         i_size_write(inode, attr->cat_size);
 985
 986         inode->i_blocks = attr->cat_blocks;
 987
 988         LTIME_S(inode->i_mtime) = mtime;
 989         LTIME_S(inode->i_atime) = atime;
 990         LTIME_S(inode->i_ctime) = ctime;
 991
 992 out_size_unlock:
 993         ll_inode_size_unlock(inode);
 994
 995         return rc;
 996 }
 997
 998 static bool file_is_noatime(const struct file *file)
 999 {
1000         const struct vfsmount *mnt = file->f_path.mnt;
1001         const struct inode *inode = file_inode(file);
1002
1003         /* Adapted from file_accessed() and touch_atime().*/
1004         if (file->f_flags & O_NOATIME)
1005                 return true;
1006
1007         if (inode->i_flags & S_NOATIME)
1008                 return true;
1009
1010         if (IS_NOATIME(inode))
1011                 return true;
1012
1013         if (mnt->mnt_flags & (MNT_NOATIME | MNT_READONLY))
1014                 return true;
1015
1016         if ((mnt->mnt_flags & MNT_NODIRATIME) && S_ISDIR(inode->i_mode))
1017                 return true;
1018
1019         if ((inode->i_sb->s_flags & SB_NODIRATIME) && S_ISDIR(inode->i_mode))
1020                 return true;
1021
1022         return false;
1023 }
1024
1025 static void ll_io_init(struct cl_io *io, const struct file *file, int write)
1026 {
1027         struct inode *inode = file_inode(file);
1028
1029         io->u.ci_rw.crw_nonblock = file->f_flags & O_NONBLOCK;
1030         if (write) {
1031                 io->u.ci_wr.wr_append = !!(file->f_flags & O_APPEND);
1032                 io->u.ci_wr.wr_sync = file->f_flags & O_SYNC ||
1033                                       file->f_flags & O_DIRECT ||
1034                                       IS_SYNC(inode);
1035         }
1036         io->ci_obj     = ll_i2info(inode)->lli_clob;
1037         io->ci_lockreq = CILR_MAYBE;
1038         if (ll_file_nolock(file)) {
1039                 io->ci_lockreq = CILR_NEVER;
1040                 io->ci_no_srvlock = 1;
1041         } else if (file->f_flags & O_APPEND) {
1042                 io->ci_lockreq = CILR_MANDATORY;
1043         }
1044
1045         io->ci_noatime = file_is_noatime(file);
1046 }
1047
1048 static ssize_t
1049 ll_file_io_generic(const struct lu_env *env, struct vvp_io_args *args,
1050                    struct file *file, enum cl_io_type iot,
1051                    loff_t *ppos, size_t count)
1052 {
1053         struct ll_inode_info *lli = ll_i2info(file_inode(file));
1054         struct ll_file_data  *fd  = LUSTRE_FPRIVATE(file);
1055         struct vvp_io *vio = vvp_env_io(env);
1056         struct range_lock range;
1057         struct cl_io     *io;
1058         ssize_t result = 0;
1059         int rc = 0;
1060
1061         CDEBUG(D_VFSTRACE, "file: %pD, type: %d ppos: %llu, count: %zu\n",
1062                file, iot, *ppos, count);
1063
1064 restart:
1065         io = vvp_env_thread_io(env);
1066         ll_io_init(io, file, iot == CIT_WRITE);
1067
1068         if (cl_io_rw_init(env, io, iot, *ppos, count) == 0) {
1069                 struct vvp_io *vio = vvp_env_io(env);
1070                 bool range_locked = false;
1071
1072                 if (file->f_flags & O_APPEND)
1073                         range_lock_init(&range, 0, LUSTRE_EOF);
1074                 else
1075                         range_lock_init(&range, *ppos, *ppos + count - 1);
1076
1077                 vio->vui_fd  = LUSTRE_FPRIVATE(file);
1078                 vio->vui_iter = args->u.normal.via_iter;
1079                 vio->vui_iocb = args->u.normal.via_iocb;
1080                 /*
1081                  * Direct IO reads must also take range lock,
1082                  * or multiple reads will try to work on the same pages
1083                  * See LU-6227 for details.
1084                  */
1085                 if (((iot == CIT_WRITE) ||
1086                      (iot == CIT_READ && (file->f_flags & O_DIRECT))) &&
1087                     !(vio->vui_fd->fd_flags & LL_FILE_GROUP_LOCKED)) {
1088                         CDEBUG(D_VFSTRACE, "Range lock [%llu, %llu]\n",
1089                                range.rl_node.in_extent.start,
1090                                range.rl_node.in_extent.end);
1091                         rc = range_lock(&lli->lli_write_tree, &range);
1092                         if (rc < 0)
1093                                 goto out;
1094
1095                         range_locked = true;
1096                 }
1097                 ll_cl_add(file, env, io);
1098                 rc = cl_io_loop(env, io);
1099                 ll_cl_remove(file, env);
1100                 if (range_locked) {
1101                         CDEBUG(D_VFSTRACE, "Range unlock [%llu, %llu]\n",
1102                                range.rl_node.in_extent.start,
1103                                range.rl_node.in_extent.end);
1104                         range_unlock(&lli->lli_write_tree, &range);
1105                 }
1106         } else {
1107                 /* cl_io_rw_init() handled IO */
1108                 rc = io->ci_result;
1109         }
1110
1111         if (io->ci_nob > 0) {
1112                 result = io->ci_nob;
1113                 count -= io->ci_nob;
1114                 *ppos = io->u.ci_wr.wr.crw_pos;
1115
1116                 /* prepare IO restart */
1117                 if (count > 0)
1118                         args->u.normal.via_iter = vio->vui_iter;
1119         }
1120 out:
1121         cl_io_fini(env, io);
1122
1123         if ((!rc || rc == -ENODATA) && count > 0 && io->ci_need_restart) {
1124                 CDEBUG(D_VFSTRACE,
1125                        "%s: restart %s from %lld, count:%zu, result: %zd\n",
1126                        file_dentry(file)->d_name.name,
1127                        iot == CIT_READ ? "read" : "write",
1128                        *ppos, count, result);
1129                 goto restart;
1130         }
1131
1132         if (iot == CIT_READ) {
1133                 if (result >= 0)
1134                         ll_stats_ops_tally(ll_i2sbi(file_inode(file)),
1135                                            LPROC_LL_READ_BYTES, result);
1136         } else if (iot == CIT_WRITE) {
1137                 if (result >= 0) {
1138                         ll_stats_ops_tally(ll_i2sbi(file_inode(file)),
1139                                            LPROC_LL_WRITE_BYTES, result);
1140                         fd->fd_write_failed = false;
1141                 } else if (!result && !rc) {
1142                         rc = io->ci_result;
1143                         if (rc < 0)
1144                                 fd->fd_write_failed = true;
1145                         else
1146                                 fd->fd_write_failed = false;
1147                 } else if (rc != -ERESTARTSYS) {
1148                         fd->fd_write_failed = true;
1149                 }
1150         }
1151         CDEBUG(D_VFSTRACE, "iot: %d, result: %zd\n", iot, result);
1152
1153         return result > 0 ? result : rc;
1154 }
1155
1156 static ssize_t ll_file_read_iter(struct kiocb *iocb, struct iov_iter *to)
1157 {
1158         struct lu_env      *env;
1159         struct vvp_io_args *args;
1160         ssize_t      result;
1161         u16 refcheck;
1162
1163         env = cl_env_get(&refcheck);
1164         if (IS_ERR(env))
1165                 return PTR_ERR(env);
1166
1167         args = ll_env_args(env);
1168         args->u.normal.via_iter = to;
1169         args->u.normal.via_iocb = iocb;
1170
1171         result = ll_file_io_generic(env, args, iocb->ki_filp, CIT_READ,
1172                                     &iocb->ki_pos, iov_iter_count(to));
1173         cl_env_put(env, &refcheck);
1174         return result;
1175 }
1176
1177 /*
1178  * Write to a file (through the page cache).
1179  */
1180 static ssize_t ll_file_write_iter(struct kiocb *iocb, struct iov_iter *from)
1181 {
1182         struct lu_env      *env;
1183         struct vvp_io_args *args;
1184         ssize_t      result;
1185         u16 refcheck;
1186
1187         env = cl_env_get(&refcheck);
1188         if (IS_ERR(env))
1189                 return PTR_ERR(env);
1190
1191         args = ll_env_args(env);
1192         args->u.normal.via_iter = from;
1193         args->u.normal.via_iocb = iocb;
1194
1195         result = ll_file_io_generic(env, args, iocb->ki_filp, CIT_WRITE,
1196                                     &iocb->ki_pos, iov_iter_count(from));
1197         cl_env_put(env, &refcheck);
1198         return result;
1199 }
1200
1201 int ll_lov_setstripe_ea_info(struct inode *inode, struct dentry *dentry,
1202                              __u64 flags, struct lov_user_md *lum,
1203                              int lum_size)
1204 {
1205         struct lookup_intent oit = {
1206                 .it_op = IT_OPEN,
1207                 .it_flags = flags | MDS_OPEN_BY_FID,
1208         };
1209         int rc = 0;
1210
1211         ll_inode_size_lock(inode);
1212         rc = ll_intent_file_open(dentry, lum, lum_size, &oit);
1213         if (rc < 0)
1214                 goto out_unlock;
1215
1216         ll_release_openhandle(inode, &oit);
1217
1218 out_unlock:
1219         ll_inode_size_unlock(inode);
1220         ll_intent_release(&oit);
1221         return rc;
1222 }
1223
1224 int ll_lov_getstripe_ea_info(struct inode *inode, const char *filename,
1225                              struct lov_mds_md **lmmp, int *lmm_size,
1226                              struct ptlrpc_request **request)
1227 {
1228         struct ll_sb_info *sbi = ll_i2sbi(inode);
1229         struct mdt_body  *body;
1230         struct lov_mds_md *lmm = NULL;
1231         struct ptlrpc_request *req = NULL;
1232         struct md_op_data *op_data;
1233         int rc, lmmsize;
1234
1235         rc = ll_get_default_mdsize(sbi, &lmmsize);
1236         if (rc)
1237                 return rc;
1238
1239         op_data = ll_prep_md_op_data(NULL, inode, NULL, filename,
1240                                      strlen(filename), lmmsize,
1241                                      LUSTRE_OPC_ANY, NULL);
1242         if (IS_ERR(op_data))
1243                 return PTR_ERR(op_data);
1244
1245         op_data->op_valid = OBD_MD_FLEASIZE | OBD_MD_FLDIREA;
1246         rc = md_getattr_name(sbi->ll_md_exp, op_data, &req);
1247         ll_finish_md_op_data(op_data);
1248         if (rc < 0) {
1249                 CDEBUG(D_INFO, "md_getattr_name failed on %s: rc %d\n",
1250                        filename, rc);
1251                 goto out;
1252         }
1253
1254         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
1255
1256         lmmsize = body->mbo_eadatasize;
1257
1258         if (!(body->mbo_valid & (OBD_MD_FLEASIZE | OBD_MD_FLDIREA)) ||
1259             lmmsize == 0) {
1260                 rc = -ENODATA;
1261                 goto out;
1262         }
1263
1264         lmm = req_capsule_server_sized_get(&req->rq_pill, &RMF_MDT_MD, lmmsize);
1265
1266         if ((lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_V1)) &&
1267             (lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_V3))) {
1268                 rc = -EPROTO;
1269                 goto out;
1270         }
1271
1272         /*
1273          * This is coming from the MDS, so is probably in
1274          * little endian.  We convert it to host endian before
1275          * passing it to userspace.
1276          */
1277         if (cpu_to_le32(LOV_MAGIC) != LOV_MAGIC) {
1278                 int stripe_count;
1279
1280                 stripe_count = le16_to_cpu(lmm->lmm_stripe_count);
1281                 if (le32_to_cpu(lmm->lmm_pattern) & LOV_PATTERN_F_RELEASED)
1282                         stripe_count = 0;
1283
1284                 /* if function called for directory - we should
1285                  * avoid swab not existent lsm objects
1286                  */
1287                 if (lmm->lmm_magic == cpu_to_le32(LOV_MAGIC_V1)) {
1288                         lustre_swab_lov_user_md_v1((struct lov_user_md_v1 *)lmm);
1289                         if (S_ISREG(body->mbo_mode))
1290                                 lustre_swab_lov_user_md_objects(
1291                                  ((struct lov_user_md_v1 *)lmm)->lmm_objects,
1292                                  stripe_count);
1293                 } else if (lmm->lmm_magic == cpu_to_le32(LOV_MAGIC_V3)) {
1294                         lustre_swab_lov_user_md_v3((struct lov_user_md_v3 *)lmm);
1295                         if (S_ISREG(body->mbo_mode))
1296                                 lustre_swab_lov_user_md_objects(
1297                                  ((struct lov_user_md_v3 *)lmm)->lmm_objects,
1298                                  stripe_count);
1299                 }
1300         }
1301
1302 out:
1303         *lmmp = lmm;
1304         *lmm_size = lmmsize;
1305         *request = req;
1306         return rc;
1307 }
1308
1309 static int ll_lov_setea(struct inode *inode, struct file *file,
1310                         unsigned long arg)
1311 {
1312         __u64                    flags = MDS_OPEN_HAS_OBJS | FMODE_WRITE;
1313         struct lov_user_md      *lump;
1314         int                      lum_size = sizeof(struct lov_user_md) +
1315                                             sizeof(struct lov_user_ost_data);
1316         int                      rc;
1317
1318         if (!capable(CFS_CAP_SYS_ADMIN))
1319                 return -EPERM;
1320
1321         lump = libcfs_kvzalloc(lum_size, GFP_NOFS);
1322         if (!lump)
1323                 return -ENOMEM;
1324
1325         if (copy_from_user(lump, (struct lov_user_md __user *)arg, lum_size)) {
1326                 kvfree(lump);
1327                 return -EFAULT;
1328         }
1329
1330         rc = ll_lov_setstripe_ea_info(inode, file->f_path.dentry, flags, lump,
1331                                       lum_size);
1332         cl_lov_delay_create_clear(&file->f_flags);
1333
1334         kvfree(lump);
1335         return rc;
1336 }
1337
1338 static int ll_file_getstripe(struct inode *inode,
1339                              struct lov_user_md __user *lum)
1340 {
1341         struct lu_env *env;
1342         u16 refcheck;
1343         int rc;
1344
1345         env = cl_env_get(&refcheck);
1346         if (IS_ERR(env))
1347                 return PTR_ERR(env);
1348
1349         rc = cl_object_getstripe(env, ll_i2info(inode)->lli_clob, lum);
1350         cl_env_put(env, &refcheck);
1351         return rc;
1352 }
1353
1354 static int ll_lov_setstripe(struct inode *inode, struct file *file,
1355                             unsigned long arg)
1356 {
1357         struct lov_user_md __user *lum = (struct lov_user_md __user *)arg;
1358         struct lov_user_md *klum;
1359         int lum_size, rc;
1360         __u64 flags = FMODE_WRITE;
1361
1362         rc = ll_copy_user_md(lum, &klum);
1363         if (rc < 0)
1364                 return rc;
1365
1366         lum_size = rc;
1367         rc = ll_lov_setstripe_ea_info(inode, file->f_path.dentry, flags, klum,
1368                                       lum_size);
1369         cl_lov_delay_create_clear(&file->f_flags);
1370         if (rc == 0) {
1371                 __u32 gen;
1372
1373                 put_user(0, &lum->lmm_stripe_count);
1374
1375                 ll_layout_refresh(inode, &gen);
1376                 rc = ll_file_getstripe(inode, (struct lov_user_md __user *)arg);
1377         }
1378
1379         kfree(klum);
1380         return rc;
1381 }
1382
1383 static int
1384 ll_get_grouplock(struct inode *inode, struct file *file, unsigned long arg)
1385 {
1386         struct ll_inode_info   *lli = ll_i2info(inode);
1387         struct ll_file_data    *fd = LUSTRE_FPRIVATE(file);
1388         struct ll_grouplock    grouplock;
1389         int                  rc;
1390
1391         if (arg == 0) {
1392                 CWARN("group id for group lock must not be 0\n");
1393                 return -EINVAL;
1394         }
1395
1396         if (ll_file_nolock(file))
1397                 return -EOPNOTSUPP;
1398
1399         spin_lock(&lli->lli_lock);
1400         if (fd->fd_flags & LL_FILE_GROUP_LOCKED) {
1401                 CWARN("group lock already existed with gid %lu\n",
1402                       fd->fd_grouplock.lg_gid);
1403                 spin_unlock(&lli->lli_lock);
1404                 return -EINVAL;
1405         }
1406         LASSERT(!fd->fd_grouplock.lg_lock);
1407         spin_unlock(&lli->lli_lock);
1408
1409         rc = cl_get_grouplock(ll_i2info(inode)->lli_clob,
1410                               arg, (file->f_flags & O_NONBLOCK), &grouplock);
1411         if (rc)
1412                 return rc;
1413
1414         spin_lock(&lli->lli_lock);
1415         if (fd->fd_flags & LL_FILE_GROUP_LOCKED) {
1416                 spin_unlock(&lli->lli_lock);
1417                 CERROR("another thread just won the race\n");
1418                 cl_put_grouplock(&grouplock);
1419                 return -EINVAL;
1420         }
1421
1422         fd->fd_flags |= LL_FILE_GROUP_LOCKED;
1423         fd->fd_grouplock = grouplock;
1424         spin_unlock(&lli->lli_lock);
1425
1426         CDEBUG(D_INFO, "group lock %lu obtained\n", arg);
1427         return 0;
1428 }
1429
1430 static int ll_put_grouplock(struct inode *inode, struct file *file,
1431                             unsigned long arg)
1432 {
1433         struct ll_inode_info   *lli = ll_i2info(inode);
1434         struct ll_file_data    *fd = LUSTRE_FPRIVATE(file);
1435         struct ll_grouplock    grouplock;
1436
1437         spin_lock(&lli->lli_lock);
1438         if (!(fd->fd_flags & LL_FILE_GROUP_LOCKED)) {
1439                 spin_unlock(&lli->lli_lock);
1440                 CWARN("no group lock held\n");
1441                 return -EINVAL;
1442         }
1443         LASSERT(fd->fd_grouplock.lg_lock);
1444
1445         if (fd->fd_grouplock.lg_gid != arg) {
1446                 CWARN("group lock %lu doesn't match current id %lu\n",
1447                       arg, fd->fd_grouplock.lg_gid);
1448                 spin_unlock(&lli->lli_lock);
1449                 return -EINVAL;
1450         }
1451
1452         grouplock = fd->fd_grouplock;
1453         memset(&fd->fd_grouplock, 0, sizeof(fd->fd_grouplock));
1454         fd->fd_flags &= ~LL_FILE_GROUP_LOCKED;
1455         spin_unlock(&lli->lli_lock);
1456
1457         cl_put_grouplock(&grouplock);
1458         CDEBUG(D_INFO, "group lock %lu released\n", arg);
1459         return 0;
1460 }
1461
1462 /**
1463  * Close inode open handle
1464  *
1465  * \param inode  [in]     inode in question
1466  * \param it     [in,out] intent which contains open info and result
1467  *
1468  * \retval 0     success
1469  * \retval <0    failure
1470  */
1471 int ll_release_openhandle(struct inode *inode, struct lookup_intent *it)
1472 {
1473         struct obd_client_handle *och;
1474         int rc;
1475
1476         LASSERT(inode);
1477
1478         /* Root ? Do nothing. */
1479         if (is_root_inode(inode))
1480                 return 0;
1481
1482         /* No open handle to close? Move away */
1483         if (!it_disposition(it, DISP_OPEN_OPEN))
1484                 return 0;
1485
1486         LASSERT(it_open_error(DISP_OPEN_OPEN, it) == 0);
1487
1488         och = kzalloc(sizeof(*och), GFP_NOFS);
1489         if (!och) {
1490                 rc = -ENOMEM;
1491                 goto out;
1492         }
1493
1494         ll_och_fill(ll_i2sbi(inode)->ll_md_exp, it, och);
1495
1496         rc = ll_close_inode_openhandle(inode, och, 0, NULL);
1497 out:
1498         /* this one is in place of ll_file_open */
1499         if (it_disposition(it, DISP_ENQ_OPEN_REF)) {
1500                 ptlrpc_req_finished(it->it_request);
1501                 it_clear_disposition(it, DISP_ENQ_OPEN_REF);
1502         }
1503         return rc;
1504 }
1505
1506 /**
1507  * Get size for inode for which FIEMAP mapping is requested.
1508  * Make the FIEMAP get_info call and returns the result.
1509  *
1510  * \param fiemap        kernel buffer to hold extens
1511  * \param num_bytes     kernel buffer size
1512  */
1513 static int ll_do_fiemap(struct inode *inode, struct fiemap *fiemap,
1514                         size_t num_bytes)
1515 {
1516         struct ll_fiemap_info_key fmkey = { .lfik_name = KEY_FIEMAP, };
1517         struct lu_env *env;
1518         u16 refcheck;
1519         int rc = 0;
1520
1521         /* Checks for fiemap flags */
1522         if (fiemap->fm_flags & ~LUSTRE_FIEMAP_FLAGS_COMPAT) {
1523                 fiemap->fm_flags &= ~LUSTRE_FIEMAP_FLAGS_COMPAT;
1524                 return -EBADR;
1525         }
1526
1527         /* Check for FIEMAP_FLAG_SYNC */
1528         if (fiemap->fm_flags & FIEMAP_FLAG_SYNC) {
1529                 rc = filemap_fdatawrite(inode->i_mapping);
1530                 if (rc)
1531                         return rc;
1532         }
1533
1534         env = cl_env_get(&refcheck);
1535         if (IS_ERR(env))
1536                 return PTR_ERR(env);
1537
1538         if (i_size_read(inode) == 0) {
1539                 rc = ll_glimpse_size(inode);
1540                 if (rc)
1541                         goto out;
1542         }
1543
1544         fmkey.lfik_oa.o_valid = OBD_MD_FLID | OBD_MD_FLGROUP;
1545         obdo_from_inode(&fmkey.lfik_oa, inode, OBD_MD_FLSIZE);
1546         obdo_set_parent_fid(&fmkey.lfik_oa, &ll_i2info(inode)->lli_fid);
1547
1548         /* If filesize is 0, then there would be no objects for mapping */
1549         if (fmkey.lfik_oa.o_size == 0) {
1550                 fiemap->fm_mapped_extents = 0;
1551                 rc = 0;
1552                 goto out;
1553         }
1554
1555         memcpy(&fmkey.lfik_fiemap, fiemap, sizeof(*fiemap));
1556
1557         rc = cl_object_fiemap(env, ll_i2info(inode)->lli_clob,
1558                               &fmkey, fiemap, &num_bytes);
1559 out:
1560         cl_env_put(env, &refcheck);
1561         return rc;
1562 }
1563
1564 int ll_fid2path(struct inode *inode, void __user *arg)
1565 {
1566         struct obd_export *exp = ll_i2mdexp(inode);
1567         const struct getinfo_fid2path __user *gfin = arg;
1568         struct getinfo_fid2path *gfout;
1569         u32 pathlen;
1570         size_t outsize;
1571         int rc;
1572
1573         if (!capable(CFS_CAP_DAC_READ_SEARCH) &&
1574             !(ll_i2sbi(inode)->ll_flags & LL_SBI_USER_FID2PATH))
1575                 return -EPERM;
1576
1577         /* Only need to get the buflen */
1578         if (get_user(pathlen, &gfin->gf_pathlen))
1579                 return -EFAULT;
1580
1581         if (pathlen > PATH_MAX)
1582                 return -EINVAL;
1583
1584         outsize = sizeof(*gfout) + pathlen;
1585
1586         gfout = kzalloc(outsize, GFP_NOFS);
1587         if (!gfout)
1588                 return -ENOMEM;
1589
1590         if (copy_from_user(gfout, arg, sizeof(*gfout))) {
1591                 rc = -EFAULT;
1592                 goto gf_free;
1593         }
1594
1595         /* Call mdc_iocontrol */
1596         rc = obd_iocontrol(OBD_IOC_FID2PATH, exp, outsize, gfout, NULL);
1597         if (rc != 0)
1598                 goto gf_free;
1599
1600         if (copy_to_user(arg, gfout, outsize))
1601                 rc = -EFAULT;
1602
1603 gf_free:
1604         kfree(gfout);
1605         return rc;
1606 }
1607
1608 /*
1609  * Read the data_version for inode.
1610  *
1611  * This value is computed using stripe object version on OST.
1612  * Version is computed using server side locking.
1613  *
1614  * @param flags if do sync on the OST side;
1615  *              0: no sync
1616  *              LL_DV_RD_FLUSH: flush dirty pages, LCK_PR on OSTs
1617  *              LL_DV_WR_FLUSH: drop all caching pages, LCK_PW on OSTs
1618  */
1619 int ll_data_version(struct inode *inode, __u64 *data_version, int flags)
1620 {
1621         struct cl_object *obj = ll_i2info(inode)->lli_clob;
1622         struct lu_env *env;
1623         struct cl_io *io;
1624         u16 refcheck;
1625         int result;
1626
1627         /* If no file object initialized, we consider its version is 0. */
1628         if (!obj) {
1629                 *data_version = 0;
1630                 return 0;
1631         }
1632
1633         env = cl_env_get(&refcheck);
1634         if (IS_ERR(env))
1635                 return PTR_ERR(env);
1636
1637         io = vvp_env_thread_io(env);
1638         io->ci_obj = obj;
1639         io->u.ci_data_version.dv_data_version = 0;
1640         io->u.ci_data_version.dv_flags = flags;
1641
1642 restart:
1643         if (!cl_io_init(env, io, CIT_DATA_VERSION, io->ci_obj))
1644                 result = cl_io_loop(env, io);
1645         else
1646                 result = io->ci_result;
1647
1648         *data_version = io->u.ci_data_version.dv_data_version;
1649
1650         cl_io_fini(env, io);
1651
1652         if (unlikely(io->ci_need_restart))
1653                 goto restart;
1654
1655         cl_env_put(env, &refcheck);
1656
1657         return result;
1658 }
1659
1660 /*
1661  * Trigger a HSM release request for the provided inode.
1662  */
1663 int ll_hsm_release(struct inode *inode)
1664 {
1665         struct lu_env *env;
1666         struct obd_client_handle *och = NULL;
1667         __u64 data_version = 0;
1668         int rc;
1669         u16 refcheck;
1670
1671         CDEBUG(D_INODE, "%s: Releasing file " DFID ".\n",
1672                ll_get_fsname(inode->i_sb, NULL, 0),
1673                PFID(&ll_i2info(inode)->lli_fid));
1674
1675         och = ll_lease_open(inode, NULL, FMODE_WRITE, MDS_OPEN_RELEASE);
1676         if (IS_ERR(och)) {
1677                 rc = PTR_ERR(och);
1678                 goto out;
1679         }
1680
1681         /* Grab latest data_version and [am]time values */
1682         rc = ll_data_version(inode, &data_version, LL_DV_WR_FLUSH);
1683         if (rc != 0)
1684                 goto out;
1685
1686         env = cl_env_get(&refcheck);
1687         if (IS_ERR(env)) {
1688                 rc = PTR_ERR(env);
1689                 goto out;
1690         }
1691
1692         ll_merge_attr(env, inode);
1693         cl_env_put(env, &refcheck);
1694
1695         /* Release the file.
1696          * NB: lease lock handle is released in mdc_hsm_release_pack() because
1697          * we still need it to pack l_remote_handle to MDT.
1698          */
1699         rc = ll_close_inode_openhandle(inode, och, MDS_HSM_RELEASE,
1700                                        &data_version);
1701         och = NULL;
1702
1703 out:
1704         if (och && !IS_ERR(och)) /* close the file */
1705                 ll_lease_close(och, inode, NULL);
1706
1707         return rc;
1708 }
1709
1710 struct ll_swap_stack {
1711         u64             dv1;
1712         u64             dv2;
1713         struct inode   *inode1;
1714         struct inode   *inode2;
1715         bool            check_dv1;
1716         bool            check_dv2;
1717 };
1718
1719 static int ll_swap_layouts(struct file *file1, struct file *file2,
1720                            struct lustre_swap_layouts *lsl)
1721 {
1722         struct mdc_swap_layouts  msl;
1723         struct md_op_data       *op_data;
1724         __u32                    gid;
1725         __u64                    dv;
1726         struct ll_swap_stack    *llss = NULL;
1727         int                      rc;
1728
1729         llss = kzalloc(sizeof(*llss), GFP_NOFS);
1730         if (!llss)
1731                 return -ENOMEM;
1732
1733         llss->inode1 = file_inode(file1);
1734         llss->inode2 = file_inode(file2);
1735
1736         rc = ll_check_swap_layouts_validity(llss->inode1, llss->inode2);
1737         if (rc < 0)
1738                 goto free;
1739
1740         /* we use 2 bool because it is easier to swap than 2 bits */
1741         if (lsl->sl_flags & SWAP_LAYOUTS_CHECK_DV1)
1742                 llss->check_dv1 = true;
1743
1744         if (lsl->sl_flags & SWAP_LAYOUTS_CHECK_DV2)
1745                 llss->check_dv2 = true;
1746
1747         /* we cannot use lsl->sl_dvX directly because we may swap them */
1748         llss->dv1 = lsl->sl_dv1;
1749         llss->dv2 = lsl->sl_dv2;
1750
1751         rc = lu_fid_cmp(ll_inode2fid(llss->inode1), ll_inode2fid(llss->inode2));
1752         if (!rc) /* same file, done! */
1753                 goto free;
1754
1755         if (rc < 0) { /* sequentialize it */
1756                 swap(llss->inode1, llss->inode2);
1757                 swap(file1, file2);
1758                 swap(llss->dv1, llss->dv2);
1759                 swap(llss->check_dv1, llss->check_dv2);
1760         }
1761
1762         gid = lsl->sl_gid;
1763         if (gid != 0) { /* application asks to flush dirty cache */
1764                 rc = ll_get_grouplock(llss->inode1, file1, gid);
1765                 if (rc < 0)
1766                         goto free;
1767
1768                 rc = ll_get_grouplock(llss->inode2, file2, gid);
1769                 if (rc < 0) {
1770                         ll_put_grouplock(llss->inode1, file1, gid);
1771                         goto free;
1772                 }
1773         }
1774
1775         /* ultimate check, before swapping the layouts we check if
1776          * dataversion has changed (if requested)
1777          */
1778         if (llss->check_dv1) {
1779                 rc = ll_data_version(llss->inode1, &dv, 0);
1780                 if (rc)
1781                         goto putgl;
1782                 if (dv != llss->dv1) {
1783                         rc = -EAGAIN;
1784                         goto putgl;
1785                 }
1786         }
1787
1788         if (llss->check_dv2) {
1789                 rc = ll_data_version(llss->inode2, &dv, 0);
1790                 if (rc)
1791                         goto putgl;
1792                 if (dv != llss->dv2) {
1793                         rc = -EAGAIN;
1794                         goto putgl;
1795                 }
1796         }
1797
1798         /* struct md_op_data is used to send the swap args to the mdt
1799          * only flags is missing, so we use struct mdc_swap_layouts
1800          * through the md_op_data->op_data
1801          */
1802         /* flags from user space have to be converted before they are send to
1803          * server, no flag is sent today, they are only used on the client
1804          */
1805         msl.msl_flags = 0;
1806         rc = -ENOMEM;
1807         op_data = ll_prep_md_op_data(NULL, llss->inode1, llss->inode2, NULL, 0,
1808                                      0, LUSTRE_OPC_ANY, &msl);
1809         if (IS_ERR(op_data)) {
1810                 rc = PTR_ERR(op_data);
1811                 goto free;
1812         }
1813
1814         rc = obd_iocontrol(LL_IOC_LOV_SWAP_LAYOUTS, ll_i2mdexp(llss->inode1),
1815                            sizeof(*op_data), op_data, NULL);
1816         ll_finish_md_op_data(op_data);
1817
1818 putgl:
1819         if (gid != 0) {
1820                 ll_put_grouplock(llss->inode2, file2, gid);
1821                 ll_put_grouplock(llss->inode1, file1, gid);
1822         }
1823
1824 free:
1825         kfree(llss);
1826
1827         return rc;
1828 }
1829
1830 int ll_hsm_state_set(struct inode *inode, struct hsm_state_set *hss)
1831 {
1832         struct md_op_data       *op_data;
1833         int                      rc;
1834
1835         /* Detect out-of range masks */
1836         if ((hss->hss_setmask | hss->hss_clearmask) & ~HSM_FLAGS_MASK)
1837                 return -EINVAL;
1838
1839         /* Non-root users are forbidden to set or clear flags which are
1840          * NOT defined in HSM_USER_MASK.
1841          */
1842         if (((hss->hss_setmask | hss->hss_clearmask) & ~HSM_USER_MASK) &&
1843             !capable(CFS_CAP_SYS_ADMIN))
1844                 return -EPERM;
1845
1846         /* Detect out-of range archive id */
1847         if ((hss->hss_valid & HSS_ARCHIVE_ID) &&
1848             (hss->hss_archive_id > LL_HSM_MAX_ARCHIVE))
1849                 return -EINVAL;
1850
1851         op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
1852                                      LUSTRE_OPC_ANY, hss);
1853         if (IS_ERR(op_data))
1854                 return PTR_ERR(op_data);
1855
1856         rc = obd_iocontrol(LL_IOC_HSM_STATE_SET, ll_i2mdexp(inode),
1857                            sizeof(*op_data), op_data, NULL);
1858
1859         ll_finish_md_op_data(op_data);
1860
1861         return rc;
1862 }
1863
1864 static int ll_hsm_import(struct inode *inode, struct file *file,
1865                          struct hsm_user_import *hui)
1866 {
1867         struct hsm_state_set    *hss = NULL;
1868         struct iattr            *attr = NULL;
1869         int                      rc;
1870
1871         if (!S_ISREG(inode->i_mode))
1872                 return -EINVAL;
1873
1874         /* set HSM flags */
1875         hss = kzalloc(sizeof(*hss), GFP_NOFS);
1876         if (!hss)
1877                 return -ENOMEM;
1878
1879         hss->hss_valid = HSS_SETMASK | HSS_ARCHIVE_ID;
1880         hss->hss_archive_id = hui->hui_archive_id;
1881         hss->hss_setmask = HS_ARCHIVED | HS_EXISTS | HS_RELEASED;
1882         rc = ll_hsm_state_set(inode, hss);
1883         if (rc != 0)
1884                 goto free_hss;
1885
1886         attr = kzalloc(sizeof(*attr), GFP_NOFS);
1887         if (!attr) {
1888                 rc = -ENOMEM;
1889                 goto free_hss;
1890         }
1891
1892         attr->ia_mode = hui->hui_mode & 0777;
1893         attr->ia_mode |= S_IFREG;
1894         attr->ia_uid = make_kuid(&init_user_ns, hui->hui_uid);
1895         attr->ia_gid = make_kgid(&init_user_ns, hui->hui_gid);
1896         attr->ia_size = hui->hui_size;
1897         attr->ia_mtime.tv_sec = hui->hui_mtime;
1898         attr->ia_mtime.tv_nsec = hui->hui_mtime_ns;
1899         attr->ia_atime.tv_sec = hui->hui_atime;
1900         attr->ia_atime.tv_nsec = hui->hui_atime_ns;
1901
1902         attr->ia_valid = ATTR_SIZE | ATTR_MODE | ATTR_FORCE |
1903                          ATTR_UID | ATTR_GID |
1904                          ATTR_MTIME | ATTR_MTIME_SET |
1905                          ATTR_ATIME | ATTR_ATIME_SET;
1906
1907         inode_lock(inode);
1908
1909         rc = ll_setattr_raw(file->f_path.dentry, attr, true);
1910         if (rc == -ENODATA)
1911                 rc = 0;
1912
1913         inode_unlock(inode);
1914
1915         kfree(attr);
1916 free_hss:
1917         kfree(hss);
1918         return rc;
1919 }
1920
1921 static inline long ll_lease_type_from_fmode(fmode_t fmode)
1922 {
1923         return ((fmode & FMODE_READ) ? LL_LEASE_RDLCK : 0) |
1924                ((fmode & FMODE_WRITE) ? LL_LEASE_WRLCK : 0);
1925 }
1926
1927 static long
1928 ll_file_ioctl(struct file *file, unsigned int cmd, unsigned long arg)
1929 {
1930         struct inode            *inode = file_inode(file);
1931         struct ll_file_data     *fd = LUSTRE_FPRIVATE(file);
1932         int                      flags, rc;
1933
1934         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p),cmd=%x\n",
1935                PFID(ll_inode2fid(inode)), inode, cmd);
1936         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_IOCTL, 1);
1937
1938         /* asm-ppc{,64} declares TCGETS, et. al. as type 't' not 'T' */
1939         if (_IOC_TYPE(cmd) == 'T' || _IOC_TYPE(cmd) == 't') /* tty ioctls */
1940                 return -ENOTTY;
1941
1942         switch (cmd) {
1943         case LL_IOC_GETFLAGS:
1944                 /* Get the current value of the file flags */
1945                 return put_user(fd->fd_flags, (int __user *)arg);
1946         case LL_IOC_SETFLAGS:
1947         case LL_IOC_CLRFLAGS:
1948                 /* Set or clear specific file flags */
1949                 /* XXX This probably needs checks to ensure the flags are
1950                  *     not abused, and to handle any flag side effects.
1951                  */
1952                 if (get_user(flags, (int __user *)arg))
1953                         return -EFAULT;
1954
1955                 if (cmd == LL_IOC_SETFLAGS) {
1956                         if ((flags & LL_FILE_IGNORE_LOCK) &&
1957                             !(file->f_flags & O_DIRECT)) {
1958                                 CERROR("%s: unable to disable locking on non-O_DIRECT file\n",
1959                                        current->comm);
1960                                 return -EINVAL;
1961                         }
1962
1963                         fd->fd_flags |= flags;
1964                 } else {
1965                         fd->fd_flags &= ~flags;
1966                 }
1967                 return 0;
1968         case LL_IOC_LOV_SETSTRIPE:
1969                 return ll_lov_setstripe(inode, file, arg);
1970         case LL_IOC_LOV_SETEA:
1971                 return ll_lov_setea(inode, file, arg);
1972         case LL_IOC_LOV_SWAP_LAYOUTS: {
1973                 struct file *file2;
1974                 struct lustre_swap_layouts lsl;
1975
1976                 if (copy_from_user(&lsl, (char __user *)arg,
1977                                    sizeof(struct lustre_swap_layouts)))
1978                         return -EFAULT;
1979
1980                 if ((file->f_flags & O_ACCMODE) == O_RDONLY)
1981                         return -EPERM;
1982
1983                 file2 = fget(lsl.sl_fd);
1984                 if (!file2)
1985                         return -EBADF;
1986
1987                 /* O_WRONLY or O_RDWR */
1988                 if ((file2->f_flags & O_ACCMODE) == O_RDONLY) {
1989                         rc = -EPERM;
1990                         goto out;
1991                 }
1992
1993                 if (lsl.sl_flags & SWAP_LAYOUTS_CLOSE) {
1994                         struct obd_client_handle *och = NULL;
1995                         struct ll_inode_info *lli;
1996                         struct inode *inode2;
1997
1998                         if (lsl.sl_flags != SWAP_LAYOUTS_CLOSE) {
1999                                 rc = -EINVAL;
2000                                 goto out;
2001                         }
2002
2003                         lli = ll_i2info(inode);
2004                         mutex_lock(&lli->lli_och_mutex);
2005                         if (fd->fd_lease_och) {
2006                                 och = fd->fd_lease_och;
2007                                 fd->fd_lease_och = NULL;
2008                         }
2009                         mutex_unlock(&lli->lli_och_mutex);
2010                         if (!och) {
2011                                 rc = -ENOLCK;
2012                                 goto out;
2013                         }
2014                         inode2 = file_inode(file2);
2015                         rc = ll_swap_layouts_close(och, inode, inode2);
2016                 } else {
2017                         rc = ll_swap_layouts(file, file2, &lsl);
2018                 }
2019 out:
2020                 fput(file2);
2021                 return rc;
2022         }
2023         case LL_IOC_LOV_GETSTRIPE:
2024                 return ll_file_getstripe(inode,
2025                                          (struct lov_user_md __user *)arg);
2026         case FSFILT_IOC_GETFLAGS:
2027         case FSFILT_IOC_SETFLAGS:
2028                 return ll_iocontrol(inode, file, cmd, arg);
2029         case FSFILT_IOC_GETVERSION_OLD:
2030         case FSFILT_IOC_GETVERSION:
2031                 return put_user(inode->i_generation, (int __user *)arg);
2032         case LL_IOC_GROUP_LOCK:
2033                 return ll_get_grouplock(inode, file, arg);
2034         case LL_IOC_GROUP_UNLOCK:
2035                 return ll_put_grouplock(inode, file, arg);
2036         case IOC_OBD_STATFS:
2037                 return ll_obd_statfs(inode, (void __user *)arg);
2038
2039         /* We need to special case any other ioctls we want to handle,
2040          * to send them to the MDS/OST as appropriate and to properly
2041          * network encode the arg field.
2042         case FSFILT_IOC_SETVERSION_OLD:
2043         case FSFILT_IOC_SETVERSION:
2044         */
2045         case LL_IOC_FLUSHCTX:
2046                 return ll_flush_ctx(inode);
2047         case LL_IOC_PATH2FID: {
2048                 if (copy_to_user((void __user *)arg, ll_inode2fid(inode),
2049                                  sizeof(struct lu_fid)))
2050                         return -EFAULT;
2051
2052                 return 0;
2053         }
2054         case LL_IOC_GETPARENT:
2055                 return ll_getparent(file, (struct getparent __user *)arg);
2056         case OBD_IOC_FID2PATH:
2057                 return ll_fid2path(inode, (void __user *)arg);
2058         case LL_IOC_DATA_VERSION: {
2059                 struct ioc_data_version idv;
2060                 int                     rc;
2061
2062                 if (copy_from_user(&idv, (char __user *)arg, sizeof(idv)))
2063                         return -EFAULT;
2064
2065                 idv.idv_flags &= LL_DV_RD_FLUSH | LL_DV_WR_FLUSH;
2066                 rc = ll_data_version(inode, &idv.idv_version, idv.idv_flags);
2067                 if (rc == 0 && copy_to_user((char __user *)arg, &idv,
2068                                             sizeof(idv)))
2069                         return -EFAULT;
2070
2071                 return rc;
2072         }
2073
2074         case LL_IOC_GET_MDTIDX: {
2075                 int mdtidx;
2076
2077                 mdtidx = ll_get_mdt_idx(inode);
2078                 if (mdtidx < 0)
2079                         return mdtidx;
2080
2081                 if (put_user(mdtidx, (int __user *)arg))
2082                         return -EFAULT;
2083
2084                 return 0;
2085         }
2086         case OBD_IOC_GETDTNAME:
2087         case OBD_IOC_GETMDNAME:
2088                 return ll_get_obd_name(inode, cmd, arg);
2089         case LL_IOC_HSM_STATE_GET: {
2090                 struct md_op_data       *op_data;
2091                 struct hsm_user_state   *hus;
2092                 int                      rc;
2093
2094                 hus = kzalloc(sizeof(*hus), GFP_NOFS);
2095                 if (!hus)
2096                         return -ENOMEM;
2097
2098                 op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
2099                                              LUSTRE_OPC_ANY, hus);
2100                 if (IS_ERR(op_data)) {
2101                         kfree(hus);
2102                         return PTR_ERR(op_data);
2103                 }
2104
2105                 rc = obd_iocontrol(cmd, ll_i2mdexp(inode), sizeof(*op_data),
2106                                    op_data, NULL);
2107
2108                 if (copy_to_user((void __user *)arg, hus, sizeof(*hus)))
2109                         rc = -EFAULT;
2110
2111                 ll_finish_md_op_data(op_data);
2112                 kfree(hus);
2113                 return rc;
2114         }
2115         case LL_IOC_HSM_STATE_SET: {
2116                 struct hsm_state_set    *hss;
2117                 int                      rc;
2118
2119                 hss = memdup_user((char __user *)arg, sizeof(*hss));
2120                 if (IS_ERR(hss))
2121                         return PTR_ERR(hss);
2122
2123                 rc = ll_hsm_state_set(inode, hss);
2124
2125                 kfree(hss);
2126                 return rc;
2127         }
2128         case LL_IOC_HSM_ACTION: {
2129                 struct md_op_data               *op_data;
2130                 struct hsm_current_action       *hca;
2131                 int                              rc;
2132
2133                 hca = kzalloc(sizeof(*hca), GFP_NOFS);
2134                 if (!hca)
2135                         return -ENOMEM;
2136
2137                 op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
2138                                              LUSTRE_OPC_ANY, hca);
2139                 if (IS_ERR(op_data)) {
2140                         kfree(hca);
2141                         return PTR_ERR(op_data);
2142                 }
2143
2144                 rc = obd_iocontrol(cmd, ll_i2mdexp(inode), sizeof(*op_data),
2145                                    op_data, NULL);
2146
2147                 if (copy_to_user((char __user *)arg, hca, sizeof(*hca)))
2148                         rc = -EFAULT;
2149
2150                 ll_finish_md_op_data(op_data);
2151                 kfree(hca);
2152                 return rc;
2153         }
2154         case LL_IOC_SET_LEASE: {
2155                 struct ll_inode_info *lli = ll_i2info(inode);
2156                 struct obd_client_handle *och = NULL;
2157                 bool lease_broken;
2158                 fmode_t fmode;
2159
2160                 switch (arg) {
2161                 case LL_LEASE_WRLCK:
2162                         if (!(file->f_mode & FMODE_WRITE))
2163                                 return -EPERM;
2164                         fmode = FMODE_WRITE;
2165                         break;
2166                 case LL_LEASE_RDLCK:
2167                         if (!(file->f_mode & FMODE_READ))
2168                                 return -EPERM;
2169                         fmode = FMODE_READ;
2170                         break;
2171                 case LL_LEASE_UNLCK:
2172                         mutex_lock(&lli->lli_och_mutex);
2173                         if (fd->fd_lease_och) {
2174                                 och = fd->fd_lease_och;
2175                                 fd->fd_lease_och = NULL;
2176                         }
2177                         mutex_unlock(&lli->lli_och_mutex);
2178
2179                         if (!och)
2180                                 return -ENOLCK;
2181
2182                         fmode = och->och_flags;
2183                         rc = ll_lease_close(och, inode, &lease_broken);
2184                         if (rc < 0)
2185                                 return rc;
2186
2187                         if (lease_broken)
2188                                 fmode = 0;
2189
2190                         return ll_lease_type_from_fmode(fmode);
2191                 default:
2192                         return -EINVAL;
2193                 }
2194
2195                 CDEBUG(D_INODE, "Set lease with mode %u\n", fmode);
2196
2197                 /* apply for lease */
2198                 och = ll_lease_open(inode, file, fmode, 0);
2199                 if (IS_ERR(och))
2200                         return PTR_ERR(och);
2201
2202                 rc = 0;
2203                 mutex_lock(&lli->lli_och_mutex);
2204                 if (!fd->fd_lease_och) {
2205                         fd->fd_lease_och = och;
2206                         och = NULL;
2207                 }
2208                 mutex_unlock(&lli->lli_och_mutex);
2209                 if (och) {
2210                         /* impossible now that only excl is supported for now */
2211                         ll_lease_close(och, inode, &lease_broken);
2212                         rc = -EBUSY;
2213                 }
2214                 return rc;
2215         }
2216         case LL_IOC_GET_LEASE: {
2217                 struct ll_inode_info *lli = ll_i2info(inode);
2218                 struct ldlm_lock *lock = NULL;
2219                 fmode_t fmode = 0;
2220
2221                 mutex_lock(&lli->lli_och_mutex);
2222                 if (fd->fd_lease_och) {
2223                         struct obd_client_handle *och = fd->fd_lease_och;
2224
2225                         lock = ldlm_handle2lock(&och->och_lease_handle);
2226                         if (lock) {
2227                                 lock_res_and_lock(lock);
2228                                 if (!ldlm_is_cancel(lock))
2229                                         fmode = och->och_flags;
2230                                 unlock_res_and_lock(lock);
2231                                 LDLM_LOCK_PUT(lock);
2232                         }
2233                 }
2234                 mutex_unlock(&lli->lli_och_mutex);
2235                 return ll_lease_type_from_fmode(fmode);
2236         }
2237         case LL_IOC_HSM_IMPORT: {
2238                 struct hsm_user_import *hui;
2239
2240                 hui = memdup_user((void __user *)arg, sizeof(*hui));
2241                 if (IS_ERR(hui))
2242                         return PTR_ERR(hui);
2243
2244                 rc = ll_hsm_import(inode, file, hui);
2245
2246                 kfree(hui);
2247                 return rc;
2248         }
2249         default: {
2250                 int err;
2251
2252                 if (ll_iocontrol_call(inode, file, cmd, arg, &err) ==
2253                      LLIOC_STOP)
2254                         return err;
2255
2256                 return obd_iocontrol(cmd, ll_i2dtexp(inode), 0, NULL,
2257                                      (void __user *)arg);
2258         }
2259         }
2260 }
2261
2262 static loff_t ll_file_seek(struct file *file, loff_t offset, int origin)
2263 {
2264         struct inode *inode = file_inode(file);
2265         loff_t retval, eof = 0;
2266
2267         retval = offset + ((origin == SEEK_END) ? i_size_read(inode) :
2268                            (origin == SEEK_CUR) ? file->f_pos : 0);
2269         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p), to=%llu=%#llx(%d)\n",
2270                PFID(ll_inode2fid(inode)), inode, retval, retval, origin);
2271         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_LLSEEK, 1);
2272
2273         if (origin == SEEK_END || origin == SEEK_HOLE || origin == SEEK_DATA) {
2274                 retval = ll_glimpse_size(inode);
2275                 if (retval != 0)
2276                         return retval;
2277                 eof = i_size_read(inode);
2278         }
2279
2280         return generic_file_llseek_size(file, offset, origin,
2281                                         ll_file_maxbytes(inode), eof);
2282 }
2283
2284 static int ll_flush(struct file *file, fl_owner_t id)
2285 {
2286         struct inode *inode = file_inode(file);
2287         struct ll_inode_info *lli = ll_i2info(inode);
2288         struct ll_file_data *fd = LUSTRE_FPRIVATE(file);
2289         int rc, err;
2290
2291         LASSERT(!S_ISDIR(inode->i_mode));
2292
2293         /* catch async errors that were recorded back when async writeback
2294          * failed for pages in this mapping.
2295          */
2296         rc = lli->lli_async_rc;
2297         lli->lli_async_rc = 0;
2298         if (lli->lli_clob) {
2299                 err = lov_read_and_clear_async_rc(lli->lli_clob);
2300                 if (!rc)
2301                         rc = err;
2302         }
2303
2304         /* The application has been told about write failure already.
2305          * Do not report failure again.
2306          */
2307         if (fd->fd_write_failed)
2308                 return 0;
2309         return rc ? -EIO : 0;
2310 }
2311
2312 /**
2313  * Called to make sure a portion of file has been written out.
2314  * if @mode is not CL_FSYNC_LOCAL, it will send OST_SYNC RPCs to OST.
2315  *
2316  * Return how many pages have been written.
2317  */
2318 int cl_sync_file_range(struct inode *inode, loff_t start, loff_t end,
2319                        enum cl_fsync_mode mode, int ignore_layout)
2320 {
2321         struct lu_env *env;
2322         struct cl_io *io;
2323         struct cl_fsync_io *fio;
2324         int result;
2325         u16 refcheck;
2326
2327         if (mode != CL_FSYNC_NONE && mode != CL_FSYNC_LOCAL &&
2328             mode != CL_FSYNC_DISCARD && mode != CL_FSYNC_ALL)
2329                 return -EINVAL;
2330
2331         env = cl_env_get(&refcheck);
2332         if (IS_ERR(env))
2333                 return PTR_ERR(env);
2334
2335         io = vvp_env_thread_io(env);
2336         io->ci_obj = ll_i2info(inode)->lli_clob;
2337         io->ci_ignore_layout = ignore_layout;
2338
2339         /* initialize parameters for sync */
2340         fio = &io->u.ci_fsync;
2341         fio->fi_start = start;
2342         fio->fi_end = end;
2343         fio->fi_fid = ll_inode2fid(inode);
2344         fio->fi_mode = mode;
2345         fio->fi_nr_written = 0;
2346
2347         if (cl_io_init(env, io, CIT_FSYNC, io->ci_obj) == 0)
2348                 result = cl_io_loop(env, io);
2349         else
2350                 result = io->ci_result;
2351         if (result == 0)
2352                 result = fio->fi_nr_written;
2353         cl_io_fini(env, io);
2354         cl_env_put(env, &refcheck);
2355
2356         return result;
2357 }
2358
2359 int ll_fsync(struct file *file, loff_t start, loff_t end, int datasync)
2360 {
2361         struct inode *inode = file_inode(file);
2362         struct ll_inode_info *lli = ll_i2info(inode);
2363         struct ptlrpc_request *req;
2364         int rc, err;
2365
2366         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p)\n",
2367                PFID(ll_inode2fid(inode)), inode);
2368         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_FSYNC, 1);
2369
2370         rc = file_write_and_wait_range(file, start, end);
2371         inode_lock(inode);
2372
2373         /* catch async errors that were recorded back when async writeback
2374          * failed for pages in this mapping.
2375          */
2376         if (!S_ISDIR(inode->i_mode)) {
2377                 err = lli->lli_async_rc;
2378                 lli->lli_async_rc = 0;
2379                 if (rc == 0)
2380                         rc = err;
2381                 if (lli->lli_clob) {
2382                         err = lov_read_and_clear_async_rc(lli->lli_clob);
2383                         if (rc == 0)
2384                                 rc = err;
2385                 }
2386         }
2387
2388         err = md_sync(ll_i2sbi(inode)->ll_md_exp, ll_inode2fid(inode), &req);
2389         if (!rc)
2390                 rc = err;
2391         if (!err)
2392                 ptlrpc_req_finished(req);
2393
2394         if (S_ISREG(inode->i_mode)) {
2395                 struct ll_file_data *fd = LUSTRE_FPRIVATE(file);
2396
2397                 err = cl_sync_file_range(inode, start, end, CL_FSYNC_ALL, 0);
2398                 if (rc == 0 && err < 0)
2399                         rc = err;
2400                 if (rc < 0)
2401                         fd->fd_write_failed = true;
2402                 else
2403                         fd->fd_write_failed = false;
2404         }
2405
2406         inode_unlock(inode);
2407         return rc;
2408 }
2409
2410 static int
2411 ll_file_flock(struct file *file, int cmd, struct file_lock *file_lock)
2412 {
2413         struct inode *inode = file_inode(file);
2414         struct ll_sb_info *sbi = ll_i2sbi(inode);
2415         struct ldlm_enqueue_info einfo = {
2416                 .ei_type        = LDLM_FLOCK,
2417                 .ei_cb_cp       = ldlm_flock_completion_ast,
2418                 .ei_cbdata      = file_lock,
2419         };
2420         struct md_op_data *op_data;
2421         struct lustre_handle lockh = {0};
2422         union ldlm_policy_data flock = { { 0 } };
2423         int fl_type = file_lock->fl_type;
2424         __u64 flags = 0;
2425         int rc;
2426         int rc2 = 0;
2427
2428         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID " file_lock=%p\n",
2429                PFID(ll_inode2fid(inode)), file_lock);
2430
2431         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_FLOCK, 1);
2432
2433         if (file_lock->fl_flags & FL_FLOCK)
2434                 LASSERT((cmd == F_SETLKW) || (cmd == F_SETLK));
2435         else if (!(file_lock->fl_flags & FL_POSIX))
2436                 return -EINVAL;
2437
2438         flock.l_flock.owner = (unsigned long)file_lock->fl_owner;
2439         flock.l_flock.pid = file_lock->fl_pid;
2440         flock.l_flock.start = file_lock->fl_start;
2441         flock.l_flock.end = file_lock->fl_end;
2442
2443         /* Somewhat ugly workaround for svc lockd.
2444          * lockd installs custom fl_lmops->lm_compare_owner that checks
2445          * for the fl_owner to be the same (which it always is on local node
2446          * I guess between lockd processes) and then compares pid.
2447          * As such we assign pid to the owner field to make it all work,
2448          * conflict with normal locks is unlikely since pid space and
2449          * pointer space for current->files are not intersecting
2450          */
2451         if (file_lock->fl_lmops && file_lock->fl_lmops->lm_compare_owner)
2452                 flock.l_flock.owner = (unsigned long)file_lock->fl_pid;
2453
2454         switch (fl_type) {
2455         case F_RDLCK:
2456                 einfo.ei_mode = LCK_PR;
2457                 break;
2458         case F_UNLCK:
2459                 /* An unlock request may or may not have any relation to
2460                  * existing locks so we may not be able to pass a lock handle
2461                  * via a normal ldlm_lock_cancel() request. The request may even
2462                  * unlock a byte range in the middle of an existing lock. In
2463                  * order to process an unlock request we need all of the same
2464                  * information that is given with a normal read or write record
2465                  * lock request. To avoid creating another ldlm unlock (cancel)
2466                  * message we'll treat a LCK_NL flock request as an unlock.
2467                  */
2468                 einfo.ei_mode = LCK_NL;
2469                 break;
2470         case F_WRLCK:
2471                 einfo.ei_mode = LCK_PW;
2472                 break;
2473         default:
2474                 CDEBUG(D_INFO, "Unknown fcntl lock type: %d\n", fl_type);
2475                 return -ENOTSUPP;
2476         }
2477
2478         switch (cmd) {
2479         case F_SETLKW:
2480 #ifdef F_SETLKW64
2481         case F_SETLKW64:
2482 #endif
2483                 flags = 0;
2484                 break;
2485         case F_SETLK:
2486 #ifdef F_SETLK64
2487         case F_SETLK64:
2488 #endif
2489                 flags = LDLM_FL_BLOCK_NOWAIT;
2490                 break;
2491         case F_GETLK:
2492 #ifdef F_GETLK64
2493         case F_GETLK64:
2494 #endif
2495                 flags = LDLM_FL_TEST_LOCK;
2496                 break;
2497         default:
2498                 CERROR("unknown fcntl lock command: %d\n", cmd);
2499                 return -EINVAL;
2500         }
2501
2502         /*
2503          * Save the old mode so that if the mode in the lock changes we
2504          * can decrement the appropriate reader or writer refcount.
2505          */
2506         file_lock->fl_type = einfo.ei_mode;
2507
2508         op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
2509                                      LUSTRE_OPC_ANY, NULL);
2510         if (IS_ERR(op_data))
2511                 return PTR_ERR(op_data);
2512
2513         CDEBUG(D_DLMTRACE, "inode=" DFID ", pid=%u, flags=%#llx, mode=%u, start=%llu, end=%llu\n",
2514                PFID(ll_inode2fid(inode)), flock.l_flock.pid, flags,
2515                einfo.ei_mode, flock.l_flock.start, flock.l_flock.end);
2516
2517         rc = md_enqueue(sbi->ll_md_exp, &einfo, &flock, NULL, op_data, &lockh,
2518                         flags);
2519
2520         /* Restore the file lock type if not TEST lock. */
2521         if (!(flags & LDLM_FL_TEST_LOCK))
2522                 file_lock->fl_type = fl_type;
2523
2524         if ((rc == 0 || file_lock->fl_type == F_UNLCK) &&
2525             !(flags & LDLM_FL_TEST_LOCK))
2526                 rc2  = locks_lock_file_wait(file, file_lock);
2527
2528         if (rc2 && file_lock->fl_type != F_UNLCK) {
2529                 einfo.ei_mode = LCK_NL;
2530                 md_enqueue(sbi->ll_md_exp, &einfo, &flock, NULL, op_data,
2531                            &lockh, flags);
2532                 rc = rc2;
2533         }
2534
2535         ll_finish_md_op_data(op_data);
2536
2537         return rc;
2538 }
2539
2540 int ll_get_fid_by_name(struct inode *parent, const char *name,
2541                        int namelen, struct lu_fid *fid,
2542                        struct inode **inode)
2543 {
2544         struct md_op_data *op_data = NULL;
2545         struct ptlrpc_request *req;
2546         struct mdt_body *body;
2547         int rc;
2548
2549         op_data = ll_prep_md_op_data(NULL, parent, NULL, name, namelen, 0,
2550                                      LUSTRE_OPC_ANY, NULL);
2551         if (IS_ERR(op_data))
2552                 return PTR_ERR(op_data);
2553
2554         op_data->op_valid = OBD_MD_FLID | OBD_MD_FLTYPE;
2555         rc = md_getattr_name(ll_i2sbi(parent)->ll_md_exp, op_data, &req);
2556         ll_finish_md_op_data(op_data);
2557         if (rc < 0)
2558                 return rc;
2559
2560         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
2561         if (!body) {
2562                 rc = -EFAULT;
2563                 goto out_req;
2564         }
2565         if (fid)
2566                 *fid = body->mbo_fid1;
2567
2568         if (inode)
2569                 rc = ll_prep_inode(inode, req, parent->i_sb, NULL);
2570 out_req:
2571         ptlrpc_req_finished(req);
2572         return rc;
2573 }
2574
2575 int ll_migrate(struct inode *parent, struct file *file, int mdtidx,
2576                const char *name, int namelen)
2577 {
2578         struct ptlrpc_request *request = NULL;
2579         struct obd_client_handle *och = NULL;
2580         struct inode *child_inode = NULL;
2581         struct dentry *dchild = NULL;
2582         struct md_op_data *op_data;
2583         struct mdt_body *body;
2584         u64 data_version = 0;
2585         struct qstr qstr;
2586         int rc;
2587
2588         CDEBUG(D_VFSTRACE, "migrate %s under " DFID " to MDT%d\n",
2589                name, PFID(ll_inode2fid(parent)), mdtidx);
2590
2591         op_data = ll_prep_md_op_data(NULL, parent, NULL, name, namelen,
2592                                      0, LUSTRE_OPC_ANY, NULL);
2593         if (IS_ERR(op_data))
2594                 return PTR_ERR(op_data);
2595
2596         /* Get child FID first */
2597         qstr.hash = full_name_hash(parent, name, namelen);
2598         qstr.name = name;
2599         qstr.len = namelen;
2600         dchild = d_lookup(file_dentry(file), &qstr);
2601         if (dchild) {
2602                 op_data->op_fid3 = *ll_inode2fid(dchild->d_inode);
2603                 if (dchild->d_inode)
2604                         child_inode = igrab(dchild->d_inode);
2605                 dput(dchild);
2606         }
2607
2608         if (!child_inode) {
2609                 rc = ll_get_fid_by_name(parent, name, namelen,
2610                                         &op_data->op_fid3, &child_inode);
2611                 if (rc)
2612                         goto out_free;
2613         }
2614
2615         if (!child_inode) {
2616                 rc = -EINVAL;
2617                 goto out_free;
2618         }
2619
2620         inode_lock(child_inode);
2621         op_data->op_fid3 = *ll_inode2fid(child_inode);
2622         if (!fid_is_sane(&op_data->op_fid3)) {
2623                 CERROR("%s: migrate %s, but fid " DFID " is insane\n",
2624                        ll_get_fsname(parent->i_sb, NULL, 0), name,
2625                        PFID(&op_data->op_fid3));
2626                 rc = -EINVAL;
2627                 goto out_unlock;
2628         }
2629
2630         rc = ll_get_mdt_idx_by_fid(ll_i2sbi(parent), &op_data->op_fid3);
2631         if (rc < 0)
2632                 goto out_unlock;
2633
2634         if (rc == mdtidx) {
2635                 CDEBUG(D_INFO, "%s: " DFID " is already on MDT%d.\n", name,
2636                        PFID(&op_data->op_fid3), mdtidx);
2637                 rc = 0;
2638                 goto out_unlock;
2639         }
2640 again:
2641         if (S_ISREG(child_inode->i_mode)) {
2642                 och = ll_lease_open(child_inode, NULL, FMODE_WRITE, 0);
2643                 if (IS_ERR(och)) {
2644                         rc = PTR_ERR(och);
2645                         och = NULL;
2646                         goto out_unlock;
2647                 }
2648
2649                 rc = ll_data_version(child_inode, &data_version,
2650                                      LL_DV_WR_FLUSH);
2651                 if (rc)
2652                         goto out_close;
2653
2654                 op_data->op_handle = och->och_fh;
2655                 op_data->op_data = och->och_mod;
2656                 op_data->op_data_version = data_version;
2657                 op_data->op_lease_handle = och->och_lease_handle;
2658                 op_data->op_bias |= MDS_RENAME_MIGRATE;
2659         }
2660
2661         op_data->op_mds = mdtidx;
2662         op_data->op_cli_flags = CLI_MIGRATE;
2663         rc = md_rename(ll_i2sbi(parent)->ll_md_exp, op_data, name,
2664                        namelen, name, namelen, &request);
2665         if (!rc) {
2666                 LASSERT(request);
2667                 ll_update_times(request, parent);
2668
2669                 body = req_capsule_server_get(&request->rq_pill, &RMF_MDT_BODY);
2670                 LASSERT(body);
2671
2672                 /*
2673                  * If the server does release layout lock, then we cleanup
2674                  * the client och here, otherwise release it in out_close:
2675                  */
2676                 if (och && body->mbo_valid & OBD_MD_CLOSE_INTENT_EXECED) {
2677                         obd_mod_put(och->och_mod);
2678                         md_clear_open_replay_data(ll_i2sbi(parent)->ll_md_exp,
2679                                                   och);
2680                         och->och_fh.cookie = DEAD_HANDLE_MAGIC;
2681                         kfree(och);
2682                         och = NULL;
2683                 }
2684         }
2685
2686         if (request) {
2687                 ptlrpc_req_finished(request);
2688                 request = NULL;
2689         }
2690
2691         /* Try again if the file layout has changed. */
2692         if (rc == -EAGAIN && S_ISREG(child_inode->i_mode))
2693                 goto again;
2694
2695 out_close:
2696         if (och) /* close the file */
2697                 ll_lease_close(och, child_inode, NULL);
2698         if (!rc)
2699                 clear_nlink(child_inode);
2700 out_unlock:
2701         inode_unlock(child_inode);
2702         iput(child_inode);
2703 out_free:
2704         ll_finish_md_op_data(op_data);
2705         return rc;
2706 }
2707
2708 static int
2709 ll_file_noflock(struct file *file, int cmd, struct file_lock *file_lock)
2710 {
2711         return -ENOSYS;
2712 }
2713
2714 /**
2715  * test if some locks matching bits and l_req_mode are acquired
2716  * - bits can be in different locks
2717  * - if found clear the common lock bits in *bits
2718  * - the bits not found, are kept in *bits
2719  * \param inode [IN]
2720  * \param bits [IN] searched lock bits [IN]
2721  * \param l_req_mode [IN] searched lock mode
2722  * \retval boolean, true iff all bits are found
2723  */
2724 int ll_have_md_lock(struct inode *inode, __u64 *bits,
2725                     enum ldlm_mode l_req_mode)
2726 {
2727         struct lustre_handle lockh;
2728         union ldlm_policy_data policy;
2729         enum ldlm_mode mode = (l_req_mode == LCK_MINMODE) ?
2730                               (LCK_CR | LCK_CW | LCK_PR | LCK_PW) : l_req_mode;
2731         struct lu_fid *fid;
2732         __u64 flags;
2733         int i;
2734
2735         if (!inode)
2736                 return 0;
2737
2738         fid = &ll_i2info(inode)->lli_fid;
2739         CDEBUG(D_INFO, "trying to match res " DFID " mode %s\n", PFID(fid),
2740                ldlm_lockname[mode]);
2741
2742         flags = LDLM_FL_BLOCK_GRANTED | LDLM_FL_CBPENDING | LDLM_FL_TEST_LOCK;
2743         for (i = 0; i <= MDS_INODELOCK_MAXSHIFT && *bits != 0; i++) {
2744                 policy.l_inodebits.bits = *bits & (1 << i);
2745                 if (policy.l_inodebits.bits == 0)
2746                         continue;
2747
2748                 if (md_lock_match(ll_i2mdexp(inode), flags, fid, LDLM_IBITS,
2749                                   &policy, mode, &lockh)) {
2750                         struct ldlm_lock *lock;
2751
2752                         lock = ldlm_handle2lock(&lockh);
2753                         if (lock) {
2754                                 *bits &=
2755                                       ~(lock->l_policy_data.l_inodebits.bits);
2756                                 LDLM_LOCK_PUT(lock);
2757                         } else {
2758                                 *bits &= ~policy.l_inodebits.bits;
2759                         }
2760                 }
2761         }
2762         return *bits == 0;
2763 }
2764
2765 enum ldlm_mode ll_take_md_lock(struct inode *inode, __u64 bits,
2766                                struct lustre_handle *lockh, __u64 flags,
2767                                enum ldlm_mode mode)
2768 {
2769         union ldlm_policy_data policy = { .l_inodebits = { bits } };
2770         struct lu_fid *fid;
2771
2772         fid = &ll_i2info(inode)->lli_fid;
2773         CDEBUG(D_INFO, "trying to match res " DFID "\n", PFID(fid));
2774
2775         return md_lock_match(ll_i2mdexp(inode), flags | LDLM_FL_BLOCK_GRANTED,
2776                              fid, LDLM_IBITS, &policy, mode, lockh);
2777 }
2778
2779 static int ll_inode_revalidate_fini(struct inode *inode, int rc)
2780 {
2781         /* Already unlinked. Just update nlink and return success */
2782         if (rc == -ENOENT) {
2783                 clear_nlink(inode);
2784                 /* If it is striped directory, and there is bad stripe
2785                  * Let's revalidate the dentry again, instead of returning
2786                  * error
2787                  */
2788                 if (S_ISDIR(inode->i_mode) && ll_i2info(inode)->lli_lsm_md)
2789                         return 0;
2790
2791                 /* This path cannot be hit for regular files unless in
2792                  * case of obscure races, so no need to validate size.
2793                  */
2794                 if (!S_ISREG(inode->i_mode) && !S_ISDIR(inode->i_mode))
2795                         return 0;
2796         } else if (rc != 0) {
2797                 CDEBUG_LIMIT((rc == -EACCES || rc == -EIDRM) ? D_INFO : D_ERROR,
2798                              "%s: revalidate FID " DFID " error: rc = %d\n",
2799                              ll_get_fsname(inode->i_sb, NULL, 0),
2800                              PFID(ll_inode2fid(inode)), rc);
2801         }
2802
2803         return rc;
2804 }
2805
2806 static int __ll_inode_revalidate(struct dentry *dentry, __u64 ibits)
2807 {
2808         struct inode *inode = d_inode(dentry);
2809         struct ptlrpc_request *req = NULL;
2810         struct obd_export *exp;
2811         int rc = 0;
2812
2813         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p),name=%pd\n",
2814                PFID(ll_inode2fid(inode)), inode, dentry);
2815
2816         exp = ll_i2mdexp(inode);
2817
2818         /* XXX: Enable OBD_CONNECT_ATTRFID to reduce unnecessary getattr RPC.
2819          *      But under CMD case, it caused some lock issues, should be fixed
2820          *      with new CMD ibits lock. See bug 12718
2821          */
2822         if (exp_connect_flags(exp) & OBD_CONNECT_ATTRFID) {
2823                 struct lookup_intent oit = { .it_op = IT_GETATTR };
2824                 struct md_op_data *op_data;
2825
2826                 if (ibits == MDS_INODELOCK_LOOKUP)
2827                         oit.it_op = IT_LOOKUP;
2828
2829                 /* Call getattr by fid, so do not provide name at all. */
2830                 op_data = ll_prep_md_op_data(NULL, inode,
2831                                              inode, NULL, 0, 0,
2832                                              LUSTRE_OPC_ANY, NULL);
2833                 if (IS_ERR(op_data))
2834                         return PTR_ERR(op_data);
2835
2836                 rc = md_intent_lock(exp, op_data, &oit, &req,
2837                                     &ll_md_blocking_ast, 0);
2838                 ll_finish_md_op_data(op_data);
2839                 if (rc < 0) {
2840                         rc = ll_inode_revalidate_fini(inode, rc);
2841                         goto out;
2842                 }
2843
2844                 rc = ll_revalidate_it_finish(req, &oit, inode);
2845                 if (rc != 0) {
2846                         ll_intent_release(&oit);
2847                         goto out;
2848                 }
2849
2850                 /* Unlinked? Unhash dentry, so it is not picked up later by
2851                  * do_lookup() -> ll_revalidate_it(). We cannot use d_drop
2852                  * here to preserve get_cwd functionality on 2.6.
2853                  * Bug 10503
2854                  */
2855                 if (!d_inode(dentry)->i_nlink) {
2856                         spin_lock(&inode->i_lock);
2857                         d_lustre_invalidate(dentry, 0);
2858                         spin_unlock(&inode->i_lock);
2859                 }
2860
2861                 ll_lookup_finish_locks(&oit, inode);
2862         } else if (!ll_have_md_lock(d_inode(dentry), &ibits, LCK_MINMODE)) {
2863                 struct ll_sb_info *sbi = ll_i2sbi(d_inode(dentry));
2864                 u64 valid = OBD_MD_FLGETATTR;
2865                 struct md_op_data *op_data;
2866                 int ealen = 0;
2867
2868                 if (S_ISREG(inode->i_mode)) {
2869                         rc = ll_get_default_mdsize(sbi, &ealen);
2870                         if (rc)
2871                                 return rc;
2872                         valid |= OBD_MD_FLEASIZE | OBD_MD_FLMODEASIZE;
2873                 }
2874
2875                 op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL,
2876                                              0, ealen, LUSTRE_OPC_ANY,
2877                                              NULL);
2878                 if (IS_ERR(op_data))
2879                         return PTR_ERR(op_data);
2880
2881                 op_data->op_valid = valid;
2882                 rc = md_getattr(sbi->ll_md_exp, op_data, &req);
2883                 ll_finish_md_op_data(op_data);
2884                 if (rc)
2885                         return ll_inode_revalidate_fini(inode, rc);
2886
2887                 rc = ll_prep_inode(&inode, req, NULL, NULL);
2888         }
2889 out:
2890         ptlrpc_req_finished(req);
2891         return rc;
2892 }
2893
2894 static int ll_merge_md_attr(struct inode *inode)
2895 {
2896         struct cl_attr attr = { 0 };
2897         int rc;
2898
2899         LASSERT(ll_i2info(inode)->lli_lsm_md);
2900         rc = md_merge_attr(ll_i2mdexp(inode), ll_i2info(inode)->lli_lsm_md,
2901                            &attr, ll_md_blocking_ast);
2902         if (rc)
2903                 return rc;
2904
2905         set_nlink(inode, attr.cat_nlink);
2906         inode->i_blocks = attr.cat_blocks;
2907         i_size_write(inode, attr.cat_size);
2908
2909         ll_i2info(inode)->lli_atime = attr.cat_atime;
2910         ll_i2info(inode)->lli_mtime = attr.cat_mtime;
2911         ll_i2info(inode)->lli_ctime = attr.cat_ctime;
2912
2913         return 0;
2914 }
2915
2916 static int ll_inode_revalidate(struct dentry *dentry, __u64 ibits)
2917 {
2918         struct inode *inode = d_inode(dentry);
2919         int rc;
2920
2921         rc = __ll_inode_revalidate(dentry, ibits);
2922         if (rc != 0)
2923                 return rc;
2924
2925         /* if object isn't regular file, don't validate size */
2926         if (!S_ISREG(inode->i_mode)) {
2927                 if (S_ISDIR(inode->i_mode) &&
2928                     ll_i2info(inode)->lli_lsm_md) {
2929                         rc = ll_merge_md_attr(inode);
2930                         if (rc)
2931                                 return rc;
2932                 }
2933
2934                 LTIME_S(inode->i_atime) = ll_i2info(inode)->lli_atime;
2935                 LTIME_S(inode->i_mtime) = ll_i2info(inode)->lli_mtime;
2936                 LTIME_S(inode->i_ctime) = ll_i2info(inode)->lli_ctime;
2937         } else {
2938                 struct ll_inode_info *lli = ll_i2info(inode);
2939
2940                 /* In case of restore, the MDT has the right size and has
2941                  * already send it back without granting the layout lock,
2942                  * inode is up-to-date so glimpse is useless.
2943                  * Also to glimpse we need the layout, in case of a running
2944                  * restore the MDT holds the layout lock so the glimpse will
2945                  * block up to the end of restore (getattr will block)
2946                  */
2947                 if (!test_bit(LLIF_FILE_RESTORING, &lli->lli_flags))
2948                         rc = ll_glimpse_size(inode);
2949         }
2950         return rc;
2951 }
2952
2953 int ll_getattr(const struct path *path, struct kstat *stat,
2954                u32 request_mask, unsigned int flags)
2955 {
2956         struct inode *inode = d_inode(path->dentry);
2957         struct ll_sb_info *sbi = ll_i2sbi(inode);
2958         struct ll_inode_info *lli = ll_i2info(inode);
2959         int res;
2960
2961         res = ll_inode_revalidate(path->dentry,
2962                                   MDS_INODELOCK_UPDATE | MDS_INODELOCK_LOOKUP);
2963         ll_stats_ops_tally(sbi, LPROC_LL_GETATTR, 1);
2964
2965         if (res)
2966                 return res;
2967
2968         OBD_FAIL_TIMEOUT(OBD_FAIL_GETATTR_DELAY, 30);
2969
2970         stat->dev = inode->i_sb->s_dev;
2971         if (ll_need_32bit_api(sbi))
2972                 stat->ino = cl_fid_build_ino(&lli->lli_fid, 1);
2973         else
2974                 stat->ino = inode->i_ino;
2975         stat->mode = inode->i_mode;
2976         stat->uid = inode->i_uid;
2977         stat->gid = inode->i_gid;
2978         stat->rdev = inode->i_rdev;
2979         stat->atime = inode->i_atime;
2980         stat->mtime = inode->i_mtime;
2981         stat->ctime = inode->i_ctime;
2982         stat->blksize = 1 << inode->i_blkbits;
2983
2984         stat->nlink = inode->i_nlink;
2985         stat->size = i_size_read(inode);
2986         stat->blocks = inode->i_blocks;
2987
2988         return 0;
2989 }
2990
2991 static int ll_fiemap(struct inode *inode, struct fiemap_extent_info *fieinfo,
2992                      __u64 start, __u64 len)
2993 {
2994         int rc;
2995         size_t num_bytes;
2996         struct fiemap *fiemap;
2997         unsigned int extent_count = fieinfo->fi_extents_max;
2998
2999         num_bytes = sizeof(*fiemap) + (extent_count *
3000                                        sizeof(struct fiemap_extent));
3001         fiemap = libcfs_kvzalloc(num_bytes, GFP_NOFS);
3002         if (!fiemap)
3003                 return -ENOMEM;
3004
3005         fiemap->fm_flags = fieinfo->fi_flags;
3006         fiemap->fm_extent_count = fieinfo->fi_extents_max;
3007         fiemap->fm_start = start;
3008         fiemap->fm_length = len;
3009
3010         if (extent_count > 0 &&
3011             copy_from_user(&fiemap->fm_extents[0], fieinfo->fi_extents_start,
3012                            sizeof(struct fiemap_extent))) {
3013                 rc = -EFAULT;
3014                 goto out;
3015         }
3016
3017         rc = ll_do_fiemap(inode, fiemap, num_bytes);
3018
3019         fieinfo->fi_flags = fiemap->fm_flags;
3020         fieinfo->fi_extents_mapped = fiemap->fm_mapped_extents;
3021         if (extent_count > 0 &&
3022             copy_to_user(fieinfo->fi_extents_start, &fiemap->fm_extents[0],
3023                          fiemap->fm_mapped_extents *
3024                          sizeof(struct fiemap_extent))) {
3025                 rc = -EFAULT;
3026                 goto out;
3027         }
3028 out:
3029         kvfree(fiemap);
3030         return rc;
3031 }
3032
3033 struct posix_acl *ll_get_acl(struct inode *inode, int type)
3034 {
3035         struct ll_inode_info *lli = ll_i2info(inode);
3036         struct posix_acl *acl = NULL;
3037
3038         spin_lock(&lli->lli_lock);
3039         /* VFS' acl_permission_check->check_acl will release the refcount */
3040         acl = posix_acl_dup(lli->lli_posix_acl);
3041         spin_unlock(&lli->lli_lock);
3042
3043         return acl;
3044 }
3045
3046 int ll_inode_permission(struct inode *inode, int mask)
3047 {
3048         struct ll_sb_info *sbi;
3049         struct root_squash_info *squash;
3050         const struct cred *old_cred = NULL;
3051         struct cred *cred = NULL;
3052         bool squash_id = false;
3053         cfs_cap_t cap;
3054         int rc = 0;
3055
3056         if (mask & MAY_NOT_BLOCK)
3057                 return -ECHILD;
3058
3059        /* as root inode are NOT getting validated in lookup operation,
3060         * need to do it before permission check.
3061         */
3062
3063         if (is_root_inode(inode)) {
3064                 rc = __ll_inode_revalidate(inode->i_sb->s_root,
3065                                            MDS_INODELOCK_LOOKUP);
3066                 if (rc)
3067                         return rc;
3068         }
3069
3070         CDEBUG(D_VFSTRACE, "VFS Op:inode=" DFID "(%p), inode mode %x mask %o\n",
3071                PFID(ll_inode2fid(inode)), inode, inode->i_mode, mask);
3072
3073         /* squash fsuid/fsgid if needed */
3074         sbi = ll_i2sbi(inode);
3075         squash = &sbi->ll_squash;
3076         if (unlikely(squash->rsi_uid &&
3077                      uid_eq(current_fsuid(), GLOBAL_ROOT_UID) &&
3078                      !(sbi->ll_flags & LL_SBI_NOROOTSQUASH))) {
3079                 squash_id = true;
3080         }
3081
3082         if (squash_id) {
3083                 CDEBUG(D_OTHER, "squash creds (%d:%d)=>(%d:%d)\n",
3084                        __kuid_val(current_fsuid()), __kgid_val(current_fsgid()),
3085                        squash->rsi_uid, squash->rsi_gid);
3086
3087                 /*
3088                  * update current process's credentials
3089                  * and FS capability
3090                  */
3091                 cred = prepare_creds();
3092                 if (!cred)
3093                         return -ENOMEM;
3094
3095                 cred->fsuid = make_kuid(&init_user_ns, squash->rsi_uid);
3096                 cred->fsgid = make_kgid(&init_user_ns, squash->rsi_gid);
3097                 for (cap = 0; cap < sizeof(cfs_cap_t) * 8; cap++) {
3098                         if ((1 << cap) & CFS_CAP_FS_MASK)
3099                                 cap_lower(cred->cap_effective, cap);
3100                 }
3101                 old_cred = override_creds(cred);
3102         }
3103
3104         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_INODE_PERM, 1);
3105         rc = generic_permission(inode, mask);
3106
3107         /* restore current process's credentials and FS capability */
3108         if (squash_id) {
3109                 revert_creds(old_cred);
3110                 put_cred(cred);
3111         }
3112
3113         return rc;
3114 }
3115
3116 /* -o localflock - only provides locally consistent flock locks */
3117 const struct file_operations ll_file_operations = {
3118         .read_iter = ll_file_read_iter,
3119         .write_iter = ll_file_write_iter,
3120         .unlocked_ioctl = ll_file_ioctl,
3121         .open      = ll_file_open,
3122         .release        = ll_file_release,
3123         .mmap      = ll_file_mmap,
3124         .llseek  = ll_file_seek,
3125         .splice_read    = generic_file_splice_read,
3126         .fsync    = ll_fsync,
3127         .flush    = ll_flush
3128 };
3129
3130 const struct file_operations ll_file_operations_flock = {
3131         .read_iter    = ll_file_read_iter,
3132         .write_iter   = ll_file_write_iter,
3133         .unlocked_ioctl = ll_file_ioctl,
3134         .open      = ll_file_open,
3135         .release        = ll_file_release,
3136         .mmap      = ll_file_mmap,
3137         .llseek  = ll_file_seek,
3138         .splice_read    = generic_file_splice_read,
3139         .fsync    = ll_fsync,
3140         .flush    = ll_flush,
3141         .flock    = ll_file_flock,
3142         .lock      = ll_file_flock
3143 };
3144
3145 /* These are for -o noflock - to return ENOSYS on flock calls */
3146 const struct file_operations ll_file_operations_noflock = {
3147         .read_iter    = ll_file_read_iter,
3148         .write_iter   = ll_file_write_iter,
3149         .unlocked_ioctl = ll_file_ioctl,
3150         .open      = ll_file_open,
3151         .release        = ll_file_release,
3152         .mmap      = ll_file_mmap,
3153         .llseek  = ll_file_seek,
3154         .splice_read    = generic_file_splice_read,
3155         .fsync    = ll_fsync,
3156         .flush    = ll_flush,
3157         .flock    = ll_file_noflock,
3158         .lock      = ll_file_noflock
3159 };
3160
3161 const struct inode_operations ll_file_inode_operations = {
3162         .setattr        = ll_setattr,
3163         .getattr        = ll_getattr,
3164         .permission     = ll_inode_permission,
3165         .listxattr      = ll_listxattr,
3166         .fiemap         = ll_fiemap,
3167         .get_acl        = ll_get_acl,
3168 };
3169
3170 /* dynamic ioctl number support routines */
3171 static struct llioc_ctl_data {
3172         struct rw_semaphore     ioc_sem;
3173         struct list_head              ioc_head;
3174 } llioc = {
3175         __RWSEM_INITIALIZER(llioc.ioc_sem),
3176         LIST_HEAD_INIT(llioc.ioc_head)
3177 };
3178
3179 struct llioc_data {
3180         struct list_head              iocd_list;
3181         unsigned int        iocd_size;
3182         llioc_callback_t        iocd_cb;
3183         unsigned int        iocd_count;
3184         unsigned int        iocd_cmd[0];
3185 };
3186
3187 void *ll_iocontrol_register(llioc_callback_t cb, int count, unsigned int *cmd)
3188 {
3189         unsigned int size;
3190         struct llioc_data *in_data = NULL;
3191
3192         if (!cb || !cmd || count > LLIOC_MAX_CMD || count < 0)
3193                 return NULL;
3194
3195         size = sizeof(*in_data) + count * sizeof(unsigned int);
3196         in_data = kzalloc(size, GFP_NOFS);
3197         if (!in_data)
3198                 return NULL;
3199
3200         in_data->iocd_size = size;
3201         in_data->iocd_cb = cb;
3202         in_data->iocd_count = count;
3203         memcpy(in_data->iocd_cmd, cmd, sizeof(unsigned int) * count);
3204
3205         down_write(&llioc.ioc_sem);
3206         list_add_tail(&in_data->iocd_list, &llioc.ioc_head);
3207         up_write(&llioc.ioc_sem);
3208
3209         return in_data;
3210 }
3211 EXPORT_SYMBOL(ll_iocontrol_register);
3212
3213 void ll_iocontrol_unregister(void *magic)
3214 {
3215         struct llioc_data *tmp;
3216
3217         if (!magic)
3218                 return;
3219
3220         down_write(&llioc.ioc_sem);
3221         list_for_each_entry(tmp, &llioc.ioc_head, iocd_list) {
3222                 if (tmp == magic) {
3223                         list_del(&tmp->iocd_list);
3224                         up_write(&llioc.ioc_sem);
3225
3226                         kfree(tmp);
3227                         return;
3228                 }
3229         }
3230         up_write(&llioc.ioc_sem);
3231
3232         CWARN("didn't find iocontrol register block with magic: %p\n", magic);
3233 }
3234 EXPORT_SYMBOL(ll_iocontrol_unregister);
3235
3236 static enum llioc_iter
3237 ll_iocontrol_call(struct inode *inode, struct file *file,
3238                   unsigned int cmd, unsigned long arg, int *rcp)
3239 {
3240         enum llioc_iter ret = LLIOC_CONT;
3241         struct llioc_data *data;
3242         int rc = -EINVAL, i;
3243
3244         down_read(&llioc.ioc_sem);
3245         list_for_each_entry(data, &llioc.ioc_head, iocd_list) {
3246                 for (i = 0; i < data->iocd_count; i++) {
3247                         if (cmd != data->iocd_cmd[i])
3248                                 continue;
3249
3250                         ret = data->iocd_cb(inode, file, cmd, arg, data, &rc);
3251                         break;
3252                 }
3253
3254                 if (ret == LLIOC_STOP)
3255                         break;
3256         }
3257         up_read(&llioc.ioc_sem);
3258
3259         if (rcp)
3260                 *rcp = rc;
3261         return ret;
3262 }
3263
3264 int ll_layout_conf(struct inode *inode, const struct cl_object_conf *conf)
3265 {
3266         struct ll_inode_info *lli = ll_i2info(inode);
3267         struct cl_object *obj = lli->lli_clob;
3268         struct lu_env *env;
3269         int rc;
3270         u16 refcheck;
3271
3272         if (!obj)
3273                 return 0;
3274
3275         env = cl_env_get(&refcheck);
3276         if (IS_ERR(env))
3277                 return PTR_ERR(env);
3278
3279         rc = cl_conf_set(env, obj, conf);
3280         if (rc < 0)
3281                 goto out;
3282
3283         if (conf->coc_opc == OBJECT_CONF_SET) {
3284                 struct ldlm_lock *lock = conf->coc_lock;
3285                 struct cl_layout cl = {
3286                         .cl_layout_gen = 0,
3287                 };
3288
3289                 LASSERT(lock);
3290                 LASSERT(ldlm_has_layout(lock));
3291
3292                 /* it can only be allowed to match after layout is
3293                  * applied to inode otherwise false layout would be
3294                  * seen. Applying layout should happen before dropping
3295                  * the intent lock.
3296                  */
3297                 ldlm_lock_allow_match(lock);
3298
3299                 rc = cl_object_layout_get(env, obj, &cl);
3300                 if (rc < 0)
3301                         goto out;
3302
3303                 CDEBUG(D_VFSTRACE, DFID ": layout version change: %u -> %u\n",
3304                        PFID(&lli->lli_fid), ll_layout_version_get(lli),
3305                        cl.cl_layout_gen);
3306                 ll_layout_version_set(lli, cl.cl_layout_gen);
3307         }
3308 out:
3309         cl_env_put(env, &refcheck);
3310         return rc;
3311 }
3312
3313 /* Fetch layout from MDT with getxattr request, if it's not ready yet */
3314 static int ll_layout_fetch(struct inode *inode, struct ldlm_lock *lock)
3315
3316 {
3317         struct ll_sb_info *sbi = ll_i2sbi(inode);
3318         struct ptlrpc_request *req;
3319         struct mdt_body *body;
3320         void *lvbdata;
3321         void *lmm;
3322         int lmmsize;
3323         int rc;
3324
3325         CDEBUG(D_INODE, DFID " LVB_READY=%d l_lvb_data=%p l_lvb_len=%d\n",
3326                PFID(ll_inode2fid(inode)), ldlm_is_lvb_ready(lock),
3327                lock->l_lvb_data, lock->l_lvb_len);
3328
3329         if (lock->l_lvb_data && ldlm_is_lvb_ready(lock))
3330                 return 0;
3331
3332         /* if layout lock was granted right away, the layout is returned
3333          * within DLM_LVB of dlm reply; otherwise if the lock was ever
3334          * blocked and then granted via completion ast, we have to fetch
3335          * layout here. Please note that we can't use the LVB buffer in
3336          * completion AST because it doesn't have a large enough buffer
3337          */
3338         rc = ll_get_default_mdsize(sbi, &lmmsize);
3339         if (rc == 0)
3340                 rc = md_getxattr(sbi->ll_md_exp, ll_inode2fid(inode),
3341                                  OBD_MD_FLXATTR, XATTR_NAME_LOV, NULL, 0,
3342                                  lmmsize, 0, &req);
3343         if (rc < 0)
3344                 return rc;
3345
3346         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
3347         if (!body) {
3348                 rc = -EPROTO;
3349                 goto out;
3350         }
3351
3352         lmmsize = body->mbo_eadatasize;
3353         if (lmmsize == 0) /* empty layout */ {
3354                 rc = 0;
3355                 goto out;
3356         }
3357
3358         lmm = req_capsule_server_sized_get(&req->rq_pill, &RMF_EADATA, lmmsize);
3359         if (!lmm) {
3360                 rc = -EFAULT;
3361                 goto out;
3362         }
3363
3364         lvbdata = libcfs_kvzalloc(lmmsize, GFP_NOFS);
3365         if (!lvbdata) {
3366                 rc = -ENOMEM;
3367                 goto out;
3368         }
3369
3370         memcpy(lvbdata, lmm, lmmsize);
3371         lock_res_and_lock(lock);
3372         if (lock->l_lvb_data)
3373                 kvfree(lock->l_lvb_data);
3374
3375         lock->l_lvb_data = lvbdata;
3376         lock->l_lvb_len = lmmsize;
3377         unlock_res_and_lock(lock);
3378
3379 out:
3380         ptlrpc_req_finished(req);
3381         return rc;
3382 }
3383
3384 /**
3385  * Apply the layout to the inode. Layout lock is held and will be released
3386  * in this function.
3387  */
3388 static int ll_layout_lock_set(struct lustre_handle *lockh, enum ldlm_mode mode,
3389                               struct inode *inode)
3390 {
3391         struct ll_inode_info *lli = ll_i2info(inode);
3392         struct ll_sb_info    *sbi = ll_i2sbi(inode);
3393         struct ldlm_lock *lock;
3394         struct cl_object_conf conf;
3395         int rc = 0;
3396         bool lvb_ready;
3397         bool wait_layout = false;
3398
3399         LASSERT(lustre_handle_is_used(lockh));
3400
3401         lock = ldlm_handle2lock(lockh);
3402         LASSERT(lock);
3403         LASSERT(ldlm_has_layout(lock));
3404
3405         LDLM_DEBUG(lock, "File " DFID "(%p) being reconfigured",
3406                    PFID(&lli->lli_fid), inode);
3407
3408         /* in case this is a caching lock and reinstate with new inode */
3409         md_set_lock_data(sbi->ll_md_exp, lockh, inode, NULL);
3410
3411         lock_res_and_lock(lock);
3412         lvb_ready = ldlm_is_lvb_ready(lock);
3413         unlock_res_and_lock(lock);
3414         /* checking lvb_ready is racy but this is okay. The worst case is
3415          * that multi processes may configure the file on the same time.
3416          */
3417         if (lvb_ready) {
3418                 rc = 0;
3419                 goto out;
3420         }
3421
3422         rc = ll_layout_fetch(inode, lock);
3423         if (rc < 0)
3424                 goto out;
3425
3426         /* for layout lock, lmm is returned in lock's lvb.
3427          * lvb_data is immutable if the lock is held so it's safe to access it
3428          * without res lock.
3429          *
3430          * set layout to file. Unlikely this will fail as old layout was
3431          * surely eliminated
3432          */
3433         memset(&conf, 0, sizeof(conf));
3434         conf.coc_opc = OBJECT_CONF_SET;
3435         conf.coc_inode = inode;
3436         conf.coc_lock = lock;
3437         conf.u.coc_layout.lb_buf = lock->l_lvb_data;
3438         conf.u.coc_layout.lb_len = lock->l_lvb_len;
3439         rc = ll_layout_conf(inode, &conf);
3440
3441         /* refresh layout failed, need to wait */
3442         wait_layout = rc == -EBUSY;
3443
3444 out:
3445         LDLM_LOCK_PUT(lock);
3446         ldlm_lock_decref(lockh, mode);
3447
3448         /* wait for IO to complete if it's still being used. */
3449         if (wait_layout) {
3450                 CDEBUG(D_INODE, "%s: " DFID "(%p) wait for layout reconf\n",
3451                        ll_get_fsname(inode->i_sb, NULL, 0),
3452                        PFID(&lli->lli_fid), inode);
3453
3454                 memset(&conf, 0, sizeof(conf));
3455                 conf.coc_opc = OBJECT_CONF_WAIT;
3456                 conf.coc_inode = inode;
3457                 rc = ll_layout_conf(inode, &conf);
3458                 if (rc == 0)
3459                         rc = -EAGAIN;
3460
3461                 CDEBUG(D_INODE,
3462                        "%s: file=" DFID " waiting layout return: %d.\n",
3463                        ll_get_fsname(inode->i_sb, NULL, 0),
3464                        PFID(&lli->lli_fid), rc);
3465         }
3466         return rc;
3467 }
3468
3469 static int ll_layout_refresh_locked(struct inode *inode)
3470 {
3471         struct ll_inode_info  *lli = ll_i2info(inode);
3472         struct ll_sb_info     *sbi = ll_i2sbi(inode);
3473         struct md_op_data     *op_data;
3474         struct lookup_intent   it;
3475         struct lustre_handle   lockh;
3476         enum ldlm_mode         mode;
3477         struct ldlm_enqueue_info einfo = {
3478                 .ei_type = LDLM_IBITS,
3479                 .ei_mode = LCK_CR,
3480                 .ei_cb_bl = &ll_md_blocking_ast,
3481                 .ei_cb_cp = &ldlm_completion_ast,
3482         };
3483         int rc;
3484
3485 again:
3486         /* mostly layout lock is caching on the local side, so try to match
3487          * it before grabbing layout lock mutex.
3488          */
3489         mode = ll_take_md_lock(inode, MDS_INODELOCK_LAYOUT, &lockh, 0,
3490                                LCK_CR | LCK_CW | LCK_PR | LCK_PW);
3491         if (mode != 0) { /* hit cached lock */
3492                 rc = ll_layout_lock_set(&lockh, mode, inode);
3493                 if (rc == -EAGAIN)
3494                         goto again;
3495                 return rc;
3496         }
3497
3498         op_data = ll_prep_md_op_data(NULL, inode, inode, NULL,
3499                                      0, 0, LUSTRE_OPC_ANY, NULL);
3500         if (IS_ERR(op_data))
3501                 return PTR_ERR(op_data);
3502
3503         /* have to enqueue one */
3504         memset(&it, 0, sizeof(it));
3505         it.it_op = IT_LAYOUT;
3506         lockh.cookie = 0ULL;
3507
3508         LDLM_DEBUG_NOLOCK("%s: requeue layout lock for file " DFID "(%p)",
3509                           ll_get_fsname(inode->i_sb, NULL, 0),
3510                           PFID(&lli->lli_fid), inode);
3511
3512         rc = md_enqueue(sbi->ll_md_exp, &einfo, NULL, &it, op_data, &lockh, 0);
3513         ptlrpc_req_finished(it.it_request);
3514         it.it_request = NULL;
3515
3516         ll_finish_md_op_data(op_data);
3517
3518         mode = it.it_lock_mode;
3519         it.it_lock_mode = 0;
3520         ll_intent_drop_lock(&it);
3521
3522         if (rc == 0) {
3523                 /* set lock data in case this is a new lock */
3524                 ll_set_lock_data(sbi->ll_md_exp, inode, &it, NULL);
3525                 rc = ll_layout_lock_set(&lockh, mode, inode);
3526                 if (rc == -EAGAIN)
3527                         goto again;
3528         }
3529
3530         return rc;
3531 }
3532
3533 /**
3534  * This function checks if there exists a LAYOUT lock on the client side,
3535  * or enqueues it if it doesn't have one in cache.
3536  *
3537  * This function will not hold layout lock so it may be revoked any time after
3538  * this function returns. Any operations depend on layout should be redone
3539  * in that case.
3540  *
3541  * This function should be called before lov_io_init() to get an uptodate
3542  * layout version, the caller should save the version number and after IO
3543  * is finished, this function should be called again to verify that layout
3544  * is not changed during IO time.
3545  */
3546 int ll_layout_refresh(struct inode *inode, __u32 *gen)
3547 {
3548         struct ll_inode_info *lli = ll_i2info(inode);
3549         struct ll_sb_info *sbi = ll_i2sbi(inode);
3550         int rc;
3551
3552         *gen = ll_layout_version_get(lli);
3553         if (!(sbi->ll_flags & LL_SBI_LAYOUT_LOCK) || *gen != CL_LAYOUT_GEN_NONE)
3554                 return 0;
3555
3556         /* sanity checks */
3557         LASSERT(fid_is_sane(ll_inode2fid(inode)));
3558         LASSERT(S_ISREG(inode->i_mode));
3559
3560         /* take layout lock mutex to enqueue layout lock exclusively. */
3561         mutex_lock(&lli->lli_layout_mutex);
3562
3563         rc = ll_layout_refresh_locked(inode);
3564         if (rc < 0)
3565                 goto out;
3566
3567         *gen = ll_layout_version_get(lli);
3568 out:
3569         mutex_unlock(&lli->lli_layout_mutex);
3570
3571         return rc;
3572 }
3573
3574 /**
3575  *  This function send a restore request to the MDT
3576  */
3577 int ll_layout_restore(struct inode *inode, loff_t offset, __u64 length)
3578 {
3579         struct hsm_user_request *hur;
3580         int                      len, rc;
3581
3582         len = sizeof(struct hsm_user_request) +
3583               sizeof(struct hsm_user_item);
3584         hur = kzalloc(len, GFP_NOFS);
3585         if (!hur)
3586                 return -ENOMEM;
3587
3588         hur->hur_request.hr_action = HUA_RESTORE;
3589         hur->hur_request.hr_archive_id = 0;
3590         hur->hur_request.hr_flags = 0;
3591         memcpy(&hur->hur_user_item[0].hui_fid, &ll_i2info(inode)->lli_fid,
3592                sizeof(hur->hur_user_item[0].hui_fid));
3593         hur->hur_user_item[0].hui_extent.offset = offset;
3594         hur->hur_user_item[0].hui_extent.length = length;
3595         hur->hur_request.hr_itemcount = 1;
3596         rc = obd_iocontrol(LL_IOC_HSM_REQUEST, ll_i2sbi(inode)->ll_md_exp,
3597                            len, hur, NULL);
3598         kfree(hur);
3599         return rc;
3600 }