diplodocus.org Git - nmh/blob - test/bad-input/test-header

   1 #!/bin/sh
   2 ######################################################
   3 #
   4 # Test bogus headers (no blank line before body, etc.)
   5 #
   6 ######################################################
   7
   8 if test -z "${MH_OBJ_DIR}"; then
   9     srcdir=`dirname "$0"`/../..
  10     MH_OBJ_DIR=`cd "$srcdir" && pwd`; export MH_OBJ_DIR
  11 fi
  12
  13 . "$MH_OBJ_DIR/test/common.sh"
  14
  15 setup_test
  16
  17 thisdir="$srcdir/test/bad-input"
  18 expected="$MH_TEST_DIR/$$.expected"
  19 expected_err="$MH_TEST_DIR/$$.expected_err"
  20 actual="$MH_TEST_DIR/$$.actual"
  21 actual_err="$MH_TEST_DIR/$$.actual_err"
  22
  23 # Write message with bogus header field (missing blank line, really).
  24 msgfile=`mhpath new`
  25 msgnum=`basename $msgfile`
  26 cat > "$msgfile" <<EOF
  27 Date: Sun, 18 Dec 2005 00:52:39 +0100
  28 From: foo@example.edu
  29 To: bar@example.edu
  30 Subject: test
  31 This is a multi-part message in MIME format.
  32
  33 I am a stupid spammer.
  34 EOF
  35
  36 # check scan
  37 cat > "$expected" <<EOF
  38   11  12/18 foo@example.edu    test<<This is a multi-part message in MIME forma
  39 EOF
  40 scan -width 80 $msgnum > "$actual" 2>&1
  41 check "$expected" "$actual"
  42
  43 # check show (mhl)
  44 cat > "$expected" <<EOF
  45 (Message inbox:11)
  46
  47 Date:    Sun, 18 Dec 2005 00:52:39 +0100
  48 To:      bar@example.edu
  49 From:    foo@example.edu
  50 Subject: test
  51
  52
  53 This is a multi-part message in MIME format.
  54
  55 I am a stupid spammer.
  56 EOF
  57 show $msgnum > "$actual" 2>&1
  58 check "$expected" "$actual"
  59
  60 # check mhshow
  61 cat > "$expected" <<EOF
  62 Date:    Sun, 18 Dec 2005 00:52:39 +0100
  63 To:      bar@example.edu
  64 From:    foo@example.edu
  65 Subject: test
  66
  67
  68 part       text/plain                  70
  69
  70 This is a multi-part message in MIME format.
  71
  72 I am a stupid spammer.
  73 EOF
  74 mhshow -nopause $msgnum > "$actual" 2>&1
  75 check "$expected" "$actual"
  76
  77 # check m_getfld() handling of empty header field
  78 cat >"$expected" <<EOF
  79    1  01/12
  80 EOF
  81 cat >"$expected_err" <<EOF
  82 scan: eof encountered in field "Received"
  83 ??Format error (message -1) in component 2
  84 EOF
  85
  86 scan -width 13 -file "$thisdir"/malformed_message.txt >"$actual" 2>"$actual_err"
  87
  88 check "$expected" "$actual"
  89 check "$expected_err" "$actual_err"
  90
  91
  92 exit $failed