xref: /dragonfly/lib/libc/citrus/citrus_db_hash.c (revision ed5d5720)
1 /* $NetBSD: citrus_db_hash.c,v 1.5 2008/02/09 14:56:20 junyoung Exp $ */
2 /* $DragonFly: src/lib/libc/citrus/citrus_db_hash.c,v 1.2 2008/04/10 10:21:01 hasso Exp $ */
3 
4 
5 /*-
6  * Copyright (c)2003 Citrus Project,
7  * All rights reserved.
8  *
9  * Redistribution and use in source and binary forms, with or without
10  * modification, are permitted provided that the following conditions
11  * are met:
12  * 1. Redistributions of source code must retain the above copyright
13  *    notice, this list of conditions and the following disclaimer.
14  * 2. Redistributions in binary form must reproduce the above copyright
15  *    notice, this list of conditions and the following disclaimer in the
16  *    documentation and/or other materials provided with the distribution.
17  *
18  * THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
19  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
20  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
21  * ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
22  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
23  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
24  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
25  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
26  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
27  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
28  * SUCH DAMAGE.
29  */
30 
31 #include <assert.h>
32 #include <stdio.h>
33 #include <string.h>
34 #include <sys/types.h>
35 
36 #include "citrus_namespace.h"
37 #include "citrus_types.h"
38 #include "citrus_bcs.h"
39 #include "citrus_region.h"
40 #include "citrus_db_hash.h"
41 
42 uint32_t
43 /*ARGSUSED*/
44 _citrus_db_hash_std(void *closure __unused, struct _region *r)
45 {
46 	const uint8_t *p = _region_head(r);
47 	uint32_t hash = 0, tmp;
48 	size_t i;
49 
50 	for (i = _region_size(r); i > 0; i--) {
51 		hash <<= 4;
52 		hash += _bcs_tolower(*p);
53 		tmp = hash & 0xF0000000;
54 		if (tmp != 0) {
55 			hash ^= tmp;
56 			hash ^= tmp >> 24;
57 		}
58 		p++;
59 	}
60 	return hash;
61 }
62