File: test-show

package info (click to toggle)
nmh 1.8-4
  • links: PTS
  • area: main
  • in suites: forky, sid
  • size: 7,860 kB
  • sloc: ansic: 50,445; sh: 22,697; makefile: 1,138; lex: 740; perl: 509; yacc: 265
file content (127 lines) | stat: -rwxr-xr-x 2,520 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
#!/bin/sh

if test -z "${MH_OBJ_DIR}"; then
    srcdir=`dirname "$0"`/../..
    MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
fi

. "$MH_OBJ_DIR/test/common.sh"

setup_test

check_exit '-eq 1' show -

expected=$MH_TEST_DIR/$$.expected
actual=$MH_TEST_DIR/$$.actual

# Write message with a text/plain subpart.
msgfile=`mhpath new`
msgnum=`basename $msgfile`
cat > $msgfile <<EOF
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="NextPart_001"
Content-class: urn:content-classes:message
Date: Thu, 19 May 2011 00:00:00
From: sender@example.com
To: recipient@example.com

This is a multi-part message in MIME format.

--NextPart_001
Content-Type: multipart/related;
    type="multipart/alternative";
    boundary="NextPart_002"

--NextPart_002
Content-Type: text/plain;
    charset="utf-8"

This is the text/plain part.

--NextPart_002--

--NextPart_001--
EOF

# Test showing multiple non-MIME messages shows message numbers.

cat > $expected <<EOF
>>> inbox:1


Date:    Fri, 29 Sep 2006 00:00:00
To:      Some User <user@example.com>
From:    Test1 <test1@example.com>
Subject: Testing message 1


This is message number 1



>>> inbox:2


Date:    Fri, 29 Sep 2006 00:00:00
To:      Some User <user@example.com>
From:    Test2 <test2@example.com>
Subject: Testing message 2


This is message number 2
EOF

show +inbox 1 2 > $actual || exit 1

check "$expected" "$actual" : show two non-mime

# Test showing one MIME message shows message number.
# Format is different; why?

cat > $expected <<EOF
[ Message inbox:$msgnum ]
Date:    Thu, 19 May 2011 00:00:00
To:      recipient@example.com
From:    sender@example.com

MIME-Version: 1.0
Content-class: urn:content-classes:message

[ part 1.1 - text/plain -   29B  ]
This is the text/plain part.
EOF

show +inbox $msgnum > $actual || exit 1

check "$expected" "$actual" : show one MIME

# Test showing multiple MIME messages shows message numbers.
# Currently fails.

cat > $expected <<EOF
[ Message inbox:1 ]
Date:    Fri, 29 Sep 2006 00:00:00
To:      Some User <user@example.com>
From:    Test1 <test1@example.com>
Subject: Testing message 1


[ part  - text/plain -   25B  ]
This is message number 1
[ Message inbox:11 ]
Date:    Thu, 19 May 2011 00:00:00
To:      recipient@example.com
From:    sender@example.com

MIME-Version: 1.0
Content-class: urn:content-classes:message

[ part 1.1 - text/plain -   29B  ]
This is the text/plain part.
EOF

show +inbox 1 $msgnum > $actual || exit 1

check "$expected" "$actual" : show multiple mime

exit $failed