Whamcloud - gitweb
LU-10664 dom: non-blocking enqueue for DOM locks
[fs/lustre-release.git] / lustre / mdt / mdt_lvb.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, write to the
18  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
19  * Boston, MA 021110-1307, USA
20  *
21  * GPL HEADER END
22  */
23 /*
24  * Copyright (c) 2012, 2017, Intel Corporation.
25  * Use is subject to license terms.
26  *
27  * lustre/mdt/mdt_lvb.c
28  *
29  * Author: Jinshan Xiong <jinshan.xiong@intel.com>
30  */
31
32 #define DEBUG_SUBSYSTEM S_MDS
33 #include <lustre_swab.h>
34 #include "mdt_internal.h"
35
36 /* Called with res->lr_lvb_sem held */
37 static int mdt_lvbo_init(struct ldlm_resource *res)
38 {
39         if (IS_LQUOTA_RES(res)) {
40                 struct mdt_device       *mdt;
41
42                 mdt = ldlm_res_to_ns(res)->ns_lvbp;
43                 if (mdt->mdt_qmt_dev == NULL)
44                         return 0;
45
46                 /* call lvbo init function of quota master */
47                 return qmt_hdls.qmth_lvbo_init(mdt->mdt_qmt_dev, res);
48         }
49         return 0;
50 }
51
52 int mdt_dom_lvb_alloc(struct ldlm_resource *res)
53 {
54         struct ost_lvb *lvb;
55
56         mutex_lock(&res->lr_lvb_mutex);
57         if (res->lr_lvb_data == NULL) {
58                 OBD_ALLOC_PTR(lvb);
59                 if (lvb == NULL) {
60                         mutex_unlock(&res->lr_lvb_mutex);
61                         return -ENOMEM;
62                 }
63
64                 res->lr_lvb_data = lvb;
65                 res->lr_lvb_len = sizeof(*lvb);
66
67                 /* Store error in LVB to inidicate it has no data yet.
68                  */
69                 OST_LVB_SET_ERR(lvb->lvb_blocks, -ENODATA);
70         }
71         mutex_unlock(&res->lr_lvb_mutex);
72         return 0;
73 }
74
75 int mdt_dom_lvb_is_valid(struct ldlm_resource *res)
76 {
77         struct ost_lvb *res_lvb = res->lr_lvb_data;
78
79         return !(res_lvb == NULL || OST_LVB_IS_ERR(res_lvb->lvb_blocks));
80 }
81
82 int mdt_dom_disk_lvbo_update(const struct lu_env *env, struct mdt_object *mo,
83                              struct ldlm_resource *res, bool increase_only)
84 {
85         struct mdt_thread_info *info = mdt_th_info(env);
86         const struct lu_fid *fid = mdt_object_fid(mo);
87         struct ost_lvb *lvb;
88         struct md_attr *ma;
89         int rc = 0;
90
91         ENTRY;
92
93         lvb = res->lr_lvb_data;
94         LASSERT(lvb);
95
96         if (!mdt_object_exists(mo) || mdt_object_remote(mo))
97                 RETURN(-ENOENT);
98
99         ma = &info->mti_attr2;
100         ma->ma_valid = 0;
101         ma->ma_need = MA_INODE;
102         rc = mo_attr_get(env, mdt_object_child(mo), ma);
103         if (rc)
104                 RETURN(rc);
105
106         lock_res(res);
107         if (ma->ma_attr.la_size > lvb->lvb_size || !increase_only) {
108                 CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb size from disk: "
109                        "%llu -> %llu\n", PFID(fid),
110                        lvb->lvb_size, ma->ma_attr.la_size);
111                 lvb->lvb_size = ma->ma_attr.la_size;
112         }
113
114         if (ma->ma_attr.la_mtime > lvb->lvb_mtime || !increase_only) {
115                 CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb mtime from disk: "
116                        "%llu -> %llu\n", PFID(fid),
117                        lvb->lvb_mtime, ma->ma_attr.la_mtime);
118                 lvb->lvb_mtime = ma->ma_attr.la_mtime;
119         }
120         if (ma->ma_attr.la_atime > lvb->lvb_atime || !increase_only) {
121                 CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb atime from disk: "
122                        "%llu -> %llu\n", PFID(fid),
123                        lvb->lvb_atime, ma->ma_attr.la_atime);
124                 lvb->lvb_atime = ma->ma_attr.la_atime;
125         }
126         if (ma->ma_attr.la_ctime > lvb->lvb_ctime || !increase_only) {
127                 CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb ctime from disk: "
128                        "%llu -> %llu\n", PFID(fid),
129                        lvb->lvb_ctime, ma->ma_attr.la_ctime);
130                 lvb->lvb_ctime = ma->ma_attr.la_ctime;
131         }
132         if (ma->ma_attr.la_blocks > lvb->lvb_blocks || !increase_only) {
133                 CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb blocks from disk: "
134                        "%llu -> %llu\n", PFID(fid), lvb->lvb_blocks,
135                        (unsigned long long)ma->ma_attr.la_blocks);
136                 lvb->lvb_blocks = ma->ma_attr.la_blocks;
137         }
138         unlock_res(res);
139
140         RETURN(rc);
141 }
142
143 int mdt_dom_lvbo_update(struct ldlm_resource *res, struct ldlm_lock *lock,
144                         struct ptlrpc_request *req, bool increase_only)
145 {
146         struct obd_export *exp = lock ? lock->l_export : NULL;
147         const struct lu_env *env = lu_env_find();
148         struct mdt_device *mdt;
149         struct mdt_object *mo;
150         struct mdt_thread_info *info;
151         struct ost_lvb *lvb;
152         struct lu_fid *fid;
153         int rc = 0;
154
155         ENTRY;
156
157         /* Before going further let's check that OBD and export are healthy.
158          */
159         if (exp != NULL &&
160             (exp->exp_disconnected || exp->exp_failed ||
161              exp->exp_obd->obd_stopping)) {
162                 CDEBUG(D_INFO, "Skip LVB update, export is %s, obd is %s\n",
163                        exp->exp_failed ? "failed" : "disconnected",
164                        exp->exp_obd->obd_stopping ? "stopping" : "OK");
165                 RETURN(0);
166         }
167
168         rc = mdt_dom_lvb_alloc(res);
169         if (rc < 0)
170                 RETURN(rc);
171
172         mdt = ldlm_res_to_ns(res)->ns_lvbp;
173         if (mdt == NULL)
174                 RETURN(-ENOENT);
175
176         LASSERT(env);
177         info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
178         if (!info) {
179                 rc = lu_env_refill_by_tags((struct lu_env *)env,
180                                            LCT_MD_THREAD, 0);
181                 if (rc)
182                         GOTO(out_env, rc);
183                 info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
184                 if (!info)
185                         GOTO(out_env, rc = -ENOMEM);
186         }
187
188         fid = &info->mti_tmp_fid2;
189         fid_extract_from_res_name(fid, &res->lr_name);
190
191         lvb = res->lr_lvb_data;
192         LASSERT(lvb);
193
194         /* Update the LVB from the network message */
195         if (req != NULL) {
196                 struct ost_lvb *rpc_lvb;
197
198                 rpc_lvb = req_capsule_server_swab_get(&req->rq_pill,
199                                                       &RMF_DLM_LVB,
200                                                       lustre_swab_ost_lvb);
201                 if (rpc_lvb == NULL)
202                         goto disk_update;
203
204                 lock_res(res);
205                 if (rpc_lvb->lvb_size > lvb->lvb_size || !increase_only) {
206                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb size: "
207                                "%llu -> %llu\n", PFID(fid),
208                                lvb->lvb_size, rpc_lvb->lvb_size);
209                         lvb->lvb_size = rpc_lvb->lvb_size;
210                 }
211                 if (rpc_lvb->lvb_mtime > lvb->lvb_mtime || !increase_only) {
212                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb mtime: "
213                                "%llu -> %llu\n", PFID(fid),
214                                lvb->lvb_mtime, rpc_lvb->lvb_mtime);
215                         lvb->lvb_mtime = rpc_lvb->lvb_mtime;
216                 }
217                 if (rpc_lvb->lvb_atime > lvb->lvb_atime || !increase_only) {
218                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb atime: "
219                                "%llu -> %llu\n", PFID(fid),
220                                lvb->lvb_atime, rpc_lvb->lvb_atime);
221                         lvb->lvb_atime = rpc_lvb->lvb_atime;
222                 }
223                 if (rpc_lvb->lvb_ctime > lvb->lvb_ctime || !increase_only) {
224                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb ctime: "
225                                "%llu -> %llu\n", PFID(fid),
226                                lvb->lvb_ctime, rpc_lvb->lvb_ctime);
227                         lvb->lvb_ctime = rpc_lvb->lvb_ctime;
228                 }
229                 if (rpc_lvb->lvb_blocks > lvb->lvb_blocks || !increase_only) {
230                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb blocks: "
231                                "%llu -> %llu\n", PFID(fid),
232                                lvb->lvb_blocks, rpc_lvb->lvb_blocks);
233                         lvb->lvb_blocks = rpc_lvb->lvb_blocks;
234                 }
235                 unlock_res(res);
236         }
237
238 disk_update:
239         /* Update the LVB from the disk inode */
240         mo = mdt_object_find(env, mdt, fid);
241         if (IS_ERR(mo))
242                 GOTO(out_env, rc = PTR_ERR(mo));
243
244         rc = mdt_dom_disk_lvbo_update(env, mo, res, !!increase_only);
245         mdt_object_put(env, mo);
246 out_env:
247         return rc;
248 }
249
250 static int mdt_lvbo_update(struct ldlm_resource *res, struct ldlm_lock *lock,
251                            struct ptlrpc_request *req, int increase_only)
252 {
253         ENTRY;
254
255         if (IS_LQUOTA_RES(res)) {
256                 struct mdt_device *mdt;
257
258                 mdt = ldlm_res_to_ns(res)->ns_lvbp;
259                 if (mdt->mdt_qmt_dev == NULL)
260                         return 0;
261
262                 /* call lvbo update function of quota master */
263                 return qmt_hdls.qmth_lvbo_update(mdt->mdt_qmt_dev, res, req,
264                                                  increase_only);
265         }
266
267         /* Data-on-MDT lvbo update.
268          * Like a ldlm_lock_init() the lock can be skipped and that means
269          * it is DOM resource because lvbo_update() without lock is called
270          * by MDT for DOM objects only.
271          */
272         if (lock == NULL || ldlm_has_dom(lock))
273                 return mdt_dom_lvbo_update(res, lock, req, !!increase_only);
274         return 0;
275 }
276
277
278 static int mdt_lvbo_size(struct ldlm_lock *lock)
279 {
280         struct mdt_device *mdt;
281
282         /* resource on server side never changes. */
283         mdt = ldlm_res_to_ns(lock->l_resource)->ns_lvbp;
284         if (!mdt)
285                 return 0;
286
287         if (IS_LQUOTA_RES(lock->l_resource)) {
288                 if (mdt->mdt_qmt_dev == NULL)
289                         return 0;
290
291                 /* call lvbo size function of quota master */
292                 return qmt_hdls.qmth_lvbo_size(mdt->mdt_qmt_dev, lock);
293         }
294
295         /* Always prefer DoM LVB data because layout is never returned in
296          * LVB when lock bits are combined with DoM, this is either GETATTR
297          * or OPEN enqueue. Meanwhile GL AST can be issued on such combined
298          * lock bits and it uses LVB for DoM data.
299          */
300         if (ldlm_has_dom(lock))
301                 return sizeof(struct ost_lvb);
302
303         if (ldlm_has_layout(lock))
304                 return mdt->mdt_max_mdsize;
305
306         return 0;
307 }
308
309 /**
310  * Implementation of ldlm_valblock_ops::lvbo_fill for MDT.
311  *
312  * This function is called to fill the given RPC buffer \a buf with LVB data
313  *
314  * \param[in] env               execution environment
315  * \param[in] lock              LDLM lock
316  * \param[in] buf               RPC buffer to fill
317  * \param[in,out] lvblen        lvb buffer length
318  *
319  * \retval              size of LVB data written into \a buf buffer
320  *                      or -ERANGE when the provided @lvblen is not big enough,
321  *                      and the needed lvb buffer size will be returned in
322  *                      @lvblen
323  */
324 static int mdt_lvbo_fill(struct ldlm_lock *lock,
325                          void *lvb, int *lvblen)
326 {
327         struct mdt_thread_info *info;
328         struct mdt_device *mdt;
329         struct lu_env *env;
330         struct lu_fid *fid;
331         struct mdt_object *obj = NULL;
332         struct md_object *child = NULL;
333         int rc;
334         ENTRY;
335
336         env = lu_env_find();
337         LASSERT(env);
338
339         mdt = ldlm_lock_to_ns(lock)->ns_lvbp;
340         if (!mdt)
341                 RETURN(0);
342
343         if (IS_LQUOTA_RES(lock->l_resource)) {
344                 if (mdt->mdt_qmt_dev == NULL)
345                         GOTO(out, rc = 0);
346
347                 /* call lvbo fill function of quota master */
348                 rc = qmt_hdls.qmth_lvbo_fill(mdt->mdt_qmt_dev, lock, lvb,
349                                              *lvblen);
350                 GOTO(out, rc);
351         }
352
353         info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
354         if (!info) {
355                 rc = lu_env_refill_by_tags(env, LCT_MD_THREAD, 0);
356                 if (rc)
357                         GOTO(out, rc);
358                 info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
359                 if (!info)
360                         GOTO(out, rc = -ENOMEM);
361         }
362
363         /* DOM LVB is used by glimpse and IO completion when
364          * DoM bits is always alone.
365          * If DoM bit is combined with any other bit then it is
366          * intent OPEN or GETATTR lock which is not filling
367          * LVB buffer in reply neither for DoM nor for LAYOUT.
368          */
369         if (ldlm_has_dom(lock)) {
370                 struct ldlm_resource *res = lock->l_resource;
371                 int lvb_len = sizeof(struct ost_lvb);
372
373                 if (!mdt_dom_lvb_is_valid(res))
374                         mdt_dom_lvbo_update(res, lock, NULL, 0);
375
376                 LASSERT(*lvblen >= lvb_len);
377                 lock_res(res);
378                 memcpy(lvb, res->lr_lvb_data, lvb_len);
379                 unlock_res(res);
380                 GOTO(out, rc = lvb_len);
381         }
382
383         /* Only fill layout if layout lock is granted */
384         if (!ldlm_has_layout(lock) || !ldlm_is_granted(lock))
385                 GOTO(out, rc = 0);
386
387         /* XXX get fid by resource id. why don't include fid in ldlm_resource */
388         fid = &info->mti_tmp_fid2;
389         fid_extract_from_res_name(fid, &lock->l_resource->lr_name);
390
391         obj = mdt_object_find(env, mdt, fid);
392         if (IS_ERR(obj))
393                 GOTO(out, rc = PTR_ERR(obj));
394
395         if (!mdt_object_exists(obj) || mdt_object_remote(obj))
396                 GOTO(out_put, rc = -ENOENT);
397
398         child = mdt_object_child(obj);
399
400         /* get the length of lsm */
401         rc = mo_xattr_get(env, child, &LU_BUF_NULL, XATTR_NAME_LOV);
402         if (rc < 0)
403                 GOTO(out_put, rc);
404         if (rc > 0) {
405                 struct lu_buf *lmm = NULL;
406                 if (*lvblen < rc) {
407                         int level;
408
409                         /* The layout EA may be larger than mdt_max_mdsize
410                          * and in that case mdt_max_mdsize is just updated
411                          * but if EA size is less than mdt_max_mdsize then
412                          * it is an error in lvblen value provided. */
413                         if (rc > mdt->mdt_max_mdsize) {
414                                 mdt->mdt_max_mdsize = rc;
415                                 level = D_INFO;
416                         } else {
417                                 /* The PFL layout EA could be enlarged when
418                                  * the corresponding layout of some IO range
419                                  * is started to be written, which can cause
420                                  * other thread to get incorrect layout size
421                                  * at mdt_intent_layout, see LU-13261. */
422                                 level = D_LAYOUT;
423                         }
424                         CDEBUG_LIMIT(level, "%s: small buffer size %d for EA "
425                                      "%d (max_mdsize %d): rc = %d\n",
426                                      mdt_obd_name(mdt), *lvblen, rc,
427                                      mdt->mdt_max_mdsize, -ERANGE);
428                         *lvblen = rc;
429                         GOTO(out_put, rc = -ERANGE);
430                 }
431                 lmm = &info->mti_buf;
432                 lmm->lb_buf = lvb;
433                 lmm->lb_len = rc;
434                 rc = mo_xattr_get(env, child, lmm, XATTR_NAME_LOV);
435                 if (rc < 0)
436                         GOTO(out_put, rc);
437         }
438
439 out_put:
440         if (obj != NULL && !IS_ERR(obj))
441                 mdt_object_put(env, obj);
442 out:
443         if (rc < 0 && rc != -ERANGE)
444                 rc = 0;
445         RETURN(rc);
446 }
447
448 static int mdt_lvbo_free(struct ldlm_resource *res)
449 {
450         if (IS_LQUOTA_RES(res)) {
451                 struct mdt_device *mdt;
452
453                 mdt = ldlm_res_to_ns(res)->ns_lvbp;
454                 if (!mdt || !mdt->mdt_qmt_dev)
455                         return 0;
456
457                 /* call lvbo free function of quota master */
458                 return qmt_hdls.qmth_lvbo_free(mdt->mdt_qmt_dev, res);
459         }
460
461         /* Data-on-MDT lvbo free */
462         if (res->lr_lvb_data != NULL)
463                 OBD_FREE(res->lr_lvb_data, res->lr_lvb_len);
464         return 0;
465 }
466
467 struct ldlm_valblock_ops mdt_lvbo = {
468         .lvbo_init      = mdt_lvbo_init,
469         .lvbo_update    = mdt_lvbo_update,
470         .lvbo_size      = mdt_lvbo_size,
471         .lvbo_fill      = mdt_lvbo_fill,
472         .lvbo_free      = mdt_lvbo_free
473 };