| #!/bin/sh |
| # |
| # Copyright (c) 2008 David Reiss |
| # |
| |
| test_description='Test various path utilities' |
| |
| . ./test-lib.sh |
| |
| norm_abs() { |
| test_expect_success "normalize absolute: $1 => $2" \ |
| "test \"\$(test-path-utils normalize_path_copy '$1')\" = '$2'" |
| } |
| |
| ancestor() { |
| test_expect_success "longest ancestor: $1 $2 => $3" \ |
| "test \"\$(test-path-utils longest_ancestor_length '$1' '$2')\" = '$3'" |
| } |
| |
| norm_abs "" "" |
| norm_abs / / |
| norm_abs // / |
| norm_abs /// / |
| norm_abs /. / |
| norm_abs /./ / |
| norm_abs /./.. ++failed++ |
| norm_abs /../. ++failed++ |
| norm_abs /./../.// ++failed++ |
| norm_abs /dir/.. / |
| norm_abs /dir/sub/../.. / |
| norm_abs /dir/sub/../../.. ++failed++ |
| norm_abs /dir /dir |
| norm_abs /dir// /dir/ |
| norm_abs /./dir /dir |
| norm_abs /dir/. /dir/ |
| norm_abs /dir///./ /dir/ |
| norm_abs /dir//sub/.. /dir/ |
| norm_abs /dir/sub/../ /dir/ |
| norm_abs //dir/sub/../. /dir/ |
| norm_abs /dir/s1/../s2/ /dir/s2/ |
| norm_abs /d1/s1///s2/..//../s3/ /d1/s3/ |
| norm_abs /d1/s1//../s2/../../d2 /d2 |
| norm_abs /d1/.../d2 /d1/.../d2 |
| norm_abs /d1/..././../d2 /d1/d2 |
| |
| ancestor / "" -1 |
| ancestor / / -1 |
| ancestor /foo "" -1 |
| ancestor /foo : -1 |
| ancestor /foo ::. -1 |
| ancestor /foo ::..:: -1 |
| ancestor /foo / 0 |
| ancestor /foo /fo -1 |
| ancestor /foo /foo -1 |
| ancestor /foo /foo/ -1 |
| ancestor /foo /bar -1 |
| ancestor /foo /bar/ -1 |
| ancestor /foo /foo/bar -1 |
| ancestor /foo /foo:/bar/ -1 |
| ancestor /foo /foo/:/bar/ -1 |
| ancestor /foo /foo::/bar/ -1 |
| ancestor /foo /:/foo:/bar/ 0 |
| ancestor /foo /foo:/:/bar/ 0 |
| ancestor /foo /:/bar/:/foo 0 |
| ancestor /foo/bar "" -1 |
| ancestor /foo/bar / 0 |
| ancestor /foo/bar /fo -1 |
| ancestor /foo/bar foo -1 |
| ancestor /foo/bar /foo 4 |
| ancestor /foo/bar /foo/ 4 |
| ancestor /foo/bar /foo/ba -1 |
| ancestor /foo/bar /:/fo 0 |
| ancestor /foo/bar /foo:/foo/ba 4 |
| ancestor /foo/bar /bar -1 |
| ancestor /foo/bar /bar/ -1 |
| ancestor /foo/bar /fo: -1 |
| ancestor /foo/bar :/fo -1 |
| ancestor /foo/bar /foo:/bar/ 4 |
| ancestor /foo/bar /:/foo:/bar/ 4 |
| ancestor /foo/bar /foo:/:/bar/ 4 |
| ancestor /foo/bar /:/bar/:/fo 0 |
| ancestor /foo/bar /:/bar/ 0 |
| ancestor /foo/bar :://foo/. 4 |
| ancestor /foo/bar :://foo/.:: 4 |
| ancestor /foo/bar //foo/./::/bar 4 |
| ancestor /foo/bar ::/bar -1 |
| |
| test_expect_success 'strip_path_suffix' ' |
| test c:/msysgit = $(test-path-utils strip_path_suffix \ |
| c:/msysgit/libexec//git-core libexec/git-core) |
| ' |
| test_done |