Support GIT_PAGER_IN_USE environment variable
[git/mingw/j6t.git] / t / t3100-ls-tree-restrict.sh
blob46427e3f365ad0ec09c432f8cedf2106afe4dc08
1 #!/bin/sh
3 # Copyright (c) 2005 Junio C Hamano
6 test_description='git ls-tree test.
8 This test runs git ls-tree with the following in a tree.
10 path0 - a file
11 path1 - a symlink
12 path2/foo - a file in a directory
13 path2/bazbo - a symlink in a directory
14 path2/baz/b - a file in a directory in a directory
16 The new path restriction code should do the right thing for path2 and
17 path2/baz. Also path0/ should snow nothing.
19 . ./test-lib.sh
21 test_expect_success \
22 'setup' \
23 'mkdir path2 path2/baz &&
24 echo Hi >path0 &&
25 ln -s path0 path1 &&
26 echo Lo >path2/foo &&
27 ln -s ../path1 path2/bazbo &&
28 echo Mi >path2/baz/b &&
29 find path? \( -type f -o -type l \) -print |
30 xargs git update-index --add &&
31 tree=`git write-tree` &&
32 echo $tree'
34 _x40='[0-9a-f][0-9a-f][0-9a-f][0-9a-f][0-9a-f]'
35 _x40="$_x40$_x40$_x40$_x40$_x40$_x40$_x40$_x40"
36 test_output () {
37 sed -e "s/ $_x40 / X /" <current >check
38 git diff expected check
41 test_expect_success \
42 'ls-tree plain' \
43 'git ls-tree $tree >current &&
44 cat >expected <<\EOF &&
45 100644 blob X path0
46 120000 blob X path1
47 040000 tree X path2
48 EOF
49 test_output'
51 test_expect_success \
52 'ls-tree recursive' \
53 'git ls-tree -r $tree >current &&
54 cat >expected <<\EOF &&
55 100644 blob X path0
56 120000 blob X path1
57 100644 blob X path2/baz/b
58 120000 blob X path2/bazbo
59 100644 blob X path2/foo
60 EOF
61 test_output'
63 test_expect_success \
64 'ls-tree recursive with -t' \
65 'git ls-tree -r -t $tree >current &&
66 cat >expected <<\EOF &&
67 100644 blob X path0
68 120000 blob X path1
69 040000 tree X path2
70 040000 tree X path2/baz
71 100644 blob X path2/baz/b
72 120000 blob X path2/bazbo
73 100644 blob X path2/foo
74 EOF
75 test_output'
77 test_expect_success \
78 'ls-tree recursive with -d' \
79 'git ls-tree -r -d $tree >current &&
80 cat >expected <<\EOF &&
81 040000 tree X path2
82 040000 tree X path2/baz
83 EOF
84 test_output'
86 test_expect_success \
87 'ls-tree filtered with path' \
88 'git ls-tree $tree path >current &&
89 cat >expected <<\EOF &&
90 EOF
91 test_output'
94 # it used to be path1 and then path0, but with pathspec semantics
95 # they are shown in canonical order.
96 test_expect_success \
97 'ls-tree filtered with path1 path0' \
98 'git ls-tree $tree path1 path0 >current &&
99 cat >expected <<\EOF &&
100 100644 blob X path0
101 120000 blob X path1
103 test_output'
105 test_expect_success \
106 'ls-tree filtered with path0/' \
107 'git ls-tree $tree path0/ >current &&
108 cat >expected <<\EOF &&
110 test_output'
112 # It used to show path2 and its immediate children but
113 # with pathspec semantics it shows only path2
114 test_expect_success \
115 'ls-tree filtered with path2' \
116 'git ls-tree $tree path2 >current &&
117 cat >expected <<\EOF &&
118 040000 tree X path2
120 test_output'
122 # ... and path2/ shows the children.
123 test_expect_success \
124 'ls-tree filtered with path2/' \
125 'git ls-tree $tree path2/ >current &&
126 cat >expected <<\EOF &&
127 040000 tree X path2/baz
128 120000 blob X path2/bazbo
129 100644 blob X path2/foo
131 test_output'
133 # The same change -- exact match does not show children of
134 # path2/baz
135 test_expect_success \
136 'ls-tree filtered with path2/baz' \
137 'git ls-tree $tree path2/baz >current &&
138 cat >expected <<\EOF &&
139 040000 tree X path2/baz
141 test_output'
143 test_expect_success \
144 'ls-tree filtered with path2/bak' \
145 'git ls-tree $tree path2/bak >current &&
146 cat >expected <<\EOF &&
148 test_output'
150 test_expect_success \
151 'ls-tree -t filtered with path2/bak' \
152 'git ls-tree -t $tree path2/bak >current &&
153 cat >expected <<\EOF &&
154 040000 tree X path2
156 test_output'
158 test_done