diplodocus.org Git - nmh/blob - test/mhstore/test-mhstore

   1 #!/bin/sh
   2 ######################################################
   3 #
   4 # Test mhstore
   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 check_exit '-eq 1' mhstore -
  20
  21 expected="$MH_TEST_DIR/test-mhstore$$.expected"
  22 expected2="$MH_TEST_DIR/test-mhstore$$.expected2"
  23 expected_err="$MH_TEST_DIR/test-mhmail$$.expected_err"
  24 actual="$MH_TEST_DIR/test-mhstore$$.actual"
  25 actual_err="$MH_TEST_DIR/test-mhmail$$.actual_err"
  26
  27 cd "$MH_TEST_DIR"
  28
  29 # check with no options and no current message
  30 start_test 'with no options and no current message'
  31 run_test 'mhstore' 'mhstore: no cur message'
  32
  33 # check with no options and current message
  34 start_test 'with no options and current message'
  35 folder +inbox 5 >/dev/null
  36 cat >"$expected" <<'EOF'
  37 This is message number 5
  38 EOF
  39 run_test 'mhstore' 'storing message 5 as file 5.txt'
  40 check "$expected" 5.txt 'keep first'
  41
  42 # check with folder and current message
  43 start_test 'with folder and current message'
  44 run_test 'mhstore +inbox' 'storing message 5 as file 5.txt'
  45 check "$expected" 5.txt 'keep first'
  46
  47 # check with specified message
  48 start_test 'with specified message'
  49 run_test 'mhstore 5' 'storing message 5 as file 5.txt'
  50 check "$expected" 5.txt 'keep first'
  51
  52 # check -file
  53 start_test '-file'
  54 run_test "mhstore -file $MH_TEST_DIR/Mail/inbox/5" \
  55   "storing message $MH_TEST_DIR/Mail/inbox/5 as file 5.txt"
  56 check "$expected" 5.txt 'keep first'
  57
  58 # check -file -
  59 start_test '-file -'
  60 stored_contents=`run_prog mhstore -file - < $MH_TEST_DIR/Mail/inbox/5 2>&1 | \
  61   sed 's/.*as file //'`
  62 check "$expected" "$stored_contents" 'keep first'
  63
  64 # check -outfile and -noverbose
  65 start_test '-outfile and -noverbose'
  66 run_prog mhstore 5 -noverbose -outfile "$actual" >"$actual_err" 2>&1
  67 printf '' >"$expected_err"
  68 check "$expected" "$actual" 'keep first'
  69 check "$expected_err" "$actual_err"
  70
  71 # check -outfile -
  72 start_test '-outfile -'
  73 printf '%s\n' 'storing message 5 to stdout' >>"$expected"
  74 run_prog mhstore 5 -outfile - >"$actual" 2>&1
  75 check "$expected" "$actual"
  76
  77 # check message number greater than highest
  78 start_test 'message number greater than highest'
  79 run_test 'mhstore 11' "mhstore: message 11 doesn't exist"
  80
  81 # check multiple messages
  82 start_test 'multiple messages'
  83 run_test 'mhstore 4 6' 'storing message 4 as file 4.txt
  84 storing message 6 as file 6.txt'
  85 cat >"$expected" <<'EOF'
  86 This is message number 4
  87 EOF
  88 check "$expected" 4.txt
  89 cat >"$expected" <<'EOF'
  90 This is message number 6
  91 EOF
  92 check "$expected" 6.txt
  93
  94 # Write message with a text/plain subpart.
  95 msgfile=`mhpath new`
  96 cat >"$msgfile" <<'EOF'
  97 To: recipient@example.com
  98 From: sender@example.com
  99 Subject: mhlist test
 100 MIME-Version: 1.0
 101 Content-Type: multipart/mixed; boundary="----- =_aaaaaaaaaa0"
 102
 103 ------- =_aaaaaaaaaa0
 104 Content-Type: multipart/related;
 105     type="multipart/alternative";
 106     boundary="subpart__1.1"
 107
 108 --subpart__1.1
 109 Content-Type: text/plain; charset="iso-8859-1"
 110 Content-Disposition: attachment; filename="test1.txt"
 111
 112 This is the first text/plain part, in a subpart.
 113
 114 --subpart__1.1--
 115
 116 ------- =_aaaaaaaaaa0
 117 Content-Type: text/plain; charset="iso-8859-1"
 118 Content-Disposition: attachment; filename="test2.txt"
 119 Content-MD5: kq+Hnc2SD/eKwAnkFBDuEA==
 120 Content-Transfer-Encoding: quoted-printable
 121
 122 This is the second text/plain part.
 123
 124 ------- =_aaaaaaaaaa0
 125 Content-Type: text/plain; charset="iso-8859-1"
 126 Content-Disposition: attachment; filename="test3.txt"
 127
 128 This is the third text/plain part.
 129
 130 ------- =_aaaaaaaaaa0
 131 Content-Type: text/plain; charset="iso-8859-1"; name="test4.txt"
 132 Content-Disposition: attachment; filename="test4.txt"
 133 Content-MD5: cMI1lB/LZ4jgVl3EbhdyWA==
 134 Content-Transfer-Encoding: base64
 135
 136 VGhpcyBpcyB0aGUgZm91cnRoIHRleHQvcGxhaW4gcGFydC4NClRoaXMgdGVzdCBoYXMgbXVsdGlw
 137 bGUgbGluZXMuDQo=
 138
 139 ------- =_aaaaaaaaaa0--
 140 EOF
 141
 142 # check -part
 143 start_test '-part'
 144 cat >"$expected" <<'EOF'
 145 This is the third text/plain part.
 146 EOF
 147 run_test 'mhstore last -part 3' 'storing message 11 part 3 as file 11.3.txt'
 148 check "$expected" 11.3.txt
 149
 150 # check -part of a subpart
 151 start_test '-part of a subpart'
 152 cat >"$expected" <<'EOF'
 153 This is the first text/plain part, in a subpart.
 154 EOF
 155 run_test 'mhstore last -part 1.1' \
 156          'storing message 11 part 1.1 as file 11.1.1.txt'
 157 check "$expected" 11.1.1.txt 'keep first'
 158
 159 # check -type
 160 start_test '-type'
 161 run_test 'mhstore last -type text/plain' \
 162   'storing message 11 part 1.1 as file 11.1.1.txt
 163 storing message 11 part 2 as file 11.2.txt
 164 storing message 11 part 3 as file 11.3.txt
 165 storing message 11 part 4 as file 11.4.txt'
 166 check "$expected" 11.1.1.txt
 167 cat >"$expected" <<'EOF'
 168 This is the second text/plain part.
 169 EOF
 170 check "$expected" 11.2.txt
 171 cat >"$expected" <<'EOF'
 172 This is the third text/plain part.
 173 EOF
 174 check "$expected" 11.3.txt
 175 cat >"$expected" <<'EOF'
 176 This is the fourth text/plain part.
 177 This test has multiple lines.
 178 EOF
 179 check "$expected" 11.4.txt
 180
 181 # check -auto
 182 start_test '-auto'
 183 cat >"$expected" <<'EOF'
 184 This is the fourth text/plain part.
 185 This test has multiple lines.
 186 EOF
 187 run_test 'mhstore last -part 4 -auto' \
 188   'storing message 11 part 4 as file test4.txt'
 189 check "$expected" test4.txt 'keep first'
 190
 191 # check -noauto, the default
 192 start_test '-noauto, the default'
 193 run_test 'mhstore last -part 4 -auto -noauto' \
 194   'storing message 11 part 4 as file 11.4.txt'
 195 check "$expected" 11.4.txt 'keep first'
 196
 197 # check -verbose, the default
 198 start_test '-verbose, the default'
 199 run_test 'mhstore last -part 4 -noverbose -verbose' \
 200   'storing message 11 part 4 as file 11.4.txt'
 201 check "$expected" 11.4.txt 'keep first'
 202
 203 # check -noverbose
 204 start_test '-noverbose'
 205 run_test 'mhstore last -part 4 -noverbose' ''
 206 check "$expected" 11.4.txt
 207
 208 # check that -auto obeys Content-Disposition header
 209 start_test 'that -auto obeys Content-Disposition header'
 210 cat >"$expected" <<'EOF'
 211 This is the first text/plain part, in a subpart.
 212 EOF
 213 run_test 'mhstore last -part 1.1 -auto' \
 214   'storing message 11 part 1.1 as file test1.txt'
 215 check "$expected" test1.txt
 216
 217 # check -check
 218 start_test '-check'
 219 cat >"$expected" <<'EOF'
 220 This is the second text/plain part.
 221 EOF
 222 run_test 'mhstore last -part 2 -check' \
 223          'storing message 11 part 2 as file 11.2.txt'
 224 check "$expected" 11.2.txt 'keep first'
 225
 226 # check with -check on base64 encoded part
 227 start_test 'with -check on base64 encoded part'
 228 cat >"$expected2" <<'EOF'
 229 This is the fourth text/plain part.
 230 This test has multiple lines.
 231 EOF
 232 run_test 'mhstore last -part 4 -check' \
 233          'storing message 11 part 4 as file 11.4.txt'
 234 check "$expected2" 11.4.txt
 235
 236 # check -check with bad MD5 checksum
 237 start_test '-check with bad MD5 checksum'
 238 sed 's/\(Content-MD5: \)kq+Hnc/\1BADBAD/' "$msgfile" >"$MH_TEST_DIR/$$.tmp"
 239 mv -f "$MH_TEST_DIR/$$.tmp" "$msgfile"
 240 run_test 'mhstore last -part 2 -check' \
 241 'storing message 11 part 2 as file 11.2.txt
 242 mhstore: content integrity suspect (digest mismatch) -- continuing
 243          (content text/plain in message 11, part 2)'
 244 check "$expected" 11.2.txt 'keep first'
 245
 246 # check -nocheck, the default
 247 start_test '-nocheck, the default'
 248 run_test 'mhstore last -part 2 -check -nocheck' \
 249          'storing message 11 part 2 as file 11.2.txt'
 250 check "$expected" 11.2.txt 'keep first'
 251
 252 # check -outfile - with -file
 253 start_test '-outfile - with -file'
 254 run_prog mhstore -noverbose -file `mhpath 11` -part 2 -outfile - >"$actual" 2>&1
 255 check "$expected" "$actual"
 256
 257 # check reassembly of message/partial messages (RFC 1521, 7.3.2)
 258 start_test 'reassembly of message/partial messages (RFC 1521, 7.3.2)'
 259 msgfile=`mhpath new`
 260 cat >"$msgfile" <<'EOF'
 261 To: recipient@example.com
 262 From: sender@example.com
 263 Subject: mhlist test
 264 MIME-Version: 1.0
 265 Content-Type: message/partial; id="test-mhstore message/partial test"; number=1
 266
 267 Content-Type: text/plain; charset="iso-8859-1"
 268
 269 This is part one of three.
 270 EOF
 271
 272 msgfile=`mhpath new`
 273 cat >"$msgfile" <<'EOF'
 274 To: recipient@example.com
 275 From: sender@example.com
 276 Subject: mhlist test
 277 MIME-Version: 1.0
 278 Content-Type: message/partial; id="test-mhstore message/partial test"; number=2
 279
 280 This is part two of three.
 281 EOF
 282
 283 msgfile=`mhpath new`
 284 cat >"$msgfile" <<'EOF'
 285 To: recipient@example.com
 286 From: sender@example.com
 287 Subject: mhlist test
 288 MIME-Version: 1.0
 289 Content-Type: message/partial; id="test-mhstore message/partial test"; number=3;
 290   total=3
 291
 292 This is part three of three.
 293 EOF
 294
 295 run_test 'mhstore last:3' \
 296          'reassembling partials 12,13,14 to folder inbox as message 15'
 297
 298 cat >"$expected" <<'EOF'
 299 This is part one of three.
 300 This is part two of three.
 301 This is part three of three.
 302 EOF
 303 run_test 'mhstore last' 'storing message 15 as file 15.txt'
 304 check "$expected" 15.txt
 305
 306 # cd into Mail directory because it gets cleaned up by the exit trap.
 307 cd Mail
 308
 309 # check -clobber always
 310 start_test '-clobber always'
 311 folder +inbox 7 >/dev/null
 312 touch 7.txt
 313 cat >"$expected" <<'EOF'
 314 This is message number 7
 315 EOF
 316 run_test 'mhstore' 'storing message 7 as file 7.txt'
 317 check "$expected" 7.txt 'keep first'
 318 run_test 'mhstore -clobber ask -clobber always' \
 319          'storing message 7 as file 7.txt'
 320 check "$expected" 7.txt 'keep first'
 321
 322 # check -clobber auto
 323 start_test '-clobber auto'
 324 touch 7.txt
 325 run_test 'mhstore -clobber auto' 'storing message 7 as file 7-1.txt'
 326 check "$expected" 7-1.txt 'keep first'
 327 touch 7-1.txt
 328 run_test 'mhstore -clobber auto' 'storing message 7 as file 7-2.txt'
 329 check "$expected" 7-2.txt 'keep first'
 330
 331 # check -clobber suffix
 332 start_test '-clobber suffix'
 333 run_test 'mhstore -clobber suffix' 'storing message 7 as file 7.txt.1'
 334 check "$expected" 7.txt.1 'keep first'
 335 touch 7.txt.1
 336 run_test 'mhstore -clobber suffix' 'storing message 7 as file 7.txt.2'
 337 check "$expected" 7.txt.2 'keep first'
 338
 339 # Don't check -clobber ask because it requires connection to a
 340 # terminal, and this test won't always be run with one.
 341
 342 # check -clobber never.  Its exit status is the number of files not overwritten.
 343 start_test '-clobber never.  Its exit status is the number of files not overwritten.'
 344 run_test 'mhstore -clobber never' \
 345          "mhstore: will not overwrite $MH_TEST_DIR/Mail/7.txt with -clobber never"
 346 set +e
 347 mhstore -clobber never >/dev/null 2>&1
 348 run_test "echo $?" 1
 349 set -e
 350
 351 cd ..
 352
 353 # check with short relative nmh-storage profile component
 354 start_test 'with short relative nmh-storage profile component'
 355 storagedir=s
 356 dir="$MH_TEST_DIR/Mail/inbox/$storagedir"
 357 mkdir "$dir"
 358 printf '%s\n' "nmh-storage: $storagedir" >>"$MH"
 359 cat >"$expected" <<'EOF'
 360 This is the fourth text/plain part.
 361 This test has multiple lines.
 362 EOF
 363 run_test 'mhstore 11 -part 4' \
 364 "storing message 11 part 4 as file $storagedir/11.4.txt"
 365 check "$expected" "$dir/11.4.txt" 'keep first'
 366 rmdir "$dir"
 367 sed '$d' "$MH" >"$MH.new"
 368 mv "$MH.new" "$MH"
 369
 370 # check with relative nmh-storage profile component
 371 start_test 'with relative nmh-storage profile component'
 372 storagedir=storagedir
 373 dir="$MH_TEST_DIR/Mail/inbox/$storagedir"
 374 mkdir "$dir"
 375 printf '%s\n' "nmh-storage: $storagedir" >>"$MH"
 376 run_test 'mhstore 11 -part 4' \
 377 "storing message 11 part 4 as file $storagedir/11.4.txt"
 378 check "$expected" "$dir/11.4.txt" 'keep first'
 379
 380 # check with relative nmh-storage profile component and -auto
 381 start_test 'with relative nmh-storage profile component and -auto'
 382 run_test 'mhstore 11 -part 4 -auto' \
 383 "storing message 11 part 4 as file $storagedir/test4.txt"
 384 check "$expected" "$dir/test4.txt" 'keep first'
 385
 386 # check with absolute nmh-storage profile component
 387 start_test 'with absolute nmh-storage profile component'
 388 absstoragedir="$MH_TEST_DIR/$storagedir"
 389 mkdir "$absstoragedir"
 390 sed "s%\(nmh-storage: \)storagedir%\1$absstoragedir%" "$MH" >"$MH.new"
 391 mv -f "$MH.new" "$MH"
 392 run_test 'mhstore 11 -part 4' \
 393 "storing message 11 part 4 as file $storagedir/11.4.txt"
 394 check "$expected" "$absstoragedir/11.4.txt" 'keep first'
 395
 396 # check with absolute nmh-storage profile component and -auto
 397 start_test 'with absolute nmh-storage profile component and -auto'
 398 run_test 'mhstore 11 -part 4 -auto' \
 399 "storing message 11 part 4 as file $storagedir/test4.txt"
 400 check "$expected" "$absstoragedir/test4.txt"
 401 rmdir "$absstoragedir"
 402
 403
 404 finish_test
 405 exit $failed