SLRE(Super Light Regular Expression library) Unit Test Code.

Dependencies:   mbed

Committer:
monpetit
Date:
Thu Jul 28 08:10:30 2016 +0000
Revision:
0:3ca3835f816e
initial commit: unit tests are passed.

Who changed what in which revision?

UserRevisionLine numberNew contents of line
monpetit 0:3ca3835f816e 1 #include "mbed.h"
monpetit 0:3ca3835f816e 2 #include <stdio.h>
monpetit 0:3ca3835f816e 3 #include <stdlib.h>
monpetit 0:3ca3835f816e 4 #include <string.h>
monpetit 0:3ca3835f816e 5
monpetit 0:3ca3835f816e 6 #include "slre.h"
monpetit 0:3ca3835f816e 7
monpetit 0:3ca3835f816e 8 typedef uint8_t byte;
monpetit 0:3ca3835f816e 9
monpetit 0:3ca3835f816e 10 DigitalOut myled(LED1); // PA_5
monpetit 0:3ca3835f816e 11 DigitalOut led2(PC_8);
monpetit 0:3ca3835f816e 12
monpetit 0:3ca3835f816e 13
monpetit 0:3ca3835f816e 14 static int static_total_tests = 0;
monpetit 0:3ca3835f816e 15 static int static_failed_tests = 0;
monpetit 0:3ca3835f816e 16
monpetit 0:3ca3835f816e 17 #define FAIL(str, line) do { \
monpetit 0:3ca3835f816e 18 printf("Fail on line %d: [%s]\n", line, str); \
monpetit 0:3ca3835f816e 19 static_failed_tests++; \
monpetit 0:3ca3835f816e 20 } while (0)
monpetit 0:3ca3835f816e 21
monpetit 0:3ca3835f816e 22 #define ASSERT(expr) do { \
monpetit 0:3ca3835f816e 23 static_total_tests++; \
monpetit 0:3ca3835f816e 24 if (!(expr)) FAIL(#expr, __LINE__); \
monpetit 0:3ca3835f816e 25 } while (0)
monpetit 0:3ca3835f816e 26
monpetit 0:3ca3835f816e 27 /* Regex must have exactly one bracket pair */
monpetit 0:3ca3835f816e 28 static char *slre_replace(const char *regex, const char *buf,
monpetit 0:3ca3835f816e 29 const char *sub)
monpetit 0:3ca3835f816e 30 {
monpetit 0:3ca3835f816e 31 char *s = NULL;
monpetit 0:3ca3835f816e 32 int n, n1, n2, n3, s_len, len = strlen(buf);
monpetit 0:3ca3835f816e 33 struct slre_cap cap = { NULL, 0 };
monpetit 0:3ca3835f816e 34
monpetit 0:3ca3835f816e 35 do {
monpetit 0:3ca3835f816e 36 s_len = s == NULL ? 0 : strlen(s);
monpetit 0:3ca3835f816e 37 if ((n = slre_match(regex, buf, len, &cap, 1, 0)) > 0) {
monpetit 0:3ca3835f816e 38 n1 = cap.ptr - buf, n2 = strlen(sub),
monpetit 0:3ca3835f816e 39 n3 = &buf[n] - &cap.ptr[cap.len];
monpetit 0:3ca3835f816e 40 } else {
monpetit 0:3ca3835f816e 41 n1 = len, n2 = 0, n3 = 0;
monpetit 0:3ca3835f816e 42 }
monpetit 0:3ca3835f816e 43 s = (char *) realloc(s, s_len + n1 + n2 + n3 + 1);
monpetit 0:3ca3835f816e 44 memcpy(s + s_len, buf, n1);
monpetit 0:3ca3835f816e 45 memcpy(s + s_len + n1, sub, n2);
monpetit 0:3ca3835f816e 46 memcpy(s + s_len + n1 + n2, cap.ptr + cap.len, n3);
monpetit 0:3ca3835f816e 47 s[s_len + n1 + n2 + n3] = '\0';
monpetit 0:3ca3835f816e 48
monpetit 0:3ca3835f816e 49 buf += n > 0 ? n : len;
monpetit 0:3ca3835f816e 50 len -= n > 0 ? n : len;
monpetit 0:3ca3835f816e 51 } while (len > 0);
monpetit 0:3ca3835f816e 52
monpetit 0:3ca3835f816e 53 return s;
monpetit 0:3ca3835f816e 54 }
monpetit 0:3ca3835f816e 55
monpetit 0:3ca3835f816e 56
monpetit 0:3ca3835f816e 57 uint32_t slre_test(void)
monpetit 0:3ca3835f816e 58 {
monpetit 0:3ca3835f816e 59 struct slre_cap caps[10];
monpetit 0:3ca3835f816e 60
monpetit 0:3ca3835f816e 61 // reset test result counts;
monpetit 0:3ca3835f816e 62 static_total_tests = 0;
monpetit 0:3ca3835f816e 63 static_failed_tests = 0;
monpetit 0:3ca3835f816e 64
monpetit 0:3ca3835f816e 65 /* Metacharacters */
monpetit 0:3ca3835f816e 66 ASSERT(slre_match("$", "abcd", 4, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 67 ASSERT(slre_match("^", "abcd", 4, NULL, 0, 0) == 0);
monpetit 0:3ca3835f816e 68 ASSERT(slre_match("x|^", "abcd", 4, NULL, 0, 0) == 0);
monpetit 0:3ca3835f816e 69 ASSERT(slre_match("x|$", "abcd", 4, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 70 ASSERT(slre_match("x", "abcd", 4, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 71 ASSERT(slre_match(".", "abcd", 4, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 72 ASSERT(slre_match("^.*\\\\.*$", "c:\\Tools", 8, NULL, 0, SLRE_IGNORE_CASE)
monpetit 0:3ca3835f816e 73 == 8);
monpetit 0:3ca3835f816e 74 ASSERT(slre_match("\\", "a", 1, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 75 ASSERT(slre_match("\\x", "a", 1, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 76 ASSERT(slre_match("\\x1", "a", 1, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 77 ASSERT(slre_match("\\x20", " ", 1, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 78
monpetit 0:3ca3835f816e 79 ASSERT(slre_match("^.+$", "", 0, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 80 ASSERT(slre_match("^(.+)$", "", 0, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 81 ASSERT(slre_match("^([\\+-]?)([\\d]+)$", "+", 1,
monpetit 0:3ca3835f816e 82 caps, 10, SLRE_IGNORE_CASE) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 83 ASSERT(slre_match("^([\\+-]?)([\\d]+)$", "+27", 3,
monpetit 0:3ca3835f816e 84 caps, 10, SLRE_IGNORE_CASE) == 3);
monpetit 0:3ca3835f816e 85 ASSERT(caps[0].len == 1);
monpetit 0:3ca3835f816e 86 ASSERT(caps[0].ptr[0] == '+');
monpetit 0:3ca3835f816e 87 ASSERT(caps[1].len == 2);
monpetit 0:3ca3835f816e 88 ASSERT(memcmp(caps[1].ptr, "27", 2) == 0);
monpetit 0:3ca3835f816e 89
monpetit 0:3ca3835f816e 90 ASSERT(slre_match("tel:\\+(\\d+[\\d-]+\\d)",
monpetit 0:3ca3835f816e 91 "tel:+1-201-555-0123;a=b", 23, caps, 10, 0) == 19);
monpetit 0:3ca3835f816e 92 ASSERT(caps[0].len == 14);
monpetit 0:3ca3835f816e 93 ASSERT(memcmp(caps[0].ptr, "1-201-555-0123", 14) == 0);
monpetit 0:3ca3835f816e 94
monpetit 0:3ca3835f816e 95 /* Character sets */
monpetit 0:3ca3835f816e 96 ASSERT(slre_match("[abc]", "1c2", 3, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 97 ASSERT(slre_match("[abc]", "1C2", 3, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 98 ASSERT(slre_match("[abc]", "1C2", 3, NULL, 0, SLRE_IGNORE_CASE) == 2);
monpetit 0:3ca3835f816e 99 ASSERT(slre_match("[.2]", "1C2", 3, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 100 ASSERT(slre_match("[\\S]+", "ab cd", 5, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 101 ASSERT(slre_match("[\\S]+\\s+[tyc]*", "ab cd", 5, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 102 ASSERT(slre_match("[\\d]", "ab cd", 5, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 103 ASSERT(slre_match("[^\\d]", "ab cd", 5, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 104 ASSERT(slre_match("[^\\d]+", "abc123", 6, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 105 ASSERT(slre_match("[1-5]+", "123456789", 9, NULL, 0, 0) == 5);
monpetit 0:3ca3835f816e 106 ASSERT(slre_match("[1-5a-c]+", "123abcdef", 9, NULL, 0, 0) == 6);
monpetit 0:3ca3835f816e 107 ASSERT(slre_match("[1-5a-]+", "123abcdef", 9, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 108 ASSERT(slre_match("[1-5a-]+", "123a--2oo", 9, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 109 ASSERT(slre_match("[htps]+://", "https://", 8, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 110 ASSERT(slre_match("[^\\s]+", "abc def", 7, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 111 ASSERT(slre_match("[^fc]+", "abc def", 7, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 112 ASSERT(slre_match("[^d\\sf]+", "abc def", 7, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 113
monpetit 0:3ca3835f816e 114 /* Flags - case sensitivity */
monpetit 0:3ca3835f816e 115 ASSERT(slre_match("FO", "foo", 3, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 116 ASSERT(slre_match("FO", "foo", 3, NULL, 0, SLRE_IGNORE_CASE) == 2);
monpetit 0:3ca3835f816e 117 ASSERT(slre_match("(?m)FO", "foo", 3, NULL, 0, 0) ==
monpetit 0:3ca3835f816e 118 SLRE_UNEXPECTED_QUANTIFIER);
monpetit 0:3ca3835f816e 119 ASSERT(slre_match("(?m)x", "foo", 3, NULL, 0, 0) ==
monpetit 0:3ca3835f816e 120 SLRE_UNEXPECTED_QUANTIFIER);
monpetit 0:3ca3835f816e 121
monpetit 0:3ca3835f816e 122 ASSERT(slre_match("fo", "foo", 3, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 123 ASSERT(slre_match(".+", "foo", 3, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 124 ASSERT(slre_match(".+k", "fooklmn", 7, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 125 ASSERT(slre_match(".+k.", "fooklmn", 7, NULL, 0, 0) == 5);
monpetit 0:3ca3835f816e 126 ASSERT(slre_match("p+", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 127 ASSERT(slre_match("ok", "fooklmn", 7, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 128 ASSERT(slre_match("lmno", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 129 ASSERT(slre_match("mn.", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 130 ASSERT(slre_match("o", "fooklmn", 7, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 131 ASSERT(slre_match("^o", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 132 ASSERT(slre_match("^", "fooklmn", 7, NULL, 0, 0) == 0);
monpetit 0:3ca3835f816e 133 ASSERT(slre_match("n$", "fooklmn", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 134 ASSERT(slre_match("n$k", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 135 ASSERT(slre_match("l$", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 136 ASSERT(slre_match(".$", "fooklmn", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 137 ASSERT(slre_match("a?", "fooklmn", 7, NULL, 0, 0) == 0);
monpetit 0:3ca3835f816e 138 ASSERT(slre_match("^a*CONTROL", "CONTROL", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 139 ASSERT(slre_match("^[a]*CONTROL", "CONTROL", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 140 ASSERT(slre_match("^(a*)CONTROL", "CONTROL", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 141 ASSERT(slre_match("^(a*)?CONTROL", "CONTROL", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 142
monpetit 0:3ca3835f816e 143 ASSERT(slre_match("\\_", "abc", 3, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 144 ASSERT(slre_match("+", "fooklmn", 7, NULL, 0, 0) == SLRE_UNEXPECTED_QUANTIFIER);
monpetit 0:3ca3835f816e 145 ASSERT(slre_match("()+", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 146 ASSERT(slre_match("\\x", "12", 2, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 147 ASSERT(slre_match("\\xhi", "12", 2, NULL, 0, 0) == SLRE_INVALID_METACHARACTER);
monpetit 0:3ca3835f816e 148 ASSERT(slre_match("\\x20", "_ J", 3, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 149 ASSERT(slre_match("\\x4A", "_ J", 3, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 150 ASSERT(slre_match("\\d+", "abc123def", 9, NULL, 0, 0) == 6);
monpetit 0:3ca3835f816e 151
monpetit 0:3ca3835f816e 152 /* Balancing brackets */
monpetit 0:3ca3835f816e 153 ASSERT(slre_match("(x))", "fooklmn", 7, NULL, 0, 0) == SLRE_UNBALANCED_BRACKETS);
monpetit 0:3ca3835f816e 154 ASSERT(slre_match("(", "fooklmn", 7, NULL, 0, 0) == SLRE_UNBALANCED_BRACKETS);
monpetit 0:3ca3835f816e 155
monpetit 0:3ca3835f816e 156 ASSERT(slre_match("klz?mn", "fooklmn", 7, NULL, 0, 0) == 7);
monpetit 0:3ca3835f816e 157 ASSERT(slre_match("fa?b", "fooklmn", 7, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 158
monpetit 0:3ca3835f816e 159 /* Brackets & capturing */
monpetit 0:3ca3835f816e 160 ASSERT(slre_match("^(te)", "tenacity subdues all", 20, caps, 10, 0) == 2);
monpetit 0:3ca3835f816e 161 ASSERT(slre_match("(bc)", "abcdef", 6, caps, 10, 0) == 3);
monpetit 0:3ca3835f816e 162 ASSERT(slre_match(".(d.)", "abcdef", 6, caps, 10, 0) == 5);
monpetit 0:3ca3835f816e 163 ASSERT(slre_match(".(d.)\\)?", "abcdef", 6, caps, 10, 0) == 5);
monpetit 0:3ca3835f816e 164 ASSERT(caps[0].len == 2);
monpetit 0:3ca3835f816e 165 ASSERT(memcmp(caps[0].ptr, "de", 2) == 0);
monpetit 0:3ca3835f816e 166 ASSERT(slre_match("(.+)", "123", 3, caps, 10, 0) == 3);
monpetit 0:3ca3835f816e 167 ASSERT(slre_match("(2.+)", "123", 3, caps, 10, 0) == 3);
monpetit 0:3ca3835f816e 168 ASSERT(caps[0].len == 2);
monpetit 0:3ca3835f816e 169 ASSERT(memcmp(caps[0].ptr, "23", 2) == 0);
monpetit 0:3ca3835f816e 170 ASSERT(slre_match("(.+2)", "123", 3, caps, 10, 0) == 2);
monpetit 0:3ca3835f816e 171 ASSERT(caps[0].len == 2);
monpetit 0:3ca3835f816e 172 ASSERT(memcmp(caps[0].ptr, "12", 2) == 0);
monpetit 0:3ca3835f816e 173 ASSERT(slre_match("(.*(2.))", "123", 3, caps, 10, 0) == 3);
monpetit 0:3ca3835f816e 174 ASSERT(slre_match("(.)(.)", "123", 3, caps, 10, 0) == 2);
monpetit 0:3ca3835f816e 175 ASSERT(slre_match("(\\d+)\\s+(\\S+)", "12 hi", 5, caps, 10, 0) == 5);
monpetit 0:3ca3835f816e 176 ASSERT(slre_match("ab(cd)+ef", "abcdcdef", 8, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 177 ASSERT(slre_match("ab(cd)*ef", "abcdcdef", 8, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 178 ASSERT(slre_match("ab(cd)+?ef", "abcdcdef", 8, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 179 ASSERT(slre_match("ab(cd)+?.", "abcdcdef", 8, NULL, 0, 0) == 5);
monpetit 0:3ca3835f816e 180 ASSERT(slre_match("ab(cd)?", "abcdcdef", 8, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 181 ASSERT(slre_match("a(b)(cd)", "abcdcdef", 8, caps, 1, 0) ==
monpetit 0:3ca3835f816e 182 SLRE_CAPS_ARRAY_TOO_SMALL);
monpetit 0:3ca3835f816e 183 ASSERT(slre_match("(.+/\\d+\\.\\d+)\\.jpg$", "/foo/bar/12.34.jpg", 18,
monpetit 0:3ca3835f816e 184 caps, 1, 0) == 18);
monpetit 0:3ca3835f816e 185 ASSERT(slre_match("(ab|cd).*\\.(xx|yy)", "ab.yy", 5, NULL, 0, 0) == 5);
monpetit 0:3ca3835f816e 186 ASSERT(slre_match(".*a", "abcdef", 6, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 187 ASSERT(slre_match("(.+)c", "abcdef", 6, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 188 ASSERT(slre_match("\\n", "abc\ndef", 7, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 189 ASSERT(slre_match("b.\\s*\\n", "aa\r\nbb\r\ncc\r\n\r\n", 14,
monpetit 0:3ca3835f816e 190 caps, 10, 0) == 8);
monpetit 0:3ca3835f816e 191
monpetit 0:3ca3835f816e 192 /* Greedy vs non-greedy */
monpetit 0:3ca3835f816e 193 ASSERT(slre_match(".+c", "abcabc", 6, NULL, 0, 0) == 6);
monpetit 0:3ca3835f816e 194 ASSERT(slre_match(".+?c", "abcabc", 6, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 195 ASSERT(slre_match(".*?c", "abcabc", 6, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 196 ASSERT(slre_match(".*c", "abcabc", 6, NULL, 0, 0) == 6);
monpetit 0:3ca3835f816e 197 ASSERT(slre_match("bc.d?k?b+", "abcabc", 6, NULL, 0, 0) == 5);
monpetit 0:3ca3835f816e 198
monpetit 0:3ca3835f816e 199 /* Branching */
monpetit 0:3ca3835f816e 200 ASSERT(slre_match("|", "abc", 3, NULL, 0, 0) == 0);
monpetit 0:3ca3835f816e 201 ASSERT(slre_match("|.", "abc", 3, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 202 ASSERT(slre_match("x|y|b", "abc", 3, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 203 ASSERT(slre_match("k(xx|yy)|ca", "abcabc", 6, NULL, 0, 0) == 4);
monpetit 0:3ca3835f816e 204 ASSERT(slre_match("k(xx|yy)|ca|bc", "abcabc", 6, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 205 ASSERT(slre_match("(|.c)", "abc", 3, caps, 10, 0) == 3);
monpetit 0:3ca3835f816e 206 ASSERT(caps[0].len == 2);
monpetit 0:3ca3835f816e 207 ASSERT(memcmp(caps[0].ptr, "bc", 2) == 0);
monpetit 0:3ca3835f816e 208 ASSERT(slre_match("a|b|c", "a", 1, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 209 ASSERT(slre_match("a|b|c", "b", 1, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 210 ASSERT(slre_match("a|b|c", "c", 1, NULL, 0, 0) == 1);
monpetit 0:3ca3835f816e 211 ASSERT(slre_match("a|b|c", "d", 1, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 212
monpetit 0:3ca3835f816e 213 /* Optional match at the end of the string */
monpetit 0:3ca3835f816e 214 ASSERT(slre_match("^.*c.?$", "abc", 3, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 215 ASSERT(slre_match("^.*C.?$", "abc", 3, NULL, 0, SLRE_IGNORE_CASE) == 3);
monpetit 0:3ca3835f816e 216 ASSERT(slre_match("bk?", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 217 ASSERT(slre_match("b(k?)", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 218 ASSERT(slre_match("b[k-z]*", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 219 ASSERT(slre_match("ab(k|z|y)*", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 220 ASSERT(slre_match("[b-z].*", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 221 ASSERT(slre_match("(b|z|u).*", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 222 ASSERT(slre_match("ab(k|z|y)?", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 223 ASSERT(slre_match(".*", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 224 ASSERT(slre_match(".*$", "ab", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 225 ASSERT(slre_match("a+$", "aa", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 226 ASSERT(slre_match("a*$", "aa", 2, NULL, 0, 0) == 2);
monpetit 0:3ca3835f816e 227 ASSERT(slre_match( "a+$" ,"Xaa", 3, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 228 ASSERT(slre_match( "a*$" ,"Xaa", 3, NULL, 0, 0) == 3);
monpetit 0:3ca3835f816e 229
monpetit 0:3ca3835f816e 230 /* Ignore case flag */
monpetit 0:3ca3835f816e 231 ASSERT(slre_match("[a-h]+", "abcdefghxxx", 11, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 232 ASSERT(slre_match("[A-H]+", "ABCDEFGHyyy", 11, NULL, 0, 0) == 8);
monpetit 0:3ca3835f816e 233 ASSERT(slre_match("[a-h]+", "ABCDEFGHyyy", 11, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 234 ASSERT(slre_match("[A-H]+", "abcdefghyyy", 11, NULL, 0, 0) == SLRE_NO_MATCH);
monpetit 0:3ca3835f816e 235 ASSERT(slre_match("[a-h]+", "ABCDEFGHyyy", 11, NULL, 0, SLRE_IGNORE_CASE) == 8);
monpetit 0:3ca3835f816e 236 ASSERT(slre_match("[A-H]+", "abcdefghyyy", 11, NULL, 0, SLRE_IGNORE_CASE) == 8);
monpetit 0:3ca3835f816e 237
monpetit 0:3ca3835f816e 238 {
monpetit 0:3ca3835f816e 239 /* Example: HTTP request */
monpetit 0:3ca3835f816e 240 const char *request = " GET /index.html HTTP/1.0\r\n\r\n";
monpetit 0:3ca3835f816e 241 struct slre_cap caps[4];
monpetit 0:3ca3835f816e 242
monpetit 0:3ca3835f816e 243 if (slre_match("^\\s*(\\S+)\\s+(\\S+)\\s+HTTP/(\\d)\\.(\\d)",
monpetit 0:3ca3835f816e 244 request, strlen(request), caps, 4, 0) > 0) {
monpetit 0:3ca3835f816e 245 printf("Method: [%.*s], URI: [%.*s]\n",
monpetit 0:3ca3835f816e 246 caps[0].len, caps[0].ptr,
monpetit 0:3ca3835f816e 247 caps[1].len, caps[1].ptr);
monpetit 0:3ca3835f816e 248 } else {
monpetit 0:3ca3835f816e 249 printf("Error parsing [%s]\n", request);
monpetit 0:3ca3835f816e 250 }
monpetit 0:3ca3835f816e 251
monpetit 0:3ca3835f816e 252 ASSERT(caps[1].len == 11);
monpetit 0:3ca3835f816e 253 ASSERT(memcmp(caps[1].ptr, "/index.html", caps[1].len) == 0);
monpetit 0:3ca3835f816e 254 }
monpetit 0:3ca3835f816e 255
monpetit 0:3ca3835f816e 256 {
monpetit 0:3ca3835f816e 257 /* Example: string replacement */
monpetit 0:3ca3835f816e 258 char *s = slre_replace("({{.+?}})",
monpetit 0:3ca3835f816e 259 "Good morning, {{foo}}. How are you, {{bar}}?",
monpetit 0:3ca3835f816e 260 "Bob");
monpetit 0:3ca3835f816e 261 printf("%s\n", s);
monpetit 0:3ca3835f816e 262 ASSERT(strcmp(s, "Good morning, Bob. How are you, Bob?") == 0);
monpetit 0:3ca3835f816e 263 free(s);
monpetit 0:3ca3835f816e 264 }
monpetit 0:3ca3835f816e 265
monpetit 0:3ca3835f816e 266 {
monpetit 0:3ca3835f816e 267 /* Example: find all URLs in a string */
monpetit 0:3ca3835f816e 268 static const char *str =
monpetit 0:3ca3835f816e 269 "<img src=\"HTTPS://FOO.COM/x?b#c=tab1\"/> "
monpetit 0:3ca3835f816e 270 " <a href=\"http://cesanta.com\">some link</a>";
monpetit 0:3ca3835f816e 271
monpetit 0:3ca3835f816e 272 static const char *regex = "((https?://)[^\\s/'\"<>]+/?[^\\s'\"<>]*)";
monpetit 0:3ca3835f816e 273 struct slre_cap caps[2];
monpetit 0:3ca3835f816e 274 int i, j = 0, str_len = (int) strlen(str);
monpetit 0:3ca3835f816e 275
monpetit 0:3ca3835f816e 276 while (j < str_len &&
monpetit 0:3ca3835f816e 277 (i = slre_match(regex, str + j, str_len - j, caps, 2, SLRE_IGNORE_CASE)) > 0) {
monpetit 0:3ca3835f816e 278 printf("Found URL: [%.*s]\n", caps[0].len, caps[0].ptr);
monpetit 0:3ca3835f816e 279 j += i;
monpetit 0:3ca3835f816e 280 }
monpetit 0:3ca3835f816e 281 }
monpetit 0:3ca3835f816e 282
monpetit 0:3ca3835f816e 283 {
monpetit 0:3ca3835f816e 284 /* Example more complex regular expression */
monpetit 0:3ca3835f816e 285 static const char * str = "aa 1234 xy\nxyz";
monpetit 0:3ca3835f816e 286 static const char * regex = "aa ([0-9]*) *([x-z]*)\\s+xy([yz])";
monpetit 0:3ca3835f816e 287 struct slre_cap caps[3];
monpetit 0:3ca3835f816e 288 ASSERT(slre_match(regex, str, strlen(str), caps, 3, 0) > 0);
monpetit 0:3ca3835f816e 289 ASSERT(caps[0].len == 4);
monpetit 0:3ca3835f816e 290 ASSERT(caps[1].len == 2);
monpetit 0:3ca3835f816e 291 ASSERT(caps[2].len == 1);
monpetit 0:3ca3835f816e 292 ASSERT(caps[2].ptr[0] == 'z');
monpetit 0:3ca3835f816e 293 }
monpetit 0:3ca3835f816e 294
monpetit 0:3ca3835f816e 295 printf("Unit test %s (total test: %d, failed tests: %d)\n",
monpetit 0:3ca3835f816e 296 static_failed_tests > 0 ? "FAILED" : "PASSED",
monpetit 0:3ca3835f816e 297 static_total_tests, static_failed_tests);
monpetit 0:3ca3835f816e 298
monpetit 0:3ca3835f816e 299 return static_failed_tests == 0 ? EXIT_SUCCESS : EXIT_FAILURE;
monpetit 0:3ca3835f816e 300 }
monpetit 0:3ca3835f816e 301
monpetit 0:3ca3835f816e 302
monpetit 0:3ca3835f816e 303 int main(void)
monpetit 0:3ca3835f816e 304 {
monpetit 0:3ca3835f816e 305 while (true) {
monpetit 0:3ca3835f816e 306 uint32_t result = slre_test();
monpetit 0:3ca3835f816e 307 printf("SLRE TEST RESULT : %s\r\n", (result == EXIT_SUCCESS) ? "SUCCESS" : "FAILURE");
monpetit 0:3ca3835f816e 308 printf("-=-=-=-=-=-=-=-=-=-=-=-=-=-=-=\r\n\r\n");
monpetit 0:3ca3835f816e 309 led2 = !led2;
monpetit 0:3ca3835f816e 310 wait(1.0);
monpetit 0:3ca3835f816e 311 }
monpetit 0:3ca3835f816e 312 }
monpetit 0:3ca3835f816e 313