|  | #!/bin/sh | 
|  | # | 
|  | # Copyright (c) 2008 Johannes E. Schindelin | 
|  | # | 
|  |  | 
|  | test_description='prune' | 
|  | . ./test-lib.sh | 
|  |  | 
|  | day=$((60*60*24)) | 
|  | week=$(($day*7)) | 
|  |  | 
|  | add_blob() { | 
|  | before=$(git count-objects | sed "s/ .*//") && | 
|  | BLOB=$(echo aleph_0 | git hash-object -w --stdin) && | 
|  | BLOB_FILE=.git/objects/$(echo $BLOB | sed "s/^../&\//") && | 
|  | verbose test $((1 + $before)) = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | test-tool chmtime =+0 $BLOB_FILE | 
|  | } | 
|  |  | 
|  | test_expect_success setup ' | 
|  |  | 
|  | : > file && | 
|  | git add file && | 
|  | test_tick && | 
|  | git commit -m initial && | 
|  | git gc | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune stale packs' ' | 
|  |  | 
|  | orig_pack=$(echo .git/objects/pack/*.pack) && | 
|  | : > .git/objects/tmp_1.pack && | 
|  | : > .git/objects/tmp_2.pack && | 
|  | test-tool chmtime =-86501 .git/objects/tmp_1.pack && | 
|  | git prune --expire 1.day && | 
|  | test_path_is_file $orig_pack && | 
|  | test_path_is_file .git/objects/tmp_2.pack && | 
|  | test_path_is_missing .git/objects/tmp_1.pack | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune --expire' ' | 
|  |  | 
|  | add_blob && | 
|  | git prune --expire=1.hour.ago && | 
|  | verbose test $((1 + $before)) = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | test-tool chmtime =-86500 $BLOB_FILE && | 
|  | git prune --expire 1.day && | 
|  | verbose test $before = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc: implicit prune --expire' ' | 
|  |  | 
|  | add_blob && | 
|  | test-tool chmtime =-$((2*$week-30)) $BLOB_FILE && | 
|  | git gc && | 
|  | verbose test $((1 + $before)) = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | test-tool chmtime =-$((2*$week+1)) $BLOB_FILE && | 
|  | git gc && | 
|  | verbose test $before = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc: refuse to start with invalid gc.pruneExpire' ' | 
|  |  | 
|  | git config gc.pruneExpire invalid && | 
|  | test_must_fail git gc | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc: start with ok gc.pruneExpire' ' | 
|  |  | 
|  | git config gc.pruneExpire 2.days.ago && | 
|  | git gc | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: prune nonsense parameters' ' | 
|  |  | 
|  | test_must_fail git prune garbage && | 
|  | test_must_fail git prune --- && | 
|  | test_must_fail git prune --no-such-option | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: prune unreachable heads' ' | 
|  |  | 
|  | git config core.logAllRefUpdates false && | 
|  | mv .git/logs .git/logs.old && | 
|  | : > file2 && | 
|  | git add file2 && | 
|  | git commit -m temporary && | 
|  | tmp_head=$(git rev-list -1 HEAD) && | 
|  | git reset HEAD^ && | 
|  | git prune && | 
|  | test_must_fail git reset $tmp_head -- | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: do not prune detached HEAD with no reflog' ' | 
|  |  | 
|  | git checkout --detach --quiet && | 
|  | git commit --allow-empty -m "detached commit" && | 
|  | # verify that there is no reflogs | 
|  | # (should be removed and disabled by previous test) | 
|  | test_path_is_missing .git/logs && | 
|  | git prune -n >prune_actual && | 
|  | test_must_be_empty prune_actual | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: prune former HEAD after checking out branch' ' | 
|  |  | 
|  | head_oid=$(git rev-parse HEAD) && | 
|  | git checkout --quiet master && | 
|  | git prune -v >prune_actual && | 
|  | grep "$head_oid" prune_actual | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: do not prune heads listed as an argument' ' | 
|  |  | 
|  | : > file2 && | 
|  | git add file2 && | 
|  | git commit -m temporary && | 
|  | tmp_head=$(git rev-list -1 HEAD) && | 
|  | git reset HEAD^ && | 
|  | git prune -- $tmp_head && | 
|  | git reset $tmp_head -- | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc --no-prune' ' | 
|  |  | 
|  | add_blob && | 
|  | test-tool chmtime =-$((5001*$day)) $BLOB_FILE && | 
|  | git config gc.pruneExpire 2.days.ago && | 
|  | git gc --no-prune && | 
|  | verbose test 1 = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_file $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc respects gc.pruneExpire' ' | 
|  |  | 
|  | git config gc.pruneExpire 5002.days.ago && | 
|  | git gc && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git config gc.pruneExpire 5000.days.ago && | 
|  | git gc && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc --prune=<date>' ' | 
|  |  | 
|  | add_blob && | 
|  | test-tool chmtime =-$((5001*$day)) $BLOB_FILE && | 
|  | git gc --prune=5002.days.ago && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git gc --prune=5000.days.ago && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc --prune=never' ' | 
|  |  | 
|  | add_blob && | 
|  | git gc --prune=never && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git gc --prune=now && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc respects gc.pruneExpire=never' ' | 
|  |  | 
|  | git config gc.pruneExpire never && | 
|  | add_blob && | 
|  | git gc && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git config gc.pruneExpire now && | 
|  | git gc && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune --expire=never' ' | 
|  |  | 
|  | add_blob && | 
|  | git prune --expire=never && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git prune && | 
|  | test_path_is_missing $BLOB_FILE | 
|  |  | 
|  | ' | 
|  |  | 
|  | test_expect_success 'gc: prune old objects after local clone' ' | 
|  | add_blob && | 
|  | test-tool chmtime =-$((2*$week+1)) $BLOB_FILE && | 
|  | git clone --no-hardlinks . aclone && | 
|  | ( | 
|  | cd aclone && | 
|  | verbose test 1 = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_file $BLOB_FILE && | 
|  | git gc --prune && | 
|  | verbose test 0 = $(git count-objects | sed "s/ .*//") && | 
|  | test_path_is_missing $BLOB_FILE | 
|  | ) | 
|  | ' | 
|  |  | 
|  | test_expect_success 'garbage report in count-objects -v' ' | 
|  | test_when_finished "rm -f .git/objects/pack/fake*" && | 
|  | test_when_finished "rm -f .git/objects/pack/foo*" && | 
|  | : >.git/objects/pack/foo && | 
|  | : >.git/objects/pack/foo.bar && | 
|  | : >.git/objects/pack/foo.keep && | 
|  | : >.git/objects/pack/foo.pack && | 
|  | : >.git/objects/pack/fake.bar && | 
|  | : >.git/objects/pack/fake.keep && | 
|  | : >.git/objects/pack/fake.pack && | 
|  | : >.git/objects/pack/fake.idx && | 
|  | : >.git/objects/pack/fake2.keep && | 
|  | : >.git/objects/pack/fake3.idx && | 
|  | git count-objects -v 2>stderr && | 
|  | grep "index file .git/objects/pack/fake.idx is too small" stderr && | 
|  | grep "^warning:" stderr | sort >actual && | 
|  | cat >expected <<\EOF && | 
|  | warning: garbage found: .git/objects/pack/fake.bar | 
|  | warning: garbage found: .git/objects/pack/foo | 
|  | warning: garbage found: .git/objects/pack/foo.bar | 
|  | warning: no corresponding .idx or .pack: .git/objects/pack/fake2.keep | 
|  | warning: no corresponding .idx: .git/objects/pack/foo.keep | 
|  | warning: no corresponding .idx: .git/objects/pack/foo.pack | 
|  | warning: no corresponding .pack: .git/objects/pack/fake3.idx | 
|  | EOF | 
|  | test_cmp expected actual | 
|  | ' | 
|  |  | 
|  | test_expect_success 'clean pack garbage with gc' ' | 
|  | test_when_finished "rm -f .git/objects/pack/fake*" && | 
|  | test_when_finished "rm -f .git/objects/pack/foo*" && | 
|  | : >.git/objects/pack/foo.keep && | 
|  | : >.git/objects/pack/foo.pack && | 
|  | : >.git/objects/pack/fake.idx && | 
|  | : >.git/objects/pack/fake2.keep && | 
|  | : >.git/objects/pack/fake2.idx && | 
|  | : >.git/objects/pack/fake3.keep && | 
|  | git gc && | 
|  | git count-objects -v 2>stderr && | 
|  | grep "^warning:" stderr | sort >actual && | 
|  | cat >expected <<\EOF && | 
|  | warning: no corresponding .idx or .pack: .git/objects/pack/fake3.keep | 
|  | warning: no corresponding .idx: .git/objects/pack/foo.keep | 
|  | warning: no corresponding .idx: .git/objects/pack/foo.pack | 
|  | EOF | 
|  | test_cmp expected actual | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune .git/shallow' ' | 
|  | oid=$(echo hi|git commit-tree HEAD^{tree}) && | 
|  | echo $oid >.git/shallow && | 
|  | git prune --dry-run >out && | 
|  | grep $oid .git/shallow && | 
|  | grep $oid out && | 
|  | git prune && | 
|  | test_path_is_missing .git/shallow | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune .git/shallow when there are no loose objects' ' | 
|  | oid=$(echo hi|git commit-tree HEAD^{tree}) && | 
|  | echo $oid >.git/shallow && | 
|  | git update-ref refs/heads/shallow-tip $oid && | 
|  | git repack -ad && | 
|  | # verify assumption that all loose objects are gone | 
|  | git count-objects | grep ^0 && | 
|  | git prune && | 
|  | echo $oid >expect && | 
|  | test_cmp expect .git/shallow | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: handle alternate object database' ' | 
|  | test_create_repo A && | 
|  | git -C A commit --allow-empty -m "initial commit" && | 
|  | git clone --shared A B && | 
|  | git -C B commit --allow-empty -m "next commit" && | 
|  | git -C B prune | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: handle index in multiple worktrees' ' | 
|  | git worktree add second-worktree && | 
|  | echo "new blob for second-worktree" >second-worktree/blob && | 
|  | git -C second-worktree add blob && | 
|  | git prune --expire=now && | 
|  | git -C second-worktree show :blob >actual && | 
|  | test_cmp second-worktree/blob actual | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: handle HEAD in multiple worktrees' ' | 
|  | git worktree add --detach third-worktree && | 
|  | echo "new blob for third-worktree" >third-worktree/blob && | 
|  | git -C third-worktree add blob && | 
|  | git -C third-worktree commit -m "third" && | 
|  | rm .git/worktrees/third-worktree/index && | 
|  | test_must_fail git -C third-worktree show :blob && | 
|  | git prune --expire=now && | 
|  | git -C third-worktree show HEAD:blob >actual && | 
|  | test_cmp third-worktree/blob actual | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: handle HEAD reflog in multiple worktrees' ' | 
|  | git config core.logAllRefUpdates true && | 
|  | echo "lost blob for third-worktree" >expected && | 
|  | ( | 
|  | cd third-worktree && | 
|  | cat ../expected >blob && | 
|  | git add blob && | 
|  | git commit -m "second commit in third" && | 
|  | git reset --hard HEAD^ | 
|  | ) && | 
|  | git prune --expire=now && | 
|  | oid=`git hash-object expected` && | 
|  | git -C third-worktree show "$oid" >actual && | 
|  | test_cmp expected actual | 
|  | ' | 
|  |  | 
|  | test_expect_success 'prune: handle expire option correctly' ' | 
|  | test_must_fail git prune --expire 2>error && | 
|  | test_i18ngrep "requires a value" error && | 
|  |  | 
|  | test_must_fail git prune --expire=nyah 2>error && | 
|  | test_i18ngrep "malformed expiration" error && | 
|  |  | 
|  | git prune --no-expire | 
|  | ' | 
|  |  | 
|  | test_expect_success 'trivial prune with bitmaps enabled' ' | 
|  | git repack -adb && | 
|  | blob=$(echo bitmap-unreachable-blob | git hash-object -w --stdin) && | 
|  | git prune --expire=now && | 
|  | git cat-file -e HEAD && | 
|  | test_must_fail git cat-file -e $blob | 
|  | ' | 
|  |  | 
|  | test_done |