cc-test.sh

   1 #!/bin/sh -
   2 #@ Usage: ./cc-test.sh [--check-only]
   3 #@ XXX Add tests
   4
   5 # NOTE!  UnixWare 7.1.4 gives ISO-10646-Minimum-European-Subset for
   6 # nl_langinfo(CODESET), then, so also overwrite ttycharset.
   7 # (In addition this setup allows us to succeed on TinyCore 4.4 that has no
   8 # other locales than C/POSIX installed by default!)
   9 LC=en_US.UTF-8
  10 LC_ALL=${LC} LANG=${LC}
  11 ttycharset=UTF-8
  12 export LC_ALL LANG ttycharset
  13
  14 MAKE=make
  15 NAIL=./s-nail
  16 CONF=./conf.rc
  17
  18 BODY=./.cc-body.txt
  19 MBOX=./.cc-test.mbox
  20 ESTAT=0
  21
  22 usage() {
  23       echo >&2 "Usage: ./cc-test.sh [--check-only [nail-binary]]"
  24       exit 1
  25 }
  26
  27 CHECK_ONLY=
  28 [ ${#} -gt 0 ] && {
  29    [ "${1}" = --check-only ] || usage
  30    [ ${#} -gt 2 ] && usage
  31    [ ${#} -eq 2 ] && NAIL="${2}"
  32    [ -x "${NAIL}" ] || usage
  33    CHECK_ONLY=1
  34 }
  35
  36 rm -f "${BODY}" "${MBOX}"
  37
  38 # Test all configs TODO doesn't cover all *combinations*, stupid!
  39 cc_all_configs() {
  40    < ${CONF} awk '
  41    BEGIN {i = 0}
  42    /^[[:space:]]*WANT_/ {
  43       sub(/^[[:space:]]*/, "")
  44       sub(/=.*$/, "")
  45       data[i++] = $1
  46    }
  47    END {
  48       for (j = 0; j < i; ++j) {
  49          for (k = 0; k < j; ++k)
  50             printf data[k] "=1 "
  51          for (k = j; k < i; ++k)
  52             printf data[k] "=0 "
  53          printf "\n"
  54          for (k = 0; k < j; ++k)
  55             printf data[k] "=0 "
  56          for (k = j; k < i; ++k)
  57             printf data[k] "=1 "
  58          printf "\n"
  59       }
  60    }
  61    ' | while read c; do
  62       printf "\n\n##########\n$c\n"
  63       printf "\n\n##########\n$c\n" >&2
  64       sh -c "${MAKE} ${c}"
  65       ${MAKE} distclean
  66    done
  67 }
  68
  69 # Test a UTF-8 mail as a whole via -t, and in pieces (without -t ;)
  70 cksum_test() {
  71    tno=$1 f=$2 s=$3
  72    [ "`sed -e '/^From /d' -e '/^Date: /d' \
  73          -e '/^ boundary=/d' -e /^--=_/d < \"${f}\" | \
  74          cksum`" != "${s}" ] && {
  75       ESTAT=1
  76       echo >&2 "Checksum mismatch test ${tno}: ${f}"
  77    }
  78 }
  79
  80 test_mail() {
  81    [ -n "${CHECK_ONLY}" ] || {
  82       printf "\n\n## test_mail() #########################\n\n"
  83       "${MAKE}"
  84    }
  85
  86    # Three tests for MIME-CTE and (a bit) content classification.
  87    # At the same time testing -q FILE, < FILE and -t FILE
  88    rm -f "${MBOX}"
  89    < "${BODY}" MAILRC=/dev/null \
  90    "${NAIL}" -n -Sstealthmua -a "${BODY}" -s "${SUB}" "${MBOX}"
  91    cksum_test 1 "${MBOX}" '2606934084 5649'
  92
  93    rm -f "${MBOX}"
  94    < /dev/null MAILRC=/dev/null \
  95    "${NAIL}" -n -Sstealthmua -a "${BODY}" -s "${SUB}" \
  96       -q "${BODY}" "${MBOX}"
  97    cksum_test 2 "${MBOX}" '2606934084 5649'
  98
  99    rm -f "${MBOX}"
 100    (  echo "To: ${MBOX}" && echo "Subject: ${SUB}" && echo &&
 101       cat "${BODY}"
 102    ) | MAILRC=/dev/null "${NAIL}" -n -Sstealthmua -a "${BODY}" -t
 103    cksum_test 3 "${MBOX}" '799758423 5648'
 104
 105    # Test for [260e19d].  Juergen Daubert.
 106    rm -f "${MBOX}"
 107    echo body | MAILRC=/dev/null "${NAIL}" -n -Sstealthmua "${MBOX}"
 108    cksum_test 4 "${MBOX}" '506144051 104'
 109
 110    # Sending of multiple mails in a single invocation
 111    rm -f "${MBOX}"
 112    (  printf "m ${MBOX}\n~s subject1\nE-Mail Körper 1\n.\n" &&
 113       printf "m ${MBOX}\n~s subject2\nEmail body 2\n.\n" &&
 114       echo x
 115    ) | MAILRC=/dev/null "${NAIL}" -N -n -# -Sstealthmua
 116    cksum_test 5 "${MBOX}" '2028749685 277'
 117 }
 118
 119 printf \
 120 'Ich bin eine DÖS-Datäi mit sehr langen Zeilen und auch '\
 121 'sonst bin ich ganz schön am Schleudern, da kannste denke '\
 122 "wasde willst, gelle, gelle, gelle, gelle, gelle.\r\n"\
 123 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst \r\n"\
 124 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 1\r\n"\
 125 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 12\r\n"\
 126 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 123\r\n"\
 127 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 1234\r\n"\
 128 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 12345\r\n"\
 129 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 123456\r\n"\
 130 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 1234567\r\n"\
 131 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 12345678\r\n"\
 132 "Ich bin eine DÖS-Datäi mit langen Zeilen und auch sonst 123456789\r\n"\
 133 "Unn ausserdem habe ich trailing SP/HT/SP/HT whitespace                 \r\n"\
 134 "Unn ausserdem habe ich trailing HT/SP/HT/SP whitespace          \r\n"\
 135 "auf den zeilen vorher.\r\n"\
 136 "From am Zeilenbeginn und From der Mitte gibt es auch.\r\n"\
 137 ".\r\n"\
 138 "Die letzte Zeile war nur ein Punkt.\r\n"\
 139 "..\r\n"\
 140 "Das waren deren zwei.\r\n"\
 141 " \r\n"\
 142 "Die letzte Zeile war ein Leerschritt.\n"\
 143 "=VIER = EQUAL SIGNS=ON A LINE=\r\n"\
 144 "Prösterchen.\r\n"\
 145 ".\n"\
 146 "Die letzte Zeile war nur ein Punkt, mit Unix Zeilenende.\n"\
 147 "..\n"\
 148 "Das waren deren zwei.  ditto.\n"\
 149 "Prösterchen.\n"\
 150 "Unn ausseerdem habe ich trailing SP/HT/SP/HT whitespace                \n"\
 151 "Unn ausseerdem habe ich trailing HT/SP/HT/SP whitespace                 \n"\
 152 "auf den zeilen vorher.\n"\
 153 "ditto.\n"\
 154 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.\n"\
 155 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.1\n"\
 156 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.12\n"\
 157 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.123\n"\
 158 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.1234"\
 159 "\n"\
 160 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.1234"\
 161 "5\n"\
 162 "Ich bin eine ziemlich lange, steile, scharfe Zeile mit Unix Zeilenende.1234"\
 163 "56\n"\
 164 "=VIER = EQUAL SIGNS=ON A LINE=\n"\
 165 " \n"\
 166 "Die letzte Zeile war ein Leerschritt.\n"\
 167 ' '\
 168  > "${BODY}"
 169
 170 SUB='Äbrä  Kä?dä=brö        Fü?di=bus? '\
 171 'adadaddsssssssddddddddddddddddddddd'\
 172 'ddddddddddddddddddddddddddddddddddd'\
 173 'ddddddddddddddddddddddddddddddddddd'\
 174 'dddddddddddddddddddd Hallelulja? Od'\
 175 'er?? eeeeeeeeeeeeeeeeeeeeeeeeeeeeee'\
 176 'eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee'\
 177 'eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee f'\
 178 'fffffffffffffffffffffffffffffffffff'\
 179 'fffffffffffffffffffff ggggggggggggg'\
 180 'ggggggggggggggggggggggggggggggggggg'\
 181 'ggggggggggggggggggggggggggggggggggg'\
 182 'ggggggggggggggggggggggggggggggggggg'\
 183 'gggggggggggggggg'
 184
 185 [ -n "${CHECK_ONLY}" ] || cc_all_configs
 186 test_mail
 187
 188 [ ${ESTAT} -eq 0 ] && echo Ok || echo >&2 'Errors occurred'
 189 [ -n "${CHECK_ONLY}" ] || "${MAKE}" distclean
 190 rm -f "${BODY}" "${MBOX}"
 191
 192 exit ${ESTAT}
 193 # vim:set fenc=utf8:s-it-mode