lustre/obdclass/mea.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * GPL HEADER START
   5  *
   6  * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS FILE HEADER.
   7  *
   8  * This program is free software; you can redistribute it and/or modify
   9  * it under the terms of the GNU General Public License version 2 only,
  10  * as published by the Free Software Foundation.
  11  *
  12  * This program is distributed in the hope that it will be useful, but
  13  * WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * General Public License version 2 for more details (a copy is included
  16  * in the LICENSE file that accompanied this code).
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * version 2 along with this program; If not, see
  20  * http://www.sun.com/software/products/lustre/docs/GPLv2.pdf
  21  *
  22  * Please contact Sun Microsystems, Inc., 4150 Network Circle, Santa Clara,
  23  * CA 95054 USA or visit www.sun.com if you need additional information or
  24  * have any questions.
  25  *
  26  * GPL HEADER END
  27  */
  28 /*
  29  * Copyright (c) 2004, 2010, Oracle and/or its affiliates. All rights reserved.
  30  * Use is subject to license terms.
  31  */
  32 /*
  33  * This file is part of Lustre, http://www.lustre.org/
  34  * Lustre is a trademark of Sun Microsystems, Inc.
  35  */
  36
  37 #define DEBUG_SUBSYSTEM S_CLASS
  38 #include <obd_class.h>
  39 #ifdef __KERNEL__
  40 #include <linux/kmod.h>   /* for request_module() */
  41 #include <linux/module.h>
  42 #include <linux/slab.h>
  43 #include <linux/pagemap.h>
  44 #else
  45 #include <liblustre.h>
  46 #include <obd.h>
  47 #endif
  48 #include <lprocfs_status.h>
  49 #include <lustre/lustre_idl.h>
  50
  51 #ifdef __KERNEL__
  52
  53 #ifdef HAVE_SERVER_SUPPORT
  54
  55 #ifdef HAVE_EXT4_LDISKFS
  56 #include <ldiskfs/ldiskfs_jbd2.h>
  57 #include <ldiskfs/ldiskfs.h>
  58 #else
  59 #include <linux/jbd.h>
  60 #include <linux/ldiskfs_fs.h>
  61 #endif
  62
  63 #endif
  64 #endif
  65 static int mea_last_char_hash(int count, char *name, int namelen)
  66 {
  67         unsigned int c;
  68
  69         c = name[namelen - 1];
  70         if (c == 0)
  71                 CWARN("looks like wrong len is passed\n");
  72         c = c % count;
  73         return c;
  74 }
  75
  76 static int mea_all_chars_hash(int count, char *name, int namelen)
  77 {
  78         unsigned int c = 0;
  79
  80         while (--namelen >= 0)
  81                 c += name[namelen];
  82         c = c % count;
  83         return c;
  84 }
  85
  86 #ifdef __KERNEL__
  87 /* This hash calculate method must be same as the lvar hash method */
  88
  89 #define LVAR_HASH_SANDWICH  (0)
  90 #define LVAR_HASH_PREFIX    (0)
  91
  92 static __u32 hash_build0(const char *name, int namelen)
  93 {
  94         __u32 result;
  95
  96         if (namelen == 0)
  97                 return 0;
  98         if (strncmp(name, ".", 1) == 0 && namelen == 1)
  99                 return 1;
 100         if (strncmp(name, "..", 2) == 0 && namelen == 2)
 101                 return 2;
 102
 103         if (LVAR_HASH_PREFIX) {
 104                 result = 0;
 105                 strncpy((void *)&result,
 106                         name, min(namelen, (int)sizeof result));
 107         } else {
 108                 struct ldiskfs_dx_hash_info hinfo;
 109
 110                 hinfo.hash_version = LDISKFS_DX_HASH_TEA;
 111                 hinfo.seed = 0;
 112                 ldiskfsfs_dirhash(name, namelen, &hinfo);
 113                 result = hinfo.hash;
 114                 if (LVAR_HASH_SANDWICH) {
 115                         __u32 result2;
 116
 117                         hinfo.hash_version = LDISKFS_DX_HASH_TEA;
 118                         hinfo.seed = 0;
 119                         ldiskfsfs_dirhash(name, namelen, &hinfo);
 120                         result2 = hinfo.hash;
 121                         result = (0xfc000000 & result2) | (0x03ffffff & result);
 122                 }
 123         }
 124
 125         return result;
 126 }
 127
 128 enum {
 129         HASH_GRAY_AREA = 1024
 130 };
 131
 132 static __u32 hash_build(const char *name, int namelen)
 133 {
 134         __u32 hash;
 135
 136         hash = (hash_build0(name, namelen) << 1) & MAX_HASH_SIZE_32;
 137         if (hash > MAX_HASH_SIZE_32 - HASH_GRAY_AREA)
 138                 hash &= HASH_GRAY_AREA - 1;
 139         return hash;
 140 }
 141
 142 static int mea_hash_segment(int count, const char *name, int namelen)
 143 {
 144         __u32 hash;
 145
 146         LASSERT(IS_PO2(MAX_HASH_SIZE_32 + 1));
 147
 148         hash = hash_build(name, namelen) / (MAX_HASH_SIZE_32 / count);
 149         LASSERTF(hash < count, "hash %x count %d \n", hash, count);
 150
 151         return hash;
 152 }
 153 #else
 154 static int mea_hash_segment(int count, char *name, int namelen)
 155 {
 156         return 0;
 157 }
 158 #endif
 159 int raw_name2idx(int hashtype, int count, const char *name, int namelen)
 160 {
 161         unsigned int c = 0;
 162
 163         LASSERT(namelen > 0);
 164         if (count <= 1)
 165                 return 0;
 166
 167         switch (hashtype) {
 168                 case MEA_MAGIC_LAST_CHAR:
 169                         c = mea_last_char_hash(count, (char *)name, namelen);
 170                         break;
 171                 case MEA_MAGIC_ALL_CHARS:
 172                         c = mea_all_chars_hash(count, (char *)name, namelen);
 173                         break;
 174                 case MEA_MAGIC_HASH_SEGMENT:
 175                         c = mea_hash_segment(count, (char *)name, namelen);
 176                         break;
 177                 default:
 178                         CERROR("Unknown hash type 0x%x\n", hashtype);
 179         }
 180
 181         LASSERT(c < count);
 182         return c;
 183 }
 184
 185 int mea_name2idx(struct lmv_stripe_md *mea, const char *name, int namelen)
 186 {
 187         unsigned int c;
 188
 189         LASSERT(mea && mea->mea_count);
 190
 191         c = raw_name2idx(mea->mea_magic, mea->mea_count, name, namelen);
 192
 193         LASSERT(c < mea->mea_count);
 194         return c;
 195 }