/simpletypesystem/trunk

#include "../libssts/SimpleTypeSystem.h"

#include "test_macros.h"

#include "base_n.h"

const schar * testdata1 = "Hello World!";

const schar * testdata2 = "Hello World";

const schar * testdata3 = "Hello LibSSTS!";

const schar * testdata4 = "";

int

test_base_16_text (void) {

  setup_unit ();

  size_t testdata_size = strlen (testdata1),

         out_size = 0,

         hex_size = 0,

         out2_size = 0;

  schar * hex = s_base_16_enc ((sbyte *) testdata1, testdata_size, &out_size);

  //s_print ("HEX: %s\n", hex);

  test_case (s_string_is_equal ("48656C6C6F20576F726C6421", hex), "The Base16 data has the expected value.");

  hex_size = strlen (hex);

  test_case (out_size == hex_size, "The outputed string has the same length as what the function reports.");

  schar * ret = (schar *) s_base_16_dec (hex, hex_size, &out2_size);

  //s_print ("Test data: %s, The output from the decoding: %s\n", testdata1, ret);

  test_case (s_string_is_equal (testdata1, ret), "The string has the expected value");

  s_free (hex);

  s_free (ret);

  //////////////////////////////////////////////////////////////////////////////

  testdata_size = strlen (testdata2);

  hex = s_base_16_enc ((sbyte *) testdata2, testdata_size, &out_size);

  test_case (s_string_is_equal ("48656C6C6F20576F726C64", hex), "The Base16 data has the expected value.");

  //s_print ("HEX: %s\n", hex);

  hex_size = strlen (hex);

  test_case (out_size == hex_size, "The outputed string has the same length as what the function reports.");

  ret = (schar *) s_base_16_dec (hex, hex_size, &out2_size);

  test_case (s_string_is_equal (testdata2, ret), "The string has the expected value");

  s_free (hex);

  s_free (ret);

  //////////////////////////////////////////////////////////////////////////////

  testdata_size = strlen (testdata4);

  hex = s_base_16_enc ((sbyte *) testdata4, testdata_size, &out_size);

  test_case (s_string_is_equal ("", hex), "The Base16 data has the expected value.");

  s_print ("HEX: %s\n", hex);

  hex_size = strlen (hex);

  test_case (out_size == hex_size, "The outputed string has the same length as what the function reports.");

  ret = (schar *) s_base_16_dec (hex, hex_size, &out2_size);

  s_print ("RET:%s\n", ret);

  test_case (s_string_is_equal (testdata4, ret), "The string has the expected value");

  s_free (hex);

  s_free (ret);

  end_unit ();

}

typedef struct TestBase16Struct {

  sint some_value;

  slong some_other_value;

} TestBase16Struct;

int

test_base_16_object (void) {

  setup_unit ();

  TestBase16Struct * t1 = s_malloc (sizeof (TestBase16Struct));

  t1->some_value = 1337;

  t1->some_other_value = 7331;

  size_t testdata_size = sizeof (TestBase16Struct),

         out_size,

         out2_size;

  schar * t_hex = s_base_16_enc ((sbyte *) t1, testdata_size, &out_size);

  //s_print ("%s\n", t_hex);

  TestBase16Struct * t2 = (TestBase16Struct *) s_base_16_dec (t_hex, out_size, &out2_size);

  //s_print ("TestBase16Struct: some_value: %i, some_other_value: %li\n", t2->some_value, t2->some_other_value);

  test_case (t2->some_value == t1->some_value, "some_value are equal.");

  test_case (t2->some_other_value == t1->some_other_value, "some_other_value are equal");

  free (t_hex);

  free (t1);

  free (t2);

  end_unit ();

}

const schar * testdata3_base_32 = "JBSWY3DPEBGGSYSTKNKFGII=";

int

test_base_32_text (void) {

  setup_unit ();

  end_unit ();

}