test/string_tests.c

Mon, 14 May 2018 13:15:32 +0200

author
Mike Becker <universe@uap-core.de>
date
Mon, 14 May 2018 13:15:32 +0200
changeset 304
1f9237cfeb26
parent 283
c3b6ff227481
child 306
90b6d69bb499
permissions
-rw-r--r--

fixes typo in modules.md

universe@39 1 /*
universe@103 2 * DO NOT ALTER OR REMOVE COPYRIGHT NOTICES OR THIS HEADER.
universe@39 3 *
universe@259 4 * Copyright 2017 Mike Becker, Olaf Wintermann All rights reserved.
universe@103 5 *
universe@103 6 * Redistribution and use in source and binary forms, with or without
universe@103 7 * modification, are permitted provided that the following conditions are met:
universe@103 8 *
universe@103 9 * 1. Redistributions of source code must retain the above copyright
universe@103 10 * notice, this list of conditions and the following disclaimer.
universe@103 11 *
universe@103 12 * 2. Redistributions in binary form must reproduce the above copyright
universe@103 13 * notice, this list of conditions and the following disclaimer in the
universe@103 14 * documentation and/or other materials provided with the distribution.
universe@103 15 *
universe@103 16 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
universe@103 17 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
universe@103 18 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
universe@103 19 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE
universe@103 20 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
universe@103 21 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
universe@103 22 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
universe@103 23 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
universe@103 24 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
universe@103 25 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
universe@103 26 * POSSIBILITY OF SUCH DAMAGE.
universe@39 27 */
universe@39 28
universe@39 29 #include "string_tests.h"
universe@39 30
universe@283 31 UCX_TEST(test_sstr_macros) {
universe@283 32 sstr_t hello = ST("Hello");
universe@283 33 sstr_t world = S("World");
universe@283 34
universe@283 35 char buf[20];
universe@283 36 snprintf(buf, sizeof(buf), "%" PRIsstr ", %" PRIsstr "!", SFMT(hello), SFMT(world));
universe@283 37
universe@283 38 UCX_TEST_BEGIN
universe@283 39 const char* cmp = "Hello, World!";
universe@283 40 UCX_TEST_ASSERT(!strcmp(cmp, buf), "Something weird happened.");
universe@283 41 UCX_TEST_END
universe@283 42 }
universe@283 43
universe@134 44 UCX_TEST(test_sstr) {
universe@74 45 sstr_t s1 = sstr((char*)"1234");
universe@74 46 sstr_t s2 = sstrn((char*)"ab", 2);
olaf@198 47
olaf@47 48 UCX_TEST_BEGIN
olaf@47 49
olaf@47 50 UCX_TEST_ASSERT(s1.length == 4, "s1 length must be 4");
olaf@47 51 UCX_TEST_ASSERT(s2.length == 2, "s2 length must be 2");
olaf@47 52
olaf@47 53 UCX_TEST_END
olaf@47 54 }
olaf@47 55
universe@179 56 UCX_TEST(test_sstr_len) {
universe@116 57 sstr_t s1 = ST("1234");
universe@116 58 sstr_t s2 = ST(".:.:.");
universe@116 59 sstr_t s3 = ST("X");
olaf@47 60
olaf@184 61 size_t len1 = sstrnlen(1, s1);
olaf@184 62 size_t len2 = sstrnlen(2, s1, s2);
olaf@184 63 size_t len3 = sstrnlen(3, s1, s2, s3);
olaf@47 64
olaf@47 65 UCX_TEST_BEGIN
olaf@47 66
olaf@184 67 UCX_TEST_ASSERT(len1 == 4, "sstrnlen returned wrong size");
olaf@184 68 UCX_TEST_ASSERT(len2 == 9, "sstrnlen returned wrong size");
olaf@184 69 UCX_TEST_ASSERT(len3 == 10, "sstrnlen returned wrong size");
universe@179 70
olaf@47 71 UCX_TEST_END
olaf@47 72 }
olaf@47 73
olaf@180 74
universe@149 75 UCX_TEST(test_sstrchr_sstrrchr) {
universe@148 76 sstr_t str = ST("I will find you - and I will kill you");
universe@148 77 UCX_TEST_BEGIN
universe@148 78
olaf@184 79 sstr_t notfound = sstrchr(str, 'x');
olaf@184 80 UCX_TEST_ASSERT(notfound.length == 0, "string length not 0");
olaf@184 81
universe@148 82 sstr_t result = sstrchr(str, 'w');
universe@148 83 UCX_TEST_ASSERT(result.length == 35, "sstrchr returned wrong length");
universe@148 84 UCX_TEST_ASSERT(strcmp("will find you - and I will kill you", result.ptr)
universe@148 85 == 0, "sstrchr did not return the expected string");
universe@148 86
universe@148 87 result = sstrrchr(str, 'w');
universe@148 88 UCX_TEST_ASSERT(result.length == 13, "sstrrchr returned wrong length");
universe@148 89 UCX_TEST_ASSERT(strcmp("will kill you", result.ptr)
universe@148 90 == 0, "sstrrchr did not return the expected string");
universe@148 91
universe@148 92 UCX_TEST_END
universe@148 93 }
universe@148 94
universe@214 95 UCX_TEST(test_sstrstr) {
universe@214 96 sstr_t str = ST("find the match in this string");
universe@236 97 sstr_t longstr = ST(
universe@236 98 "abcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijkl"
universe@236 99 "mnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghijklmnopqrstuvwx"
universe@236 100 "yzabcdeababababnopqrstuvwxyzabcdefghijklmnopqrstuvwxyzabcdefghij"
universe@236 101 "klmnopqrstuvwxyzaababababababababrstuvwxyzabcdefghijklmnopqrstuv"
universe@236 102 "abababababababababababababababababababababababababababababababab"
universe@236 103 "abababababababababababababababababababababababababababababababab"
universe@236 104 "abababababababababababababababababababababababababababababababab"
universe@236 105 "abababababababababababababababababababababababababababababababab"
universe@236 106 "abababababababababababababababababababababababababababababababab"
universe@236 107 "abababababababababababababababababababababababababababababababab"
universe@236 108 "wxyz1234567890");
universe@236 109 sstr_t longstrpattern = ST(
universe@236 110 "abababababababababababababababababababababababababababababababab"
universe@236 111 "abababababababababababababababababababababababababababababababab"
universe@236 112 "abababababababababababababababababababababababababababababababab"
universe@236 113 "abababababababababababababababababababababababababababababababab"
universe@236 114 "abababababababababababababababababababababababababababababababab"
universe@236 115 );
universe@236 116 sstr_t longstrresult = ST(
universe@236 117 "abababababababababababababababababababababababababababababababab"
universe@236 118 "abababababababababababababababababababababababababababababababab"
universe@236 119 "abababababababababababababababababababababababababababababababab"
universe@236 120 "abababababababababababababababababababababababababababababababab"
universe@236 121 "abababababababababababababababababababababababababababababababab"
universe@236 122 "abababababababababababababababababababababababababababababababab"
universe@236 123 "wxyz1234567890"
universe@236 124 );
universe@214 125 UCX_TEST_BEGIN
universe@214 126
universe@214 127 sstr_t notfound = sstrstr(str, S("no match"));
universe@214 128 UCX_TEST_ASSERT(notfound.length == 0, "no match must return empty string");
universe@214 129
universe@214 130 sstr_t result = sstrstr(str, S("match"));
universe@214 131 UCX_TEST_ASSERT(result.length == 20, "sstrstr returned wrong length");
universe@214 132 UCX_TEST_ASSERT(!strcmp("match in this string", result.ptr),
universe@214 133 "sstrstr did not return the expected string");
universe@214 134
universe@214 135 result = sstrstr(str, S(""));
universe@214 136 UCX_TEST_ASSERT(result.length == str.length,
universe@214 137 "sstrstr with empty match string returned wrong length");
universe@214 138 UCX_TEST_ASSERT(!strcmp(str.ptr, result.ptr),
universe@214 139 "sstrstr with empty match string did not return the original string");
universe@214 140
universe@236 141 result = sstrstr(longstr, longstrpattern);
universe@236 142 UCX_TEST_ASSERT(result.length == longstrresult.length,
universe@236 143 "long string result length incorrect");
universe@236 144 UCX_TEST_ASSERT(!strcmp(result.ptr, longstrresult.ptr),
universe@236 145 "long string result content incorrect");
universe@236 146
universe@214 147 UCX_TEST_END
universe@214 148 }
universe@214 149
universe@149 150 UCX_TEST(test_sstrcmp) {
universe@149 151 sstr_t str = ST("compare this");
universe@149 152
universe@149 153 UCX_TEST_BEGIN
olaf@184 154 UCX_TEST_ASSERT(sstrcmp(str, S("")) == 1, "empty cmp failed");
olaf@184 155 UCX_TEST_ASSERT(sstrcmp(S(""), S("")) == 0, "empty cmp false negative");
universe@149 156 UCX_TEST_ASSERT(sstrcmp(str, S("compare this")) == 0, "false negative");
universe@149 157 UCX_TEST_ASSERT(sstrcmp(str, S("Compare This")) != 0, "false positive");
universe@149 158 UCX_TEST_ASSERT(sstrcmp(str, S("compare tool")) < 0, "memcmp < 0 failed");
universe@149 159 UCX_TEST_ASSERT(sstrcmp(str, S("compare shit")) > 0, "memcmp > 0 failed");
universe@149 160 UCX_TEST_ASSERT(sstrcmp(str, S("compare this not")) < 0, "len < 0 failed");
universe@149 161 UCX_TEST_ASSERT(sstrcmp(str, S("compare")) > 0, "len > 0 failed");
universe@149 162 UCX_TEST_END
universe@149 163 }
universe@149 164
universe@149 165 UCX_TEST(test_sstrcasecmp) {
universe@149 166
universe@149 167 sstr_t str = ST("compare this");
universe@149 168
universe@149 169 UCX_TEST_BEGIN
olaf@184 170 UCX_TEST_ASSERT(sstrcasecmp(str, S("")) == 1, "empty cmp failed");
olaf@184 171 UCX_TEST_ASSERT(sstrcasecmp(S(""), S("")) == 0, "empty cmp false negative");
universe@149 172 UCX_TEST_ASSERT(sstrcasecmp(str, S("compare this")) == 0, "false negative");
universe@149 173 UCX_TEST_ASSERT(sstrcasecmp(str, S("Compare This")) == 0,
universe@149 174 "not ignoring case");
universe@149 175 UCX_TEST_ASSERT(sstrcasecmp(str, S("compare tool")) < 0, "< 0 failed");
universe@149 176 UCX_TEST_ASSERT(sstrcasecmp(str, S("compare shit")) > 0, "> 0 failed");
universe@149 177 UCX_TEST_ASSERT(sstrcasecmp(str, S("compare this not")) < 0,
universe@149 178 "len < 0 failed");
universe@149 179 UCX_TEST_ASSERT(sstrcasecmp(str, S("compare")) > 0, "len > 0 failed");
universe@149 180 UCX_TEST_END
universe@149 181 }
universe@149 182
olaf@180 183
olaf@180 184 UCX_TEST(test_sstrcat) {
olaf@180 185 sstr_t s1 = S("12");
olaf@180 186 sstr_t s2 = S("34");
olaf@180 187 sstr_t s3 = S("56");
olaf@180 188 sstr_t sn = { NULL, 0 };
olaf@180 189
olaf@180 190 UCX_TEST_BEGIN
olaf@180 191
olaf@180 192 sstr_t t1 = sstrcat(2, s1, s2);
olaf@180 193 UCX_TEST_ASSERT(!sstrcmp(t1, S("1234")), "t1: wrong content");
olaf@180 194 free(t1.ptr);
olaf@180 195
olaf@180 196 sstr_t t2 = sstrcat(3, s1, s2, s3);
olaf@180 197 UCX_TEST_ASSERT(!sstrcmp(t2, S("123456")), "t2: wrong content");
olaf@180 198 free(t2.ptr);
olaf@180 199
olaf@180 200 sstr_t t3 = sstrcat(6, s1, sn, s2, sn, s3, sn);
olaf@180 201 UCX_TEST_ASSERT(!sstrcmp(t3, S("123456")), "t3: wrong content");
olaf@180 202 free(t3.ptr);
olaf@180 203
olaf@180 204 sstr_t t4 = sstrcat(2, sn, sn);
olaf@180 205 UCX_TEST_ASSERT(t4.ptr, "t4.ptr is NULL");
olaf@180 206 UCX_TEST_ASSERT(t4.length == 0, "t4 has wrong length");
olaf@180 207 free(t4.ptr);
olaf@180 208
olaf@272 209 // overflow test
olaf@272 210 sstr_t o0;
olaf@272 211 o0.ptr = "";
olaf@272 212 o0.length = ((size_t)-1) - 50;
olaf@272 213 sstr_t o1;
olaf@272 214 o1.ptr = "";
olaf@272 215 o1.length = 100;
olaf@272 216 sstr_t o2;
olaf@272 217 o2.ptr = "";
olaf@272 218 o2.length = 10;
olaf@272 219
olaf@272 220 sstr_t n = sstrcat(2, o0, o1);
olaf@272 221 UCX_TEST_ASSERT(n.ptr == NULL && n.length == 0, "overflow not detected");
olaf@272 222 sstr_t n2 = sstrcat(3, o0, o2, o1);
olaf@272 223 UCX_TEST_ASSERT(n2.ptr == NULL && n2.length == 0, "n2: overflow not detected");
olaf@180 224
olaf@180 225 UCX_TEST_END
olaf@180 226
olaf@180 227 }
olaf@180 228
universe@134 229 UCX_TEST(test_sstrsplit) {
universe@39 230
universe@39 231 const char *original = "this,is,a,csv,string";
universe@116 232 sstr_t test = ST("this,is,a,csv,string"); /* use copy of original here */
universe@173 233 ssize_t n;
universe@39 234 sstr_t *list;
universe@39 235
universe@39 236 UCX_TEST_BEGIN
universe@39 237
universe@39 238 /* Nullpointer check */
universe@39 239 n = 0;
universe@116 240 UCX_TEST_ASSERT(sstrsplit(test, S(""), &n) == NULL,
universe@39 241 "empty delimiter must return NULL");
universe@39 242
universe@39 243 /* no delimiter occurence (ndo) */
universe@39 244 n = 0;
universe@116 245 list = sstrsplit(test, S("z"), &n);
universe@39 246 UCX_TEST_ASSERT(n == 1, "ndo, list length must be 1");
universe@39 247 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0, "ndo, "
universe@39 248 "original string shall be returned as single list element");
universe@39 249 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 250 "ndo, original has been modified");
olaf@147 251 for(int i=0;i<n;i++) {
olaf@147 252 free(list[i].ptr);
olaf@147 253 }
universe@39 254 free(list);
universe@39 255
universe@39 256 /* partially matching delimiter (pmd) */
universe@39 257 n = 0;
universe@116 258 list = sstrsplit(test, S("stringbuilder"), &n);
universe@39 259 UCX_TEST_ASSERT(n == 1, "pmd, list length must be 1");
universe@39 260 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0, "pmd, "
universe@39 261 "original string shall be returned as single list element");
universe@39 262 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 263 "pmd, original has been modified");
olaf@147 264 for(int i=0;i<n;i++) {
olaf@147 265 free(list[i].ptr);
olaf@147 266 }
universe@39 267 free(list);
universe@39 268
universe@39 269 /* matching single-char delimiter (mscd) */
universe@39 270 n = 0;
universe@116 271 list = sstrsplit(test, S(","), &n);
universe@39 272 UCX_TEST_ASSERT(n == 5, "mscd, list length must be 5");
universe@39 273 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this") == 0, "mscd, item 0 mismatch");
universe@39 274 UCX_TEST_ASSERT(strcmp(list[1].ptr, "is") == 0, "mscd, item 1 mismatch");
universe@39 275 UCX_TEST_ASSERT(strcmp(list[2].ptr, "a") == 0, "mscd, item 2 mismatch");
universe@39 276 UCX_TEST_ASSERT(strcmp(list[3].ptr, "csv") == 0, "mscd, item 3 mismatch");
universe@39 277 UCX_TEST_ASSERT(strcmp(list[4].ptr, "string")==0, "mscd, item 4 mismatch");
universe@39 278 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 279 "mscd, original has been modified");
olaf@147 280 for(int i=0;i<n;i++) {
olaf@147 281 free(list[i].ptr);
olaf@147 282 }
universe@39 283 free(list);
universe@39 284
universe@39 285 /* matching multi-char delimiter (mmcd) */
universe@39 286 n = 0;
universe@116 287 list = sstrsplit(test, S("is"), &n);
universe@39 288 UCX_TEST_ASSERT(n == 3, "mscd, list length must be 3");
universe@39 289 UCX_TEST_ASSERT(strcmp(list[0].ptr, "th") == 0, "mmcd, item 0 mismatch");
universe@39 290 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",") == 0, "mmcd, item 1 mismatch");
universe@39 291 UCX_TEST_ASSERT(strcmp(list[2].ptr, ",a,csv,string") == 0,
universe@39 292 "mmcd, item 2 mismatch");
universe@39 293 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 294 "mmcd, original has been modified");
olaf@147 295 for(int i=0;i<n;i++) {
olaf@147 296 free(list[i].ptr);
olaf@147 297 }
universe@39 298 free(list);
universe@39 299
universe@39 300 /* bounded list using single-char delimiter (blsc) */
universe@39 301 n = 3;
universe@116 302 list = sstrsplit(test, S(","), &n);
universe@39 303 UCX_TEST_ASSERT(n == 3, "blsc, list length must be 3");
universe@39 304 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this") == 0, "blsc, item 0 mismatch");
universe@39 305 UCX_TEST_ASSERT(strcmp(list[1].ptr, "is") == 0, "blsc, item 1 mismatch");
universe@39 306 UCX_TEST_ASSERT(strcmp(list[2].ptr, "a,csv,string") == 0,
universe@39 307 "blsc, item 2 mismatch");
universe@39 308 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 309 "blsc, original has been modified");
olaf@147 310 for(int i=0;i<n;i++) {
olaf@147 311 free(list[i].ptr);
olaf@147 312 }
universe@39 313 free(list);
universe@39 314
universe@39 315 /* bounded list using multi-char delimiter (blmc) */
universe@39 316 n = 2;
universe@116 317 list = sstrsplit(test, S("is"), &n);
universe@39 318 UCX_TEST_ASSERT(n == 2, "blmc, list length must be 2");
universe@39 319 UCX_TEST_ASSERT(strcmp(list[0].ptr, "th") == 0, "blmc, item 0 mismatch");
universe@39 320 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",is,a,csv,string") == 0,
universe@39 321 "blmc, item 1 mismatch");
universe@39 322 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 323 "blmc, original has been modified");
olaf@147 324 for(int i=0;i<n;i++) {
olaf@147 325 free(list[i].ptr);
olaf@147 326 }
universe@39 327 free(list);
universe@39 328
universe@39 329 /* start with delimiter (swd) */
universe@39 330 n = 0;
universe@116 331 list = sstrsplit(test, S("this"), &n);
universe@39 332 UCX_TEST_ASSERT(n == 2, "swd, list length must be 2");
universe@39 333 UCX_TEST_ASSERT(list[0].length == 0, "swd, first item must be empty");
universe@39 334 UCX_TEST_ASSERT(strcmp(list[1].ptr, ",is,a,csv,string") == 0,
universe@39 335 "swd, second item corrupt");
universe@39 336 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 337 "swd, original has been modified");
olaf@147 338 for(int i=0;i<n;i++) {
olaf@147 339 free(list[i].ptr);
olaf@147 340 }
universe@39 341 free(list);
universe@39 342
universe@39 343 /* end with delimiter (ewd) */
universe@39 344 n = 0;
universe@116 345 list = sstrsplit(test, S("string"), &n);
universe@39 346 UCX_TEST_ASSERT(n == 2, "ewd, list length must be 2");
universe@39 347 UCX_TEST_ASSERT(strcmp(list[0].ptr, "this,is,a,csv,") == 0,
universe@232 348 "ewd, first item corrupt");
universe@39 349 UCX_TEST_ASSERT(list[1].length == 0, "ewd, second item must be empty");
universe@39 350 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 351 "ewd, original has been modified");
olaf@147 352 for(int i=0;i<n;i++) {
olaf@147 353 free(list[i].ptr);
olaf@147 354 }
universe@39 355 free(list);
universe@232 356
universe@232 357 /* end with delimiter exceed bound (ewdeb) */
universe@232 358 n = 3;
universe@232 359 sstr_t ewdebtest = ST("a,b,c,");
universe@232 360 list = sstrsplit(ewdebtest, S(","), &n);
universe@232 361 UCX_TEST_ASSERT(n == 3, "ewdeb, list length must be 3");
universe@232 362 UCX_TEST_ASSERT(strcmp(list[0].ptr, "a") == 0, "ewdeb, fst item corrupt");
universe@232 363 UCX_TEST_ASSERT(strcmp(list[1].ptr, "b") == 0, "ewdeb, snd item corrupt");
universe@233 364 UCX_TEST_ASSERT(strcmp(list[2].ptr, "c,") == 0, "ewdeb, trd item corrupt");
universe@232 365 for(int i=0;i<n;i++) {
universe@232 366 free(list[i].ptr);
universe@232 367 }
universe@232 368 free(list);
universe@39 369
universe@39 370 /* exact match (exm) */
universe@39 371 n = 0;
universe@116 372 list = sstrsplit(test, S("this,is,a,csv,string"), &n);
universe@71 373 UCX_TEST_ASSERT(n == 0, "exm, list length must be 0");
universe@71 374 UCX_TEST_ASSERT(list == NULL, "exm, list must be NULL");
olaf@147 375 for(int i=0;i<n;i++) {
olaf@147 376 free(list[i].ptr);
olaf@147 377 }
universe@39 378 free(list);
universe@39 379
universe@39 380 /* substring (subs) */
universe@39 381 n = 0;
universe@116 382 list = sstrsplit(test, S("this,is,a,csv,string,with,extension"), &n);
universe@39 383 UCX_TEST_ASSERT(n == 1, "subs, list length must be 1");
universe@39 384 UCX_TEST_ASSERT(strcmp(list[0].ptr, original) == 0,
universe@39 385 "subs, single item must be the original string");
universe@39 386 UCX_TEST_ASSERT(strcmp(test.ptr, original) == 0,
universe@39 387 "subs, original has been modified");
olaf@147 388 for(int i=0;i<n;i++) {
olaf@147 389 free(list[i].ptr);
olaf@147 390 }
universe@39 391 free(list);
universe@213 392
universe@213 393 /* double encounter delimiter (ded) */
universe@213 394 n = 0;
universe@213 395 list = sstrsplit(test, S("is,"), &n);
universe@213 396 UCX_TEST_ASSERT(n == 3, "ded, list length must be 3");
universe@213 397 UCX_TEST_ASSERT(strcmp(list[0].ptr, "th") == 0, "ded, item 0 mismatch");
universe@213 398 UCX_TEST_ASSERT(list[1].length == 0, "ded, item 1 not empty!");
universe@213 399 UCX_TEST_ASSERT(strcmp(list[2].ptr, "a,csv,string") == 0,
universe@213 400 "ded, item 2 mismatch");
universe@213 401 for(int i=0;i<n;i++) {
universe@213 402 free(list[i].ptr);
universe@213 403 }
universe@213 404 free(list);
universe@39 405
universe@39 406 UCX_TEST_END
universe@39 407 }
universe@97 408
universe@134 409 UCX_TEST(test_sstrtrim) {
olaf@104 410 sstr_t t1 = sstrtrim(sstr((char*)" ein test "));
olaf@104 411 sstr_t t2 = sstrtrim(sstr((char*)"abc"));
olaf@104 412 sstr_t t3 = sstrtrim(sstr((char*)" 123"));
olaf@104 413 sstr_t t4 = sstrtrim(sstr((char*)"xyz "));
olaf@104 414 sstr_t t5 = sstrtrim(sstr((char*)" "));
universe@100 415 sstr_t empty = sstrtrim(sstr((char*)""));
universe@97 416 UCX_TEST_BEGIN
olaf@104 417 UCX_TEST_ASSERT(strncmp(t1.ptr, "ein test", t1.length) == 0, "failed");
olaf@104 418 UCX_TEST_ASSERT(strncmp(t2.ptr, "abc", t2.length) == 0, "failed");
olaf@104 419 UCX_TEST_ASSERT(strncmp(t3.ptr, "123", t3.length) == 0, "failed");
olaf@104 420 UCX_TEST_ASSERT(strncmp(t4.ptr, "xyz", t4.length) == 0, "failed");
olaf@104 421 UCX_TEST_ASSERT(t5.length == 0, "string t5 not empty");
universe@98 422 UCX_TEST_ASSERT(empty.length == 0, "empty string failed");
universe@97 423 UCX_TEST_END
universe@97 424 }
universe@146 425
universe@146 426 UCX_TEST(test_sstrprefixsuffix) {
universe@146 427 sstr_t str = ST("test my prefix and my suffix");
universe@146 428 sstr_t empty = ST("");
universe@146 429
universe@146 430 UCX_TEST_BEGIN
universe@146 431
universe@146 432 UCX_TEST_ASSERT(!sstrprefix(empty, S("pref")), "prefix empty string fails");
universe@146 433 UCX_TEST_ASSERT(!sstrsuffix(empty, S("suf")), "suffix empty string fails");
universe@146 434
universe@146 435 UCX_TEST_ASSERT(sstrprefix(str, empty), "empty prefix fails");
universe@146 436 UCX_TEST_ASSERT(sstrsuffix(str, empty), "empty suffix fails");
universe@146 437
universe@146 438 UCX_TEST_ASSERT(sstrprefix(empty, empty), "string and prefix empty fails");
universe@146 439 UCX_TEST_ASSERT(sstrsuffix(empty, empty), "string and suffix empty fails");
universe@146 440
universe@146 441 UCX_TEST_ASSERT(sstrprefix(str, S("test ")), "prefix false negative");
universe@146 442 UCX_TEST_ASSERT(!sstrprefix(str, S("8-) fsck ")), "prefix false positive");
universe@146 443
universe@146 444 UCX_TEST_ASSERT(sstrsuffix(str, S("fix")), "suffix false negative");
universe@146 445 UCX_TEST_ASSERT(!sstrsuffix(str, S("fox")), "suffix false positive");
universe@146 446
universe@146 447
universe@146 448 UCX_TEST_END
universe@146 449 }

mercurial