You can not select more than 25 topics Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
ck/regressions/ck_bitmap/validate/serial.c

351 lines
8.1 KiB

/*
* Copyright 2012-2014 Samy Al Bahra.
* Copyright 2012-2014 AppNexus, Inc.
* Copyright 2012 Shreyas Prasad.
* Copyright 2014 Paul Khuong.
* All rights reserved.
*
* Redistribution and use in source and binary forms, with or without
* modification, are permitted provided that the following conditions
* are met:
* 1. Redistributions of source code must retain the above copyright
* notice, this list of conditions and the following disclaimer.
* 2. Redistributions in binary form must reproduce the above copyright
* notice, this list of conditions and the following disclaimer in the
* documentation and/or other materials provided with the distribution.
*
* THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
* ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
* IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
* ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
* FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
* DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
* OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
* HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
* LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
* OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
* SUCH DAMAGE.
*/
#include <ck_bitmap.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include "../../common.h"
#ifndef STATIC_LENGTH
#define STATIC_LENGTH 256
#endif
static unsigned int length = 256;
static ck_bitmap_t *g_bits;
static void
check_iteration(ck_bitmap_t *bits, unsigned int len, bool initial)
{
ck_bitmap_iterator_t iter;
unsigned int i = 0, j;
len += 1;
if (initial == true) {
if (bits == g_bits)
len = length;
else
len = STATIC_LENGTH;
}
ck_bitmap_iterator_init(&iter, bits);
for (j = 0; ck_bitmap_next(bits, &iter, &i) == true; j++) {
if (i == j)
continue;
ck_error("[4] ERROR: Expected bit %u, got bit %u\n", j, i);
}
if (j != len) {
ck_error("[5] ERROR: Expected length %u, got length %u\n", len, j);
}
return;
}
static void
test(ck_bitmap_t *bits, unsigned int n_length, bool initial)
{
unsigned int i;
CK_BITMAP_INSTANCE(8) u;
CK_BITMAP_INIT(&u, 8, false);
CK_BITMAP_SET(&u, 1);
CK_BITMAP_SET(&u, 4);
for (i = 0; i < n_length; i++) {
if (ck_bitmap_test(bits, i) == !initial) {
ck_error("[0] ERROR [%u]: Expected %u got %u\n", i,
initial, !initial);
}
}
for (i = 0; i < n_length; i++) {
ck_bitmap_set(bits, i);
if (ck_bitmap_test(bits, i) == false) {
ck_error("[1] ERROR: Expected bit to be set: %u\n", i);
}
ck_bitmap_reset(bits, i);
if (ck_bitmap_test(bits, i) == true) {
ck_error("[2] ERROR: Expected bit to be cleared: %u\n", i);
}
ck_bitmap_set(bits, i);
if (ck_bitmap_test(bits, i) == false) {
ck_error("[3] ERROR: Expected bit to be set: %u\n", i);
}
check_iteration(bits, i, initial);
}
for (i = 0; i < n_length; i++) {
if (ck_bitmap_test(bits, i) == false) {
ck_error("[4] ERROR: Expected bit to be set: %u\n", i);
}
}
ck_bitmap_clear(bits);
for (i = 0; i < n_length; i++) {
if (ck_bitmap_test(bits, i) == true) {
ck_error("[4] ERROR: Expected bit to be reset: %u\n", i);
}
}
ck_bitmap_union(bits, CK_BITMAP(&u));
if (ck_bitmap_test(bits, 1) == false ||
ck_bitmap_test(bits, 4) == false) {
ck_error("ERROR: Expected union semantics.\n");
}
return;
}
static void
test_init(bool init)
{
ck_bitmap_t *bitmap;
size_t bytes;
unsigned int i;
bytes = ck_bitmap_size(length);
bitmap = malloc(bytes);
memset(bitmap, random(), bytes);
ck_bitmap_init(bitmap, length, init);
if (ck_bitmap_bits(bitmap) != length) {
ck_error("ERROR: Expected length %u got %u\n",
length, ck_bitmap_bits(bitmap));
}
for (i = 0; i < length; i++) {
if (ck_bitmap_test(bitmap, i) != init) {
ck_error("ERROR: Expected bit %i at index %u, got %i\n",
(int)init, i, (int)(!init));
}
}
free(bitmap);
}
static ck_bitmap_t *
random_init(void)
{
ck_bitmap_t *bitmap;
unsigned int i;
bitmap = malloc(ck_bitmap_size(length));
ck_bitmap_init(bitmap, length, false);
for (i = 0; i < length; i++) {
if (random() & 1) {
ck_bitmap_set(bitmap, i);
}
}
return bitmap;
}
static ck_bitmap_t *
copy(const ck_bitmap_t *src)
{
ck_bitmap_t *bitmap;
size_t bytes = ck_bitmap_size(ck_bitmap_bits(src));
bitmap = malloc(bytes);
memcpy(bitmap, src, bytes);
return bitmap;
}
static void
test_counts(const ck_bitmap_t *x, const ck_bitmap_t *y)
{
unsigned int count = 0;
unsigned int count_intersect = 0;
unsigned int i;
for (i = 0; i <= length * 2; i++) {
unsigned actual_limit = i;
unsigned int r;
bool check;
if (actual_limit > ck_bitmap_bits(x))
actual_limit = ck_bitmap_bits(x);
check = ck_bitmap_empty(x, i);
if (check != (count == 0)) {
ck_error("ck_bitmap_empty(%u): got %i expected %i\n",
i, (int)check, (int)(count == 0));
}
check = ck_bitmap_full(x, i);
if (check != (count == actual_limit)) {
ck_error("ck_bitmap_full(%u): got %i expected %i\n",
i, (int)check, (int)(count == i));
}
r = ck_bitmap_count(x, i);
if (r != count) {
ck_error("ck_bitmap_count(%u): got %u expected %u\n",
i, r, count);
}
r = ck_bitmap_count_intersect(x, y, i);
if (r != count_intersect) {
ck_error("ck_bitmap_count_intersect(%u): got %u expected %u\n",
i, r, count_intersect);
}
if (i < length) {
count += ck_bitmap_test(x, i);
count_intersect += ck_bitmap_test(x, i) & ck_bitmap_test(y, i);
}
}
}
static void
random_test(unsigned int seed)
{
ck_bitmap_t *x, *x_copy, *y;
unsigned int i;
srandom(seed);
test_init(false);
test_init(true);
x = random_init();
y = random_init();
#define TEST(routine, expected) do { \
x_copy = copy(x); \
routine(x_copy, y); \
for (i = 0; i < length; i++) { \
bool xi = ck_bitmap_test(x, i); \
bool yi = ck_bitmap_test(y, i); \
bool ri = ck_bitmap_test(x_copy, i); \
bool wanted = expected(xi, yi); \
\
if (ri != wanted) { \
ck_error("In " #routine " at %u: " \
"got %i expected %i\n", \
i, ri, wanted); \
} \
} \
free(x_copy); \
} while (0)
#define OR(x, y) (x | y)
#define AND(x, y) (x & y)
#define ANDC2(x, y) (x & (~y))
TEST(ck_bitmap_union, OR);
TEST(ck_bitmap_intersection, AND);
TEST(ck_bitmap_intersection_negate, ANDC2);
#undef ANDC2
#undef AND
#undef OR
#undef TEST
test_counts(x, y);
for (i = 0; i < 4; i++) {
ck_bitmap_init(x, length, i & 1);
ck_bitmap_init(y, length, i >> 1);
test_counts(x, y);
}
free(y);
free(x);
}
int
main(int argc, char *argv[])
{
unsigned int bytes, base;
size_t i, j;
if (argc >= 2) {
length = atoi(argv[1]);
}
base = ck_bitmap_base(length);
bytes = ck_bitmap_size(length);
fprintf(stderr, "Configuration: %u bytes\n",
bytes);
g_bits = malloc(bytes);
memset(g_bits->map, 0xFF, base);
ck_bitmap_init(g_bits, length, false);
test(g_bits, length, false);
memset(g_bits->map, 0x00, base);
ck_bitmap_init(g_bits, length, true);
test(g_bits, length, true);
ck_bitmap_test(g_bits, length - 1);
CK_BITMAP_INSTANCE(STATIC_LENGTH) sb;
fprintf(stderr, "Static configuration: %zu bytes\n",
sizeof(sb));
memset(CK_BITMAP_BUFFER(&sb), 0xFF, ck_bitmap_base(STATIC_LENGTH));
CK_BITMAP_INIT(&sb, STATIC_LENGTH, false);
test(CK_BITMAP(&sb), STATIC_LENGTH, false);
memset(CK_BITMAP_BUFFER(&sb), 0x00, ck_bitmap_base(STATIC_LENGTH));
CK_BITMAP_INIT(&sb, STATIC_LENGTH, true);
test(CK_BITMAP(&sb), STATIC_LENGTH, true);
CK_BITMAP_CLEAR(&sb);
if (CK_BITMAP_TEST(&sb, 1) == true) {
ck_error("ERROR: Expected bit to be reset.\n");
}
CK_BITMAP_SET(&sb, 1);
if (CK_BITMAP_TEST(&sb, 1) == false) {
ck_error("ERROR: Expected bit to be set.\n");
}
CK_BITMAP_RESET(&sb, 1);
if (CK_BITMAP_TEST(&sb, 1) == true) {
ck_error("ERROR: Expected bit to be reset.\n");
}
for (i = 0; i < 4 * sizeof(unsigned int) * CHAR_BIT; i++) {
length = i;
for (j = 0; j < 10; j++) {
random_test(i * 10 + j);
}
}
return 0;
}