mirror of
https://github.com/sbrow/envr.git
synced 2026-06-27 10:38:33 -04:00
112 lines
3.5 KiB
Odin
112 lines
3.5 KiB
Odin
package findr
|
|
|
|
import "core:testing"
|
|
|
|
glob_match :: proc(pattern: string, path: string, anchored: bool) -> bool {
|
|
gp := glob_compile(pattern, anchored)
|
|
result := glob_match_compiled(&gp, path)
|
|
glob_destroy(&gp)
|
|
return result
|
|
}
|
|
|
|
@(test)
|
|
test_glob_simple :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("foo", "foo", false))
|
|
testing.expect(t, glob_match("foo", "bar/foo", false))
|
|
testing.expect(t, !glob_match("foo", "foobar", false))
|
|
testing.expect(t, !glob_match("foo", "foo/bar", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_anchored :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("foo", "foo", true))
|
|
testing.expect(t, !glob_match("foo", "bar/foo", true))
|
|
testing.expect(t, !glob_match("foo", "foobar", true))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_star :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("*.log", "test.log", false))
|
|
testing.expect(t, glob_match("*.log", ".log", false))
|
|
testing.expect(t, !glob_match("*.log", "test.txt", false))
|
|
testing.expect(t, !glob_match("*.log", "dir/test", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_question :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("?.log", "a.log", false))
|
|
testing.expect(t, !glob_match("?.log", "ab.log", false))
|
|
testing.expect(t, !glob_match("?.log", ".log", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_char_class :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("[abc].log", "a.log", false))
|
|
testing.expect(t, glob_match("[abc].log", "b.log", false))
|
|
testing.expect(t, !glob_match("[abc].log", "d.log", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_negated_class :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("[!abc].log", "d.log", false))
|
|
testing.expect(t, !glob_match("[!abc].log", "a.log", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_dot_literal :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match(".env", ".env", false))
|
|
testing.expect(t, glob_match(".env", "dir/.env", false))
|
|
testing.expect(t, !glob_match(".env", "env", false))
|
|
testing.expect(t, !glob_match(".env", "x.env", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_globstar_prefix :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("**/foo", "foo", false))
|
|
testing.expect(t, glob_match("**/foo", "a/b/foo", false))
|
|
testing.expect(t, !glob_match("**/foo", "foobar", false))
|
|
testing.expect(t, !glob_match("**/foo", "a/foobar", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_globstar_suffix :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("abc/**", "abc/x", false))
|
|
testing.expect(t, glob_match("abc/**", "abc/x/y", false))
|
|
testing.expect(t, !glob_match("abc/**", "abc", false))
|
|
testing.expect(t, !glob_match("abc/**", "abcd/x", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_globstar_middle :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("foo/**/bar", "foo/bar", false))
|
|
testing.expect(t, glob_match("foo/**/bar", "foo/x/bar", false))
|
|
testing.expect(t, !glob_match("foo/**/bar", "foo/barx", false))
|
|
testing.expect(t, !glob_match("foo/**/bar", "foo/x/y/baz", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_backslash_escape :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("\\!foo", "!foo", false))
|
|
testing.expect(t, !glob_match("\\!foo", "foo", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_hash_literal :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("#foo", "#foo", false))
|
|
testing.expect(t, !glob_match("#foo", "foo", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_hash_pattern :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("#*#", "#test#", false))
|
|
testing.expect(t, glob_match("#*#", "##", false))
|
|
testing.expect(t, !glob_match("#*#", "test", false))
|
|
testing.expect(t, !glob_match("#*#", "#test", false))
|
|
}
|
|
|
|
@(test)
|
|
test_glob_empty :: proc(t: ^testing.T) {
|
|
testing.expect(t, glob_match("", "", false))
|
|
testing.expect(t, !glob_match("", "foo", false))
|
|
}
|