diplodocus.org Git - nmh/blob - 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 # Don't use run_prog here because it loses the environment setting.
  81 MHPDEBUG=1 pick -not -lbrace -subject NoMatch -and -subject message.3 -rbrace \
  82  >/dev/null 2>"$actual"
  83 cat >"$expected" <<EOF
  84 NOT
  85 | AND
  86 | | PATTERN(header) ^subject[   ]*:.*NoMatch
  87 | | PATTERN(header) ^subject[   ]*:.*message.3
  88 EOF
  89 check "$expected" "$actual"
  90
  91 set +e
  92
  93 # Produce 0 if no messages match and standard output is not a tty.
  94 # Note that there is an error message on stderr, but it's redirected
  95 # to /dev/null here.
  96 echo \
  97   `run_prog pick -subject message.3 -and -from Test4 >"$actual" 2>/dev/null` \
  98   >/dev/null
  99 cat >"$expected" <<EOF
 100 0
 101 EOF
 102 check "$expected" "$actual"
 103
 104 if test -t 1  &&  (printf '' >/dev/tty) 2>/dev/null; then
 105   # Produce no standard output if no messages match and standard
 106   # output is a tty.  To test that even when run with stdout
 107   # detached, write directly to /dev/tty.  Can't capture the
 108   # output so hopefully the user will notice it.
 109   run_prog pick -subject message.3 -and -from Test4 >/dev/tty 2>/dev/null
 110 fi
 111
 112 # Also, check that the exit status is 1.
 113 run_prog pick -subject message.3 -and -from Test4 >/dev/null 2>&1
 114 run_test "echo $?" '1'
 115
 116 set -e
 117
 118 # Test -cc.
 119 run_test 'pick -cc another' '11'
 120
 121 # Test -date.
 122 run_test 'pick -date 29.Sep.2008' '11'
 123
 124 # Test -from.
 125 run_test 'pick -from test7' '7'
 126
 127 # Test -search.
 128 run_test 'pick -search This.is.message.number.[456]' '4
 129 5
 130 6'
 131
 132 # Test -subject.
 133 run_test 'pick -subject message.2' '2'
 134
 135 # Test -to.
 136 run_test 'pick -to some -nolist' '11 hits'
 137 run_test 'pick -to user@example.com -nolist' '11 hits'
 138
 139 # Test -after.
 140 run_prog pick -after '28 Sep 2008 00:00:00' >"$actual" 2>&1
 141 cat >"$expected" <<EOF
 142 11
 143 EOF
 144 check "$expected" "$actual"
 145
 146 # Invert exit status so execution doesn't terminate due to -e.
 147 set +e
 148 run_prog pick -after '29 Sep 2008 00:00:00' >"$actual" 2>/dev/null
 149 set -e
 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 run_prog 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 run_prog 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 set +e
 170 run_prog pick -before '28 Sep 2006 00:00:00' last:3 >"$actual" 2>/dev/null
 171 set -e
 172 cat >"$expected" <<EOF
 173 0
 174 EOF
 175 check "$expected" "$actual"
 176
 177 # Test -datefield.
 178 set +e
 179 run_prog pick -datefield date -after '29 Sep 2008 00:00:00' \
 180   >"$actual" 2>/dev/null
 181 set -e
 182 cat >"$expected" <<EOF
 183 0
 184 EOF
 185 check "$expected" "$actual"
 186 run_prog pick -datefield delivery-date -after '29 Sep 2008 00:00:00' \
 187   >"$actual" 2>&1
 188 cat >"$expected" <<EOF
 189 11
 190 EOF
 191 check "$expected" "$actual"
 192
 193 # Test sequence creation.
 194 run_test 'pick 2 4 6 8 10 -sequence even' '5 hits'
 195 run_test 'mark -s even -list' 'even: 2 4 6 8 10'
 196
 197 # Test private sequence creation.
 198 # Set current message for following tests.
 199 folder +inbox 1 > /dev/null
 200 run_test 'pick -date 29.Sep.2008 -sequence privateseq -nopublic' '1 hit'
 201 run_test 'mark -list' 'cur: 1
 202 even: 2 4 6 8 10
 203 privateseq (private): 11'
 204
 205 # Test add to private sequence.
 206 run_test 'pick first -sequence privateseq -nozero -nopublic' '1 hit'
 207 run_test 'mark -list' 'cur: 1
 208 even: 2 4 6 8 10
 209 privateseq (private): 1 11'
 210
 211 # Test sequence creation, with -list.
 212 run_test 'pick 5 7 -sequence odd -list' '5
 213 7'
 214 run_test 'mark -s odd -list' 'odd: 5 7'
 215
 216 # Test sequence creation, with default of -zero.
 217 run_test 'pick 1 3 -sequence odd' '2 hits'
 218 run_test 'mark -s odd -list' 'odd: 1 3'
 219
 220 # Test sequence creation, with -nozero.
 221 run_test 'pick  5 7 9 -sequence odd -nozero' '3 hits'
 222 run_test 'mark -s odd -list' 'odd: 1 3 5 7 9'
 223
 224 # Test sequence creation, with explicit folder, -public, and -zero.
 225 run_test 'pick +inbox 5 7 9 11 -public -sequence odd' '4 hits'
 226 run_test 'mark -s odd -list' 'odd: 5 7 9 11'
 227
 228 # Test -nolist.
 229 run_test 'pick all -nolist' '11 hits'
 230
 231 # Test unfolding of multi-line header fields: it should only
 232 # remove embedded newlines.
 233 cat >"$MH_TEST_DIR/Mail/inbox/12" <<EOF
 234 From: Test12 <test12@example.com>
 235 To: Some User <user@example.com>
 236 Date: Fri, 29 Sep 2006 00:00:00
 237 Message-Id: 12@test.nmh
 238 Subject: multi-line
 239  header field
 240
 241 This is message number 12
 242 EOF
 243
 244 echo 12 >"$expected"
 245
 246 run_prog pick -subject 'multi-line header field' 12 >"$actual" 2>&1
 247 check "$expected" "$actual"
 248
 249 # Test MIME-encoded header.
 250 cat >"$MH_TEST_DIR/Mail/inbox/13" <<EOF
 251 From: Test13 <test13@example.com>
 252 To: Some User <user@example.com>
 253 Date: Fri, 29 Sep 2006 00:00:00
 254 Message-Id: 13@test.nmh
 255 Subject: =?us-ascii?q?=66=6f=6f?=
 256  =?utf-8?q?=62=61=72?=
 257
 258 This is message number 13, with MIME-encoded Subject "foobar".
 259 EOF
 260
 261 echo 13 >"$expected"
 262
 263 set +e
 264
 265 require_locale en_US.utf-8 en_US.utf8
 266 # Don't use run_prog here because it loses the environment setting.
 267 LC_ALL=en_US.UTF-8 pick -subject foobar 13 >"$actual" 2>&1
 268 set -e
 269 check "$expected" "$actual"
 270
 271 # Test -nosequence.
 272 run_test 'pick +inbox 5 7 9 11 -sequence test -nosequence' '5
 273 7
 274 9
 275 11'
 276 run_test 'mark -list -sequence test' 'test: '
 277
 278
 279 exit $failed