+
+check_for_hard_links () {
+ set +e
+
+ printf '' > "${MH_TEST_DIR}/$$-1"
+ if link "${MH_TEST_DIR}/$$-1" "${MH_TEST_DIR}/$$-2" 2>/dev/null; then
+ hard_links_supported=1
+ else
+ hard_links_supported=0
+ fi
+ rm -f "${MH_TEST_DIR}/$$-1" "${MH_TEST_DIR}/$$-2"
+
+ set -e
+}
+
+#### check() requires two arguments, each the name of a file to be
+#### diff'ed.
+#### If the same, the second file is removed. And the first file is
+#### removed unless the optional third argument has a value of
+#### 'keep first'.
+#### If different, global variable "failed" is incremented.
+check() {
+ #### POSIX diff should support -c.
+ if diff -c "$1" "$2"; then
+ test $# -lt 3 -o "$3" != 'keep first' && rm -f "$1"
+ rm -f "$2"
+ else
+ echo "$0: test failed, outputs are in $1 and $2."
+ failed=`expr ${failed:-0} + 1`
+ fi
+}
+
+#### run_test() requires two arguments, the first is a program and
+#### arguments, the second is its expected one-line output string.
+#### If the actual output does not match that string:
+#### an error message is printed and global variable "failed" is incremented;
+#### if there is an optional third argument, it is used in the error message.
+run_test() {
+ set +e
+ actual_output=`$1 2>&1`
+ set -e
+ if test x"$actual_output" != x"$2"; then
+ echo "$0: ${3:-\"$1\"} expected:" 1>&2
+ echo " '$2'" 1>&2
+ echo "but instead got:" 1>&2
+ echo " '$actual_output'" 1>&2
+ failed=`expr ${failed:-0} + 1`
+ fi
+}
+
+setup_test ()
+{
+ MH="${MH_TEST_DIR}/Mail/.mh_profile"
+ MHMTSCONF="${MH_INST_DIR}${sysconfdir}/mts.conf"
+ PATH="${MH_INST_DIR}${bindir}:${PATH}"
+ MH_LIB_DIR="${MH_INST_DIR}${auxexecdir}"
+ export MH MHMTSCONF MH_LIB_DIR PATH
+
+ #
+ # Only install once
+ #
+ if [ -d "${MH_INST_DIR}${bindir}" ]; then
+ :
+ else
+ (cd "${MH_OBJ_DIR}" &&
+ make DESTDIR="${MH_INST_DIR}" SETGID_MAIL= install) ||
+ exit 1
+
+ #### Don't test with sendmail because it would really send the
+ #### mail. If configured to use sendmail, change to smtp instead
+ #### so that we use fakesmtp.
+ #### And set up the maildrop in the test directory so tests don't
+ #### use the user's real maildrop.
+ sed -e 's/mts: *.*/mts: smtp/' \
+ -e "s%mmdfldir: *.*%mmdfldir: ${MH_TEST_DIR}/Mail%" \
+ -e 's%mmdflfil: *.*%mmdflfil: maildrop%' \
+ "${MHMTSCONF}" >"${MHMTSCONF}.new"
+ mv -f "${MHMTSCONF}.new" "${MHMTSCONF}"
+ fi
+
+ # clean old test data
+ trap "rm -rf '$MH_TEST_DIR/Mail'" 0
+ # setup test data
+ mkdir "$MH_TEST_DIR/Mail" || exit 1
+ cat > "$MH" <<EOF || exit 1
+Path: ${MH_TEST_DIR}/Mail
+buildmimeproc: ${MH_INST_DIR}${bindir}/mhbuild
+fileproc: ${MH_INST_DIR}${bindir}/refile
+libdir: ${MH_LIB_DIR}
+mhbuild: -nocontentid
+mhlproc: ${MH_LIB_DIR}/mhl
+moreproc: cat
+postproc: ${MH_LIB_DIR}/post
+showproc: ${MH_LIB_DIR}/mhl
+EOF
+
+ for f in MailAliases components digestcomps distcomps forwcomps mhl.body \
+ mhl.digest mhl.format mhl.forward mhl.headers mhl.reply \
+ mhn.defaults rcvdistcomps replcomps replgroupcomps scan.MMDDYY \
+ scan.YYYYMMDD scan.default scan.mailx scan.nomime scan.size \
+ scan.time scan.timely scan.unseen
+ do
+ cp "${MH_INST_DIR}${sysconfdir}/${f}" "${MH_TEST_DIR}/Mail" || exit 1
+ done
+
+ folder -create +inbox > /dev/null
+ # create 10 basic messages
+ for i in 1 2 3 4 5 6 7 8 9 10;
+ do
+ cat > $MH_TEST_DIR/Mail/inbox/$i <<EOF || exit 1
+From: Test$i <test$i@example.com>
+To: Some User <user@example.com>
+Date: Fri, 29 Sep 2006 00:00:00
+Subject: Testing message $i
+
+This is message number $i
+EOF
+ done
+}