]> diplodocus.org Git - nmh/blob - test/pick/test-pick
'mhparam bindir' now prints NMH's idea of $(bindir).
[nmh] / test / pick / test-pick
1 #!/bin/sh
2 ######################################################
3 #
4 # Test pick
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
22 # Add an 11th message.
23 sed \
24 -e 's/10/11/g' \
25 -e 's/^To:\(.*\)/To:\1\
26 Cc: <another@example.com>/' \
27 -e 's/^\(Date:.*\)2006\( 00:00:\)00/\12008\200\
28 Delivery-Date: \12009\241/' \
29 $MH_TEST_DIR/Mail/inbox/10 >$MH_TEST_DIR/Mail/inbox/11
30
31 # Test message specification.
32 run_test 'pick first last' '1
33 11'
34
35 # Test -and.
36 run_test 'pick -subject message.3 -and -from Test3' '3'
37 run_test 'pick -subject message.3 -and -from Test4' \
38 'pick: no messages match specification
39 0'
40
41 # Test -or.
42 run_test 'pick -subject message.3 -or -from Test3' '3'
43 run_test 'pick -subject message.3 -or -from Test4' '3
44 4'
45
46 # Test -not.
47 run_test 'pick -not -subject message.8 last:5' '7
48 9
49 10
50 11'
51
52 # Test -lbrace, -rbrace.
53 run_test 'pick -subject message.12 -and -subject message.3 -or -from Test4' '4'
54 run_test 'pick -subject message.12 -and -lbrace -subject message.3 -rbrace' \
55 'pick: no messages match specification
56 0'
57
58 # -and takes precedence over -or.
59 run_test 'pick -subject message.12 -or -subject message.3 -and -from Test3' '3'
60 run_test 'pick -subject message.12 -or -subject message.3 -and -from Test4' \
61 'pick: no messages match specification
62 0'
63
64 # -not takes precedence over -and.
65 run_test 'pick -not -subject message.12 -and -subject message.3' '3'
66 run_test 'pick -not -lbrace -subject NoMatch -and -subject message.3 -rbrace' \
67 '1
68 2
69 3
70 4
71 5
72 6
73 7
74 8
75 9
76 10
77 11'
78
79 # Test -debug.
80 run_prog pick -debug -not -lbrace -subject NoMatch -and -subject message.3 \
81 -rbrace >/dev/null 2>"$actual"
82 cat >"$expected" <<EOF
83 NOT
84 | AND
85 | | PATTERN(header) ^subject[ ]*:.*NoMatch
86 | | PATTERN(header) ^subject[ ]*:.*message.3
87 EOF
88 check "$expected" "$actual"
89
90 set +e
91
92 # Produce 0 if no messages match and standard output is not a tty.
93 # Note that there is an error message on stderr, but it's redirected
94 # to /dev/null here.
95 echo \
96 `run_prog pick -subject message.3 -and -from Test4 >"$actual" 2>/dev/null` \
97 >/dev/null
98 cat >"$expected" <<EOF
99 0
100 EOF
101 check "$expected" "$actual"
102
103 if test -t 1 && (printf '' >/dev/tty) 2>/dev/null; then
104 # Produce no standard output if no messages match and standard
105 # output is a tty. To test that even when run with stdout
106 # detached, write directly to /dev/tty. Can't capture the
107 # output so hopefully the user will notice it.
108 run_prog pick -subject message.3 -and -from Test4 >/dev/tty 2>/dev/null
109 fi
110
111 # Also, check that the exit status is 1.
112 run_prog pick -subject message.3 -and -from Test4 >/dev/null 2>&1
113 run_test "echo $?" '1'
114
115 set -e
116
117 # Test -cc.
118 run_test 'pick -cc another' '11'
119
120 # Test -date.
121 run_test 'pick -date 29.Sep.2008' '11'
122
123 # Test -from.
124 run_test 'pick -from test7' '7'
125
126 # Test -search.
127 run_test 'pick -search This.is.message.number.[456]' '4
128 5
129 6'
130
131 # Test -subject.
132 run_test 'pick -subject message.2' '2'
133
134 # Test -to.
135 run_test 'pick -to some -nolist' '11 hits'
136 run_test 'pick -to user@example.com -nolist' '11 hits'
137
138 # Test -after.
139 run_prog pick -after '28 Sep 2008 00:00:00' >"$actual" 2>&1
140 cat >"$expected" <<EOF
141 11
142 EOF
143 check "$expected" "$actual"
144
145 # Invert exit status so execution doesn't terminate due to -e.
146 set +e
147 run_prog pick -after '29 Sep 2008 00:00:00' >"$actual" 2>/dev/null
148 set -e
149 cat >"$expected" <<EOF
150 0
151 EOF
152 check "$expected" "$actual"
153
154 # Test -before. While -after doesn't include the specified date, -before does.
155 run_prog pick -before '29 Sep 2008 00:00:01' last:3 >"$actual" 2>&1
156 cat >"$expected" <<EOF
157 9
158 10
159 11
160 EOF
161 check "$expected" "$actual"
162 run_prog pick -before '28 Sep 2008 00:00:00:' last:3 >"$actual" 2>&1
163 cat >"$expected" <<EOF
164 9
165 10
166 EOF
167 check "$expected" "$actual"
168 set +e
169 run_prog pick -before '28 Sep 2006 00:00:00' last:3 >"$actual" 2>/dev/null
170 set -e
171 cat >"$expected" <<EOF
172 0
173 EOF
174 check "$expected" "$actual"
175
176 # Test -datefield.
177 set +e
178 run_prog pick -datefield date -after '29 Sep 2008 00:00:00' \
179 >"$actual" 2>/dev/null
180 set -e
181 cat >"$expected" <<EOF
182 0
183 EOF
184 check "$expected" "$actual"
185 run_prog pick -datefield delivery-date -after '29 Sep 2008 00:00:00' \
186 >"$actual" 2>&1
187 cat >"$expected" <<EOF
188 11
189 EOF
190 check "$expected" "$actual"
191
192 # Test sequence creation.
193 run_test 'pick 2 4 6 8 10 -sequence even' '5 hits'
194 run_test 'mark -s even -list' 'even: 2 4 6 8 10'
195
196 # Test private sequence creation.
197 # Set current message for following tests.
198 folder +inbox 1 > /dev/null
199 run_test 'pick -date 29.Sep.2008 -sequence privateseq -nopublic' '1 hit'
200 run_test 'mark -list' 'cur: 1
201 even: 2 4 6 8 10
202 privateseq (private): 11'
203
204 # Test add to private sequence.
205 run_test 'pick first -sequence privateseq -nozero -nopublic' '1 hit'
206 run_test 'mark -list' 'cur: 1
207 even: 2 4 6 8 10
208 privateseq (private): 1 11'
209
210 # Test sequence creation, with -list.
211 run_test 'pick 5 7 -sequence odd -list' '5
212 7'
213 run_test 'mark -s odd -list' 'odd: 5 7'
214
215 # Test sequence creation, with default of -zero.
216 run_test 'pick 1 3 -sequence odd' '2 hits'
217 run_test 'mark -s odd -list' 'odd: 1 3'
218
219 # Test sequence creation, with -nozero.
220 run_test 'pick 5 7 9 -sequence odd -nozero' '3 hits'
221 run_test 'mark -s odd -list' 'odd: 1 3 5 7 9'
222
223 # Test sequence creation, with explicit folder, -public, and -zero.
224 run_test 'pick +inbox 5 7 9 11 -public -sequence odd' '4 hits'
225 run_test 'mark -s odd -list' 'odd: 5 7 9 11'
226
227 # Test -nolist.
228 run_test 'pick all -nolist' '11 hits'
229
230 # Test unfolding of multi-line header fields: it should only
231 # remove embedded newlines.
232 cat >"$MH_TEST_DIR/Mail/inbox/12" <<EOF
233 From: Test12 <test12@example.com>
234 To: Some User <user@example.com>
235 Date: Fri, 29 Sep 2006 00:00:00
236 Message-Id: 12@test.nmh
237 Subject: multi-line
238 header field
239
240 This is message number 12
241 EOF
242
243 echo 12 >"$expected"
244
245 run_prog pick -subject 'multi-line header field' 12 >"$actual" 2>&1
246 check "$expected" "$actual"
247
248 # Test MIME-encoded header.
249 cat >"$MH_TEST_DIR/Mail/inbox/13" <<EOF
250 From: Test13 <test13@example.com>
251 To: Some User <user@example.com>
252 Date: Fri, 29 Sep 2006 00:00:00
253 Message-Id: 13@test.nmh
254 Subject: =?us-ascii?q?=66=6f=6f?=
255 =?utf-8?q?=62=61=72?=
256
257 This is message number 13, with MIME-encoded Subject "foobar".
258 EOF
259
260 echo 13 >"$expected"
261
262 set +e
263
264 require_locale en_US.utf-8 en_US.utf8
265 # Don't use run_prog here because it loses the environment setting.
266 LC_ALL=en_US.UTF-8 pick -subject foobar 13 >"$actual" 2>&1
267 set -e
268 check "$expected" "$actual"
269
270 # Test -nosequence.
271 run_test 'pick +inbox 5 7 9 11 -sequence test -nosequence' '5
272 7
273 9
274 11'
275 run_test 'mark -list -sequence test' 'test: '
276
277
278 exit $failed