lustre/obdclass/mea.c

   1 /* -*- mode: c; c-basic-offset: 8; indent-tabs-mode: nil; -*-
   2  * vim:expandtab:shiftwidth=8:tabstop=8:
   3  *
   4  * Copyright (C) 2002, 2003 Cluster File Systems, Inc.
   5  *
   6  *   This file is part of Lustre, http://www.lustre.org.
   7  *
   8  *   Lustre is free software; you can redistribute it and/or
   9  *   modify it under the terms of version 2 of the GNU General Public
  10  *   License as published by the Free Software Foundation.
  11  *
  12  *   Lustre is distributed in the hope that it will be useful,
  13  *   but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  *   GNU General Public License for more details.
  16  *
  17  *   You should have received a copy of the GNU General Public License
  18  *   along with Lustre; if not, write to the Free Software
  19  *   Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  20  */
  21
  22 #define DEBUG_SUBSYSTEM S_CLASS
  23 #ifdef __KERNEL__
  24 #include <linux/kmod.h>   /* for request_module() */
  25 #include <linux/module.h>
  26 #include <obd_class.h>
  27 #include <linux/random.h>
  28 #include <linux/slab.h>
  29 #include <linux/pagemap.h>
  30 #else
  31 #include <liblustre.h>
  32 #include <obd_class.h>
  33 #include <obd.h>
  34 #endif
  35 #include <lprocfs_status.h>
  36 #include <lustre/lustre_idl.h>
  37
  38 #ifdef __KERNEL__
  39 #include <linux/jbd.h>
  40 /* LDISKFS_SB() */
  41 #include <linux/ldiskfs_fs.h>
  42 #endif
  43 static int mea_last_char_hash(int count, char *name, int namelen)
  44 {
  45         unsigned int c;
  46
  47         c = name[namelen - 1];
  48         if (c == 0)
  49                 CWARN("looks like wrong len is passed\n");
  50         c = c % count;
  51         return c;
  52 }
  53
  54 static int mea_all_chars_hash(int count, char *name, int namelen)
  55 {
  56         unsigned int c = 0;
  57
  58         while (--namelen >= 0)
  59                 c += name[namelen];
  60         c = c % count;
  61         return c;
  62 }
  63
  64 #ifdef __KERNEL__
  65 /* This hash calculate method must be same as the lvar hash method */
  66
  67 #define LVAR_HASH_TEA    (0)
  68 #define LVAR_HASH_R5     (1)
  69 #define LVAR_HASH_PREFIX (0)
  70
  71 static __u32 hash_build(char *name, int namelen)
  72 {
  73         __u32 result;
  74
  75         if (namelen == 0)
  76                 return 0;
  77         if (strncmp(name, ".", 1) == 0 && namelen == 1)
  78                 return 2;
  79         if (strncmp(name, "..", 2) == 0 && namelen == 2)
  80                 return 4;
  81
  82         if (LVAR_HASH_PREFIX) {
  83                 result = 0;
  84                 strncpy((void *)&result,
  85                         name, min(namelen, (int)sizeof result));
  86         } else {
  87                 struct ldiskfs_dx_hash_info hinfo;
  88
  89                 if (LVAR_HASH_TEA)
  90                         hinfo.hash_version = LDISKFS_DX_HASH_TEA;
  91                 else
  92                         hinfo.hash_version = LDISKFS_DX_HASH_R5;
  93                 hinfo.seed = 0;
  94                 ldiskfsfs_dirhash(name, namelen, &hinfo);
  95                 result = hinfo.hash;
  96         }
  97
  98         return (result << 1) & 0x7fffffff;
  99 }
 100
 101 static int mea_hash_segment(int count, char *name, int namelen)
 102 {
 103         __u64 hash;
 104         __u64 hash_segment = MAX_HASH_SIZE;
 105
 106         hash = hash_build(name, namelen);
 107         do_div(hash_segment, count);
 108         do_div(hash, hash_segment);
 109         LASSERTF(hash <= count, "hash "LPU64" count %d \n", hash, count);
 110
 111         return hash;
 112 }
 113 #else
 114 static int mea_hash_segment(int count, char *name, int namelen)
 115 {
 116 #warning "fix for liblustre"
 117         return 0;
 118 }
 119 #endif
 120 int raw_name2idx(int hashtype, int count, const char *name, int namelen)
 121 {
 122         unsigned int c = 0;
 123
 124         LASSERT(namelen > 0);
 125         if (count <= 1)
 126                 return 0;
 127
 128         switch (hashtype) {
 129                 case MEA_MAGIC_LAST_CHAR:
 130                         c = mea_last_char_hash(count, (char *)name, namelen);
 131                         break;
 132                 case MEA_MAGIC_ALL_CHARS:
 133                         c = mea_all_chars_hash(count, (char *)name, namelen);
 134                         break;
 135                 case MEA_MAGIC_HASH_SEGMENT:
 136                         c = mea_hash_segment(count, (char *)name, namelen);
 137                         break;
 138                 default:
 139                         CERROR("Unknown hash type 0x%x\n", hashtype);
 140         }
 141
 142         return c;
 143 }
 144
 145 int mea_name2idx(struct lmv_stripe_md *mea, const char *name, int namelen)
 146 {
 147         unsigned int c;
 148
 149         LASSERT(mea && mea->mea_count);
 150
 151         c = raw_name2idx(mea->mea_magic, mea->mea_count, name, namelen);
 152
 153         LASSERT(c < mea->mea_count);
 154         return c;
 155 }
 156