diplodocus.org Git - nmh/blob - test/post/test-sendfiles

   1 #!/bin/sh
   2 ######################################################
   3 #
   4 # Test sendfiles
   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 localmbox=`$MH_LIBEXEC_DIR/ap -format "%(localmbox)" 0`
  22 #### Use this script itself for the test file.
  23 testfiledir="$srcdir/test/post"
  24 testfile=`basename $0`
  25
  26 (cd "$MH_TEST_DIR"  &&  mkdir -p tmp)
  27
  28 #### Copy fakesendmail and the testfile because we cd to the
  29 #### test directory, because tar doesn't like absolute paths.
  30 cp "$srcdir/test/fakesendmail" "$testfiledir/$testfile" "$MH_TEST_DIR"
  31
  32 #### Use sendmail/pipe below to override default mts.
  33 mts_fakesendmail="$MHMTSCONF-fakesendmail"
  34 sed -e 's/^mts:.*/mts: sendmail\/pipe/' "$MHMTSCONF" > "$mts_fakesendmail"
  35 printf 'sendmail: %s/fakesendmail\n' "$MH_TEST_DIR" >>"$mts_fakesendmail"
  36 MHMTSCONF="$mts_fakesendmail"
  37
  38 # $1: uncompress command
  39 # $2: argument style:
  40 #   new: -to recipient -subject subject
  41 #   old: recipient subject
  42 # remaining arguments: sendfiles switches
  43 test_sendfiles ()
  44 {
  45   uncompress="$1"; shift
  46   argstyle="$1"; shift
  47
  48   if [ "$argstyle" = 'new' ]; then
  49     (cd "$MH_TEST_DIR"  &&
  50      run_prog sendfiles "$@" -to recipient@example.com \
  51        -subject "sendfiles test" "$testfile" >/dev/null 2>&1)
  52   elif [ "$argstyle" = 'old' ]; then
  53     (cd "$MH_TEST_DIR"  &&
  54      run_prog sendfiles "$@" recipient@example.com "sendfiles test" \
  55        "$testfile" >/dev/null 2>&1)
  56   fi
  57
  58   # fakesendmail drops the message and any cc's into this mbox.
  59   mbox="$MH_TEST_DIR"/Mail/fakesendmail.mbox
  60   inc -silent -file "$mbox"
  61   rm -f "$mbox"
  62
  63   mhlist -verbose last | sed -e 's/ *$//' -e 's/\(octet-stream\).*$/\1/' \
  64     >"$actual"
  65   (cd $MH_TEST_DIR/tmp  &&
  66    contents=`mhstore -noauto last 2>&1 | \
  67              sed -e 's/storing message.*as file //'`  &&
  68    $uncompress <"$contents" | tar xpf -  &&  rm -f "$contents")
  69
  70   rmm last
  71   check "$testfiledir/$testfile" "$MH_TEST_DIR/tmp/$testfile" \
  72         'keep first'
  73
  74   [ -f "$expected" ]  &&  check "$expected" "$actual"  ||  rm -f "$actual"
  75 }
  76
  77
  78 # check -help
  79 cat >"$expected" <<EOF
  80 Usage: sendfiles [switches] -to recipient -subject subject file1 [file2 ...]
  81   or
  82        sendfiles [switches] recipient subject file1 [file2 ...]
  83   switches are:
  84   -compress [bzip2 | compress | gzip | lzma | none]
  85   -from <sender>
  86   -[delay] <delay> (expressed in seconds)
  87   -version
  88   -help
  89   Can use PERSON environment variable instead of -from switch.
  90 EOF
  91
  92 #### Skip nmh intro text.
  93 run_prog sendfiles -help | sed '/^$/,$d' >"$actual" 2>&1
  94 check "$expected" "$actual"
  95
  96 # check -version
  97 case `sendfiles -v` in
  98   sendfiles\ --*) ;;
  99   *           ) printf '%s: sendfiles -v generated unexpected output\n' "$0" >&2
 100                 failed=`expr ${failed:-0} + 1`;;
 101 esac
 102
 103 # check unknown switch
 104 run_test 'sendfiles -nonexistent' "Usage: sendfiles [switches] -to recipient \
 105 -subject subject file1 [file2 ...]
 106   or
 107        sendfiles [switches] recipient subject file1 [file2 ...]
 108   switches are:
 109   -compress [bzip2 | compress | gzip | lzma | none]
 110   -from <sender>
 111   -[delay] <delay> (expressed in seconds)
 112   -version
 113   -help
 114   Can use PERSON environment variable instead of -from switch."
 115
 116 # check unknown compression method
 117 run_test 'sendfiles -compress unknown to subject file' \
 118 'sendfiles: unknown compression method "unknown"'"
 119 Usage: sendfiles [switches] -to recipient \
 120 -subject subject file1 [file2 ...]
 121   or
 122        sendfiles [switches] recipient subject file1 [file2 ...]
 123   switches are:
 124   -compress [bzip2 | compress | gzip | lzma | none]
 125   -from <sender>
 126   -[delay] <delay> (expressed in seconds)
 127   -version
 128   -help
 129   Can use PERSON environment variable instead of -from switch."
 130
 131 # Check basic operation, using specified compression method.
 132 # Don't check the mhlist output, by not creating an $expected file,
 133 # because it will vary with compression method and compressed file
 134 # size.
 135 [ "`findprog bzip2`" ]     &&  test_sendfiles 'bzip2 -cd' new -compress bzip2
 136 [ "`findprog compress`" ]  &&  test_sendfiles 'uncompress -c' new \
 137                                               -compress compress
 138 [ "`findprog gzip`" ]      &&  test_sendfiles 'gzip -cd' new -compress gzip
 139 [ "`findprog gzip`" ]      &&  test_sendfiles 'gzip -cd' new -gzip
 140 [ "`findprog lzma`" ]      &&  test_sendfiles 'lzma -cd' new -compress lzma
 141
 142 # check with no compression
 143 cat >"$expected" <<EOF
 144  msg part  type/subtype              size description
 145   11       application/octet-stream
 146              type="tar"
 147              (extract with cat | tar xvpf -)
 148 EOF
 149
 150 test_sendfiles cat new -compress none
 151
 152 # check with no compression, -none
 153 cat >"$expected" <<EOF
 154  msg part  type/subtype              size description
 155   11       application/octet-stream
 156              type="tar"
 157              (extract with cat | tar xvpf -)
 158 EOF
 159
 160 test_sendfiles cat new -none
 161
 162 # check old argument style (without -to and -subject)
 163 cat >"$expected" <<EOF
 164  msg part  type/subtype              size description
 165   11       application/octet-stream
 166              type="tar"
 167              (extract with cat | tar xvpf -)
 168 EOF
 169
 170 test_sendfiles cat old -compress none
 171
 172 # check -from
 173 cat >"$expected" <<EOF
 174  msg part  type/subtype              size description
 175   11       application/octet-stream
 176              type="tar"
 177              (extract with cat | tar xvpf -)
 178 EOF
 179
 180 test_sendfiles cat new -compress none -from 'Sender <sender@example.com>'
 181
 182 # check PERSON environment variable
 183 cat >"$expected" <<EOF
 184  msg part  type/subtype              size description
 185   11       application/octet-stream
 186              type="tar"
 187              (extract with cat | tar xvpf -)
 188 EOF
 189
 190 PERSON='Sender <sender@example.com>' test_sendfiles cat new -compress none
 191
 192 # check -delay, though for a small file it doesn't do anything
 193 cat >"$expected" <<EOF
 194  msg part  type/subtype              size description
 195   11       application/octet-stream
 196              type="tar"
 197              (extract with cat | tar xvpf -)
 198 EOF
 199
 200 test_sendfiles cat new -compress none -delay 5
 201
 202 # check old style -delay, though for a small file it doesn't do anything
 203 cat >"$expected" <<EOF
 204  msg part  type/subtype              size description
 205   11       application/octet-stream
 206              type="tar"
 207              (extract with cat | tar xvpf -)
 208 EOF
 209
 210 test_sendfiles cat new -compress none -5
 211
 212 rm -fr "$MH_TEST_DIR/fakesendmail" "$MH_TEST_DIR/$testfile" "$MH_TEST_DIR/tmp"
 213
 214
 215 exit ${failed:-0}