Andrew's git - gitweb.git/blob

   1#!/bin/sh
   2
   3test_description='git fsck random collection of tests
   4
   5* (HEAD) B
   6* (master) A
   7'
   8
   9. ./test-lib.sh
  10
  11test_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
  23test_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 >../out 2>&1
  31        ) &&
  32        {
  33                grep -v dangling out >actual ||
  34                :
  35        } &&
  36        test_cmp empty actual
  37'
  38
  39test_expect_success 'HEAD is part of refs, valid objects appear valid' '
  40        git fsck >actual 2>&1 &&
  41        test_cmp empty actual
  42'
  43
  44# Corruption tests follow.  Make sure to remove all traces of the
  45# specific corruption you test afterwards, lest a later test trip over
  46# it.
  47
  48test_expect_success 'setup: helpers for corruption tests' '
  49        sha1_file() {
  50                echo "$*" | sed "s#..#.git/objects/&/#"
  51        } &&
  52
  53        remove_object() {
  54                file=$(sha1_file "$*") &&
  55                test -e "$file" &&
  56                rm -f "$file"
  57        }
  58'
  59
  60test_expect_success 'object with bad sha1' '
  61        sha=$(echo blob | git hash-object -w --stdin) &&
  62        old=$(echo $sha | sed "s+^..+&/+") &&
  63        new=$(dirname $old)/ffffffffffffffffffffffffffffffffffffff &&
  64        sha="$(dirname $new)$(basename $new)" &&
  65        mv .git/objects/$old .git/objects/$new &&
  66        test_when_finished "remove_object $sha" &&
  67        git update-index --add --cacheinfo 100644 $sha foo &&
  68        test_when_finished "git read-tree -u --reset HEAD" &&
  69        tree=$(git write-tree) &&
  70        test_when_finished "remove_object $tree" &&
  71        cmt=$(echo bogus | git commit-tree $tree) &&
  72        test_when_finished "remove_object $cmt" &&
  73        git update-ref refs/heads/bogus $cmt &&
  74        test_when_finished "git update-ref -d refs/heads/bogus" &&
  75
  76        test_might_fail git fsck 2>out &&
  77        cat out &&
  78        grep "$sha.*corrupt" out
  79'
  80
  81test_expect_success 'branch pointing to non-commit' '
  82        git rev-parse HEAD^{tree} >.git/refs/heads/invalid &&
  83        test_when_finished "git update-ref -d refs/heads/invalid" &&
  84        git fsck 2>out &&
  85        cat out &&
  86        grep "not a commit" out
  87'
  88
  89test_expect_success 'email without @ is okay' '
  90        git cat-file commit HEAD >basis &&
  91        sed "s/@/AT/" basis >okay &&
  92        new=$(git hash-object -t commit -w --stdin <okay) &&
  93        test_when_finished "remove_object $new" &&
  94        git update-ref refs/heads/bogus "$new" &&
  95        test_when_finished "git update-ref -d refs/heads/bogus" &&
  96        git fsck 2>out &&
  97        cat out &&
  98        ! grep "commit $new" out
  99'
 100
 101test_expect_success 'email with embedded > is not okay' '
 102        git cat-file commit HEAD >basis &&
 103        sed "s/@[a-z]/&>/" basis >bad-email &&
 104        new=$(git hash-object -t commit -w --stdin <bad-email) &&
 105        test_when_finished "remove_object $new" &&
 106        git update-ref refs/heads/bogus "$new" &&
 107        test_when_finished "git update-ref -d refs/heads/bogus" &&
 108        git fsck 2>out &&
 109        cat out &&
 110        grep "error in commit $new" out
 111'
 112
 113test_expect_success 'missing < email delimiter is reported nicely' '
 114        git cat-file commit HEAD >basis &&
 115        sed "s/<//" basis >bad-email-2 &&
 116        new=$(git hash-object -t commit -w --stdin <bad-email-2) &&
 117        test_when_finished "remove_object $new" &&
 118        git update-ref refs/heads/bogus "$new" &&
 119        test_when_finished "git update-ref -d refs/heads/bogus" &&
 120        git fsck 2>out &&
 121        cat out &&
 122        grep "error in commit $new.* - bad name" out
 123'
 124
 125test_expect_success 'missing email is reported nicely' '
 126        git cat-file commit HEAD >basis &&
 127        sed "s/[a-z]* <[^>]*>//" basis >bad-email-3 &&
 128        new=$(git hash-object -t commit -w --stdin <bad-email-3) &&
 129        test_when_finished "remove_object $new" &&
 130        git update-ref refs/heads/bogus "$new" &&
 131        test_when_finished "git update-ref -d refs/heads/bogus" &&
 132        git fsck 2>out &&
 133        cat out &&
 134        grep "error in commit $new.* - missing email" out
 135'
 136
 137test_expect_success '> in name is reported' '
 138        git cat-file commit HEAD >basis &&
 139        sed "s/ </> </" basis >bad-email-4 &&
 140        new=$(git hash-object -t commit -w --stdin <bad-email-4) &&
 141        test_when_finished "remove_object $new" &&
 142        git update-ref refs/heads/bogus "$new" &&
 143        test_when_finished "git update-ref -d refs/heads/bogus" &&
 144        git fsck 2>out &&
 145        cat out &&
 146        grep "error in commit $new" out
 147'
 148
 149test_expect_success 'tag pointing to nonexistent' '
 150        cat >invalid-tag <<-\EOF &&
 151        object ffffffffffffffffffffffffffffffffffffffff
 152        type commit
 153        tag invalid
 154        tagger T A Gger <tagger@example.com> 1234567890 -0000
 155
 156        This is an invalid tag.
 157        EOF
 158
 159        tag=$(git hash-object -t tag -w --stdin <invalid-tag) &&
 160        test_when_finished "remove_object $tag" &&
 161        echo $tag >.git/refs/tags/invalid &&
 162        test_when_finished "git update-ref -d refs/tags/invalid" &&
 163        test_must_fail git fsck --tags >out &&
 164        cat out &&
 165        grep "broken link" out
 166'
 167
 168test_expect_success 'tag pointing to something else than its type' '
 169        sha=$(echo blob | git hash-object -w --stdin) &&
 170        test_when_finished "remove_object $sha" &&
 171        cat >wrong-tag <<-EOF &&
 172        object $sha
 173        type commit
 174        tag wrong
 175        tagger T A Gger <tagger@example.com> 1234567890 -0000
 176
 177        This is an invalid tag.
 178        EOF
 179
 180        tag=$(git hash-object -t tag -w --stdin <wrong-tag) &&
 181        test_when_finished "remove_object $tag" &&
 182        echo $tag >.git/refs/tags/wrong &&
 183        test_when_finished "git update-ref -d refs/tags/wrong" &&
 184        test_must_fail git fsck --tags 2>out &&
 185        cat out &&
 186        grep "error in tag.*broken links" out
 187'
 188
 189test_expect_success 'cleaned up' '
 190        git fsck >actual 2>&1 &&
 191        test_cmp empty actual
 192'
 193
 194test_expect_success 'rev-list --verify-objects' '
 195        git rev-list --verify-objects --all >/dev/null 2>out &&
 196        test_cmp empty out
 197'
 198
 199test_expect_success 'rev-list --verify-objects with bad sha1' '
 200        sha=$(echo blob | git hash-object -w --stdin) &&
 201        old=$(echo $sha | sed "s+^..+&/+") &&
 202        new=$(dirname $old)/ffffffffffffffffffffffffffffffffffffff &&
 203        sha="$(dirname $new)$(basename $new)" &&
 204        mv .git/objects/$old .git/objects/$new &&
 205        test_when_finished "remove_object $sha" &&
 206        git update-index --add --cacheinfo 100644 $sha foo &&
 207        test_when_finished "git read-tree -u --reset HEAD" &&
 208        tree=$(git write-tree) &&
 209        test_when_finished "remove_object $tree" &&
 210        cmt=$(echo bogus | git commit-tree $tree) &&
 211        test_when_finished "remove_object $cmt" &&
 212        git update-ref refs/heads/bogus $cmt &&
 213        test_when_finished "git update-ref -d refs/heads/bogus" &&
 214
 215        test_might_fail git rev-list --verify-objects refs/heads/bogus >/dev/null 2>out &&
 216        cat out &&
 217        grep -q "error: sha1 mismatch 63ffffffffffffffffffffffffffffffffffffff" out
 218'
 219
 220test_done