Whamcloud - gitweb
LU-15146 mdt: mdt_lvb2reply crash fix
[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          * The condition matches one in ptlrpc_send_reply()
159          */
160         if (exp && exp->exp_obd && exp->exp_obd->obd_fail) {
161                 CDEBUG(D_INFO, "Skip LVB update, obd is failing over\n");
162                 RETURN(0);
163         }
164
165         rc = mdt_dom_lvb_alloc(res);
166         if (rc < 0)
167                 RETURN(rc);
168
169         mdt = ldlm_res_to_ns(res)->ns_lvbp;
170         if (mdt == NULL)
171                 RETURN(-ENOENT);
172
173         LASSERT(env);
174         info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
175         if (!info) {
176                 rc = lu_env_refill_by_tags((struct lu_env *)env,
177                                            LCT_MD_THREAD, 0);
178                 if (rc)
179                         GOTO(out_env, rc);
180                 info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
181                 if (!info)
182                         GOTO(out_env, rc = -ENOMEM);
183         }
184
185         fid = &info->mti_tmp_fid2;
186         fid_extract_from_res_name(fid, &res->lr_name);
187
188         lvb = res->lr_lvb_data;
189         LASSERT(lvb);
190
191         /* Update the LVB from the network message */
192         if (req != NULL) {
193                 struct ost_lvb *rpc_lvb;
194
195                 rpc_lvb = req_capsule_server_swab_get(&req->rq_pill,
196                                                       &RMF_DLM_LVB,
197                                                       lustre_swab_ost_lvb);
198                 if (rpc_lvb == NULL)
199                         goto disk_update;
200
201                 lock_res(res);
202                 if (rpc_lvb->lvb_size > lvb->lvb_size || !increase_only) {
203                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb size: "
204                                "%llu -> %llu\n", PFID(fid),
205                                lvb->lvb_size, rpc_lvb->lvb_size);
206                         lvb->lvb_size = rpc_lvb->lvb_size;
207                 }
208                 if (rpc_lvb->lvb_mtime > lvb->lvb_mtime || !increase_only) {
209                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb mtime: "
210                                "%llu -> %llu\n", PFID(fid),
211                                lvb->lvb_mtime, rpc_lvb->lvb_mtime);
212                         lvb->lvb_mtime = rpc_lvb->lvb_mtime;
213                 }
214                 if (rpc_lvb->lvb_atime > lvb->lvb_atime || !increase_only) {
215                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb atime: "
216                                "%llu -> %llu\n", PFID(fid),
217                                lvb->lvb_atime, rpc_lvb->lvb_atime);
218                         lvb->lvb_atime = rpc_lvb->lvb_atime;
219                 }
220                 if (rpc_lvb->lvb_ctime > lvb->lvb_ctime || !increase_only) {
221                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb ctime: "
222                                "%llu -> %llu\n", PFID(fid),
223                                lvb->lvb_ctime, rpc_lvb->lvb_ctime);
224                         lvb->lvb_ctime = rpc_lvb->lvb_ctime;
225                 }
226                 if (rpc_lvb->lvb_blocks > lvb->lvb_blocks || !increase_only) {
227                         CDEBUG(D_DLMTRACE, "res: "DFID" updating lvb blocks: "
228                                "%llu -> %llu\n", PFID(fid),
229                                lvb->lvb_blocks, rpc_lvb->lvb_blocks);
230                         lvb->lvb_blocks = rpc_lvb->lvb_blocks;
231                 }
232                 unlock_res(res);
233         }
234
235 disk_update:
236         /* Update the LVB from the disk inode */
237         mo = mdt_object_find(env, mdt, fid);
238         if (IS_ERR(mo))
239                 GOTO(out_env, rc = PTR_ERR(mo));
240
241         rc = mdt_dom_disk_lvbo_update(env, mo, res, !!increase_only);
242         mdt_object_put(env, mo);
243 out_env:
244         return rc;
245 }
246
247 static int mdt_lvbo_update(struct ldlm_resource *res, struct ldlm_lock *lock,
248                            struct ptlrpc_request *req, int increase_only)
249 {
250         ENTRY;
251
252         if (IS_LQUOTA_RES(res)) {
253                 struct mdt_device *mdt;
254
255                 mdt = ldlm_res_to_ns(res)->ns_lvbp;
256                 if (mdt->mdt_qmt_dev == NULL)
257                         return 0;
258
259                 /* call lvbo update function of quota master */
260                 return qmt_hdls.qmth_lvbo_update(mdt->mdt_qmt_dev, res, req,
261                                                  increase_only);
262         }
263
264         /* Data-on-MDT lvbo update.
265          * Like a ldlm_lock_init() the lock can be skipped and that means
266          * it is DOM resource because lvbo_update() without lock is called
267          * by MDT for DOM objects only.
268          */
269         if (lock == NULL || ldlm_has_dom(lock))
270                 return mdt_dom_lvbo_update(res, lock, req, !!increase_only);
271         return 0;
272 }
273
274
275 static int mdt_lvbo_size(struct ldlm_lock *lock)
276 {
277         struct mdt_device *mdt;
278
279         /* resource on server side never changes. */
280         mdt = ldlm_res_to_ns(lock->l_resource)->ns_lvbp;
281         if (!mdt)
282                 return 0;
283
284         if (IS_LQUOTA_RES(lock->l_resource)) {
285                 if (mdt->mdt_qmt_dev == NULL)
286                         return 0;
287
288                 /* call lvbo size function of quota master */
289                 return qmt_hdls.qmth_lvbo_size(mdt->mdt_qmt_dev, lock);
290         }
291
292         /* Always prefer DoM LVB data because layout is never returned in
293          * LVB when lock bits are combined with DoM, this is either GETATTR
294          * or OPEN enqueue. Meanwhile GL AST can be issued on such combined
295          * lock bits and it uses LVB for DoM data.
296          */
297         if (ldlm_has_dom(lock))
298                 return sizeof(struct ost_lvb);
299
300         if (ldlm_has_layout(lock))
301                 return mdt->mdt_max_mdsize;
302
303         return 0;
304 }
305
306 /**
307  * Implementation of ldlm_valblock_ops::lvbo_fill for MDT.
308  *
309  * This function is called to fill the given RPC buffer \a buf with LVB data
310  *
311  * \param[in] env               execution environment
312  * \param[in] lock              LDLM lock
313  * \param[in] buf               RPC buffer to fill
314  * \param[in,out] lvblen        lvb buffer length
315  *
316  * \retval              size of LVB data written into \a buf buffer
317  *                      or -ERANGE when the provided @lvblen is not big enough,
318  *                      and the needed lvb buffer size will be returned in
319  *                      @lvblen
320  */
321 static int mdt_lvbo_fill(struct ldlm_lock *lock,
322                          void *lvb, int *lvblen)
323 {
324         struct mdt_thread_info *info;
325         struct mdt_device *mdt;
326         struct lu_env *env;
327         struct lu_fid *fid;
328         struct mdt_object *obj = NULL;
329         struct md_object *child = NULL;
330         int rc;
331         ENTRY;
332
333         env = lu_env_find();
334         LASSERT(env);
335
336         mdt = ldlm_lock_to_ns(lock)->ns_lvbp;
337         if (!mdt)
338                 RETURN(0);
339
340         if (IS_LQUOTA_RES(lock->l_resource)) {
341                 if (mdt->mdt_qmt_dev == NULL)
342                         GOTO(out, rc = 0);
343
344                 /* call lvbo fill function of quota master */
345                 rc = qmt_hdls.qmth_lvbo_fill(mdt->mdt_qmt_dev, lock, lvb,
346                                              *lvblen);
347                 GOTO(out, rc);
348         }
349
350         info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
351         if (!info) {
352                 rc = lu_env_refill_by_tags(env, LCT_MD_THREAD, 0);
353                 if (rc)
354                         GOTO(out, rc);
355                 info = lu_context_key_get(&env->le_ctx, &mdt_thread_key);
356                 if (!info)
357                         GOTO(out, rc = -ENOMEM);
358         }
359
360         /* DOM LVB is used by glimpse and IO completion when
361          * DoM bits is always alone.
362          * If DoM bit is combined with any other bit then it is
363          * intent OPEN or GETATTR lock which is not filling
364          * LVB buffer in reply neither for DoM nor for LAYOUT.
365          */
366         if (ldlm_has_dom(lock)) {
367                 struct ldlm_resource *res = lock->l_resource;
368                 int lvb_len = sizeof(struct ost_lvb);
369
370                 if (!mdt_dom_lvb_is_valid(res))
371                         mdt_dom_lvbo_update(res, lock, NULL, 0);
372
373                 LASSERT(*lvblen >= lvb_len);
374                 lock_res(res);
375                 memcpy(lvb, res->lr_lvb_data, lvb_len);
376                 unlock_res(res);
377                 GOTO(out, rc = lvb_len);
378         }
379
380         /* Only fill layout if layout lock is granted */
381         if (!ldlm_has_layout(lock) || !ldlm_is_granted(lock))
382                 GOTO(out, rc = 0);
383
384         /* XXX get fid by resource id. why don't include fid in ldlm_resource */
385         fid = &info->mti_tmp_fid2;
386         fid_extract_from_res_name(fid, &lock->l_resource->lr_name);
387
388         obj = mdt_object_find(env, mdt, fid);
389         if (IS_ERR(obj))
390                 GOTO(out, rc = PTR_ERR(obj));
391
392         if (!mdt_object_exists(obj) || mdt_object_remote(obj))
393                 GOTO(out_put, rc = -ENOENT);
394
395         child = mdt_object_child(obj);
396
397         /* get the length of lsm */
398         rc = mo_xattr_get(env, child, &LU_BUF_NULL, XATTR_NAME_LOV);
399         if (rc < 0)
400                 GOTO(out_put, rc);
401         if (rc > 0) {
402                 struct lu_buf *lmm = NULL;
403                 if (*lvblen < rc) {
404                         int level;
405
406                         /* The layout EA may be larger than mdt_max_mdsize
407                          * and in that case mdt_max_mdsize is just updated
408                          * but if EA size is less than mdt_max_mdsize then
409                          * it is an error in lvblen value provided. */
410                         if (rc > mdt->mdt_max_mdsize) {
411                                 mdt->mdt_max_mdsize = rc;
412                                 level = D_INFO;
413                         } else {
414                                 /* The PFL layout EA could be enlarged when
415                                  * the corresponding layout of some IO range
416                                  * is started to be written, which can cause
417                                  * other thread to get incorrect layout size
418                                  * at mdt_intent_layout, see LU-13261. */
419                                 level = D_LAYOUT;
420                         }
421                         CDEBUG_LIMIT(level, "%s: small buffer size %d for EA "
422                                      "%d (max_mdsize %d): rc = %d\n",
423                                      mdt_obd_name(mdt), *lvblen, rc,
424                                      mdt->mdt_max_mdsize, -ERANGE);
425                         *lvblen = rc;
426                         GOTO(out_put, rc = -ERANGE);
427                 }
428                 lmm = &info->mti_buf;
429                 lmm->lb_buf = lvb;
430                 lmm->lb_len = rc;
431                 rc = mo_xattr_get(env, child, lmm, XATTR_NAME_LOV);
432                 if (rc < 0)
433                         GOTO(out_put, rc);
434         }
435
436 out_put:
437         if (obj != NULL && !IS_ERR(obj))
438                 mdt_object_put(env, obj);
439 out:
440         if (rc < 0 && rc != -ERANGE)
441                 rc = 0;
442         RETURN(rc);
443 }
444
445 static int mdt_lvbo_free(struct ldlm_resource *res)
446 {
447         if (IS_LQUOTA_RES(res)) {
448                 struct mdt_device *mdt;
449
450                 mdt = ldlm_res_to_ns(res)->ns_lvbp;
451                 if (!mdt || !mdt->mdt_qmt_dev)
452                         return 0;
453
454                 /* call lvbo free function of quota master */
455                 return qmt_hdls.qmth_lvbo_free(mdt->mdt_qmt_dev, res);
456         }
457
458         /* Data-on-MDT lvbo free */
459         if (res->lr_lvb_data != NULL)
460                 OBD_FREE(res->lr_lvb_data, res->lr_lvb_len);
461         return 0;
462 }
463
464 struct ldlm_valblock_ops mdt_lvbo = {
465         .lvbo_init      = mdt_lvbo_init,
466         .lvbo_update    = mdt_lvbo_update,
467         .lvbo_size      = mdt_lvbo_size,
468         .lvbo_fill      = mdt_lvbo_fill,
469         .lvbo_free      = mdt_lvbo_free
470 };