mirror/glibc
2
0
Fork 0
mirror of git://sourceware.org/git/glibc.git synced 2025-04-06 14:10:30 +08:00
Code Issues Packages Projects Releases Wiki Activity

(main): Update strsep tests from 2.1.

Browse Source
This commit is contained in:
Ulrich Drepper 1998-03-14 09:57:39 +00:00
parent 44bf4ad4e1
commit 8044b15fbe
1 changed files with 70 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

104
string/tester.c
View File

@ -472,50 +472,86 @@ DEFUN(main, (argc, argv), int argc AND char **argv)
equal(strsep(&cp, ", "), "", 9);
equal(strsep(&cp, ", "), "first", 10); /* Extra delims, 1 tok. */
equal(strsep(&cp, ", "), "", 11);
check(strsep(&cp, ", ") == NULL, 12);
equal(strsep(&cp, ", "), "", 12);
check(strsep(&cp, ", ") == NULL, 13);
cp = strcpy(one, "1a, 1b; 2a, 2b");
equal(strsep(&cp, ", "), "1a", 13); /* Changing delim lists. */
equal(strsep(&cp, ", "), "", 14);
equal(strsep(&cp, "; "), "1b", 15);
equal(strsep(&cp, ", "), "", 16);
equal(strsep(&cp, ", "), "2a", 17);
equal(strsep(&cp, ", "), "1a", 14); /* Changing delim lists. */
equal(strsep(&cp, ", "), "", 15);
equal(strsep(&cp, "; "), "1b", 16);
equal(strsep(&cp, ", "), "", 17);
equal(strsep(&cp, ", "), "2a", 18);
cp = strcpy(two, "x-y");
equal(strsep(&cp, "-"), "x", 18); /* New string before done. */
equal(strsep(&cp, "-"), "y", 19);
check(strsep(&cp, "-") == NULL, 20);
cp = strcpy(one, "a,b, c,, ,d");
equal(strsep(&cp, ", "), "a", 21); /* Different separators. */
equal(strsep(&cp, ", "), "b", 22);
equal(strsep(&cp, " ,"), "", 23);
equal(strsep(&cp, " ,"), "c", 24); /* Permute list too. */
equal(strsep(&cp, " ,"), "", 25);
equal(strsep(&cp, "-"), "x", 19); /* New string before done. */
equal(strsep(&cp, "-"), "y", 20);
check(strsep(&cp, "-") == NULL, 21);
cp = strcpy(one, "a,b, c,, ,d ");
equal(strsep(&cp, ", "), "a", 22); /* Different separators. */
equal(strsep(&cp, ", "), "b", 23);
equal(strsep(&cp, " ,"), "", 24);
equal(strsep(&cp, " ,"), "c", 25); /* Permute list too. */
equal(strsep(&cp, " ,"), "", 26);
equal(strsep(&cp, " ,"), "", 27);
equal(strsep(&cp, " ,"), "d", 28);
check(strsep(&cp, ", ") == NULL, 29);
check(strsep(&cp, ", ") == NULL, 30); /* Persistence. */
equal(strsep(&cp, " ,"), "", 28);
equal(strsep(&cp, " ,"), "d", 29);
equal(strsep(&cp, " ,"), "", 30);
check(strsep(&cp, ", ") == NULL, 31);
check(strsep(&cp, ", ") == NULL, 32); /* Persistence. */
cp = strcpy(one, ", ");
equal(strsep(&cp, ", "), "", 31);
equal(strsep(&cp, ", "), "", 32);
check(strsep(&cp, ", ") == NULL, 33); /* No tokens. */
equal(strsep(&cp, ", "), "", 33);
equal(strsep(&cp, ", "), "", 34);
equal(strsep(&cp, ", "), "", 35);
check(strsep(&cp, ", ") == NULL, 36); /* No tokens. */
cp = strcpy(one, "");
check(strsep(&cp, ", ") == NULL, 34); /* Empty string. */
equal(strsep(&cp, ", "), "", 37);
check(strsep(&cp, ", ") == NULL, 38); /* Empty string. */
cp = strcpy(one, "abc");
equal(strsep(&cp, ", "), "abc", 35); /* No delimiters. */
check(strsep(&cp, ", ") == NULL, 36);
equal(strsep(&cp, ", "), "abc", 39); /* No delimiters. */
check(strsep(&cp, ", ") == NULL, 40);
cp = strcpy(one, "abc");
equal(strsep(&cp, ""), "abc", 37); /* Empty delimiter list. */
check(strsep(&cp, "") == NULL, 38);
equal(strsep(&cp, ""), "abc", 41); /* Empty delimiter list. */
check(strsep(&cp, "") == NULL, 42);
(void) strcpy(one, "abcdefgh");
cp = strcpy(one, "a,b,c");
equal(strsep(&cp, ","), "a", 39); /* Basics again... */
equal(strsep(&cp, ","), "b", 40);
equal(strsep(&cp, ","), "c", 41);
check(strsep(&cp, ",") == NULL, 42);
equal(one+6, "gh", 43); /* Stomped past end? */
equal(one, "a", 44); /* Stomped old tokens? */
equal(one+2, "b", 45);
equal(one+4, "c", 46);
equal(strsep(&cp, ","), "a", 43); /* Basics again... */
equal(strsep(&cp, ","), "b", 44);
equal(strsep(&cp, ","), "c", 45);
check(strsep(&cp, ",") == NULL, 46);
equal(one+6, "gh", 47); /* Stomped past end? */
equal(one, "a", 48); /* Stomped old tokens? */
equal(one+2, "b", 49);
equal(one+4, "c", 50);
{
char text[] = "This,is,a,test";
char *list = strdupa (text);
equal (strsep (&list, ","), "This", 51);
equal (strsep (&list, ","), "is", 52);
equal (strsep (&list, ","), "a", 53);
equal (strsep (&list, ","), "test", 54);
check (strsep (&list, ",") == NULL, 55);
}
cp = strcpy(one, "a,b, c,, ,d,");
equal(strsep(&cp, ","), "a", 56); /* Different separators. */
equal(strsep(&cp, ","), "b", 57);
equal(strsep(&cp, ","), " c", 58); /* Permute list too. */
equal(strsep(&cp, ","), "", 59);
equal(strsep(&cp, ","), " ", 60);
equal(strsep(&cp, ","), "d", 61);
equal(strsep(&cp, ","), "", 62);
check(strsep(&cp, ",") == NULL, 63);
check(strsep(&cp, ",") == NULL, 64); /* Persistence. */
cp = strcpy(one, "a,b, c,, ,d,");
equal(strsep(&cp, "xy,"), "a", 65); /* Different separators. */
equal(strsep(&cp, "x,y"), "b", 66);
equal(strsep(&cp, ",xy"), " c", 67); /* Permute list too. */
equal(strsep(&cp, "xy,"), "", 68);
equal(strsep(&cp, "x,y"), " ", 69);
equal(strsep(&cp, ",xy"), "d", 70);
equal(strsep(&cp, "xy,"), "", 71);
check(strsep(&cp, "x,y") == NULL, 72);
check(strsep(&cp, ",xy") == NULL, 73); /* Persistence. */
/* memcmp. */
it = "memcmp";