diplodocus.org Git - nmh/blob - test/rcv/test-rcvpack

   1 #!/bin/sh
   2 ######################################################
   3 #
   4 # Test rcvpack
   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 # Use proper program, likely not the first one on PATH.
  20 rcvpack="${MH_LIBEXEC_DIR}/rcvpack"
  21
  22 check_exit '-eq 1' $rcvpack -
  23
  24 expected="$MH_TEST_DIR/$$.expected"
  25 actual="$MH_TEST_DIR/$$.actual"
  26
  27
  28 # check -help
  29 cat >"$expected" <<EOF
  30 Usage: rcvpack [switches] file
  31   switches are:
  32   -mbox
  33   -mmdf
  34   -version
  35   -help
  36 EOF
  37
  38 #### Skip nmh intro text.
  39 run_prog "$rcvpack" -help | sed '/^$/,$d' >"$actual" 2>&1
  40 check "$expected" "$actual"
  41
  42 # check -version
  43 case `$rcvpack -v` in
  44   rcvpack\ --*) ;;
  45   *           ) printf '%s: rcvpack -v generated unexpected output\n' "$0" >&2
  46                 failed=`expr ${failed:-0} + 1`;;
  47 esac
  48
  49 # check unknown switch
  50 run_test "$rcvpack -nonexistent" 'rcvpack: -nonexistent unknown'
  51
  52 # check with no switches
  53 run_test "$rcvpack" 'rcvpack: rcvpack [switches] file'
  54
  55 # check mbox creation
  56 run_prog $rcvpack <${MH_TEST_DIR}/Mail/inbox/1 ${MH_TEST_DIR}/Mail/mbox
  57 inc -file ${MH_TEST_DIR}/Mail/mbox -silent
  58 check "${MH_TEST_DIR}/Mail/inbox/1" "${MH_TEST_DIR}/Mail/inbox/11" 'keep first'
  59
  60 # check -mbox
  61 run_prog $rcvpack -mmdf -mbox ${MH_TEST_DIR}/Mail/mbox2 \
  62   <${MH_TEST_DIR}/Mail/inbox/1
  63 # Filter out "From " lines because their timestamps can differ by a second.
  64 grep -v '^From ' "${MH_TEST_DIR}/Mail/mbox" >"${MH_TEST_DIR}/Mail/mbox-filt"
  65 grep -v '^From ' "${MH_TEST_DIR}/Mail/mbox2" >"${MH_TEST_DIR}/Mail/mbox2-filt"
  66 check "${MH_TEST_DIR}/Mail/mbox-filt" "${MH_TEST_DIR}/Mail/mbox2-filt"
  67
  68 # check append to existing mbox file
  69 run_prog $rcvpack <${MH_TEST_DIR}/Mail/inbox/2 ${MH_TEST_DIR}/Mail/mbox
  70 inc -file ${MH_TEST_DIR}/Mail/mbox -silent
  71 check "${MH_TEST_DIR}/Mail/inbox/2" "${MH_TEST_DIR}/Mail/inbox/12" 'keep first'
  72
  73 # check -mmdf
  74 run_prog $rcvpack -mmdf <${MH_TEST_DIR}/Mail/inbox/3 ${MH_TEST_DIR}/Mail/mmdf
  75 inc -file ${MH_TEST_DIR}/Mail/mmdf -silent
  76 check "${MH_TEST_DIR}/Mail/inbox/3" "${MH_TEST_DIR}/Mail/inbox/12" 'keep first'
  77
  78 # check append to existing mmdf file
  79 run_prog $rcvpack -mmdf <${MH_TEST_DIR}/Mail/inbox/4 ${MH_TEST_DIR}/Mail/mmdf
  80 inc -file ${MH_TEST_DIR}/Mail/mmdf -silent
  81 check "${MH_TEST_DIR}/Mail/inbox/4" "${MH_TEST_DIR}/Mail/inbox/13" 'keep first'
  82
  83
  84 exit ${failed:-0}