]> diplodocus.org Git - nmh/blob - test/post/test-sendfiles
Added several historical source archives from the early days of MH.
[nmh] / test / post / test-sendfiles
1 #!/bin/sh
2 ######################################################
3 #
4 # Test sendfiles
5 #
6 ######################################################
7
8 set -e
9
10 if test -z "$MH_OBJ_DIR"; then
11 srcdir=`dirname $0`/../..
12 MH_OBJ_DIR=`cd $srcdir && pwd`; export MH_OBJ_DIR
13 fi
14
15 . "$MH_OBJ_DIR/test/common.sh"
16
17 setup_test
18
19 expected=$MH_TEST_DIR/$$.expected
20 actual=$MH_TEST_DIR/$$.actual
21 localmbox=`$MH_LIBEXEC_DIR/ap -format "%(localmbox)" 0`
22 #### Use this script itself for the test file.
23 testfiledir="$srcdir/test/post"
24 testfile=`basename $0`
25
26 (cd "$MH_TEST_DIR" && mkdir -p tmp)
27
28 #### Copy fakesendmail and the testfile because we cd to the
29 #### test directory, because tar doesn't like absolute paths.
30 cp "$srcdir/test/fakesendmail" "$testfiledir/$testfile" "$MH_TEST_DIR"
31
32 #### Use sendmail/pipe below to override default mts.
33 mts_fakesendmail="$MHMTSCONF-fakesendmail"
34 sed -e 's/^mts:.*/mts: sendmail\/pipe/' "$MHMTSCONF" > "$mts_fakesendmail"
35 printf 'sendmail: %s/fakesendmail\n' "$MH_TEST_DIR" >>"$mts_fakesendmail"
36 MHMTSCONF="$mts_fakesendmail"
37
38 # $1: uncompress command
39 # $2: argument style:
40 # new: -to recipient -subject subject
41 # old: recipient subject
42 # remaining arguments: sendfiles switches
43 test_sendfiles ()
44 {
45 uncompress="$1"; shift
46 argstyle="$1"; shift
47
48 if [ "$argstyle" = 'new' ]; then
49 (cd "$MH_TEST_DIR" &&
50 run_prog sendfiles "$@" -to recipient@example.com \
51 -subject "sendfiles test" "$testfile" >/dev/null 2>&1)
52 elif [ "$argstyle" = 'old' ]; then
53 (cd "$MH_TEST_DIR" &&
54 run_prog sendfiles "$@" recipient@example.com "sendfiles test" \
55 "$testfile" >/dev/null 2>&1)
56 fi
57
58 # fakesendmail drops the message and any cc's into this mbox.
59 mbox="$MH_TEST_DIR"/Mail/fakesendmail.mbox
60 inc -silent -file "$mbox"
61 rm -f "$mbox"
62
63 mhlist -verbose last | sed -e 's/ *$//' -e 's/\(octet-stream\).*$/\1/' \
64 >"$actual"
65 (cd $MH_TEST_DIR/tmp &&
66 contents=`mhstore -noauto last 2>&1 | \
67 sed -e 's/storing message.*as file //'` &&
68 $uncompress <"$contents" | tar xpf - && rm -f "$contents")
69
70 rmm last
71 check "$testfiledir/$testfile" "$MH_TEST_DIR/tmp/$testfile" \
72 'keep first'
73
74 [ -f "$expected" ] && check "$expected" "$actual" || rm -f "$actual"
75 }
76
77
78 # check -help
79 cat >"$expected" <<EOF
80 Usage: sendfiles [switches] -to recipient -subject subject file1 [file2 ...]
81 or
82 sendfiles [switches] recipient subject file1 [file2 ...]
83 switches are:
84 -compress [bzip2 | compress | gzip | lzma | none]
85 -from <sender>
86 -version
87 -help
88 Can use PERSON environment variable instead of -from switch.
89 EOF
90
91 #### Skip nmh intro text.
92 run_prog sendfiles -help 2>&1 | sed '/^$/,$d' >"$actual"
93 check "$expected" "$actual"
94
95 # check -version
96 case `sendfiles -v` in
97 sendfiles\ --*) ;;
98 * ) printf '%s: sendfiles -v generated unexpected output\n' "$0" >&2
99 failed=`expr ${failed:-0} + 1`;;
100 esac
101
102 # check unknown switch
103 run_test 'sendfiles -nonexistent' "Usage: sendfiles [switches] -to recipient \
104 -subject subject file1 [file2 ...]
105 or
106 sendfiles [switches] recipient subject file1 [file2 ...]
107 switches are:
108 -compress [bzip2 | compress | gzip | lzma | none]
109 -from <sender>
110 -version
111 -help
112 Can use PERSON environment variable instead of -from switch."
113
114 # check unknown compression method
115 run_test 'sendfiles -compress unknown to subject file' \
116 'sendfiles: unknown compression method "unknown"'"
117 Usage: sendfiles [switches] -to recipient \
118 -subject subject file1 [file2 ...]
119 or
120 sendfiles [switches] recipient subject file1 [file2 ...]
121 switches are:
122 -compress [bzip2 | compress | gzip | lzma | none]
123 -from <sender>
124 -version
125 -help
126 Can use PERSON environment variable instead of -from switch."
127
128 # Check basic operation, using specified compression method.
129 # Don't check the mhlist output, by not creating an $expected file,
130 # because it will vary with compression method and compressed file
131 # size.
132 [ "`findprog bzip2`" ] && test_sendfiles 'bzip2 -cd' new -compress bzip2
133 [ "`findprog compress`" ] && test_sendfiles 'uncompress -c' new \
134 -compress compress
135 [ "`findprog gzip`" ] && test_sendfiles 'gzip -cd' new -compress gzip
136 [ "`findprog gzip`" ] && test_sendfiles 'gzip -cd' new -gzip
137 [ "`findprog lzma`" ] && test_sendfiles 'lzma -cd' new -compress lzma
138
139 # check with no compression
140 cat >"$expected" <<EOF
141 msg part type/subtype size description
142 11 application/octet-stream
143 type="tar"
144 (extract with cat | tar xvpf -)
145 EOF
146
147 test_sendfiles cat new -compress none
148
149 # check with no compression, -none
150 cat >"$expected" <<EOF
151 msg part type/subtype size description
152 11 application/octet-stream
153 type="tar"
154 (extract with cat | tar xvpf -)
155 EOF
156
157 test_sendfiles cat new -none
158
159 # check old argument style (without -to and -subject)
160 cat >"$expected" <<EOF
161 msg part type/subtype size description
162 11 application/octet-stream
163 type="tar"
164 (extract with cat | tar xvpf -)
165 EOF
166
167 test_sendfiles cat old -compress none
168
169 # check -from
170 cat >"$expected" <<EOF
171 msg part type/subtype size description
172 11 application/octet-stream
173 type="tar"
174 (extract with cat | tar xvpf -)
175 EOF
176
177 test_sendfiles cat new -compress none -from 'Sender <sender@example.com>'
178
179 # check PERSON environment variable
180 cat >"$expected" <<EOF
181 msg part type/subtype size description
182 11 application/octet-stream
183 type="tar"
184 (extract with cat | tar xvpf -)
185 EOF
186
187 PERSON='Sender <sender@example.com>' test_sendfiles cat new -compress none
188
189 rm -fr "$MH_TEST_DIR/fakesendmail" "$MH_TEST_DIR/$testfile" "$MH_TEST_DIR/tmp"
190
191
192 exit ${failed:-0}