]>
Commit | Line | Data |
---|---|---|
35a7ae95 JH |
1 | #!/bin/sh |
2 | ||
3 | test_description='git partial clone' | |
4 | ||
95cf2c01 | 5 | GIT_TEST_DEFAULT_INITIAL_BRANCH_NAME=main |
334afbc7 JS |
6 | export GIT_TEST_DEFAULT_INITIAL_BRANCH_NAME |
7 | ||
35a7ae95 JH |
8 | . ./test-lib.sh |
9 | ||
10 | # create a normal "src" repo where we can later create new commits. | |
11 | # expect_1.oids will contain a list of the OIDs of all blobs. | |
12 | test_expect_success 'setup normal src repo' ' | |
13 | echo "{print \$1}" >print_1.awk && | |
14 | echo "{print \$2}" >print_2.awk && | |
15 | ||
16 | git init src && | |
17 | for n in 1 2 3 4 | |
18 | do | |
74d2f569 ES |
19 | echo "This is file: $n" > src/file.$n.txt && |
20 | git -C src add file.$n.txt && | |
21 | git -C src commit -m "file $n" && | |
d0fd9931 | 22 | git -C src ls-files -s file.$n.txt >>temp || return 1 |
35a7ae95 JH |
23 | done && |
24 | awk -f print_2.awk <temp | sort >expect_1.oids && | |
25 | test_line_count = 4 expect_1.oids | |
26 | ' | |
27 | ||
28 | # bare clone "src" giving "srv.bare" for use as our server. | |
29 | test_expect_success 'setup bare clone for server' ' | |
30 | git clone --bare "file://$(pwd)/src" srv.bare && | |
31 | git -C srv.bare config --local uploadpack.allowfilter 1 && | |
32 | git -C srv.bare config --local uploadpack.allowanysha1inwant 1 | |
33 | ' | |
34 | ||
35 | # do basic partial clone from "srv.bare" | |
36 | # confirm we are missing all of the known blobs. | |
37 | # confirm partial clone was registered in the local config. | |
38 | test_expect_success 'do partial clone 1' ' | |
39 | git clone --no-checkout --filter=blob:none "file://$(pwd)/srv.bare" pc1 && | |
bdbc17e8 | 40 | |
8d6ba495 | 41 | git -C pc1 rev-list --quiet --objects --missing=print HEAD >revs && |
61de0ff6 | 42 | awk -f print_1.awk revs | |
bdbc17e8 MD |
43 | sed "s/?//" | |
44 | sort >observed.oids && | |
45 | ||
35a7ae95 JH |
46 | test_cmp expect_1.oids observed.oids && |
47 | test "$(git -C pc1 config --local core.repositoryformatversion)" = "1" && | |
b14ed5ad | 48 | test "$(git -C pc1 config --local remote.origin.promisor)" = "true" && |
fa3d1b63 | 49 | test "$(git -C pc1 config --local remote.origin.partialclonefilter)" = "blob:none" |
35a7ae95 JH |
50 | ' |
51 | ||
1490d7d8 JK |
52 | test_expect_success 'rev-list --missing=allow-promisor on partial clone' ' |
53 | git -C pc1 rev-list --objects --missing=allow-promisor HEAD >actual && | |
54 | git -C pc1 rev-list --objects --missing=print HEAD >expect.raw && | |
55 | grep -v "^?" expect.raw >expect && | |
56 | test_cmp expect actual | |
57 | ' | |
58 | ||
5374a290 JT |
59 | test_expect_success 'verify that .promisor file contains refs fetched' ' |
60 | ls pc1/.git/objects/pack/pack-*.promisor >promisorlist && | |
61 | test_line_count = 1 promisorlist && | |
6c28bef2 | 62 | git -C srv.bare rev-parse --verify HEAD >headhash && |
5374a290 | 63 | grep "$(cat headhash) HEAD" $(cat promisorlist) && |
95cf2c01 | 64 | grep "$(cat headhash) refs/heads/main" $(cat promisorlist) |
5374a290 JT |
65 | ' |
66 | ||
95cf2c01 | 67 | # checkout main to force dynamic object fetch of blobs at HEAD. |
35a7ae95 | 68 | test_expect_success 'verify checkout with dynamic object fetch' ' |
8d6ba495 | 69 | git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed && |
35a7ae95 | 70 | test_line_count = 4 observed && |
95cf2c01 | 71 | git -C pc1 checkout main && |
8d6ba495 | 72 | git -C pc1 rev-list --quiet --objects --missing=print HEAD >observed && |
35a7ae95 JH |
73 | test_line_count = 0 observed |
74 | ' | |
75 | ||
76 | # create new commits in "src" repo to establish a blame history on file.1.txt | |
77 | # and push to "srv.bare". | |
78 | test_expect_success 'push new commits to server' ' | |
79 | git -C src remote add srv "file://$(pwd)/srv.bare" && | |
80 | for x in a b c d e | |
81 | do | |
74d2f569 ES |
82 | echo "Mod file.1.txt $x" >>src/file.1.txt && |
83 | git -C src add file.1.txt && | |
d0fd9931 | 84 | git -C src commit -m "mod $x" || return 1 |
35a7ae95 | 85 | done && |
95cf2c01 JS |
86 | git -C src blame main -- file.1.txt >expect.blame && |
87 | git -C src push -u srv main | |
35a7ae95 JH |
88 | ' |
89 | ||
90 | # (partial) fetch in the partial clone repo from the promisor remote. | |
91 | # verify that fetch inherited the filter-spec from the config and DOES NOT | |
92 | # have the new blobs. | |
93 | test_expect_success 'partial fetch inherits filter settings' ' | |
94 | git -C pc1 fetch origin && | |
8d6ba495 | 95 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 96 | main..origin/main >observed && |
35a7ae95 JH |
97 | test_line_count = 5 observed |
98 | ' | |
99 | ||
100 | # force dynamic object fetch using diff. | |
95cf2c01 | 101 | # we should only get 1 new blob (for the file in origin/main). |
35a7ae95 | 102 | test_expect_success 'verify diff causes dynamic object fetch' ' |
95cf2c01 | 103 | git -C pc1 diff main..origin/main -- file.1.txt && |
8d6ba495 | 104 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 105 | main..origin/main >observed && |
35a7ae95 JH |
106 | test_line_count = 4 observed |
107 | ' | |
108 | ||
109 | # force full dynamic object fetch of the file's history using blame. | |
110 | # we should get the intermediate blobs for the file. | |
111 | test_expect_success 'verify blame causes dynamic object fetch' ' | |
95cf2c01 | 112 | git -C pc1 blame origin/main -- file.1.txt >observed.blame && |
35a7ae95 | 113 | test_cmp expect.blame observed.blame && |
8d6ba495 | 114 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 115 | main..origin/main >observed && |
35a7ae95 JH |
116 | test_line_count = 0 observed |
117 | ' | |
118 | ||
aa57b871 JH |
119 | # create new commits in "src" repo to establish a history on file.2.txt |
120 | # and push to "srv.bare". | |
121 | test_expect_success 'push new commits to server for file.2.txt' ' | |
122 | for x in a b c d e f | |
123 | do | |
74d2f569 ES |
124 | echo "Mod file.2.txt $x" >>src/file.2.txt && |
125 | git -C src add file.2.txt && | |
d0fd9931 | 126 | git -C src commit -m "mod $x" || return 1 |
aa57b871 | 127 | done && |
95cf2c01 | 128 | git -C src push -u srv main |
aa57b871 JH |
129 | ' |
130 | ||
3aa6694f | 131 | # Do FULL fetch by disabling inherited filter-spec using --no-filter. |
aa57b871 JH |
132 | # Verify we have all the new blobs. |
133 | test_expect_success 'override inherited filter-spec using --no-filter' ' | |
134 | git -C pc1 fetch --no-filter origin && | |
8d6ba495 | 135 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 136 | main..origin/main >observed && |
aa57b871 JH |
137 | test_line_count = 0 observed |
138 | ' | |
139 | ||
3aa6694f JH |
140 | # create new commits in "src" repo to establish a history on file.3.txt |
141 | # and push to "srv.bare". | |
142 | test_expect_success 'push new commits to server for file.3.txt' ' | |
143 | for x in a b c d e f | |
144 | do | |
74d2f569 ES |
145 | echo "Mod file.3.txt $x" >>src/file.3.txt && |
146 | git -C src add file.3.txt && | |
d0fd9931 | 147 | git -C src commit -m "mod $x" || return 1 |
3aa6694f | 148 | done && |
95cf2c01 | 149 | git -C src push -u srv main |
3aa6694f JH |
150 | ' |
151 | ||
152 | # Do a partial fetch and then try to manually fetch the missing objects. | |
153 | # This can be used as the basis of a pre-command hook to bulk fetch objects | |
154 | # perhaps combined with a command in dry-run mode. | |
155 | test_expect_success 'manual prefetch of missing objects' ' | |
156 | git -C pc1 fetch --filter=blob:none origin && | |
bdbc17e8 | 157 | |
8d6ba495 | 158 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 159 | main..origin/main >revs && |
61de0ff6 | 160 | awk -f print_1.awk revs | |
bdbc17e8 MD |
161 | sed "s/?//" | |
162 | sort >observed.oids && | |
163 | ||
3aa6694f JH |
164 | test_line_count = 6 observed.oids && |
165 | git -C pc1 fetch-pack --stdin "file://$(pwd)/srv.bare" <observed.oids && | |
bdbc17e8 | 166 | |
8d6ba495 | 167 | git -C pc1 rev-list --quiet --objects --missing=print \ |
95cf2c01 | 168 | main..origin/main >revs && |
61de0ff6 | 169 | awk -f print_1.awk revs | |
bdbc17e8 MD |
170 | sed "s/?//" | |
171 | sort >observed.oids && | |
172 | ||
3aa6694f JH |
173 | test_line_count = 0 observed.oids |
174 | ' | |
175 | ||
011b7757 RC |
176 | # create new commits in "src" repo to establish a history on file.4.txt |
177 | # and push to "srv.bare". | |
178 | test_expect_success 'push new commits to server for file.4.txt' ' | |
179 | for x in a b c d e f | |
180 | do | |
181 | echo "Mod file.4.txt $x" >src/file.4.txt && | |
182 | if list_contains "a,b" "$x"; then | |
183 | printf "%10000s" X >>src/file.4.txt | |
184 | fi && | |
185 | if list_contains "c,d" "$x"; then | |
186 | printf "%20000s" X >>src/file.4.txt | |
187 | fi && | |
188 | git -C src add file.4.txt && | |
189 | git -C src commit -m "mod $x" || return 1 | |
190 | done && | |
191 | git -C src push -u srv main | |
192 | ' | |
193 | ||
194 | # Do partial fetch to fetch smaller files; then verify that without --refetch | |
195 | # applying a new filter does not refetch missing large objects. Then use | |
196 | # --refetch to apply the new filter on existing commits. Test it under both | |
197 | # protocol v2 & v0. | |
198 | test_expect_success 'apply a different filter using --refetch' ' | |
199 | git -C pc1 fetch --filter=blob:limit=999 origin && | |
200 | git -C pc1 rev-list --quiet --objects --missing=print \ | |
201 | main..origin/main >observed && | |
202 | test_line_count = 4 observed && | |
203 | ||
204 | git -C pc1 fetch --filter=blob:limit=19999 --refetch origin && | |
205 | git -C pc1 rev-list --quiet --objects --missing=print \ | |
206 | main..origin/main >observed && | |
207 | test_line_count = 2 observed && | |
208 | ||
209 | git -c protocol.version=0 -C pc1 fetch --filter=blob:limit=29999 \ | |
210 | --refetch origin && | |
211 | git -C pc1 rev-list --quiet --objects --missing=print \ | |
212 | main..origin/main >observed && | |
213 | test_line_count = 0 observed | |
214 | ' | |
215 | ||
216 | test_expect_success 'fetch --refetch works with a shallow clone' ' | |
217 | git clone --no-checkout --depth=1 --filter=blob:none "file://$(pwd)/srv.bare" pc1s && | |
218 | git -C pc1s rev-list --objects --missing=print HEAD >observed && | |
219 | test_line_count = 6 observed && | |
220 | ||
221 | GIT_TRACE=1 git -C pc1s fetch --filter=blob:limit=999 --refetch origin && | |
222 | git -C pc1s rev-list --objects --missing=print HEAD >observed && | |
223 | test_line_count = 6 observed | |
224 | ' | |
225 | ||
7390f05a RC |
226 | test_expect_success 'fetch --refetch triggers repacking' ' |
227 | GIT_TRACE2_CONFIG_PARAMS=gc.autoPackLimit,maintenance.incremental-repack.auto && | |
228 | export GIT_TRACE2_CONFIG_PARAMS && | |
229 | ||
230 | GIT_TRACE2_EVENT="$PWD/trace1.event" \ | |
231 | git -C pc1 fetch --refetch origin && | |
232 | test_subcommand git maintenance run --auto --no-quiet <trace1.event && | |
233 | grep \"param\":\"gc.autopacklimit\",\"value\":\"1\" trace1.event && | |
234 | grep \"param\":\"maintenance.incremental-repack.auto\",\"value\":\"-1\" trace1.event && | |
235 | ||
236 | GIT_TRACE2_EVENT="$PWD/trace2.event" \ | |
237 | git -c protocol.version=0 \ | |
238 | -c gc.autoPackLimit=0 \ | |
239 | -c maintenance.incremental-repack.auto=1234 \ | |
240 | -C pc1 fetch --refetch origin && | |
241 | test_subcommand git maintenance run --auto --no-quiet <trace2.event && | |
242 | grep \"param\":\"gc.autopacklimit\",\"value\":\"0\" trace2.event && | |
243 | grep \"param\":\"maintenance.incremental-repack.auto\",\"value\":\"-1\" trace2.event && | |
244 | ||
245 | GIT_TRACE2_EVENT="$PWD/trace3.event" \ | |
246 | git -c protocol.version=0 \ | |
247 | -c gc.autoPackLimit=1234 \ | |
248 | -c maintenance.incremental-repack.auto=0 \ | |
249 | -C pc1 fetch --refetch origin && | |
250 | test_subcommand git maintenance run --auto --no-quiet <trace3.event && | |
251 | grep \"param\":\"gc.autopacklimit\",\"value\":\"1\" trace3.event && | |
252 | grep \"param\":\"maintenance.incremental-repack.auto\",\"value\":\"0\" trace3.event | |
253 | ' | |
254 | ||
1b03df5f JT |
255 | test_expect_success 'partial clone with transfer.fsckobjects=1 works with submodules' ' |
256 | test_create_repo submodule && | |
257 | test_commit -C submodule mycommit && | |
258 | ||
259 | test_create_repo src_with_sub && | |
260 | test_config -C src_with_sub uploadpack.allowfilter 1 && | |
261 | test_config -C src_with_sub uploadpack.allowanysha1inwant 1 && | |
262 | ||
225d2d50 TB |
263 | test_config_global protocol.file.allow always && |
264 | ||
1b03df5f JT |
265 | git -C src_with_sub submodule add "file://$(pwd)/submodule" mysub && |
266 | git -C src_with_sub commit -m "commit with submodule" && | |
267 | ||
268 | git -c transfer.fsckobjects=1 \ | |
269 | clone --filter="blob:none" "file://$(pwd)/src_with_sub" dst && | |
270 | test_when_finished rm -rf dst | |
271 | ' | |
272 | ||
98a2ea46 JT |
273 | test_expect_success 'partial clone with transfer.fsckobjects=1 uses index-pack --fsck-objects' ' |
274 | git init src && | |
275 | test_commit -C src x && | |
276 | test_config -C src uploadpack.allowfilter 1 && | |
277 | test_config -C src uploadpack.allowanysha1inwant 1 && | |
278 | ||
279 | GIT_TRACE="$(pwd)/trace" git -c transfer.fsckobjects=1 \ | |
280 | clone --filter="blob:none" "file://$(pwd)/src" dst && | |
281 | grep "git index-pack.*--fsck-objects" trace | |
282 | ' | |
283 | ||
bc5975d2 MD |
284 | test_expect_success 'use fsck before and after manually fetching a missing subtree' ' |
285 | # push new commit so server has a subtree | |
286 | mkdir src/dir && | |
287 | echo "in dir" >src/dir/file.txt && | |
288 | git -C src add dir/file.txt && | |
289 | git -C src commit -m "file in dir" && | |
95cf2c01 | 290 | git -C src push -u srv main && |
bc5975d2 MD |
291 | SUBTREE=$(git -C src rev-parse HEAD:dir) && |
292 | ||
293 | rm -rf dst && | |
294 | git clone --no-checkout --filter=tree:0 "file://$(pwd)/srv.bare" dst && | |
295 | git -C dst fsck && | |
296 | ||
297 | # Make sure we only have commits, and all trees and blobs are missing. | |
95cf2c01 | 298 | git -C dst rev-list --missing=allow-any --objects main \ |
bc5975d2 MD |
299 | >fetched_objects && |
300 | awk -f print_1.awk fetched_objects | | |
301 | xargs -n1 git -C dst cat-file -t >fetched_types && | |
302 | ||
303 | sort -u fetched_types >unique_types.observed && | |
304 | echo commit >unique_types.expected && | |
305 | test_cmp unique_types.expected unique_types.observed && | |
306 | ||
307 | # Auto-fetch a tree with cat-file. | |
308 | git -C dst cat-file -p $SUBTREE >tree_contents && | |
309 | grep file.txt tree_contents && | |
310 | ||
311 | # fsck still works after an auto-fetch of a tree. | |
312 | git -C dst fsck && | |
313 | ||
314 | # Auto-fetch all remaining trees and blobs with --missing=error | |
95cf2c01 | 315 | git -C dst rev-list --missing=error --objects main >fetched_objects && |
011b7757 | 316 | test_line_count = 88 fetched_objects && |
bc5975d2 MD |
317 | |
318 | awk -f print_1.awk fetched_objects | | |
319 | xargs -n1 git -C dst cat-file -t >fetched_types && | |
320 | ||
321 | sort -u fetched_types >unique_types.observed && | |
d9e6d094 | 322 | test_write_lines blob commit tree >unique_types.expected && |
bc5975d2 MD |
323 | test_cmp unique_types.expected unique_types.observed |
324 | ' | |
325 | ||
489fc9ee MD |
326 | test_expect_success 'implicitly construct combine: filter with repeated flags' ' |
327 | GIT_TRACE=$(pwd)/trace git clone --bare \ | |
328 | --filter=blob:none --filter=tree:1 \ | |
329 | "file://$(pwd)/srv.bare" pc2 && | |
330 | grep "trace:.* git pack-objects .*--filter=combine:blob:none+tree:1" \ | |
331 | trace && | |
332 | git -C pc2 rev-list --objects --missing=allow-any HEAD >objects && | |
333 | ||
334 | # We should have gotten some root trees. | |
335 | grep " $" objects && | |
336 | # Should not have gotten any non-root trees or blobs. | |
337 | ! grep " ." objects && | |
338 | ||
339 | xargs -n 1 git -C pc2 cat-file -t <objects >types && | |
340 | sort -u types >unique_types.actual && | |
341 | test_write_lines commit tree >unique_types.expected && | |
342 | test_cmp unique_types.expected unique_types.actual | |
343 | ' | |
344 | ||
d43a21bd JK |
345 | test_expect_success 'upload-pack complains of bogus filter config' ' |
346 | printf 0000 | | |
347 | test_must_fail git \ | |
348 | -c uploadpackfilter.tree.maxdepth \ | |
349 | upload-pack . >/dev/null 2>err && | |
350 | test_i18ngrep "unable to parse.*tree.maxdepth" err | |
351 | ' | |
352 | ||
6dd3456a TB |
353 | test_expect_success 'upload-pack fails banned object filters' ' |
354 | test_config -C srv.bare uploadpackfilter.blob:none.allow false && | |
355 | test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \ | |
356 | "file://$(pwd)/srv.bare" pc3 2>err && | |
6cc275ea | 357 | test_i18ngrep "filter '\''blob:none'\'' not supported" err |
6dd3456a TB |
358 | ' |
359 | ||
360 | test_expect_success 'upload-pack fails banned combine object filters' ' | |
361 | test_config -C srv.bare uploadpackfilter.allow false && | |
362 | test_config -C srv.bare uploadpackfilter.combine.allow true && | |
363 | test_config -C srv.bare uploadpackfilter.tree.allow true && | |
364 | test_config -C srv.bare uploadpackfilter.blob:none.allow false && | |
365 | test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \ | |
366 | --filter=blob:none "file://$(pwd)/srv.bare" pc3 2>err && | |
6cc275ea | 367 | test_i18ngrep "filter '\''blob:none'\'' not supported" err |
6dd3456a TB |
368 | ' |
369 | ||
370 | test_expect_success 'upload-pack fails banned object filters with fallback' ' | |
371 | test_config -C srv.bare uploadpackfilter.allow false && | |
372 | test_must_fail ok=sigpipe git clone --no-checkout --filter=blob:none \ | |
373 | "file://$(pwd)/srv.bare" pc3 2>err && | |
6cc275ea | 374 | test_i18ngrep "filter '\''blob:none'\'' not supported" err |
6dd3456a TB |
375 | ' |
376 | ||
5b01a4e8 TB |
377 | test_expect_success 'upload-pack limits tree depth filters' ' |
378 | test_config -C srv.bare uploadpackfilter.allow false && | |
379 | test_config -C srv.bare uploadpackfilter.tree.allow true && | |
380 | test_config -C srv.bare uploadpackfilter.tree.maxDepth 0 && | |
381 | test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:1 \ | |
382 | "file://$(pwd)/srv.bare" pc3 2>err && | |
8d133f50 TB |
383 | test_i18ngrep "tree filter allows max depth 0, but got 1" err && |
384 | ||
385 | git clone --no-checkout --filter=tree:0 "file://$(pwd)/srv.bare" pc4 && | |
386 | ||
387 | test_config -C srv.bare uploadpackfilter.tree.maxDepth 5 && | |
388 | git clone --no-checkout --filter=tree:5 "file://$(pwd)/srv.bare" pc5 && | |
389 | test_must_fail ok=sigpipe git clone --no-checkout --filter=tree:6 \ | |
390 | "file://$(pwd)/srv.bare" pc6 2>err && | |
391 | test_i18ngrep "tree filter allows max depth 5, but got 6" err | |
5b01a4e8 TB |
392 | ' |
393 | ||
a0c9016a JT |
394 | test_expect_success 'partial clone fetches blobs pointed to by refs even if normally filtered out' ' |
395 | rm -rf src dst && | |
396 | git init src && | |
397 | test_commit -C src x && | |
398 | test_config -C src uploadpack.allowfilter 1 && | |
399 | test_config -C src uploadpack.allowanysha1inwant 1 && | |
400 | ||
401 | # Create a tag pointing to a blob. | |
402 | BLOB=$(echo blob-contents | git -C src hash-object --stdin -w) && | |
403 | git -C src tag myblob "$BLOB" && | |
404 | ||
405 | git clone --filter="blob:none" "file://$(pwd)/src" dst 2>err && | |
406 | ! grep "does not point to a valid object" err && | |
407 | git -C dst fsck | |
408 | ' | |
409 | ||
35f9e3e5 JT |
410 | test_expect_success 'fetch what is specified on CLI even if already promised' ' |
411 | rm -rf src dst.git && | |
412 | git init src && | |
413 | test_commit -C src foo && | |
414 | test_config -C src uploadpack.allowfilter 1 && | |
415 | test_config -C src uploadpack.allowanysha1inwant 1 && | |
416 | ||
417 | git hash-object --stdin <src/foo.t >blob && | |
418 | ||
419 | git clone --bare --filter=blob:none "file://$(pwd)/src" dst.git && | |
420 | git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_before && | |
421 | grep "?$(cat blob)" missing_before && | |
422 | git -C dst.git fetch origin $(cat blob) && | |
423 | git -C dst.git rev-list --objects --quiet --missing=print HEAD >missing_after && | |
424 | ! grep "?$(cat blob)" missing_after | |
425 | ' | |
426 | ||
72de5895 JS |
427 | test_expect_success 'setup src repo for sparse filter' ' |
428 | git init sparse-src && | |
429 | git -C sparse-src config --local uploadpack.allowfilter 1 && | |
430 | git -C sparse-src config --local uploadpack.allowanysha1inwant 1 && | |
431 | test_commit -C sparse-src one && | |
432 | test_commit -C sparse-src two && | |
433 | echo /one.t >sparse-src/only-one && | |
434 | git -C sparse-src add . && | |
435 | git -C sparse-src commit -m "add sparse checkout files" | |
436 | ' | |
437 | ||
4c96a775 | 438 | test_expect_success 'partial clone with sparse filter succeeds' ' |
72de5895 JS |
439 | rm -rf dst.git && |
440 | git clone --no-local --bare \ | |
95cf2c01 | 441 | --filter=sparse:oid=main:only-one \ |
72de5895 JS |
442 | sparse-src dst.git && |
443 | ( | |
444 | cd dst.git && | |
445 | git rev-list --objects --missing=print HEAD >out && | |
446 | grep "^$(git rev-parse HEAD:one.t)" out && | |
447 | grep "^?$(git rev-parse HEAD:two.t)" out | |
448 | ) | |
449 | ' | |
450 | ||
4c96a775 | 451 | test_expect_success 'partial clone with unresolvable sparse filter fails cleanly' ' |
72de5895 JS |
452 | rm -rf dst.git && |
453 | test_must_fail git clone --no-local --bare \ | |
95cf2c01 | 454 | --filter=sparse:oid=main:no-such-name \ |
72de5895 | 455 | sparse-src dst.git 2>err && |
95cf2c01 | 456 | test_i18ngrep "unable to access sparse blob in .main:no-such-name" err && |
72de5895 | 457 | test_must_fail git clone --no-local --bare \ |
95cf2c01 | 458 | --filter=sparse:oid=main \ |
72de5895 | 459 | sparse-src dst.git 2>err && |
cf34337f | 460 | test_i18ngrep "unable to parse sparse filter data in" err |
72de5895 JS |
461 | ' |
462 | ||
6462d5eb JT |
463 | setup_triangle () { |
464 | rm -rf big-blob.txt server client promisor-remote && | |
465 | ||
466 | printf "line %d\n" $(test_seq 1 100) >big-blob.txt && | |
467 | ||
b54128bb | 468 | # Create a server with 2 commits: a commit with a big tree and a child |
6462d5eb JT |
469 | # commit with an incremental change. Also, create a partial clone |
470 | # client that only contains the first commit. | |
471 | git init server && | |
472 | git -C server config --local uploadpack.allowfilter 1 && | |
b54128bb JT |
473 | for i in $(test_seq 1 100) |
474 | do | |
475 | echo "make the tree big" >server/file$i && | |
d0fd9931 | 476 | git -C server add file$i || return 1 |
b54128bb | 477 | done && |
6462d5eb JT |
478 | git -C server commit -m "initial" && |
479 | git clone --bare --filter=tree:0 "file://$(pwd)/server" client && | |
b54128bb JT |
480 | echo another line >>server/file1 && |
481 | git -C server commit -am "incremental change" && | |
6462d5eb | 482 | |
b54128bb JT |
483 | # Create a promisor remote that only contains the tree and blob from |
484 | # the first commit. | |
6462d5eb | 485 | git init promisor-remote && |
b54128bb JT |
486 | git -C server config --local uploadpack.allowanysha1inwant 1 && |
487 | TREE_HASH=$(git -C server rev-parse HEAD~1^{tree}) && | |
488 | git -C promisor-remote fetch --keep "file://$(pwd)/server" "$TREE_HASH" && | |
489 | git -C promisor-remote count-objects -v >object-count && | |
490 | test_i18ngrep "count: 0" object-count && | |
491 | test_i18ngrep "in-pack: 2" object-count && | |
492 | ||
493 | # Set it as the promisor remote of client. Thus, whenever | |
494 | # the client lazy fetches, the lazy fetch will succeed only if it is | |
495 | # for this tree or blob. | |
6462d5eb JT |
496 | test_commit -C promisor-remote one && # so that ref advertisement is not empty |
497 | git -C promisor-remote config --local uploadpack.allowanysha1inwant 1 && | |
6462d5eb JT |
498 | git -C client remote set-url origin "file://$(pwd)/promisor-remote" |
499 | } | |
500 | ||
501 | # NEEDSWORK: The tests beginning with "fetch lazy-fetches" below only | |
502 | # test that "fetch" avoid fetching trees and blobs, but not commits or | |
503 | # tags. Revisit this if Git is ever taught to support partial clones | |
504 | # with commits and/or tags filtered out. | |
505 | ||
506 | test_expect_success 'fetch lazy-fetches only to resolve deltas' ' | |
507 | setup_triangle && | |
508 | ||
509 | # Exercise to make sure it works. Git will not fetch anything from the | |
b54128bb | 510 | # promisor remote other than for the big tree (because it needs to |
6462d5eb JT |
511 | # resolve the delta). |
512 | GIT_TRACE_PACKET="$(pwd)/trace" git -C client \ | |
95cf2c01 | 513 | fetch "file://$(pwd)/server" main && |
6462d5eb JT |
514 | |
515 | # Verify the assumption that the client needed to fetch the delta base | |
516 | # to resolve the delta. | |
b54128bb | 517 | git -C server rev-parse HEAD~1^{tree} >hash && |
6462d5eb JT |
518 | grep "want $(cat hash)" trace |
519 | ' | |
520 | ||
521 | test_expect_success 'fetch lazy-fetches only to resolve deltas, protocol v2' ' | |
522 | setup_triangle && | |
523 | ||
524 | git -C server config --local protocol.version 2 && | |
525 | git -C client config --local protocol.version 2 && | |
526 | git -C promisor-remote config --local protocol.version 2 && | |
527 | ||
528 | # Exercise to make sure it works. Git will not fetch anything from the | |
529 | # promisor remote other than for the big blob (because it needs to | |
530 | # resolve the delta). | |
531 | GIT_TRACE_PACKET="$(pwd)/trace" git -C client \ | |
95cf2c01 | 532 | fetch "file://$(pwd)/server" main && |
6462d5eb JT |
533 | |
534 | # Verify that protocol version 2 was used. | |
535 | grep "fetch< version 2" trace && | |
536 | ||
537 | # Verify the assumption that the client needed to fetch the delta base | |
538 | # to resolve the delta. | |
b54128bb | 539 | git -C server rev-parse HEAD~1^{tree} >hash && |
6462d5eb JT |
540 | grep "want $(cat hash)" trace |
541 | ' | |
542 | ||
5c3b801d JT |
543 | test_expect_success 'fetch does not lazy-fetch missing targets of its refs' ' |
544 | rm -rf server client trace && | |
545 | ||
546 | test_create_repo server && | |
547 | test_config -C server uploadpack.allowfilter 1 && | |
548 | test_config -C server uploadpack.allowanysha1inwant 1 && | |
549 | test_commit -C server foo && | |
550 | ||
551 | git clone --filter=blob:none "file://$(pwd)/server" client && | |
552 | # Make all refs point to nothing by deleting all objects. | |
553 | rm client/.git/objects/pack/* && | |
554 | ||
555 | test_commit -C server bar && | |
556 | GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch \ | |
557 | --no-tags --recurse-submodules=no \ | |
558 | origin refs/tags/bar && | |
559 | FOO_HASH=$(git -C server rev-parse foo) && | |
560 | ! grep "want $FOO_HASH" trace | |
561 | ' | |
562 | ||
08450ef7 CC |
563 | # The following two tests must be in this order. It is important that |
564 | # the srv.bare repository did not have tags during clone, but has tags | |
d0badf87 DS |
565 | # in the fetch. |
566 | ||
08450ef7 | 567 | test_expect_success 'verify fetch succeeds when asking for new tags' ' |
d0badf87 DS |
568 | git clone --filter=blob:none "file://$(pwd)/srv.bare" tag-test && |
569 | for i in I J K | |
570 | do | |
571 | test_commit -C src $i && | |
572 | git -C src branch $i || return 1 | |
573 | done && | |
574 | git -C srv.bare fetch --tags origin +refs/heads/*:refs/heads/* && | |
575 | git -C tag-test -c protocol.version=2 fetch --tags origin | |
576 | ' | |
577 | ||
3e96c668 | 578 | test_expect_success 'verify fetch downloads only one pack when updating refs' ' |
d0badf87 DS |
579 | git clone --filter=blob:none "file://$(pwd)/srv.bare" pack-test && |
580 | ls pack-test/.git/objects/pack/*pack >pack-list && | |
581 | test_line_count = 2 pack-list && | |
582 | for i in A B C | |
583 | do | |
584 | test_commit -C src $i && | |
585 | git -C src branch $i || return 1 | |
586 | done && | |
587 | git -C srv.bare fetch origin +refs/heads/*:refs/heads/* && | |
588 | git -C pack-test fetch origin && | |
589 | ls pack-test/.git/objects/pack/*pack >pack-list && | |
590 | test_line_count = 3 pack-list | |
591 | ' | |
592 | ||
167a575e JK |
593 | test_expect_success 'single-branch tag following respects partial clone' ' |
594 | git clone --single-branch -b B --filter=blob:none \ | |
595 | "file://$(pwd)/srv.bare" single && | |
596 | git -C single rev-parse --verify refs/tags/B && | |
597 | git -C single rev-parse --verify refs/tags/A && | |
598 | test_must_fail git -C single rev-parse --verify refs/tags/C | |
599 | ' | |
600 | ||
77aa0941 JT |
601 | test_expect_success 'fetch from a partial clone, protocol v0' ' |
602 | rm -rf server client trace && | |
603 | ||
604 | # Pretend that the server is a partial clone | |
605 | git init server && | |
606 | git -C server remote add a_remote "file://$(pwd)/" && | |
607 | test_config -C server core.repositoryformatversion 1 && | |
608 | test_config -C server extensions.partialclone a_remote && | |
609 | test_config -C server protocol.version 0 && | |
610 | test_commit -C server foo && | |
611 | ||
612 | # Fetch from the server | |
613 | git init client && | |
614 | test_config -C client protocol.version 0 && | |
615 | test_commit -C client bar && | |
616 | GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" && | |
617 | ! grep "version 2" trace | |
618 | ' | |
619 | ||
620 | test_expect_success 'fetch from a partial clone, protocol v2' ' | |
621 | rm -rf server client trace && | |
622 | ||
623 | # Pretend that the server is a partial clone | |
624 | git init server && | |
625 | git -C server remote add a_remote "file://$(pwd)/" && | |
626 | test_config -C server core.repositoryformatversion 1 && | |
627 | test_config -C server extensions.partialclone a_remote && | |
628 | test_config -C server protocol.version 2 && | |
629 | test_commit -C server foo && | |
630 | ||
631 | # Fetch from the server | |
632 | git init client && | |
633 | test_config -C client protocol.version 2 && | |
634 | test_commit -C client bar && | |
635 | GIT_TRACE_PACKET="$(pwd)/trace" git -C client fetch "file://$(pwd)/server" && | |
636 | grep "version 2" trace | |
637 | ' | |
638 | ||
a643157d RS |
639 | test_expect_success 'repack does not loosen promisor objects' ' |
640 | rm -rf client trace && | |
641 | git clone --bare --filter=blob:none "file://$(pwd)/srv.bare" client && | |
642 | test_when_finished "rm -rf client trace" && | |
643 | GIT_TRACE2_PERF="$(pwd)/trace" git -C client repack -A -d && | |
644 | grep "loosen_unused_packed_objects/loosened:0" trace | |
645 | ' | |
646 | ||
4002ec3d | 647 | test_expect_success 'lazy-fetch in submodule succeeds' ' |
0d1806e5 GC |
648 | # setup |
649 | test_config_global protocol.file.allow always && | |
650 | ||
651 | test_when_finished "rm -rf src-sub" && | |
652 | git init src-sub && | |
653 | git -C src-sub config uploadpack.allowfilter 1 && | |
654 | git -C src-sub config uploadpack.allowanysha1inwant 1 && | |
655 | ||
656 | # This blob must be missing in the subsequent commit. | |
657 | echo foo >src-sub/file && | |
658 | git -C src-sub add file && | |
659 | git -C src-sub commit -m "submodule one" && | |
660 | SUB_ONE=$(git -C src-sub rev-parse HEAD) && | |
661 | ||
662 | echo bar >src-sub/file && | |
663 | git -C src-sub add file && | |
664 | git -C src-sub commit -m "submodule two" && | |
665 | SUB_TWO=$(git -C src-sub rev-parse HEAD) && | |
666 | ||
667 | test_when_finished "rm -rf src-super" && | |
668 | git init src-super && | |
669 | git -C src-super config uploadpack.allowfilter 1 && | |
670 | git -C src-super config uploadpack.allowanysha1inwant 1 && | |
671 | git -C src-super submodule add ../src-sub src-sub && | |
672 | ||
673 | git -C src-super/src-sub checkout $SUB_ONE && | |
674 | git -C src-super add src-sub && | |
675 | git -C src-super commit -m "superproject one" && | |
676 | ||
677 | git -C src-super/src-sub checkout $SUB_TWO && | |
678 | git -C src-super add src-sub && | |
679 | git -C src-super commit -m "superproject two" && | |
680 | ||
681 | # the fetch | |
682 | test_when_finished "rm -rf client" && | |
683 | git clone --filter=blob:none --also-filter-submodules \ | |
684 | --recurse-submodules "file://$(pwd)/src-super" client && | |
685 | ||
686 | # Trigger lazy-fetch from the superproject | |
687 | git -C client restore --recurse-submodules --source=HEAD^ :/ | |
688 | ' | |
689 | ||
a7e67c11 JT |
690 | . "$TEST_DIRECTORY"/lib-httpd.sh |
691 | start_httpd | |
692 | ||
385d1bfd JT |
693 | # Converts bytes into their hexadecimal representation. For example, |
694 | # "printf 'ab\r\n' | hex_unpack" results in '61620d0a'. | |
695 | hex_unpack () { | |
696 | perl -e '$/ = undef; $input = <>; print unpack("H2" x length($input), $input)' | |
697 | } | |
698 | ||
699 | # Inserts $1 at the start of the string and every 2 characters thereafter. | |
700 | intersperse () { | |
701 | sed 's/\(..\)/'$1'\1/g' | |
702 | } | |
703 | ||
eafff6e4 | 704 | # Create a one-time-perl command to replace the existing packfile with $1. |
385d1bfd JT |
705 | replace_packfile () { |
706 | # The protocol requires that the packfile be sent in sideband 1, hence | |
707 | # the extra \x01 byte at the beginning. | |
eafff6e4 JS |
708 | cp $1 "$HTTPD_ROOT_PATH/one-time-pack" && |
709 | echo 'if (/packfile/) { | |
710 | print; | |
711 | my $length = -s "one-time-pack"; | |
712 | printf "%04x\x01", $length + 5; | |
713 | print `cat one-time-pack` . "0000"; | |
714 | last | |
715 | }' >"$HTTPD_ROOT_PATH/one-time-perl" | |
a7e67c11 JT |
716 | } |
717 | ||
718 | test_expect_success 'upon cloning, check that all refs point to objects' ' | |
719 | SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && | |
720 | rm -rf "$SERVER" repo && | |
721 | test_create_repo "$SERVER" && | |
722 | test_commit -C "$SERVER" foo && | |
723 | test_config -C "$SERVER" uploadpack.allowfilter 1 && | |
724 | test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && | |
725 | ||
726 | # Create a tag pointing to a blob. | |
727 | BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) && | |
728 | git -C "$SERVER" tag myblob "$BLOB" && | |
729 | ||
730 | # Craft a packfile not including that blob. | |
731 | git -C "$SERVER" rev-parse HEAD | | |
bdbc17e8 | 732 | git -C "$SERVER" pack-objects --stdout >incomplete.pack && |
a7e67c11 JT |
733 | |
734 | # Replace the existing packfile with the crafted one. The protocol | |
735 | # requires that the packfile be sent in sideband 1, hence the extra | |
736 | # \x01 byte at the beginning. | |
385d1bfd | 737 | replace_packfile incomplete.pack && |
a7e67c11 | 738 | |
eafff6e4 | 739 | # Use protocol v2 because the perl command looks for the "packfile" |
a7e67c11 JT |
740 | # section header. |
741 | test_config -C "$SERVER" protocol.version 2 && | |
742 | test_must_fail git -c protocol.version=2 clone \ | |
eafff6e4 | 743 | --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2>err && |
a7e67c11 | 744 | |
3813a89f | 745 | test_i18ngrep "did not send all necessary objects" err && |
a7e67c11 | 746 | |
eafff6e4 JS |
747 | # Ensure that the one-time-perl script was used. |
748 | ! test -e "$HTTPD_ROOT_PATH/one-time-perl" | |
a7e67c11 JT |
749 | ' |
750 | ||
dc0a13f6 JT |
751 | test_expect_success 'when partial cloning, tolerate server not sending target of tag' ' |
752 | SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && | |
753 | rm -rf "$SERVER" repo && | |
754 | test_create_repo "$SERVER" && | |
755 | test_commit -C "$SERVER" foo && | |
756 | test_config -C "$SERVER" uploadpack.allowfilter 1 && | |
757 | test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && | |
758 | ||
759 | # Create an annotated tag pointing to a blob. | |
760 | BLOB=$(echo blob-contents | git -C "$SERVER" hash-object --stdin -w) && | |
761 | git -C "$SERVER" tag -m message -a myblob "$BLOB" && | |
762 | ||
763 | # Craft a packfile including the tag, but not the blob it points to. | |
8c4cc326 JT |
764 | # Also, omit objects referenced from HEAD in order to force a second |
765 | # fetch (to fetch missing objects) upon the automatic checkout that | |
766 | # happens after a clone. | |
767 | printf "%s\n%s\n--not\n%s\n%s\n" \ | |
dc0a13f6 JT |
768 | $(git -C "$SERVER" rev-parse HEAD) \ |
769 | $(git -C "$SERVER" rev-parse myblob) \ | |
8c4cc326 | 770 | $(git -C "$SERVER" rev-parse HEAD^{tree}) \ |
dc0a13f6 JT |
771 | $(git -C "$SERVER" rev-parse myblob^{blob}) | |
772 | git -C "$SERVER" pack-objects --thin --stdout >incomplete.pack && | |
773 | ||
774 | # Replace the existing packfile with the crafted one. The protocol | |
775 | # requires that the packfile be sent in sideband 1, hence the extra | |
776 | # \x01 byte at the beginning. | |
385d1bfd | 777 | replace_packfile incomplete.pack && |
dc0a13f6 | 778 | |
eafff6e4 | 779 | # Use protocol v2 because the perl command looks for the "packfile" |
dc0a13f6 JT |
780 | # section header. |
781 | test_config -C "$SERVER" protocol.version 2 && | |
782 | ||
783 | # Exercise to make sure it works. | |
784 | git -c protocol.version=2 clone \ | |
eafff6e4 | 785 | --filter=blob:none $HTTPD_URL/one_time_perl/server repo 2> err && |
8c4cc326 | 786 | ! grep "missing object referenced by" err && |
dc0a13f6 | 787 | |
eafff6e4 JS |
788 | # Ensure that the one-time-perl script was used. |
789 | ! test -e "$HTTPD_ROOT_PATH/one-time-perl" | |
dc0a13f6 JT |
790 | ' |
791 | ||
8a30a1ef JT |
792 | test_expect_success 'tolerate server sending REF_DELTA against missing promisor objects' ' |
793 | SERVER="$HTTPD_DOCUMENT_ROOT_PATH/server" && | |
794 | rm -rf "$SERVER" repo && | |
795 | test_create_repo "$SERVER" && | |
796 | test_config -C "$SERVER" uploadpack.allowfilter 1 && | |
797 | test_config -C "$SERVER" uploadpack.allowanysha1inwant 1 && | |
798 | ||
810e1932 | 799 | # Create a commit with 2 blobs to be used as delta bases. |
8a30a1ef JT |
800 | for i in $(test_seq 10) |
801 | do | |
810e1932 | 802 | echo "this is a line" >>"$SERVER/foo.txt" && |
d0fd9931 | 803 | echo "this is another line" >>"$SERVER/have.txt" || return 1 |
8a30a1ef | 804 | done && |
810e1932 | 805 | git -C "$SERVER" add foo.txt have.txt && |
8a30a1ef | 806 | git -C "$SERVER" commit -m bar && |
810e1932 JT |
807 | git -C "$SERVER" rev-parse HEAD:foo.txt >deltabase_missing && |
808 | git -C "$SERVER" rev-parse HEAD:have.txt >deltabase_have && | |
8a30a1ef | 809 | |
810e1932 | 810 | # Clone. The client has deltabase_have but not deltabase_missing. |
8a30a1ef | 811 | git -c protocol.version=2 clone --no-checkout \ |
eafff6e4 | 812 | --filter=blob:none $HTTPD_URL/one_time_perl/server repo && |
810e1932 | 813 | git -C repo hash-object -w -- "$SERVER/have.txt" && |
8a30a1ef | 814 | |
810e1932 JT |
815 | # Sanity check to ensure that the client does not have |
816 | # deltabase_missing. | |
5718c53d | 817 | git -C repo rev-list --objects --ignore-missing \ |
810e1932 | 818 | -- $(cat deltabase_missing) >objlist && |
8a30a1ef JT |
819 | test_line_count = 0 objlist && |
820 | ||
821 | # Another commit. This commit will be fetched by the client. | |
822 | echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/foo.txt" && | |
810e1932 JT |
823 | echo "abcdefghijklmnopqrstuvwxyz" >>"$SERVER/have.txt" && |
824 | git -C "$SERVER" add foo.txt have.txt && | |
8a30a1ef JT |
825 | git -C "$SERVER" commit -m baz && |
826 | ||
827 | # Pack a thin pack containing, among other things, HEAD:foo.txt | |
810e1932 JT |
828 | # delta-ed against HEAD^:foo.txt and HEAD:have.txt delta-ed against |
829 | # HEAD^:have.txt. | |
8a30a1ef JT |
830 | printf "%s\n--not\n%s\n" \ |
831 | $(git -C "$SERVER" rev-parse HEAD) \ | |
832 | $(git -C "$SERVER" rev-parse HEAD^) | | |
833 | git -C "$SERVER" pack-objects --thin --stdout >thin.pack && | |
834 | ||
835 | # Ensure that the pack contains one delta against HEAD^:foo.txt. Since | |
836 | # the delta contains at least 26 novel characters, the size cannot be | |
837 | # contained in 4 bits, so the object header will take up 2 bytes. The | |
838 | # most significant nybble of the first byte is 0b1111 (0b1 to indicate | |
839 | # that the header continues, and 0b111 to indicate REF_DELTA), followed | |
840 | # by any 3 nybbles, then the OID of the delta base. | |
810e1932 JT |
841 | printf "f.,..%s" $(intersperse "," <deltabase_missing) >want && |
842 | hex_unpack <thin.pack | intersperse "," >have && | |
843 | grep $(cat want) have && | |
844 | ||
845 | # Ensure that the pack contains one delta against HEAD^:have.txt, | |
846 | # similar to the above. | |
847 | printf "f.,..%s" $(intersperse "," <deltabase_have) >want && | |
8a30a1ef JT |
848 | hex_unpack <thin.pack | intersperse "," >have && |
849 | grep $(cat want) have && | |
850 | ||
851 | replace_packfile thin.pack && | |
852 | ||
eafff6e4 | 853 | # Use protocol v2 because the perl command looks for the "packfile" |
8a30a1ef JT |
854 | # section header. |
855 | test_config -C "$SERVER" protocol.version 2 && | |
856 | ||
857 | # Fetch the thin pack and ensure that index-pack is able to handle the | |
858 | # REF_DELTA object with a missing promisor delta base. | |
810e1932 JT |
859 | GIT_TRACE_PACKET="$(pwd)/trace" git -C repo -c protocol.version=2 fetch && |
860 | ||
861 | # Ensure that the missing delta base was directly fetched, but not the | |
862 | # one that the client has. | |
863 | grep "want $(cat deltabase_missing)" trace && | |
864 | ! grep "want $(cat deltabase_have)" trace && | |
8a30a1ef | 865 | |
eafff6e4 JS |
866 | # Ensure that the one-time-perl script was used. |
867 | ! test -e "$HTTPD_ROOT_PATH/one-time-perl" | |
8a30a1ef JT |
868 | ' |
869 | ||
decfe05b SG |
870 | # DO NOT add non-httpd-specific tests here, because the last part of this |
871 | # test script is only executed when httpd is available and enabled. | |
872 | ||
35a7ae95 | 873 | test_done |