#! /bin/sh

if [ $# -lt 3 ]
then
	cat 1>&2 << EOF
Usage: sendmail <mail_from> <rcpt_to> <subject> | nc <server> 25
EOF
	exit 1
fi

mail_from=$1 
shift
rcpt_to=$1
shift
subject=$@

slowcat()
{
	cat 1>&2 << EOF

<<>> PROCEEDING <<>>

T...:...T1....:.T..2....T....3..T.:....4T...:...T5....:.T..6....T....7..T.:....8

EOF
	while read line
	do
		echo $line
		sleep 0.3
	done
}

cat 1>&2 << EOF
<<>> HEADER INFORMATION <<>>

From:     $mail_from
Reply-To: $mail_from
To:       $rcpt_to
Subject:  $subject

<<>> ENTER BODY <<>> Send with Control-D, exit with Control-C <<>>

T...:...T1....:.T..2....T....3..T.:....4T...:...T5....:.T..6....T....7..T.:....8

EOF

slowcat << EOF
HELO $(hostname)
MAIL from: $mail_from
RCPT to: $rcpt_to
DATA
From: $mail_from
Reply-To: $mail_from
To: $rcpt_to
Subject: $subject

$(cat)
.
QUIT
EOF

cat 1>&2 << EOF

T...:...T1....:.T..2....T....3..T.:....4T...:...T5....:.T..6....T....7..T.:....8

<<>> BYE <<>>
EOF

exit 0