git.oblomov.eu Git - git/blob - t/t1450-fsck.sh

   1 #!/bin/sh
   2
   3 test_description='git fsck random collection of tests
   4
   5 * (HEAD) B
   6 * (master) A
   7 '
   8
   9 . ./test-lib.sh
  10
  11 test_expect_success setup '
  12         git config gc.auto 0 &&
  13         git config i18n.commitencoding ISO-8859-1 &&
  14         test_commit A fileA one &&
  15         git config --unset i18n.commitencoding &&
  16         git checkout HEAD^0 &&
  17         test_commit B fileB two &&
  18         git tag -d A B &&
  19         git reflog expire --expire=now --all &&
  20         >empty
  21 '
  22
  23 test_expect_success 'loose objects borrowed from alternate are not missing' '
  24         mkdir another &&
  25         (
  26                 cd another &&
  27                 git init &&
  28                 echo ../../../.git/objects >.git/objects/info/alternates &&
  29                 test_commit C fileC one &&
  30                 git fsck --no-dangling >../actual 2>&1
  31         ) &&
  32         test_cmp empty actual
  33 '
  34
  35 test_expect_success 'HEAD is part of refs, valid objects appear valid' '
  36         git fsck >actual 2>&1 &&
  37         test_cmp empty actual
  38 '
  39
  40 # Corruption tests follow.  Make sure to remove all traces of the
  41 # specific corruption you test afterwards, lest a later test trip over
  42 # it.
  43
  44 test_expect_success 'setup: helpers for corruption tests' '
  45         sha1_file() {
  46                 remainder=${1#??} &&
  47                 firsttwo=${1%$remainder} &&
  48                 echo ".git/objects/$firsttwo/$remainder"
  49         } &&
  50
  51         remove_object() {
  52                 rm "$(sha1_file "$1")"
  53         }
  54 '
  55
  56 test_expect_success 'object with bad sha1' '
  57         sha=$(echo blob | git hash-object -w --stdin) &&
  58         old=$(echo $sha | sed "s+^..+&/+") &&
  59         new=$(dirname $old)/ffffffffffffffffffffffffffffffffffffff &&
  60         sha="$(dirname $new)$(basename $new)" &&
  61         mv .git/objects/$old .git/objects/$new &&
  62         test_when_finished "remove_object $sha" &&
  63         git update-index --add --cacheinfo 100644 $sha foo &&
  64         test_when_finished "git read-tree -u --reset HEAD" &&
  65         tree=$(git write-tree) &&
  66         test_when_finished "remove_object $tree" &&
  67         cmt=$(echo bogus | git commit-tree $tree) &&
  68         test_when_finished "remove_object $cmt" &&
  69         git update-ref refs/heads/bogus $cmt &&
  70         test_when_finished "git update-ref -d refs/heads/bogus" &&
  71
  72         test_must_fail git fsck 2>out &&
  73         cat out &&
  74         grep "$sha.*corrupt" out
  75 '
  76
  77 test_expect_success 'branch pointing to non-commit' '
  78         git rev-parse HEAD^{tree} >.git/refs/heads/invalid &&
  79         test_when_finished "git update-ref -d refs/heads/invalid" &&
  80         test_must_fail git fsck 2>out &&
  81         cat out &&
  82         grep "not a commit" out
  83 '
  84
  85 test_expect_success 'HEAD link pointing at a funny object' '
  86         test_when_finished "mv .git/SAVED_HEAD .git/HEAD" &&
  87         mv .git/HEAD .git/SAVED_HEAD &&
  88         echo 0000000000000000000000000000000000000000 >.git/HEAD &&
  89         # avoid corrupt/broken HEAD from interfering with repo discovery
  90         test_must_fail env GIT_DIR=.git git fsck 2>out &&
  91         cat out &&
  92         grep "detached HEAD points" out
  93 '
  94
  95 test_expect_success 'HEAD link pointing at a funny place' '
  96         test_when_finished "mv .git/SAVED_HEAD .git/HEAD" &&
  97         mv .git/HEAD .git/SAVED_HEAD &&
  98         echo "ref: refs/funny/place" >.git/HEAD &&
  99         # avoid corrupt/broken HEAD from interfering with repo discovery
 100         test_must_fail env GIT_DIR=.git git fsck 2>out &&
 101         cat out &&
 102         grep "HEAD points to something strange" out
 103 '
 104
 105 test_expect_success 'email without @ is okay' '
 106         git cat-file commit HEAD >basis &&
 107         sed "s/@/AT/" basis >okay &&
 108         new=$(git hash-object -t commit -w --stdin <okay) &&
 109         test_when_finished "remove_object $new" &&
 110         git update-ref refs/heads/bogus "$new" &&
 111         test_when_finished "git update-ref -d refs/heads/bogus" &&
 112         git fsck 2>out &&
 113         cat out &&
 114         ! grep "commit $new" out
 115 '
 116
 117 test_expect_success 'email with embedded > is not okay' '
 118         git cat-file commit HEAD >basis &&
 119         sed "s/@[a-z]/&>/" basis >bad-email &&
 120         new=$(git hash-object -t commit -w --stdin <bad-email) &&
 121         test_when_finished "remove_object $new" &&
 122         git update-ref refs/heads/bogus "$new" &&
 123         test_when_finished "git update-ref -d refs/heads/bogus" &&
 124         test_must_fail git fsck 2>out &&
 125         cat out &&
 126         grep "error in commit $new" out
 127 '
 128
 129 test_expect_success 'missing < email delimiter is reported nicely' '
 130         git cat-file commit HEAD >basis &&
 131         sed "s/<//" basis >bad-email-2 &&
 132         new=$(git hash-object -t commit -w --stdin <bad-email-2) &&
 133         test_when_finished "remove_object $new" &&
 134         git update-ref refs/heads/bogus "$new" &&
 135         test_when_finished "git update-ref -d refs/heads/bogus" &&
 136         test_must_fail git fsck 2>out &&
 137         cat out &&
 138         grep "error in commit $new.* - bad name" out
 139 '
 140
 141 test_expect_success 'missing email is reported nicely' '
 142         git cat-file commit HEAD >basis &&
 143         sed "s/[a-z]* <[^>]*>//" basis >bad-email-3 &&
 144         new=$(git hash-object -t commit -w --stdin <bad-email-3) &&
 145         test_when_finished "remove_object $new" &&
 146         git update-ref refs/heads/bogus "$new" &&
 147         test_when_finished "git update-ref -d refs/heads/bogus" &&
 148         test_must_fail git fsck 2>out &&
 149         cat out &&
 150         grep "error in commit $new.* - missing email" out
 151 '
 152
 153 test_expect_success '> in name is reported' '
 154         git cat-file commit HEAD >basis &&
 155         sed "s/ </> </" basis >bad-email-4 &&
 156         new=$(git hash-object -t commit -w --stdin <bad-email-4) &&
 157         test_when_finished "remove_object $new" &&
 158         git update-ref refs/heads/bogus "$new" &&
 159         test_when_finished "git update-ref -d refs/heads/bogus" &&
 160         test_must_fail git fsck 2>out &&
 161         cat out &&
 162         grep "error in commit $new" out
 163 '
 164
 165 # date is 2^64 + 1
 166 test_expect_success 'integer overflow in timestamps is reported' '
 167         git cat-file commit HEAD >basis &&
 168         sed "s/^\\(author .*>\\) [0-9]*/\\1 18446744073709551617/" \
 169                 <basis >bad-timestamp &&
 170         new=$(git hash-object -t commit -w --stdin <bad-timestamp) &&
 171         test_when_finished "remove_object $new" &&
 172         git update-ref refs/heads/bogus "$new" &&
 173         test_when_finished "git update-ref -d refs/heads/bogus" &&
 174         test_must_fail git fsck 2>out &&
 175         cat out &&
 176         grep "error in commit $new.*integer overflow" out
 177 '
 178
 179 test_expect_success 'commit with NUL in header' '
 180         git cat-file commit HEAD >basis &&
 181         sed "s/author ./author Q/" <basis | q_to_nul >commit-NUL-header &&
 182         new=$(git hash-object -t commit -w --stdin <commit-NUL-header) &&
 183         test_when_finished "remove_object $new" &&
 184         git update-ref refs/heads/bogus "$new" &&
 185         test_when_finished "git update-ref -d refs/heads/bogus" &&
 186         test_must_fail git fsck 2>out &&
 187         cat out &&
 188         grep "error in commit $new.*unterminated header: NUL at offset" out
 189 '
 190
 191 test_expect_success 'tree object with duplicate entries' '
 192         test_when_finished "for i in \$T; do remove_object \$i; done" &&
 193         T=$(
 194                 GIT_INDEX_FILE=test-index &&
 195                 export GIT_INDEX_FILE &&
 196                 rm -f test-index &&
 197                 >x &&
 198                 git add x &&
 199                 git rev-parse :x &&
 200                 T=$(git write-tree) &&
 201                 echo $T &&
 202                 (
 203                         git cat-file tree $T &&
 204                         git cat-file tree $T
 205                 ) |
 206                 git hash-object -w -t tree --stdin
 207         ) &&
 208         test_must_fail git fsck 2>out &&
 209         grep "error in tree .*contains duplicate file entries" out
 210 '
 211
 212 test_expect_success 'unparseable tree object' '
 213         test_when_finished "git update-ref -d refs/heads/wrong" &&
 214         test_when_finished "remove_object \$tree_sha1" &&
 215         test_when_finished "remove_object \$commit_sha1" &&
 216         tree_sha1=$(printf "100644 \0twenty-bytes-of-junk" | git hash-object -t tree --stdin -w --literally) &&
 217         commit_sha1=$(git commit-tree $tree_sha1) &&
 218         git update-ref refs/heads/wrong $commit_sha1 &&
 219         test_must_fail git fsck 2>out &&
 220         test_i18ngrep "error: empty filename in tree entry" out &&
 221         test_i18ngrep "$tree_sha1" out &&
 222         test_i18ngrep ! "fatal: empty filename in tree entry" out
 223 '
 224
 225 test_expect_success 'tag pointing to nonexistent' '
 226         cat >invalid-tag <<-\EOF &&
 227         object ffffffffffffffffffffffffffffffffffffffff
 228         type commit
 229         tag invalid
 230         tagger T A Gger <tagger@example.com> 1234567890 -0000
 231
 232         This is an invalid tag.
 233         EOF
 234
 235         tag=$(git hash-object -t tag -w --stdin <invalid-tag) &&
 236         test_when_finished "remove_object $tag" &&
 237         echo $tag >.git/refs/tags/invalid &&
 238         test_when_finished "git update-ref -d refs/tags/invalid" &&
 239         test_must_fail git fsck --tags >out &&
 240         cat out &&
 241         grep "broken link" out
 242 '
 243
 244 test_expect_success 'tag pointing to something else than its type' '
 245         sha=$(echo blob | git hash-object -w --stdin) &&
 246         test_when_finished "remove_object $sha" &&
 247         cat >wrong-tag <<-EOF &&
 248         object $sha
 249         type commit
 250         tag wrong
 251         tagger T A Gger <tagger@example.com> 1234567890 -0000
 252
 253         This is an invalid tag.
 254         EOF
 255
 256         tag=$(git hash-object -t tag -w --stdin <wrong-tag) &&
 257         test_when_finished "remove_object $tag" &&
 258         echo $tag >.git/refs/tags/wrong &&
 259         test_when_finished "git update-ref -d refs/tags/wrong" &&
 260         test_must_fail git fsck --tags
 261 '
 262
 263 test_expect_success 'tag with incorrect tag name & missing tagger' '
 264         sha=$(git rev-parse HEAD) &&
 265         cat >wrong-tag <<-EOF &&
 266         object $sha
 267         type commit
 268         tag wrong name format
 269
 270         This is an invalid tag.
 271         EOF
 272
 273         tag=$(git hash-object -t tag -w --stdin <wrong-tag) &&
 274         test_when_finished "remove_object $tag" &&
 275         echo $tag >.git/refs/tags/wrong &&
 276         test_when_finished "git update-ref -d refs/tags/wrong" &&
 277         git fsck --tags 2>out &&
 278
 279         cat >expect <<-EOF &&
 280         warning in tag $tag: badTagName: invalid '\''tag'\'' name: wrong name format
 281         warning in tag $tag: missingTaggerEntry: invalid format - expected '\''tagger'\'' line
 282         EOF
 283         test_cmp expect out
 284 '
 285
 286 test_expect_success 'tag with bad tagger' '
 287         sha=$(git rev-parse HEAD) &&
 288         cat >wrong-tag <<-EOF &&
 289         object $sha
 290         type commit
 291         tag not-quite-wrong
 292         tagger Bad Tagger Name
 293
 294         This is an invalid tag.
 295         EOF
 296
 297         tag=$(git hash-object --literally -t tag -w --stdin <wrong-tag) &&
 298         test_when_finished "remove_object $tag" &&
 299         echo $tag >.git/refs/tags/wrong &&
 300         test_when_finished "git update-ref -d refs/tags/wrong" &&
 301         test_must_fail git fsck --tags 2>out &&
 302         grep "error in tag .*: invalid author/committer" out
 303 '
 304
 305 test_expect_success 'tag with NUL in header' '
 306         sha=$(git rev-parse HEAD) &&
 307         q_to_nul >tag-NUL-header <<-EOF &&
 308         object $sha
 309         type commit
 310         tag contains-Q-in-header
 311         tagger T A Gger <tagger@example.com> 1234567890 -0000
 312
 313         This is an invalid tag.
 314         EOF
 315
 316         tag=$(git hash-object --literally -t tag -w --stdin <tag-NUL-header) &&
 317         test_when_finished "remove_object $tag" &&
 318         echo $tag >.git/refs/tags/wrong &&
 319         test_when_finished "git update-ref -d refs/tags/wrong" &&
 320         test_must_fail git fsck --tags 2>out &&
 321         cat out &&
 322         grep "error in tag $tag.*unterminated header: NUL at offset" out
 323 '
 324
 325 test_expect_success 'cleaned up' '
 326         git fsck >actual 2>&1 &&
 327         test_cmp empty actual
 328 '
 329
 330 test_expect_success 'rev-list --verify-objects' '
 331         git rev-list --verify-objects --all >/dev/null 2>out &&
 332         test_cmp empty out
 333 '
 334
 335 test_expect_success 'rev-list --verify-objects with bad sha1' '
 336         sha=$(echo blob | git hash-object -w --stdin) &&
 337         old=$(echo $sha | sed "s+^..+&/+") &&
 338         new=$(dirname $old)/ffffffffffffffffffffffffffffffffffffff &&
 339         sha="$(dirname $new)$(basename $new)" &&
 340         mv .git/objects/$old .git/objects/$new &&
 341         test_when_finished "remove_object $sha" &&
 342         git update-index --add --cacheinfo 100644 $sha foo &&
 343         test_when_finished "git read-tree -u --reset HEAD" &&
 344         tree=$(git write-tree) &&
 345         test_when_finished "remove_object $tree" &&
 346         cmt=$(echo bogus | git commit-tree $tree) &&
 347         test_when_finished "remove_object $cmt" &&
 348         git update-ref refs/heads/bogus $cmt &&
 349         test_when_finished "git update-ref -d refs/heads/bogus" &&
 350
 351         test_might_fail git rev-list --verify-objects refs/heads/bogus >/dev/null 2>out &&
 352         cat out &&
 353         grep -q "error: sha1 mismatch 63ffffffffffffffffffffffffffffffffffffff" out
 354 '
 355
 356 test_expect_success 'force fsck to ignore double author' '
 357         git cat-file commit HEAD >basis &&
 358         sed "s/^author .*/&,&/" <basis | tr , \\n >multiple-authors &&
 359         new=$(git hash-object -t commit -w --stdin <multiple-authors) &&
 360         test_when_finished "remove_object $new" &&
 361         git update-ref refs/heads/bogus "$new" &&
 362         test_when_finished "git update-ref -d refs/heads/bogus" &&
 363         test_must_fail git fsck &&
 364         git -c fsck.multipleAuthors=ignore fsck
 365 '
 366
 367 _bz='\0'
 368 _bz5="$_bz$_bz$_bz$_bz$_bz"
 369 _bz20="$_bz5$_bz5$_bz5$_bz5"
 370
 371 test_expect_success 'fsck notices blob entry pointing to null sha1' '
 372         (git init null-blob &&
 373          cd null-blob &&
 374          sha=$(printf "100644 file$_bz$_bz20" |
 375                git hash-object -w --stdin -t tree) &&
 376           git fsck 2>out &&
 377           cat out &&
 378           grep "warning.*null sha1" out
 379         )
 380 '
 381
 382 test_expect_success 'fsck notices submodule entry pointing to null sha1' '
 383         (git init null-commit &&
 384          cd null-commit &&
 385          sha=$(printf "160000 submodule$_bz$_bz20" |
 386                git hash-object -w --stdin -t tree) &&
 387           git fsck 2>out &&
 388           cat out &&
 389           grep "warning.*null sha1" out
 390         )
 391 '
 392
 393 while read name path pretty; do
 394         while read mode type; do
 395                 : ${pretty:=$path}
 396                 test_expect_success "fsck notices $pretty as $type" '
 397                 (
 398                         git init $name-$type &&
 399                         cd $name-$type &&
 400                         echo content >file &&
 401                         git add file &&
 402                         git commit -m base &&
 403                         blob=$(git rev-parse :file) &&
 404                         tree=$(git rev-parse HEAD^{tree}) &&
 405                         value=$(eval "echo \$$type") &&
 406                         printf "$mode $type %s\t%s" "$value" "$path" >bad &&
 407                         bad_tree=$(git mktree <bad) &&
 408                         git fsck 2>out &&
 409                         cat out &&
 410                         grep "warning.*tree $bad_tree" out
 411                 )'
 412         done <<-\EOF
 413         100644 blob
 414         040000 tree
 415         EOF
 416 done <<-EOF
 417 dot .
 418 dotdot ..
 419 dotgit .git
 420 dotgit-case .GIT
 421 dotgit-unicode .gI${u200c}T .gI{u200c}T
 422 dotgit-case2 .Git
 423 git-tilde1 git~1
 424 dotgitdot .git.
 425 dot-backslash-case .\\\\.GIT\\\\foobar
 426 dotgit-case-backslash .git\\\\foobar
 427 EOF
 428
 429 test_expect_success 'fsck allows .Ňit' '
 430         (
 431                 git init not-dotgit &&
 432                 cd not-dotgit &&
 433                 echo content >file &&
 434                 git add file &&
 435                 git commit -m base &&
 436                 blob=$(git rev-parse :file) &&
 437                 printf "100644 blob $blob\t.\\305\\207it" >tree &&
 438                 tree=$(git mktree <tree) &&
 439                 git fsck 2>err &&
 440                 test_line_count = 0 err
 441         )
 442 '
 443
 444 test_expect_success 'NUL in commit' '
 445         rm -fr nul-in-commit &&
 446         git init nul-in-commit &&
 447         (
 448                 cd nul-in-commit &&
 449                 git commit --allow-empty -m "initial commitQNUL after message" &&
 450                 git cat-file commit HEAD >original &&
 451                 q_to_nul <original >munged &&
 452                 git hash-object -w -t commit --stdin <munged >name &&
 453                 git branch bad $(cat name) &&
 454
 455                 test_must_fail git -c fsck.nulInCommit=error fsck 2>warn.1 &&
 456                 grep nulInCommit warn.1 &&
 457                 git fsck 2>warn.2 &&
 458                 grep nulInCommit warn.2
 459         )
 460 '
 461
 462 # create a static test repo which is broken by omitting
 463 # one particular object ($1, which is looked up via rev-parse
 464 # in the new repository).
 465 create_repo_missing () {
 466         rm -rf missing &&
 467         git init missing &&
 468         (
 469                 cd missing &&
 470                 git commit -m one --allow-empty &&
 471                 mkdir subdir &&
 472                 echo content >subdir/file &&
 473                 git add subdir/file &&
 474                 git commit -m two &&
 475                 unrelated=$(echo unrelated | git hash-object --stdin -w) &&
 476                 git tag -m foo tag $unrelated &&
 477                 sha1=$(git rev-parse --verify "$1") &&
 478                 path=$(echo $sha1 | sed 's|..|&/|') &&
 479                 rm .git/objects/$path
 480         )
 481 }
 482
 483 test_expect_success 'fsck notices missing blob' '
 484         create_repo_missing HEAD:subdir/file &&
 485         test_must_fail git -C missing fsck
 486 '
 487
 488 test_expect_success 'fsck notices missing subtree' '
 489         create_repo_missing HEAD:subdir &&
 490         test_must_fail git -C missing fsck
 491 '
 492
 493 test_expect_success 'fsck notices missing root tree' '
 494         create_repo_missing HEAD^{tree} &&
 495         test_must_fail git -C missing fsck
 496 '
 497
 498 test_expect_success 'fsck notices missing parent' '
 499         create_repo_missing HEAD^ &&
 500         test_must_fail git -C missing fsck
 501 '
 502
 503 test_expect_success 'fsck notices missing tagged object' '
 504         create_repo_missing tag^{blob} &&
 505         test_must_fail git -C missing fsck
 506 '
 507
 508 test_expect_success 'fsck notices ref pointing to missing commit' '
 509         create_repo_missing HEAD &&
 510         test_must_fail git -C missing fsck
 511 '
 512
 513 test_expect_success 'fsck notices ref pointing to missing tag' '
 514         create_repo_missing tag &&
 515         test_must_fail git -C missing fsck
 516 '
 517
 518 test_expect_success 'fsck --connectivity-only' '
 519         rm -rf connectivity-only &&
 520         git init connectivity-only &&
 521         (
 522                 cd connectivity-only &&
 523                 touch empty &&
 524                 git add empty &&
 525                 test_commit empty &&
 526
 527                 # Drop the index now; we want to be sure that we
 528                 # recursively notice the broken objects
 529                 # because they are reachable from refs, not because
 530                 # they are in the index.
 531                 rm -f .git/index &&
 532
 533                 # corrupt the blob, but in a way that we can still identify
 534                 # its type. That lets us see that --connectivity-only is
 535                 # not actually looking at the contents, but leaves it
 536                 # free to examine the type if it chooses.
 537                 empty=.git/objects/e6/9de29bb2d1d6434b8b29ae775ad8c2e48c5391 &&
 538                 blob=$(echo unrelated | git hash-object -w --stdin) &&
 539                 mv -f $(sha1_file $blob) $empty &&
 540
 541                 test_must_fail git fsck --strict &&
 542                 git fsck --strict --connectivity-only &&
 543                 tree=$(git rev-parse HEAD:) &&
 544                 suffix=${tree#??} &&
 545                 tree=.git/objects/${tree%$suffix}/$suffix &&
 546                 rm -f $tree &&
 547                 echo invalid >$tree &&
 548                 test_must_fail git fsck --strict --connectivity-only
 549         )
 550 '
 551
 552 test_expect_success 'fsck --connectivity-only with explicit head' '
 553         rm -rf connectivity-only &&
 554         git init connectivity-only &&
 555         (
 556                 cd connectivity-only &&
 557                 test_commit foo &&
 558                 rm -f .git/index &&
 559                 tree=$(git rev-parse HEAD^{tree}) &&
 560                 remove_object $(git rev-parse HEAD:foo.t) &&
 561                 test_must_fail git fsck --connectivity-only $tree
 562         )
 563 '
 564
 565 test_expect_success 'fsck --name-objects' '
 566         rm -rf name-objects &&
 567         git init name-objects &&
 568         (
 569                 cd name-objects &&
 570                 test_commit julius caesar.t &&
 571                 test_commit augustus &&
 572                 test_commit caesar &&
 573                 remove_object $(git rev-parse julius:caesar.t) &&
 574                 test_must_fail git fsck --name-objects >out &&
 575                 tree=$(git rev-parse --verify julius:) &&
 576                 grep "$tree (\(refs/heads/master\|HEAD\)@{[0-9]*}:" out
 577         )
 578 '
 579
 580 test_expect_success 'alternate objects are correctly blamed' '
 581         test_when_finished "rm -rf alt.git .git/objects/info/alternates" &&
 582         git init --bare alt.git &&
 583         echo "../../alt.git/objects" >.git/objects/info/alternates &&
 584         mkdir alt.git/objects/12 &&
 585         >alt.git/objects/12/34567890123456789012345678901234567890 &&
 586         test_must_fail git fsck >out 2>&1 &&
 587         grep alt.git out
 588 '
 589
 590 test_expect_success 'fsck errors in packed objects' '
 591         git cat-file commit HEAD >basis &&
 592         sed "s/</one/" basis >one &&
 593         sed "s/</foo/" basis >two &&
 594         one=$(git hash-object -t commit -w one) &&
 595         two=$(git hash-object -t commit -w two) &&
 596         pack=$(
 597                 {
 598                         echo $one &&
 599                         echo $two
 600                 } | git pack-objects .git/objects/pack/pack
 601         ) &&
 602         test_when_finished "rm -f .git/objects/pack/pack-$pack.*" &&
 603         remove_object $one &&
 604         remove_object $two &&
 605         test_must_fail git fsck 2>out &&
 606         grep "error in commit $one.* - bad name" out &&
 607         grep "error in commit $two.* - bad name" out &&
 608         ! grep corrupt out
 609 '
 610
 611 test_expect_success 'fsck finds problems in duplicate loose objects' '
 612         rm -rf broken-duplicate &&
 613         git init broken-duplicate &&
 614         (
 615                 cd broken-duplicate &&
 616                 test_commit duplicate &&
 617                 # no "-d" here, so we end up with duplicates
 618                 git repack &&
 619                 # now corrupt the loose copy
 620                 file=$(sha1_file "$(git rev-parse HEAD)") &&
 621                 rm "$file" &&
 622                 echo broken >"$file" &&
 623                 test_must_fail git fsck
 624         )
 625 '
 626
 627 test_expect_success 'fsck detects trailing loose garbage (commit)' '
 628         git cat-file commit HEAD >basis &&
 629         echo bump-commit-sha1 >>basis &&
 630         commit=$(git hash-object -w -t commit basis) &&
 631         file=$(sha1_file $commit) &&
 632         test_when_finished "remove_object $commit" &&
 633         chmod +w "$file" &&
 634         echo garbage >>"$file" &&
 635         test_must_fail git fsck 2>out &&
 636         test_i18ngrep "garbage.*$commit" out
 637 '
 638
 639 test_expect_success 'fsck detects trailing loose garbage (blob)' '
 640         blob=$(echo trailing | git hash-object -w --stdin) &&
 641         file=$(sha1_file $blob) &&
 642         test_when_finished "remove_object $blob" &&
 643         chmod +w "$file" &&
 644         echo garbage >>"$file" &&
 645         test_must_fail git fsck 2>out &&
 646         test_i18ngrep "garbage.*$blob" out
 647 '
 648
 649 # for each of type, we have one version which is referenced by another object
 650 # (and so while unreachable, not dangling), and another variant which really is
 651 # dangling.
 652 test_expect_success 'fsck notices dangling objects' '
 653         git init dangling &&
 654         (
 655                 cd dangling &&
 656                 blob=$(echo not-dangling | git hash-object -w --stdin) &&
 657                 dblob=$(echo dangling | git hash-object -w --stdin) &&
 658                 tree=$(printf "100644 blob %s\t%s\n" $blob one | git mktree) &&
 659                 dtree=$(printf "100644 blob %s\t%s\n" $blob two | git mktree) &&
 660                 commit=$(git commit-tree $tree) &&
 661                 dcommit=$(git commit-tree -p $commit $tree) &&
 662
 663                 cat >expect <<-EOF &&
 664                 dangling blob $dblob
 665                 dangling commit $dcommit
 666                 dangling tree $dtree
 667                 EOF
 668
 669                 git fsck >actual &&
 670                 # the output order is non-deterministic, as it comes from a hash
 671                 sort <actual >actual.sorted &&
 672                 test_cmp expect actual.sorted
 673         )
 674 '
 675
 676 test_expect_success 'fsck $name notices bogus $name' '
 677         test_must_fail git fsck bogus &&
 678         test_must_fail git fsck $_z40
 679 '
 680
 681 test_expect_success 'bogus head does not fallback to all heads' '
 682         # set up a case that will cause a reachability complaint
 683         echo to-be-deleted >foo &&
 684         git add foo &&
 685         blob=$(git rev-parse :foo) &&
 686         test_when_finished "git rm --cached foo" &&
 687         remove_object $blob &&
 688         test_must_fail git fsck $_z40 >out 2>&1 &&
 689         ! grep $blob out
 690 '
 691
 692 # Corrupt the checksum on the index.
 693 # Add 1 to the last byte in the SHA.
 694 corrupt_index_checksum () {
 695     perl -w -e '
 696         use Fcntl ":seek";
 697         open my $fh, "+<", ".git/index" or die "open: $!";
 698         binmode $fh;
 699         seek $fh, -1, SEEK_END or die "seek: $!";
 700         read $fh, my $in_byte, 1 or die "read: $!";
 701
 702         $in_value = unpack("C", $in_byte);
 703         $out_value = ($in_value + 1) & 255;
 704
 705         $out_byte = pack("C", $out_value);
 706
 707         seek $fh, -1, SEEK_END or die "seek: $!";
 708         print $fh $out_byte;
 709         close $fh or die "close: $!";
 710     '
 711 }
 712
 713 # Corrupt the checksum on the index and then
 714 # verify that only fsck notices.
 715 test_expect_success 'detect corrupt index file in fsck' '
 716         cp .git/index .git/index.backup &&
 717         test_when_finished "mv .git/index.backup .git/index" &&
 718         corrupt_index_checksum &&
 719         test_must_fail git fsck --cache 2>errors &&
 720         grep "bad index file" errors
 721 '
 722
 723 test_done