mirror of
https://github.com/zeek/zeek.git
synced 2025-10-02 06:38:20 +00:00
98d9089a8f
This allows better control of BOL and EOL. MatchPrefix() / LongestMatch() always start with BOL. Closes #3455
79 lines
1.9 KiB
Text
79 lines
1.9 KiB
Text
#
|
|
# @TEST-EXEC: zeek -b %INPUT >out
|
|
# @TEST-EXEC: btest-diff out
|
|
|
|
function print_string_vector(v: string_vec)
|
|
{
|
|
for ( i in v )
|
|
print v[i];
|
|
}
|
|
|
|
event zeek_init()
|
|
{
|
|
local a = "this is a test";
|
|
local pat = /hi|es/;
|
|
local idx = vector( 3, 6, 13);
|
|
|
|
print_string_vector(split_string(a, pat));
|
|
print "---------------------";
|
|
print_string_vector(split_string1(a, pat));
|
|
print "---------------------";
|
|
print_string_vector(split_string_all(a, pat));
|
|
print "---------------------";
|
|
print_string_vector(split_string_n(a, pat, F, 1));
|
|
print "---------------------";
|
|
print_string_vector(split_string_n(a, pat, T, 1));
|
|
print "---------------------";
|
|
print str_split_indices(a, idx);
|
|
print "---------------------";
|
|
a = "X-Mailer: Testing Test (http://www.example.com)";
|
|
pat = /:[[:blank:]]*/;
|
|
print_string_vector(split_string1(a, pat));
|
|
print "---------------------";
|
|
a = "A = B = C = D";
|
|
pat = /=/;
|
|
print_string_vector(split_string_all(a, pat));
|
|
}
|
|
|
|
event zeek_init() &priority=-5
|
|
{
|
|
# Anchor testing.
|
|
local r = split_string_n("test", /^est/, T, 1);
|
|
assert |r| == 1;
|
|
assert r[0] == "test";
|
|
print "test", "^est", r;
|
|
|
|
r = split_string_n("test", /tes$/, T, 1);
|
|
assert |r| == 1;
|
|
assert r[0] == "test";
|
|
print "test", "tes$", r;
|
|
|
|
r = split_string_n("test", /^test$/, T, 1);
|
|
assert |r| == 3;
|
|
assert r[0] == "";
|
|
assert r[1] == "test";
|
|
assert r[2] == "";
|
|
print "test", "^test$", r;
|
|
|
|
r = split_string_n("aa bb cc", / ?/, F, 0);
|
|
assert |r| == 3;
|
|
assert r[0] == "aa";
|
|
assert r[1] == "bb";
|
|
assert r[2] == "cc";
|
|
print "aa bb cc", "/ ?/", r;
|
|
|
|
r = split_string_n("aa bb cc", / ?/, T, 0);
|
|
assert |r| == 5;
|
|
assert r[0] == "aa";
|
|
assert r[1] == " ";
|
|
assert r[2] == "bb";
|
|
assert r[3] == " ";
|
|
print "aa bb cc", "/ ?/", r;
|
|
|
|
r = split_string_n("aa bb cc", / +/, F, 0);
|
|
assert |r| == 3;
|
|
assert r[0] == "aa";
|
|
assert r[1] == "bb";
|
|
assert r[2] == "cc";
|
|
print "aa bb cc", "/ +/", r;
|
|
}
|