(command.CommandList
  children: [
    (command.ShAssignment
      pairs: [
        (assign_pair
          lhs: (sh_lhs_expr.Name name:test_description)
          op: assign_op.Equal
          rhs: 
            {
              (SQ 
                (Token
                  id: Id.Lit_Chars
                  val: 'resilience to pack corruptions with redundant objects'
                  span_id: 15
                )
              )
            }
          spids: [13]
        )
      ]
    )
    (C {(.)} {(./test-lib.sh)})
    (command.ShFunction
      name: create_test_files
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp]
              children: [
                (command.Simple
                  words: [{(test-genrandom)} {(DQ (foo))} {(2000)}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_Great val:'>' span_id:72)
                      fd: -1
                      arg_word: {(file_1)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(test-genrandom)} {(DQ (foo))} {(1800)}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_Great val:'>' span_id:87)
                      fd: -1
                      arg_word: {(file_2)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(test-genrandom)} {(DQ (foo))} {(1800)}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_Great val:'>' span_id:102)
                      fd: -1
                      arg_word: {(file_3)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(echo)} {(DQ (' base '))}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_DGreat val:'>>' span_id:115)
                      fd: -1
                      arg_word: {(file_1)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(echo)} {(DQ (' delta1 '))}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_DGreat val:'>>' span_id:128)
                      fd: -1
                      arg_word: {(file_2)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(echo)} {(DQ (' delta delta2 '))}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_DGreat val:'>>' span_id:141)
                      fd: -1
                      arg_word: {(file_3)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(test-genrandom)} {(DQ (bar))} {(150)}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_DGreat val:'>>' span_id:156)
                      fd: -1
                      arg_word: {(file_2)}
                    )
                  ]
                )
                (command.Simple
                  words: [{(test-genrandom)} {(DQ (baz))} {(100)}]
                  redirects: [
                    (redir.Redir
                      op: (Token id:Id.Redir_DGreat val:'>>' span_id:171)
                      fd: -1
                      arg_word: {(file_3)}
                    )
                  ]
                )
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: create_new_pack
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp]
              children: [
                (C {(rm)} {(-rf)} {(.git)})
                (C {(git)} {(init)})
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:blob_1)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:202)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (C {(git)} {(hash-object)} {(-t)} {(blob)} {(-w)} {(file_1)})
                                ]
                              )
                          )
                        }
                      spids: [201]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:blob_2)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:220)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (C {(git)} {(hash-object)} {(-t)} {(blob)} {(-w)} {(file_2)})
                                ]
                              )
                          )
                        }
                      spids: [219]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:blob_3)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:238)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (C {(git)} {(hash-object)} {(-t)} {(blob)} {(-w)} {(file_3)})
                                ]
                              )
                          )
                        }
                      spids: [237]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:pack)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:256)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (command.Pipeline
                                    children: [
                                      (C {(printf)} 
                                        {
                                          (DQ ($ Id.VSub_DollarName '$blob_1') (Id.Lit_Other '\\') (n) 
                                            ($ Id.VSub_DollarName '$blob_2') (Id.Lit_Other '\\') (n) ($ Id.VSub_DollarName '$blob_3') (Id.Lit_Other '\\') (n)
                                          )
                                        }
                                      )
                                      (C {(git)} {(pack-objects)} {($ Id.VSub_At '$@')} 
                                        {(.git/objects/pack/pack)}
                                      )
                                    ]
                                    negated: F
                                  )
                                ]
                              )
                          )
                        }
                      spids: [255]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:pack)
                      op: assign_op.Equal
                      rhs: {(DQ (.git/objects/pack/pack-) (${ Id.VSub_Name pack))}
                      spids: [286]
                    )
                  ]
                )
                (C {(git)} {(verify-pack)} {(-v)} {(${ Id.VSub_Name pack) (.pack)})
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: do_repack
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp]
              children: [
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:pack)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:319)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (command.Pipeline
                                    children: [
                                      (C {(printf)} 
                                        {
                                          (DQ ($ Id.VSub_DollarName '$blob_1') (Id.Lit_Other '\\') (n) 
                                            ($ Id.VSub_DollarName '$blob_2') (Id.Lit_Other '\\') (n) ($ Id.VSub_DollarName '$blob_3') (Id.Lit_Other '\\') (n)
                                          )
                                        }
                                      )
                                      (C {(git)} {(pack-objects)} {($ Id.VSub_At '$@')} 
                                        {(.git/objects/pack/pack)}
                                      )
                                    ]
                                    negated: F
                                  )
                                ]
                              )
                          )
                        }
                      spids: [318]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:pack)
                      op: assign_op.Equal
                      rhs: {(DQ (.git/objects/pack/pack-) (${ Id.VSub_Name pack))}
                      spids: [349]
                    )
                  ]
                )
              ]
            )
          ]
        )
    )
    (command.ShFunction
      name: do_corrupt_object
      body: 
        (command.BraceGroup
          children: [
            (command.AndOr
              ops: [Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp Id.Op_DAmp]
              children: [
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:ofs)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (command_sub
                            left_token: (Token id:Id.Left_DollarParen val:'$(' span_id:368)
                            command_list: 
                              (command.CommandList
                                children: [
                                  (command.Pipeline
                                    children: [
                                      (command.Simple
                                        words: [{(git)} {(show-index)}]
                                        redirects: [
                                          (redir.Redir
                                            op: (Token id:Id.Redir_Less val:'<' span_id:373)
                                            fd: -1
                                            arg_word: {(${ Id.VSub_Name pack) (.idx)}
                                          )
                                        ]
                                      )
                                      (C {(grep)} {($ Id.VSub_Number '$1')})
                                      (C {(cut)} {(-f1)} {(-d) (DQ (' '))})
                                    ]
                                    negated: F
                                  )
                                ]
                              )
                          )
                        }
                      spids: [367]
                    )
                  ]
                )
                (command.ShAssignment
                  pairs: [
                    (assign_pair
                      lhs: (sh_lhs_expr.Name name:ofs)
                      op: assign_op.Equal
                      rhs: 
                        {
                          (word_part.ArithSub
                            anode: 
                              (arith_expr.Binary
                                op_id: Id.Arith_Plus
                                left: (arith_expr.ArithWord w:{($ Id.VSub_DollarName '$ofs')})
                                right: (arith_expr.ArithWord w:{($ Id.VSub_Number '$2')})
                              )
                          )
                        }
                      spids: [401]
                    )
                  ]
                )
                (C {(chmod)} {(Id.Lit_Other '+') (w)} {(${ Id.VSub_Name pack) (.pack)})
                (C {(dd)} {(Id.Lit_VarLike 'of=') (${ Id.VSub_Name pack) (.pack)} 
                  {(Id.Lit_VarLike 'bs=') (1)} {(Id.Lit_VarLike 'conv=') (notrunc)} {(Id.Lit_VarLike 'seek=') ($ Id.VSub_DollarName '$ofs')}
                )
                (C {(test_must_fail)} {(git)} {(verify-pack)} {(${ Id.VSub_Name pack) (.pack)})
              ]
            )
          ]
        )
    )
    (command.Simple
      words: [{(printf)} {(SQ (Token id:Id.Lit_Chars val:'\\0' span_id:464))}]
      redirects: [
        (redir.Redir op:(Token id:Id.Redir_Great val:'>' span_id:467) fd:-1 arg_word:{(zero)})
      ]
    )
    (C {(test_expect_success)} {(SQ (Token id:Id.Lit_Chars val:'initial setup validation' span_id:477))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_test_files &&\n' span_id:483) 
          (Token id:Id.Lit_Chars val:'     create_new_pack &&\n' span_id:484) (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:485) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 486
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:487) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 488
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'create corruption in header of first object' span_id:497))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_corrupt_object $blob_1 0 < zero &&\n' span_id:503) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 504
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 505
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:506)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 515
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:521) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_1 &&\n'
            span_id: 522
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:523) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 524
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:525) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 526
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... and loose copy of first delta allows for partial recovery'
            span_id: 535
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'git prune-packed &&\n' span_id:541) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 542
          ) (Token id:Id.Lit_Chars val:'     mv ${pack}.idx tmp &&\n' span_id:543) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 544
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:545) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 546
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:547) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 548
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'create corruption in data of first object' span_id:557))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack &&\n' span_id:563) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:564) (Token id:Id.Lit_Chars val:'     chmod +w ${pack}.pack &&\n' span_id:565) 
          (Token
            id: Id.Lit_Chars
            val: '     perl -i.bak -pe "s/ base /abcdef/" ${pack}.pack &&\n'
            span_id: 566
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 567
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 568
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:569)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 578
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:584) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_1 &&\n'
            span_id: 585
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:586) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 587
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:588) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 589
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... and loose copy of second object allows for partial recovery'
            span_id: 598
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'git prune-packed &&\n' span_id:604) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 605
          ) (Token id:Id.Lit_Chars val:'     mv ${pack}.idx tmp &&\n' span_id:606) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 607
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:608) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 609
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:610) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 611
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'create corruption in header of first delta' span_id:620))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack &&\n' span_id:626) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:627) (Token id:Id.Lit_Chars val:'     do_corrupt_object $blob_2 0 < zero &&\n' span_id:628) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 629
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 630
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:631)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 640
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:646) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 647
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:648) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 649
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:650) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 651
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:660))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_repack &&\n' span_id:666) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:667) (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:668) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 669
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:670) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 671
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'create corruption in data of first delta' span_id:680))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack &&\n' span_id:686) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:687) (Token id:Id.Lit_Chars val:'     chmod +w ${pack}.pack &&\n' span_id:688) 
          (Token
            id: Id.Lit_Chars
            val: '     perl -i.bak -pe "s/ delta1 /abcdefgh/" ${pack}.pack &&\n'
            span_id: 689
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_1 > /dev/null &&\n' span_id:690) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 691
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:692)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 701
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:707) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 708
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:709) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 710
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:711) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 712
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:721))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_repack &&\n' span_id:727) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:728) (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:729) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 730
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:731) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 732
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'corruption in delta base reference of first delta (OBJ_REF_DELTA)'
            span_id: 741
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack &&\n' span_id:747) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:748) (Token id:Id.Lit_Chars val:'     do_corrupt_object $blob_2 2 < zero &&\n' span_id:749) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 750
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 751
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:752)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 761
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:767) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 768
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:769) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 770
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:771) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 772
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:781))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_repack &&\n' span_id:787) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:788) (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:789) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 790
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:791) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 792
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'corruption #0 in delta base reference of first delta (OBJ_OFS_DELTA)'
            span_id: 801
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack --delta-base-offset &&\n' span_id:807) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:808) (Token id:Id.Lit_Chars val:'     do_corrupt_object $blob_2 2 < zero &&\n' span_id:809) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 810
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 811
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:812)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 821
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:827) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 828
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:829) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 830
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:831) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 832
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:841))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_repack --delta-base-offset &&\n' span_id:847) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:848) (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:849) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 850
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:851) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 852
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'corruption #1 in delta base reference of first delta (OBJ_OFS_DELTA)'
            span_id: 861
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack --delta-base-offset &&\n' span_id:867) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:868) (Token id:Id.Lit_Chars val:'     printf "\\001" | do_corrupt_object $blob_2 2 &&\n' span_id:869) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 870
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 871
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:872)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 881
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:887) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_2 &&\n'
            span_id: 888
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:889) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 890
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:891) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 892
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:901))} 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_repack --delta-base-offset &&\n' span_id:907) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:908) (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:909) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 910
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:911) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 912
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... and a redundant pack allows for full recovery too'
            span_id: 921
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'do_corrupt_object $blob_2 2 < zero &&\n' span_id:927) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 928
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 929
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_3 > /dev/null &&\n'
            span_id: 930
          ) (Token id:Id.Lit_Chars val:'     mv ${pack}.idx tmp &&\n' span_id:931) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_1 &&\n'
            span_id: 932
          ) (Token id:Id.Lit_Chars val:'     git hash-object -t blob -w file_2 &&\n' span_id:933) 
          (Token
            id: Id.Lit_Chars
            val: '     printf "$blob_1\\n$blob_2\\n" | git pack-objects .git/objects/pack/pack &&\n'
            span_id: 934
          ) (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:935) 
          (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:936) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_1 > /dev/null &&\n' span_id:937) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 938
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_3 > /dev/null' span_id:939)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'corruption of delta base reference pointing to wrong object'
            span_id: 948
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack --delta-base-offset &&\n' span_id:954) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:955) (Token id:Id.Lit_Chars val:'     printf "\\220\\033" | do_corrupt_object $blob_3 2 &&\n' span_id:956) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 >/dev/null &&\n'
            span_id: 957
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 >/dev/null &&\n' span_id:958) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_3 >/dev/null'
            span_id: 959
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: '... but having a loose copy allows for full recovery'
            span_id: 968
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'mv ${pack}.idx tmp &&\n' span_id:974) 
          (Token
            id: Id.Lit_Chars
            val: '     git hash-object -t blob -w file_3 &&\n'
            span_id: 975
          ) (Token id:Id.Lit_Chars val:'     mv tmp ${pack}.idx &&\n' span_id:976) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 977
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_2 > /dev/null &&\n' span_id:978) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_3 > /dev/null'
            span_id: 979
          )
        )
      }
    )
    (C {(test_expect_success)} 
      {(SQ (Token id:Id.Lit_Chars val:'... and then a repack "clears" the corruption' span_id:988))} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'do_repack --delta-base-offset --no-reuse-delta &&\n'
            span_id: 994
          ) (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:995) 
          (Token id:Id.Lit_Chars val:'     git verify-pack ${pack}.pack &&\n' span_id:996) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_1 > /dev/null &&\n' span_id:997) 
          (Token
            id: Id.Lit_Chars
            val: '     git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 998
          ) (Token id:Id.Lit_Chars val:'     git cat-file blob $blob_3 > /dev/null' span_id:999)
        )
      }
    )
    (C {(test_expect_success)} 
      {
        (SQ 
          (Token
            id: Id.Lit_Chars
            val: 'corrupting header to have too small output buffer fails unpack'
            span_id: 1008
          )
        )
      } 
      {
        (SQ (Token id:Id.Lit_Chars val:'create_new_pack &&\n' span_id:1014) 
          (Token id:Id.Lit_Chars val:'     git prune-packed &&\n' span_id:1015) 
          (Token
            id: Id.Lit_Chars
            val: '     printf "\\262\\001" | do_corrupt_object $blob_1 0 &&\n'
            span_id: 1016
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_1 > /dev/null &&\n'
            span_id: 1017
          ) 
          (Token
            id: Id.Lit_Chars
            val: '     test_must_fail git cat-file blob $blob_2 > /dev/null &&\n'
            span_id: 1018
          ) (Token id:Id.Lit_Chars val:'     test_must_fail git cat-file blob $blob_3 > /dev/null' span_id:1019)
        )
      }
    )
    (C {(test_done)})
  ]
)