/* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*- * vim:expandtab:shiftwidth=8:tabstop=8: * * Lustre Light block IO * * Copyright (c) 2002-2004 Cluster File Systems, Inc. * * This file is part of Lustre, http://www.lustre.org. * * Lustre is free software; you can redistribute it and/or * modify it under the terms of version 2 of the GNU General Public * License as published by the Free Software Foundation. * * Lustre is distributed in the hope that it will be useful, * but WITHOUT ANY WARRANTY; without even the implied warranty of * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the * GNU General Public License for more details. * * You should have received a copy of the GNU General Public License * along with Lustre; if not, write to the Free Software * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. */ #define DEBUG_SUBSYSTEM S_LLITE #include #include #include #include #include #include #include #include #include #include #include #include #include #undef LIST_HEAD #include "llite_lib.h" struct llu_io_group { struct obd_io_group *lig_oig; struct inode *lig_inode; int lig_maxpages; int lig_npages; __u64 lig_rwcount; struct ll_async_page *lig_llap; struct page *lig_pages; }; #define LLU_IO_GROUP_SIZE(x) \ (sizeof(struct llu_io_group) + \ sizeof(struct ll_async_page) * (x) + \ sizeof(struct page) * (x)) struct llu_io_session { struct inode *lis_inode; int lis_cmd; int lis_max_groups; int lis_ngroups; struct llu_io_group *lis_groups[0]; }; #define LLU_IO_SESSION_SIZE(x) \ (sizeof(struct llu_io_session) + (x) * 2 * sizeof(void *)) typedef ssize_t llu_file_piov_t(const struct iovec *iovec, int iovlen, _SYSIO_OFF_T pos, ssize_t len, void *private); static int llu_lock_to_stripe_offset(struct inode *inode, struct ldlm_lock *lock) { struct llu_inode_info *lli = llu_i2info(inode); struct lov_stripe_md *lsm = lli->lli_smd; struct obd_export *exp = llu_i2obdexp(inode); struct { char name[16]; struct ldlm_lock *lock; struct lov_stripe_md *lsm; } key = { .name = "lock_to_stripe", .lock = lock, .lsm = lsm }; __u32 stripe, vallen = sizeof(stripe); int rc; ENTRY; if (lsm->lsm_stripe_count == 1) RETURN(0); /* get our offset in the lov */ rc = obd_get_info(exp, sizeof(key), &key, &vallen, &stripe); if (rc != 0) { CERROR("obd_get_info: rc = %d\n", rc); LBUG(); } LASSERT(stripe < lsm->lsm_stripe_count); RETURN(stripe); } static int llu_extent_lock_callback(struct ldlm_lock *lock, struct ldlm_lock_desc *new, void *data, int flag) { struct lustre_handle lockh = { 0 }; int rc; ENTRY; if ((unsigned long)data > 0 && (unsigned long)data < 0x1000) { LDLM_ERROR(lock, "cancelling lock with bad data %p", data); LBUG(); } switch (flag) { case LDLM_CB_BLOCKING: ldlm_lock2handle(lock, &lockh); rc = ldlm_cli_cancel(&lockh); if (rc != ELDLM_OK) CERROR("ldlm_cli_cancel failed: %d\n", rc); break; case LDLM_CB_CANCELING: { struct inode *inode; struct llu_inode_info *lli; struct lov_stripe_md *lsm; __u32 stripe; __u64 kms; /* This lock wasn't granted, don't try to evict pages */ if (lock->l_req_mode != lock->l_granted_mode) RETURN(0); inode = llu_inode_from_lock(lock); if (!inode) RETURN(0); lli= llu_i2info(inode); if (!lli) goto iput; if (!lli->lli_smd) goto iput; lsm = lli->lli_smd; stripe = llu_lock_to_stripe_offset(inode, lock); l_lock(&lock->l_resource->lr_namespace->ns_lock); kms = ldlm_extent_shift_kms(lock, lsm->lsm_oinfo[stripe].loi_kms); l_unlock(&lock->l_resource->lr_namespace->ns_lock); if (lsm->lsm_oinfo[stripe].loi_kms != kms) LDLM_DEBUG(lock, "updating kms from "LPU64" to "LPU64, lsm->lsm_oinfo[stripe].loi_kms, kms); lsm->lsm_oinfo[stripe].loi_kms = kms; iput: I_RELE(inode); break; } default: LBUG(); } RETURN(0); } static int llu_glimpse_callback(struct ldlm_lock *lock, void *reqp) { struct ptlrpc_request *req = reqp; struct inode *inode = llu_inode_from_lock(lock); struct llu_inode_info *lli; struct ost_lvb *lvb; int rc, size = sizeof(*lvb), stripe = 0; ENTRY; if (inode == NULL) GOTO(out, rc = -ELDLM_NO_LOCK_DATA); lli = llu_i2info(inode); if (lli == NULL) GOTO(iput, rc = -ELDLM_NO_LOCK_DATA); if (lli->lli_smd == NULL) GOTO(iput, rc = -ELDLM_NO_LOCK_DATA); /* First, find out which stripe index this lock corresponds to. */ if (lli->lli_smd->lsm_stripe_count > 1) stripe = llu_lock_to_stripe_offset(inode, lock); rc = lustre_pack_reply(req, 1, &size, NULL); if (rc) { CERROR("lustre_pack_reply: %d\n", rc); GOTO(iput, rc); } lvb = lustre_msg_buf(req->rq_repmsg, 0, sizeof(*lvb)); lvb->lvb_size = lli->lli_smd->lsm_oinfo[stripe].loi_kms; LDLM_DEBUG(lock, "i_size: %llu -> stripe number %u -> kms "LPU64, lli->lli_st_size, stripe, lvb->lvb_size); iput: I_RELE(inode); out: /* These errors are normal races, so we don't want to fill the console * with messages by calling ptlrpc_error() */ if (rc == -ELDLM_NO_LOCK_DATA) lustre_pack_reply(req, 0, NULL, NULL); req->rq_status = rc; return rc; } __u64 lov_merge_size(struct lov_stripe_md *lsm, int kms_only); __u64 lov_merge_blocks(struct lov_stripe_md *lsm); __u64 lov_merge_mtime(struct lov_stripe_md *lsm, __u64 current_time); /* NB: lov_merge_size will prefer locally cached writes if they extend the * file (because it prefers KMS over RSS when larger) */ int llu_glimpse_size(struct inode *inode) { struct llu_inode_info *lli = llu_i2info(inode); struct llu_sb_info *sbi = llu_i2sbi(inode); ldlm_policy_data_t policy = { .l_extent = { 0, OBD_OBJECT_EOF } }; struct lustre_handle lockh = { 0 }; int rc, flags = LDLM_FL_HAS_INTENT; ENTRY; CDEBUG(D_DLMTRACE, "Glimpsing inode %lu\n", lli->lli_st_ino); rc = obd_enqueue(sbi->ll_lov_exp, lli->lli_smd, LDLM_EXTENT, &policy, LCK_PR, &flags, llu_extent_lock_callback, ldlm_completion_ast, llu_glimpse_callback, inode, sizeof(struct ost_lvb), lustre_swab_ost_lvb, &lockh); if (rc) { CERROR("obd_enqueue returned rc %d, returning -EIO\n", rc); RETURN(rc > 0 ? -EIO : rc); } lli->lli_st_size = lov_merge_size(lli->lli_smd, 0); lli->lli_st_blocks = lov_merge_blocks(lli->lli_smd); //lli->lli_st_mtime = lov_merge_mtime(lli->lli_smd, inode->i_mtime); CDEBUG(D_DLMTRACE, "glimpse: size: %llu, blocks: %lu\n", lli->lli_st_size, lli->lli_st_blocks); obd_cancel(sbi->ll_lov_exp, lli->lli_smd, LCK_PR, &lockh); RETURN(rc); } int llu_extent_lock(struct ll_file_data *fd, struct inode *inode, struct lov_stripe_md *lsm, int mode, ldlm_policy_data_t *policy, struct lustre_handle *lockh, int ast_flags) { struct llu_sb_info *sbi = llu_i2sbi(inode); struct llu_inode_info *lli = llu_i2info(inode); int rc; ENTRY; LASSERT(lockh->cookie == 0); /* XXX phil: can we do this? won't it screw the file size up? */ if ((fd && (fd->fd_flags & LL_FILE_IGNORE_LOCK)) || (sbi->ll_flags & LL_SBI_NOLCK)) RETURN(0); CDEBUG(D_DLMTRACE, "Locking inode %lu, start "LPU64" end "LPU64"\n", lli->lli_st_ino, policy->l_extent.start, policy->l_extent.end); rc = obd_enqueue(sbi->ll_lov_exp, lsm, LDLM_EXTENT, policy, mode, &ast_flags, llu_extent_lock_callback, ldlm_completion_ast, llu_glimpse_callback, inode, sizeof(struct ost_lvb), lustre_swab_ost_lvb, lockh); if (rc > 0) rc = -EIO; if (policy->l_extent.start == 0 && policy->l_extent.end == OBD_OBJECT_EOF) lli->lli_st_size = lov_merge_size(lsm, 1); //inode->i_mtime = lov_merge_mtime(lsm, inode->i_mtime); RETURN(rc); } int llu_extent_unlock(struct ll_file_data *fd, struct inode *inode, struct lov_stripe_md *lsm, int mode, struct lustre_handle *lockh) { struct llu_sb_info *sbi = llu_i2sbi(inode); int rc; ENTRY; /* XXX phil: can we do this? won't it screw the file size up? */ if ((fd && (fd->fd_flags & LL_FILE_IGNORE_LOCK)) || (sbi->ll_flags & LL_SBI_NOLCK)) RETURN(0); rc = obd_cancel(sbi->ll_lov_exp, lsm, mode, lockh); RETURN(rc); } #define LLAP_MAGIC 12346789 struct ll_async_page { int llap_magic; void *llap_cookie; int llap_queued; struct page *llap_page; struct inode *llap_inode; }; static struct ll_async_page *llap_from_cookie(void *cookie) { struct ll_async_page *llap = cookie; if (llap->llap_magic != LLAP_MAGIC) return ERR_PTR(-EINVAL); return llap; }; static void llu_ap_fill_obdo(void *data, int cmd, struct obdo *oa) { struct ll_async_page *llap; struct inode *inode; struct lov_stripe_md *lsm; obd_valid valid_flags; ENTRY; llap = llap_from_cookie(data); if (IS_ERR(llap)) { EXIT; return; } inode = llap->llap_inode; lsm = llu_i2info(inode)->lli_smd; oa->o_id = lsm->lsm_object_id; oa->o_valid = OBD_MD_FLID; valid_flags = OBD_MD_FLTYPE | OBD_MD_FLATIME; if (cmd == OBD_BRW_WRITE) valid_flags |= OBD_MD_FLMTIME | OBD_MD_FLCTIME; obdo_from_inode(oa, inode, valid_flags); EXIT; } /* called for each page in a completed rpc.*/ static void llu_ap_completion(void *data, int cmd, struct obdo *oa, int rc) { struct ll_async_page *llap; struct page *page; llap = llap_from_cookie(data); if (IS_ERR(llap)) { EXIT; return; } llap->llap_queued = 0; page = llap->llap_page; if (rc != 0) { if (cmd == OBD_BRW_WRITE) CERROR("writeback error on page %p index %ld: %d\n", page, page->index, rc); } EXIT; } static struct obd_async_page_ops llu_async_page_ops = { .ap_make_ready = NULL, .ap_refresh_count = NULL, .ap_fill_obdo = llu_ap_fill_obdo, .ap_completion = llu_ap_completion, }; static int llu_queue_pio(int cmd, struct llu_io_group *group, char *buf, size_t count, loff_t pos) { struct llu_inode_info *lli = llu_i2info(group->lig_inode); struct lov_stripe_md *lsm = lli->lli_smd; struct obd_export *exp = llu_i2obdexp(group->lig_inode); struct page *pages = &group->lig_pages[group->lig_npages]; struct ll_async_page *llap = &group->lig_llap[group->lig_npages]; int i, rc, npages = 0, ret_bytes = 0; ENTRY; if (!exp) RETURN(-EINVAL); /* prepare the pages array */ do { unsigned long index, offset, bytes; offset = (pos & ~PAGE_CACHE_MASK); index = pos >> PAGE_CACHE_SHIFT; bytes = PAGE_CACHE_SIZE - offset; if (bytes > count) bytes = count; /* prevent read beyond file range */ if ((cmd == OBD_BRW_READ) && (pos + bytes) >= lli->lli_st_size) { if (pos >= lli->lli_st_size) break; bytes = lli->lli_st_size - pos; } /* prepare page for this index */ pages[npages].index = index; pages[npages].addr = buf - offset; pages[npages]._offset = offset; pages[npages]._count = bytes; npages++; count -= bytes; pos += bytes; buf += bytes; group->lig_rwcount += bytes; ret_bytes += bytes; } while (count); group->lig_npages += npages; for (i = 0; i < npages; i++) { llap[i].llap_magic = LLAP_MAGIC; rc = obd_prep_async_page(exp, lsm, NULL, &pages[i], (obd_off)pages[i].index << PAGE_SHIFT, &llu_async_page_ops, &llap[i], &llap[i].llap_cookie); if (rc) { LASSERT(rc < 0); llap[i].llap_cookie = NULL; RETURN(rc); } CDEBUG(D_CACHE, "llap %p page %p group %p obj off "LPU64"\n", &llap[i], &pages[i], llap[i].llap_cookie, (obd_off)pages[i].index << PAGE_SHIFT); pages[i].private = (unsigned long)&llap[i]; llap[i].llap_page = &pages[i]; llap[i].llap_inode = group->lig_inode; rc = obd_queue_group_io(exp, lsm, NULL, group->lig_oig, llap[i].llap_cookie, cmd, pages[i]._offset, pages[i]._count, 0, ASYNC_READY | ASYNC_URGENT | ASYNC_COUNT_STABLE | ASYNC_GROUP_SYNC); if (rc) { LASSERT(rc < 0); RETURN(rc); } llap[i].llap_queued = 1; } RETURN(ret_bytes); } static struct llu_io_group * get_io_group(struct inode *inode, int maxpages) { struct llu_io_group *group; int rc; OBD_ALLOC(group, LLU_IO_GROUP_SIZE(maxpages)); if (!group) return ERR_PTR(-ENOMEM); I_REF(inode); group->lig_inode = inode; group->lig_maxpages = maxpages; group->lig_llap = (struct ll_async_page *)(group + 1); group->lig_pages = (struct page *) (group->lig_llap + maxpages); rc = oig_init(&group->lig_oig); if (rc) { OBD_FREE(group, LLU_IO_GROUP_SIZE(maxpages)); return ERR_PTR(rc); } return group; } static int max_io_pages(ssize_t len, int iovlen) { return (((len + PAGE_SIZE -1) / PAGE_SIZE) + 2 + iovlen - 1); } static void put_io_group(struct llu_io_group *group) { struct lov_stripe_md *lsm = llu_i2info(group->lig_inode)->lli_smd; struct obd_export *exp = llu_i2obdexp(group->lig_inode); struct ll_async_page *llap = group->lig_llap; int i; for (i = 0; i< group->lig_npages; i++) { if (llap[i].llap_cookie) obd_teardown_async_page(exp, lsm, NULL, llap[i].llap_cookie); } I_RELE(group->lig_inode); oig_release(group->lig_oig); OBD_FREE(group, LLU_IO_GROUP_SIZE(group->lig_maxpages)); } void lov_increase_kms(struct obd_export *exp, struct lov_stripe_md *lsm, obd_off size); static ssize_t llu_file_prwv(const struct iovec *iovec, int iovlen, _SYSIO_OFF_T pos, ssize_t len, void *private) { struct llu_io_session *session = (struct llu_io_session *) private; struct inode *inode = session->lis_inode; struct llu_inode_info *lli = llu_i2info(inode); struct ll_file_data *fd = lli->lli_file_data; struct lustre_handle lockh = {0}; struct lov_stripe_md *lsm = lli->lli_smd; struct obd_export *exp = NULL; ldlm_policy_data_t policy; struct llu_io_group *iogroup; int astflag = (lli->lli_open_flags & O_NONBLOCK) ? LDLM_FL_BLOCK_NOWAIT : 0; __u64 kms; int err, is_read, lock_mode, iovidx, ret; ENTRY; /* in a large iov read/write we'll be repeatedly called. * so give a chance to answer cancel ast here */ liblustre_wait_event(0); exp = llu_i2obdexp(inode); if (exp == NULL) RETURN(-EINVAL); if (len == 0 || iovlen == 0) RETURN(0); if (pos + len > lli->lli_maxbytes) RETURN(-ERANGE); iogroup = get_io_group(inode, max_io_pages(len, iovlen)); if (IS_ERR(iogroup)) RETURN(PTR_ERR(iogroup)); is_read = session->lis_cmd == OBD_BRW_READ; lock_mode = is_read ? LCK_PR : LCK_PW; if (!is_read && (lli->lli_open_flags & O_APPEND)) { policy.l_extent.start = 0; policy.l_extent.end = OBD_OBJECT_EOF; } else { policy.l_extent.start = pos; policy.l_extent.end = pos + len - 1; } err = llu_extent_lock(fd, inode, lsm, lock_mode, &policy, &lockh, astflag); if (err != ELDLM_OK) GOTO(err_put, err); if (is_read) { kms = lov_merge_size(lsm, 1); if (policy.l_extent.end > kms) { /* A glimpse is necessary to determine whether we * return a short read or some zeroes at the end of * the buffer */ if ((err = llu_glimpse_size(inode))) { llu_extent_unlock(fd, inode, lsm, lock_mode, &lockh); GOTO(err_put, err); } } else { lli->lli_st_size = kms; } } else { if (lli->lli_open_flags & O_APPEND) pos = lli->lli_st_size; } for (iovidx = 0; iovidx < iovlen; iovidx++) { char *buf = (char *) iovec[iovidx].iov_base; size_t count = iovec[iovidx].iov_len; if (!count) continue; if (len < count) count = len; if (IS_BAD_PTR(buf) || IS_BAD_PTR(buf + count)) { llu_extent_unlock(fd, inode, lsm, lock_mode, &lockh); GOTO(err_put, err = -EFAULT); } if (is_read) { if (pos >= lli->lli_st_size) break; } else { if (pos >= lli->lli_maxbytes) { llu_extent_unlock(fd, inode, lsm, lock_mode, &lockh); GOTO(err_put, err = -EFBIG); } if (pos + count >= lli->lli_maxbytes) count = lli->lli_maxbytes - pos; } ret = llu_queue_pio(session->lis_cmd, iogroup, buf, count, pos); if (ret < 0) { llu_extent_unlock(fd, inode, lsm, lock_mode, &lockh); GOTO(err_put, err = ret); } else { pos += ret; if (!is_read) { LASSERT(ret == count); lov_increase_kms(exp, lsm, pos); /* file size grow immediately */ if (pos > lli->lli_st_size) lli->lli_st_size = pos; } len -= ret; if (!len) break; } } LASSERT(len == 0 || is_read); /* libsysio should guarantee this */ err = llu_extent_unlock(fd, inode, lsm, lock_mode, &lockh); if (err) CERROR("extent unlock error %d\n", err); err = obd_trigger_group_io(exp, lsm, NULL, iogroup->lig_oig); if (err) GOTO(err_put, err); session->lis_groups[session->lis_ngroups++] = iogroup; RETURN(0); err_put: put_io_group(iogroup); RETURN((ssize_t)err); } static struct llu_io_session *get_io_session(struct inode *ino, int ngroups, int cmd) { struct llu_io_session *session; OBD_ALLOC(session, LLU_IO_SESSION_SIZE(ngroups)); if (!session) return NULL; I_REF(ino); session->lis_inode = ino; session->lis_max_groups = ngroups; session->lis_cmd = cmd; return session; } static void put_io_session(struct llu_io_session *session) { int i; for (i = 0; i < session->lis_ngroups; i++) { if (session->lis_groups[i]) { put_io_group(session->lis_groups[i]); session->lis_groups[i] = NULL; } } I_RELE(session->lis_inode); OBD_FREE(session, LLU_IO_SESSION_SIZE(session->lis_max_groups)); } static int llu_file_rwx(struct inode *ino, struct ioctx *ioctx, int read) { struct llu_io_session *session; ssize_t cc; int cmd = read ? OBD_BRW_READ : OBD_BRW_WRITE; ENTRY; LASSERT(ioctx->ioctx_xtvlen >= 0); LASSERT(ioctx->ioctx_iovlen >= 0); liblustre_wait_event(0); if (!ioctx->ioctx_xtvlen) RETURN(0); /* XXX consider other types later */ LASSERT(S_ISREG(llu_i2info(ino)->lli_st_mode)); session = get_io_session(ino, ioctx->ioctx_xtvlen * 2, cmd); if (!session) RETURN(-ENOMEM); cc = _sysio_enumerate_extents(ioctx->ioctx_xtv, ioctx->ioctx_xtvlen, ioctx->ioctx_iov, ioctx->ioctx_iovlen, llu_file_prwv, session); if (cc >= 0) { LASSERT(!ioctx->ioctx_cc); ioctx->ioctx_private = session; RETURN(0); } else { put_io_session(session); RETURN(cc); } } int llu_iop_read(struct inode *ino, struct ioctx *ioctx) { return llu_file_rwx(ino, ioctx, 1); } int llu_iop_write(struct inode *ino, struct ioctx *ioctx) { struct iattr iattr; int rc; memset(&iattr, 0, sizeof(iattr)); iattr.ia_mtime = iattr.ia_atime = CURRENT_TIME; iattr.ia_valid = ATTR_MTIME | ATTR_ATIME | ATTR_RAW; liblustre_wait_event(0); rc = llu_setattr_raw(ino, &iattr); if (rc) { CERROR("failed to set mtime/atime during write: %d", rc); /* XXX should continue or return error? */ } return llu_file_rwx(ino, ioctx, 0); } int llu_iop_iodone(struct ioctx *ioctx) { struct llu_io_session *session; struct llu_io_group *group; int i, err = 0, rc = 0; ENTRY; liblustre_wait_event(0); session = (struct llu_io_session *) ioctx->ioctx_private; LASSERT(session); LASSERT(!IS_ERR(session)); for (i = 0; i < session->lis_ngroups; i++) { group = session->lis_groups[i]; if (group) { if (!rc) { err = oig_wait(group->lig_oig); if (err) rc = err; } if (!rc) ioctx->ioctx_cc += group->lig_rwcount; put_io_group(group); session->lis_groups[i] = NULL; } } if (rc) { LASSERT(rc < 0); ioctx->ioctx_cc = -1; ioctx->ioctx_errno = -rc; } put_io_session(session); ioctx->ioctx_private = NULL; RETURN(1); }