X-Git-Url: https://git.whamcloud.com/?p=fs%2Flustre-release.git;a=blobdiff_plain;f=lustre%2Flod%2Flod_lov.c;h=a990505d86401c2174de981de70682203afe56aa;hp=1d6986b4e131c377d9e1121ec697c72a4f289109;hb=aa72de32ba76943d9c96a962a0eb6b5503fad7a6;hpb=57267444aa67399b586b94073609c0ad9c4cb3b0;ds=sidebyside diff --git a/lustre/lod/lod_lov.c b/lustre/lod/lod_lov.c index 1d6986b..a990505 100644 --- a/lustre/lod/lod_lov.c +++ b/lustre/lod/lod_lov.c @@ -6,16 +6,16 @@ * This program is free software; you can redistribute it and/or modify * it under the terms of the GNU General Public License version 2 only, * as published by the Free Software Foundation. - + * * This program 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 version 2 for more details. A copy is * included in the COPYING file that accompanied this code. - + * * You should have received a copy of the GNU General Public License - * along with this program; if not, write to the Free Software - * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA + * version 2 along with this program; If not, see + * http://www.gnu.org/licenses/gpl-2.0.html * * GPL HEADER END */ @@ -23,30 +23,34 @@ * Copyright 2009 Sun Microsystems, Inc. All rights reserved * Use is subject to license terms. * - * Copyright (c) 2012, Intel Corporation. + * Copyright (c) 2012, 2017, Intel Corporation. */ /* * lustre/lod/lod_lov.c * - * Author: Alex Zhuravlev + * A set of helpers to maintain Logical Object Volume (LOV) + * Extended Attribute (EA) and known OST targets + * + * Author: Alex Zhuravlev */ -#ifndef EXPORT_SYMTAB -# define EXPORT_SYMTAB -#endif #define DEBUG_SUBSYSTEM S_MDS #include -#include +#include +#include +#include #include "lod_internal.h" -/* - * Keep a refcount of lod->ltd_tgts usage to prevent racing with - * addition/deletion. Any function that expects lov_tgts to remain stationary - * must take a ref. +/** + * Increase reference count on the target table. * - * \param lod - is the lod device from which we want to grab a reference + * Increase reference count on the target table usage to prevent racing with + * addition/deletion. Any function that expects the table to remain + * stationary must take a ref. + * + * \param[in] ltd target table (lod_ost_descs or lod_mdt_descs) */ void lod_getref(struct lod_tgt_descs *ltd) { @@ -56,12 +60,15 @@ void lod_getref(struct lod_tgt_descs *ltd) mutex_unlock(<d->ltd_mutex); } -/* - * Companion of lod_getref() to release a reference on the lod table. - * If this is the last reference and the ost entry was scheduled for deletion, - * the descriptor is removed from the array. +/** + * Decrease reference count on the target table. + * + * Companion of lod_getref() to release a reference on the target table. + * If this is the last reference and the OST entry was scheduled for deletion, + * the descriptor is removed from the table. * - * \param lod - is the lod device from which we release a reference + * \param[in] lod LOD device from which we release a reference + * \param[in] ltd target table (lod_ost_descs or lod_mdt_descs) */ void lod_putref(struct lod_device *lod, struct lod_tgt_descs *ltd) { @@ -69,12 +76,14 @@ void lod_putref(struct lod_device *lod, struct lod_tgt_descs *ltd) ltd->ltd_refcount--; if (ltd->ltd_refcount == 0 && ltd->ltd_death_row) { struct lod_tgt_desc *tgt_desc, *tmp; - int idx; - CFS_LIST_HEAD(kill); + struct list_head kill; + unsigned int idx; CDEBUG(D_CONFIG, "destroying %d ltd desc\n", ltd->ltd_death_row); + INIT_LIST_HEAD(&kill); + cfs_foreach_bit(ltd->ltd_tgt_bitmap, idx) { tgt_desc = LTD_TGT(ltd, idx); LASSERT(tgt_desc); @@ -82,7 +91,7 @@ void lod_putref(struct lod_device *lod, struct lod_tgt_descs *ltd) if (!tgt_desc->ltd_reap) continue; - cfs_list_add(&tgt_desc->ltd_kill, &kill); + list_add(&tgt_desc->ltd_kill, &kill); LTD_TGT(ltd, idx) = NULL; /*FIXME: only support ost pool for now */ if (ltd == &lod->lod_ost_descs) { @@ -97,9 +106,9 @@ void lod_putref(struct lod_device *lod, struct lod_tgt_descs *ltd) mutex_unlock(<d->ltd_mutex); up_read(<d->ltd_rw_sem); - cfs_list_for_each_entry_safe(tgt_desc, tmp, &kill, ltd_kill) { + list_for_each_entry_safe(tgt_desc, tmp, &kill, ltd_kill) { int rc; - cfs_list_del(&tgt_desc->ltd_kill); + list_del(&tgt_desc->ltd_kill); if (ltd == &lod->lod_ost_descs) { /* remove from QoS structures */ rc = qos_del_tgt(lod, tgt_desc); @@ -123,9 +132,23 @@ void lod_putref(struct lod_device *lod, struct lod_tgt_descs *ltd) } } +/** + * Expand size of target table. + * + * When the target table is full, we have to extend the table. To do so, + * we allocate new memory with some reserve, move data from the old table + * to the new one and release memory consumed by the old table. + * Notice we take ltd_rw_sem exclusively to ensure atomic switch. + * + * \param[in] ltd target table + * \param[in] newsize new size of the table + * + * \retval 0 on success + * \retval -ENOMEM if reallocation failed + */ static int ltd_bitmap_resize(struct lod_tgt_descs *ltd, __u32 newsize) { - cfs_bitmap_t *new_bitmap, *old_bitmap = NULL; + struct cfs_bitmap *new_bitmap, *old_bitmap = NULL; int rc = 0; ENTRY; @@ -163,16 +186,23 @@ out: return rc; } -/* - * Connect LOD to a new OSP and add it to the device table. - * - * \param env - is the environment passed by the caller - * \param lod - is the LOD device to be connected to the new OSP - * \param osp - is the name of OSP device name about to be added - * \param index - is the OSP index - * \param gen - is the generation number - * \param tgt_index - is the group of the OSP. - * \param type - is the type of device (mdc or osc) +/** + * Connect LOD to a new OSP and add it to the target table. + * + * Connect to the OSP device passed, initialize all the internal + * structures related to the device and add it to the target table. + * + * \param[in] env execution environment for this thread + * \param[in] lod LOD device to be connected to the new OSP + * \param[in] osp name of OSP device name to be added + * \param[in] index index of the new target + * \param[in] gen target's generation number + * \param[in] tgt_index OSP's group + * \param[in] type type of device (mdc or osc) + * \param[in] active state of OSP: 0 - inactive, 1 - active + * + * \retval 0 if added successfully + * \retval negative error number on failure */ int lod_add_device(const struct lu_env *env, struct lod_device *lod, char *osp, unsigned index, unsigned gen, int tgt_index, @@ -181,12 +211,16 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, struct obd_connect_data *data = NULL; struct obd_export *exp = NULL; struct obd_device *obd; - struct lu_device *ldev; - struct dt_device *d; + struct lu_device *lu_dev; + struct dt_device *dt_dev; int rc; struct lod_tgt_desc *tgt_desc; struct lod_tgt_descs *ltd; + struct lustre_cfg *lcfg; struct obd_uuid obd_uuid; + bool for_ost; + bool lock = false; + bool connected = false; ENTRY; CDEBUG(D_CONFIG, "osp:%s idx:%d gen:%d\n", osp, index, gen); @@ -206,15 +240,22 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, RETURN(-EINVAL); } + LASSERT(obd->obd_lu_dev != NULL); + LASSERT(obd->obd_lu_dev->ld_site == lod->lod_dt_dev.dd_lu_dev.ld_site); + + lu_dev = obd->obd_lu_dev; + dt_dev = lu2dt_dev(lu_dev); + OBD_ALLOC_PTR(data); if (data == NULL) - RETURN(-ENOMEM); + GOTO(out_cleanup, rc = -ENOMEM); data->ocd_connect_flags = OBD_CONNECT_INDEX | OBD_CONNECT_VERSION; data->ocd_version = LUSTRE_VERSION_CODE; data->ocd_index = index; if (strcmp(LUSTRE_OSC_NAME, type) == 0) { + for_ost = true; data->ocd_connect_flags |= OBD_CONNECT_AT | OBD_CONNECT_FULL20 | OBD_CONNECT_INDEX | @@ -222,36 +263,34 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, OBD_CONNECT_LRU_RESIZE | #endif OBD_CONNECT_MDS | - OBD_CONNECT_OSS_CAPA | OBD_CONNECT_REQPORTAL | OBD_CONNECT_SKIP_ORPHAN | OBD_CONNECT_FID | OBD_CONNECT_LVB_TYPE | OBD_CONNECT_VERSION | - OBD_CONNECT_PINGLESS; + OBD_CONNECT_PINGLESS | + OBD_CONNECT_LFSCK | + OBD_CONNECT_BULK_MBITS; data->ocd_group = tgt_index; ltd = &lod->lod_ost_descs; } else { struct obd_import *imp = obd->u.cli.cl_import; + for_ost = false; data->ocd_ibits_known = MDS_INODELOCK_UPDATE; data->ocd_connect_flags |= OBD_CONNECT_ACL | - OBD_CONNECT_MDS_CAPA | - OBD_CONNECT_OSS_CAPA | OBD_CONNECT_IBITS | OBD_CONNECT_MDS_MDS | OBD_CONNECT_FID | OBD_CONNECT_AT | OBD_CONNECT_FULL20 | - OBD_CONNECT_PINGLESS; - /* XXX set MDS-MDS flags, remove this when running this - * on client*/ - data->ocd_connect_flags |= OBD_CONNECT_MDS_MDS; + OBD_CONNECT_LFSCK | + OBD_CONNECT_BULK_MBITS; spin_lock(&imp->imp_lock); imp->imp_server_timeout = 1; spin_unlock(&imp->imp_lock); - imp->imp_client->cli_request_portal = MDS_MDS_PORTAL; + imp->imp_client->cli_request_portal = OUT_PORTAL; CDEBUG(D_OTHER, "%s: Set 'mds' portal and timeout\n", obd->obd_name); ltd = &lod->lod_mdt_descs; @@ -262,21 +301,16 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, if (rc) { CERROR("%s: cannot connect to next dev %s (%d)\n", obd->obd_name, osp, rc); - GOTO(out_free, rc); + GOTO(out_cleanup, rc); } - - LASSERT(obd->obd_lu_dev); - LASSERT(obd->obd_lu_dev->ld_site = lod->lod_dt_dev.dd_lu_dev.ld_site); - - ldev = obd->obd_lu_dev; - d = lu2dt_dev(ldev); + connected = true; /* Allocate ost descriptor and fill it */ OBD_ALLOC_PTR(tgt_desc); if (!tgt_desc) - GOTO(out_conn, rc = -ENOMEM); + GOTO(out_cleanup, rc = -ENOMEM); - tgt_desc->ltd_tgt = d; + tgt_desc->ltd_tgt = dt_dev; tgt_desc->ltd_exp = exp; tgt_desc->ltd_uuid = obd->u.cli.cl_target_uuid; tgt_desc->ltd_gen = gen; @@ -304,6 +338,7 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, } mutex_lock(<d->ltd_mutex); + lock = true; if (cfs_bitmap_check(ltd->ltd_tgt_bitmap, index)) { CERROR("%s: device %d is registered already\n", obd->obd_name, index); @@ -319,7 +354,7 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, } } - if (!strcmp(LUSTRE_OSC_NAME, type)) { + if (for_ost) { /* pool and qos are not supported for MDS stack yet */ rc = lod_ost_pool_add(&lod->lod_pool_info, index, lod->lod_osts_size); @@ -348,47 +383,124 @@ int lod_add_device(const struct lu_env *env, struct lod_device *lod, ltd->ltd_tgtnr++; mutex_unlock(<d->ltd_mutex); lod_putref(lod, ltd); + lock = false; if (lod->lod_recovery_completed) - ldev->ld_ops->ldo_recovery_complete(env, ldev); + lu_dev->ld_ops->ldo_recovery_complete(env, lu_dev); + + if (!for_ost && lod->lod_initialized) { + rc = lod_sub_init_llog(env, lod, tgt_desc->ltd_tgt); + if (rc != 0) { + CERROR("%s: cannot start llog on %s:rc = %d\n", + lod2obd(lod)->obd_name, osp, rc); + GOTO(out_ltd, rc); + } + } - RETURN(0); + rc = lfsck_add_target(env, lod->lod_child, dt_dev, exp, index, for_ost); + if (rc != 0) { + CERROR("Fail to add LFSCK target: name = %s, type = %s, " + "index = %u, rc = %d\n", osp, type, index, rc); + GOTO(out_fini_llog, rc); + } + RETURN(rc); +out_fini_llog: + lod_sub_fini_llog(env, tgt_desc->ltd_tgt, + tgt_desc->ltd_recovery_thread); +out_ltd: + lod_getref(ltd); + mutex_lock(<d->ltd_mutex); + lock = true; + if (!for_ost && LTD_TGT(ltd, index)->ltd_recovery_thread != NULL) { + struct ptlrpc_thread *thread; + thread = LTD_TGT(ltd, index)->ltd_recovery_thread; + OBD_FREE_PTR(thread); + } + ltd->ltd_tgtnr--; + cfs_bitmap_clear(ltd->ltd_tgt_bitmap, index); + LTD_TGT(ltd, index) = NULL; out_pool: lod_ost_pool_remove(&lod->lod_pool_info, index); out_mutex: - mutex_unlock(<d->ltd_mutex); - lod_putref(lod, ltd); + if (lock) { + mutex_unlock(<d->ltd_mutex); + lod_putref(lod, ltd); + } out_desc: OBD_FREE_PTR(tgt_desc); -out_conn: - obd_disconnect(exp); -out_free: +out_cleanup: + /* XXX OSP needs us to send down LCFG_CLEANUP because it uses + * objects from the MDT stack. See LU-7184. */ + lcfg = &lod_env_info(env)->lti_lustre_cfg; + memset(lcfg, 0, sizeof(*lcfg)); + lcfg->lcfg_version = LUSTRE_CFG_VERSION; + lcfg->lcfg_command = LCFG_CLEANUP; + lu_dev->ld_ops->ldo_process_config(env, lu_dev, lcfg); + + if (connected) + obd_disconnect(exp); + return rc; } -/* - * helper function to schedule OST removal from the device table +/** + * Schedule target removal from the target table. + * + * Mark the device as dead. The device is not removed here because it may + * still be in use. The device will be removed in lod_putref() when the + * last reference is released. + * + * \param[in] env execution environment for this thread + * \param[in] lod LOD device the target table belongs to + * \param[in] ltd target table + * \param[in] idx index of the target + * \param[in] for_ost type of the target: 0 - MDT, 1 - OST */ -static void __lod_del_device(struct lod_tgt_descs *ltd, - unsigned idx) +static void __lod_del_device(const struct lu_env *env, struct lod_device *lod, + struct lod_tgt_descs *ltd, unsigned idx, + bool for_ost) { LASSERT(LTD_TGT(ltd, idx)); + + lfsck_del_target(env, lod->lod_child, LTD_TGT(ltd, idx)->ltd_tgt, + idx, for_ost); + + if (!for_ost && LTD_TGT(ltd, idx)->ltd_recovery_thread != NULL) { + struct ptlrpc_thread *thread; + + thread = LTD_TGT(ltd, idx)->ltd_recovery_thread; + OBD_FREE_PTR(thread); + } + if (LTD_TGT(ltd, idx)->ltd_reap == 0) { LTD_TGT(ltd, idx)->ltd_reap = 1; ltd->ltd_death_row++; } } -int lod_fini_tgt(struct lod_device *lod, struct lod_tgt_descs *ltd) +/** + * Schedule removal of all the targets from the given target table. + * + * See more details in the description for __lod_del_device() + * + * \param[in] env execution environment for this thread + * \param[in] lod LOD device the target table belongs to + * \param[in] ltd target table + * \param[in] for_ost type of the target: MDT or OST + * + * \retval 0 always + */ +int lod_fini_tgt(const struct lu_env *env, struct lod_device *lod, + struct lod_tgt_descs *ltd, bool for_ost) { - int idx; + unsigned int idx; if (ltd->ltd_tgts_size <= 0) return 0; lod_getref(ltd); mutex_lock(<d->ltd_mutex); cfs_foreach_bit(ltd->ltd_tgt_bitmap, idx) - __lod_del_device(ltd, idx); + __lod_del_device(env, lod, ltd, idx, for_ost); mutex_unlock(<d->ltd_mutex); lod_putref(lod, ltd); CFS_FREE_BITMAP(ltd->ltd_tgt_bitmap); @@ -400,22 +512,26 @@ int lod_fini_tgt(struct lod_device *lod, struct lod_tgt_descs *ltd) return 0; } -/* - * Add support for administratively disabled OST (through the MGS). - * Schedule a target for deletion. Disconnection and real removal from the - * table takes place in lod_putref() once the last table user release its - * reference. - * - * \param env - is the environment passed by the caller - * \param lod - is the lod device currently connected to the OSP about to be - * removed - * \param osp - is the name of OSP device about to be removed - * \param idx - is the OSP index - * \param gen - is the generation number, not used currently +/** + * Remove device by name. + * + * Remove a device identified by \a osp from the target table. Given + * the device can be in use, the real deletion happens in lod_putref(). + * + * \param[in] env execution environment for this thread + * \param[in] lod LOD device to be connected to the new OSP + * \param[in] ltd target table + * \param[in] osp name of OSP device to be removed + * \param[in] idx index of the target + * \param[in] gen generation number, not used currently + * \param[in] for_ost type of the target: 0 - MDT, 1 - OST + * + * \retval 0 if the device was scheduled for removal + * \retval -EINVAL if no device was found */ int lod_del_device(const struct lu_env *env, struct lod_device *lod, struct lod_tgt_descs *ltd, char *osp, unsigned idx, - unsigned gen) + unsigned gen, bool for_ost) { struct obd_device *obd; int rc = 0; @@ -458,7 +574,7 @@ int lod_del_device(const struct lu_env *env, struct lod_device *lod, GOTO(out, rc = -EINVAL); } - __lod_del_device(ltd, idx); + __lod_del_device(env, lod, ltd, idx, for_ost); EXIT; out: mutex_unlock(<d->ltd_mutex); @@ -466,11 +582,26 @@ out: return(rc); } -int lod_ea_store_resize(struct lod_thread_info *info, int size) +/** + * Resize per-thread storage to hold specified size. + * + * A helper function to resize per-thread temporary storage. This storage + * is used to process LOV/LVM EAs and may be quite large. We do not want to + * allocate/release it every time, so instead we put it into the env and + * reallocate on demand. The memory is released when the correspondent thread + * is finished. + * + * \param[in] info LOD-specific storage in the environment + * \param[in] size new size to grow the buffer to + + * \retval 0 on success, -ENOMEM if reallocation failed + */ +int lod_ea_store_resize(struct lod_thread_info *info, size_t size) { - int round = size_roundup_power2(size); + __u32 round = size_roundup_power2(size); - LASSERT(round <= lov_mds_md_size(LOV_MAX_STRIPE_COUNT, LOV_MAGIC_V3)); + LASSERT(round <= + lov_mds_md_size(LOV_MAX_STRIPE_COUNT, LOV_MAGIC_V3)); if (info->lti_ea_store) { LASSERT(info->lti_ea_store_size); LASSERT(info->lti_ea_store_size < round); @@ -485,112 +616,456 @@ int lod_ea_store_resize(struct lod_thread_info *info, int size) if (info->lti_ea_store == NULL) RETURN(-ENOMEM); info->lti_ea_store_size = round; + RETURN(0); } -/* - * generate and write LOV EA for given striped object +static void lod_free_comp_buffer(struct lod_layout_component *entries, + __u16 count, __u32 bufsize) +{ + struct lod_layout_component *entry; + int i; + + for (i = 0; i < count; i++) { + entry = &entries[i]; + if (entry->llc_pool != NULL) + lod_set_pool(&entry->llc_pool, NULL); + if (entry->llc_ostlist.op_array) + OBD_FREE(entry->llc_ostlist.op_array, + entry->llc_ostlist.op_size); + LASSERT(entry->llc_stripe == NULL); + LASSERT(entry->llc_stripes_allocated == 0); + } + + if (bufsize != 0) + OBD_FREE_LARGE(entries, bufsize); +} + +void lod_free_def_comp_entries(struct lod_default_striping *lds) +{ + lod_free_comp_buffer(lds->lds_def_comp_entries, + lds->lds_def_comp_size_cnt, + size_roundup_power2( + sizeof(*lds->lds_def_comp_entries) * + lds->lds_def_comp_size_cnt)); + lds->lds_def_comp_entries = NULL; + lds->lds_def_comp_cnt = 0; + lds->lds_def_striping_is_composite = 0; + lds->lds_def_comp_size_cnt = 0; +} + +/** + * Resize per-thread storage to hold default striping component entries + * + * A helper function to resize per-thread temporary storage. This storage + * is used to hold default LOV/LVM EAs and may be quite large. We do not want + * to allocate/release it every time, so instead we put it into the env and + * reallocate it on demand. The memory is released when the correspondent + * thread is finished. + * + * \param[in,out] lds default striping + * \param[in] count new component count to grow the buffer to + + * \retval 0 on success, -ENOMEM if reallocation failed + */ +int lod_def_striping_comp_resize(struct lod_default_striping *lds, __u16 count) +{ + struct lod_layout_component *entries; + __u32 new = size_roundup_power2(sizeof(*lds->lds_def_comp_entries) * + count); + __u32 old = size_roundup_power2(sizeof(*lds->lds_def_comp_entries) * + lds->lds_def_comp_size_cnt); + + if (new <= old) + return 0; + + OBD_ALLOC_LARGE(entries, new); + if (entries == NULL) + return -ENOMEM; + + if (lds->lds_def_comp_entries != NULL) { + CDEBUG(D_INFO, "default striping component size %d is not " + "enough, need %d\n", old, new); + lod_free_def_comp_entries(lds); + } + + lds->lds_def_comp_entries = entries; + lds->lds_def_comp_size_cnt = count; + + RETURN(0); +} + +void lod_free_comp_entries(struct lod_object *lo) +{ + if (lo->ldo_mirrors) { + OBD_FREE(lo->ldo_mirrors, + sizeof(*lo->ldo_mirrors) * lo->ldo_mirror_count); + lo->ldo_mirrors = NULL; + lo->ldo_mirror_count = 0; + } + lod_free_comp_buffer(lo->ldo_comp_entries, + lo->ldo_comp_cnt, + sizeof(*lo->ldo_comp_entries) * lo->ldo_comp_cnt); + lo->ldo_comp_entries = NULL; + lo->ldo_comp_cnt = 0; + lo->ldo_is_composite = 0; +} + +int lod_alloc_comp_entries(struct lod_object *lo, + int mirror_count, int comp_count) +{ + LASSERT(comp_count != 0); + LASSERT(lo->ldo_comp_cnt == 0 && lo->ldo_comp_entries == NULL); + + if (mirror_count > 0) { + OBD_ALLOC(lo->ldo_mirrors, + sizeof(*lo->ldo_mirrors) * mirror_count); + if (!lo->ldo_mirrors) + return -ENOMEM; + + lo->ldo_mirror_count = mirror_count; + } + + OBD_ALLOC_LARGE(lo->ldo_comp_entries, + sizeof(*lo->ldo_comp_entries) * comp_count); + if (lo->ldo_comp_entries == NULL) { + OBD_FREE(lo->ldo_mirrors, + sizeof(*lo->ldo_mirrors) * mirror_count); + lo->ldo_mirror_count = 0; + return -ENOMEM; + } + + lo->ldo_comp_cnt = comp_count; + return 0; +} + +int lod_fill_mirrors(struct lod_object *lo) +{ + struct lod_layout_component *lod_comp; + int mirror_idx = -1; + __u16 mirror_id = 0xffff; + int i; + ENTRY; + + LASSERT(equi(!lo->ldo_is_composite, lo->ldo_mirror_count == 0)); + + if (!lo->ldo_is_composite) + RETURN(0); + + lod_comp = &lo->ldo_comp_entries[0]; + for (i = 0; i < lo->ldo_comp_cnt; i++, lod_comp++) { + int stale = !!(lod_comp->llc_flags & LCME_FL_STALE); + int preferred = !!(lod_comp->llc_flags & LCME_FL_PREF_WR); + + if (mirror_id_of(lod_comp->llc_id) == mirror_id) { + lo->ldo_mirrors[mirror_idx].lme_stale |= stale; + lo->ldo_mirrors[mirror_idx].lme_primary |= preferred; + lo->ldo_mirrors[mirror_idx].lme_end = i; + continue; + } + + /* new mirror */ + ++mirror_idx; + if (mirror_idx >= lo->ldo_mirror_count) + RETURN(-EINVAL); + + mirror_id = mirror_id_of(lod_comp->llc_id); + + lo->ldo_mirrors[mirror_idx].lme_id = mirror_id; + lo->ldo_mirrors[mirror_idx].lme_stale = stale; + lo->ldo_mirrors[mirror_idx].lme_primary = preferred; + lo->ldo_mirrors[mirror_idx].lme_start = i; + lo->ldo_mirrors[mirror_idx].lme_end = i; + } + if (mirror_idx != lo->ldo_mirror_count - 1) + RETURN(-EINVAL); + + RETURN(0); +} + +/** + * Generate on-disk lov_mds_md structure for each layout component based on + * the information in lod_object->ldo_comp_entries[i]. + * + * \param[in] env execution environment for this thread + * \param[in] lo LOD object + * \param[in] comp_idx index of ldo_comp_entries + * \param[in] lmm buffer to cotain the on-disk lov_mds_md + * \param[in|out] lmm_size buffer size/lmm size + * \param[in] is_dir generate lov ea for dir or file? For dir case, + * the stripe info is from the default stripe + * template, which is collected in lod_ah_init(), + * either from parent object or root object; for + * file case, it's from the @lo object + * + * \retval 0 if on disk structure is created successfully + * \retval negative error number on failure */ -int lod_generate_and_set_lovea(const struct lu_env *env, - struct lod_object *lo, struct thandle *th) +static int lod_gen_component_ea(const struct lu_env *env, + struct lod_object *lo, int comp_idx, + struct lov_mds_md *lmm, int *lmm_size, + bool is_dir) { struct lod_thread_info *info = lod_env_info(env); - struct dt_object *next = dt_object_child(&lo->ldo_obj); const struct lu_fid *fid = lu_object_fid(&lo->ldo_obj.do_lu); - struct lov_mds_md_v1 *lmm; + struct lod_device *lod; struct lov_ost_data_v1 *objs; - __u32 magic; - int i, rc, lmm_size; + struct lod_layout_component *lod_comp; + __u32 magic; + __u16 stripe_count; + int i, rc = 0; ENTRY; LASSERT(lo); - LASSERT(lo->ldo_stripenr > 0); + if (is_dir) + lod_comp = + &lo->ldo_def_striping->lds_def_comp_entries[comp_idx]; + else + lod_comp = &lo->ldo_comp_entries[comp_idx]; - magic = lo->ldo_pool ? LOV_MAGIC_V3 : LOV_MAGIC_V1; - lmm_size = lov_mds_md_size(lo->ldo_stripenr, magic); - if (info->lti_ea_store_size < lmm_size) { - rc = lod_ea_store_resize(info, lmm_size); - if (rc) - RETURN(rc); - } - - lmm = info->lti_ea_store; + magic = lod_comp->llc_pool != NULL ? LOV_MAGIC_V3 : LOV_MAGIC_V1; + if (lod_comp->llc_pattern == 0) /* default striping */ + lod_comp->llc_pattern = LOV_PATTERN_RAID0; lmm->lmm_magic = cpu_to_le32(magic); - lmm->lmm_pattern = cpu_to_le32(LOV_PATTERN_RAID0); - lmm->lmm_object_id = cpu_to_le64(fid_ver_oid(fid)); - lmm->lmm_object_seq = cpu_to_le64(fid_seq(fid)); - lmm->lmm_stripe_size = cpu_to_le32(lo->ldo_stripe_size); - lmm->lmm_stripe_count = cpu_to_le16(lo->ldo_stripenr); - lmm->lmm_layout_gen = 0; + lmm->lmm_pattern = cpu_to_le32(lod_comp->llc_pattern); + fid_to_lmm_oi(fid, &lmm->lmm_oi); + if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_BAD_LMMOI)) + lmm->lmm_oi.oi.oi_id++; + lmm_oi_cpu_to_le(&lmm->lmm_oi, &lmm->lmm_oi); + + lmm->lmm_stripe_size = cpu_to_le32(lod_comp->llc_stripe_size); + lmm->lmm_stripe_count = cpu_to_le16(lod_comp->llc_stripe_count); + /** + * for dir and uninstantiated component, lmm_layout_gen stores + * default stripe offset. + */ + lmm->lmm_layout_gen = + (is_dir || !lod_comp_inited(lod_comp)) ? + cpu_to_le16(lod_comp->llc_stripe_offset) : + cpu_to_le16(lod_comp->llc_layout_gen); + if (magic == LOV_MAGIC_V1) { objs = &lmm->lmm_objects[0]; } else { - struct lov_mds_md_v3 *v3 = (struct lov_mds_md_v3 *) lmm; - strncpy(v3->lmm_pool_name, lo->ldo_pool, LOV_MAXPOOLNAME); + struct lov_mds_md_v3 *v3 = (struct lov_mds_md_v3 *)lmm; + size_t cplen = strlcpy(v3->lmm_pool_name, + lod_comp->llc_pool, + sizeof(v3->lmm_pool_name)); + if (cplen >= sizeof(v3->lmm_pool_name)) + RETURN(-E2BIG); objs = &v3->lmm_objects[0]; } + stripe_count = lod_comp_entry_stripe_count(lo, lod_comp, is_dir); + if (stripe_count == 0 && !is_dir && + !(lod_comp->llc_pattern & LOV_PATTERN_F_RELEASED) && + !(lod_comp->llc_pattern & LOV_PATTERN_MDT)) + RETURN(-E2BIG); + + if (!is_dir && lo->ldo_is_composite) + lod_comp_shrink_stripe_count(lod_comp, &stripe_count); + + if (is_dir || lod_comp->llc_pattern & LOV_PATTERN_F_RELEASED) + GOTO(done, rc = 0); + + /* generate ost_idx of this component stripe */ + lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev); + for (i = 0; i < stripe_count; i++) { + struct dt_object *object; + __u32 ost_idx = (__u32)-1UL; + int type = LU_SEQ_RANGE_OST; + + if (lod_comp->llc_stripe && lod_comp->llc_stripe[i]) { + object = lod_comp->llc_stripe[i]; + /* instantiated component */ + info->lti_fid = *lu_object_fid(&object->do_lu); + + if (OBD_FAIL_CHECK(OBD_FAIL_LFSCK_MULTIPLE_REF) && + comp_idx == 0) { + if (cfs_fail_val == 0) + cfs_fail_val = info->lti_fid.f_oid; + else if (i == 0) + info->lti_fid.f_oid = cfs_fail_val; + } - for (i = 0; i < lo->ldo_stripenr; i++) { - const struct lu_fid *fid; - struct lod_device *lod; - __u32 index; + rc = fid_to_ostid(&info->lti_fid, &info->lti_ostid); + LASSERT(rc == 0); - lod = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev); - LASSERT(lo->ldo_stripe[i]); - fid = lu_object_fid(&lo->ldo_stripe[i]->do_lu); + ostid_cpu_to_le(&info->lti_ostid, &objs[i].l_ost_oi); + objs[i].l_ost_gen = cpu_to_le32(0); + if (OBD_FAIL_CHECK(OBD_FAIL_MDS_FLD_LOOKUP)) + rc = -ENOENT; + else + rc = lod_fld_lookup(env, lod, &info->lti_fid, + &ost_idx, &type); + if (rc < 0) { + CERROR("%s: Can not locate "DFID": rc = %d\n", + lod2obd(lod)->obd_name, + PFID(&info->lti_fid), rc); + RETURN(rc); + } + } else if (lod_comp->llc_ostlist.op_array && + lod_comp->llc_ostlist.op_count) { + /* user specified ost list */ + ost_idx = lod_comp->llc_ostlist.op_array[i]; + } + /* + * with un-instantiated or with no specified ost list + * component, its l_ost_idx does not matter. + */ + objs[i].l_ost_idx = cpu_to_le32(ost_idx); + } +done: + if (lmm_size != NULL) + *lmm_size = lov_mds_md_size(stripe_count, magic); + RETURN(rc); +} - rc = fid_ostid_pack(fid, &info->lti_ostid); - LASSERT(rc == 0); +/** + * Generate on-disk lov_mds_md structure based on the information in + * the lod_object->ldo_comp_entries. + * + * \param[in] env execution environment for this thread + * \param[in] lo LOD object + * \param[in] lmm buffer to cotain the on-disk lov_mds_md + * \param[in|out] lmm_size buffer size/lmm size + * \param[in] is_dir generate lov ea for dir or file? For dir case, + * the stripe info is from the default stripe + * template, which is collected in lod_ah_init(), + * either from parent object or root object; for + * file case, it's from the @lo object + * + * \retval 0 if on disk structure is created successfully + * \retval negative error number on failure + */ +int lod_generate_lovea(const struct lu_env *env, struct lod_object *lo, + struct lov_mds_md *lmm, int *lmm_size, bool is_dir) +{ + struct lov_comp_md_entry_v1 *lcme; + struct lov_comp_md_v1 *lcm; + struct lod_layout_component *comp_entries; + __u16 comp_cnt, mirror_cnt; + bool is_composite; + int i, rc = 0, offset; + ENTRY; - objs[i].l_object_id = cpu_to_le64(info->lti_ostid.oi_id); - objs[i].l_object_seq = cpu_to_le64(info->lti_ostid.oi_seq); - objs[i].l_ost_gen = cpu_to_le32(0); - rc = lod_fld_lookup(env, lod, fid, &index, LU_SEQ_RANGE_OST); - if (rc < 0) { - CERROR("%s: Can not locate "DFID": rc = %d\n", - lod2obd(lod)->obd_name, PFID(fid), rc); - RETURN(rc); - } - objs[i].l_ost_idx = cpu_to_le32(index); + if (is_dir) { + comp_cnt = lo->ldo_def_striping->lds_def_comp_cnt; + mirror_cnt = lo->ldo_def_striping->lds_def_mirror_cnt; + comp_entries = lo->ldo_def_striping->lds_def_comp_entries; + is_composite = + lo->ldo_def_striping->lds_def_striping_is_composite; + } else { + comp_cnt = lo->ldo_comp_cnt; + mirror_cnt = lo->ldo_mirror_count; + comp_entries = lo->ldo_comp_entries; + is_composite = lo->ldo_is_composite; + } + + LASSERT(lmm_size != NULL); + LASSERT(comp_cnt != 0 && comp_entries != NULL); + + if (!is_composite) { + rc = lod_gen_component_ea(env, lo, 0, lmm, lmm_size, is_dir); + RETURN(rc); } - info->lti_buf.lb_buf = lmm; - info->lti_buf.lb_len = lmm_size; - rc = dt_xattr_set(env, next, &info->lti_buf, XATTR_NAME_LOV, 0, - th, BYPASS_CAPA); + lcm = (struct lov_comp_md_v1 *)lmm; + memset(lcm, 0, sizeof(*lcm)); + + lcm->lcm_magic = cpu_to_le32(LOV_MAGIC_COMP_V1); + lcm->lcm_entry_count = cpu_to_le16(comp_cnt); + lcm->lcm_mirror_count = cpu_to_le16(mirror_cnt - 1); + lcm->lcm_flags = cpu_to_le16(lo->ldo_flr_state); + + offset = sizeof(*lcm) + sizeof(*lcme) * comp_cnt; + LASSERT(offset % sizeof(__u64) == 0); + + for (i = 0; i < comp_cnt; i++) { + struct lod_layout_component *lod_comp; + struct lov_mds_md *sub_md; + int size; + + lod_comp = &comp_entries[i]; + lcme = &lcm->lcm_entries[i]; + + LASSERT(ergo(!is_dir, lod_comp->llc_id != LCME_ID_INVAL)); + lcme->lcme_id = cpu_to_le32(lod_comp->llc_id); + + /* component could be un-inistantiated */ + lcme->lcme_flags = cpu_to_le32(lod_comp->llc_flags); + if (lod_comp->llc_flags & LCME_FL_NOSYNC) + lcme->lcme_timestamp = + cpu_to_le64(lod_comp->llc_timestamp); + lcme->lcme_extent.e_start = + cpu_to_le64(lod_comp->llc_extent.e_start); + lcme->lcme_extent.e_end = + cpu_to_le64(lod_comp->llc_extent.e_end); + lcme->lcme_offset = cpu_to_le32(offset); + + sub_md = (struct lov_mds_md *)((char *)lcm + offset); + rc = lod_gen_component_ea(env, lo, i, sub_md, &size, is_dir); + if (rc) + GOTO(out, rc); + lcme->lcme_size = cpu_to_le32(size); + offset += size; + LASSERTF((offset <= *lmm_size) && (offset % sizeof(__u64) == 0), + "offset:%d lmm_size:%d\n", offset, *lmm_size); + } + lcm->lcm_size = cpu_to_le32(offset); + lcm->lcm_layout_gen = cpu_to_le32(is_dir ? 0 : lo->ldo_layout_gen); + lustre_print_user_md(D_LAYOUT, (struct lov_user_md *)lmm, + "generate lum"); +out: + if (rc == 0) + *lmm_size = offset; RETURN(rc); } -int lod_get_lov_ea(const struct lu_env *env, struct lod_object *lo) +/** + * Get LOV EA. + * + * Fill lti_ea_store buffer in the environment with a value for the given + * EA. The buffer is reallocated if the value doesn't fit. + * + * \param[in,out] env execution environment for this thread + * .lti_ea_store buffer is filled with EA's value + * \param[in] lo LOD object + * \param[in] name name of the EA + * + * \retval > 0 if EA is fetched successfully + * \retval 0 if EA is empty + * \retval negative error number on failure + */ +int lod_get_ea(const struct lu_env *env, struct lod_object *lo, + const char *name) { - struct lod_thread_info *info = lod_env_info(env); - struct dt_object *next = dt_object_child(&lo->ldo_obj); + struct lod_thread_info *info = lod_env_info(env); + struct dt_object *next = dt_object_child(&lo->ldo_obj); int rc; ENTRY; LASSERT(info); - if (unlikely(info->lti_ea_store_size == 0)) { + if (unlikely(info->lti_ea_store == NULL)) { /* just to enter in allocation block below */ rc = -ERANGE; } else { repeat: info->lti_buf.lb_buf = info->lti_ea_store; info->lti_buf.lb_len = info->lti_ea_store_size; - rc = dt_xattr_get(env, next, &info->lti_buf, XATTR_NAME_LOV, - BYPASS_CAPA); + rc = dt_xattr_get(env, next, &info->lti_buf, name); } + /* if object is not striped or inaccessible */ - if (rc == -ENODATA) + if (rc == -ENODATA || rc == -ENOENT) RETURN(0); if (rc == -ERANGE) { /* EA doesn't fit, reallocate new buffer */ - rc = dt_xattr_get(env, next, &LU_BUF_NULL, XATTR_NAME_LOV, - BYPASS_CAPA); - if (rc == -ENODATA) + rc = dt_xattr_get(env, next, &LU_BUF_NULL, name); + if (rc == -ENODATA || rc == -ENOENT) RETURN(0); else if (rc < 0) RETURN(rc); @@ -605,101 +1080,114 @@ repeat: RETURN(rc); } -int lod_store_def_striping(const struct lu_env *env, struct dt_object *dt, - struct thandle *th) +/** + * Verify the target index is present in the current configuration. + * + * \param[in] md LOD device where the target table is stored + * \param[in] idx target's index + * + * \retval 0 if the index is present + * \retval -EINVAL if not + */ +static int validate_lod_and_idx(struct lod_device *md, __u32 idx) { - struct lod_thread_info *info = lod_env_info(env); - struct lod_object *lo = lod_dt_obj(dt); - struct dt_object *next = dt_object_child(dt); - struct lov_user_md_v3 *v3; - int rc; - ENTRY; - - LASSERT(S_ISDIR(dt->do_lu.lo_header->loh_attr)); - - /* - * store striping defaults into new directory - * used to implement defaults inheritance - */ - - /* probably nothing to inherite */ - if (lo->ldo_striping_cached == 0) - RETURN(0); - - if (LOVEA_DELETE_VALUES(lo->ldo_def_stripe_size, lo->ldo_def_stripenr, - lo->ldo_def_stripe_offset)) - RETURN(0); - - /* XXX: use thread info */ - OBD_ALLOC_PTR(v3); - if (v3 == NULL) - RETURN(-ENOMEM); - - v3->lmm_magic = cpu_to_le32(LOV_MAGIC_V3); - v3->lmm_pattern = cpu_to_le32(LOV_PATTERN_RAID0); - v3->lmm_object_id = 0; - v3->lmm_object_seq = 0; - v3->lmm_stripe_size = cpu_to_le32(lo->ldo_def_stripe_size); - v3->lmm_stripe_count = cpu_to_le16(lo->ldo_def_stripenr); - v3->lmm_stripe_offset = cpu_to_le16(lo->ldo_def_stripe_offset); - if (lo->ldo_pool) - strncpy(v3->lmm_pool_name, lo->ldo_pool, LOV_MAXPOOLNAME); + if (unlikely(idx >= md->lod_ost_descs.ltd_tgts_size || + !cfs_bitmap_check(md->lod_ost_bitmap, idx))) { + CERROR("%s: bad idx: %d of %d\n", lod2obd(md)->obd_name, idx, + md->lod_ost_descs.ltd_tgts_size); + return -EINVAL; + } - info->lti_buf.lb_buf = v3; - info->lti_buf.lb_len = sizeof(*v3); - rc = dt_xattr_set(env, next, &info->lti_buf, XATTR_NAME_LOV, 0, th, - BYPASS_CAPA); + if (unlikely(OST_TGT(md, idx) == NULL)) { + CERROR("%s: bad lod_tgt_desc for idx: %d\n", + lod2obd(md)->obd_name, idx); + return -EINVAL; + } - OBD_FREE_PTR(v3); + if (unlikely(OST_TGT(md, idx)->ltd_ost == NULL)) { + CERROR("%s: invalid lod device, for idx: %d\n", + lod2obd(md)->obd_name , idx); + return -EINVAL; + } - RETURN(rc); + return 0; } -/* - * allocate array of objects pointers, find/create objects - * stripenr and other fields should be initialized by this moment +/** + * Instantiate objects for stripes. + * + * Allocate and initialize LU-objects representing the stripes. The number + * of the stripes (ldo_stripe_count) must be initialized already. The caller + * must ensure nobody else is calling the function on the object at the same + * time. FLDB service must be running to be able to map a FID to the targets + * and find appropriate device representing that target. + * + * \param[in] env execution environment for this thread + * \param[in,out] lo LOD object + * \param[in] objs an array of IDs to creates the objects from + * \param[in] comp_idx index of ldo_comp_entries + * + * \retval 0 if the objects are instantiated successfully + * \retval negative error number on failure */ int lod_initialize_objects(const struct lu_env *env, struct lod_object *lo, - struct lov_ost_data_v1 *objs) + struct lov_ost_data_v1 *objs, int comp_idx) { - struct lod_thread_info *info = lod_env_info(env); - struct lod_device *md = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev); - struct lu_object *o, *n; - struct lu_device *nd; - int i, idx, rc = 0; + struct lod_layout_component *lod_comp; + struct lod_thread_info *info = lod_env_info(env); + struct lod_device *md; + struct lu_object *o, *n; + struct lu_device *nd; + struct dt_object **stripe = NULL; + __u32 *ost_indices = NULL; + int stripe_len; + int i, rc = 0; + __u32 idx; ENTRY; - LASSERT(lo); - LASSERT(lo->ldo_stripe == NULL); - LASSERT(lo->ldo_stripenr > 0); - LASSERT(lo->ldo_stripe_size > 0); + LASSERT(lo != NULL); + md = lu2lod_dev(lo->ldo_obj.do_lu.lo_dev); - i = sizeof(struct dt_object *) * lo->ldo_stripenr; - OBD_ALLOC(lo->ldo_stripe, i); - if (lo->ldo_stripe == NULL) + LASSERT(lo->ldo_comp_cnt != 0 && lo->ldo_comp_entries != NULL); + lod_comp = &lo->ldo_comp_entries[comp_idx]; + + LASSERT(lod_comp->llc_stripe == NULL); + LASSERT(lod_comp->llc_stripe_count > 0); + LASSERT(lod_comp->llc_stripe_size > 0); + + stripe_len = lod_comp->llc_stripe_count; + OBD_ALLOC(stripe, sizeof(stripe[0]) * stripe_len); + if (stripe == NULL) + RETURN(-ENOMEM); + OBD_ALLOC(ost_indices, sizeof(*ost_indices) * stripe_len); + if (!ost_indices) GOTO(out, rc = -ENOMEM); - lo->ldo_stripes_allocated = lo->ldo_stripenr; - for (i = 0; i < lo->ldo_stripenr; i++) { - info->lti_ostid.oi_id = le64_to_cpu(objs[i].l_object_id); - info->lti_ostid.oi_seq = le64_to_cpu(objs[i].l_object_seq); - idx = le64_to_cpu(objs[i].l_ost_idx); - fid_ostid_unpack(&info->lti_fid, &info->lti_ostid, idx); + for (i = 0; i < lod_comp->llc_stripe_count; i++) { + if (unlikely(lovea_slot_is_dummy(&objs[i]))) + continue; + + ostid_le_to_cpu(&objs[i].l_ost_oi, &info->lti_ostid); + idx = le32_to_cpu(objs[i].l_ost_idx); + rc = ostid_to_fid(&info->lti_fid, &info->lti_ostid, idx); + if (rc != 0) + GOTO(out, rc); LASSERTF(fid_is_sane(&info->lti_fid), ""DFID" insane!\n", PFID(&info->lti_fid)); - /* - * XXX: assertion is left for testing, to make - * sure we never process requests till configuration - * is completed. to be changed to -EINVAL - */ - lod_getref(&md->lod_ost_descs); - LASSERT(cfs_bitmap_check(md->lod_ost_bitmap, idx)); - LASSERT(OST_TGT(md,idx)); - LASSERTF(OST_TGT(md,idx)->ltd_ost, "idx %d\n", idx); + + rc = validate_lod_and_idx(md, idx); + if (unlikely(rc != 0)) { + lod_putref(md, &md->lod_ost_descs); + GOTO(out, rc); + } + nd = &OST_TGT(md,idx)->ltd_ost->dd_lu_dev; lod_putref(md, &md->lod_ost_descs); + /* In the function below, .hs_keycmp resolves to + * u_obj_hop_keycmp() */ + /* coverity[overrun-buffer-val] */ o = lu_object_find_at(env, nd, &info->lti_fid, NULL); if (IS_ERR(o)) GOTO(out, rc = PTR_ERR(o)); @@ -707,215 +1195,840 @@ int lod_initialize_objects(const struct lu_env *env, struct lod_object *lo, n = lu_object_locate(o->lo_header, nd->ld_type); LASSERT(n); - lo->ldo_stripe[i] = container_of(n, struct dt_object, do_lu); + stripe[i] = container_of(n, struct dt_object, do_lu); + ost_indices[i] = idx; } out: + if (rc != 0) { + for (i = 0; i < stripe_len; i++) + if (stripe[i] != NULL) + dt_object_put(env, stripe[i]); + + OBD_FREE(stripe, sizeof(stripe[0]) * stripe_len); + lod_comp->llc_stripe_count = 0; + if (ost_indices) + OBD_FREE(ost_indices, + sizeof(*ost_indices) * stripe_len); + } else { + lod_comp->llc_stripe = stripe; + lod_comp->llc_ost_indices = ost_indices; + lod_comp->llc_stripes_allocated = stripe_len; + } + RETURN(rc); } -/* - * Parse striping information stored in lti_ea_store +/** + * Instantiate objects for striping. + * + * Parse striping information in \a buf and instantiate the objects + * representing the stripes. + * + * \param[in] env execution environment for this thread + * \param[in] lo LOD object + * \param[in] buf buffer storing LOV EA to parse + * + * \retval 0 if parsing and objects creation succeed + * \retval negative error number on failure */ int lod_parse_striping(const struct lu_env *env, struct lod_object *lo, const struct lu_buf *buf) { struct lov_mds_md_v1 *lmm; + struct lov_comp_md_v1 *comp_v1 = NULL; struct lov_ost_data_v1 *objs; - __u32 magic; - int rc = 0; + __u32 magic, pattern; + int i, j, rc = 0; + __u16 comp_cnt; + __u16 mirror_cnt = 0; ENTRY; LASSERT(buf); LASSERT(buf->lb_buf); LASSERT(buf->lb_len); + LASSERT(mutex_is_locked(&lo->ldo_layout_mutex)); - lmm = (struct lov_mds_md_v1 *) buf->lb_buf; + lmm = (struct lov_mds_md_v1 *)buf->lb_buf; magic = le32_to_cpu(lmm->lmm_magic); - if (magic != LOV_MAGIC_V1 && magic != LOV_MAGIC_V3) - GOTO(out, rc = -EINVAL); - if (le32_to_cpu(lmm->lmm_pattern) != LOV_PATTERN_RAID0) + if (magic != LOV_MAGIC_V1 && magic != LOV_MAGIC_V3 && + magic != LOV_MAGIC_COMP_V1) GOTO(out, rc = -EINVAL); - lo->ldo_stripe_size = le32_to_cpu(lmm->lmm_stripe_size); - lo->ldo_stripenr = le16_to_cpu(lmm->lmm_stripe_count); - lo->ldo_layout_gen = le16_to_cpu(lmm->lmm_layout_gen); + lod_free_comp_entries(lo); + + if (magic == LOV_MAGIC_COMP_V1) { + comp_v1 = (struct lov_comp_md_v1 *)lmm; + comp_cnt = le16_to_cpu(comp_v1->lcm_entry_count); + if (comp_cnt == 0) + GOTO(out, rc = -EINVAL); + lo->ldo_layout_gen = le32_to_cpu(comp_v1->lcm_layout_gen); + lo->ldo_is_composite = 1; + lo->ldo_flr_state = le16_to_cpu(comp_v1->lcm_flags) & + LCM_FL_FLR_MASK; + mirror_cnt = le16_to_cpu(comp_v1->lcm_mirror_count) + 1; + } else { + comp_cnt = 1; + lo->ldo_layout_gen = le16_to_cpu(lmm->lmm_layout_gen); + lo->ldo_is_composite = 0; + } - LASSERT(buf->lb_len >= lov_mds_md_size(lo->ldo_stripenr, magic)); + rc = lod_alloc_comp_entries(lo, mirror_cnt, comp_cnt); + if (rc) + GOTO(out, rc); - if (magic == LOV_MAGIC_V3) { - struct lov_mds_md_v3 *v3 = (struct lov_mds_md_v3 *) lmm; - objs = &v3->lmm_objects[0]; - lod_object_set_pool(lo, v3->lmm_pool_name); - } else { - objs = &lmm->lmm_objects[0]; + for (i = 0; i < comp_cnt; i++) { + struct lod_layout_component *lod_comp; + struct lu_extent *ext; + __u32 offs; + + lod_comp = &lo->ldo_comp_entries[i]; + if (lo->ldo_is_composite) { + offs = le32_to_cpu(comp_v1->lcm_entries[i].lcme_offset); + lmm = (struct lov_mds_md_v1 *)((char *)comp_v1 + offs); + magic = le32_to_cpu(lmm->lmm_magic); + + ext = &comp_v1->lcm_entries[i].lcme_extent; + lod_comp->llc_extent.e_start = + le64_to_cpu(ext->e_start); + lod_comp->llc_extent.e_end = le64_to_cpu(ext->e_end); + lod_comp->llc_flags = + le32_to_cpu(comp_v1->lcm_entries[i].lcme_flags); + if (lod_comp->llc_flags & LCME_FL_NOSYNC) + lod_comp->llc_timestamp = le64_to_cpu( + comp_v1->lcm_entries[i].lcme_timestamp); + lod_comp->llc_id = + le32_to_cpu(comp_v1->lcm_entries[i].lcme_id); + if (lod_comp->llc_id == LCME_ID_INVAL) + GOTO(out, rc = -EINVAL); + } else { + lod_comp_set_init(lod_comp); + } + + pattern = le32_to_cpu(lmm->lmm_pattern); + if (lov_pattern(pattern) != LOV_PATTERN_RAID0 && + lov_pattern(pattern) != LOV_PATTERN_MDT) + GOTO(out, rc = -EINVAL); + + lod_comp->llc_pattern = pattern; + lod_comp->llc_stripe_size = le32_to_cpu(lmm->lmm_stripe_size); + lod_comp->llc_stripe_count = le16_to_cpu(lmm->lmm_stripe_count); + lod_comp->llc_layout_gen = le16_to_cpu(lmm->lmm_layout_gen); + + if (magic == LOV_MAGIC_V3) { + struct lov_mds_md_v3 *v3 = (struct lov_mds_md_v3 *)lmm; + lod_set_pool(&lod_comp->llc_pool, v3->lmm_pool_name); + objs = &v3->lmm_objects[0]; + } else { + lod_set_pool(&lod_comp->llc_pool, NULL); + objs = &lmm->lmm_objects[0]; + } + + /** + * If uninstantiated template component has valid l_ost_idx, + * then user has specified ost list for this component. + */ + if (!lod_comp_inited(lod_comp)) { + __u16 stripe_count; + + if (objs[0].l_ost_idx != (__u32)-1UL) { + stripe_count = lod_comp_entry_stripe_count( + lo, lod_comp, false); + if (stripe_count == 0 && + !(lod_comp->llc_pattern & LOV_PATTERN_F_RELEASED) && + !(lod_comp->llc_pattern & LOV_PATTERN_MDT)) + GOTO(out, rc = -E2BIG); + /** + * load the user specified ost list, when this + * component is instantiated later, it will be + * used in lod_alloc_ost_list(). + */ + lod_comp->llc_ostlist.op_count = stripe_count; + lod_comp->llc_ostlist.op_size = + stripe_count * sizeof(__u32); + OBD_ALLOC(lod_comp->llc_ostlist.op_array, + lod_comp->llc_ostlist.op_size); + if (!lod_comp->llc_ostlist.op_array) + GOTO(out, rc = -ENOMEM); + + for (j = 0; j < stripe_count; j++) + lod_comp->llc_ostlist.op_array[j] = + le32_to_cpu(objs[j].l_ost_idx); + + /** + * this component OST objects starts from the + * first ost_idx, lod_alloc_ost_list() will + * check this. + */ + lod_comp->llc_stripe_offset = objs[0].l_ost_idx; + } else { + /** + * for uninstantiated component, + * lmm_layout_gen stores default stripe offset. + */ + lod_comp->llc_stripe_offset = + lmm->lmm_layout_gen; + } + } + + /* skip un-instantiated component object initialization */ + if (!lod_comp_inited(lod_comp)) + continue; + + if (!(lod_comp->llc_pattern & LOV_PATTERN_F_RELEASED) && + !(lod_comp->llc_pattern & LOV_PATTERN_MDT)) { + rc = lod_initialize_objects(env, lo, objs, i); + if (rc) + GOTO(out, rc); + } } - rc = lod_initialize_objects(env, lo, objs); + rc = lod_fill_mirrors(lo); + if (rc) + GOTO(out, rc); out: + if (rc) + lod_striping_free_nolock(env, lo); RETURN(rc); } -/* - * Load and parse striping information, create in-core representation for the - * stripes +/** + * Check whether the striping (LOVEA for regular file, LMVEA for directory) + * is already cached. + * + * \param[in] lo LOD object + * + * \retval True if the striping is cached, otherwise + * return false. */ -int lod_load_striping(const struct lu_env *env, struct lod_object *lo) +static bool lod_striping_loaded(struct lod_object *lo) { - struct lod_thread_info *info = lod_env_info(env); - struct dt_object *next = dt_object_child(&lo->ldo_obj); - int rc; - ENTRY; + if (S_ISREG(lod2lu_obj(lo)->lo_header->loh_attr) && + lo->ldo_comp_cached) + return true; - /* - * currently this code is supposed to be called from declaration - * phase only, thus the object is not expected to be locked by caller - */ - dt_write_lock(env, next, 0); - /* already initialized? */ - if (lo->ldo_stripe) { - int i; - /* check validity */ - for (i = 0; i < lo->ldo_stripenr; i++) - LASSERTF(lo->ldo_stripe[i], "stripe %d is NULL\n", i); - GOTO(out, rc = 0); + if (S_ISDIR(lod2lu_obj(lo)->lo_header->loh_attr)) { + if (lo->ldo_dir_stripe_loaded) + return true; + + /* Never load LMV stripe for slaves of striped dir */ + if (lo->ldo_dir_slave_stripe) + return true; } + return false; +} + +/** + * A generic function to initialize the stripe objects. + * + * A protected version of lod_striping_load_locked() - load the striping + * information from storage, parse that and instantiate LU objects to + * represent the stripes. The LOD object \a lo supplies a pointer to the + * next sub-object in the LU stack so we can lock it. Also use \a lo to + * return an array of references to the newly instantiated objects. + * + * \param[in] env execution environment for this thread + * \param[in,out] lo LOD object, where striping is stored and + * which gets an array of references + * + * \retval 0 if parsing and object creation succeed + * \retval negative error number on failure + **/ +int lod_striping_load(const struct lu_env *env, struct lod_object *lo) +{ + struct lod_thread_info *info = lod_env_info(env); + struct dt_object *next = dt_object_child(&lo->ldo_obj); + struct lu_buf *buf = &info->lti_buf; + int rc = 0; + + ENTRY; + if (!dt_object_exists(next)) - GOTO(out, rc = 0); + RETURN(0); - /* only regular files can be striped */ - if (!(lu_object_attr(lod2lu_obj(lo)) & S_IFREG)) - GOTO(out, rc = 0); + if (lod_striping_loaded(lo)) + RETURN(0); - LASSERT(lo->ldo_stripenr == 0); + mutex_lock(&lo->ldo_layout_mutex); + if (lod_striping_loaded(lo)) + GOTO(unlock, rc = 0); - rc = lod_get_lov_ea(env, lo); - if (rc <= 0) - GOTO(out, rc); + if (S_ISREG(lod2lu_obj(lo)->lo_header->loh_attr)) { + rc = lod_get_lov_ea(env, lo); + if (rc <= 0) + GOTO(unlock, rc); + + /* + * there is LOV EA (striping information) in this object + * let's parse it and create in-core objects for the stripes + */ + buf->lb_buf = info->lti_ea_store; + buf->lb_len = info->lti_ea_store_size; + rc = lod_parse_striping(env, lo, buf); + if (rc == 0) + lo->ldo_comp_cached = 1; + } else if (S_ISDIR(lod2lu_obj(lo)->lo_header->loh_attr)) { + rc = lod_get_lmv_ea(env, lo); + if (rc < (typeof(rc))sizeof(struct lmv_mds_md_v1)) { + /* Let's set stripe_loaded to avoid further + * stripe loading especially for non-stripe directory, + * which can hurt performance. (See LU-9840) + */ + if (rc == 0) + lo->ldo_dir_stripe_loaded = 1; + GOTO(unlock, rc = rc > 0 ? -EINVAL : rc); + } + buf->lb_buf = info->lti_ea_store; + buf->lb_len = info->lti_ea_store_size; + if (rc == sizeof(struct lmv_mds_md_v1)) { + rc = lod_load_lmv_shards(env, lo, buf, true); + if (buf->lb_buf != info->lti_ea_store) { + OBD_FREE_LARGE(info->lti_ea_store, + info->lti_ea_store_size); + info->lti_ea_store = buf->lb_buf; + info->lti_ea_store_size = buf->lb_len; + } + + if (rc < 0) + GOTO(unlock, rc); + } + + /* + * there is LMV EA (striping information) in this object + * let's parse it and create in-core objects for the stripes + */ + rc = lod_parse_dir_striping(env, lo, buf); + if (rc == 0) + lo->ldo_dir_stripe_loaded = 1; + } + EXIT; +unlock: + mutex_unlock(&lo->ldo_layout_mutex); + + return rc; +} + +int lod_striping_reload(const struct lu_env *env, struct lod_object *lo, + const struct lu_buf *buf) +{ + int rc; + + ENTRY; + + mutex_lock(&lo->ldo_layout_mutex); + lod_striping_free_nolock(env, lo); + rc = lod_parse_striping(env, lo, buf); + mutex_unlock(&lo->ldo_layout_mutex); - /* - * there is LOV EA (striping information) in this object - * let's parse it and create in-core objects for the stripes - */ - info->lti_buf.lb_buf = info->lti_ea_store; - info->lti_buf.lb_len = info->lti_ea_store_size; - rc = lod_parse_striping(env, lo, &info->lti_buf); -out: - dt_write_unlock(env, next); RETURN(rc); } -int lod_verify_striping(struct lod_device *d, const struct lu_buf *buf, - int specific) +/** + * Verify lov_user_md_v1/v3 striping. + * + * Check the validity of all fields including the magic, stripe size, + * stripe count, stripe offset and that the pool is present. Also check + * that each target index points to an existing target. The additional + * \a is_from_disk turns additional checks. In some cases zero fields + * are allowed (like pattern=0). + * + * \param[in] d LOD device + * \param[in] buf buffer with LOV EA to verify + * \param[in] is_from_disk 0 - from user, allow some fields to be 0 + * 1 - from disk, do not allow + * + * \retval 0 if the striping is valid + * \retval -EINVAL if striping is invalid + */ +static int lod_verify_v1v3(struct lod_device *d, const struct lu_buf *buf, + bool is_from_disk) { struct lov_user_md_v1 *lum; - struct lov_user_md_v3 *v3 = NULL; + struct lov_user_md_v3 *lum3; struct pool_desc *pool = NULL; - int rc; + __u32 magic; + __u32 stripe_size; + __u16 stripe_count; + __u16 stripe_offset; + size_t lum_size; + int rc = 0; ENTRY; lum = buf->lb_buf; - if (lum->lmm_magic != LOV_USER_MAGIC_V1 && - lum->lmm_magic != LOV_USER_MAGIC_V3 && - lum->lmm_magic != LOV_MAGIC_V1_DEF && - lum->lmm_magic != LOV_MAGIC_V3_DEF) { - CDEBUG(D_IOCTL, "bad userland LOV MAGIC: %#x\n", - lum->lmm_magic); - RETURN(-EINVAL); + if (buf->lb_len < sizeof(*lum)) { + CDEBUG(D_LAYOUT, "buf len %zu too small for lov_user_md\n", + buf->lb_len); + GOTO(out, rc = -EINVAL); } - if ((specific && lum->lmm_pattern != LOV_PATTERN_RAID0) || - (specific == 0 && lum->lmm_pattern != 0)) { - CDEBUG(D_IOCTL, "bad userland stripe pattern: %#x\n", - lum->lmm_pattern); - RETURN(-EINVAL); + magic = le32_to_cpu(lum->lmm_magic) & ~LOV_MAGIC_DEFINED; + if (magic != LOV_USER_MAGIC_V1 && + magic != LOV_USER_MAGIC_V3 && + magic != LOV_USER_MAGIC_SPECIFIC) { + CDEBUG(D_LAYOUT, "bad userland LOV MAGIC: %#x\n", + le32_to_cpu(lum->lmm_magic)); + GOTO(out, rc = -EINVAL); + } + + /* the user uses "0" for default stripe pattern normally. */ + if (!is_from_disk && lum->lmm_pattern == LOV_PATTERN_NONE) + lum->lmm_pattern = cpu_to_le32(LOV_PATTERN_RAID0); + + if (!lov_pattern_supported(le32_to_cpu(lum->lmm_pattern))) { + CDEBUG(D_LAYOUT, "bad userland stripe pattern: %#x\n", + le32_to_cpu(lum->lmm_pattern)); + GOTO(out, rc = -EINVAL); } + /* a released lum comes from creating orphan on hsm release, + * doesn't make sense to verify it. */ + if (le32_to_cpu(lum->lmm_pattern) & LOV_PATTERN_F_RELEASED) + GOTO(out, rc = 0); + /* 64kB is the largest common page size we see (ia64), and matches the * check in lfs */ - if (lum->lmm_stripe_size & (LOV_MIN_STRIPE_SIZE - 1)) { - CDEBUG(D_IOCTL, "stripe size %u not multiple of %u, fixing\n", - lum->lmm_stripe_size, LOV_MIN_STRIPE_SIZE); - RETURN(-EINVAL); + stripe_size = le32_to_cpu(lum->lmm_stripe_size); + if (stripe_size & (LOV_MIN_STRIPE_SIZE - 1)) { + CDEBUG(D_LAYOUT, "stripe size %u not a multiple of %u\n", + stripe_size, LOV_MIN_STRIPE_SIZE); + GOTO(out, rc = -EINVAL); } - /* an offset of -1 is treated as a "special" valid offset */ - if (lum->lmm_stripe_offset != (typeof(lum->lmm_stripe_offset))(-1)) { + stripe_offset = le16_to_cpu(lum->lmm_stripe_offset); + if (!is_from_disk && stripe_offset != LOV_OFFSET_DEFAULT && + lov_pattern(le32_to_cpu(lum->lmm_pattern)) != LOV_PATTERN_MDT) { /* if offset is not within valid range [0, osts_size) */ - if (lum->lmm_stripe_offset >= d->lod_osts_size) { - CDEBUG(D_IOCTL, "stripe offset %u >= bitmap size %u\n", - lum->lmm_stripe_offset, d->lod_osts_size); - RETURN(-EINVAL); + if (stripe_offset >= d->lod_osts_size) { + CDEBUG(D_LAYOUT, "stripe offset %u >= bitmap size %u\n", + stripe_offset, d->lod_osts_size); + GOTO(out, rc = -EINVAL); } /* if lmm_stripe_offset is *not* in bitmap */ - if (!cfs_bitmap_check(d->lod_ost_bitmap, - lum->lmm_stripe_offset)) { - CDEBUG(D_IOCTL, "stripe offset %u not in bitmap\n", - lum->lmm_stripe_offset); - RETURN(-EINVAL); + if (!cfs_bitmap_check(d->lod_ost_bitmap, stripe_offset)) { + CDEBUG(D_LAYOUT, "stripe offset %u not in bitmap\n", + stripe_offset); + GOTO(out, rc = -EINVAL); } } - if (lum->lmm_magic == LOV_USER_MAGIC_V3) - v3 = buf->lb_buf; + if (magic == LOV_USER_MAGIC_V1) + lum_size = offsetof(struct lov_user_md_v1, + lmm_objects[0]); + else if (magic == LOV_USER_MAGIC_V3 || magic == LOV_USER_MAGIC_SPECIFIC) + lum_size = offsetof(struct lov_user_md_v3, + lmm_objects[0]); + else + GOTO(out, rc = -EINVAL); - if (v3) - pool = lod_find_pool(d, v3->lmm_pool_name); + stripe_count = le16_to_cpu(lum->lmm_stripe_count); + if (buf->lb_len < lum_size) { + CDEBUG(D_LAYOUT, "invalid buf len %zu/%zu for lov_user_md with " + "magic %#x and stripe_count %u\n", + buf->lb_len, lum_size, magic, stripe_count); + GOTO(out, rc = -EINVAL); + } - if (pool != NULL) { - __u16 offs = v3->lmm_stripe_offset; + if (!(magic == LOV_USER_MAGIC_V3 || magic == LOV_USER_MAGIC_SPECIFIC)) + goto out; + + lum3 = buf->lb_buf; + /* In the function below, .hs_keycmp resolves to + * pool_hashkey_keycmp() */ + /* coverity[overrun-buffer-val] */ + pool = lod_find_pool(d, lum3->lmm_pool_name); + if (pool == NULL) + goto out; + + if (!is_from_disk && stripe_offset != LOV_OFFSET_DEFAULT) { + rc = lod_check_index_in_pool(stripe_offset, pool); + if (rc < 0) + GOTO(out, rc = -EINVAL); + } - if (offs != (typeof(v3->lmm_stripe_offset))(-1)) { - rc = lod_check_index_in_pool(offs, pool); - if (rc < 0) { - lod_pool_putref(pool); + if (is_from_disk && stripe_count > pool_tgt_count(pool)) { + CDEBUG(D_LAYOUT, "stripe count %u > # OSTs %u in the pool\n", + stripe_count, pool_tgt_count(pool)); + GOTO(out, rc = -EINVAL); + } + +out: + if (pool != NULL) + lod_pool_putref(pool); + + RETURN(rc); +} + +static inline +struct lov_comp_md_entry_v1 *comp_entry_v1(struct lov_comp_md_v1 *comp, int i) +{ + LASSERTF((le32_to_cpu(comp->lcm_magic) & ~LOV_MAGIC_DEFINED) == + LOV_USER_MAGIC_COMP_V1, "Wrong magic %x\n", + le32_to_cpu(comp->lcm_magic)); + LASSERTF(i >= 0 && i < le16_to_cpu(comp->lcm_entry_count), + "bad index %d, max = %d\n", + i, le16_to_cpu(comp->lcm_entry_count)); + + return &comp->lcm_entries[i]; +} + +#define for_each_comp_entry_v1(comp, entry) \ + for (entry = comp_entry_v1(comp, 0); \ + entry <= comp_entry_v1(comp, \ + le16_to_cpu(comp->lcm_entry_count) - 1); \ + entry++) + +int lod_erase_dom_stripe(struct lov_comp_md_v1 *comp_v1) +{ + struct lov_comp_md_entry_v1 *ent, *dom_ent; + __u16 entries; + __u32 dom_off, dom_size, comp_size; + void *blob_src, *blob_dst; + unsigned int blob_size, blob_shift; + + entries = le16_to_cpu(comp_v1->lcm_entry_count) - 1; + /* if file has only DoM stripe return just error */ + if (entries == 0) + return -EFBIG; + + comp_size = le32_to_cpu(comp_v1->lcm_size); + dom_ent = &comp_v1->lcm_entries[0]; + dom_off = le32_to_cpu(dom_ent->lcme_offset); + dom_size = le32_to_cpu(dom_ent->lcme_size); + + /* shift entries array first */ + comp_v1->lcm_entry_count = cpu_to_le16(entries); + memmove(dom_ent, dom_ent + 1, + entries * sizeof(struct lov_comp_md_entry_v1)); + + /* now move blob of layouts */ + blob_dst = (void *)comp_v1 + dom_off - sizeof(*dom_ent); + blob_src = (void *)comp_v1 + dom_off + dom_size; + blob_size = (unsigned long)((void *)comp_v1 + comp_size - blob_src); + blob_shift = sizeof(*dom_ent) + dom_size; + + memmove(blob_dst, blob_src, blob_size); + + for_each_comp_entry_v1(comp_v1, ent) { + __u32 off; + + off = le32_to_cpu(ent->lcme_offset); + ent->lcme_offset = cpu_to_le32(off - blob_shift); + } + + comp_v1->lcm_size = cpu_to_le32(comp_size - blob_shift); + + /* notify a caller to re-check entry */ + return -ERESTART; +} + +int lod_fix_dom_stripe(struct lod_device *d, struct lov_comp_md_v1 *comp_v1) +{ + struct lov_comp_md_entry_v1 *ent, *dom_ent; + struct lu_extent *dom_ext, *ext; + struct lov_user_md_v1 *lum; + __u32 stripe_size; + __u16 mid, dom_mid; + int rc = 0; + + dom_ent = &comp_v1->lcm_entries[0]; + dom_ext = &dom_ent->lcme_extent; + dom_mid = mirror_id_of(le32_to_cpu(dom_ent->lcme_id)); + stripe_size = d->lod_dom_max_stripesize; + + lum = (void *)comp_v1 + le32_to_cpu(dom_ent->lcme_offset); + CDEBUG(D_LAYOUT, "DoM component size %u was bigger than MDT limit %u, " + "new size is %u\n", le32_to_cpu(lum->lmm_stripe_size), + d->lod_dom_max_stripesize, stripe_size); + lum->lmm_stripe_size = cpu_to_le32(stripe_size); + + for_each_comp_entry_v1(comp_v1, ent) { + if (ent == dom_ent) + continue; + + mid = mirror_id_of(le32_to_cpu(ent->lcme_id)); + if (mid != dom_mid) + continue; + + ext = &ent->lcme_extent; + if (ext->e_start != dom_ext->e_end) + continue; + + /* Found next component after the DoM one with the same + * mirror_id and adjust its start with DoM component end. + * + * NOTE: we are considering here that there can be only one + * DoM component in a file, all replicas are located on OSTs + * always and don't need adjustment since use own layouts. + */ + ext->e_start = cpu_to_le64(stripe_size); + break; + } + + if (stripe_size == 0) { + /* DoM component size is zero due to server setting, + * remove it from the layout */ + rc = lod_erase_dom_stripe(comp_v1); + } else { + /* Update DoM extent end finally */ + dom_ext->e_end = cpu_to_le64(stripe_size); + } + + return rc; +} + +/** + * Verify LOV striping. + * + * \param[in] d LOD device + * \param[in] buf buffer with LOV EA to verify + * \param[in] is_from_disk 0 - from user, allow some fields to be 0 + * 1 - from disk, do not allow + * \param[in] start extent start for composite layout + * + * \retval 0 if the striping is valid + * \retval -EINVAL if striping is invalid + */ +int lod_verify_striping(struct lod_device *d, struct lod_object *lo, + const struct lu_buf *buf, bool is_from_disk) +{ + struct lov_desc *desc = &d->lod_desc; + struct lov_user_md_v1 *lum; + struct lov_comp_md_v1 *comp_v1; + struct lov_comp_md_entry_v1 *ent; + struct lu_extent *ext; + struct lu_buf tmp; + __u64 prev_end = 0; + __u32 stripe_size = 0; + __u16 prev_mid = -1, mirror_id = -1; + __u32 mirror_count; + __u32 magic; + int rc = 0; + ENTRY; + + lum = buf->lb_buf; + + if (buf->lb_len < sizeof(*lum)) { + CDEBUG(D_LAYOUT, "buf len %zu too small for lov_user_md\n", + buf->lb_len); + RETURN(-EINVAL); + } + + magic = le32_to_cpu(lum->lmm_magic) & ~LOV_MAGIC_DEFINED; + if (magic != LOV_USER_MAGIC_V1 && + magic != LOV_USER_MAGIC_V3 && + magic != LOV_USER_MAGIC_SPECIFIC && + magic != LOV_USER_MAGIC_COMP_V1) { + CDEBUG(D_LAYOUT, "bad userland LOV MAGIC: %#x\n", + le32_to_cpu(lum->lmm_magic)); + RETURN(-EINVAL); + } + + if (magic != LOV_USER_MAGIC_COMP_V1) + RETURN(lod_verify_v1v3(d, buf, is_from_disk)); + + /* magic == LOV_USER_MAGIC_COMP_V1 */ + comp_v1 = buf->lb_buf; + if (buf->lb_len < le32_to_cpu(comp_v1->lcm_size)) { + CDEBUG(D_LAYOUT, "buf len %zu is less than %u\n", + buf->lb_len, le32_to_cpu(comp_v1->lcm_size)); + RETURN(-EINVAL); + } + +recheck: + mirror_count = 0; + if (le16_to_cpu(comp_v1->lcm_entry_count) == 0) { + CDEBUG(D_LAYOUT, "entry count is zero\n"); + RETURN(-EINVAL); + } + + if (S_ISREG(lod2lu_obj(lo)->lo_header->loh_attr) && + lo->ldo_comp_cnt > 0) { + /* could be called from lustre.lov.add */ + __u32 cnt = lo->ldo_comp_cnt; + + ext = &lo->ldo_comp_entries[cnt - 1].llc_extent; + prev_end = ext->e_end; + + ++mirror_count; + } + + for_each_comp_entry_v1(comp_v1, ent) { + ext = &ent->lcme_extent; + + if (le64_to_cpu(ext->e_start) >= le64_to_cpu(ext->e_end)) { + CDEBUG(D_LAYOUT, "invalid extent "DEXT"\n", + le64_to_cpu(ext->e_start), + le64_to_cpu(ext->e_end)); + RETURN(-EINVAL); + } + + if (is_from_disk) { + /* lcme_id contains valid value */ + if (le32_to_cpu(ent->lcme_id) == 0 || + le32_to_cpu(ent->lcme_id) > LCME_ID_MAX) { + CDEBUG(D_LAYOUT, "invalid id %u\n", + le32_to_cpu(ent->lcme_id)); RETURN(-EINVAL); } + + if (le16_to_cpu(comp_v1->lcm_mirror_count) > 0) { + mirror_id = mirror_id_of( + le32_to_cpu(ent->lcme_id)); + + /* first component must start with 0 */ + if (mirror_id != prev_mid && + le64_to_cpu(ext->e_start) != 0) { + CDEBUG(D_LAYOUT, + "invalid start:%llu, expect:0\n", + le64_to_cpu(ext->e_start)); + RETURN(-EINVAL); + } + + prev_mid = mirror_id; + } + } + + if (le64_to_cpu(ext->e_start) == 0) { + ++mirror_count; + prev_end = 0; } - if (specific && lum->lmm_stripe_count > pool_tgt_count(pool)) { - CDEBUG(D_IOCTL, - "stripe count %u > # OSTs %u in the pool\n", - lum->lmm_stripe_count, pool_tgt_count(pool)); - lod_pool_putref(pool); + /* the next must be adjacent with the previous one */ + if (le64_to_cpu(ext->e_start) != prev_end) { + CDEBUG(D_LAYOUT, + "invalid start actual:%llu, expect:%llu\n", + le64_to_cpu(ext->e_start), prev_end); RETURN(-EINVAL); } - lod_pool_putref(pool); + tmp.lb_buf = (char *)comp_v1 + le32_to_cpu(ent->lcme_offset); + tmp.lb_len = le32_to_cpu(ent->lcme_size); + + /* Check DoM entry is always the first one */ + lum = tmp.lb_buf; + if (lov_pattern(le32_to_cpu(lum->lmm_pattern)) == + LOV_PATTERN_MDT) { + /* DoM component can be only the first stripe */ + if (le64_to_cpu(ext->e_start) > 0) { + CDEBUG(D_LAYOUT, "invalid DoM component " + "with %llu extent start\n", + le64_to_cpu(ext->e_start)); + RETURN(-EINVAL); + } + stripe_size = le32_to_cpu(lum->lmm_stripe_size); + /* There is just one stripe on MDT and it must + * cover whole component size. */ + if (stripe_size != le64_to_cpu(ext->e_end)) { + CDEBUG(D_LAYOUT, "invalid DoM layout " + "stripe size %u != %llu " + "(component size)\n", + stripe_size, prev_end); + RETURN(-EINVAL); + } + /* Check stripe size againts per-MDT limit */ + if (stripe_size > d->lod_dom_max_stripesize) { + CDEBUG(D_LAYOUT, "DoM component size " + "%u is bigger than MDT limit %u, check " + "dom_max_stripesize parameter\n", + stripe_size, d->lod_dom_max_stripesize); + rc = lod_fix_dom_stripe(d, comp_v1); + if (rc == -ERESTART) { + /* DoM entry was removed, re-check + * new layout from start */ + goto recheck; + } else if (rc) { + RETURN(rc); + } + } + } + + prev_end = le64_to_cpu(ext->e_end); + + rc = lod_verify_v1v3(d, &tmp, is_from_disk); + if (rc) + RETURN(rc); + + if (prev_end == LUSTRE_EOF) + continue; + + /* extent end must be aligned with the stripe_size */ + stripe_size = le32_to_cpu(lum->lmm_stripe_size); + if (stripe_size == 0) + stripe_size = desc->ld_default_stripe_size; + if (stripe_size == 0 || (prev_end & (stripe_size - 1))) { + CDEBUG(D_LAYOUT, "stripe size isn't aligned, " + "stripe_sz: %u, [%llu, %llu)\n", + stripe_size, ext->e_start, prev_end); + RETURN(-EINVAL); + } } + /* make sure that the mirror_count is telling the truth */ + if (mirror_count != le16_to_cpu(comp_v1->lcm_mirror_count) + 1) + RETURN(-EINVAL); + RETURN(0); } +/** + * set the default stripe size, if unset. + * + * \param[in,out] val number of bytes per OST stripe + * + * The minimum stripe size is 64KB to ensure that a single stripe is an + * even multiple of a client PAGE_SIZE (IA64, PPC, etc). Otherwise, it + * is difficult to split dirty pages across OSCs during writes. + */ void lod_fix_desc_stripe_size(__u64 *val) { - if (*val < LOV_DEFAULT_STRIPE_SIZE) { - LCONSOLE_WARN("Increasing default stripe size to min %u\n", - LOV_DEFAULT_STRIPE_SIZE); - *val = LOV_DEFAULT_STRIPE_SIZE; + if (*val < LOV_MIN_STRIPE_SIZE) { + if (*val != 0) + LCONSOLE_INFO("Increasing default stripe size to " + "minimum value %u\n", + LOV_DESC_STRIPE_SIZE_DEFAULT); + *val = LOV_DESC_STRIPE_SIZE_DEFAULT; } else if (*val & (LOV_MIN_STRIPE_SIZE - 1)) { *val &= ~(LOV_MIN_STRIPE_SIZE - 1); - LCONSOLE_WARN("Changing default stripe size to "LPU64" (a " + LCONSOLE_WARN("Changing default stripe size to %llu (a " "multiple of %u)\n", *val, LOV_MIN_STRIPE_SIZE); } } +/** + * set the filesystem default number of stripes, if unset. + * + * \param[in,out] val number of stripes + * + * A value of "0" means "use the system-wide default stripe count", which + * has either been inherited by now, or falls back to 1 stripe per file. + * A value of "-1" (0xffffffff) means "stripe over all available OSTs", + * and is a valid value, so is left unchanged here. + */ void lod_fix_desc_stripe_count(__u32 *val) { if (*val == 0) *val = 1; } +/** + * set the filesystem default layout pattern + * + * \param[in,out] val LOV_PATTERN_* layout + * + * A value of "0" means "use the system-wide default layout type", which + * has either been inherited by now, or falls back to plain RAID0 striping. + */ void lod_fix_desc_pattern(__u32 *val) { /* from lov_setstripe */ - if ((*val != 0) && (*val != LOV_PATTERN_RAID0)) { + if ((*val != 0) && (*val != LOV_PATTERN_RAID0) && + (*val != LOV_PATTERN_MDT)) { LCONSOLE_WARN("Unknown stripe pattern: %#x\n", *val); *val = 0; } @@ -925,9 +2038,14 @@ void lod_fix_desc_qos_maxage(__u32 *val) { /* fix qos_maxage */ if (*val == 0) - *val = QOS_DEFAULT_MAXAGE; + *val = LOV_DESC_QOS_MAXAGE_DEFAULT; } +/** + * Used to fix insane default striping. + * + * \param[in] desc striping description + */ void lod_fix_desc(struct lov_desc *desc) { lod_fix_desc_stripe_size(&desc->ld_default_stripe_size); @@ -936,6 +2054,15 @@ void lod_fix_desc(struct lov_desc *desc) lod_fix_desc_qos_maxage(&desc->ld_qos_maxage); } +/** + * Initialize the structures used to store pools and default striping. + * + * \param[in] lod LOD device + * \param[in] lcfg configuration structure storing default striping. + * + * \retval 0 if initialization succeeds + * \retval negative error number on failure + */ int lod_pools_init(struct lod_device *lod, struct lustre_cfg *lcfg) { struct obd_device *obd; @@ -980,7 +2107,7 @@ int lod_pools_init(struct lod_device *lod, struct lustre_cfg *lcfg) lod->lod_sp_me = LUSTRE_SP_CLI; /* Set up allocation policy (QoS and RR) */ - CFS_INIT_LIST_HEAD(&lod->lod_qos.lq_oss_list); + INIT_LIST_HEAD(&lod->lod_qos.lq_oss_list); init_rwsem(&lod->lod_qos.lq_rw_sem); lod->lod_qos.lq_dirty = 1; lod->lod_qos.lq_rr.lqr_dirty = 1; @@ -989,11 +2116,6 @@ int lod_pools_init(struct lod_device *lod, struct lustre_cfg *lcfg) lod->lod_qos.lq_prio_free = 232; /* Default threshold for rr (roughly 17%) */ lod->lod_qos.lq_threshold_rr = 43; - /* Init statfs fields */ - OBD_ALLOC_PTR(lod->lod_qos.lq_statfs_data); - if (NULL == lod->lod_qos.lq_statfs_data) - RETURN(-ENOMEM); - cfs_waitq_init(&lod->lod_qos.lq_statfs_waitq); /* Set up OST pool environment */ lod->lod_pools_hash_body = cfs_hash_create("POOLS", HASH_POOLS_CUR_BITS, @@ -1003,13 +2125,15 @@ int lod_pools_init(struct lod_device *lod, struct lustre_cfg *lcfg) CFS_HASH_MAX_THETA, &pool_hash_operations, CFS_HASH_DEFAULT); - if (!lod->lod_pools_hash_body) - GOTO(out_statfs, rc = -ENOMEM); - CFS_INIT_LIST_HEAD(&lod->lod_pool_list); + if (lod->lod_pools_hash_body == NULL) + RETURN(-ENOMEM); + + INIT_LIST_HEAD(&lod->lod_pool_list); lod->lod_pool_count = 0; rc = lod_ost_pool_init(&lod->lod_pool_info, 0); if (rc) GOTO(out_hash, rc); + lod_qos_rr_init(&lod->lod_qos.lq_rr); rc = lod_ost_pool_init(&lod->lod_qos.lq_rr.lqr_pool, 0); if (rc) GOTO(out_pool_info, rc); @@ -1020,29 +2144,35 @@ out_pool_info: lod_ost_pool_free(&lod->lod_pool_info); out_hash: cfs_hash_putref(lod->lod_pools_hash_body); -out_statfs: - OBD_FREE_PTR(lod->lod_qos.lq_statfs_data); + return rc; } +/** + * Release the structures describing the pools. + * + * \param[in] lod LOD device from which we release the structures + * + * \retval 0 always + */ int lod_pools_fini(struct lod_device *lod) { struct obd_device *obd = lod2obd(lod); - cfs_list_t *pos, *tmp; - struct pool_desc *pool; + struct pool_desc *pool, *tmp; ENTRY; - cfs_list_for_each_safe(pos, tmp, &lod->lod_pool_list) { - pool = cfs_list_entry(pos, struct pool_desc, pool_list); + list_for_each_entry_safe(pool, tmp, &lod->lod_pool_list, pool_list) { /* free pool structs */ CDEBUG(D_INFO, "delete pool %p\n", pool); + /* In the function below, .hs_keycmp resolves to + * pool_hashkey_keycmp() */ + /* coverity[overrun-buffer-val] */ lod_pool_del(obd, pool->pool_name); } cfs_hash_putref(lod->lod_pools_hash_body); lod_ost_pool_free(&(lod->lod_qos.lq_rr.lqr_pool)); lod_ost_pool_free(&lod->lod_pool_info); - OBD_FREE_PTR(lod->lod_qos.lq_statfs_data); + RETURN(0); } -