Files
c3c/test/unit/stdlib/io/path.c3
Christoffer Lerno 8b0df0ee11 try? / catch?
2023-03-17 22:49:48 +01:00

292 lines
17 KiB
C

module std::io::path @test;
fn void! test_parent()
{
Path p = path::new("")?;
assert(catch? p.parent());
p = path::new("/", .path_env = PathEnv.POSIX)?;
assert(catch? p.parent());
p = path::new("/a/b/c", .path_env = PathEnv.POSIX)?;
assert(p.parent().as_str()? == "/a/b");
p = path::new("/a/b/c", .path_env = PathEnv.WIN32)?;
assert(p.parent().as_str()? == `\a\b`);
}
fn void! test_path_normalized()
{
assert(path::new("", .path_env = PathEnv.WIN32).as_str()? == "");
assert(catch? path::new("1:\\a\\b\\c.txt", .path_env = PathEnv.WIN32));
assert(catch? path::new(":", .path_env = PathEnv.WIN32));
assert(catch? path::new("1:", .path_env = PathEnv.WIN32));
assert(catch? path::new("1:a", .path_env = PathEnv.WIN32));
// assert(catch? path::new(`\\\a\b\c.txt`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`\\server\a\b\..\..\..\c`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`\\a`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`/a/b/../../../c`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`/a/b/../../../c`, .path_env = PathEnv.POSIX));
assert(catch? path::new(`/a/b/../../..`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`/a/b/../../..`, .path_env = PathEnv.POSIX));
assert(catch? path::new(`/../a`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`/../a`, .path_env = PathEnv.POSIX));
assert(catch? path::new(`/..`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`/..`, .path_env = PathEnv.POSIX));
assert(catch? path::new(`C:/a/b/../../../c`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`C:/../a`, .path_env = PathEnv.WIN32));
assert(catch? path::new(`C:/..`, .path_env = PathEnv.WIN32));
assert(path::new("/", .path_env = PathEnv.POSIX).as_str()? == "/");
assert(path::new("/./", .path_env = PathEnv.POSIX).as_str()? == "/");
assert(path::new("/foo/../", .path_env = PathEnv.POSIX).as_str()? == "/");
assert(path::new("/foo/bar/../", .path_env = PathEnv.POSIX).as_str()? == "/foo");
assert(path::new("/foo//bar", .path_env = PathEnv.POSIX).as_str()? == "/foo/bar");
assert(path::new("/foo//bar/../", .path_env = PathEnv.POSIX).as_str()? == "/foo");
assert(path::new("a\\b/c.txt", .path_env = PathEnv.WIN32).as_str()? == `a\b\c.txt`);
assert(path::new("a\\b/c.txt", .path_env = PathEnv.POSIX).as_str()? == "a\\b/c.txt");
assert(path::new("C:\\a\\b/c.txt", .path_env = PathEnv.WIN32).as_str()? == `C:\a\b\c.txt`);
assert(path::new("C:\\a\\b/c.txt", .path_env = PathEnv.POSIX).as_str()? == "C:\\a\\b/c.txt");
assert(path::new(`\\server\a\b/c.txt`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a\b\c.txt`);
assert(path::new(`\\server\a\b/c.txt`, .path_env = PathEnv.POSIX).as_str()? == `\\server\a\b/c.txt`);
assert(path::new(`c:\hello//bar\\\\foo.txt`, .path_env = PathEnv.WIN32).as_str()? == `c:\hello\bar\foo.txt`);
assert(path::new(`~\a\b/c.txt`, .path_env = PathEnv.WIN32).as_str()? == `~\a\b\c.txt`);
assert(path::new(`~\a\b/c.txt`, .path_env = PathEnv.POSIX).as_str()? == `~\a\b/c.txt`);
assert(path::new(`a/b/../../../c`, .path_env = PathEnv.WIN32).as_str()? == `..\c`);
assert(path::new(`a/b/../../../c`, .path_env = PathEnv.POSIX).as_str()? == `../c`);
assert(path::new(`a/b/../../..`, .path_env = PathEnv.WIN32).as_str()? == `..`);
assert(path::new(`a/b/../../..`, .path_env = PathEnv.POSIX).as_str()? == `..`);
assert(path::new(`../a`, .path_env = PathEnv.WIN32).as_str()? == `..\a`);
assert(path::new(`../a`, .path_env = PathEnv.POSIX).as_str()? == `../a`);
assert(path::new(`..`, .path_env = PathEnv.WIN32).as_str()? == `..`);
assert(path::new(`..`, .path_env = PathEnv.POSIX).as_str()? == `..`);
assert(path::new(`a/b/../c`, .path_env = PathEnv.WIN32).as_str()? == `a\c`);
assert(path::new(`a/b/../c`, .path_env = PathEnv.POSIX).as_str()? == `a/c`);
assert(path::new(`a/b/../../c`, .path_env = PathEnv.WIN32).as_str()? == `c`);
assert(path::new(`a/b/../../c`, .path_env = PathEnv.POSIX).as_str()? == `c`);
assert(path::new(`a/b/..`, .path_env = PathEnv.WIN32).as_str()? == `a`);
assert(path::new(`a/b/..`, .path_env = PathEnv.POSIX).as_str()? == `a`);
assert(path::new(`a/b/../`, .path_env = PathEnv.WIN32).as_str()? == `a`);
assert(path::new(`a/b/../`, .path_env = PathEnv.POSIX).as_str()? == `a`);
assert(path::new(`a/b/../..`, .path_env = PathEnv.WIN32).as_str()? == "");
assert(path::new(`a/b/../..`, .path_env = PathEnv.POSIX).as_str()? == "");
assert(path::new(`a/b/../../`, .path_env = PathEnv.WIN32).as_str()? == "");
assert(path::new(`a/b/../../`, .path_env = PathEnv.POSIX).as_str()? == "");
assert(path::new(`a/b/../c/../d`, .path_env = PathEnv.WIN32).as_str()? == `a\d`);
assert(path::new(`a/b/../c/../d`, .path_env = PathEnv.POSIX).as_str()? == `a/d`);
assert(path::new(`a/b/../c/../d/`, .path_env = PathEnv.WIN32).as_str()? == `a\d`);
assert(path::new(`a/b/../c/../d/`, .path_env = PathEnv.POSIX).as_str()? == `a/d`);
assert(path::new(`a/b//d`, .path_env = PathEnv.WIN32).as_str()? == `a\b\d`);
assert(path::new(`a/b//d`, .path_env = PathEnv.POSIX).as_str()? == `a/b/d`);
assert(path::new(`a/b/././.`, .path_env = PathEnv.WIN32).as_str()? == `a\b`);
assert(path::new(`a/b/././.`, .path_env = PathEnv.POSIX).as_str()? == `a/b`);
assert(path::new(`a/b/./././`, .path_env = PathEnv.WIN32).as_str()? == `a\b`);
assert(path::new(`a/b/./././`, .path_env = PathEnv.POSIX).as_str()? == `a/b`);
assert(path::new(`./a/`, .path_env = PathEnv.WIN32).as_str()? == `a`);
assert(path::new(`./a/`, .path_env = PathEnv.POSIX).as_str()? == `a`);
assert(path::new(`./`, .path_env = PathEnv.WIN32).as_str()? == ``);
assert(path::new(`./`, .path_env = PathEnv.POSIX).as_str()? == ``);
assert(path::new(`.`, .path_env = PathEnv.WIN32).as_str()? == ``);
assert(path::new(`.`, .path_env = PathEnv.POSIX).as_str()? == ``);
assert(path::new(``, .path_env = PathEnv.WIN32).as_str()? == ``);
assert(path::new(``, .path_env = PathEnv.POSIX).as_str()? == ``);
assert(path::new(`/a`, .path_env = PathEnv.WIN32).as_str()? == `\a`);
assert(path::new(`/a`, .path_env = PathEnv.POSIX).as_str()? == `/a`);
assert(path::new(`/a/`, .path_env = PathEnv.WIN32).as_str()? == `\a`);
assert(path::new(`/a/`, .path_env = PathEnv.POSIX).as_str()? == `/a`);
assert(path::new(`/a/b/../c`, .path_env = PathEnv.WIN32).as_str()? == `\a\c`);
assert(path::new(`/a/b/../c`, .path_env = PathEnv.POSIX).as_str()? == `/a/c`);
assert(path::new(`/a/b/../../c`, .path_env = PathEnv.WIN32).as_str()? == `\c`);
assert(path::new(`/a/b/../../c`, .path_env = PathEnv.POSIX).as_str()? == `/c`);
assert(path::new(`/a/b/..`, .path_env = PathEnv.WIN32).as_str()? == `\a`);
assert(path::new(`/a/b/..`, .path_env = PathEnv.POSIX).as_str()? == `/a`);
assert(path::new(`/a/b/../..`, .path_env = PathEnv.WIN32).as_str()? == `\`);
assert(path::new(`/a/b/../..`, .path_env = PathEnv.POSIX).as_str()? == `/`);
assert(path::new(`/a/b/../c/../d`, .path_env = PathEnv.WIN32).as_str()? == `\a\d`);
assert(path::new(`/a/b/../c/../d`, .path_env = PathEnv.POSIX).as_str()? == `/a/d`);
assert(path::new(`/a/b//d`, .path_env = PathEnv.WIN32).as_str()? == `\a\b\d`);
assert(path::new(`/a/b//d`, .path_env = PathEnv.POSIX).as_str()? == `/a/b/d`);
assert(path::new(`/./a/`, .path_env = PathEnv.WIN32).as_str()? == `\a`);
assert(path::new(`/./a/`, .path_env = PathEnv.POSIX).as_str()? == `/a`);
assert(path::new(`/./`, .path_env = PathEnv.WIN32).as_str()? == `\`);
assert(path::new(`/./`, .path_env = PathEnv.POSIX).as_str()? == `/`);
assert(path::new(`/.`, .path_env = PathEnv.WIN32).as_str()? == `\`);
assert(path::new(`/.`, .path_env = PathEnv.POSIX).as_str()? == `/`);
assert(path::new(`/`, .path_env = PathEnv.WIN32).as_str()? == `\`);
assert(path::new(`/`, .path_env = PathEnv.POSIX).as_str()? == `/`);
assert(path::new(`C:/a`, .path_env = PathEnv.WIN32).as_str()? == `C:\a`);
assert(path::new(`C:/a`, .path_env = PathEnv.POSIX).as_str()? == `C:/a`);
assert(path::new(`C:/a/b/../c`, .path_env = PathEnv.WIN32).as_str()? == `C:\a\c`);
assert(path::new(`C:/a/b/../c`, .path_env = PathEnv.POSIX).as_str()? == `C:/a/c`);
assert(path::new(`C:/a/b/../../c`, .path_env = PathEnv.WIN32).as_str()? == `C:\c`);
assert(path::new(`C:/a/b/../../c`, .path_env = PathEnv.POSIX).as_str()? == `C:/c`);
assert(path::new(`C:/a/b/../../../c`, .path_env = PathEnv.POSIX).as_str()? == `c`);
assert(path::new(`C:/a/b/..`, .path_env = PathEnv.WIN32).as_str()? == `C:\a`);
assert(path::new(`C:/a/b/..`, .path_env = PathEnv.POSIX).as_str()? == `C:/a`);
assert(path::new(`C:/a/b/../..`, .path_env = PathEnv.WIN32).as_str()? == `C:\`);
assert(path::new(`C:/a/b/../..`, .path_env = PathEnv.POSIX).as_str()? == `C:`);
assert(path::new(`C:/a/b/../c/../d`, .path_env = PathEnv.WIN32).as_str()? == `C:\a\d`);
assert(path::new(`C:/a/b/../c/../d`, .path_env = PathEnv.POSIX).as_str()? == `C:/a/d`);
assert(path::new(`C:/a/b//d`, .path_env = PathEnv.WIN32).as_str()? == `C:\a\b\d`);
assert(path::new(`C:/a/b//d`, .path_env = PathEnv.POSIX).as_str()? == `C:/a/b/d`);
assert(path::new(`C:/a/b/././.`, .path_env = PathEnv.WIN32).as_str()? == `C:\a\b`);
assert(path::new(`C:/a/b/././.`, .path_env = PathEnv.POSIX).as_str()? == `C:/a/b`);
assert(path::new(`C:/./a`, .path_env = PathEnv.WIN32).as_str()? == `C:\a`);
assert(path::new(`C:/./a`, .path_env = PathEnv.POSIX).as_str()? == `C:/a`);
assert(path::new(`C:/./`, .path_env = PathEnv.WIN32).as_str()? == `C:\`);
assert(path::new(`C:/./`, .path_env = PathEnv.POSIX).as_str()? == `C:`);
assert(path::new(`C:/../a`, .path_env = PathEnv.POSIX).as_str()? == `a`);
assert(path::new(`C:/..`, .path_env = PathEnv.POSIX).as_str()? == ``);
assert(path::new(`C:/`, .path_env = PathEnv.WIN32).as_str()? == `C:\`);
assert(path::new(`C:/`, .path_env = PathEnv.POSIX).as_str()? == `C:`);
assert(path::new(`C:a`, .path_env = PathEnv.WIN32).as_str()? == `C:a`);
assert(path::new(`C:a`, .path_env = PathEnv.POSIX).as_str()? == `C:a`);
assert(path::new(`C:a/`, .path_env = PathEnv.WIN32).as_str()? == `C:a`);
assert(path::new(`C:a/`, .path_env = PathEnv.POSIX).as_str()? == `C:a`);
assert(path::new(`C:a/b/../c`, .path_env = PathEnv.WIN32).as_str()? == `C:a\c`);
assert(path::new(`C:a/b/../c`, .path_env = PathEnv.POSIX).as_str()? == `C:a/c`);
assert(path::new(`C:a/b/../../c`, .path_env = PathEnv.WIN32).as_str()? == `C:c`);
assert(path::new(`C:a/b/../../c`, .path_env = PathEnv.POSIX).as_str()? == `c`);
assert(path::new(`C:a/b/..`, .path_env = PathEnv.WIN32).as_str()? == `C:a`);
assert(path::new(`C:a/b/..`, .path_env = PathEnv.POSIX).as_str()? == `C:a`);
assert(path::new(`C:a/b/../..`, .path_env = PathEnv.WIN32).as_str()? == `C:`);
assert(path::new(`C:a/b/../..`, .path_env = PathEnv.POSIX).as_str()? == ``);
assert(path::new(`C:a/b/../c/../d`, .path_env = PathEnv.WIN32).as_str()? == `C:a\d`);
assert(path::new(`C:a/b/../c/../d`, .path_env = PathEnv.POSIX).as_str()? == `C:a/d`);
assert(path::new(`C:a/b//d`, .path_env = PathEnv.WIN32).as_str()? == `C:a\b\d`);
assert(path::new(`C:a/b//d`, .path_env = PathEnv.POSIX).as_str()? == `C:a/b/d`);
assert(path::new(`C:a/b/././.`, .path_env = PathEnv.WIN32).as_str()? == `C:a\b`);
assert(path::new(`C:a/b/././.`, .path_env = PathEnv.POSIX).as_str()? == `C:a/b`);
assert(path::new(`C:a/b/../../../c`, .path_env = PathEnv.WIN32).as_str()? == `C:..\c`);
assert(path::new(`C:./a`, .path_env = PathEnv.WIN32).as_str()? == `C:a`);
assert(path::new(`C:./a`, .path_env = PathEnv.POSIX).as_str()? == `C:./a`);
assert(path::new(`C:./`, .path_env = PathEnv.WIN32).as_str()? == `C:`);
assert(path::new(`C:./`, .path_env = PathEnv.POSIX).as_str()? == `C:.`);
assert(path::new(`C:../a`, .path_env = PathEnv.POSIX).as_str()? == `C:../a`);
assert(path::new(`C:../a`, .path_env = PathEnv.WIN32).as_str()? == `C:..\a`);
assert(path::new(`C:..`, .path_env = PathEnv.POSIX).as_str()? == `C:..`);
assert(path::new(`C:..`, .path_env = PathEnv.WIN32).as_str()? == `C:..`);
assert(path::new(`C:`, .path_env = PathEnv.WIN32).as_str()? == `C:`);
assert(path::new(`C:`, .path_env = PathEnv.POSIX).as_str()? == `C:`);
assert(path::new(`\\server/a`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a`);
assert(path::new(`\\server/a`, .path_env = PathEnv.POSIX).as_str()? == `\\server/a`);
assert(path::new(`\\server\a\b\..\c`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a\c`);
assert(path::new(`\\server\a\b\..\..\c`, .path_env = PathEnv.WIN32).as_str()? == `\\server\c`);
assert(path::new(`\\server\a\b\..`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a`);
assert(path::new(`\\server\a\..`, .path_env = PathEnv.WIN32).as_str()? == `\\server\`);
assert(path::new(`\\server\a\b\..\c\..\d`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a\d`);
assert(path::new(`\\server\a\b\\d`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a\b\d`);
assert(path::new(`\\server\a\b\.\.\.`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a\b`);
assert(path::new(`\\server\.\a`, .path_env = PathEnv.WIN32).as_str()? == `\\server\a`);
assert(path::new(`\\server\.`, .path_env = PathEnv.WIN32).as_str()? == `\\server\`);
assert(path::new(`\\server\`, .path_env = PathEnv.WIN32).as_str()? == `\\server\`);
}
fn void! test_extension()
{
assert(catch? path::new(`C:`, .path_env = PathEnv.WIN32).extension());
assert(catch? path::new(`C:`, .path_env = PathEnv.POSIX).extension());
assert(catch? path::new(`file`, .path_env = PathEnv.WIN32).extension());
assert(catch? path::new(`file`, .path_env = PathEnv.POSIX).extension());
assert(catch? path::new(`C:\temp\foo.bar\README`, .path_env = PathEnv.WIN32).extension());
assert(path::new_windows("file.txt").extension()? == "txt");
assert(path::new_posix("file.txt").extension()? == "txt");
assert(path::new_windows("a/b/file.txt").extension()? == "txt");
assert(path::new_posix("a/b/file.txt").extension()? == "txt");
assert(path::new_windows("a\\b\\file.txt").extension()? == "txt");
assert(path::new_windows("a.b/file.txt").extension()? == "txt");
assert(path::new_posix("a.b/file.txt").extension()? == "txt");
assert(path::new_windows("a.b/file.txt").extension()? == "txt");
assert(path::new_posix("a.b/file.txt").extension()? == "txt");
assert(path::new_windows("a.b\\file.txt").extension()? == "txt");
assert(path::new_windows("domain.dot.com").extension()? == "com");
assert(path::new_posix("domain.dot.com").extension()? == "com");
assert(path::new_windows("image.jpeg").extension()? == "jpeg");
assert(path::new_posix("image.jpeg").extension()? == "jpeg");
assert(path::new_windows("../filename.ext").extension()? == "ext");
assert(path::new_posix("../filename.ext").extension()? == "ext");
}
fn void! test_basename()
{
assert(path::new_windows("file.txt").basename()? == "file.txt");
assert(path::new_posix("file.txt").basename()? == "file.txt");
assert(path::new_windows("a/b/file.txt").basename()? == "file.txt");
assert(path::new_posix("a/b/file.txt").basename()? == "file.txt");
assert(path::new_windows("a.b/file.txt").basename()? == "file.txt");
assert(path::new_posix("a.b/file.txt").basename()? == "file.txt");
assert(path::new_windows("a.b/file.txt").basename()? == "file.txt");
assert(path::new_posix("a.b/file.txt").basename()? == "file.txt");
assert(path::new_windows("../filename.ext").basename()? == "filename.ext");
assert(path::new_posix("../filename.ext").basename()? == "filename.ext");
assert(path::new_windows("C:").basename()? == "");
assert(path::new_posix("C:").basename()? == "C:");
assert(path::new_windows("../..").basename()? == "..");
assert(path::new_posix("../..").basename()? == "..");
assert(path::new_windows(`\\server\`).basename()? == "");
assert(path::new_posix(`\\server\`).basename()? == `\\server\`);
}
fn void! test_dirname()
{
assert(path::new_windows("file.txt").dirname()? == "");
assert(path::new_posix("file.txt").dirname()? == "");
assert(path::new_windows("a/b/file.txt").dirname()? == `a\b`);
assert(path::new_posix("a/b/file.txt").dirname()? == "a/b");
assert(path::new_windows("a.b/file.txt").dirname()? == "a.b");
assert(path::new_posix("a.b/file.txt").dirname()? == "a.b");
assert(path::new_windows("../filename.ext").dirname()? == "..");
assert(path::new_posix("../filename.ext").dirname()? == "..");
assert(path::new_windows("C:").dirname()? == "C:");
assert(path::new_posix("C:").dirname()? == "");
assert(path::new_windows("C:/").dirname()? == "C:\\");
assert(path::new_posix("C:/").dirname()? == "");
assert(path::new_windows("C:/a").dirname()? == "C:\\");
assert(path::new_posix("C:/a").dirname()? == "C:");
assert(path::new_windows("../..").dirname()? == "..");
assert(path::new_posix("../..").dirname()? == "..");
assert(path::new_windows(`\\server\`).dirname()? == `\\server\`);
assert(path::new_posix(`\\server\`).dirname()? == ``);
}
fn void! test_path_volume()
{
assert(path::new_windows(`C:\abs`).volume_name()? == `C:`);
assert(path::new_windows(`C:abs`).volume_name()? == `C:`);
assert(path::new_posix(`C:/abs`).volume_name()? == ``);
assert(path::new_posix(`C:abs`).volume_name()? == ``);
assert(path::new_windows(`\\server\`).volume_name()? == `\\server`);
assert(path::new_windows(`\\server\abc`).volume_name()? == `\\server`);
}