They test with output to a tty didn't work under make distcheck. Tried to work aroun...
[mmh] / 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 MHPDEBUG.
80 MHPDEBUG=1 pick -not -lbrace -subject NoMatch -and -subject message.3 -rbrace \
81  >/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
91 # Produce 0 if no messages match and standard output is not a tty.
92 # Note that there is an error message on stderr, but it's redirected
93 # to /dev/null here.
94 echo `pick -subject message.3 -and -from Test4 >$actual 2>/dev/null` >/dev/null
95 cat >$expected <<EOF
96 0
97 EOF
98 check $expected $actual
99
100
101 set +e
102
103 if test -w /dev/tty; then
104   # Produce no standard output if no messages match and standard
105   # output is a tty.  To test that, move stderr to stdout and
106   # write the output directly to the tty.  If there is output,
107   # it probably won't be captured, but pretend that it would be.
108   output=`pick -subject message.3 -and -from Test4 >&2- >/dev/tty`
109   run_test "echo $output" ''
110 else
111   echo "$0: skip tty test because can't write to /dev/tty"
112 fi
113
114 # Also, check that the exit status is 1.
115 pick -subject message.3 -and -from Test4 >/dev/null 2>&1
116 run_test "echo $?" '1'
117
118 set -e
119
120 # Test -cc.
121 run_test 'pick -cc another' '11'
122
123 # Test -date.
124 run_test 'pick -date 29.Sep.2008' '11'
125
126 # Test -from.
127 run_test 'pick -from test7' '7'
128
129 # Test -search.
130 run_test 'pick -search This.is.message.number.[456]' '4
131 5
132 6'
133
134 # Test -subject.
135 run_test 'pick -subject message.2' '2'
136
137 # Test -to.
138 run_test 'pick -to some -nolist' '11 hits'
139 run_test 'pick -to user@example.com -nolist' '11 hits'
140
141 # Test -after.
142 pick -after '28 Sep 2008 00:00:00' >$actual 2>&1
143 cat >$expected <<EOF
144 11
145 EOF
146 check $expected $actual
147
148 # Invert exit status so execution doesn't terminate due to -e.
149 ! pick -after '29 Sep 2008 00:00:00' >$actual 2>/dev/null
150 cat >$expected <<EOF
151 0
152 EOF
153 check $expected $actual
154
155 # Test -before.  While -after doesn't include the specified date, -before does.
156 pick -before '29 Sep 2008 00:00:01' last:3 >$actual 2>&1
157 cat >$expected <<EOF
158 9
159 10
160 11
161 EOF
162 check $expected $actual
163 pick -before '28 Sep 2008 00:00:00:' last:3 >$actual 2>&1
164 cat >$expected <<EOF
165 9
166 10
167 EOF
168 check $expected $actual
169 # Invert exit status so execution doesn't terminate due to -e.
170 ! pick -before '28 Sep 2006 00:00:00' last:3 >$actual 2>/dev/null
171 cat >$expected <<EOF
172 0
173 EOF
174 check $expected $actual
175
176 # Test -datefield.
177 # Invert exit status so execution doesn't terminate due to -e.
178 ! pick -datefield date -after '29 Sep 2008 00:00:00' >$actual 2>/dev/null
179 cat >$expected <<EOF
180 0
181 EOF
182 check $expected $actual
183 pick -datefield delivery-date -after '29 Sep 2008 00:00:00' >$actual 2>&1
184 cat >$expected <<EOF
185 11
186 EOF
187 check $expected $actual
188
189 # Test sequence creation.
190 run_test 'pick 2 4 6 8 10 -sequence even' '5 hits'
191 run_test 'mark -s even -list' 'even: 2 4 6 8 10'
192
193 # Test private sequence creation.
194 # Set current message for following tests.
195 folder +inbox 1 > /dev/null
196 run_test 'pick -date 29.Sep.2008 -sequence privateseq -nopublic' '1 hit'
197 run_test 'mark -list' 'cur: 1
198 even: 2 4 6 8 10
199 privateseq (private): 11'
200
201 # Test add to private sequence.
202 run_test 'pick first -sequence privateseq -nozero -nopublic' '1 hit'
203 run_test 'mark -list' 'cur: 1
204 even: 2 4 6 8 10
205 privateseq (private): 1 11'
206
207 # Test sequence creation, with -list.
208 run_test 'pick 5 7 -sequence odd -list' '5
209 7'
210 run_test 'mark -s odd -list' 'odd: 5 7'
211
212 # Test sequence creation, with default of -zero.
213 run_test 'pick 1 3 -sequence odd' '2 hits'
214 run_test 'mark -s odd -list' 'odd: 1 3'
215
216 # Test sequence creation, with -nozero.
217 run_test 'pick  5 7 9 -sequence odd -nozero' '3 hits'
218 run_test 'mark -s odd -list' 'odd: 1 3 5 7 9'
219
220 # Test sequence creation, with explicit folder, -public, and -zero.
221 run_test 'pick +inbox 5 7 9 11 -public -sequence odd' '4 hits'
222 run_test 'mark -s odd -list' 'odd: 5 7 9 11'
223
224 # Test -nolist.
225 run_test 'pick all -nolist' '11 hits'
226
227
228 exit $failed