lustre/fid/fid_store.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.gnu.org/licenses/gpl-2.0.html
  19  *
  20  * GPL HEADER END
  21  */
  22 /*
  23  * Copyright (c) 2007, 2010, Oracle and/or its affiliates. All rights reserved.
  24  * Use is subject to license terms.
  25  *
  26  * Copyright (c) 2011, 2014, Intel Corporation.
  27  */
  28 /*
  29  * This file is part of Lustre, http://www.lustre.org/
  30  * Lustre is a trademark of Sun Microsystems, Inc.
  31  *
  32  * lustre/fid/fid_store.c
  33  *
  34  * Lustre Sequence Manager
  35  *
  36  * Author: Yury Umanets <umka@clusterfs.com>
  37  */
  38
  39 #define DEBUG_SUBSYSTEM S_FID
  40
  41 #include <libcfs/libcfs.h>
  42 #include <dt_object.h>
  43 #include <obd_support.h>
  44 #include <lustre_fid.h>
  45 #include <lustre_fld.h>
  46 #include "fid_internal.h"
  47
  48 static struct lu_buf *seq_store_buf(struct seq_thread_info *info)
  49 {
  50         struct lu_buf *buf;
  51
  52         buf = &info->sti_buf;
  53         buf->lb_buf = &info->sti_space;
  54         buf->lb_len = sizeof(info->sti_space);
  55         return buf;
  56 }
  57
  58 struct seq_update_callback {
  59         struct dt_txn_commit_cb suc_cb;
  60         struct lu_server_seq   *suc_seq;
  61 };
  62
  63 void seq_update_cb(struct lu_env *env, struct thandle *th,
  64                    struct dt_txn_commit_cb *cb, int err)
  65 {
  66         struct seq_update_callback *ccb;
  67
  68         ccb = container_of0(cb, struct seq_update_callback, suc_cb);
  69
  70         LASSERT(ccb->suc_seq != NULL);
  71
  72         ccb->suc_seq->lss_need_sync = 0;
  73         OBD_FREE_PTR(ccb);
  74 }
  75
  76 int seq_update_cb_add(struct thandle *th, struct lu_server_seq *seq)
  77 {
  78         struct seq_update_callback *ccb;
  79         struct dt_txn_commit_cb    *dcb;
  80         int                        rc;
  81
  82         OBD_ALLOC_PTR(ccb);
  83         if (ccb == NULL)
  84                 return -ENOMEM;
  85
  86         ccb->suc_seq       = seq;
  87         seq->lss_need_sync = 1;
  88
  89         dcb            = &ccb->suc_cb;
  90         dcb->dcb_func  = seq_update_cb;
  91         INIT_LIST_HEAD(&dcb->dcb_linkage);
  92         strlcpy(dcb->dcb_name, "seq_update_cb", sizeof(dcb->dcb_name));
  93
  94         rc = dt_trans_cb_add(th, dcb);
  95         if (rc)
  96                 OBD_FREE_PTR(ccb);
  97         return rc;
  98 }
  99
 100 /* This function implies that caller takes care about locking. */
 101 int seq_store_update(const struct lu_env *env, struct lu_server_seq *seq,
 102                      struct lu_seq_range *out, int sync)
 103 {
 104         struct dt_device *dt_dev = lu2dt_dev(seq->lss_obj->do_lu.lo_dev);
 105         struct seq_thread_info *info;
 106         struct thandle *th;
 107         loff_t pos = 0;
 108         int rc;
 109
 110         info = lu_context_key_get(&env->le_ctx, &seq_thread_key);
 111         LASSERT(info != NULL);
 112
 113         th = dt_trans_create(env, dt_dev);
 114         if (IS_ERR(th))
 115                 RETURN(PTR_ERR(th));
 116
 117         /* Store ranges in le format. */
 118         range_cpu_to_le(&info->sti_space, &seq->lss_space);
 119
 120         rc = dt_declare_record_write(env, seq->lss_obj,
 121                                      seq_store_buf(info), 0, th);
 122         if (rc)
 123                 GOTO(exit, rc);
 124
 125         if (out != NULL) {
 126                 rc = fld_declare_server_create(env,
 127                                                seq->lss_site->ss_server_fld,
 128                                                out, th);
 129                 if (rc)
 130                         GOTO(exit, rc);
 131         }
 132
 133         rc = dt_trans_start_local(env, dt_dev, th);
 134         if (rc)
 135                 GOTO(exit, rc);
 136
 137         rc = dt_record_write(env, seq->lss_obj, seq_store_buf(info), &pos, th);
 138         if (rc) {
 139                 CERROR("%s: Can't write space data, rc %d\n",
 140                        seq->lss_name, rc);
 141                 GOTO(exit, rc);
 142         } else if (out != NULL) {
 143                 rc = fld_server_create(env, seq->lss_site->ss_server_fld, out,
 144                                        th);
 145                 if (rc) {
 146                         CERROR("%s: Can't Update fld database, rc %d\n",
 147                                 seq->lss_name, rc);
 148                         GOTO(exit, rc);
 149                 }
 150         }
 151         /* next sequence update will need sync until this update is committed
 152          * in case of sync operation this is not needed obviously */
 153         if (!sync)
 154                 /* if callback can't be added then sync always */
 155                 sync = !!seq_update_cb_add(th, seq);
 156
 157         th->th_sync |= sync;
 158 exit:
 159         dt_trans_stop(env, dt_dev, th);
 160         return rc;
 161 }
 162
 163 /*
 164  * This function implies that caller takes care about locking or locking is not
 165  * needed (init time).
 166  */
 167 int seq_store_read(struct lu_server_seq *seq,
 168                    const struct lu_env *env)
 169 {
 170         struct seq_thread_info *info;
 171         loff_t pos = 0;
 172         int rc;
 173         ENTRY;
 174
 175         info = lu_context_key_get(&env->le_ctx, &seq_thread_key);
 176         LASSERT(info != NULL);
 177
 178         rc = dt_read(env, seq->lss_obj, seq_store_buf(info), &pos);
 179
 180         if (rc == sizeof(info->sti_space)) {
 181                 range_le_to_cpu(&seq->lss_space, &info->sti_space);
 182                 CDEBUG(D_INFO, "%s: Space - "DRANGE"\n",
 183                        seq->lss_name, PRANGE(&seq->lss_space));
 184                 rc = 0;
 185         } else if (rc == 0) {
 186                 rc = -ENODATA;
 187         } else if (rc > 0) {
 188                 CERROR("%s: Read only %d bytes of %d\n", seq->lss_name,
 189                        rc, (int)sizeof(info->sti_space));
 190                 rc = -EIO;
 191         }
 192
 193         RETURN(rc);
 194 }
 195
 196 int seq_store_init(struct lu_server_seq *seq,
 197                    const struct lu_env *env,
 198                    struct dt_device *dt)
 199 {
 200         struct dt_object *dt_obj;
 201         struct lu_fid fid;
 202         struct lu_attr attr;
 203         struct dt_object_format dof;
 204         const char *name;
 205         int rc;
 206         ENTRY;
 207
 208         name = seq->lss_type == LUSTRE_SEQ_SERVER ?
 209                 LUSTRE_SEQ_SRV_NAME : LUSTRE_SEQ_CTL_NAME;
 210
 211         if (seq->lss_type == LUSTRE_SEQ_SERVER)
 212                 lu_local_obj_fid(&fid, FID_SEQ_SRV_OID);
 213         else
 214                 lu_local_obj_fid(&fid, FID_SEQ_CTL_OID);
 215
 216         memset(&attr, 0, sizeof(attr));
 217         attr.la_valid = LA_MODE;
 218         attr.la_mode = S_IFREG | 0666;
 219         dof.dof_type = DFT_REGULAR;
 220
 221         dt_obj = dt_find_or_create(env, dt, &fid, &dof, &attr);
 222         if (!IS_ERR(dt_obj)) {
 223                 seq->lss_obj = dt_obj;
 224                 rc = 0;
 225         } else {
 226                 CERROR("%s: Can't find \"%s\" obj %d\n",
 227                        seq->lss_name, name, (int)PTR_ERR(dt_obj));
 228                 rc = PTR_ERR(dt_obj);
 229         }
 230
 231         RETURN(rc);
 232 }
 233
 234 void seq_store_fini(struct lu_server_seq *seq,
 235                     const struct lu_env *env)
 236 {
 237         ENTRY;
 238
 239         if (seq->lss_obj != NULL) {
 240                 if (!IS_ERR(seq->lss_obj))
 241                         lu_object_put(env, &seq->lss_obj->do_lu);
 242                 seq->lss_obj = NULL;
 243         }
 244
 245         EXIT;
 246 }