diplodocus.org Git - nmh/blob - test/show/test-show

   1 #!/bin/sh
   2
   3 if test -z "${MH_OBJ_DIR}"; then
   4     srcdir=`dirname "$0"`/../..
   5     MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
   6 fi
   7
   8 . "$MH_OBJ_DIR/test/common.sh"
   9
  10 setup_test
  11
  12 check_exit '-eq 1' show -
  13
  14 expected=$MH_TEST_DIR/$$.expected
  15 actual=$MH_TEST_DIR/$$.actual
  16
  17 # Write message with a text/plain subpart.
  18 msgfile=`mhpath new`
  19 msgnum=`basename $msgfile`
  20 cat > $msgfile <<EOF
  21 MIME-Version: 1.0
  22 Content-Type: multipart/mixed; boundary="NextPart_001"
  23 Content-class: urn:content-classes:message
  24 Date: Thu, 19 May 2011 00:00:00
  25 From: sender@example.com
  26 To: recipient@example.com
  27
  28 This is a multi-part message in MIME format.
  29
  30 --NextPart_001
  31 Content-Type: multipart/related;
  32     type="multipart/alternative";
  33     boundary="NextPart_002"
  34
  35 --NextPart_002
  36 Content-Type: text/plain;
  37     charset="utf-8"
  38
  39 This is the text/plain part.
  40
  41 --NextPart_002--
  42
  43 --NextPart_001--
  44 EOF
  45
  46 # Test showing multiple non-MIME messages shows message numbers.
  47
  48 cat > $expected <<EOF
  49 >>> inbox:1
  50
  51
  52 Date:    Fri, 29 Sep 2006 00:00:00
  53 To:      Some User <user@example.com>
  54 From:    Test1 <test1@example.com>
  55 Subject: Testing message 1
  56
  57
  58 This is message number 1
  59
  60
  61
  62 >>> inbox:2
  63
  64
  65 Date:    Fri, 29 Sep 2006 00:00:00
  66 To:      Some User <user@example.com>
  67 From:    Test2 <test2@example.com>
  68 Subject: Testing message 2
  69
  70
  71 This is message number 2
  72 EOF
  73
  74 show +inbox 1 2 > $actual || exit 1
  75
  76 check "$expected" "$actual" : show two non-mime
  77
  78 # Test showing one MIME message shows message number.
  79 # Format is different; why?
  80
  81 cat > $expected <<EOF
  82 [ Message inbox:$msgnum ]
  83 Date:    Thu, 19 May 2011 00:00:00
  84 To:      recipient@example.com
  85 From:    sender@example.com
  86
  87 MIME-Version: 1.0
  88 Content-class: urn:content-classes:message
  89
  90 [ part 1.1 - text/plain -   29B  ]
  91 This is the text/plain part.
  92 EOF
  93
  94 show +inbox $msgnum > $actual || exit 1
  95
  96 check "$expected" "$actual" : show one MIME
  97
  98 # Test showing multiple MIME messages shows message numbers.
  99 # Currently fails.
 100
 101 cat > $expected <<EOF
 102 [ Message inbox:1 ]
 103 Date:    Fri, 29 Sep 2006 00:00:00
 104 To:      Some User <user@example.com>
 105 From:    Test1 <test1@example.com>
 106 Subject: Testing message 1
 107
 108
 109 [ part  - text/plain -   25B  ]
 110 This is message number 1
 111 [ Message inbox:11 ]
 112 Date:    Thu, 19 May 2011 00:00:00
 113 To:      recipient@example.com
 114 From:    sender@example.com
 115
 116 MIME-Version: 1.0
 117 Content-class: urn:content-classes:message
 118
 119 [ part 1.1 - text/plain -   29B  ]
 120 This is the text/plain part.
 121 EOF
 122
 123 show +inbox 1 $msgnum > $actual || exit 1
 124
 125 check "$expected" "$actual" : show multiple mime
 126
 127 exit $failed