Whamcloud - gitweb
LU-15217 pcc: disable PCC for encrypted files
[fs/lustre-release.git] / lustre / llite / file.c
1 /*
2  * GPL HEADER START
3  *
4  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
5  *
6  * This program is free software; you can redistribute it and/or modify
7  * it under the terms of the GNU General Public License version 2 only,
8  * as published by the Free Software Foundation.
9  *
10  * This program is distributed in the hope that it will be useful, but
11  * WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13  * General Public License version 2 for more details (a copy is included
14  * in the LICENSE file that accompanied this code).
15  *
16  * You should have received a copy of the GNU General Public License
17  * version 2 along with this program; If not, see
18  * http://www.gnu.org/licenses/gpl-2.0.html
19  *
20  * GPL HEADER END
21  */
22 /*
23  * Copyright (c) 2002, 2010, Oracle and/or its affiliates. All rights reserved.
24  * Use is subject to license terms.
25  *
26  * Copyright (c) 2011, 2017, Intel Corporation.
27  */
28 /*
29  * This file is part of Lustre, http://www.lustre.org/
30  *
31  * lustre/llite/file.c
32  *
33  * Author: Peter Braam <braam@clusterfs.com>
34  * Author: Phil Schwan <phil@clusterfs.com>
35  * Author: Andreas Dilger <adilger@clusterfs.com>
36  */
37
38 #define DEBUG_SUBSYSTEM S_LLITE
39 #include <lustre_dlm.h>
40 #include <linux/pagemap.h>
41 #include <linux/file.h>
42 #include <linux/sched.h>
43 #include <linux/user_namespace.h>
44 #include <linux/uidgid.h>
45 #include <linux/falloc.h>
46 #include <linux/ktime.h>
47
48 #include <uapi/linux/lustre/lustre_ioctl.h>
49 #include <uapi/linux/llcrypt.h>
50 #include <lustre_swab.h>
51
52 #include "cl_object.h"
53 #include "llite_internal.h"
54 #include "vvp_internal.h"
55
56 struct split_param {
57         struct inode    *sp_inode;
58         __u16           sp_mirror_id;
59 };
60
61 struct pcc_param {
62         __u64   pa_data_version;
63         __u32   pa_archive_id;
64         __u32   pa_layout_gen;
65 };
66
67 static int
68 ll_put_grouplock(struct inode *inode, struct file *file, unsigned long arg);
69
70 static int ll_lease_close(struct obd_client_handle *och, struct inode *inode,
71                           bool *lease_broken);
72
73 static struct ll_file_data *ll_file_data_get(void)
74 {
75         struct ll_file_data *fd;
76
77         OBD_SLAB_ALLOC_PTR_GFP(fd, ll_file_data_slab, GFP_NOFS);
78         if (fd == NULL)
79                 return NULL;
80
81         fd->fd_write_failed = false;
82         pcc_file_init(&fd->fd_pcc_file);
83
84         return fd;
85 }
86
87 static void ll_file_data_put(struct ll_file_data *fd)
88 {
89         if (fd != NULL)
90                 OBD_SLAB_FREE_PTR(fd, ll_file_data_slab);
91 }
92
93 /**
94  * Packs all the attributes into @op_data for the CLOSE rpc.
95  */
96 static void ll_prepare_close(struct inode *inode, struct md_op_data *op_data,
97                              struct obd_client_handle *och)
98 {
99         ENTRY;
100
101         ll_prep_md_op_data(op_data, inode, NULL, NULL,
102                            0, 0, LUSTRE_OPC_ANY, NULL);
103
104         op_data->op_attr.ia_mode = inode->i_mode;
105         op_data->op_attr.ia_atime = inode->i_atime;
106         op_data->op_attr.ia_mtime = inode->i_mtime;
107         op_data->op_attr.ia_ctime = inode->i_ctime;
108         op_data->op_attr.ia_size = i_size_read(inode);
109         op_data->op_attr.ia_valid |= (ATTR_MODE | ATTR_ATIME | ATTR_ATIME_SET |
110                                       ATTR_MTIME | ATTR_MTIME_SET |
111                                       ATTR_CTIME);
112         op_data->op_xvalid |= OP_XVALID_CTIME_SET;
113         op_data->op_attr_blocks = inode->i_blocks;
114         op_data->op_attr_flags = ll_inode_to_ext_flags(inode->i_flags);
115         if (test_bit(LLIF_PROJECT_INHERIT, &ll_i2info(inode)->lli_flags))
116                 op_data->op_attr_flags |= LUSTRE_PROJINHERIT_FL;
117         op_data->op_open_handle = och->och_open_handle;
118
119         if (och->och_flags & FMODE_WRITE &&
120             test_and_clear_bit(LLIF_DATA_MODIFIED, &ll_i2info(inode)->lli_flags))
121                 /* For HSM: if inode data has been modified, pack it so that
122                  * MDT can set data dirty flag in the archive. */
123                 op_data->op_bias |= MDS_DATA_MODIFIED;
124
125         EXIT;
126 }
127
128 /**
129  * Perform a close, possibly with a bias.
130  * The meaning of "data" depends on the value of "bias".
131  *
132  * If \a bias is MDS_HSM_RELEASE then \a data is a pointer to the data version.
133  * If \a bias is MDS_CLOSE_LAYOUT_SWAP then \a data is a pointer to the inode to
134  * swap layouts with.
135  */
136 static int ll_close_inode_openhandle(struct inode *inode,
137                                      struct obd_client_handle *och,
138                                      enum mds_op_bias bias, void *data)
139 {
140         struct obd_export *md_exp = ll_i2mdexp(inode);
141         const struct ll_inode_info *lli = ll_i2info(inode);
142         struct md_op_data *op_data;
143         struct ptlrpc_request *req = NULL;
144         int rc;
145         ENTRY;
146
147         if (class_exp2obd(md_exp) == NULL) {
148                 CERROR("%s: invalid MDC connection handle closing "DFID"\n",
149                        ll_i2sbi(inode)->ll_fsname, PFID(&lli->lli_fid));
150                 GOTO(out, rc = 0);
151         }
152
153         OBD_ALLOC_PTR(op_data);
154         /* We leak openhandle and request here on error, but not much to be
155          * done in OOM case since app won't retry close on error either. */
156         if (op_data == NULL)
157                 GOTO(out, rc = -ENOMEM);
158
159         ll_prepare_close(inode, op_data, och);
160         switch (bias) {
161         case MDS_CLOSE_LAYOUT_MERGE:
162                 /* merge blocks from the victim inode */
163                 op_data->op_attr_blocks += ((struct inode *)data)->i_blocks;
164                 op_data->op_attr.ia_valid |= ATTR_SIZE;
165                 op_data->op_xvalid |= OP_XVALID_BLOCKS;
166                 /* fallthrough */
167         case MDS_CLOSE_LAYOUT_SPLIT:
168         case MDS_CLOSE_LAYOUT_SWAP: {
169                 struct split_param *sp = data;
170
171                 LASSERT(data != NULL);
172                 op_data->op_bias |= bias;
173                 op_data->op_data_version = 0;
174                 op_data->op_lease_handle = och->och_lease_handle;
175                 if (bias == MDS_CLOSE_LAYOUT_SPLIT) {
176                         op_data->op_fid2 = *ll_inode2fid(sp->sp_inode);
177                         op_data->op_mirror_id = sp->sp_mirror_id;
178                 } else {
179                         op_data->op_fid2 = *ll_inode2fid(data);
180                 }
181                 break;
182         }
183
184         case MDS_CLOSE_RESYNC_DONE: {
185                 struct ll_ioc_lease *ioc = data;
186
187                 LASSERT(data != NULL);
188                 op_data->op_attr_blocks +=
189                         ioc->lil_count * op_data->op_attr_blocks;
190                 op_data->op_attr.ia_valid |= ATTR_SIZE;
191                 op_data->op_xvalid |= OP_XVALID_BLOCKS;
192                 op_data->op_bias |= MDS_CLOSE_RESYNC_DONE;
193
194                 op_data->op_lease_handle = och->och_lease_handle;
195                 op_data->op_data = &ioc->lil_ids[0];
196                 op_data->op_data_size =
197                         ioc->lil_count * sizeof(ioc->lil_ids[0]);
198                 break;
199         }
200
201         case MDS_PCC_ATTACH: {
202                 struct pcc_param *param = data;
203
204                 LASSERT(data != NULL);
205                 op_data->op_bias |= MDS_HSM_RELEASE | MDS_PCC_ATTACH;
206                 op_data->op_archive_id = param->pa_archive_id;
207                 op_data->op_data_version = param->pa_data_version;
208                 op_data->op_lease_handle = och->och_lease_handle;
209                 break;
210         }
211
212         case MDS_HSM_RELEASE:
213                 LASSERT(data != NULL);
214                 op_data->op_bias |= MDS_HSM_RELEASE;
215                 op_data->op_data_version = *(__u64 *)data;
216                 op_data->op_lease_handle = och->och_lease_handle;
217                 op_data->op_attr.ia_valid |= ATTR_SIZE;
218                 op_data->op_xvalid |= OP_XVALID_BLOCKS;
219                 break;
220
221         default:
222                 LASSERT(data == NULL);
223                 break;
224         }
225
226         if (!(op_data->op_attr.ia_valid & ATTR_SIZE))
227                 op_data->op_xvalid |= OP_XVALID_LAZYSIZE;
228         if (!(op_data->op_xvalid & OP_XVALID_BLOCKS))
229                 op_data->op_xvalid |= OP_XVALID_LAZYBLOCKS;
230
231         rc = md_close(md_exp, op_data, och->och_mod, &req);
232         if (rc != 0 && rc != -EINTR)
233                 CERROR("%s: inode "DFID" mdc close failed: rc = %d\n",
234                        md_exp->exp_obd->obd_name, PFID(&lli->lli_fid), rc);
235
236         if (rc == 0 && op_data->op_bias & bias) {
237                 struct mdt_body *body;
238
239                 body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
240                 if (!(body->mbo_valid & OBD_MD_CLOSE_INTENT_EXECED))
241                         rc = -EBUSY;
242
243                 if (bias & MDS_PCC_ATTACH) {
244                         struct pcc_param *param = data;
245
246                         param->pa_layout_gen = body->mbo_layout_gen;
247                 }
248         }
249
250         ll_finish_md_op_data(op_data);
251         EXIT;
252 out:
253
254         md_clear_open_replay_data(md_exp, och);
255         och->och_open_handle.cookie = DEAD_HANDLE_MAGIC;
256         OBD_FREE_PTR(och);
257
258         ptlrpc_req_finished(req);       /* This is close request */
259         return rc;
260 }
261
262 int ll_md_real_close(struct inode *inode, fmode_t fmode)
263 {
264         struct ll_inode_info *lli = ll_i2info(inode);
265         struct obd_client_handle **och_p;
266         struct obd_client_handle *och;
267         __u64 *och_usecount;
268         int rc = 0;
269         ENTRY;
270
271         if (fmode & FMODE_WRITE) {
272                 och_p = &lli->lli_mds_write_och;
273                 och_usecount = &lli->lli_open_fd_write_count;
274         } else if (fmode & FMODE_EXEC) {
275                 och_p = &lli->lli_mds_exec_och;
276                 och_usecount = &lli->lli_open_fd_exec_count;
277         } else {
278                 LASSERT(fmode & FMODE_READ);
279                 och_p = &lli->lli_mds_read_och;
280                 och_usecount = &lli->lli_open_fd_read_count;
281         }
282
283         mutex_lock(&lli->lli_och_mutex);
284         if (*och_usecount > 0) {
285                 /* There are still users of this handle, so skip
286                  * freeing it. */
287                 mutex_unlock(&lli->lli_och_mutex);
288                 RETURN(0);
289         }
290
291         och = *och_p;
292         *och_p = NULL;
293         mutex_unlock(&lli->lli_och_mutex);
294
295         if (och != NULL) {
296                 /* There might be a race and this handle may already
297                  * be closed. */
298                 rc = ll_close_inode_openhandle(inode, och, 0, NULL);
299         }
300
301         RETURN(rc);
302 }
303
304 static int ll_md_close(struct inode *inode, struct file *file)
305 {
306         union ldlm_policy_data policy = {
307                 .l_inodebits    = { MDS_INODELOCK_OPEN },
308         };
309         __u64 flags = LDLM_FL_BLOCK_GRANTED | LDLM_FL_TEST_LOCK;
310         struct ll_file_data *fd = file->private_data;
311         struct ll_inode_info *lli = ll_i2info(inode);
312         struct lustre_handle lockh;
313         enum ldlm_mode lockmode;
314         int rc = 0;
315         ENTRY;
316
317         /* clear group lock, if present */
318         if (unlikely(fd->fd_flags & LL_FILE_GROUP_LOCKED))
319                 ll_put_grouplock(inode, file, fd->fd_grouplock.lg_gid);
320
321         mutex_lock(&lli->lli_och_mutex);
322         if (fd->fd_lease_och != NULL) {
323                 bool lease_broken;
324                 struct obd_client_handle *lease_och;
325
326                 lease_och = fd->fd_lease_och;
327                 fd->fd_lease_och = NULL;
328                 mutex_unlock(&lli->lli_och_mutex);
329
330                 /* Usually the lease is not released when the
331                  * application crashed, we need to release here. */
332                 rc = ll_lease_close(lease_och, inode, &lease_broken);
333
334                 mutex_lock(&lli->lli_och_mutex);
335
336                 CDEBUG_LIMIT(rc ? D_ERROR : D_INODE,
337                              "Clean up lease "DFID" %d/%d\n",
338                              PFID(&lli->lli_fid), rc, lease_broken);
339         }
340
341         if (fd->fd_och != NULL) {
342                 struct obd_client_handle *och;
343
344                 och = fd->fd_och;
345                 fd->fd_och = NULL;
346                 mutex_unlock(&lli->lli_och_mutex);
347
348                 rc = ll_close_inode_openhandle(inode, och, 0, NULL);
349                 GOTO(out, rc);
350         }
351
352         /* Let's see if we have good enough OPEN lock on the file and if
353            we can skip talking to MDS */
354         if (fd->fd_omode & FMODE_WRITE) {
355                 lockmode = LCK_CW;
356                 LASSERT(lli->lli_open_fd_write_count);
357                 lli->lli_open_fd_write_count--;
358         } else if (fd->fd_omode & FMODE_EXEC) {
359                 lockmode = LCK_PR;
360                 LASSERT(lli->lli_open_fd_exec_count);
361                 lli->lli_open_fd_exec_count--;
362         } else {
363                 lockmode = LCK_CR;
364                 LASSERT(lli->lli_open_fd_read_count);
365                 lli->lli_open_fd_read_count--;
366         }
367         mutex_unlock(&lli->lli_och_mutex);
368
369         /* LU-4398: do not cache write open lock if the file has exec bit */
370         if ((lockmode == LCK_CW && inode->i_mode & S_IXUGO) ||
371             !md_lock_match(ll_i2mdexp(inode), flags, ll_inode2fid(inode),
372                            LDLM_IBITS, &policy, lockmode, &lockh))
373                 rc = ll_md_real_close(inode, fd->fd_omode);
374
375 out:
376         file->private_data = NULL;
377         ll_file_data_put(fd);
378
379         RETURN(rc);
380 }
381
382 /* While this returns an error code, fput() the caller does not, so we need
383  * to make every effort to clean up all of our state here.  Also, applications
384  * rarely check close errors and even if an error is returned they will not
385  * re-try the close call.
386  */
387 int ll_file_release(struct inode *inode, struct file *file)
388 {
389         struct ll_file_data *fd;
390         struct ll_sb_info *sbi = ll_i2sbi(inode);
391         struct ll_inode_info *lli = ll_i2info(inode);
392         ktime_t kstart = ktime_get();
393         int rc;
394
395         ENTRY;
396
397         CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p)\n",
398                PFID(ll_inode2fid(inode)), inode);
399
400         fd = file->private_data;
401         LASSERT(fd != NULL);
402
403         /* The last ref on @file, maybe not the the owner pid of statahead,
404          * because parent and child process can share the same file handle. */
405         if (S_ISDIR(inode->i_mode) && lli->lli_opendir_key == fd)
406                 ll_deauthorize_statahead(inode, fd);
407
408         if (is_root_inode(inode)) {
409                 file->private_data = NULL;
410                 ll_file_data_put(fd);
411                 GOTO(out, rc = 0);
412         }
413
414         pcc_file_release(inode, file);
415
416         if (!S_ISDIR(inode->i_mode)) {
417                 if (lli->lli_clob != NULL)
418                         lov_read_and_clear_async_rc(lli->lli_clob);
419                 lli->lli_async_rc = 0;
420         }
421
422         lli->lli_close_fd_time = ktime_get();
423
424         rc = ll_md_close(inode, file);
425
426         if (CFS_FAIL_TIMEOUT_MS(OBD_FAIL_PTLRPC_DUMP_LOG, cfs_fail_val))
427                 libcfs_debug_dumplog();
428
429 out:
430         if (!rc && !is_root_inode(inode))
431                 ll_stats_ops_tally(sbi, LPROC_LL_RELEASE,
432                                    ktime_us_delta(ktime_get(), kstart));
433         RETURN(rc);
434 }
435
436 static inline int ll_dom_readpage(void *data, struct page *page)
437 {
438         struct niobuf_local *lnb = data;
439         void *kaddr;
440         int rc = 0;
441
442         struct inode *inode = page2inode(page);
443
444         kaddr = kmap_atomic(page);
445         memcpy(kaddr, lnb->lnb_data, lnb->lnb_len);
446         if (lnb->lnb_len < PAGE_SIZE)
447                 memset(kaddr + lnb->lnb_len, 0,
448                        PAGE_SIZE - lnb->lnb_len);
449         flush_dcache_page(page);
450         SetPageUptodate(page);
451         kunmap_atomic(kaddr);
452
453         if (inode && IS_ENCRYPTED(inode) && S_ISREG(inode->i_mode)) {
454                 if (!llcrypt_has_encryption_key(inode))
455                         CDEBUG(D_SEC, "no enc key for "DFID"\n",
456                                PFID(ll_inode2fid(inode)));
457                 else {
458                         unsigned int offs = 0;
459
460                         while (offs < PAGE_SIZE) {
461                                 /* decrypt only if page is not empty */
462                                 if (memcmp(page_address(page) + offs,
463                                            page_address(ZERO_PAGE(0)),
464                                            LUSTRE_ENCRYPTION_UNIT_SIZE) == 0)
465                                         break;
466
467                                 rc = llcrypt_decrypt_pagecache_blocks(page,
468                                                     LUSTRE_ENCRYPTION_UNIT_SIZE,
469                                                                       offs);
470                                 if (rc)
471                                         break;
472
473                                 offs += LUSTRE_ENCRYPTION_UNIT_SIZE;
474                         }
475                 }
476         }
477         unlock_page(page);
478
479         return rc;
480 }
481
482 void ll_dom_finish_open(struct inode *inode, struct ptlrpc_request *req)
483 {
484         struct lu_env *env;
485         struct cl_io *io;
486         struct ll_inode_info *lli = ll_i2info(inode);
487         struct cl_object *obj = lli->lli_clob;
488         struct address_space *mapping = inode->i_mapping;
489         struct page *vmpage;
490         struct niobuf_remote *rnb;
491         struct mdt_body *body;
492         char *data;
493         unsigned long index, start;
494         struct niobuf_local lnb;
495         __u16 refcheck;
496         int rc;
497
498         ENTRY;
499
500         if (obj == NULL)
501                 RETURN_EXIT;
502
503         if (!req_capsule_field_present(&req->rq_pill, &RMF_NIOBUF_INLINE,
504                                        RCL_SERVER))
505                 RETURN_EXIT;
506
507         rnb = req_capsule_server_get(&req->rq_pill, &RMF_NIOBUF_INLINE);
508         if (rnb == NULL || rnb->rnb_len == 0)
509                 RETURN_EXIT;
510
511         /* LU-11595: Server may return whole file and that is OK always or
512          * it may return just file tail and its offset must be aligned with
513          * client PAGE_SIZE to be used on that client, if server's PAGE_SIZE is
514          * smaller then offset may be not aligned and that data is just ignored.
515          */
516         if (rnb->rnb_offset & ~PAGE_MASK)
517                 RETURN_EXIT;
518
519         /* Server returns whole file or just file tail if it fills in reply
520          * buffer, in both cases total size should be equal to the file size.
521          */
522         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
523         if (rnb->rnb_offset + rnb->rnb_len != body->mbo_dom_size &&
524             !(inode && IS_ENCRYPTED(inode))) {
525                 CERROR("%s: server returns off/len %llu/%u but size %llu\n",
526                        ll_i2sbi(inode)->ll_fsname, rnb->rnb_offset,
527                        rnb->rnb_len, body->mbo_dom_size);
528                 RETURN_EXIT;
529         }
530
531         env = cl_env_get(&refcheck);
532         if (IS_ERR(env))
533                 RETURN_EXIT;
534         io = vvp_env_thread_io(env);
535         io->ci_obj = obj;
536         io->ci_ignore_layout = 1;
537         rc = cl_io_init(env, io, CIT_MISC, obj);
538         if (rc)
539                 GOTO(out_io, rc);
540
541         CDEBUG(D_INFO, "Get data along with open at %llu len %i, size %llu\n",
542                rnb->rnb_offset, rnb->rnb_len, body->mbo_dom_size);
543
544         data = (char *)rnb + sizeof(*rnb);
545
546         lnb.lnb_file_offset = rnb->rnb_offset;
547         start = lnb.lnb_file_offset >> PAGE_SHIFT;
548         index = 0;
549         LASSERT((lnb.lnb_file_offset & ~PAGE_MASK) == 0);
550         lnb.lnb_page_offset = 0;
551         do {
552                 struct cl_page *page;
553
554                 lnb.lnb_data = data + (index << PAGE_SHIFT);
555                 lnb.lnb_len = rnb->rnb_len - (index << PAGE_SHIFT);
556                 if (lnb.lnb_len > PAGE_SIZE)
557                         lnb.lnb_len = PAGE_SIZE;
558
559                 vmpage = read_cache_page(mapping, index + start,
560                                          ll_dom_readpage, &lnb);
561                 if (IS_ERR(vmpage)) {
562                         CWARN("%s: cannot fill page %lu for "DFID
563                               " with data: rc = %li\n",
564                               ll_i2sbi(inode)->ll_fsname, index + start,
565                               PFID(lu_object_fid(&obj->co_lu)),
566                               PTR_ERR(vmpage));
567                         break;
568                 }
569                 lock_page(vmpage);
570                 if (vmpage->mapping == NULL) {
571                         unlock_page(vmpage);
572                         put_page(vmpage);
573                         /* page was truncated */
574                         break;
575                 }
576                 /* attach VM page to CL page cache */
577                 page = cl_page_find(env, obj, vmpage->index, vmpage,
578                                     CPT_CACHEABLE);
579                 if (IS_ERR(page)) {
580                         ClearPageUptodate(vmpage);
581                         unlock_page(vmpage);
582                         put_page(vmpage);
583                         break;
584                 }
585                 cl_page_export(env, page, 1);
586                 cl_page_put(env, page);
587                 unlock_page(vmpage);
588                 put_page(vmpage);
589                 index++;
590         } while (rnb->rnb_len > (index << PAGE_SHIFT));
591
592 out_io:
593         cl_io_fini(env, io);
594         cl_env_put(env, &refcheck);
595
596         EXIT;
597 }
598
599 static int ll_intent_file_open(struct dentry *de, void *lmm, int lmmsize,
600                                 struct lookup_intent *itp)
601 {
602         struct ll_sb_info *sbi = ll_i2sbi(de->d_inode);
603         struct dentry *parent = de->d_parent;
604         char *name = NULL;
605         int len = 0;
606         struct md_op_data *op_data;
607         struct ptlrpc_request *req = NULL;
608         int rc;
609         ENTRY;
610
611         LASSERT(parent != NULL);
612         LASSERT(itp->it_flags & MDS_OPEN_BY_FID);
613
614         /* if server supports open-by-fid, or file name is invalid, don't pack
615          * name in open request */
616         if (OBD_FAIL_CHECK(OBD_FAIL_LLITE_OPEN_BY_NAME) ||
617             !(exp_connect_flags(sbi->ll_md_exp) & OBD_CONNECT_OPEN_BY_FID)) {
618 retry:
619                 len = de->d_name.len;
620                 name = kmalloc(len + 1, GFP_NOFS);
621                 if (!name)
622                         RETURN(-ENOMEM);
623
624                 /* race here */
625                 spin_lock(&de->d_lock);
626                 if (len != de->d_name.len) {
627                         spin_unlock(&de->d_lock);
628                         kfree(name);
629                         goto retry;
630                 }
631                 memcpy(name, de->d_name.name, len);
632                 name[len] = '\0';
633                 spin_unlock(&de->d_lock);
634
635                 if (!lu_name_is_valid_2(name, len)) {
636                         kfree(name);
637                         RETURN(-ESTALE);
638                 }
639         }
640
641         op_data = ll_prep_md_op_data(NULL, parent->d_inode, de->d_inode,
642                                      name, len, 0, LUSTRE_OPC_OPEN, NULL);
643         if (IS_ERR(op_data)) {
644                 kfree(name);
645                 RETURN(PTR_ERR(op_data));
646         }
647         op_data->op_data = lmm;
648         op_data->op_data_size = lmmsize;
649
650         OBD_FAIL_TIMEOUT(OBD_FAIL_LLITE_OPEN_DELAY, cfs_fail_val);
651
652         rc = md_intent_lock(sbi->ll_md_exp, op_data, itp, &req,
653                             &ll_md_blocking_ast, 0);
654         kfree(name);
655         ll_finish_md_op_data(op_data);
656         if (rc == -ESTALE) {
657                 /* reason for keep own exit path - don`t flood log
658                  * with messages with -ESTALE errors.
659                  */
660                 if (!it_disposition(itp, DISP_OPEN_OPEN) ||
661                      it_open_error(DISP_OPEN_OPEN, itp))
662                         GOTO(out, rc);
663                 ll_release_openhandle(de, itp);
664                 GOTO(out, rc);
665         }
666
667         if (it_disposition(itp, DISP_LOOKUP_NEG))
668                 GOTO(out, rc = -ENOENT);
669
670         if (rc != 0 || it_open_error(DISP_OPEN_OPEN, itp)) {
671                 rc = rc ? rc : it_open_error(DISP_OPEN_OPEN, itp);
672                 CDEBUG(D_VFSTRACE, "lock enqueue: err: %d\n", rc);
673                 GOTO(out, rc);
674         }
675
676         rc = ll_prep_inode(&de->d_inode, &req->rq_pill, NULL, itp);
677
678         if (!rc && itp->it_lock_mode) {
679                 __u64 bits = 0;
680
681                 /* If we got a lock back and it has a LOOKUP bit set,
682                  * make sure the dentry is marked as valid so we can find it.
683                  * We don't need to care about actual hashing since other bits
684                  * of kernel will deal with that later.
685                  */
686                 ll_set_lock_data(sbi->ll_md_exp, de->d_inode, itp, &bits);
687                 if (bits & MDS_INODELOCK_LOOKUP) {
688                         d_lustre_revalidate(de);
689                         ll_update_dir_depth(parent->d_inode, de->d_inode);
690                 }
691
692                 /* if DoM bit returned along with LAYOUT bit then there
693                  * can be read-on-open data returned.
694                  */
695                 if (bits & MDS_INODELOCK_DOM && bits & MDS_INODELOCK_LAYOUT)
696                         ll_dom_finish_open(de->d_inode, req);
697         }
698
699 out:
700         ptlrpc_req_finished(req);
701         ll_intent_drop_lock(itp);
702
703         /* We did open by fid, but by the time we got to the server, the object
704          * disappeared.  This is possible if the object was unlinked, but it's
705          * also possible if the object was unlinked by a rename.  In the case
706          * of an object renamed over our existing one, we can't fail this open.
707          * O_CREAT also goes through this path if we had an existing dentry,
708          * and it's obviously wrong to return ENOENT for O_CREAT.
709          *
710          * Instead let's return -ESTALE, and the VFS will retry the open with
711          * LOOKUP_REVAL, which we catch in ll_revalidate_dentry and fail to
712          * revalidate, causing a lookup.  This causes extra lookups in the case
713          * where we had a dentry in cache but the file is being unlinked and we
714          * lose the race with unlink, but this should be very rare.
715          */
716         if (rc == -ENOENT)
717                 rc = -ESTALE;
718
719         RETURN(rc);
720 }
721
722 static int ll_och_fill(struct obd_export *md_exp, struct lookup_intent *it,
723                        struct obd_client_handle *och)
724 {
725         struct mdt_body *body;
726
727         body = req_capsule_server_get(&it->it_request->rq_pill, &RMF_MDT_BODY);
728         och->och_open_handle = body->mbo_open_handle;
729         och->och_fid = body->mbo_fid1;
730         och->och_lease_handle.cookie = it->it_lock_handle;
731         och->och_magic = OBD_CLIENT_HANDLE_MAGIC;
732         och->och_flags = it->it_flags;
733
734         return md_set_open_replay_data(md_exp, och, it);
735 }
736
737 static int ll_local_open(struct file *file, struct lookup_intent *it,
738                          struct ll_file_data *fd, struct obd_client_handle *och)
739 {
740         struct inode *inode = file_inode(file);
741         ENTRY;
742
743         LASSERT(!file->private_data);
744
745         LASSERT(fd != NULL);
746
747         if (och) {
748                 int rc;
749
750                 rc = ll_och_fill(ll_i2sbi(inode)->ll_md_exp, it, och);
751                 if (rc != 0)
752                         RETURN(rc);
753         }
754
755         file->private_data = fd;
756         ll_readahead_init(inode, &fd->fd_ras);
757         fd->fd_omode = it->it_flags & (FMODE_READ | FMODE_WRITE | FMODE_EXEC);
758         /* turn off the kernel's read-ahead */
759         file->f_ra.ra_pages = 0;
760
761         RETURN(0);
762 }
763
764 void ll_track_file_opens(struct inode *inode)
765 {
766         struct ll_inode_info *lli = ll_i2info(inode);
767         struct ll_sb_info *sbi = ll_i2sbi(inode);
768
769         /* do not skew results with delays from never-opened inodes */
770         if (ktime_to_ns(lli->lli_close_fd_time))
771                 ll_stats_ops_tally(sbi, LPROC_LL_INODE_OPCLTM,
772                            ktime_us_delta(ktime_get(), lli->lli_close_fd_time));
773
774         if (ktime_after(ktime_get(),
775                         ktime_add_ms(lli->lli_close_fd_time,
776                                      sbi->ll_oc_max_ms))) {
777                 lli->lli_open_fd_count = 1;
778                 lli->lli_close_fd_time = ns_to_ktime(0);
779         } else {
780                 lli->lli_open_fd_count++;
781         }
782
783         ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_INODE_OCOUNT,
784                            lli->lli_open_fd_count);
785 }
786
787 /* Open a file, and (for the very first open) create objects on the OSTs at
788  * this time.  If opened with O_LOV_DELAY_CREATE, then we don't do the object
789  * creation or open until ll_lov_setstripe() ioctl is called.
790  *
791  * If we already have the stripe MD locally then we don't request it in
792  * md_open(), by passing a lmm_size = 0.
793  *
794  * It is up to the application to ensure no other processes open this file
795  * in the O_LOV_DELAY_CREATE case, or the default striping pattern will be
796  * used.  We might be able to avoid races of that sort by getting lli_open_sem
797  * before returning in the O_LOV_DELAY_CREATE case and dropping it here
798  * or in ll_file_release(), but I'm not sure that is desirable/necessary.
799  */
800 int ll_file_open(struct inode *inode, struct file *file)
801 {
802         struct ll_inode_info *lli = ll_i2info(inode);
803         struct lookup_intent *it, oit = { .it_op = IT_OPEN,
804                                           .it_flags = file->f_flags };
805         struct obd_client_handle **och_p = NULL;
806         __u64 *och_usecount = NULL;
807         struct ll_file_data *fd;
808         ktime_t kstart = ktime_get();
809         int rc = 0;
810         ENTRY;
811
812         CDEBUG(D_VFSTRACE, "VFS Op:inode="DFID"(%p), flags %o\n",
813                PFID(ll_inode2fid(inode)), inode, file->f_flags);
814
815         it = file->private_data; /* XXX: compat macro */
816         file->private_data = NULL; /* prevent ll_local_open assertion */
817
818         if (S_ISREG(inode->i_mode)) {
819                 rc = llcrypt_file_open(inode, file);
820                 if (rc)
821                         GOTO(out_nofiledata, rc);
822         }
823
824         fd = ll_file_data_get();
825         if (fd == NULL)
826                 GOTO(out_nofiledata, rc = -ENOMEM);
827
828         fd->fd_file = file;
829         if (S_ISDIR(inode->i_mode))
830                 ll_authorize_statahead(inode, fd);
831
832         ll_track_file_opens(inode);
833         if (is_root_inode(inode)) {
834                 file->private_data = fd;
835                 RETURN(0);
836         }
837
838         if (!it || !it->it_disposition) {
839                 /* Convert f_flags into access mode. We cannot use file->f_mode,
840                  * because everything but O_ACCMODE mask was stripped from
841                  * there */
842                 if ((oit.it_flags + 1) & O_ACCMODE)
843                         oit.it_flags++;
844                 if (file->f_flags & O_TRUNC)
845                         oit.it_flags |= FMODE_WRITE;
846
847                 /* kernel only call f_op->open in dentry_open.  filp_open calls
848                  * dentry_open after call to open_namei that checks permissions.
849                  * Only nfsd_open call dentry_open directly without checking
850                  * permissions and because of that this code below is safe.
851                  */
852                 if (oit.it_flags & (FMODE_WRITE | FMODE_READ))
853                         oit.it_flags |= MDS_OPEN_OWNEROVERRIDE;
854
855                 /* We do not want O_EXCL here, presumably we opened the file
856                  * already? XXX - NFS implications? */
857                 oit.it_flags &= ~O_EXCL;
858
859                 /* bug20584, if "it_flags" contains O_CREAT, the file will be
860                  * created if necessary, then "IT_CREAT" should be set to keep
861                  * consistent with it */
862                 if (oit.it_flags & O_CREAT)
863                         oit.it_op |= IT_CREAT;
864
865                 it = &oit;
866         }
867
868 restart:
869         /* Let's see if we have file open on MDS already. */
870         if (it->it_flags & FMODE_WRITE) {
871                 och_p = &lli->lli_mds_write_och;
872                 och_usecount = &lli->lli_open_fd_write_count;
873         } else if (it->it_flags & FMODE_EXEC) {
874                 och_p = &lli->lli_mds_exec_och;
875                 och_usecount = &lli->lli_open_fd_exec_count;
876         } else {
877                 och_p = &lli->lli_mds_read_och;
878                 och_usecount = &lli->lli_open_fd_read_count;
879         }
880
881         mutex_lock(&lli->lli_och_mutex);
882         if (*och_p) { /* Open handle is present */
883                 if (it_disposition(it, DISP_OPEN_OPEN)) {
884                         /* Well, there's extra open request that we do not need,
885                          * let's close it somehow. This will decref request. */
886                         rc = it_open_error(DISP_OPEN_OPEN, it);
887                         if (rc) {
888                                 mutex_unlock(&lli->lli_och_mutex);
889                                 GOTO(out_openerr, rc);
890                         }
891
892                         ll_release_openhandle(file_dentry(file), it);
893                 }
894                 (*och_usecount)++;
895
896                 rc = ll_local_open(file, it, fd, NULL);
897                 if (rc) {
898                         (*och_usecount)--;
899                         mutex_unlock(&lli->lli_och_mutex);
900                         GOTO(out_openerr, rc);
901                 }
902         } else {
903                 LASSERT(*och_usecount == 0);
904                 if (!it->it_disposition) {
905                         struct dentry *dentry = file_dentry(file);
906                         struct ll_sb_info *sbi = ll_i2sbi(inode);
907                         struct ll_dentry_data *ldd;
908
909                         /* We cannot just request lock handle now, new ELC code
910                          * means that one of other OPEN locks for this file
911                          * could be cancelled, and since blocking ast handler
912                          * would attempt to grab och_mutex as well, that would
913                          * result in a deadlock
914                          */
915                         mutex_unlock(&lli->lli_och_mutex);
916                         /*
917                          * Normally called under two situations:
918                          * 1. NFS export.
919                          * 2. A race/condition on MDS resulting in no open
920                          *    handle to be returned from LOOKUP|OPEN request,
921                          *    for example if the target entry was a symlink.
922                          *
923                          * In NFS path we know there's pathologic behavior
924                          * so we always enable open lock caching when coming
925                          * from there. It's detected by setting a flag in
926                          * ll_iget_for_nfs.
927                          *
928                          * After reaching number of opens of this inode
929                          * we always ask for an open lock on it to handle
930                          * bad userspace actors that open and close files
931                          * in a loop for absolutely no good reason
932                          */
933
934                         ldd = ll_d2d(dentry);
935                         if (filename_is_volatile(dentry->d_name.name,
936                                                  dentry->d_name.len,
937                                                  NULL)) {
938                                 /* There really is nothing here, but this
939                                  * make this more readable I think.
940                                  * We do not want openlock for volatile
941                                  * files under any circumstances
942                                  */
943                         } else if (ldd && ldd->lld_nfs_dentry) {
944                                 /* NFS path. This also happens to catch
945                                  * open by fh files I guess
946                                  */
947                                 it->it_flags |= MDS_OPEN_LOCK;
948                                 /* clear the flag for future lookups */
949                                 ldd->lld_nfs_dentry = 0;
950                         } else if (sbi->ll_oc_thrsh_count > 0) {
951                                 /* Take MDS_OPEN_LOCK with many opens */
952                                 if (lli->lli_open_fd_count >=
953                                     sbi->ll_oc_thrsh_count)
954                                         it->it_flags |= MDS_OPEN_LOCK;
955
956                                 /* If this is open after we just closed */
957                                 else if (ktime_before(ktime_get(),
958                                             ktime_add_ms(lli->lli_close_fd_time,
959                                                          sbi->ll_oc_thrsh_ms)))
960                                         it->it_flags |= MDS_OPEN_LOCK;
961                         }
962
963                         /*
964                          * Always specify MDS_OPEN_BY_FID because we don't want
965                          * to get file with different fid.
966                          */
967                         it->it_flags |= MDS_OPEN_BY_FID;
968                         rc = ll_intent_file_open(dentry, NULL, 0, it);
969                         if (rc)
970                                 GOTO(out_openerr, rc);
971
972                         goto restart;
973                 }
974                 OBD_ALLOC(*och_p, sizeof(struct obd_client_handle));
975                 if (!*och_p)
976                         GOTO(out_och_free, rc = -ENOMEM);
977
978                 (*och_usecount)++;
979
980                 /* md_intent_lock() didn't get a request ref if there was an
981                  * open error, so don't do cleanup on the request here
982                  * (bug 3430) */
983                 /* XXX (green): Should not we bail out on any error here, not
984                  * just open error? */
985                 rc = it_open_error(DISP_OPEN_OPEN, it);
986                 if (rc != 0)
987                         GOTO(out_och_free, rc);
988
989                 LASSERTF(it_disposition(it, DISP_ENQ_OPEN_REF),
990                          "inode %p: disposition %x, status %d\n", inode,
991                          it_disposition(it, ~0), it->it_status);
992
993                 rc = ll_local_open(file, it, fd, *och_p);
994                 if (rc)
995                         GOTO(out_och_free, rc);
996         }
997
998         rc = pcc_file_open(inode, file);
999         if (rc)
1000                 GOTO(out_och_free, rc);
1001
1002         mutex_unlock(&lli->lli_och_mutex);
1003
1004         fd = NULL;
1005
1006         /* Must do this outside lli_och_mutex lock to prevent deadlock where
1007            different kind of OPEN lock for this same inode gets cancelled
1008            by ldlm_cancel_lru */
1009         if (!S_ISREG(inode->i_mode))
1010                 GOTO(out_och_free, rc);
1011         cl_lov_delay_create_clear(&file->f_flags);
1012         GOTO(out_och_free, rc);
1013
1014 out_och_free:
1015         if (rc) {
1016                 if (och_p && *och_p) {
1017                         OBD_FREE(*och_p, sizeof(struct obd_client_handle));
1018                         *och_p = NULL; /* OBD_FREE writes some magic there */
1019                         (*och_usecount)--;
1020                 }
1021                 mutex_unlock(&lli->lli_och_mutex);
1022
1023 out_openerr:
1024                 if (lli->lli_opendir_key == fd)
1025                         ll_deauthorize_statahead(inode, fd);
1026
1027                 if (fd != NULL)
1028                         ll_file_data_put(fd);
1029         } else {
1030                 ll_stats_ops_tally(ll_i2sbi(inode), LPROC_LL_OPEN,
1031                                    ktime_us_delta(ktime_get(), kstart));
1032         }
1033
1034 out_nofiledata:
1035         if (it && it_disposition(it, DISP_ENQ_OPEN_REF)) {
1036                 ptlrpc_req_finished(it->it_request);
1037                 it_clear_disposition(it, DISP_ENQ_OPEN_REF);
1038         }
1039
1040         return rc;
1041 }
1042
1043 static int ll_md_blocking_lease_ast(struct ldlm_lock *lock,
1044                         struct ldlm_lock_desc *desc, void *data, int flag)
1045 {
1046         int rc;
1047         struct lustre_handle lockh;
1048         ENTRY;
1049
1050         switch (flag) {
1051         case LDLM_CB_BLOCKING:
1052                 ldlm_lock2handle(lock, &lockh);
1053                 rc = ldlm_cli_cancel(&lockh, LCF_ASYNC);
1054                 if (rc < 0) {
1055                         CDEBUG(D_INODE, "ldlm_cli_cancel: %d\n", rc);
1056                         RETURN(rc);
1057                 }
1058                 break;
1059         case LDLM_CB_CANCELING:
1060                 /* do nothing */
1061                 break;
1062         }
1063         RETURN(0);
1064 }
1065
1066 /**
1067  * When setting a lease on a file, we take ownership of the lli_mds_*_och
1068  * and save it as fd->fd_och so as to force client to reopen the file even
1069  * if it has an open lock in cache already.
1070  */
1071 static int ll_lease_och_acquire(struct inode *inode, struct file *file,
1072                                 struct lustre_handle *old_open_handle)
1073 {
1074         struct ll_inode_info *lli = ll_i2info(inode);
1075         struct ll_file_data *fd = file->private_data;
1076         struct obd_client_handle **och_p;
1077         __u64 *och_usecount;
1078         int rc = 0;
1079         ENTRY;
1080
1081         /* Get the openhandle of the file */
1082         mutex_lock(&lli->lli_och_mutex);
1083         if (fd->fd_lease_och != NULL)
1084                 GOTO(out_unlock, rc = -EBUSY);
1085
1086         if (fd->fd_och == NULL) {
1087                 if (file->f_mode & FMODE_WRITE) {
1088                         LASSERT(lli->lli_mds_write_och != NULL);
1089                         och_p = &lli->lli_mds_write_och;
1090                         och_usecount = &lli->lli_open_fd_write_count;
1091                 } else {
1092                         LASSERT(lli->lli_mds_read_och != NULL);
1093                         och_p = &lli->lli_mds_read_och;
1094                         och_usecount = &lli->lli_open_fd_read_count;
1095                 }
1096
1097                 if (*och_usecount > 1)
1098                         GOTO(out_unlock, rc = -EBUSY);
1099
1100                 fd->fd_och = *och_p;
1101                 *och_usecount = 0;
1102                 *och_p = NULL;
1103         }
1104
1105         *old_open_handle = fd->fd_och->och_open_handle;
1106
1107         EXIT;
1108 out_unlock:
1109         mutex_unlock(&lli->lli_och_mutex);
1110         return rc;
1111 }
1112
1113 /**
1114  * Release ownership on lli_mds_*_och when putting back a file lease.
1115  */
1116 static int ll_lease_och_release(struct inode *inode, struct file *file)
1117 {
1118         struct ll_inode_info *lli = ll_i2info(inode);
1119         struct ll_file_data *fd = file->private_data;
1120         struct obd_client_handle **och_p;
1121         struct obd_client_handle *old_och = NULL;
1122         __u64 *och_usecount;
1123         int rc = 0;
1124         ENTRY;
1125
1126         mutex_lock(&lli->lli_och_mutex);
1127         if (file->f_mode & FMODE_WRITE) {
1128                 och_p = &lli->lli_mds_write_och;
1129                 och_usecount = &lli->lli_open_fd_write_count;
1130         } else {
1131                 och_p = &lli->lli_mds_read_och;
1132                 och_usecount = &lli->lli_open_fd_read_count;
1133         }
1134
1135         /* The file may have been open by another process (broken lease) so
1136          * *och_p is not NULL. In this case we should simply increase usecount
1137          * and close fd_och.
1138          */
1139         if (*och_p != NULL) {
1140                 old_och = fd->fd_och;
1141                 (*och_usecount)++;
1142         } else {
1143                 *och_p = fd->fd_och;
1144                 *och_usecount = 1;
1145         }
1146         fd->fd_och = NULL;
1147         mutex_unlock(&lli->lli_och_mutex);
1148
1149         if (old_och != NULL)
1150                 rc = ll_close_inode_openhandle(inode, old_och, 0, NULL);
1151
1152         RETURN(rc);
1153 }
1154
1155 /**
1156  * Acquire a lease and open the file.
1157  */
1158 static struct obd_client_handle *
1159 ll_lease_open(struct inode *inode, struct file *file, fmode_t fmode,
1160               __u64 open_flags)
1161 {
1162         struct lookup_intent it = { .it_op = IT_OPEN };
1163         struct ll_sb_info *sbi = ll_i2sbi(inode);
1164         struct md_op_data *op_data;
1165         struct ptlrpc_request *req = NULL;
1166         struct lustre_handle old_open_handle = { 0 };
1167         struct obd_client_handle *och = NULL;
1168         int rc;
1169         int rc2;
1170         ENTRY;
1171
1172         if (fmode != FMODE_WRITE && fmode != FMODE_READ)
1173                 RETURN(ERR_PTR(-EINVAL));
1174
1175         if (file != NULL) {
1176                 if (!(fmode & file->f_mode) || (file->f_mode & FMODE_EXEC))
1177                         RETURN(ERR_PTR(-EPERM));
1178
1179                 rc = ll_lease_och_acquire(inode, file, &old_open_handle);
1180                 if (rc)
1181                         RETURN(ERR_PTR(rc));
1182         }
1183
1184         OBD_ALLOC_PTR(och);
1185         if (och == NULL)
1186                 RETURN(ERR_PTR(-ENOMEM));
1187
1188         op_data = ll_prep_md_op_data(NULL, inode, inode, NULL, 0, 0,
1189                                         LUSTRE_OPC_ANY, NULL);
1190         if (IS_ERR(op_data))
1191                 GOTO(out, rc = PTR_ERR(op_data));
1192
1193         /* To tell the MDT this openhandle is from the same owner */
1194         op_data->op_open_handle = old_open_handle;
1195
1196         it.it_flags = fmode | open_flags;
1197         it.it_flags |= MDS_OPEN_LOCK | MDS_OPEN_BY_FID | MDS_OPEN_LEASE;
1198         rc = md_intent_lock(sbi->ll_md_exp, op_data, &it, &req,
1199                             &ll_md_blocking_lease_ast,
1200         /* LDLM_FL_NO_LRU: To not put the lease lock into LRU list, otherwise
1201          * it can be cancelled which may mislead applications that the lease is
1202          * broken;
1203          * LDLM_FL_EXCL: Set this flag so that it won't be matched by normal
1204          * open in ll_md_blocking_ast(). Otherwise as ll_md_blocking_lease_ast
1205          * doesn't deal with openhandle, so normal openhandle will be leaked. */
1206                             LDLM_FL_NO_LRU | LDLM_FL_EXCL);
1207         ll_finish_md_op_data(op_data);
1208         ptlrpc_req_finished(req);
1209         if (rc < 0)
1210                 GOTO(out_release_it, rc);
1211
1212         if (it_disposition(&it, DISP_LOOKUP_NEG))
1213                 GOTO(out_release_it, rc = -ENOENT);
1214
1215         rc = it_open_error(DISP_OPEN_OPEN, &it);
1216         if (rc)
1217                 GOTO(out_release_it, rc);
1218
1219         LASSERT(it_disposition(&it, DISP_ENQ_OPEN_REF));
1220         rc = ll_och_fill(sbi->ll_md_exp, &it, och);
1221         if (rc)
1222                 GOTO(out_release_it, rc);
1223
1224         if (!it_disposition(&it, DISP_OPEN_LEASE)) /* old server? */
1225                 GOTO(out_close, rc = -EOPNOTSUPP);
1226
1227         /* already get lease, handle lease lock */
1228         ll_set_lock_data(sbi->ll_md_exp, inode, &it, NULL);
1229         if (!it.it_lock_mode ||
1230             !(it.it_lock_bits & MDS_INODELOCK_OPEN)) {
1231                 /* open lock must return for lease */
1232                 CERROR(DFID "lease granted but no open lock, %d/%llu.\n",
1233                         PFID(ll_inode2fid(inode)), it.it_lock_mode,
1234                         it.it_lock_bits);
1235                 GOTO(out_close, rc = -EPROTO);
1236         }
1237
1238         ll_intent_release(&it);
1239         RETURN(och);
1240
1241 out_close:
1242         /* Cancel open lock */
1243         if (it.it_lock_mode != 0) {
1244                 ldlm_lock_decref_and_cancel(&och->och_lease_handle,
1245                                             it.it_lock_mode);
1246                 it.it_lock_mode = 0;
1247                 och->och_lease_handle.cookie = 0ULL;
1248         }
1249         rc2 = ll_close_inode_openhandle(inode, och, 0, NULL);
1250         if (rc2 < 0)
1251                 CERROR("%s: error closing file "DFID": %d\n",
1252                        sbi->ll_fsname, PFID(&ll_i2info(inode)->lli_fid), rc2);
1253         och = NULL; /* och has been freed in ll_close_inode_openhandle() */
1254 out_release_it:
1255         ll_intent_release(&it);
1256 out:
1257         if (och != NULL)
1258                 OBD_FREE_PTR(och);
1259         RETURN(ERR_PTR(rc));
1260 }
1261
1262 /**
1263  * Check whether a layout swap can be done between two inodes.
1264  *
1265  * \param[in] inode1  First inode to check
1266  * \param[in] inode2  Second inode to check
1267  *
1268  * \retval 0 on success, layout swap can be performed between both inodes
1269  * \retval negative error code if requirements are not met
1270  */
1271 static int ll_check_swap_layouts_validity(struct inode *inode1,
1272                                           struct inode *inode2)
1273 {
1274         if (!S_ISREG(inode1->i_mode) || !S_ISREG(inode2->i_mode))
1275                 return -EINVAL;
1276
1277         if (inode_permission(inode1, MAY_WRITE) ||
1278             inode_permission(inode2, MAY_WRITE))
1279                 return -EPERM;
1280
1281         if (inode1->i_sb != inode2->i_sb)
1282                 return -EXDEV;
1283
1284         return 0;
1285 }
1286
1287 static int ll_swap_layouts_close(struct obd_client_handle *och,
1288                                  struct inode *inode, struct inode *inode2)
1289 {
1290         const struct lu_fid     *fid1 = ll_inode2fid(inode);
1291         const struct lu_fid     *fid2;
1292         int                      rc;
1293         ENTRY;
1294
1295         CDEBUG(D_INODE, "%s: biased close of file "DFID"\n",
1296                ll_i2sbi(inode)->ll_fsname, PFID(fid1));
1297
1298         rc = ll_check_swap_layouts_validity(inode, inode2);
1299         if (rc < 0)
1300                 GOTO(out_free_och, rc);
1301
1302         /* We now know that inode2 is a lustre inode */
1303         fid2 = ll_inode2fid(inode2);
1304
1305         rc = lu_fid_cmp(fid1, fid2);
1306         if (rc == 0)
1307                 GOTO(out_free_och, rc = -EINVAL);
1308
1309         /* Close the file and {swap,merge} layouts between inode & inode2.
1310          * NB: lease lock handle is released in mdc_close_layout_swap_pack()
1311          * because we still need it to pack l_remote_handle to MDT. */
1312         rc = ll_close_inode_openhandle(inode, och, MDS_CLOSE_LAYOUT_SWAP,
1313                                        inode2);
1314
1315         och = NULL; /* freed in ll_close_inode_openhandle() */
1316
1317 out_free_och:
1318         if (och != NULL)
1319                 OBD_FREE_PTR(och);
1320
1321         RETURN(rc);
1322 }
1323
1324 /**
1325  * Release lease and close the file.
1326  * It will check if the lease has ever broken.
1327  */
1328 static int ll_lease_close_intent(struct obd_client_handle *och,
1329                                  struct inode *inode,
1330                                  bool *lease_broken, enum mds_op_bias bias,
1331                                  void *data)
1332 {
1333         struct ldlm_lock *lock;
1334         bool cancelled = true;
1335         int rc;
1336         ENTRY;
1337
1338         lock = ldlm_handle2lock(&och->och_lease_handle);
1339         if (lock != NULL) {
1340                 lock_res_and_lock(lock);
1341                 cancelled = ldlm_is_cancel(lock);
1342                 unlock_res_and_lock(lock);
1343                 LDLM_LOCK_PUT(lock);
1344         }
1345
1346         CDEBUG(D_INODE, "lease for "DFID" broken? %d, bias: %x\n",
1347                PFID(&ll_i2info(inode)->lli_fid), cancelled, bias);
1348
1349         if (lease_broken != NULL)
1350                 *lease_broken = cancelled;
1351
1352         if (!cancelled && !bias)
1353                 ldlm_cli_cancel(&och->och_lease_handle, 0);
1354
1355         if (cancelled) { /* no need to excute intent */
1356                 bias = 0;
1357                 data = NULL;
1358         }
1359
1360         rc = ll_close_inode_openhandle(inode, och, bias, data);
1361         RETURN(rc);
1362 }
1363
1364 static int ll_lease_close(struct obd_client_handle *och, struct inode *inode,
1365                           bool *lease_broken)
1366 {
1367         return ll_lease_close_intent(och, inode, lease_broken, 0, NULL);
1368 }
1369
1370 /**
1371  * After lease is taken, send the RPC MDS_REINT_RESYNC to the MDT
1372  */
1373 static int ll_lease_file_resync(struct obd_client_handle *och,
1374                                 struct inode *inode, unsigned long arg)
1375 {
1376         struct ll_sb_info *sbi = ll_i2sbi(inode);
1377         struct md_op_data *op_data;
1378         struct ll_ioc_lease_id ioc;
1379         __u64 data_version_unused;
1380         int rc;
1381         ENTRY;
1382
1383         op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
1384                                      LUSTRE_OPC_ANY, NULL);
1385         if (IS_ERR(op_data))
1386                 RETURN(PTR_ERR(op_data));
1387
1388         if (copy_from_user(&ioc, (struct ll_ioc_lease_id __user *)arg,
1389                            sizeof(ioc)))
1390                 RETURN(-EFAULT);
1391
1392         /* before starting file resync, it's necessary to clean up page cache
1393          * in client memory, otherwise once the layout version is increased,
1394          * writing back cached data will be denied the OSTs. */
1395         rc = ll_data_version(inode, &data_version_unused, LL_DV_WR_FLUSH);
1396         if (rc)
1397                 GOTO(out, rc);
1398
1399         op_data->op_lease_handle = och->och_lease_handle;
1400         op_data->op_mirror_id = ioc.lil_mirror_id;
1401         rc = md_file_resync(sbi->ll_md_exp, op_data);
1402         if (rc)
1403                 GOTO(out, rc);
1404
1405         EXIT;
1406 out:
1407         ll_finish_md_op_data(op_data);
1408         return rc;
1409 }
1410
1411 int ll_merge_attr(const struct lu_env *env, struct inode *inode)
1412 {
1413         struct ll_inode_info *lli = ll_i2info(inode);
1414         struct cl_object *obj = lli->lli_clob;
1415         struct cl_attr *attr = vvp_env_thread_attr(env);
1416         s64 atime;
1417         s64 mtime;
1418         s64 ctime;
1419         int rc = 0;
1420
1421         ENTRY;
1422
1423         ll_inode_size_lock(inode);
1424
1425         /* Merge timestamps the most recently obtained from MDS with
1426          * timestamps obtained from OSTs.
1427          *
1428          * Do not overwrite atime of inode because it may be refreshed
1429          * by file_accessed() function. If the read was served by cache
1430          * data, there is no RPC to be sent so that atime may not be
1431          * transferred to OSTs at all. MDT only updates atime at close time
1432          * if it's at least 'mdd.*.atime_diff' older.
1433          * All in all, the atime in Lustre does not strictly comply with
1434          * POSIX. Solving this problem needs to send an RPC to MDT for each
1435          * read, this will hurt performance.
1436          */
1437         if (test_and_clear_bit(LLIF_UPDATE_ATIME, &lli->lli_flags) ||
1438             inode->i_atime.tv_sec < lli->lli_atime)
1439                 inode->i_atime.tv_sec = lli->lli_atime;
1440
1441         inode->i_mtime.tv_sec = lli->lli_mtime;
1442         inode->i_ctime.tv_sec = lli->lli_ctime;
1443
1444         mtime = inode->i_mtime.tv_sec;
1445         atime = inode->i_atime.tv_sec;
1446         ctime = inode->i_ctime.tv_sec;
1447
1448         cl_object_attr_lock(obj);
1449         if (OBD_FAIL_CHECK(OBD_FAIL_MDC_MERGE))
1450                 rc = -EINVAL;
1451         else
1452                 rc = cl_object_attr_get(env, obj, attr);
1453         cl_object_attr_unlock(obj);
1454
1455         if (rc != 0)
1456                 GOTO(out_size_unlock, rc = (rc == -ENODATA ? 0 : rc));
1457
1458         if (atime < attr->cat_atime)
1459                 atime = attr->cat_atime;
1460
1461         if (ctime < attr->cat_ctime)
1462                 ctime = attr->cat_ctime;
1463
1464         if (mtime < attr->cat_mtime)
1465                 mtime = attr->cat_mtime;
1466
1467         CDEBUG(D_VFSTRACE, DFID" updating i_size %llu\n",
1468                PFID(&lli->lli_fid), attr->cat_size);
1469
1470         i_size_write(inode, attr->cat_size);
1471         inode->i_blocks = attr->cat_blocks;
1472
1473         inode->i_mtime.tv_sec = mtime;
1474         inode->i_atime.tv_sec = atime;
1475         inode->i_ctime.tv_sec = ctime;
1476
1477 out_size_unlock:
1478         ll_inode_size_unlock(inode);
1479
1480         RETURN(rc);
1481 }
1482
1483 /**
1484  * Set designated mirror for I/O.
1485  *
1486  * So far only read, write, and truncated can support to issue I/O to
1487  * designated mirror.
1488  */
1489 void ll_io_set_mirror(struct cl_io *io, const struct file *file)
1490 {
1491         struct ll_file_data *fd = file->private_data;
1492
1493         /* clear layout version for generic(non-resync) I/O in case it carries
1494          * stale layout version due to I/O restart */
1495         io->ci_layout_version = 0;
1496
1497         /* FLR: disable non-delay for designated mirror I/O because obviously
1498          * only one mirror is available */
1499         if (fd->fd_designated_mirror > 0) {
1500                 io->ci_ndelay = 0;
1501                 io->ci_designated_mirror = fd->fd_designated_mirror;
1502                 io->ci_layout_version = fd->fd_layout_version;
1503         }
1504
1505         CDEBUG(D_VFSTRACE, "%s: desiginated mirror: %d\n",
1506                file->f_path.dentry->d_name.name, io->ci_designated_mirror);
1507 }
1508
1509 static bool file_is_noatime(const struct file *file)
1510 {
1511         const struct vfsmount *mnt = file->f_path.mnt;
1512         const struct inode *inode = file_inode((struct file *)file);
1513
1514         /* Adapted from file_accessed() and touch_atime().*/
1515         if (file->f_flags & O_NOATIME)
1516                 return true;
1517
1518         if (inode->i_flags & S_NOATIME)
1519                 return true;
1520
1521         if (IS_NOATIME(inode))
1522                 return true;
1523
1524         if (mnt->mnt_flags & (MNT_NOATIME | MNT_READONLY))
1525                 return true;
1526
1527         if ((mnt->mnt_flags & MNT_NODIRATIME) && S_ISDIR(inode->i_mode))
1528                 return true;
1529
1530         if ((inode->i_sb->s_flags & SB_NODIRATIME) && S_ISDIR(inode->i_mode))
1531                 return true;
1532
1533         return false;
1534 }
1535
1536 void ll_io_init(struct cl_io *io, struct file *file, enum cl_io_type iot,
1537                 struct vvp_io_args *args)
1538 {
1539         struct inode *inode = file_inode(file);
1540         struct ll_file_data *fd  = file->private_data;
1541
1542         io->u.ci_rw.crw_nonblock = file->f_flags & O_NONBLOCK;
1543         io->ci_lock_no_expand = fd->ll_lock_no_expand;
1544
1545         if (iot == CIT_WRITE) {
1546                 io->u.ci_wr.wr_append = !!(file->f_flags & O_APPEND);
1547                 io->u.ci_wr.wr_sync   = !!(file->f_flags & O_SYNC ||
1548                                            file->f_flags & O_DIRECT ||
1549                                            IS_SYNC(inode));
1550 #ifdef HAVE_GENERIC_WRITE_SYNC_2ARGS
1551                 io->u.ci_wr.wr_sync  |= !!(args &&
1552                                            (args->u.normal.via_iocb->ki_flags &
1553                                             IOCB_DSYNC));
1554 #endif
1555         }
1556
1557         io->ci_obj = ll_i2info(inode)->lli_clob;
1558         io->ci_lockreq = CILR_MAYBE;
1559         if (ll_file_nolock(file)) {
1560                 io->ci_lockreq = CILR_NEVER;
1561                 io->ci_no_srvlock = 1;
1562         } else if (file->f_flags & O_APPEND) {
1563                 io->ci_lockreq = CILR_MANDATORY;
1564         }
1565         io->ci_noatime = file_is_noatime(file);
1566         io->ci_async_readahead = false;
1567
1568         /* FLR: only use non-delay I/O for read as there is only one
1569          * avaliable mirror for write. */
1570         io->ci_ndelay = !(iot == CIT_WRITE);
1571
1572         ll_io_set_mirror(io, file);
1573 }
1574
1575 static void ll_heat_add(struct inode *inode, enum cl_io_type iot,
1576                         __u64 count)
1577 {
1578         struct ll_inode_info *lli = ll_i2info(inode);
1579         struct ll_sb_info *sbi = ll_i2sbi(inode);
1580         enum obd_heat_type sample_type;
1581         enum obd_heat_type iobyte_type;
1582         __u64 now = ktime_get_real_seconds();
1583
1584         if (!ll_sbi_has_file_heat(sbi) ||
1585             lli->lli_heat_flags & LU_HEAT_FLAG_OFF)
1586                 return;
1587
1588         if (iot == CIT_READ) {
1589                 sample_type = OBD_HEAT_READSAMPLE;
1590                 iobyte_type = OBD_HEAT_READBYTE;
1591         } else if (iot == CIT_WRITE) {
1592                 sample_type = OBD_HEAT_WRITESAMPLE;
1593                 iobyte_type = OBD_HEAT_WRITEBYTE;
1594         } else {
1595                 return;
1596         }
1597
1598         spin_lock(&lli->lli_heat_lock);
1599         obd_heat_add(&lli->lli_heat_instances[sample_type], now, 1,
1600                      sbi->ll_heat_decay_weight, sbi->ll_heat_period_second);
1601         obd_heat_add(&lli->lli_heat_instances[iobyte_type], now, count,
1602                      sbi->ll_heat_decay_weight, sbi->ll_heat_period_second);
1603         spin_unlock(&lli->lli_heat_lock);
1604 }
1605
1606 static ssize_t
1607 ll_file_io_generic(const struct lu_env *env, struct vvp_io_args *args,
1608                    struct file *file, enum cl_io_type iot,
1609                    loff_t *ppos, size_t count)
1610 {
1611         struct vvp_io *vio = vvp_env_io(env);
1612         struct inode *inode = file_inode(file);
1613         struct ll_inode_info *lli = ll_i2info(inode);
1614         struct ll_sb_info *sbi = ll_i2sbi(inode);
1615         struct ll_file_data *fd  = file->private_data;
1616         struct range_lock range;
1617         bool range_locked = false;
1618         struct cl_io *io;
1619         ssize_t result = 0;
1620         int rc = 0;
1621         int rc2 = 0;
1622         unsigned int retried = 0, dio_lock = 0;
1623         bool is_aio = false;
1624         bool is_parallel_dio = false;
1625         struct cl_dio_aio *ci_aio = NULL;
1626         size_t per_bytes;
1627         bool partial_io = false;
1628         size_t max_io_pages, max_cached_pages;
1629
1630         ENTRY;
1631
1632         CDEBUG(D_VFSTRACE, "%s: %s ppos: %llu, count: %zu\n",
1633                 file_dentry(file)->d_name.name,
1634                 iot == CIT_READ ? "read" : "write", *ppos, count);
1635
1636         max_io_pages = PTLRPC_MAX_BRW_PAGES * OBD_MAX_RIF_DEFAULT;
1637         max_cached_pages = sbi->ll_cache->ccc_lru_max;
1638         if (max_io_pages > (max_cached_pages >> 2))
1639                 max_io_pages = max_cached_pages >> 2;
1640
1641         io = vvp_env_thread_io(env);
1642         if (file->f_flags & O_DIRECT) {
1643                 if (!is_sync_kiocb(args->u.normal.via_iocb))
1644                         is_aio = true;
1645
1646                 /* the kernel does not support AIO on pipes, and parallel DIO
1647                  * uses part of the AIO path, so we must not do parallel dio
1648                  * to pipes
1649                  */
1650                 is_parallel_dio = !iov_iter_is_pipe(args->u.normal.via_iter) &&
1651                                !is_aio;
1652
1653                 if (!ll_sbi_has_parallel_dio(sbi))
1654                         is_parallel_dio = false;
1655
1656                 ci_aio = cl_aio_alloc(args->u.normal.via_iocb,
1657                                       ll_i2info(inode)->lli_clob);
1658                 if (!ci_aio)
1659                         GOTO(out, rc = -ENOMEM);
1660         }
1661
1662 restart:
1663         /**
1664          * IO block size need be aware of cached page limit, otherwise
1665          * if we have small max_cached_mb but large block IO issued, io
1666          * could not be finished and blocked whole client.
1667          */
1668         if (file->f_flags & O_DIRECT)
1669                 per_bytes = count;
1670         else
1671                 per_bytes = min(max_io_pages << PAGE_SHIFT, count);
1672         partial_io = per_bytes < count;
1673         io = vvp_env_thread_io(env);
1674         ll_io_init(io, file, iot, args);
1675         io->ci_aio = ci_aio;
1676         io->ci_dio_lock = dio_lock;
1677         io->ci_ndelay_tried = retried;
1678         io->ci_parallel_dio = is_parallel_dio;
1679
1680         if (cl_io_rw_init(env, io, iot, *ppos, per_bytes) == 0) {
1681                 if (file->f_flags & O_APPEND)
1682                         range_lock_init(&range, 0, LUSTRE_EOF);
1683                 else
1684                         range_lock_init(&range, *ppos, *ppos + per_bytes - 1);
1685
1686                 vio->vui_fd  = file->private_data;
1687                 vio->vui_iter = args->u.normal.via_iter;
1688                 vio->vui_iocb = args->u.normal.via_iocb;
1689                 /* Direct IO reads must also take range lock,
1690                  * or multiple reads will try to work on the same pages
1691                  * See LU-6227 for details.
1692                  */
1693                 if (((iot == CIT_WRITE) ||
1694                     (iot == CIT_READ && (file->f_flags & O_DIRECT))) &&
1695                     !(vio->vui_fd->fd_flags & LL_FILE_GROUP_LOCKED)) {
1696                         CDEBUG(D_VFSTRACE, "Range lock "RL_FMT"\n",
1697                                RL_PARA(&range));
1698                         rc = range_lock(&lli->lli_write_tree, &range);
1699                         if (rc < 0)
1700                                 GOTO(out, rc);
1701
1702                         range_locked = true;
1703                 }
1704
1705                 ll_cl_add(inode, env, io, LCC_RW);
1706                 rc = cl_io_loop(env, io);
1707                 ll_cl_remove(inode, env);
1708
1709                 if (range_locked && !is_parallel_dio) {
1710                         CDEBUG(D_VFSTRACE, "Range unlock "RL_FMT"\n",
1711                                RL_PARA(&range));
1712                         range_unlock(&lli->lli_write_tree, &range);
1713                         range_locked = false;
1714                 }
1715         } else {
1716                 /* cl_io_rw_init() handled IO */
1717                 rc = io->ci_result;
1718         }
1719
1720         /* N/B: parallel DIO may be disabled during i/o submission;
1721          * if that occurs, async RPCs are resolved before we get here, and this
1722          * wait call completes immediately.
1723          */
1724         if (is_parallel_dio) {
1725                 struct cl_sync_io *anchor = &io->ci_aio->cda_sync;
1726
1727                 /* for dio, EIOCBQUEUED is an implementation detail,
1728                  * and we don't return it to userspace
1729                  */
1730                 if (rc == -EIOCBQUEUED)
1731                         rc = 0;
1732
1733                 rc2 = cl_sync_io_wait_recycle(env, anchor, 0, 0);
1734                 if (rc2 < 0)
1735                         rc = rc2;
1736
1737                 if (range_locked) {
1738                         range_unlock(&lli->lli_write_tree, &range);
1739                         range_locked = false;
1740                 }
1741         }
1742
1743         /*
1744          * In order to move forward AIO, ci_nob was increased,
1745          * but that doesn't mean io have been finished, it just
1746          * means io have been submited, we will always return
1747          * EIOCBQUEUED to the caller, So we could only return
1748          * number of bytes in non-AIO case.
1749          */
1750         if (io->ci_nob > 0) {
1751                 if (!is_aio) {
1752                         if (rc2 == 0) {
1753                                 result += io->ci_nob;
1754                                 *ppos = io->u.ci_wr.wr.crw_pos; /* for splice */
1755                         } else if (rc2) {
1756                                 result = 0;
1757                         }
1758                 }
1759                 count -= io->ci_nob;
1760
1761                 /* prepare IO restart */
1762                 if (count > 0)
1763                         args->u.normal.via_iter = vio->vui_iter;
1764
1765                 if (partial_io) {
1766                         /**
1767                          * Reexpand iov count because it was zero
1768                          * after IO finish.
1769                          */
1770                         iov_iter_reexpand(vio->vui_iter, count);
1771                         if (per_bytes == io->ci_nob)
1772                                 io->ci_need_restart = 1;
1773                 }
1774         }
1775 out:
1776         cl_io_fini(env, io);
1777
1778         CDEBUG(D_VFSTRACE,
1779                "%s: %d io complete with rc: %d, result: %zd, restart: %d\n",
1780                file->f_path.dentry->d_name.name,
1781                iot, rc, result, io->ci_need_restart);
1782
1783         if ((rc == 0 || rc == -ENODATA || rc == -ENOLCK) &&
1784             count > 0 && io->ci_need_restart) {
1785                 CDEBUG(D_VFSTRACE,
1786                        "%s: restart %s from %lld, count: %zu, ret: %zd, rc: %d\n",
1787                        file_dentry(file)->d_name.name,
1788                        iot == CIT_READ ? "read" : "write",
1789                        *ppos, count, result, rc);
1790                 /* preserve the tried count for FLR */
1791                 retried = io->ci_ndelay_tried;
1792                 dio_lock = io->ci_dio_lock;
1793                 goto restart;
1794         }
1795
1796         if (io->ci_aio) {
1797                 /*
1798                  * VFS will call aio_complete() if no -EIOCBQUEUED
1799                  * is returned for AIO, so we can not call aio_complete()
1800                  * in our end_io().
1801                  */
1802                 if (rc != -EIOCBQUEUED)
1803                         io->ci_aio->cda_no_aio_complete = 1;
1804                 /**
1805                  * Drop one extra reference so that end_io() could be
1806                  * called for this IO context, we could call it after
1807                  * we make sure all AIO requests have been proceed.
1808                  */
1809                 cl_sync_io_note(env, &io->ci_aio->cda_sync,
1810                                 rc == -EIOCBQUEUED ? 0 : rc);
1811                 if (!is_aio) {
1812                         cl_aio_free(env, io->ci_aio);
1813                         io->ci_aio = NULL;
1814                 }
1815         }
1816
1817         if (iot == CIT_READ) {
1818                 if (result > 0)
1819                         ll_stats_ops_tally(ll_i2sbi(inode),
1820                                            LPROC_LL_READ_BYTES, result);
1821         } else if (iot == CIT_WRITE) {
1822                 if (result > 0) {
1823                         ll_stats_ops_tally(ll_i2sbi(inode),
1824                                            LPROC_LL_WRITE_BYTES, result);
1825                         fd->fd_write_failed = false;
1826                 } else if (result == 0 && rc == 0) {
1827                         rc = io->ci_result;
1828                         if (rc < 0)
1829                                 fd->fd_write_failed = true;
1830                         else
1831                                 fd->fd_write_failed = false;
1832                 } else if (rc != -ERESTARTSYS) {
1833                         fd->fd_write_failed = true;
1834                 }
1835         }
1836
1837         CDEBUG(D_VFSTRACE, "iot: %d, result: %zd\n", iot, result);
1838         if (result > 0)
1839                 ll_heat_add(inode, iot, result);
1840
1841         RETURN(result > 0 ? result : rc);
1842 }
1843
1844 /**
1845  * The purpose of fast read is to overcome per I/O overhead and improve IOPS
1846  * especially for small I/O.
1847  *
1848  * To serve a read request, CLIO has to create and initialize a cl_io and
1849  * then request DLM lock. This has turned out to have siginificant overhead
1850  * and affects the performance of small I/O dramatically.
1851  *
1852  * It's not necessary to create a cl_io for each I/O. Under the help of read
1853  * ahead, most of the pages being read are already in memory cache and we can
1854  * read those pages directly because if the pages exist, the corresponding DLM
1855  * lock must exist so that page content must be valid.
1856  *
1857  * In fast read implementation, the llite speculatively finds and reads pages
1858  * in memory cache. There are three scenarios for fast read:
1859  *   - If the page exists and is uptodate, kernel VM will provide the data and
1860  *     CLIO won't be intervened;
1861  *   - If the page was brought into memory by read ahead, it will be exported
1862  *     and read ahead parameters will be updated;
1863  *   - Otherwise the page is not in memory, we can't do fast read. Therefore,
1864  *     it will go back and invoke normal read, i.e., a cl_io will be created
1865  *     and DLM lock will be requested.
1866  *
1867  * POSIX compliance: posix standard states that read is intended to be atomic.
1868  * Lustre read implementation is in line with Linux kernel read implementation
1869  * and neither of them complies with POSIX standard in this matter. Fast read
1870  * doesn't make the situation worse on single node but it may interleave write
1871  * results from multiple nodes due to short read handling in ll_file_aio_read().
1872  *
1873  * \param env - lu_env
1874  * \param iocb - kiocb from kernel
1875  * \param iter - user space buffers where the data will be copied
1876  *
1877  * \retval - number of bytes have been read, or error code if error occurred.
1878  */
1879 static ssize_t
1880 ll_do_fast_read(struct kiocb *iocb, struct iov_iter *iter)
1881 {
1882         ssize_t result;
1883
1884         if (!ll_sbi_has_fast_read(ll_i2sbi(file_inode(iocb->ki_filp))))
1885                 return 0;
1886
1887         /* NB: we can't do direct IO for fast read because it will need a lock
1888          * to make IO engine happy. */
1889         if (iocb->ki_filp->f_flags & O_DIRECT)
1890                 return 0;
1891
1892         result = generic_file_read_iter(iocb, iter);
1893
1894         /* If the first page is not in cache, generic_file_aio_read() will be
1895          * returned with -ENODATA.
1896          * See corresponding code in ll_readpage(). */
1897         if (result == -ENODATA)
1898                 result = 0;
1899
1900         if (result > 0) {
1901                 ll_heat_add(file_inode(iocb->ki_filp), CIT_READ, result);
1902                 ll_stats_ops_tally(ll_i2sbi(file_inode(iocb->ki_filp)),
1903                                    LPROC_LL_READ_BYTES, result);
1904         }
1905
1906         return result;
1907 }
1908
1909 /*
1910  * Read from a file (through the page cache).
1911  */
1912 static ssize_t ll_file_read_iter(struct kiocb *iocb, struct iov_iter *to)
1913 {
1914         struct lu_env *env;
1915         struct vvp_io_args *args;
1916         struct file *file = iocb->ki_filp;
1917         ssize_t result;
1918         ssize_t rc2;
1919         __u16 refcheck;
1920         ktime_t kstart = ktime_get();
1921         bool cached;
1922
1923         if (!iov_iter_count(to))
1924                 return 0;
1925
1926         /**
1927          * Currently when PCC read failed, we do not fall back to the
1928          * normal read path, just return the error.
1929          * The resaon is that: for RW-PCC, the file data may be modified
1930          * in the PCC and inconsistent with the data on OSTs (or file
1931          * data has been removed from the Lustre file system), at this
1932          * time, fallback to the normal read path may read the wrong
1933          * data.
1934          * TODO: for RO-PCC (readonly PCC), fall back to normal read
1935          * path: read data from data copy on OSTs.
1936          */
1937         result = pcc_file_read_iter(iocb, to, &cached);
1938         if (cached)
1939                 GOTO(out, result);
1940
1941         ll_ras_enter(file, iocb->ki_pos, iov_iter_count(to));
1942
1943         result = ll_do_fast_read(iocb, to);
1944         if (result < 0 || iov_iter_count(to) == 0)
1945                 GOTO(out, result);
1946
1947         env = cl_env_get(&refcheck);
1948         if (IS_ERR(env))
1949                 return PTR_ERR(env);
1950
1951         args = ll_env_args(env);
1952         args->u.normal.via_iter = to;
1953         args->u.normal.via_iocb = iocb;
1954
1955         rc2 = ll_file_io_generic(env, args, file, CIT_READ,
1956                                  &iocb->ki_pos, iov_iter_count(to));
1957         if (rc2 > 0)
1958                 result += rc2;
1959         else if (result == 0)
1960                 result = rc2;
1961
1962         cl_env_put(env, &refcheck);
1963 out:
1964         if (result > 0) {
1965                 ll_rw_stats_tally(ll_i2sbi(file_inode(file)), current->pid,
1966                                   file->private_data, iocb->ki_pos, result,
1967                                   READ);
1968                 ll_stats_ops_tally(ll_i2sbi(file_inode(file)), LPROC_LL_READ,
1969                                    ktime_us_delta(ktime_get(), kstart));
1970         }
1971
1972         return result;
1973 }
1974
1975 /**
1976  * Similar trick to ll_do_fast_read, this improves write speed for tiny writes.
1977  * If a page is already in the page cache and dirty (and some other things -
1978  * See ll_tiny_write_begin for the instantiation of these rules), then we can
1979  * write to it without doing a full I/O, because Lustre already knows about it
1980  * and will write it out.  This saves a lot of processing time.
1981  *
1982  * All writes here are within one page, so exclusion is handled by the page
1983  * lock on the vm page.  We do not do tiny writes for writes which touch
1984  * multiple pages because it's very unlikely multiple sequential pages are
1985  * are already dirty.
1986  *
1987  * We limit these to < PAGE_SIZE because PAGE_SIZE writes are relatively common
1988  * and are unlikely to be to already dirty pages.
1989  *
1990  * Attribute updates are important here, we do them in ll_tiny_write_end.
1991  */
1992 static ssize_t ll_do_tiny_write(struct kiocb *iocb, struct iov_iter *iter)
1993 {
1994         ssize_t count = iov_iter_count(iter);
1995         struct  file *file = iocb->ki_filp;
1996         struct  inode *inode = file_inode(file);
1997         bool    lock_inode = !IS_NOSEC(inode);
1998         ssize_t result = 0;
1999
2000         ENTRY;
2001
2002         /* Restrict writes to single page and < PAGE_SIZE.  See comment at top
2003          * of function for why.
2004          */
2005         if (count >= PAGE_SIZE ||
2006             (iocb->ki_pos & (PAGE_SIZE-1)) + count > PAGE_SIZE)
2007                 RETURN(0);
2008
2009         if (unlikely(lock_inode))
2010                 inode_lock(inode);
2011         result = __generic_file_write_iter(iocb, iter);
2012
2013         if (unlikely(lock_inode))
2014                 inode_unlock(inode);
2015
2016         /* If the page is not already dirty, ll_tiny_write_begin returns
2017          * -ENODATA.  We continue on to normal write.
2018          */
2019         if (result == -ENODATA)
2020                 result = 0;
2021
2022         if (result > 0) {
2023                 ll_heat_add(inode, CIT_WRITE, result);
2024                 set_bit(LLIF_DATA_MODIFIED, &ll_i2info(inode)->lli_flags);
2025         }
2026
2027         CDEBUG(D_VFSTRACE, "result: %zu, original count %zu\n", result, count);
2028
2029         RETURN(result);
2030 }
2031
2032 /*
2033  * Write to a file (through the page cache).
2034  */
2035 static ssize_t ll_file_write_iter(struct kiocb *iocb, struct iov_iter *from)
2036 {
2037         struct vvp_io_args *args;
2038         struct lu_env *env;
2039         ssize_t rc_tiny = 0, rc_normal;
2040         struct file *file = iocb->ki_filp;
2041         __u16 refcheck;
2042         bool cached;
2043         ktime_t kstart = ktime_get();
2044         int result;
2045
2046         ENTRY;
2047
2048         if (!iov_iter_count(from))
2049                 GOTO(out, rc_normal = 0);
2050
2051         /**
2052          * When PCC write failed, we usually do not fall back to the normal
2053          * write path, just return the error. But there is a special case when
2054          * returned error code is -ENOSPC due to running out of space on PCC HSM
2055          * bakcend. At this time, it will fall back to normal I/O path and
2056          * retry the I/O. As the file is in HSM released state, it will restore
2057          * the file data to OSTs first and redo the write again. And the
2058          * restore process will revoke the layout lock and detach the file
2059          * from PCC cache automatically.
2060          */
2061         result = pcc_file_write_iter(iocb, from, &cached);
2062         if (cached && result != -ENOSPC && result != -EDQUOT)
2063                 GOTO(out, rc_normal = result);
2064
2065         /* NB: we can't do direct IO for tiny writes because they use the page
2066          * cache, we can't do sync writes because tiny writes can't flush
2067          * pages, and we can't do append writes because we can't guarantee the
2068          * required DLM locks are held to protect file size.
2069          */
2070         if (ll_sbi_has_tiny_write(ll_i2sbi(file_inode(file))) &&
2071             !(file->f_flags & (O_DIRECT | O_SYNC | O_APPEND)))
2072                 rc_tiny = ll_do_tiny_write(iocb, from);
2073
2074         /* In case of error, go on and try normal write - Only stop if tiny
2075          * write completed I/O.
2076          */
2077         if (iov_iter_count(from) == 0)
2078                 GOTO(out, rc_normal = rc_tiny);
2079
2080         env = cl_env_get(&refcheck);
2081         if (IS_ERR(env))
2082                 return PTR_ERR(env);
2083
2084         args = ll_env_args(env);
2085         args->u.normal.via_iter = from;
2086         args->u.normal.via_iocb = iocb;
2087
2088         rc_normal = ll_file_io_generic(env, args, file, CIT_WRITE,
2089                                        &iocb->ki_pos, iov_iter_count(from));
2090
2091         /* On success, combine bytes written. */
2092         if (rc_tiny >= 0 && rc_normal > 0)
2093                 rc_normal += rc_tiny;
2094         /* On error, only return error from normal write if tiny write did not
2095          * write any bytes.  Otherwise return bytes written by tiny write.
2096          */
2097         else if (rc_tiny > 0)
2098                 rc_normal = rc_tiny;
2099
2100         cl_env_put(env, &refcheck);
2101 out:
2102         if (rc_normal > 0) {
2103                 ll_rw_stats_tally(ll_i2sbi(file_inode(file)), current->pid,
2104                                   file->private_data, iocb->ki_pos,
2105                                   rc_normal, WRITE);
2106                 ll_stats_ops_tally(ll_i2sbi(file_inode(file)), LPROC_LL_WRITE,
2107                                    ktime_us_delta(ktime_get(), kstart));
2108         }
2109
2110         RETURN(rc_normal);
2111 }
2112
2113 #ifndef HAVE_FILE_OPERATIONS_READ_WRITE_ITER
2114 /*
2115  * XXX: exact copy from kernel code (__generic_file_aio_write_nolock)
2116  */
2117 static int ll_file_get_iov_count(const struct iovec *iov,
2118                                  unsigned long *nr_segs, size_t *count,
2119                                  int access_flags)
2120 {
2121         size_t cnt = 0;
2122         unsigned long seg;
2123
2124         for (seg = 0; seg < *nr_segs; seg++) {
2125                 const struct iovec *iv = &iov[seg];
2126
2127                 /*
2128                  * If any segment has a negative length, or the cumulative
2129                  * length ever wraps negative then return -EINVAL.
2130                  */
2131                 cnt += iv->iov_len;
2132                 if (unlikely((ssize_t)(cnt|iv->iov_len) < 0))
2133                         return -EINVAL;
2134                 if (access_ok(access_flags, iv->iov_base, iv->iov_len))
2135                         continue;
2136                 if (seg == 0)
2137                         return -EFAULT;
2138                 *nr_segs = seg;
2139                 cnt -= iv->iov_len;     /* This segment is no good */
2140                 break;
2141         }
2142         *count = cnt;
2143         return 0;
2144 }
2145
2146 static ssize_t ll_file_aio_read(struct kiocb *iocb, const struct iovec *iov,
2147                                 unsigned long nr_segs, loff_t pos)
2148 {
2149         struct iov_iter to;
2150         size_t iov_count;
2151         ssize_t result;
2152         ENTRY;
2153
2154         result = ll_file_get_iov_count(iov, &nr_segs, &iov_count, VERIFY_READ);
2155         if (result)
2156                 RETURN(result);
2157
2158         if (!iov_count)
2159                 RETURN(0);
2160
2161 # ifdef HAVE_IOV_ITER_INIT_DIRECTION
2162         iov_iter_init(&to, READ, iov, nr_segs, iov_count);
2163 # else /* !HAVE_IOV_ITER_INIT_DIRECTION */
2164         iov_iter_init(&to, iov, nr_segs, iov_count, 0);
2165 # endif /* HAVE_IOV_ITER_INIT_DIRECTION */
2166
2167         result = ll_file_read_iter(iocb, &to);
2168
2169         RETURN(result);
2170 }
2171
2172 static ssize_t ll_file_read(struct file *file, char __user *buf, size_t count,
2173                             loff_t *ppos)
2174 {
2175         struct iovec   iov = { .iov_base = buf, .iov_len = count };
2176         struct kiocb   kiocb;
2177         ssize_t        result;
2178
2179         ENTRY;
2180
2181         if (!count)
2182                 RETURN(0);
2183
2184         init_sync_kiocb(&kiocb, file);
2185         kiocb.ki_pos = *ppos;
2186 #ifdef HAVE_KIOCB_KI_LEFT
2187         kiocb.ki_left = count;
2188 #elif defined(HAVE_KI_NBYTES)
2189         kiocb.i_nbytes = count;
2190 #endif
2191
2192         result = ll_file_aio_read(&kiocb, &iov, 1, kiocb.ki_pos);
2193         *ppos = kiocb.ki_pos;
2194
2195         RETURN(result);
2196 }
2197
2198 /*
2199  * Write to a file (through the page cache).
2200  * AIO stuff
2201  */
2202 static ssize_t ll_file_aio_write(struct kiocb *iocb, const struct iovec *iov,
2203                                  unsigned long nr_segs, loff_t pos)
2204 {
2205         struct iov_iter from;
2206         size_t iov_count;
2207         ssize_t result;
2208         ENTRY;
2209
2210         result = ll_file_get_iov_count(iov, &nr_segs, &iov_count, VERIFY_WRITE);
2211         if (result)
2212                 RETURN(result);
2213
2214         if (!iov_count)
2215                 RETURN(0);
2216
2217 # ifdef HAVE_IOV_ITER_INIT_DIRECTION
2218         iov_iter_init(&from, WRITE, iov, nr_segs, iov_count);
2219 # else /* !HAVE_IOV_ITER_INIT_DIRECTION */
2220         iov_iter_init(&from, iov, nr_segs, iov_count, 0);
2221 # endif /* HAVE_IOV_ITER_INIT_DIRECTION */
2222
2223         result = ll_file_write_iter(iocb, &from);
2224
2225         RETURN(result);
2226 }
2227
2228 static ssize_t ll_file_write(struct file *file, const char __user *buf,
2229                              size_t count, loff_t *ppos)
2230 {
2231         struct iovec   iov = { .iov_base = (void __user *)buf,
2232                                .iov_len = count };
2233         struct kiocb   kiocb;
2234         ssize_t        result;
2235
2236         ENTRY;
2237
2238         if (!count)
2239                 RETURN(0);
2240
2241         init_sync_kiocb(&kiocb, file);
2242         kiocb.ki_pos = *ppos;
2243 #ifdef HAVE_KIOCB_KI_LEFT
2244         kiocb.ki_left = count;
2245 #elif defined(HAVE_KI_NBYTES)
2246         kiocb.ki_nbytes = count;
2247 #endif
2248
2249         result = ll_file_aio_write(&kiocb, &iov, 1, kiocb.ki_pos);
2250         *ppos = kiocb.ki_pos;
2251
2252         RETURN(result);
2253 }
2254 #endif /* !HAVE_FILE_OPERATIONS_READ_WRITE_ITER */
2255
2256 int ll_lov_setstripe_ea_info(struct inode *inode, struct dentry *dentry,
2257                              __u64 flags, struct lov_user_md *lum, int lum_size)
2258 {
2259         struct lookup_intent oit = {
2260                 .it_op = IT_OPEN,
2261                 .it_flags = flags | MDS_OPEN_BY_FID,
2262         };
2263         int rc;
2264         ENTRY;
2265
2266         if ((__swab32(lum->lmm_magic) & le32_to_cpu(LOV_MAGIC_MASK)) ==
2267             le32_to_cpu(LOV_MAGIC_MAGIC)) {
2268                 /* this code will only exist for big-endian systems */
2269                 lustre_swab_lov_user_md(lum, 0);
2270         }
2271
2272         ll_inode_size_lock(inode);
2273         rc = ll_intent_file_open(dentry, lum, lum_size, &oit);
2274         if (rc < 0)
2275                 GOTO(out_unlock, rc);
2276
2277         ll_release_openhandle(dentry, &oit);
2278
2279 out_unlock:
2280         ll_inode_size_unlock(inode);
2281         ll_intent_release(&oit);
2282
2283         RETURN(rc);
2284 }
2285
2286 int ll_lov_getstripe_ea_info(struct inode *inode, const char *filename,
2287                              struct lov_mds_md **lmmp, int *lmm_size,
2288                              struct ptlrpc_request **request)
2289 {
2290         struct ll_sb_info *sbi = ll_i2sbi(inode);
2291         struct mdt_body  *body;
2292         struct lov_mds_md *lmm = NULL;
2293         struct ptlrpc_request *req = NULL;
2294         struct md_op_data *op_data;
2295         int rc, lmmsize;
2296
2297         ENTRY;
2298
2299         rc = ll_get_default_mdsize(sbi, &lmmsize);
2300         if (rc)
2301                 RETURN(rc);
2302
2303         op_data = ll_prep_md_op_data(NULL, inode, NULL, filename,
2304                                      strlen(filename), lmmsize,
2305                                      LUSTRE_OPC_ANY, NULL);
2306         if (IS_ERR(op_data))
2307                 RETURN(PTR_ERR(op_data));
2308
2309         op_data->op_valid = OBD_MD_FLEASIZE | OBD_MD_FLDIREA;
2310         rc = md_getattr_name(sbi->ll_md_exp, op_data, &req);
2311         ll_finish_md_op_data(op_data);
2312         if (rc < 0) {
2313                 CDEBUG(D_INFO, "md_getattr_name failed on %s: rc %d\n",
2314                        filename, rc);
2315                 GOTO(out, rc);
2316         }
2317
2318         body = req_capsule_server_get(&req->rq_pill, &RMF_MDT_BODY);
2319         LASSERT(body != NULL); /* checked by mdc_getattr_name */
2320
2321         lmmsize = body->mbo_eadatasize;
2322
2323         if (!(body->mbo_valid & (OBD_MD_FLEASIZE | OBD_MD_FLDIREA)) ||
2324             lmmsize == 0)
2325                 GOTO(out, rc = -ENODATA);
2326
2327         lmm = req_capsule_server_sized_get(&req->rq_pill, &RMF_MDT_MD, lmmsize);
2328         LASSERT(lmm != NULL);
2329
2330         if (lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_V1) &&
2331             lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_V3) &&
2332             lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_COMP_V1) &&
2333             lmm->lmm_magic != cpu_to_le32(LOV_MAGIC_FOREIGN))
2334                 GOTO(out, rc = -EPROTO);
2335
2336         /*
2337          * This is coming from the MDS, so is probably in
2338          * little endian. We convert it to host endian before
2339          * passing it to userspace.
2340          */
2341         if (cpu_to_le32(LOV_MAGIC) != LOV_MAGIC) {
2342                 int stripe_count = 0;
2343
2344                 if (lmm->lmm_magic == cpu_to_le32(LOV_MAGIC_V1) ||
2345                     lmm->lmm_magic == cpu_to_le32(LOV_MAGIC_V3)) {
2346                         stripe_count = le16_to_cpu(lmm->lmm_stripe_count);
2347                         if (le32_to_cpu(lmm->lmm_pattern) &
2348                             LOV_PATTERN_F_RELEASED)
2349                                 stripe_count = 0;
2350                         lustre_swab_lov_user_md((struct lov_user_md *)lmm, 0);
2351
2352                         /* if function called for directory - we should
2353                          * avoid swab not existent lsm objects
2354                          */
2355                         if (lmm->lmm_magic == LOV_MAGIC_V1 &&
2356                             S_ISREG(body->mbo_mode))
2357                                 lustre_swab_lov_user_md_objects(
2358                                 ((struct lov_user_md_v1 *)lmm)->lmm_objects,
2359                                 stripe_count);
2360                         else if (lmm->lmm_magic == LOV_MAGIC_V3 &&
2361                                  S_ISREG(body->mbo_mode))
2362                                 lustre_swab_lov_user_md_objects(
2363                                 ((struct lov_user_md_v3 *)lmm)->lmm_objects,
2364                                 stripe_count);
2365                 } else if (lmm->lmm_magic == cpu_to_le32(LOV_MAGIC_COMP_V1)) {
2366                         lustre_swab_lov_comp_md_v1(
2367                                 (struct lov_comp_md_v1 *)lmm);
2368                 }
2369         }
2370
2371         if (lmm->lmm_magic == LOV_MAGIC_COMP_V1) {
2372                 struct lov_comp_md_v1 *comp_v1 = NULL;
2373                 struct lov_comp_md_entry_v1 *ent;
2374                 struct lov_user_md_v1 *v1;
2375                 __u32 off;
2376                 int i = 0;
2377
2378                 comp_v1 = (struct lov_comp_md_v1 *)lmm;
2379                 /* Dump the striping information */
2380                 for (; i < comp_v1->lcm_entry_count; i++) {
2381                         ent = &comp_v1->lcm_entries[i];
2382                         off = ent->lcme_offset;
2383                         v1 = (struct lov_user_md_v1 *)((char *)lmm + off);
2384                         CDEBUG(D_INFO,
2385                                "comp[%d]: stripe_count=%u, stripe_size=%u\n",
2386                                i, v1->lmm_stripe_count, v1->lmm_stripe_size);
2387                 }
2388
2389                 /**
2390                  * Return valid stripe_count and stripe_size instead of 0 for
2391                  * DoM files to avoid divide-by-zero for older userspace that
2392                  * calls this ioctl, e.g. lustre ADIO driver.
2393                  */
2394                 if (lmm->lmm_stripe_count == 0)
2395                         lmm->lmm_stripe_count = 1;
2396                 if (lmm->lmm_stripe_size == 0) {
2397                         /* Since the first component of the file data is placed
2398                          * on the MDT for faster access, the stripe_size of the
2399                          * second one is always that applications which are
2400                          * doing large IOs.
2401                          */
2402                         if (lmm->lmm_pattern == LOV_PATTERN_MDT)
2403                                 i = comp_v1->lcm_entry_count > 1 ? 1 : 0;
2404                         else
2405                                 i = comp_v1->lcm_entry_count > 1 ?
2406                                     comp_v1->lcm_entry_count - 1 : 0;
2407                         ent = &comp_v1->lcm_entries[i];
2408                         off = ent->lcme_offset;
2409                         v1 = (struct lov_user_md_v1 *)((char *)lmm + off);
2410                         lmm->lmm_stripe_size = v1->lmm_stripe_size;
2411                 }
2412         }
2413 out:
2414         *lmmp = lmm;
2415         *lmm_size = lmmsize;
2416         *request = req;
2417         RETURN(rc);
2418 }
2419
2420 static int ll_lov_setea(struct inode *inode, struct file *file,
2421                         void __user *arg)
2422 {
2423         __u64                    flags = MDS_OPEN_HAS_OBJS | FMODE_WRITE;
2424         struct lov_user_md      *lump;
2425         int                      lum_size = sizeof(struct lov_user_md) +
2426                                             sizeof(struct lov_user_ost_data);
2427         int                      rc;
2428         ENTRY;
2429
2430         if (!capable(CAP_SYS_ADMIN))
2431                 RETURN(-EPERM);
2432
2433         OBD_ALLOC_LARGE(lump, lum_size);
2434         if (lump == NULL)
2435                 RETURN(-ENOMEM);
2436
2437         if (copy_from_user(lump, arg, lum_size))
2438                 GOTO(out_lump, rc = -EFAULT);
2439
2440         rc = ll_lov_setstripe_ea_info(inode, file_dentry(file), flags, lump,
2441                                       lum_size);
2442         cl_lov_delay_create_clear(&file->f_flags);
2443
2444 out_lump:
2445         OBD_FREE_LARGE(lump, lum_size);
2446         RETURN(rc);
2447 }
2448
2449 static int ll_file_getstripe(struct inode *inode, void __user *lum, size_t size)
2450 {
2451         struct lu_env   *env;
2452         __u16           refcheck;
2453         int             rc;
2454         ENTRY;
2455
2456         env = cl_env_get(&refcheck);
2457         if (IS_ERR(env))
2458                 RETURN(PTR_ERR(env));
2459
2460         rc = cl_object_getstripe(env, ll_i2info(inode)->lli_clob, lum, size);
2461         cl_env_put(env, &refcheck);
2462         RETURN(rc);
2463 }
2464
2465 static int ll_lov_setstripe(struct inode *inode, struct file *file,
2466                             void __user *arg)
2467 {
2468         struct lov_user_md __user *lum = (struct lov_user_md __user *)arg;
2469         struct lov_user_md        *klum;
2470         int                        lum_size, rc;
2471         __u64                      flags = FMODE_WRITE;
2472         ENTRY;
2473
2474         rc = ll_copy_user_md(lum, &klum);
2475         if (rc < 0)
2476                 RETURN(rc);
2477
2478         lum_size = rc;
2479         rc = ll_lov_setstripe_ea_info(inode, file_dentry(file), flags, klum,
2480                                       lum_size);
2481         if (!rc) {
2482                 __u32 gen;
2483
2484                 rc = put_user(0, &lum->lmm_stripe_count);
2485                 if (rc)
2486                         GOTO(out, rc);
2487
2488                 rc = ll_layout_refresh(inode, &gen);
2489                 if (rc)
2490                         GOTO(out, rc);
2491
2492                 rc = ll_file_getstripe(inode, arg, lum_size);
2493                 if (S_ISREG(inode->i_mode) && IS_ENCRYPTED(inode) &&
2494                     ll_i2info(inode)->lli_clob) {
2495                         struct iattr attr = { 0 };
2496
2497                         rc = cl_setattr_ost(ll_i2info(inode)->lli_clob, &attr,
2498                                             OP_XVALID_FLAGS, LUSTRE_ENCRYPT_FL);
2499                 }
2500         }
2501         cl_lov_delay_create_clear(&file->f_flags);
2502
2503 out:
2504         OBD_FREE_LARGE(klum, lum_size);
2505         RETURN(rc);
2506 }
2507
2508
2509 static int
2510 ll_get_grouplock(struct inode *inode, struct file *file, unsigned long arg)
2511 {
2512         struct ll_inode_info *lli = ll_i2info(inode);
2513         struct cl_object *obj = lli->lli_clob;
2514         struct ll_file_data *fd = file->private_data;
2515         struct ll_grouplock grouplock;
2516         int rc;
2517         ENTRY;
2518
2519         if (arg == 0) {
2520                 CWARN("group id for group lock must not be 0\n");
2521                 RETURN(-EINVAL);
2522         }
2523
2524         if (ll_file_nolock(file))
2525                 RETURN(-EOPNOTSUPP);
2526 retry:
2527         if (file->f_flags & O_NONBLOCK) {
2528                 if (!mutex_trylock(&lli->lli_group_mutex))
2529                         RETURN(-EAGAIN);
2530         } else
2531                 mutex_lock(&lli->lli_group_mutex);
2532
2533         if (fd->fd_flags & LL_FILE_GROUP_LOCKED) {
2534                 CWARN("group lock already existed with gid %lu\n",
2535                       fd->fd_grouplock.lg_gid);
2536                 GOTO(out, rc = -EINVAL);
2537         }
2538         if (arg != lli->lli_group_gid && lli->lli_group_users != 0) {
2539                 if (file->f_flags & O_NONBLOCK)
2540                         GOTO(out, rc = -EAGAIN);
2541                 mutex_unlock(&lli->lli_group_mutex);
2542                 wait_var_event(&lli->lli_group_users, !lli->lli_group_users);
2543                 GOTO(retry, rc = 0);
2544         }
2545         LASSERT(fd->fd_grouplock.lg_lock == NULL);
2546
2547         /**
2548          * XXX: group lock needs to protect all OST objects while PFL
2549          * can add new OST objects during the IO, so we'd instantiate
2550          * all OST objects before getting its group lock.
2551          */
2552         if (obj) {
2553                 struct lu_env *env;
2554                 __u16 refcheck;
2555                 struct cl_layout cl = {
2556                         .cl_is_composite = false,
2557                 };
2558                 struct lu_extent ext = {
2559                         .e_start = 0,
2560                         .e_end = OBD_OBJECT_EOF,
2561                 };
2562
2563                 env = cl_env_get(&refcheck);
2564                 if (IS_ERR(env))
2565                         GOTO(out, rc = PTR_ERR(env));
2566
2567                 rc = cl_object_layout_get(env, obj, &cl);
2568                 if (rc >= 0 && cl.cl_is_composite)
2569                         rc = ll_layout_write_intent(inode, LAYOUT_INTENT_WRITE,
2570                                                     &ext);
2571
2572                 cl_env_put(env, &refcheck);
2573                 if (rc < 0)
2574                         GOTO(out, rc);
2575         }
2576
2577         rc = cl_get_grouplock(ll_i2info(inode)->lli_clob,
2578                               arg, (file->f_flags & O_NONBLOCK), &grouplock);
2579
2580         if (rc)
2581                 GOTO(out, rc);
2582
2583         fd->fd_flags |= LL_FILE_GROUP_LOCKED;
2584         fd->fd_grouplock = grouplock;
2585         if (lli->lli_group_users == 0)
2586                 lli->lli_group_gid = grouplock.lg_gid;
2587         lli->lli_group_users++;
2588
2589         CDEBUG(D_INFO, "group lock %lu obtained\n", arg);
2590 out:
2591         mutex_unlock(&lli->lli_group_mutex);
2592
2593         RETURN(rc);
2594 }
2595
2596 static int ll_put_grouplock(struct inode *inode, struct file *file,
2597                             unsigned long arg)
2598 {
2599         struct ll_inode_info   *lli = ll_i2info(inode);
2600         struct ll_file_data    *fd = file->private_data;
2601         struct ll_grouplock     grouplock;
2602         int                     rc;
2603         ENTRY;
2604
2605         mutex_lock(&lli->lli_group_mutex);
2606         if (!(fd->fd_flags & LL_FILE_GROUP_LOCKED)) {
2607                 CWARN("no group lock held\n");
2608                 GOTO(out, rc = -EINVAL);
2609         }
2610
2611         LASSERT(fd->fd_grouplock.lg_lock != NULL);
2612
2613         if (fd->fd_grouplock.lg_gid != arg) {
2614                 CWARN("group lock %lu doesn't match current id %lu\n",
2615                       arg, fd->fd_grouplock.lg_gid);
2616                 GOTO(out, rc = -EINVAL);
2617         }
2618
2619         grouplock = fd->fd_grouplock;
2620         memset(&fd->fd_grouplock, 0, sizeof(fd->fd_grouplock));
2621         fd->fd_flags &= ~LL_FILE_GROUP_LOCKED;
2622
2623         cl_put_grouplock(&grouplock);
2624
2625         lli->lli_group_users--;
2626         if (lli->lli_group_users == 0) {
2627                 lli->lli_group_gid = 0;
2628                 wake_up_var(&lli->lli_group_users);
2629         }
2630         CDEBUG(D_INFO, "group lock %lu released\n", arg);
2631         GOTO(out, rc = 0);
2632 out:
2633         mutex_unlock(&lli->lli_group_mutex);
2634
2635         RETURN(rc);
2636 }
2637
2638 /**
2639  * Close inode open handle
2640  *
2641  * \param dentry [in]     dentry which contains the inode
2642  * \param it     [in,out] intent which contains open info and result
2643  *
2644  * \retval 0     success
2645  * \retval <0    failure
2646  */
2647 int ll_release_openhandle(struct dentry *dentry, struct lookup_intent *it)
2648 {
2649         struct inode *inode = dentry->d_inode;
2650         struct obd_client_handle *och;
2651         int rc;
2652         ENTRY;
2653
2654         LASSERT(inode);
2655
2656         /* Root ? Do nothing. */
2657         if (is_root_inode(inode))
2658                 RETURN(0);
2659
2660         /* No open handle to close? Move away */
2661         if (!it_disposition(it, DISP_OPEN_OPEN))
2662                 RETURN(0);
2663
2664         LASSERT(it_open_error(DISP_OPEN_OPEN, it) == 0);
2665
2666         OBD_ALLOC(och, sizeof(*och));
2667         if (!och)
2668                 GOTO(out, rc = -ENOMEM);
2669
2670         rc = ll_och_fill(ll_i2sbi(inode)->ll_md_exp, it, och);
2671         if (rc)
2672                 GOTO(out, rc);
2673
2674         rc = ll_close_inode_openhandle(inode, och, 0, NULL);
2675 out:
2676         /* this one is in place of ll_file_open */
2677         if (it_disposition(it, DISP_ENQ_OPEN_REF)) {
2678                 ptlrpc_req_finished(it->it_request);
2679                 it_clear_disposition(it, DISP_ENQ_OPEN_REF);
2680         }
2681         RETURN(rc);
2682 }
2683
2684 /**
2685  * Get size for inode for which FIEMAP mapping is requested.
2686  * Make the FIEMAP get_info call and returns the result.
2687  * \param fiemap        kernel buffer to hold extens
2688  * \param num_bytes     kernel buffer size
2689  */
2690 static int ll_do_fiemap(struct inode *inode, struct fiemap *fiemap,
2691                         size_t num_bytes)
2692 {
2693         struct lu_env                   *env;
2694         __u16                           refcheck;
2695         int                             rc = 0;
2696         struct ll_fiemap_info_key       fmkey = { .lfik_name = KEY_FIEMAP, };
2697         ENTRY;
2698
2699         /* Checks for fiemap flags */
2700         if (fiemap->fm_flags & ~LUSTRE_FIEMAP_FLAGS_COMPAT) {
2701                 fiemap->fm_flags &= ~LUSTRE_FIEMAP_FLAGS_COMPAT;
2702                 return -EBADR;
2703         }
2704
2705         /* Check for FIEMAP_FLAG_SYNC */
2706         if (fiemap->fm_flags & FIEMAP_FLAG_SYNC) {
2707                 rc = filemap_fdatawrite(inode->i_mapping);
2708                 if (rc)
2709                         return rc;
2710         }
2711
2712         env = cl_env_get(&refcheck);
2713         if (IS_ERR(env))
2714                 RETURN(PTR_ERR(env));
2715
2716         if (i_size_read(inode) == 0) {
2717                 rc = ll_glimpse_size(inode);
2718                 if (rc)
2719                         GOTO(out, rc);
2720         }
2721
2722         fmkey.lfik_oa.o_valid = OBD_MD_FLID | OBD_MD_FLGROUP;
2723         obdo_from_inode(&fmkey.lfik_oa, inode, OBD_MD_FLSIZE);
2724         obdo_set_parent_fid(&fmkey.lfik_oa, &ll_i2info(inode)->lli_fid);
2725
2726         /* If filesize is 0, then there would be no objects for mapping */
2727         if (fmkey.lfik_oa.o_size == 0) {
2728                 fiemap->fm_mapped_extents = 0;
2729                 GOTO(out, rc = 0);
2730         }
2731
2732         fmkey.lfik_fiemap = *fiemap;
2733
2734         rc = cl_object_fiemap(env, ll_i2info(inode)->lli_clob,
2735                               &fmkey, fiemap, &num_bytes);
2736 out:
2737         cl_env_put(env, &refcheck);
2738         RETURN(rc);
2739 }
2740
2741 int ll_fid2path(struct inode *inode, void __user *arg)
2742 {
2743         struct obd_export       *exp = ll_i2mdexp(inode);
2744         const struct getinfo_fid2path __user *gfin = arg;
2745         __u32                    pathlen;
2746         struct getinfo_fid2path *gfout;
2747         size_t                   outsize;
2748         int                      rc;
2749
2750         ENTRY;
2751
2752         if (!capable(CAP_DAC_READ_SEARCH) &&
2753             !test_bit(LL_SBI_USER_FID2PATH, ll_i2sbi(inode)->ll_flags))
2754                 RETURN(-EPERM);
2755
2756         /* Only need to get the buflen */
2757         if (get_user(pathlen, &gfin->gf_pathlen))
2758                 RETURN(-EFAULT);
2759
2760         if (pathlen > PATH_MAX)
2761                 RETURN(-EINVAL);
2762
2763         outsize = sizeof(*gfout) + pathlen;
2764         OBD_ALLOC(gfout, outsize);
2765         if (gfout == NULL)
2766                 RETURN(-ENOMEM);
2767
2768         if (copy_from_user(gfout, arg, sizeof(*gfout)))
2769                 GOTO(gf_free, rc = -EFAULT);
2770         /* append root FID after gfout to let MDT know the root FID so that it
2771          * can lookup the correct path, this is mainly for fileset.
2772          * old server without fileset mount support will ignore this. */
2773         *gfout->gf_u.gf_root_fid = *ll_inode2fid(inode);
2774
2775         /* Call mdc_iocontrol */
2776         rc = obd_iocontrol(OBD_IOC_FID2PATH, exp, outsize, gfout, NULL);
2777         if (rc != 0)
2778                 GOTO(gf_free, rc);
2779
2780         if (copy_to_user(arg, gfout, outsize))
2781                 rc = -EFAULT;
2782
2783 gf_free:
2784         OBD_FREE(gfout, outsize);
2785         RETURN(rc);
2786 }
2787
2788 static int
2789 ll_ioc_data_version(struct inode *inode, struct ioc_data_version *ioc)
2790 {
2791         struct cl_object *obj = ll_i2info(inode)->lli_clob;
2792         struct lu_env *env;
2793         struct cl_io *io;
2794         __u16  refcheck;
2795         int result;
2796
2797         ENTRY;
2798
2799         ioc->idv_version = 0;
2800         ioc->idv_layout_version = UINT_MAX;
2801
2802         /* If no file object initialized, we consider its version is 0. */
2803         if (obj == NULL)
2804                 RETURN(0);
2805
2806         env = cl_env_get(&refcheck);
2807         if (IS_ERR(env))
2808                 RETURN(PTR_ERR(env));
2809
2810         io = vvp_env_thread_io(env);
2811         io->ci_obj = obj;
2812         io->u.ci_data_version.dv_data_version = 0;
2813         io->u.ci_data_version.dv_layout_version = UINT_MAX;
2814         io->u.ci_data_version.dv_flags = ioc->idv_flags;
2815
2816 restart:
2817         if (cl_io_init(env, io, CIT_DATA_VERSION, io->ci_obj) == 0)
2818                 result = cl_io_loop(env, io);
2819         else
2820                 result = io->ci_result;
2821
2822         ioc->idv_version = io->u.ci_data_version.dv_data_version;
2823         ioc->idv_layout_version = io->u.ci_data_version.dv_layout_version;
2824
2825         cl_io_fini(env, io);
2826
2827         if (unlikely(io->ci_need_restart))
2828                 goto restart;
2829
2830         cl_env_put(env, &refcheck);
2831
2832         RETURN(result);
2833 }
2834
2835 /*
2836  * Read the data_version for inode.
2837  *
2838  * This value is computed using stripe object version on OST.
2839  * Version is computed using server side locking.
2840  *
2841  * @param flags if do sync on the OST side;
2842  *              0: no sync
2843  *              LL_DV_RD_FLUSH: flush dirty pages, LCK_PR on OSTs
2844  *              LL_DV_WR_FLUSH: drop all caching pages, LCK_PW on OSTs
2845  */
2846 int ll_data_version(struct inode *inode, __u64 *data_version, int flags)
2847 {
2848         struct ioc_data_version ioc = { .idv_flags = flags };
2849         int rc;
2850
2851         rc = ll_ioc_data_version(inode, &ioc);
2852         if (!rc)
2853                 *data_version = ioc.idv_version;
2854
2855         return rc;
2856 }
2857
2858 /*
2859  * Trigger a HSM release request for the provided inode.
2860  */
2861 int ll_hsm_release(struct inode *inode)
2862 {
2863         struct lu_env *env;
2864         struct obd_client_handle *och = NULL;
2865         __u64 data_version = 0;
2866         int rc;
2867         __u16 refcheck;
2868         ENTRY;
2869
2870         CDEBUG(D_INODE, "%s: Releasing file "DFID".\n",
2871                ll_i2sbi(inode)->ll_fsname,
2872                PFID(&ll_i2info(inode)->lli_fid));
2873
2874         och = ll_lease_open(inode, NULL, FMODE_WRITE, MDS_OPEN_RELEASE);
2875         if (IS_ERR(och))
2876                 GOTO(out, rc = PTR_ERR(och));
2877
2878         /* Grab latest data_version and [am]time values */
2879         rc = ll_data_version(inode, &data_version, LL_DV_WR_FLUSH);
2880         if (rc != 0)
2881                 GOTO(out, rc);
2882
2883         env = cl_env_get(&refcheck);
2884         if (IS_ERR(env))
2885                 GOTO(out, rc = PTR_ERR(env));
2886
2887         rc = ll_merge_attr(env, inode);
2888         cl_env_put(env, &refcheck);
2889
2890         /* If error happen, we have the wrong size for a file.
2891          * Don't release it.
2892          */
2893         if (rc != 0)
2894                 GOTO(out, rc);
2895
2896         /* Release the file.
2897          * NB: lease lock handle is released in mdc_hsm_release_pack() because
2898          * we still need it to pack l_remote_handle to MDT. */
2899         rc = ll_close_inode_openhandle(inode, och, MDS_HSM_RELEASE,
2900                                        &data_version);
2901         och = NULL;
2902
2903         EXIT;
2904 out:
2905         if (och != NULL && !IS_ERR(och)) /* close the file */
2906                 ll_lease_close(och, inode, NULL);
2907
2908         return rc;
2909 }
2910
2911 struct ll_swap_stack {
2912         __u64                    dv1;
2913         __u64                    dv2;
2914         struct inode            *inode1;
2915         struct inode            *inode2;
2916         bool                     check_dv1;
2917         bool                     check_dv2;
2918 };
2919
2920 static int ll_swap_layouts(struct file *file1, struct file *file2,
2921                            struct lustre_swap_layouts *lsl)
2922 {
2923         struct mdc_swap_layouts  msl;
2924         struct md_op_data       *op_data;
2925         __u32                    gid;
2926         __u64                    dv;
2927         struct ll_swap_stack    *llss = NULL;
2928         int                      rc;
2929
2930         OBD_ALLOC_PTR(llss);
2931         if (llss == NULL)
2932                 RETURN(-ENOMEM);
2933
2934         llss->inode1 = file_inode(file1);
2935         llss->inode2 = file_inode(file2);
2936
2937         rc = ll_check_swap_layouts_validity(llss->inode1, llss->inode2);
2938         if (rc < 0)
2939                 GOTO(free, rc);
2940
2941         /* we use 2 bool because it is easier to swap than 2 bits */
2942         if (lsl->sl_flags & SWAP_LAYOUTS_CHECK_DV1)
2943                 llss->check_dv1 = true;
2944
2945         if (lsl->sl_flags & SWAP_LAYOUTS_CHECK_DV2)
2946                 llss->check_dv2 = true;
2947
2948         /* we cannot use lsl->sl_dvX directly because we may swap them */
2949         llss->dv1 = lsl->sl_dv1;
2950         llss->dv2 = lsl->sl_dv2;
2951
2952         rc = lu_fid_cmp(ll_inode2fid(llss->inode1), ll_inode2fid(llss->inode2));
2953         if (rc == 0) /* same file, done! */
2954                 GOTO(free, rc);
2955
2956         if (rc < 0) { /* sequentialize it */
2957                 swap(llss->inode1, llss->inode2);
2958                 swap(file1, file2);
2959                 swap(llss->dv1, llss->dv2);
2960                 swap(llss->check_dv1, llss->check_dv2);
2961         }
2962
2963         gid = lsl->sl_gid;
2964         if (gid != 0) { /* application asks to flush dirty cache */
2965                 rc = ll_get_grouplock(llss->inode1, file1, gid);
2966                 if (rc < 0)
2967                         GOTO(free, rc);
2968
2969                 rc = ll_get_grouplock(llss->inode2, file2, gid);
2970                 if (rc < 0) {
2971                         ll_put_grouplock(llss->inode1, file1, gid);
2972                         GOTO(free, rc);
2973                 }
2974         }
2975
2976         /* ultimate check, before swaping the layouts we check if
2977          * dataversion has changed (if requested) */
2978         if (llss->check_dv1) {
2979                 rc = ll_data_version(llss->inode1, &dv, 0);
2980                 if (rc)
2981                         GOTO(putgl, rc);
2982                 if (dv != llss->dv1)
2983                         GOTO(putgl, rc = -EAGAIN);
2984         }
2985
2986         if (llss->check_dv2) {
2987                 rc = ll_data_version(llss->inode2, &dv, 0);
2988                 if (rc)
2989                         GOTO(putgl, rc);
2990                 if (dv != llss->dv2)
2991                         GOTO(putgl, rc = -EAGAIN);
2992         }
2993
2994         /* struct md_op_data is used to send the swap args to the mdt
2995          * only flags is missing, so we use struct mdc_swap_layouts
2996          * through the md_op_data->op_data */
2997         /* flags from user space have to be converted before they are send to
2998          * server, no flag is sent today, they are only used on the client */
2999         msl.msl_flags = 0;
3000         rc = -ENOMEM;
3001         op_data = ll_prep_md_op_data(NULL, llss->inode1, llss->inode2, NULL, 0,
3002                                      0, LUSTRE_OPC_ANY, &msl);
3003         if (IS_ERR(op_data))
3004                 GOTO(free, rc = PTR_ERR(op_data));
3005
3006         rc = obd_iocontrol(LL_IOC_LOV_SWAP_LAYOUTS, ll_i2mdexp(llss->inode1),
3007                            sizeof(*op_data), op_data, NULL);
3008         ll_finish_md_op_data(op_data);
3009
3010         if (rc < 0)
3011                 GOTO(putgl, rc);
3012
3013 putgl:
3014         if (gid != 0) {
3015                 ll_put_grouplock(llss->inode2, file2, gid);
3016                 ll_put_grouplock(llss->inode1, file1, gid);
3017         }
3018
3019 free:
3020         if (llss != NULL)
3021                 OBD_FREE_PTR(llss);
3022
3023         RETURN(rc);
3024 }
3025
3026 int ll_hsm_state_set(struct inode *inode, struct hsm_state_set *hss)
3027 {
3028         struct obd_export *exp = ll_i2mdexp(inode);
3029         struct md_op_data *op_data;
3030         int rc;
3031         ENTRY;
3032
3033         /* Detect out-of range masks */
3034         if ((hss->hss_setmask | hss->hss_clearmask) & ~HSM_FLAGS_MASK)
3035                 RETURN(-EINVAL);
3036
3037         /* Non-root users are forbidden to set or clear flags which are
3038          * NOT defined in HSM_USER_MASK. */
3039         if (((hss->hss_setmask | hss->hss_clearmask) & ~HSM_USER_MASK) &&
3040             !capable(CAP_SYS_ADMIN))
3041                 RETURN(-EPERM);
3042
3043         if (!exp_connect_archive_id_array(exp)) {
3044                 /* Detect out-of range archive id */
3045                 if ((hss->hss_valid & HSS_ARCHIVE_ID) &&
3046                     (hss->hss_archive_id > LL_HSM_ORIGIN_MAX_ARCHIVE))
3047                         RETURN(-EINVAL);
3048         }
3049
3050         op_data = ll_prep_md_op_data(NULL, inode, NULL, NULL, 0, 0,
3051                                      LUSTRE_OPC_ANY, hss);
3052         if (IS_ERR(op_data))
3053                 RETURN(PTR_ERR(op_data));
3054
3055         rc = obd_iocontrol(LL_IOC_HSM_STATE_SET, exp, sizeof(*op_data),
3056                            op_data, NULL);
3057
3058         ll_finish_md_op_data(op_data);
3059
3060         RETURN(rc);
3061 }
3062
3063 static int ll_hsm_import(struct inode *inode, struct file *file,
3064                          struct hsm_user_import *hui)
3065 {
3066         struct hsm_state_set    *hss = NULL;
3067         struct iattr            *attr = NULL;
3068         int                      rc;
3069         ENTRY;
3070
3071         if (!S_ISREG(inode->i_mode))
3072                 RETURN(-EINVAL);
3073
3074         /* set HSM flags */
3075         OBD_ALLOC_PTR(hss);
3076         if (hss == NULL)
3077                 GOTO(out, rc = -ENOMEM);
3078
3079         hss->hss_valid = HSS_SETMASK | HSS_ARCHIVE_ID;
3080         hss->hss_archive_id = hui->hui_archive_id;
3081         hss->hss_setmask = HS_ARCHIVED | HS_EXISTS | HS_RELEASED;
3082         rc = ll_hsm_state_set(inode, hss);
3083         if (rc != 0)
3084                 GOTO(out, rc);
3085
3086         OBD_ALLOC_PTR(attr);
3087         if (attr == NULL)
3088                 GOTO(out, rc = -ENOMEM);
3089
3090         attr->ia_mode = hui->hui_mode & (S_IRWXU | S_IRWXG | S_IRWXO);
3091         attr->ia_mode |= S_IFREG;
3092         attr->ia_uid = make_kuid(&init_user_ns, hui->hui_uid);
3093         attr->ia_gid = make_kgid(&init_user_ns, hui->hui_gid);
3094         attr->ia_size = hui->hui_size;
3095         attr->ia_mtime.tv_sec = hui->hui_mtime;
3096         attr->ia_mtime.tv_nsec = hui->hui_mtime_ns;
3097         attr->ia_atime.tv_sec = hui->hui_atime;
3098         attr->ia_atime.tv_nsec = hui->hui_atime_ns;
3099
3100         attr->ia_valid = ATTR_SIZE | ATTR_MODE | ATTR_FORCE |
3101                          ATTR_UID | ATTR_GID |
3102                          ATTR_MTIME | ATTR_MTIME_SET |
3103                          ATTR_ATIME | ATTR_ATIME_SET;
3104
3105         inode_lock(inode);
3106
3107         rc = ll_setattr_raw(file_dentry(file), attr, 0, true);
3108         if (rc == -ENODATA)
3109                 rc = 0;
3110
3111         inode_unlock(inode);
3112
3113 out:
3114         if (hss != NULL)
3115                 OBD_FREE_PTR(hss);
3116
3117         if (attr != NULL)
3118                 OBD_FREE_PTR(attr);
3119
3120         RETURN(rc);
3121 }
3122
3123 static inline long ll_lease_type_from_fmode(fmode_t fmode)
3124 {
3125         return ((fmode & FMODE_READ) ? LL_LEASE_RDLCK : 0) |
3126                ((fmode & FMODE_WRITE) ? LL_LEASE_WRLCK : 0);
3127 }
3128
3129 static int ll_file_futimes_3(struct file *file, const struct ll_futimes_3 *lfu)
3130 {
3131         struct inode *inode = file_inode(file);
3132         struct iattr ia = {
3133                 .ia_valid = ATTR_ATIME | ATTR_ATIME_SET |
3134                             ATTR_MTIME | ATTR_MTIME_SET |
3135                             ATTR_CTIME,
3136                 .ia_atime = {
3137                         .tv_sec = lfu->lfu_atime_sec,
3138                         .tv_nsec = lfu->lfu_atime_nsec,
3139                 },
3140                 .ia_mtime = {
3141                         .tv_sec = lfu->lfu_mtime_sec,
3142                         .tv_nsec = lfu->lfu_mtime_nsec,
3143                 },
3144                 .ia_ctime = {
3145                         .tv_sec = lfu->lfu_ctime_sec,
3146                         .tv_nsec = lfu->lfu_ctime_nsec,
3147                 },
3148         };
3149         int rc;
3150         ENTRY;
3151
3152         if (!capable(CAP_SYS_ADMIN))
3153                 RETURN(-EPERM);
3154
3155         if (!S_ISREG(inode->i_mode))
3156                 RETURN(-EINVAL);
3157
3158         inode_lock(inode);
3159         rc = ll_setattr_raw(file_dentry(file), &ia, OP_XVALID_CTIME_SET,
3160                             false);
3161         inode_unlock(inode);
3162
3163         RETURN(rc);
3164 }
3165
3166 static enum cl_lock_mode cl_mode_user_to_kernel(enum lock_mode_user mode)
3167 {
3168         switch (mode) {
3169         case MODE_READ_USER:
3170                 return CLM_READ;
3171         case MODE_WRITE_USER:
3172                 return CLM_WRITE;
3173         default:
3174                 return -EINVAL;
3175         }
3176 }
3177
3178 static const char *const user_lockname[] = LOCK_MODE_NAMES;
3179
3180 /* Used to allow the upper layers of the client to request an LDLM lock
3181  * without doing an actual read or write.
3182  *
3183  * Used for ladvise lockahead to manually request specific locks.
3184  *
3185  * \param[in] file      file this ladvise lock request is on
3186  * \param[in] ladvise   ladvise struct describing this lock request
3187  *
3188  * \retval 0            success, no detailed result available (sync requests
3189  *                      and requests sent to the server [not handled locally]
3190  *                      cannot return detailed results)
3191  * \retval LLA_RESULT_{SAME,DIFFERENT} - detailed result of the lock request,
3192  *                                       see definitions for details.
3193  * \retval negative     negative errno on error
3194  */
3195 int ll_file_lock_ahead(struct file *file, struct llapi_lu_ladvise *ladvise)
3196 {
3197         struct lu_env *env = NULL;
3198         struct cl_io *io  = NULL;
3199         struct cl_lock *lock = NULL;
3200         struct cl_lock_descr *descr = NULL;
3201         struct dentry *dentry = file->f_path.dentry;
3202         struct inode *inode = dentry->d_inode;
3203         enum cl_lock_mode cl_mode;
3204         off_t start = ladvise->lla_start;
3205         off_t end = ladvise->lla_end;
3206         int result;
3207         __u16 refcheck;
3208
3209         ENTRY;
3210
3211         CDEBUG(D_VFSTRACE,
3212                "Lock request: file=%pd, inode=%p, mode=%s start=%llu, end=%llu\n",
3213                dentry, dentry->d_inode,
3214                user_lockname[ladvise->lla_lockahead_mode], (__u64) start,
3215                (__u64) end);
3216
3217         cl_mode = cl_mode_user_to_kernel(ladvise->lla_lockahead_mode);
3218         if (cl_mode < 0)
3219                 GOTO(out, result = cl_mode);
3220
3221         /* Get IO environment */
3222         result = cl_io_get(inode, &env, &io, &refcheck);
3223         if (result <= 0)
3224                 GOTO(out, result);
3225
3226         result = cl_io_init(env, io, CIT_MISC, io->ci_obj);
3227         if (result > 0) {
3228                 /*
3229                  * nothing to do for this io. This currently happens when
3230                  * stripe sub-object's are not yet created.
3231                  */
3232                 result = io->ci_result;
3233         } else if (result == 0) {
3234                 lock = vvp_env_lock(env);
3235                 descr = &lock->cll_descr;
3236
3237                 descr->cld_obj   = io->ci_obj;
3238                 /* Convert byte offsets to pages */
3239                 descr->cld_start = cl_index(io->ci_obj, start);
3240                 descr->cld_end   = cl_index(io->ci_obj, end);
3241                 descr->cld_mode  = cl_mode;
3242                 /* CEF_MUST is used because we do not want to convert a
3243                  * lockahead request to a lockless lock */
3244                 descr->cld_enq_flags = CEF_MUST | CEF_LOCK_NO_EXPAND;
3245
3246                 if (ladvise->lla_peradvice_flags & LF_ASYNC)
3247                         descr->cld_enq_flags |= CEF_SPECULATIVE;
3248
3249                 result = cl_lock_request(env, io, lock);
3250
3251                 /* On success, we need to release the lock */
3252                 if (result >= 0)
3253                         cl_lock_release(env, lock);
3254         }
3255         cl_io_fini(env, io);
3256         cl_env_put(env, &refcheck);
3257
3258         /* -ECANCELED indicates a matching lock with a different extent
3259          * was already present, and -EEXIST indicates a matching lock
3260          * on exactly the same extent was already present.
3261          * We convert them to positive values for userspace to make
3262          * recognizing true errors easier.
3263          * Note we can only return these detailed results on async requests,
3264          * as sync requests look the same as i/o requests for locking. */
3265         if (result == -ECANCELED)
3266                 result = LLA_RESULT_DIFFERENT;
3267         else if (result == -EEXIST)
3268                 result = LLA_RESULT_SAME;
3269
3270 out:
3271         RETURN(result);
3272 }
3273 static const char *const ladvise_names[] = LU_LADVISE_NAMES;
3274
3275 static int ll_ladvise_sanity(struct inode *inode,
3276                              struct llapi_lu_ladvise *ladvise)
3277 {
3278         struct ll_sb_info *sbi = ll_i2sbi(inode);
3279         enum lu_ladvise_type advice = ladvise->lla_advice;
3280         /* Note the peradvice flags is a 32 bit field, so per advice flags must
3281          * be in the first 32 bits of enum ladvise_flags */
3282         __u32 flags = ladvise->lla_peradvice_flags;
3283         /* 3 lines at 80 characters per line, should be plenty */
3284         int rc = 0;
3285
3286         if (advice > LU_LADVISE_MAX || advice == LU_LADVISE_INVALID) {
3287                 rc = -EINVAL;
3288                 CDEBUG(D_VFSTRACE,
3289                        "%s: advice with value '%d' not recognized, last supported advice is %s (value '%d'): rc = %d\n",
3290                        sbi->ll_fsname, advice,
3291                        ladvise_names[LU_LADVISE_MAX-1], LU_LADVISE_MAX-1, rc);
3292                 GOTO(out, rc);
3293         }
3294
3295         /* Per-advice checks */
3296         switch (advice) {
3297         case LU_LADVISE_LOCKNOEXPAND:
3298                 if (flags & ~LF_LOCKNOEXPAND_MASK) {
3299                         rc = -EINVAL;
3300                         CDEBUG(D_VFSTRACE, "%s: Invalid flags (%x) for %s: "
3301                                "rc = %d\n", sbi->ll_fsname, flags,
3302                                ladvise_names[advice], rc);
3303                         GOTO(out, rc);
3304                 }
3305                 break;
3306         case LU_LADVISE_LOCKAHEAD:
3307                 /* Currently only READ and WRITE modes can be requested */
3308                 if (ladvise->lla_lockahead_mode >= MODE_MAX_USER ||
3309                     ladvise->lla_lockahead_mode == 0) {
3310                         rc = -EINVAL;
3311                         CDEBUG(D_VFSTRACE, "%s: Invalid mode (%d) for %s: "
3312                                "rc = %d\n", sbi->ll_fsname,
3313                                ladvise->lla_lockahead_mode,
3314                                ladvise_names[advice], rc);
3315