1 /* $NetBSD: t_tree.c,v 1.1 2011/05/05 13:36:05 jruoho Exp $ */ 2 3 /*- 4 * Copyright (c) 2010, 2011 The NetBSD Foundation, Inc. 5 * All rights reserved. 6 * 7 * Redistribution and use in source and binary forms, with or without 8 * modification, are permitted provided that the following conditions 9 * are met: 10 * 1. Redistributions of source code must retain the above copyright 11 * notice, this list of conditions and the following disclaimer. 12 * 2. Redistributions in binary form must reproduce the above copyright 13 * notice, this list of conditions and the following disclaimer in the 14 * documentation and/or other materials provided with the distribution. 15 * 16 * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS 17 * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED 18 * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR 19 * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS 20 * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE 26 * POSSIBILITY OF SUCH DAMAGE. 27 */ 28 29 #include <sys/cdefs.h> 30 #include <sys/tree.h> 31 32 #include <atf-c.h> 33 #include <stdlib.h> 34 #include <stdio.h> 35 36 struct mist { 37 RB_ENTRY(mist) rbentry; 38 int key; 39 }; 40 RB_HEAD(head, mist) tt; 41 42 static int 43 mistcmp(struct mist *a, struct mist *b) 44 { 45 #if 0 46 return (b->key - a->key); /* wrong, can overflow */ 47 #else 48 if (b->key > a->key) 49 return 1; 50 else if (b->key < a->key) 51 return (-1); 52 else 53 return 0; 54 #endif 55 } 56 57 RB_PROTOTYPE(head, mist, rbentry, mistcmp) 58 RB_GENERATE(head, mist, rbentry, mistcmp) 59 60 static struct mist * 61 addmist(int key) 62 { 63 struct mist *m; 64 65 m = malloc(sizeof(struct mist)); 66 m->key = key; 67 RB_INSERT(head, &tt, m); 68 return m; 69 } 70 71 static int 72 findmist(struct mist *m) 73 { 74 75 return (!!RB_FIND(head, &tt, m)); 76 } 77 78 #define N 1000 79 static int 80 test(void) 81 { 82 struct mist *m[N]; 83 int fail, i, j; 84 85 RB_INIT(&tt); 86 fail = 0; 87 for (i = 0; i < N; i++) { 88 m[i] = addmist(random() << 1); /* use all 32 bits */ 89 for (j = 0; j <= i; j++) 90 if (!findmist(m[j])) 91 fail++; 92 } 93 return fail; 94 } 95 96 ATF_TC(tree_rbstress); 97 ATF_TC_HEAD(tree_rbstress, tc) 98 { 99 100 atf_tc_set_md_var(tc, "descr", "rb-tree stress test"); 101 } 102 103 ATF_TC_BODY(tree_rbstress, tc) 104 { 105 int i, fail, f; 106 107 srandom(4711); 108 fail = 0; 109 for (i = 0; i < 10; i++) { 110 f = test(); 111 if (f) { 112 atf_tc_fail_nonfatal("loop %d: %d errors\n", i, f); 113 fail += f; 114 } 115 } 116 } 117 118 ATF_TP_ADD_TCS(tp) 119 { 120 121 ATF_TP_ADD_TC(tp, tree_rbstress); 122 123 return atf_no_error(); 124 } 125