xref: /freebsd-src/contrib/netbsd-tests/lib/libc/db/h_lfsr.c (revision c22165b4f1f5d38b681921797a44b3ba8c13b7e0)
1*640235e2SEnji Cooper /*-
2*640235e2SEnji Cooper  * Copyright (c) 2015 The NetBSD Foundation, Inc.
3*640235e2SEnji Cooper  * All rights reserved.
4*640235e2SEnji Cooper  *
5*640235e2SEnji Cooper  * This code is derived from software contributed to The NetBSD Foundation
6*640235e2SEnji Cooper  * by Christos Zoulas.
7*640235e2SEnji Cooper  *
8*640235e2SEnji Cooper  * Redistribution and use in source and binary forms, with or without
9*640235e2SEnji Cooper  * modification, are permitted provided that the following conditions
10*640235e2SEnji Cooper  * are met:
11*640235e2SEnji Cooper  * 1. Redistributions of source code must retain the above copyright
12*640235e2SEnji Cooper  *    notice, this list of conditions and the following disclaimer.
13*640235e2SEnji Cooper  * 2. Redistributions in binary form must reproduce the above copyright
14*640235e2SEnji Cooper  *    notice, this list of conditions and the following disclaimer in the
15*640235e2SEnji Cooper  *    documentation and/or other materials provided with the distribution.
16*640235e2SEnji Cooper  *
17*640235e2SEnji Cooper  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
18*640235e2SEnji Cooper  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19*640235e2SEnji Cooper  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
20*640235e2SEnji Cooper  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
21*640235e2SEnji Cooper  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
22*640235e2SEnji Cooper  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
23*640235e2SEnji Cooper  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24*640235e2SEnji Cooper  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
25*640235e2SEnji Cooper  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
26*640235e2SEnji Cooper  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
27*640235e2SEnji Cooper  * POSSIBILITY OF SUCH DAMAGE.
28*640235e2SEnji Cooper  */
29*640235e2SEnji Cooper #include <sys/cdefs.h>
30*640235e2SEnji Cooper __RCSID("$NetBSD: h_lfsr.c,v 1.1 2015/11/18 18:35:35 christos Exp $");
31*640235e2SEnji Cooper 
32*640235e2SEnji Cooper #include <stdio.h>
33*640235e2SEnji Cooper #include <stdlib.h>
34*640235e2SEnji Cooper #include <fcntl.h>
35*640235e2SEnji Cooper #include <err.h>
36*640235e2SEnji Cooper #include <string.h>
37*640235e2SEnji Cooper #include <unistd.h>
38*640235e2SEnji Cooper #include <db.h>
39*640235e2SEnji Cooper 
40*640235e2SEnji Cooper #define MAXKEY 0xffff
41*640235e2SEnji Cooper #ifdef DEBUG
42*640235e2SEnji Cooper #define DPRINTF(...)	printf(__VA_ARGS__)
43*640235e2SEnji Cooper #else
44*640235e2SEnji Cooper #define DPRINTF(...)
45*640235e2SEnji Cooper #endif
46*640235e2SEnji Cooper 
47*640235e2SEnji Cooper static uint16_t
next(uint16_t * cur)48*640235e2SEnji Cooper next(uint16_t *cur)
49*640235e2SEnji Cooper {
50*640235e2SEnji Cooper         uint16_t lsb = *cur & 1;
51*640235e2SEnji Cooper         *cur >>= 1;
52*640235e2SEnji Cooper         *cur ^= (-lsb) & 0xB400u;
53*640235e2SEnji Cooper 	return *cur;
54*640235e2SEnji Cooper }
55*640235e2SEnji Cooper 
56*640235e2SEnji Cooper int
main(int argc,char * argv[])57*640235e2SEnji Cooper main(int argc, char *argv[])
58*640235e2SEnji Cooper {
59*640235e2SEnji Cooper 	char buf[65536];
60*640235e2SEnji Cooper 	char kb[256];
61*640235e2SEnji Cooper 	DBT key, val;
62*640235e2SEnji Cooper 	DB *db;
63*640235e2SEnji Cooper 	HASHINFO hi;
64*640235e2SEnji Cooper 	uint8_t c;
65*640235e2SEnji Cooper 	uint16_t len;
66*640235e2SEnji Cooper 	uint32_t pagesize = atoi(argv[1]);
67*640235e2SEnji Cooper 
68*640235e2SEnji Cooper 	memset(&hi, 0, sizeof(hi));
69*640235e2SEnji Cooper 	memset(buf, 'a', sizeof(buf));
70*640235e2SEnji Cooper 	hi.bsize = pagesize;
71*640235e2SEnji Cooper 	hi.nelem = 65536;
72*640235e2SEnji Cooper 	hi.ffactor = 128;
73*640235e2SEnji Cooper 
74*640235e2SEnji Cooper 	key.data = kb;
75*640235e2SEnji Cooper 	val.data = buf;
76*640235e2SEnji Cooper 
77*640235e2SEnji Cooper 	db = dbopen(NULL, O_CREAT|O_TRUNC|O_RDWR, 0, DB_HASH, &hi);
78*640235e2SEnji Cooper 	if (db == NULL)
79*640235e2SEnji Cooper 		err(EXIT_FAILURE, "dbopen");
80*640235e2SEnji Cooper 
81*640235e2SEnji Cooper 	len = 0xaec1;
82*640235e2SEnji Cooper 	for (size_t i = 0; i < MAXKEY; i++) {
83*640235e2SEnji Cooper 		key.size = (len & 0xff) + 1;
84*640235e2SEnji Cooper 		c = len >> 8;
85*640235e2SEnji Cooper 		memset(kb, c, key.size);
86*640235e2SEnji Cooper 		val.size = (next(&len) & 0xff) + 1;
87*640235e2SEnji Cooper 		switch ((*db->put)(db, &key, &val, R_NOOVERWRITE)) {
88*640235e2SEnji Cooper 		case 0:
89*640235e2SEnji Cooper 			DPRINTF("put %zu %zu %#x\n",
90*640235e2SEnji Cooper 			    key.size, val.size, c);
91*640235e2SEnji Cooper 			break;
92*640235e2SEnji Cooper 		case -1:
93*640235e2SEnji Cooper 			err(EXIT_FAILURE, "put error %zu %zu %#x",
94*640235e2SEnji Cooper 			    key.size, val.size, c);
95*640235e2SEnji Cooper 		case 1:
96*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "put overwrite %zu %zu %#x",
97*640235e2SEnji Cooper 			    key.size, val.size, c);
98*640235e2SEnji Cooper 		default:
99*640235e2SEnji Cooper 			abort();
100*640235e2SEnji Cooper 		}
101*640235e2SEnji Cooper 	}
102*640235e2SEnji Cooper 
103*640235e2SEnji Cooper 	len = 0xaec1;
104*640235e2SEnji Cooper 	for (size_t i = 0; i < MAXKEY; i++) {
105*640235e2SEnji Cooper 		key.size = (len & 0xff) + 1;
106*640235e2SEnji Cooper 		c = len >> 8;
107*640235e2SEnji Cooper 		memset(kb, c, key.size);
108*640235e2SEnji Cooper 		next(&len);
109*640235e2SEnji Cooper 		switch ((*db->get)(db, &key, &val, 0)) {
110*640235e2SEnji Cooper 		case 0:
111*640235e2SEnji Cooper 			DPRINTF("get %zu %zu %#x\n",
112*640235e2SEnji Cooper 			    key.size, val.size, c);
113*640235e2SEnji Cooper 			break;
114*640235e2SEnji Cooper 		case -1:
115*640235e2SEnji Cooper 			err(EXIT_FAILURE, "get %zu %zu %#x",
116*640235e2SEnji Cooper 			    key.size, val.size, c);
117*640235e2SEnji Cooper 		case 1:
118*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "get not found %zu %zu %#x",
119*640235e2SEnji Cooper 			    key.size, val.size, c);
120*640235e2SEnji Cooper 		default:
121*640235e2SEnji Cooper 			abort();
122*640235e2SEnji Cooper 		}
123*640235e2SEnji Cooper 		if (memcmp(key.data, kb, key.size) != 0)
124*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "get badkey %zu %zu %#x",
125*640235e2SEnji Cooper 			    key.size, val.size, c);
126*640235e2SEnji Cooper 		if (val.size != (len & 0xff) + 1U)
127*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "get badvallen %zu %zu %#x",
128*640235e2SEnji Cooper 			    key.size, val.size, c);
129*640235e2SEnji Cooper 		if (memcmp(val.data, buf, val.size) != 0)
130*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "get badval %zu %zu %#x",
131*640235e2SEnji Cooper 			    key.size, val.size, c);
132*640235e2SEnji Cooper 	}
133*640235e2SEnji Cooper 
134*640235e2SEnji Cooper 	len = 0xaec1;
135*640235e2SEnji Cooper 	for (size_t i = 0; i < MAXKEY; i++) {
136*640235e2SEnji Cooper 		key.size = (len & 0xff) + 1;
137*640235e2SEnji Cooper 		c = len >> 8;
138*640235e2SEnji Cooper 		memset(kb, c, key.size);
139*640235e2SEnji Cooper 		next(&len);
140*640235e2SEnji Cooper 		switch ((*db->del)(db, &key, 0)) {
141*640235e2SEnji Cooper 		case 0:
142*640235e2SEnji Cooper 			DPRINTF("del %zu %zu %#x\n",
143*640235e2SEnji Cooper 			    key.size, val.size, c);
144*640235e2SEnji Cooper 			break;
145*640235e2SEnji Cooper 		case -1:
146*640235e2SEnji Cooper 			err(EXIT_FAILURE, "del %zu %zu %#x", key.size,
147*640235e2SEnji Cooper 			    val.size, c);
148*640235e2SEnji Cooper 		case 1:
149*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "del not found %zu %zu %#x",
150*640235e2SEnji Cooper 			    key.size, val.size, c);
151*640235e2SEnji Cooper 		default:
152*640235e2SEnji Cooper 			abort();
153*640235e2SEnji Cooper 		}
154*640235e2SEnji Cooper 	}
155*640235e2SEnji Cooper 
156*640235e2SEnji Cooper 	len = 0xaec1;
157*640235e2SEnji Cooper 	for (size_t i = 0; i < MAXKEY; i++) {
158*640235e2SEnji Cooper 		key.size = (len & 0xff) + 1;
159*640235e2SEnji Cooper 		c = len >> 8;
160*640235e2SEnji Cooper 		memset(kb, c, key.size);
161*640235e2SEnji Cooper 		next(&len);
162*640235e2SEnji Cooper 		switch ((*db->get)(db, &key, &val, 0)) {
163*640235e2SEnji Cooper 		case 0:
164*640235e2SEnji Cooper 			errx(EXIT_FAILURE, "get2 found %zu %zu %#x",
165*640235e2SEnji Cooper 			    key.size, val.size, c);
166*640235e2SEnji Cooper 			break;
167*640235e2SEnji Cooper 		case -1:
168*640235e2SEnji Cooper 			err(EXIT_FAILURE, "get2 %zu %zu %#x",
169*640235e2SEnji Cooper 			    key.size, val.size, c);
170*640235e2SEnji Cooper 		case 1:
171*640235e2SEnji Cooper 			DPRINTF("get2 %zu %zu %#x\n",
172*640235e2SEnji Cooper 			    key.size, val.size, c);
173*640235e2SEnji Cooper 			break;
174*640235e2SEnji Cooper 		default:
175*640235e2SEnji Cooper 			abort();
176*640235e2SEnji Cooper 		}
177*640235e2SEnji Cooper 	}
178*640235e2SEnji Cooper 	return 0;
179*640235e2SEnji Cooper }
180