2 * linux/fs/befs/btree.c
4 * Copyright (C) 2001-2002 Will Dyson <will_dyson@pobox.com>
6 * Licensed under the GNU GPL. See the file COPYING for details.
8 * 2002-02-05: Sergey S. Kostyliov added binary search within
13 * Dominic Giampaolo, author of "Practical File System
14 * Design with the Be File System", for such a helpful book.
16 * Marcus J. Ranum, author of the b+tree package in
17 * comp.sources.misc volume 10. This code is not copied from that
18 * work, but it is partially based on it.
20 * Makoto Kato, author of the original BeFS for linux filesystem
24 #include <linux/kernel.h>
25 #include <linux/string.h>
26 #include <linux/slab.h>
28 #include <linux/buffer_head.h>
32 #include "datastream.h"
35 * The btree functions in this file are built on top of the
36 * datastream.c interface, which is in turn built on top of the
40 /* Befs B+tree structure:
42 * The first thing in the tree is the tree superblock. It tells you
43 * all kinds of useful things about the tree, like where the rootnode
44 * is located, and the size of the nodes (always 1024 with current version
47 * The rest of the tree consists of a series of nodes. Nodes contain a header
48 * (struct befs_btree_nodehead), the packed key data, an array of shorts
49 * containing the ending offsets for each of the keys, and an array of
50 * befs_off_t values. In interior nodes, the keys are the ending keys for
51 * the childnode they point to, and the values are offsets into the
52 * datastream containing the tree.
57 * The book states 2 confusing things about befs b+trees. First,
58 * it states that the overflow field of node headers is used by internal nodes
59 * to point to another node that "effectively continues this one". Here is what
60 * I believe that means. Each key in internal nodes points to another node that
61 * contains key values less than itself. Inspection reveals that the last key
62 * in the internal node is not the last key in the index. Keys that are
63 * greater than the last key in the internal node go into the overflow node.
64 * I imagine there is a performance reason for this.
66 * Second, it states that the header of a btree node is sufficient to
67 * distinguish internal nodes from leaf nodes. Without saying exactly how.
68 * After figuring out the first, it becomes obvious that internal nodes have
69 * overflow nodes and leafnodes do not.
73 * Currently, this code is only good for directory B+trees.
74 * In order to be used for other BFS indexes, it needs to be extended to handle
75 * duplicate keys and non-string keytypes (int32, int64, float, double).
79 * In memory structure of each btree node
81 struct befs_btree_node
{
82 befs_host_btree_nodehead head
; /* head of node converted to cpu byteorder */
83 struct buffer_head
*bh
;
84 befs_btree_nodehead
*od_node
; /* on disk node */
88 static const befs_off_t BEFS_BT_INVAL
= 0xffffffffffffffffULL
;
91 static int befs_btree_seekleaf(struct super_block
*sb
, const befs_data_stream
*ds
,
92 befs_btree_super
* bt_super
,
93 struct befs_btree_node
*this_node
,
94 befs_off_t
* node_off
);
96 static int befs_bt_read_super(struct super_block
*sb
, const befs_data_stream
*ds
,
97 befs_btree_super
* sup
);
99 static int befs_bt_read_node(struct super_block
*sb
, const befs_data_stream
*ds
,
100 struct befs_btree_node
*node
,
101 befs_off_t node_off
);
103 static int befs_leafnode(struct befs_btree_node
*node
);
105 static fs16
*befs_bt_keylen_index(struct befs_btree_node
*node
);
107 static fs64
*befs_bt_valarray(struct befs_btree_node
*node
);
109 static char *befs_bt_keydata(struct befs_btree_node
*node
);
111 static int befs_find_key(struct super_block
*sb
,
112 struct befs_btree_node
*node
,
113 const char *findkey
, befs_off_t
* value
);
115 static char *befs_bt_get_key(struct super_block
*sb
,
116 struct befs_btree_node
*node
,
117 int index
, u16
* keylen
);
119 static int befs_compare_strings(const void *key1
, int keylen1
,
120 const void *key2
, int keylen2
);
123 * befs_bt_read_super() - read in btree superblock convert to cpu byteorder
124 * @sb: Filesystem superblock
125 * @ds: Datastream to read from
126 * @sup: Buffer in which to place the btree superblock
128 * Calls befs_read_datastream to read in the btree superblock and
129 * makes sure it is in cpu byteorder, byteswapping if necessary.
130 * Return: BEFS_OK on success and if *@sup contains the btree superblock in cpu
131 * byte order. Otherwise return BEFS_ERR on error.
134 befs_bt_read_super(struct super_block
*sb
, const befs_data_stream
*ds
,
135 befs_btree_super
* sup
)
137 struct buffer_head
*bh
;
138 befs_disk_btree_super
*od_sup
;
140 befs_debug(sb
, "---> %s", __func__
);
142 bh
= befs_read_datastream(sb
, ds
, 0, NULL
);
145 befs_error(sb
, "Couldn't read index header.");
148 od_sup
= (befs_disk_btree_super
*) bh
->b_data
;
149 befs_dump_index_entry(sb
, od_sup
);
151 sup
->magic
= fs32_to_cpu(sb
, od_sup
->magic
);
152 sup
->node_size
= fs32_to_cpu(sb
, od_sup
->node_size
);
153 sup
->max_depth
= fs32_to_cpu(sb
, od_sup
->max_depth
);
154 sup
->data_type
= fs32_to_cpu(sb
, od_sup
->data_type
);
155 sup
->root_node_ptr
= fs64_to_cpu(sb
, od_sup
->root_node_ptr
);
158 if (sup
->magic
!= BEFS_BTREE_MAGIC
) {
159 befs_error(sb
, "Index header has bad magic.");
163 befs_debug(sb
, "<--- %s", __func__
);
167 befs_debug(sb
, "<--- %s ERROR", __func__
);
172 * befs_bt_read_node - read in btree node and convert to cpu byteorder
173 * @sb: Filesystem superblock
174 * @ds: Datastream to read from
175 * @node: Buffer in which to place the btree node
176 * @node_off: Starting offset (in bytes) of the node in @ds
178 * Calls befs_read_datastream to read in the indicated btree node and
179 * makes sure its header fields are in cpu byteorder, byteswapping if
181 * Note: node->bh must be NULL when this function is called the first time.
182 * Don't forget brelse(node->bh) after last call.
184 * On success, returns BEFS_OK and *@node contains the btree node that
185 * starts at @node_off, with the node->head fields in cpu byte order.
187 * On failure, BEFS_ERR is returned.
191 befs_bt_read_node(struct super_block
*sb
, const befs_data_stream
*ds
,
192 struct befs_btree_node
*node
, befs_off_t node_off
)
196 befs_debug(sb
, "---> %s", __func__
);
201 node
->bh
= befs_read_datastream(sb
, ds
, node_off
, &off
);
203 befs_error(sb
, "%s failed to read "
204 "node at %llu", __func__
, node_off
);
205 befs_debug(sb
, "<--- %s ERROR", __func__
);
210 (befs_btree_nodehead
*) ((void *) node
->bh
->b_data
+ off
);
212 befs_dump_index_node(sb
, node
->od_node
);
214 node
->head
.left
= fs64_to_cpu(sb
, node
->od_node
->left
);
215 node
->head
.right
= fs64_to_cpu(sb
, node
->od_node
->right
);
216 node
->head
.overflow
= fs64_to_cpu(sb
, node
->od_node
->overflow
);
217 node
->head
.all_key_count
=
218 fs16_to_cpu(sb
, node
->od_node
->all_key_count
);
219 node
->head
.all_key_length
=
220 fs16_to_cpu(sb
, node
->od_node
->all_key_length
);
222 befs_debug(sb
, "<--- %s", __func__
);
227 * befs_btree_find - Find a key in a befs B+tree
228 * @sb: Filesystem superblock
229 * @ds: Datastream containing btree
230 * @key: Key string to lookup in btree
231 * @value: Value stored with @key
233 * On success, returns BEFS_OK and sets *@value to the value stored
234 * with @key (usually the disk block number of an inode).
236 * On failure, returns BEFS_ERR or BEFS_BT_NOT_FOUND.
239 * Read the superblock and rootnode of the b+tree.
240 * Drill down through the interior nodes using befs_find_key().
241 * Once at the correct leaf node, use befs_find_key() again to get the
242 * actual value stored with the key.
245 befs_btree_find(struct super_block
*sb
, const befs_data_stream
*ds
,
246 const char *key
, befs_off_t
* value
)
248 struct befs_btree_node
*this_node
;
249 befs_btree_super bt_super
;
253 befs_debug(sb
, "---> %s Key: %s", __func__
, key
);
255 if (befs_bt_read_super(sb
, ds
, &bt_super
) != BEFS_OK
) {
257 "befs_btree_find() failed to read index superblock");
261 this_node
= kmalloc(sizeof(struct befs_btree_node
),
264 befs_error(sb
, "befs_btree_find() failed to allocate %zu "
265 "bytes of memory", sizeof(struct befs_btree_node
));
269 this_node
->bh
= NULL
;
271 /* read in root node */
272 node_off
= bt_super
.root_node_ptr
;
273 if (befs_bt_read_node(sb
, ds
, this_node
, node_off
) != BEFS_OK
) {
274 befs_error(sb
, "befs_btree_find() failed to read "
275 "node at %llu", node_off
);
279 while (!befs_leafnode(this_node
)) {
280 res
= befs_find_key(sb
, this_node
, key
, &node_off
);
281 /* if no key set, try the overflow node */
282 if (res
== BEFS_BT_OVERFLOW
)
283 node_off
= this_node
->head
.overflow
;
284 if (befs_bt_read_node(sb
, ds
, this_node
, node_off
) != BEFS_OK
) {
285 befs_error(sb
, "befs_btree_find() failed to read "
286 "node at %llu", node_off
);
291 /* at a leaf node now, check if it is correct */
292 res
= befs_find_key(sb
, this_node
, key
, value
);
294 brelse(this_node
->bh
);
297 if (res
!= BEFS_BT_MATCH
) {
298 befs_error(sb
, "<--- %s Key %s not found", __func__
, key
);
299 befs_debug(sb
, "<--- %s ERROR", __func__
);
301 return BEFS_BT_NOT_FOUND
;
303 befs_debug(sb
, "<--- %s Found key %s, value %llu", __func__
,
311 befs_debug(sb
, "<--- %s ERROR", __func__
);
316 * befs_find_key - Search for a key within a node
317 * @sb: Filesystem superblock
318 * @node: Node to find the key within
319 * @findkey: Keystring to search for
320 * @value: If key is found, the value stored with the key is put here
322 * Finds exact match if one exists, and returns BEFS_BT_MATCH.
323 * If there is no match and node's value array is too small for key, return
325 * If no match and node should countain this key, return BEFS_BT_NOT_FOUND.
327 * Uses binary search instead of a linear.
330 befs_find_key(struct super_block
*sb
, struct befs_btree_node
*node
,
331 const char *findkey
, befs_off_t
* value
)
333 int first
, last
, mid
;
340 befs_debug(sb
, "---> %s %s", __func__
, findkey
);
342 findkey_len
= strlen(findkey
);
344 /* if node can not contain key, just skip this node */
345 last
= node
->head
.all_key_count
- 1;
346 thiskey
= befs_bt_get_key(sb
, node
, last
, &keylen
);
348 eq
= befs_compare_strings(thiskey
, keylen
, findkey
, findkey_len
);
350 befs_debug(sb
, "<--- node can't contain %s", findkey
);
351 return BEFS_BT_OVERFLOW
;
354 valarray
= befs_bt_valarray(node
);
356 /* simple binary search */
359 while (last
>= first
) {
360 mid
= (last
+ first
) / 2;
361 befs_debug(sb
, "first: %d, last: %d, mid: %d", first
, last
,
363 thiskey
= befs_bt_get_key(sb
, node
, mid
, &keylen
);
364 eq
= befs_compare_strings(thiskey
, keylen
, findkey
,
368 befs_debug(sb
, "<--- %s found %s at %d",
369 __func__
, thiskey
, mid
);
371 *value
= fs64_to_cpu(sb
, valarray
[mid
]);
372 return BEFS_BT_MATCH
;
380 /* return an existing value so caller can arrive to a leaf node */
382 *value
= fs64_to_cpu(sb
, valarray
[mid
+ 1]);
384 *value
= fs64_to_cpu(sb
, valarray
[mid
]);
385 befs_error(sb
, "<--- %s %s not found", __func__
, findkey
);
386 befs_debug(sb
, "<--- %s ERROR", __func__
);
387 return BEFS_BT_NOT_FOUND
;
391 * befs_btree_read - Traverse leafnodes of a btree
392 * @sb: Filesystem superblock
393 * @ds: Datastream containing btree
394 * @key_no: Key number (alphabetical order) of key to read
395 * @bufsize: Size of the buffer to return key in
396 * @keybuf: Pointer to a buffer to put the key in
397 * @keysize: Length of the returned key
398 * @value: Value stored with the returned key
400 * Here's how it works: Key_no is the index of the key/value pair to
401 * return in keybuf/value.
402 * Bufsize is the size of keybuf (BEFS_NAME_LEN+1 is a good size). Keysize is
403 * the number of characters in the key (just a convenience).
406 * Get the first leafnode of the tree. See if the requested key is in that
407 * node. If not, follow the node->right link to the next leafnode. Repeat
408 * until the (key_no)th key is found or the tree is out of keys.
411 befs_btree_read(struct super_block
*sb
, const befs_data_stream
*ds
,
412 loff_t key_no
, size_t bufsize
, char *keybuf
, size_t * keysize
,
415 struct befs_btree_node
*this_node
;
416 befs_btree_super bt_super
;
426 befs_debug(sb
, "---> %s", __func__
);
428 if (befs_bt_read_super(sb
, ds
, &bt_super
) != BEFS_OK
) {
430 "befs_btree_read() failed to read index superblock");
434 this_node
= kmalloc(sizeof(struct befs_btree_node
), GFP_NOFS
);
435 if (this_node
== NULL
) {
436 befs_error(sb
, "befs_btree_read() failed to allocate %zu "
437 "bytes of memory", sizeof(struct befs_btree_node
));
441 node_off
= bt_super
.root_node_ptr
;
442 this_node
->bh
= NULL
;
444 /* seeks down to first leafnode, reads it into this_node */
445 res
= befs_btree_seekleaf(sb
, ds
, &bt_super
, this_node
, &node_off
);
446 if (res
== BEFS_BT_EMPTY
) {
447 brelse(this_node
->bh
);
451 befs_debug(sb
, "<--- %s Tree is EMPTY", __func__
);
452 return BEFS_BT_EMPTY
;
453 } else if (res
== BEFS_ERR
) {
457 /* find the leaf node containing the key_no key */
459 while (key_sum
+ this_node
->head
.all_key_count
<= key_no
) {
461 /* no more nodes to look in: key_no is too large */
462 if (this_node
->head
.right
== BEFS_BT_INVAL
) {
466 "<--- %s END of keys at %llu", __func__
,
468 key_sum
+ this_node
->head
.all_key_count
);
469 brelse(this_node
->bh
);
474 key_sum
+= this_node
->head
.all_key_count
;
475 node_off
= this_node
->head
.right
;
477 if (befs_bt_read_node(sb
, ds
, this_node
, node_off
) != BEFS_OK
) {
478 befs_error(sb
, "%s failed to read node at %llu",
479 __func__
, (unsigned long long)node_off
);
484 /* how many keys into this_node is key_no */
485 cur_key
= key_no
- key_sum
;
487 /* get pointers to datastructures within the node body */
488 valarray
= befs_bt_valarray(this_node
);
490 keystart
= befs_bt_get_key(sb
, this_node
, cur_key
, &keylen
);
492 befs_debug(sb
, "Read [%llu,%d]: keysize %d",
493 (long long unsigned int)node_off
, (int)cur_key
,
496 if (bufsize
< keylen
+ 1) {
497 befs_error(sb
, "%s keybuf too small (%zu) "
498 "for key of size %d", __func__
, bufsize
, keylen
);
499 brelse(this_node
->bh
);
503 strlcpy(keybuf
, keystart
, keylen
+ 1);
504 *value
= fs64_to_cpu(sb
, valarray
[cur_key
]);
507 befs_debug(sb
, "Read [%llu,%d]: Key \"%.*s\", Value %llu", node_off
,
508 cur_key
, keylen
, keybuf
, *value
);
510 brelse(this_node
->bh
);
513 befs_debug(sb
, "<--- %s", __func__
);
523 befs_debug(sb
, "<--- %s ERROR", __func__
);
528 * befs_btree_seekleaf - Find the first leafnode in the btree
529 * @sb: Filesystem superblock
530 * @ds: Datastream containing btree
531 * @bt_super: Pointer to the superblock of the btree
532 * @this_node: Buffer to return the leafnode in
533 * @node_off: Pointer to offset of current node within datastream. Modified
536 * Helper function for btree traverse. Moves the current position to the
537 * start of the first leaf node.
539 * Also checks for an empty tree. If there are no keys, returns BEFS_BT_EMPTY.
542 befs_btree_seekleaf(struct super_block
*sb
, const befs_data_stream
*ds
,
543 befs_btree_super
*bt_super
,
544 struct befs_btree_node
*this_node
,
545 befs_off_t
* node_off
)
548 befs_debug(sb
, "---> %s", __func__
);
550 if (befs_bt_read_node(sb
, ds
, this_node
, *node_off
) != BEFS_OK
) {
551 befs_error(sb
, "%s failed to read "
552 "node at %llu", __func__
, *node_off
);
555 befs_debug(sb
, "Seekleaf to root node %llu", *node_off
);
557 if (this_node
->head
.all_key_count
== 0 && befs_leafnode(this_node
)) {
558 befs_debug(sb
, "<--- %s Tree is EMPTY", __func__
);
559 return BEFS_BT_EMPTY
;
562 while (!befs_leafnode(this_node
)) {
564 if (this_node
->head
.all_key_count
== 0) {
565 befs_debug(sb
, "%s encountered "
566 "an empty interior node: %llu. Using Overflow "
567 "node: %llu", __func__
, *node_off
,
568 this_node
->head
.overflow
);
569 *node_off
= this_node
->head
.overflow
;
571 fs64
*valarray
= befs_bt_valarray(this_node
);
572 *node_off
= fs64_to_cpu(sb
, valarray
[0]);
574 if (befs_bt_read_node(sb
, ds
, this_node
, *node_off
) != BEFS_OK
) {
575 befs_error(sb
, "%s failed to read "
576 "node at %llu", __func__
, *node_off
);
580 befs_debug(sb
, "Seekleaf to child node %llu", *node_off
);
582 befs_debug(sb
, "Node %llu is a leaf node", *node_off
);
587 befs_debug(sb
, "<--- %s ERROR", __func__
);
592 * befs_leafnode - Determine if the btree node is a leaf node or an
594 * @node: Pointer to node structure to test
596 * Return 1 if leaf, 0 if interior
599 befs_leafnode(struct befs_btree_node
*node
)
601 /* all interior nodes (and only interior nodes) have an overflow node */
602 if (node
->head
.overflow
== BEFS_BT_INVAL
)
609 * befs_bt_keylen_index - Finds start of keylen index in a node
610 * @node: Pointer to the node structure to find the keylen index within
612 * Returns a pointer to the start of the key length index array
613 * of the B+tree node *@node
615 * "The length of all the keys in the node is added to the size of the
616 * header and then rounded up to a multiple of four to get the beginning
617 * of the key length index" (p.88, practical filesystem design).
619 * Except that rounding up to 8 works, and rounding up to 4 doesn't.
622 befs_bt_keylen_index(struct befs_btree_node
*node
)
624 const int keylen_align
= 8;
625 unsigned long int off
=
626 (sizeof (befs_btree_nodehead
) + node
->head
.all_key_length
);
627 ulong tmp
= off
% keylen_align
;
630 off
+= keylen_align
- tmp
;
632 return (fs16
*) ((void *) node
->od_node
+ off
);
636 * befs_bt_valarray - Finds the start of value array in a node
637 * @node: Pointer to the node structure to find the value array within
639 * Returns a pointer to the start of the value array
640 * of the node pointed to by the node header
643 befs_bt_valarray(struct befs_btree_node
*node
)
645 void *keylen_index_start
= (void *) befs_bt_keylen_index(node
);
646 size_t keylen_index_size
= node
->head
.all_key_count
* sizeof (fs16
);
648 return (fs64
*) (keylen_index_start
+ keylen_index_size
);
652 * befs_bt_keydata - Finds start of keydata array in a node
653 * @node: Pointer to the node structure to find the keydata array within
655 * Returns a pointer to the start of the keydata array
656 * of the node pointed to by the node header
659 befs_bt_keydata(struct befs_btree_node
*node
)
661 return (char *) ((void *) node
->od_node
+ sizeof (befs_btree_nodehead
));
665 * befs_bt_get_key - returns a pointer to the start of a key
666 * @sb: filesystem superblock
667 * @node: node in which to look for the key
668 * @index: the index of the key to get
669 * @keylen: modified to be the length of the key at @index
671 * Returns a valid pointer into @node on success.
672 * Returns NULL on failure (bad input) and sets *@keylen = 0
675 befs_bt_get_key(struct super_block
*sb
, struct befs_btree_node
*node
,
676 int index
, u16
* keylen
)
682 if (index
< 0 || index
> node
->head
.all_key_count
) {
687 keystart
= befs_bt_keydata(node
);
688 keylen_index
= befs_bt_keylen_index(node
);
693 prev_key_end
= fs16_to_cpu(sb
, keylen_index
[index
- 1]);
695 *keylen
= fs16_to_cpu(sb
, keylen_index
[index
]) - prev_key_end
;
697 return keystart
+ prev_key_end
;
701 * befs_compare_strings - compare two strings
702 * @key1: pointer to the first key to be compared
703 * @keylen1: length in bytes of key1
704 * @key2: pointer to the second key to be compared
705 * @keylen2: length in bytes of key2
707 * Returns 0 if @key1 and @key2 are equal.
708 * Returns >0 if @key1 is greater.
709 * Returns <0 if @key2 is greater.
712 befs_compare_strings(const void *key1
, int keylen1
,
713 const void *key2
, int keylen2
)
715 int len
= min_t(int, keylen1
, keylen2
);
716 int result
= strncmp(key1
, key2
, len
);
718 result
= keylen1
- keylen2
;
722 /* These will be used for non-string keyed btrees */
725 btree_compare_int32(cont
void *key1
, int keylen1
, const void *key2
, int keylen2
)
727 return *(int32_t *) key1
- *(int32_t *) key2
;
731 btree_compare_uint32(cont
void *key1
, int keylen1
,
732 const void *key2
, int keylen2
)
734 if (*(u_int32_t
*) key1
== *(u_int32_t
*) key2
)
736 else if (*(u_int32_t
*) key1
> *(u_int32_t
*) key2
)
742 btree_compare_int64(cont
void *key1
, int keylen1
, const void *key2
, int keylen2
)
744 if (*(int64_t *) key1
== *(int64_t *) key2
)
746 else if (*(int64_t *) key1
> *(int64_t *) key2
)
753 btree_compare_uint64(cont
void *key1
, int keylen1
,
754 const void *key2
, int keylen2
)
756 if (*(u_int64_t
*) key1
== *(u_int64_t
*) key2
)
758 else if (*(u_int64_t
*) key1
> *(u_int64_t
*) key2
)
765 btree_compare_float(cont
void *key1
, int keylen1
, const void *key2
, int keylen2
)
767 float result
= *(float *) key1
- *(float *) key2
;
771 return (result
< 0.0f
) ? -1 : 1;
775 btree_compare_double(cont
void *key1
, int keylen1
,
776 const void *key2
, int keylen2
)
778 double result
= *(double *) key1
- *(double *) key2
;
782 return (result
< 0.0) ? -1 : 1;