Whamcloud - gitweb
61a6c292221d49bf28dad4137d088bb6913e5437
[fs/lustre-release.git] / 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 [sun.com URL with a
20  * copy of GPLv2].
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  2008 Sun Microsystems, Inc. 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/random.h>
43 #include <linux/slab.h>
44 #include <linux/pagemap.h>
45 #else
46 #include <liblustre.h>
47 #include <obd.h>
48 #endif
49 #include <lprocfs_status.h>
50 #include <lustre/lustre_idl.h>
51
52 #ifdef __KERNEL__
53 #include <linux/jbd.h>
54 #ifdef HAVE_SERVER_SUPPORT
55 /* LDISKFS_SB() */
56 #include <linux/ldiskfs_fs.h>
57 #endif
58 #endif
59 static int mea_last_char_hash(int count, char *name, int namelen)
60 {
61         unsigned int c;
62
63         c = name[namelen - 1];
64         if (c == 0)
65                 CWARN("looks like wrong len is passed\n");
66         c = c % count;
67         return c;
68 }
69
70 static int mea_all_chars_hash(int count, char *name, int namelen)
71 {
72         unsigned int c = 0;
73
74         while (--namelen >= 0)
75                 c += name[namelen];
76         c = c % count;
77         return c;
78 }
79
80 #ifdef __KERNEL__
81 /* This hash calculate method must be same as the lvar hash method */
82
83 #define LVAR_HASH_SANDWICH  (0)
84 #define LVAR_HASH_TEA       (1)
85 #define LVAR_HASH_R5        (0)
86 #define LVAR_HASH_PREFIX    (0)
87
88 static __u32 hash_build0(const char *name, int namelen)
89 {
90         __u32 result;
91
92         if (namelen == 0)
93                 return 0;
94         if (strncmp(name, ".", 1) == 0 && namelen == 1)
95                 return 1;
96         if (strncmp(name, "..", 2) == 0 && namelen == 2)
97                 return 2;
98
99         if (LVAR_HASH_PREFIX) {
100                 result = 0;
101                 strncpy((void *)&result,
102                         name, min(namelen, (int)sizeof result));
103         } else {
104                 struct ldiskfs_dx_hash_info hinfo;
105
106                 if (LVAR_HASH_TEA)
107                         hinfo.hash_version = LDISKFS_DX_HASH_TEA;
108                 else
109                         hinfo.hash_version = LDISKFS_DX_HASH_R5;
110                 hinfo.seed = 0;
111                 ldiskfsfs_dirhash(name, namelen, &hinfo);
112                 result = hinfo.hash;
113                 if (LVAR_HASH_SANDWICH) {
114                         __u32 result2;
115
116                         hinfo.hash_version = LDISKFS_DX_HASH_TEA;
117                         hinfo.seed = 0;
118                         ldiskfsfs_dirhash(name, namelen, &hinfo);
119                         result2 = hinfo.hash;
120                         result = (0xfc000000 & result2) | (0x03ffffff & result);
121                 }
122         }
123
124         return result;
125 }
126
127 enum {
128         HASH_GRAY_AREA = 1024
129 };
130
131 static __u32 hash_build(const char *name, int namelen)
132 {
133         __u32 hash;
134
135         hash = (hash_build0(name, namelen) << 1) & MAX_HASH_SIZE_32;
136         if (hash > MAX_HASH_SIZE_32 - HASH_GRAY_AREA)
137                 hash &= HASH_GRAY_AREA - 1;
138         return hash;
139 }
140
141 static int mea_hash_segment(int count, const char *name, int namelen)
142 {
143         __u32 hash;
144
145         LASSERT(IS_PO2(MAX_HASH_SIZE_32 + 1));
146
147         hash = hash_build(name, namelen) / (MAX_HASH_SIZE_32 / count);
148         LASSERTF(hash < count, "hash %x count %d \n", hash, count);
149
150         return hash;
151 }
152 #else
153 static int mea_hash_segment(int count, char *name, int namelen)
154 {
155         return 0;
156 }
157 #endif
158 int raw_name2idx(int hashtype, int count, const char *name, int namelen)
159 {
160         unsigned int c = 0;
161
162         LASSERT(namelen > 0);
163         if (count <= 1)
164                 return 0;
165
166         switch (hashtype) {
167                 case MEA_MAGIC_LAST_CHAR:
168                         c = mea_last_char_hash(count, (char *)name, namelen);
169                         break;
170                 case MEA_MAGIC_ALL_CHARS:
171                         c = mea_all_chars_hash(count, (char *)name, namelen);
172                         break;
173                 case MEA_MAGIC_HASH_SEGMENT:
174                         c = mea_hash_segment(count, (char *)name, namelen);
175                         break;
176                 default:
177                         CERROR("Unknown hash type 0x%x\n", hashtype);
178         }
179         
180         LASSERT(c < count);
181         return c;
182 }
183
184 int mea_name2idx(struct lmv_stripe_md *mea, const char *name, int namelen)
185 {
186         unsigned int c;
187
188         LASSERT(mea && mea->mea_count);
189
190         c = raw_name2idx(mea->mea_magic, mea->mea_count, name, namelen);
191
192         LASSERT(c < mea->mea_count);
193         return c;
194 }