Whamcloud - gitweb
LU-3321 clio: revert LU-2622 for removing global env list
[fs/lustre-release.git] / lustre / liblustre / rw.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.sun.com/software/products/lustre/docs/GPLv2.pdf
19  *
20  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
21  * CA 95054 USA or visit www.sun.com if you need additional information or
22  * have any questions.
23  *
24  * GPL HEADER END
25  */
26 /*
27  * Copyright (c) 2003, 2010, Oracle and/or its affiliates. All rights reserved.
28  * Use is subject to license terms.
29  *
30  * Copyright (c) 2011, 2013, Intel Corporation.
31  */
32 /*
33  * This file is part of Lustre, http://www.lustre.org/
34  * Lustre is a trademark of Sun Microsystems, Inc.
35  *
36  * lustre/liblustre/rw.c
37  *
38  * Lustre Light block IO
39  */
40
41 #define DEBUG_SUBSYSTEM S_LLITE
42
43 #include <stdlib.h>
44 #include <string.h>
45 #include <assert.h>
46 #include <time.h>
47 #include <sys/types.h>
48 #include <sys/stat.h>
49 #include <sys/queue.h>
50 #include <fcntl.h>
51 #include <sys/uio.h>
52
53 #include "llite_lib.h"
54
55 typedef ssize_t llu_file_piov_t(const struct iovec *iovec, int iovlen,
56                                 _SYSIO_OFF_T pos, ssize_t len,
57                                 void *private);
58
59 size_t llap_cookie_size;
60
61 static int llu_lock_to_stripe_offset(struct obd_export *exp,
62                                      struct lov_stripe_md *lsm,
63                                      struct ldlm_lock *lock)
64 {
65         struct {
66                 char name[16];
67                 struct ldlm_lock *lock;
68         } key = { .name = KEY_LOCK_TO_STRIPE, .lock = lock };
69         __u32 stripe, vallen = sizeof(stripe);
70         int rc;
71         ENTRY;
72
73         if (lsm == NULL || lsm->lsm_stripe_count == 1)
74                 RETURN(0);
75
76         /* get our offset in the lov */
77         rc = obd_get_info(NULL, exp, sizeof(key), &key, &vallen, &stripe, lsm);
78         if (rc != 0) {
79                 CERROR("obd_get_info: rc = %d\n", rc);
80                 LBUG();
81         }
82         LASSERT(stripe < lsm->lsm_stripe_count);
83         RETURN(stripe);
84 }
85
86 int llu_extent_lock_cancel_cb(struct ldlm_lock *lock,
87                               struct ldlm_lock_desc *new, void *data,
88                               int flag)
89 {
90         struct lustre_handle lockh = { 0 };
91         int rc;
92         ENTRY;
93
94         if ((unsigned long)data > 0 && (unsigned long)data < 0x1000) {
95                 LDLM_ERROR(lock, "cancelling lock with bad data %p", data);
96                 LBUG();
97         }
98
99         switch (flag) {
100         case LDLM_CB_BLOCKING:
101                 ldlm_lock2handle(lock, &lockh);
102                 rc = ldlm_cli_cancel(&lockh, 0);
103                 if (rc != ELDLM_OK)
104                         CERROR("ldlm_cli_cancel failed: %d\n", rc);
105                 break;
106         case LDLM_CB_CANCELING: {
107                 struct inode *inode;
108                 struct llu_inode_info *lli;
109                 struct lov_stripe_md *lsm;
110                 __u32 stripe;
111                 __u64 kms;
112
113                 /* This lock wasn't granted, don't try to evict pages */
114                 if (lock->l_req_mode != lock->l_granted_mode)
115                         RETURN(0);
116
117                 inode = llu_inode_from_lock(lock);
118                 if (!inode)
119                         RETURN(0);
120                 lli= llu_i2info(inode);
121                 if (!lli)
122                         goto iput;
123                 if (!lli->lli_has_smd)
124                         goto iput;
125
126                 lsm = ccc_inode_lsm_get(inode);
127                 if (lsm == NULL)
128                         goto iput;
129
130                 stripe = llu_lock_to_stripe_offset(llu_i2obdexp(inode),
131                                                    lsm, lock);
132                 lock_res_and_lock(lock);
133                 kms = ldlm_extent_shift_kms(lock,
134                                             lsm->lsm_oinfo[stripe]->loi_kms);
135                 unlock_res_and_lock(lock);
136                 if (lsm->lsm_oinfo[stripe]->loi_kms != kms)
137                         LDLM_DEBUG(lock, "updating kms from "LPU64" to "LPU64,
138                                    lsm->lsm_oinfo[stripe]->loi_kms, kms);
139                 loi_kms_set(lsm->lsm_oinfo[stripe], kms);
140                 ccc_inode_lsm_put(inode, lsm);
141 iput:
142                 I_RELE(inode);
143                 break;
144         }
145         default:
146                 LBUG();
147         }
148
149         RETURN(0);
150 }
151
152 static int llu_glimpse_callback(struct ldlm_lock *lock, void *reqp)
153 {
154         struct ptlrpc_request *req = reqp;
155         struct inode *inode = llu_inode_from_lock(lock);
156         struct llu_inode_info *lli;
157         struct ost_lvb *lvb;
158         struct lov_stripe_md *lsm;
159         int rc, stripe = 0;
160         ENTRY;
161
162         if (inode == NULL)
163                 GOTO(out, rc = -ELDLM_NO_LOCK_DATA);
164         lli = llu_i2info(inode);
165         if (lli == NULL)
166                 GOTO(iput, rc = -ELDLM_NO_LOCK_DATA);
167
168         req_capsule_extend(&req->rq_pill, &RQF_LDLM_GL_CALLBACK);
169         if (exp_connect_lvb_type(req->rq_export))
170                 req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER,
171                                      sizeof(*lvb));
172         else
173                 req_capsule_set_size(&req->rq_pill, &RMF_DLM_LVB, RCL_SERVER,
174                                      sizeof(struct ost_lvb_v1));
175         rc = req_capsule_server_pack(&req->rq_pill);
176         if (rc) {
177                 CERROR("failed pack reply: %d\n", rc);
178                 GOTO(iput, rc);
179         }
180
181         lsm = ccc_inode_lsm_get(inode);
182         if (lsm == NULL)
183                 GOTO(iput, rc = -ELDLM_NO_LOCK_DATA);
184
185         /* First, find out which stripe index this lock corresponds to. */
186         stripe = llu_lock_to_stripe_offset(llu_i2obdexp(inode), lsm, lock);
187
188         lvb = req_capsule_server_get(&req->rq_pill, &RMF_DLM_LVB);
189         lvb->lvb_size = lsm->lsm_oinfo[stripe]->loi_kms;
190         ccc_inode_lsm_put(inode, lsm);
191
192         LDLM_DEBUG(lock, "i_size: "LPU64" -> stripe number %u -> kms "LPU64,
193                    (__u64)llu_i2stat(inode)->st_size, stripe,lvb->lvb_size);
194  iput:
195         I_RELE(inode);
196  out:
197         /* These errors are normal races, so we don't want to fill the console
198          * with messages by calling ptlrpc_error() */
199         if (rc == -ELDLM_NO_LOCK_DATA)
200                 lustre_pack_reply(req, 1, NULL, NULL);
201
202         req->rq_status = rc;
203         return rc;
204 }
205
206 int llu_merge_lvb(const struct lu_env *env, struct inode *inode)
207 {
208         struct llu_inode_info *lli = llu_i2info(inode);
209         struct cl_object *obj = lli->lli_clob;
210         struct intnl_stat *st = llu_i2stat(inode);
211         struct cl_attr *attr = ccc_env_thread_attr(env);
212         struct ost_lvb lvb;
213         int rc;
214         ENTRY;
215
216         /* merge timestamps the most recently obtained from mds with
217            timestamps obtained from osts */
218         LTIME_S(inode->i_atime) = lli->lli_lvb.lvb_atime;
219         LTIME_S(inode->i_mtime) = lli->lli_lvb.lvb_mtime;
220         LTIME_S(inode->i_ctime) = lli->lli_lvb.lvb_ctime;
221
222         inode_init_lvb(inode, &lvb);
223
224         cl_object_attr_lock(obj);
225         rc = cl_object_attr_get(env, obj, attr);
226         cl_object_attr_unlock(obj);
227         if (rc == 0) {
228                 if (lvb.lvb_atime < attr->cat_atime)
229                         lvb.lvb_atime = attr->cat_atime;
230                 if (lvb.lvb_ctime < attr->cat_ctime)
231                         lvb.lvb_ctime = attr->cat_ctime;
232                 if (lvb.lvb_mtime < attr->cat_mtime)
233                         lvb.lvb_mtime = attr->cat_mtime;
234
235                 st->st_size = lvb.lvb_size;
236                 st->st_blocks = lvb.lvb_blocks;
237                 st->st_mtime = lvb.lvb_mtime;
238                 st->st_atime = lvb.lvb_atime;
239                 st->st_ctime = lvb.lvb_ctime;
240         }
241
242         RETURN(rc);
243 }
244
245 int llu_extent_lock(struct ll_file_data *fd, struct inode *inode,
246                     struct lov_stripe_md *lsm, int mode,
247                     ldlm_policy_data_t *policy, struct lustre_handle *lockh,
248                     int ast_flags)
249 {
250         struct llu_sb_info *sbi = llu_i2sbi(inode);
251         struct intnl_stat *st = llu_i2stat(inode);
252         struct ldlm_enqueue_info einfo = { 0 };
253         struct obd_info oinfo = { { { 0 } } };
254         struct ost_lvb lvb;
255         int rc;
256         ENTRY;
257
258         LASSERT(!lustre_handle_is_used(lockh));
259         CLASSERT(ELDLM_OK == 0);
260
261         /* XXX phil: can we do this?  won't it screw the file size up? */
262         if ((fd && (fd->fd_flags & LL_FILE_IGNORE_LOCK)) ||
263             (sbi->ll_flags & LL_SBI_NOLCK) || mode == LCK_NL)
264                 RETURN(0);
265
266         CDEBUG(D_DLMTRACE, "Locking inode "LPU64", start "LPU64" end "LPU64"\n",
267                (__u64)st->st_ino, policy->l_extent.start,
268                policy->l_extent.end);
269
270         einfo.ei_type = LDLM_EXTENT;
271         einfo.ei_mode = mode;
272         einfo.ei_cb_bl = llu_extent_lock_cancel_cb;
273         einfo.ei_cb_cp = ldlm_completion_ast;
274         einfo.ei_cb_gl = llu_glimpse_callback;
275         einfo.ei_cbdata = inode;
276
277         oinfo.oi_policy = *policy;
278         oinfo.oi_lockh = lockh;
279         oinfo.oi_md = lsm;
280         oinfo.oi_flags = ast_flags;
281
282         rc = obd_enqueue(sbi->ll_dt_exp, &oinfo, &einfo, NULL);
283         *policy = oinfo.oi_policy;
284         if (rc > 0)
285                 rc = -EIO;
286
287         inode_init_lvb(inode, &lvb);
288         obd_merge_lvb(sbi->ll_dt_exp, lsm, &lvb, 1);
289         if (policy->l_extent.start == 0 &&
290             policy->l_extent.end == OBD_OBJECT_EOF)
291                 st->st_size = lvb.lvb_size;
292
293         if (rc == 0) {
294                 st->st_mtime = lvb.lvb_mtime;
295                 st->st_atime = lvb.lvb_atime;
296                 st->st_ctime = lvb.lvb_ctime;
297         }
298
299         RETURN(rc);
300 }
301
302 int llu_extent_unlock(struct ll_file_data *fd, struct inode *inode,
303                 struct lov_stripe_md *lsm, int mode,
304                 struct lustre_handle *lockh)
305 {
306         struct llu_sb_info *sbi = llu_i2sbi(inode);
307         int rc;
308         ENTRY;
309
310         CLASSERT(ELDLM_OK == 0);
311
312         /* XXX phil: can we do this?  won't it screw the file size up? */
313         if ((fd && (fd->fd_flags & LL_FILE_IGNORE_LOCK)) ||
314             (sbi->ll_flags & LL_SBI_NOLCK) || mode == LCK_NL)
315                 RETURN(0);
316
317         rc = obd_cancel(sbi->ll_dt_exp, lsm, mode, lockh);
318
319         RETURN(rc);
320 }
321
322 static
323 ssize_t llu_file_prwv(const struct iovec *iovec, int iovlen,
324                         _SYSIO_OFF_T pos, ssize_t len,
325                         void *private)
326 {
327         struct llu_io_session *session = (struct llu_io_session *) private;
328         struct inode *inode = session->lis_inode;
329         struct llu_inode_info *lli = llu_i2info(inode);
330         int err;
331         struct lu_env *env;
332         struct cl_io  *io;
333         struct slp_io *sio;
334         int refcheck;
335         ENTRY;
336
337         /* in a large iov read/write we'll be repeatedly called.
338          * so give a chance to answer cancel ast here
339          */
340         liblustre_wait_event(0);
341
342         if (len == 0 || iovlen == 0)
343                 RETURN(0);
344
345         if (pos + len > lli->lli_maxbytes)
346                 RETURN(-ERANGE);
347
348         env = cl_env_get(&refcheck);
349         if (IS_ERR(env))
350                 RETURN(PTR_ERR(env));
351
352         /* Do NOT call "ccc_env_thread_io()" again to prevent reinitializing */
353         io = &ccc_env_info(env)->cti_io;
354         if (cl_io_rw_init(env, io, session->lis_cmd == OBD_BRW_WRITE?CIT_WRITE:
355                                                                       CIT_READ,
356                           pos, len) == 0) {
357                 struct ccc_io *cio;
358                 sio = slp_env_io(env);
359                 cio = ccc_env_io(env);
360                 /* XXX this is not right: cio->cui_iov can be modified. */
361                 cio->cui_iov = (struct iovec *)iovec;
362                 cio->cui_nrsegs = iovlen;
363                 cio->cui_tot_nrsegs = iovlen;
364                 sio->sio_session = session;
365                 err = cl_io_loop(env, io);
366         } else {
367                 /* XXX WTF? */
368                 LBUG();
369         }
370         cl_io_fini(env, io);
371         cl_env_put(env, &refcheck);
372
373         if (err < 0)
374                 RETURN(err);
375
376         RETURN(len);
377 }
378
379 static
380 struct llu_io_session *get_io_session(struct inode *ino, int ngroups, int cmd)
381 {
382         struct llu_io_session *session;
383
384         OBD_ALLOC_PTR(session);
385         if (!session)
386                 return NULL;
387
388         I_REF(ino);
389         session->lis_inode = ino;
390         session->lis_max_groups = ngroups;
391         session->lis_cmd = cmd;
392         return session;
393 }
394
395 static void put_io_session(struct llu_io_session *session)
396 {
397         I_RELE(session->lis_inode);
398         OBD_FREE_PTR(session);
399 }
400
401 static int llu_file_rwx(struct inode *ino,
402                         struct ioctx *ioctx,
403                         int read)
404 {
405         struct llu_io_session *session;
406         ssize_t cc;
407         int cmd = read ? OBD_BRW_READ : OBD_BRW_WRITE;
408         ENTRY;
409
410         LASSERT(ioctx->ioctx_xtvlen >= 0);
411         LASSERT(ioctx->ioctx_iovlen >= 0);
412
413         liblustre_wait_event(0);
414
415         if (!ioctx->ioctx_xtvlen)
416                 RETURN(0);
417
418         /* XXX consider other types later */
419         if (S_ISDIR(llu_i2stat(ino)->st_mode))
420                 RETURN(-EISDIR);
421         if (!S_ISREG(llu_i2stat(ino)->st_mode))
422                 RETURN(-EOPNOTSUPP);
423
424         session = get_io_session(ino, ioctx->ioctx_xtvlen * 2, cmd);
425         if (!session)
426                 RETURN(-ENOMEM);
427
428         cc = _sysio_enumerate_extents(ioctx->ioctx_xtv, ioctx->ioctx_xtvlen,
429                                       ioctx->ioctx_iov, ioctx->ioctx_iovlen,
430                                       llu_file_prwv, session);
431
432         if (cc >= 0) {
433                 LASSERT(!ioctx->ioctx_cc);
434                 ioctx->ioctx_private = session;
435                 cc = 0;
436         } else {
437                 put_io_session(session);
438         }
439
440         liblustre_wait_event(0);
441         RETURN(cc);
442 }
443
444 void llu_io_init(struct cl_io *io, struct inode *inode, int write)
445 {
446         struct llu_inode_info *lli = llu_i2info(inode);
447
448         io->u.ci_rw.crw_nonblock = lli->lli_open_flags & O_NONBLOCK;
449         if (write)
450                 io->u.ci_wr.wr_append = lli->lli_open_flags & O_APPEND;
451         io->ci_obj  = llu_i2info(inode)->lli_clob;
452
453         if ((lli->lli_open_flags & O_APPEND) && write)
454                 io->ci_lockreq = CILR_MANDATORY;
455         else
456                 io->ci_lockreq = CILR_NEVER;
457 }
458
459 int llu_iop_read(struct inode *ino,
460                  struct ioctx *ioctx)
461 {
462         struct intnl_stat *st = llu_i2stat(ino);
463         struct lu_env *env;
464         struct cl_io  *io;
465         int refcheck;
466         int ret;
467
468         /* BUG: 5972 */
469         st->st_atime = CFS_CURRENT_TIME;
470
471         env = cl_env_get(&refcheck);
472         if (IS_ERR(env))
473                 RETURN(PTR_ERR(env));
474
475         io = ccc_env_thread_io(env);
476         llu_io_init(io, ino, 0);
477
478         ret = llu_file_rwx(ino, ioctx, 1);
479
480         cl_env_put(env, &refcheck);
481         return ret;
482 }
483
484 int llu_iop_write(struct inode *ino,
485                   struct ioctx *ioctx)
486 {
487         struct intnl_stat *st = llu_i2stat(ino);
488         struct lu_env *env;
489         struct cl_io  *io;
490         int refcheck;
491         int ret;
492
493         st->st_mtime = st->st_ctime = CFS_CURRENT_TIME;
494
495         env = cl_env_get(&refcheck);
496         if (IS_ERR(env))
497                 RETURN(PTR_ERR(env));
498
499         io = ccc_env_thread_io(env);
500         llu_io_init(io, ino, 1);
501
502         ret = llu_file_rwx(ino, ioctx, 0);
503         cl_env_put(env, &refcheck);
504         return ret;
505 }
506
507 int llu_iop_iodone(struct ioctx *ioctx)
508 {
509         struct llu_io_session *session;
510         struct lu_env *env;
511         struct cl_io  *io;
512         int refcheck;
513         ENTRY;
514
515         liblustre_wait_event(0);
516
517         env = cl_env_get(&refcheck);
518         if (IS_ERR(env))
519                 RETURN(PTR_ERR(env));
520
521         io = &ccc_env_info(env)->cti_io;
522         cl_io_fini(env, io);
523         cl_env_put(env, &refcheck);
524         session = (struct llu_io_session *) ioctx->ioctx_private;
525         LASSERT(session);
526         LASSERT(!IS_ERR(session));
527
528         if (session->lis_rc == 0) {
529                 ioctx->ioctx_cc = session->lis_rwcount;
530         } else {
531                 LASSERT(session->lis_rc < 0);
532                 ioctx->ioctx_cc = -1;
533                 ioctx->ioctx_errno = -session->lis_rc;
534         }
535
536         put_io_session(session);
537         ioctx->ioctx_private = NULL;
538         liblustre_wait_event(0);
539
540         RETURN(1);
541 }