kc3-lang/kc3/test/character_test.c

Branch : - branch - marshall master pdf v0.1 - tag - HTTPd-v0.1.0 HTTPd-v0.1.1 HTTPd-v0.2.0 v0 v0.1.0 v0.1.1 v0.1.10 v0.1.11 v0.1.12 v0.1.13 v0.1.14 v0.1.15 v0.1.16 v0.1.2 v0.1.3 v0.1.4 v0.1.5 v0.1.6 v0.1.7 v0.1.8 v0.1.9

• Show log

  Commit

• Author : Thomas de Grivel
  Date : 2022-12-31 00:47:27
  Hash : 1d213809
  Message : tests ok

• test/character_test.c

• /* c3
   * Copyright 2022 kmx.io <contact@kmx.io>
   *
   * Permission is hereby granted to use this software excepted
   * on Apple computers granted the above copyright notice and
   * this permission paragraph are included in all copies and
   * substantial portions of this software.
   *
   * THIS SOFTWARE IS PROVIDED "AS-IS" WITHOUT ANY GUARANTEE OF
   * PURPOSE AND PERFORMANCE. IN NO EVENT WHATSOEVER SHALL THE
   * AUTHOR BE CONSIDERED LIABLE FOR THE USE AND PERFORMANCE OF
   * THIS SOFTWARE.
   */
  #include <stdlib.h>
  #include <string.h>
  #include "../libc3/character.h"
  #include "test.h"
  
  void character_test_1 ();
  void character_test_is_digit ();
  void character_test_is_lowercase ();
  void character_test_is_space ();
  void character_test_is_uppercase ();
  void character_test_utf8 ();
  void character_test_utf8_size ();
  
  void character_test ()
  {
    character_test_1();
    character_test_is_digit();
    character_test_is_lowercase();
    character_test_is_space();
    character_test_is_uppercase();
    character_test_utf8_size();
    character_test_utf8();
  }
  
  #define CHARACTER_TEST_1_ASCII(string)        \
    TEST_EQ(character_1(string), string[0])
  
  void character_test_1 ()
  {
    CHARACTER_TEST_1_ASCII("_");
    CHARACTER_TEST_1_ASCII("0");
    CHARACTER_TEST_1_ASCII("1");
    CHARACTER_TEST_1_ASCII("2");
    CHARACTER_TEST_1_ASCII("3");
    CHARACTER_TEST_1_ASCII("4");
    CHARACTER_TEST_1_ASCII("5");
    CHARACTER_TEST_1_ASCII("6");
    CHARACTER_TEST_1_ASCII("7");
    CHARACTER_TEST_1_ASCII("8");
    CHARACTER_TEST_1_ASCII("9");
    CHARACTER_TEST_1_ASCII("A");
    CHARACTER_TEST_1_ASCII("B");
    CHARACTER_TEST_1_ASCII("C");
    CHARACTER_TEST_1_ASCII("X");
    CHARACTER_TEST_1_ASCII("Y");
    CHARACTER_TEST_1_ASCII("Z");
    CHARACTER_TEST_1_ASCII("a");
    CHARACTER_TEST_1_ASCII("b");
    CHARACTER_TEST_1_ASCII("c");
    CHARACTER_TEST_1_ASCII("x");
    CHARACTER_TEST_1_ASCII("y");
    CHARACTER_TEST_1_ASCII("z");
    TEST_EQ(character_1("À"), 192);
    TEST_EQ(character_1("É"), 201);
    TEST_EQ(character_1("à"), 224);
    TEST_EQ(character_1("é"), 233);
    TEST_EQ(character_1("Π"), 928);
    TEST_EQ(character_1("π"), 960);
    TEST_EQ(character_1("꒴"), 42164);
    TEST_EQ(character_1("Ꝝ"), 42844);
    TEST_EQ(character_1("ꝝ"), 42845);
  }
  
  void character_test_is_digit ()
  {
    character c;
    for (c = -10; c < 40; c++)
      TEST_ASSERT(! character_is_digit(c));
    TEST_ASSERT(! character_is_digit('\x00'));
    TEST_ASSERT(! character_is_digit('\x01'));
    TEST_ASSERT(! character_is_digit('\r'));
    TEST_ASSERT(! character_is_digit('\n'));
    TEST_ASSERT(! character_is_digit(' '));
    TEST_ASSERT(! character_is_digit('_'));
    TEST_ASSERT(character_is_digit('0'));
    TEST_ASSERT(character_is_digit('1'));
    TEST_ASSERT(character_is_digit('2'));
    TEST_ASSERT(character_is_digit('3'));
    TEST_ASSERT(character_is_digit('4'));
    TEST_ASSERT(character_is_digit('5'));
    TEST_ASSERT(character_is_digit('6'));
    TEST_ASSERT(character_is_digit('7'));
    TEST_ASSERT(character_is_digit('8'));
    TEST_ASSERT(character_is_digit('9'));
    TEST_ASSERT(! character_is_digit('A'));
    TEST_ASSERT(! character_is_digit('B'));
    TEST_ASSERT(! character_is_digit('C'));
    TEST_ASSERT(! character_is_digit('X'));
    TEST_ASSERT(! character_is_digit('Y'));
    TEST_ASSERT(! character_is_digit('Z'));
    TEST_ASSERT(! character_is_digit(character_1("À")));
    TEST_ASSERT(! character_is_digit(character_1("É")));
    TEST_ASSERT(! character_is_digit(character_1("Π")));
    TEST_ASSERT(! character_is_digit(character_1("Ꝝ")));
    TEST_ASSERT(! character_is_digit(character_1("꒴")));
    TEST_ASSERT(! character_is_digit(character_1("𐅀")));
    TEST_ASSERT(! character_is_digit('a'));
    TEST_ASSERT(! character_is_digit('b'));
    TEST_ASSERT(! character_is_digit('c'));
    TEST_ASSERT(! character_is_digit('x'));
    TEST_ASSERT(! character_is_digit('y'));
    TEST_ASSERT(! character_is_digit('z'));
    TEST_ASSERT(! character_is_digit(character_1("à")));
    TEST_ASSERT(! character_is_digit(character_1("é")));
    TEST_ASSERT(! character_is_digit(character_1("π")));
    TEST_ASSERT(! character_is_digit(character_1("ꝝ")));
  }
  
  void character_test_is_lowercase ()
  {
    character c;
    for (c = -10; c < 40; c++)
      TEST_ASSERT(! character_is_lowercase(c));
    TEST_ASSERT(! character_is_lowercase('\x00'));
    TEST_ASSERT(! character_is_lowercase('\x01'));
    TEST_ASSERT(! character_is_lowercase('\r'));
    TEST_ASSERT(! character_is_lowercase('\n'));
    TEST_ASSERT(! character_is_lowercase(' '));
    TEST_ASSERT(! character_is_lowercase('_'));
    TEST_ASSERT(! character_is_lowercase('0'));
    TEST_ASSERT(! character_is_lowercase('1'));
    TEST_ASSERT(! character_is_lowercase('8'));
    TEST_ASSERT(! character_is_lowercase('9'));
    TEST_ASSERT(! character_is_lowercase('A'));
    TEST_ASSERT(! character_is_lowercase('B'));
    TEST_ASSERT(! character_is_lowercase('C'));
    TEST_ASSERT(! character_is_lowercase('X'));
    TEST_ASSERT(! character_is_lowercase('Y'));
    TEST_ASSERT(! character_is_lowercase('Z'));
    TEST_ASSERT(! character_is_lowercase(character_1("À")));
    TEST_ASSERT(! character_is_lowercase(character_1("É")));
    TEST_ASSERT(! character_is_lowercase(character_1("Π")));
    TEST_ASSERT(! character_is_lowercase(character_1("Ꝝ")));
    TEST_ASSERT(! character_is_lowercase(character_1("꒴")));
    TEST_ASSERT(! character_is_lowercase(character_1("𐅀")));
    TEST_ASSERT(character_is_lowercase('a'));
    TEST_ASSERT(character_is_lowercase('b'));
    TEST_ASSERT(character_is_lowercase('c'));
    TEST_ASSERT(character_is_lowercase('x'));
    TEST_ASSERT(character_is_lowercase('y'));
    TEST_ASSERT(character_is_lowercase('z'));
    TEST_ASSERT(character_is_lowercase(character_1("à")));
    TEST_ASSERT(character_is_lowercase(character_1("é")));
    TEST_ASSERT(character_is_lowercase(character_1("π")));
    TEST_ASSERT(character_is_lowercase(character_1("ꝝ")));
  }
  
  void character_test_is_space ()
  {
    TEST_ASSERT(character_is_space('\n'));
    TEST_ASSERT(character_is_space('\r'));
    TEST_ASSERT(character_is_space('\t'));
    TEST_ASSERT(character_is_space('\v'));
    TEST_ASSERT(character_is_space(' '));
    TEST_ASSERT(! character_is_space('_'));
    TEST_ASSERT(! character_is_space('0'));
    TEST_ASSERT(! character_is_space('1'));
    TEST_ASSERT(! character_is_space('8'));
    TEST_ASSERT(! character_is_space('9'));
    TEST_ASSERT(! character_is_space('a'));
    TEST_ASSERT(! character_is_space('b'));
    TEST_ASSERT(! character_is_space('c'));
    TEST_ASSERT(! character_is_space('x'));
    TEST_ASSERT(! character_is_space('y'));
    TEST_ASSERT(! character_is_space('z'));
    TEST_ASSERT(! character_is_space(character_1("à")));
    TEST_ASSERT(! character_is_space(character_1("é")));
    TEST_ASSERT(! character_is_space(character_1("π")));
    TEST_ASSERT(! character_is_space(character_1("ꝝ")));
    TEST_ASSERT(! character_is_space(character_1("꒴")));
    TEST_ASSERT(! character_is_space(character_1("𐅀")));
    TEST_ASSERT(! character_is_space('A'));
    TEST_ASSERT(! character_is_space('B'));
    TEST_ASSERT(! character_is_space('C'));
    TEST_ASSERT(! character_is_space('X'));
    TEST_ASSERT(! character_is_space('Y'));
    TEST_ASSERT(! character_is_space('Z'));
    TEST_ASSERT(! character_is_space(character_1("À")));
    TEST_ASSERT(! character_is_space(character_1("É")));
    TEST_ASSERT(! character_is_space(character_1("Π")));
    TEST_ASSERT(! character_is_space(character_1("Ꝝ")));
  }
  
  void character_test_is_uppercase ()
  {
    character c;
    for (c = -10; c < 40; c++)
      TEST_ASSERT(! character_is_uppercase(c));
    TEST_ASSERT(! character_is_uppercase(' '));
    TEST_ASSERT(! character_is_uppercase('_'));
    TEST_ASSERT(! character_is_uppercase('0'));
    TEST_ASSERT(! character_is_uppercase('1'));
    TEST_ASSERT(! character_is_uppercase('8'));
    TEST_ASSERT(! character_is_uppercase('9'));
    TEST_ASSERT(! character_is_uppercase('a'));
    TEST_ASSERT(! character_is_uppercase('b'));
    TEST_ASSERT(! character_is_uppercase('c'));
    TEST_ASSERT(! character_is_uppercase('x'));
    TEST_ASSERT(! character_is_uppercase('y'));
    TEST_ASSERT(! character_is_uppercase('z'));
    TEST_ASSERT(! character_is_uppercase(character_1("à")));
    TEST_ASSERT(! character_is_uppercase(character_1("é")));
    TEST_ASSERT(! character_is_uppercase(character_1("π")));
    TEST_ASSERT(! character_is_uppercase(character_1("ꝝ")));
    TEST_ASSERT(! character_is_uppercase(character_1("꒴")));
    TEST_ASSERT(! character_is_uppercase(character_1("𐅀")));
    TEST_ASSERT(character_is_uppercase('A'));
    TEST_ASSERT(character_is_uppercase('B'));
    TEST_ASSERT(character_is_uppercase('C'));
    TEST_ASSERT(character_is_uppercase('X'));
    TEST_ASSERT(character_is_uppercase('Y'));
    TEST_ASSERT(character_is_uppercase('Z'));
    TEST_ASSERT(character_is_uppercase(character_1("À")));
    TEST_ASSERT(character_is_uppercase(character_1("É")));
    TEST_ASSERT(character_is_uppercase(character_1("Π")));
    TEST_ASSERT(character_is_uppercase(character_1("Ꝝ")));
  }
  
  void character_test_utf8 ()
  {
  }
  
  void character_test_utf8_size ()
  {
    character c;
    for (c = -10; c < 0; c++)
      TEST_EQ(character_utf8_size(c), -1);
    TEST_EQ(character_utf8_size('_'), 1);
    TEST_EQ(character_utf8_size('0'), 1);
    TEST_EQ(character_utf8_size('1'), 1);
    TEST_EQ(character_utf8_size('2'), 1);
    TEST_EQ(character_utf8_size('7'), 1);
    TEST_EQ(character_utf8_size('8'), 1);
    TEST_EQ(character_utf8_size('9'), 1);
    TEST_EQ(character_utf8_size('A'), 1);
    TEST_EQ(character_utf8_size('B'), 1);
    TEST_EQ(character_utf8_size('C'), 1);
    TEST_EQ(character_utf8_size('X'), 1);
    TEST_EQ(character_utf8_size('Y'), 1);
    TEST_EQ(character_utf8_size('Z'), 1);
    TEST_EQ(character_utf8_size('a'), 1);
    TEST_EQ(character_utf8_size('b'), 1);
    TEST_EQ(character_utf8_size('c'), 1);
    TEST_EQ(character_utf8_size('x'), 1);
    TEST_EQ(character_utf8_size('y'), 1);
    TEST_EQ(character_utf8_size('z'), 1);
    TEST_EQ(character_utf8_size(character_1("À")), 2);
    TEST_EQ(character_utf8_size(character_1("É")), 2);
    TEST_EQ(character_utf8_size(character_1("à")), 2);
    TEST_EQ(character_utf8_size(character_1("é")), 2);
    TEST_EQ(character_utf8_size(character_1("Π")), 2);
    TEST_EQ(character_utf8_size(character_1("Ꝝ")), 3);
    TEST_EQ(character_utf8_size(character_1("꒴")), 3);
    TEST_EQ(character_utf8_size(character_1("𐅀")), 4);
  }