Mercurial > hg > ucx / annotate

test/string_tests.c@499e1b465d77 (annotated)

test/string_tests.c

Wed, 27 Feb 2013 14:04:45 +0100

author
Mike Becker <universe@uap-core.de>
date
Wed, 27 Feb 2013 14:04:45 +0100
changeset 97
499e1b465d77
parent 74
dc8bade7f2a3
child 98
0a752853f792
permissions
-rw-r--r--

fixed execution order of tests + added test for sstrtrim

universe@39 1 /*
universe@39 2 *
universe@39 3 */
universe@39 4
universe@39 5 #include "string_tests.h"
universe@39 6
olaf@47 7 UCX_TEST_IMPLEMENT(test_sstr) {
universe@74 8 sstr_t s1 = sstr((char*)"1234");
universe@74 9 sstr_t s2 = sstrn((char*)"ab", 2);
olaf@47 10
olaf@47 11 UCX_TEST_BEGIN
olaf@47 12
olaf@47 13 UCX_TEST_ASSERT(s1.length == 4, "s1 length must be 4");
olaf@47 14 UCX_TEST_ASSERT(s2.length == 2, "s2 length must be 2");
olaf@47 15
olaf@47 16 UCX_TEST_END
olaf@47 17 }
olaf@47 18
olaf@47 19 UCX_TEST_IMPLEMENT(test_sstr_len_cat) {
universe@74 20 sstr_t s1 = S("1234");
universe@74 21 sstr_t s2 = S(".:.:.");
universe@74 22 sstr_t s3 = S("X");
olaf@47 23
olaf@47 24 sstr_t cat;
olaf@47 25
olaf@47 26 size_t len = sstrnlen(3, s1, s2, s3);
olaf@47 27
olaf@47 28 UCX_TEST_BEGIN
olaf@47 29
olaf@47 30 UCX_TEST_ASSERT(len == s1.length + s2.length + s3.length,
olaf@47 31 "sstrnlen returned wrong size");
olaf@47 32
olaf@47 33 len = s1.length + s2.length + s3.length;
olaf@47 34
universe@69 35 cat.ptr = (char*) malloc(len + 1);
olaf@47 36 cat.ptr[len] = 0;
olaf@47 37 cat.length = len;
olaf@47 38
olaf@47 39 sstrncat(3, cat, s1, s2, s3);
olaf@47 40
olaf@47 41 UCX_TEST_ASSERT(cat.ptr[0] == '1', "sstrncat, wrong content");
olaf@47 42 UCX_TEST_ASSERT(cat.ptr[1] == '2', "sstrncat, wrong content");
olaf@47 43 UCX_TEST_ASSERT(cat.ptr[2] == '3', "sstrncat, wrong content");
olaf@47 44 UCX_TEST_ASSERT(cat.ptr[3] == '4', "sstrncat, wrong content");
olaf@47 45 UCX_TEST_ASSERT(cat.ptr[4] == '.', "sstrncat, wrong content");
olaf@47 46 UCX_TEST_ASSERT(cat.ptr[8] == '.', "sstrncat, wrong content");
olaf@47 47 UCX_TEST_ASSERT(cat.ptr[9] == 'X', "sstrncat, wrong content");
olaf@47 48
olaf@47 49 UCX_TEST_END
olaf@47 50
olaf@47 51 free(cat.ptr);
olaf@47 52 }
olaf@47 53
universe@39 54 UCX_TEST_IMPLEMENT(test_sstrsplit) {
universe@39 55
universe@39 56 const char *original = "this,is,a,csv,string";
universe@74 57 sstr_t test = S("this,is,a,csv,string"); /* use copy of original here */
universe@39 58 size_t n;
universe@39 59 sstr_t *list;
universe@39 60
universe@39 61 UCX_TEST_BEGIN
universe@39 62
universe@39 63 /* Nullpointer check */
universe@39 64 n = 0;
universe@39 65 UCX_TEST_ASSERT(sstrsplit(test, ST(""), &n) == NULL,
universe@39 66 "empty delimiter must return NULL");
universe@39 67
universe@39 68 /* no delimiter occurence (ndo) */
universe@39 69 n = 0;
universe@39 70 list = sstrsplit(test, ST("z"), &n);
universe@39 71 UCX_TEST_ASSERT(n == 1, "ndo, list length must be 1");
universe@39 72 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0, "ndo, "
universe@39 73 "original string shall be returned as single list element");
universe@39 74 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 75 "ndo, original has been modified");
universe@39 76 free(list);
universe@39 77
universe@39 78 /* partially matching delimiter (pmd) */
universe@39 79 n = 0;
universe@39 80 list = sstrsplit(test, ST("stringbuilder"), &n);
universe@39 81 UCX_TEST_ASSERT(n == 1, "pmd, list length must be 1");
universe@39 82 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0, "pmd, "
universe@39 83 "original string shall be returned as single list element");
universe@39 84 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 85 "pmd, original has been modified");
universe@39 86 free(list);
universe@39 87
universe@39 88 /* matching single-char delimiter (mscd) */
universe@39 89 n = 0;
universe@39 90 list = sstrsplit(test, ST(","), &n);
universe@39 91 UCX_TEST_ASSERT(n == 5, "mscd, list length must be 5");
universe@39 92 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this") == 0, "mscd, item 0 mismatch");
universe@39 93 UCX_TEST_ASSERT(strcmp(list[1].ptr, "is") == 0, "mscd, item 1 mismatch");
universe@39 94 UCX_TEST_ASSERT(strcmp(list[2].ptr, "a") == 0, "mscd, item 2 mismatch");
universe@39 95 UCX_TEST_ASSERT(strcmp(list[3].ptr, "csv") == 0, "mscd, item 3 mismatch");
universe@39 96 UCX_TEST_ASSERT(strcmp(list[4].ptr, "string")==0, "mscd, item 4 mismatch");
universe@39 97 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 98 "mscd, original has been modified");
universe@39 99 free(list);
universe@39 100
universe@39 101 /* matching multi-char delimiter (mmcd) */
universe@39 102 n = 0;
universe@39 103 list = sstrsplit(test, ST("is"), &n);
universe@39 104 UCX_TEST_ASSERT(n == 3, "mscd, list length must be 3");
universe@39 105 UCX_TEST_ASSERT(strcmp(list[0].ptr, "th") == 0, "mmcd, item 0 mismatch");
universe@39 106 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",") == 0, "mmcd, item 1 mismatch");
universe@39 107 UCX_TEST_ASSERT(strcmp(list[2].ptr, ",a,csv,string") == 0,
universe@39 108 "mmcd, item 2 mismatch");
universe@39 109 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 110 "mmcd, original has been modified");
universe@39 111 free(list);
universe@39 112
universe@39 113 /* bounded list using single-char delimiter (blsc) */
universe@39 114 n = 3;
universe@39 115 list = sstrsplit(test, ST(","), &n);
universe@39 116 UCX_TEST_ASSERT(n == 3, "blsc, list length must be 3");
universe@39 117 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this") == 0, "blsc, item 0 mismatch");
universe@39 118 UCX_TEST_ASSERT(strcmp(list[1].ptr, "is") == 0, "blsc, item 1 mismatch");
universe@39 119 UCX_TEST_ASSERT(strcmp(list[2].ptr, "a,csv,string") == 0,
universe@39 120 "blsc, item 2 mismatch");
universe@39 121 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 122 "blsc, original has been modified");
universe@39 123 free(list);
universe@39 124
universe@39 125 /* bounded list using multi-char delimiter (blmc) */
universe@39 126 n = 2;
universe@39 127 list = sstrsplit(test, ST("is"), &n);
universe@39 128 UCX_TEST_ASSERT(n == 2, "blmc, list length must be 2");
universe@39 129 UCX_TEST_ASSERT(strcmp(list[0].ptr, "th") == 0, "blmc, item 0 mismatch");
universe@39 130 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",is,a,csv,string") == 0,
universe@39 131 "blmc, item 1 mismatch");
universe@39 132 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 133 "blmc, original has been modified");
universe@39 134 free(list);
universe@39 135
universe@39 136 /* start with delimiter (swd) */
universe@39 137 n = 0;
universe@39 138 list = sstrsplit(test, ST("this"), &n);
universe@39 139 UCX_TEST_ASSERT(n == 2, "swd, list length must be 2");
universe@39 140 UCX_TEST_ASSERT(list[0].length == 0, "swd, first item must be empty");
universe@39 141 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",is,a,csv,string") == 0,
universe@39 142 "swd, second item corrupt");
universe@39 143 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 144 "swd, original has been modified");
universe@39 145 free(list);
universe@39 146
universe@39 147 /* end with delimiter (ewd) */
universe@39 148 n = 0;
universe@39 149 list = sstrsplit(test, ST("string"), &n);
universe@39 150 UCX_TEST_ASSERT(n == 2, "ewd, list length must be 2");
universe@39 151 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this,is,a,csv,") == 0,
universe@39 152 "swd, first item corrupt");
universe@39 153 UCX_TEST_ASSERT(list[1].length == 0, "ewd, second item must be empty");
universe@39 154 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 155 "ewd, original has been modified");
universe@39 156 free(list);
universe@39 157
universe@39 158 /* exact match (exm) */
universe@39 159 n = 0;
universe@39 160 list = sstrsplit(test, ST("this,is,a,csv,string"), &n);
universe@71 161 UCX_TEST_ASSERT(n == 0, "exm, list length must be 0");
universe@71 162 UCX_TEST_ASSERT(list == NULL, "exm, list must be NULL");
universe@39 163 free(list);
universe@39 164
universe@39 165 /* substring (subs) */
universe@39 166 n = 0;
universe@39 167 list = sstrsplit(test, ST("this,is,a,csv,string,with,extension"), &n);
universe@39 168 UCX_TEST_ASSERT(n == 1, "subs, list length must be 1");
universe@39 169 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0,
universe@39 170 "subs, single item must be the original string");
universe@39 171 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 172 "subs, original has been modified");
universe@39 173 free(list);
universe@39 174
universe@39 175 UCX_TEST_END
universe@39 176 }
universe@97 177
universe@97 178 UCX_TEST_IMPLEMENT(test_sstrtrim) {
universe@97 179 sstr_t test = sstrtrim(sstr(" ein test "));
universe@97 180 UCX_TEST_BEGIN
universe@97 181 UCX_TEST_ASSERT(strncmp(test.ptr, "ein test", test.length) == 0, "failed");
universe@97 182 UCX_TEST_END
universe@97 183 }

Mercurial Repository: ucx

mercurial