t / t4212-log-corrupt.shon commit t4018: convert perl pattern tests to the new infrastructure (2d08413)
   1#!/bin/sh
   2
   3test_description='git log with invalid commit headers'
   4
   5. ./test-lib.sh
   6
   7test_expect_success 'setup' '
   8        test_commit foo &&
   9
  10        git cat-file commit HEAD |
  11        sed "/^author /s/>/>-<>/" >broken_email.commit &&
  12        git hash-object -w -t commit broken_email.commit >broken_email.hash &&
  13        git update-ref refs/heads/broken_email $(cat broken_email.hash)
  14'
  15
  16test_expect_success 'fsck notices broken commit' '
  17        git fsck 2>actual &&
  18        test_i18ngrep invalid.author actual
  19'
  20
  21test_expect_success 'git log with broken author email' '
  22        {
  23                echo commit $(cat broken_email.hash)
  24                echo "Author: A U Thor <author@example.com>"
  25                echo "Date:   Thu Apr 7 15:13:13 2005 -0700"
  26                echo
  27                echo "    foo"
  28        } >expect.out &&
  29        : >expect.err &&
  30
  31        git log broken_email >actual.out 2>actual.err &&
  32
  33        test_cmp expect.out actual.out &&
  34        test_cmp expect.err actual.err
  35'
  36
  37test_expect_success 'git log --format with broken author email' '
  38        echo "A U Thor+author@example.com+Thu Apr 7 15:13:13 2005 -0700" >expect.out &&
  39        : >expect.err &&
  40
  41        git log --format="%an+%ae+%ad" broken_email >actual.out 2>actual.err &&
  42
  43        test_cmp expect.out actual.out &&
  44        test_cmp expect.err actual.err
  45'
  46
  47test_done