#include <stdio.h>

#include <stdlib.h>

#include <errno.h>

#include "bitarray.h"

#define NUM_BITS 128 /* size of bit array */

#ifdef NDEBUG

#define EVAL_RESULT(R) (void)(R)

#define EVAL_RESULT(R) if (-1 == (R)) {perror(NULL); exit(EXIT_FAILURE);};

void ShowArray(char *name, bit_array_t *ba)

{

printf("%s: ", name);

BitArrayDump(ba, stdout);

printf("\n");

}

int main()

{

bit_array_t *ba1, *ba2;

int i;

int result;

ba1 = BitArrayCreate(NUM_BITS);

printf("set all bits in ba1\n");

BitArraySetAll(ba1);

ShowArray("ba1", ba1);

printf("\nclear all bits in ba1\n");

BitArrayClearAll(ba1);

ShowArray("ba1", ba1);

printf("\nset 8 bits on each end of ba1 from the outside in\n");

for (i = 0; i < 8; i++)

{

result = BitArraySetBit(ba1, i);

EVAL_RESULT(result);

result = BitArraySetBit(ba1, NUM_BITS - i - 1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

}

printf("\nduplicate ba1 with ba2\n");

ba2 = BitArrayDuplicate(ba1);

if (NULL == ba2)

{

EVAL_RESULT(-1);

}

ShowArray("ba2", ba2);

printf("\nba2 = ~(ba2)\n");

result = BitArrayNot(ba2, ba2);

EVAL_RESULT(result);

ShowArray("ba2", ba2);

printf("\nba2 = ba2 | ba1\n");

result = BitArrayOr(ba2, ba1, ba2);

EVAL_RESULT(result);

ShowArray("ba2", ba2);

printf("\nba2 = ba2 ^ ba1\n");

result = BitArrayXor(ba2, ba1, ba2);

EVAL_RESULT(result);

ShowArray("ba2", ba2);

printf("\nba2 = ba2 & ba1\n");

result = BitArrayAnd(ba2, ba1, ba2);

EVAL_RESULT(result);

ShowArray("ba2", ba2);

printf("\ntesting some bits in ba1\n");

for (; i > 6; i--)

{

if(BitArrayTestBit(ba1, i))

{

printf("ba1 bit %d is set.\n", i);

}

else

{

printf("ba1 bit %d is clear.\n", i);

}

if(BitArrayTestBit(ba1, NUM_BITS - i - 1))

{

printf("ba1 bit %d is set.\n", NUM_BITS - i - 1);

}

else

{

printf("ba1 bit %d is clear.\n", NUM_BITS - i - 1);

}

}

printf("\nclear 8 bits on each end of ba1 from the outside in\n");

for (i = 0; i < 8; i++)

{

result = BitArrayClearBit(ba1, i);

EVAL_RESULT(result);

result = BitArrayClearBit(ba1, NUM_BITS - i - 1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

}

printf("\nset all bits in ba1 and shift right by 20\n");

BitArraySetAll(ba1);

result = BitArrayShiftRight(ba1, 20);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\nshift ba1 left by 20\n");

result = BitArrayShiftLeft(ba1, 20);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\nset all bits in ba1 and increment\n");

BitArraySetAll(ba1);

result = BitArrayIncrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\nincrement ba1\n");

result = BitArrayIncrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\nincrement ba1\n");

result = BitArrayIncrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\ndecrement ba1\n");

result = BitArrayDecrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\ndecrement ba1\n");

result = BitArrayDecrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\ndecrement ba1\n");

result = BitArrayDecrement(ba1);

EVAL_RESULT(result);

ShowArray("ba1", ba1);

printf("\ncompare ba1 with ba1\n");

if (BitArrayCompare(ba1, ba1) == 0)

{

printf("ba1 == ba1\n");

}

else

{

printf("Comparison error.\n");

}

printf("\ncompare ba1 with ba2\n");

if (BitArrayCompare(ba1, ba2) > 0)

{

printf("ba1 > ba2\n");

}

else

{

printf("Comparison error.\n");

}

printf("\ncompare ba2 with ba1\n");

if (BitArrayCompare(ba2, ba1) < 0)

{

printf("ba2 < ba1\n");

}

else

{

printf("Comparison error.\n");

}

BitArrayDestroy(ba1);

BitArrayDestroy(ba2);

return EXIT_SUCCESS;

}