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 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