3 # mhmail -- simple mail program
5 # This code is Copyright (c) 2012, by the authors of nmh. See the
6 # COPYRIGHT file in the root directory of the nmh distribution for
7 # complete copyright information.
9 # Emulation of compiled mhmail(1), with these differences:
10 # * Instead of silently not sending an empty message, notifies user
11 # "mhmail: empty message not sent, use -body '' to force."
12 # * The compiled mhmail dropped a trailing newline from the -body argument.
13 # * Supports all post(8) (by default, without -profile) or send(1)
14 # (with -profile) options.
15 # * Optionally (with -profile) obeys the users profile, including
16 # AliasFile and send entries.
17 # * Adds -debug option for debugging (sending, not incorporating new mail).
18 # * Drops support for undocumented -queue option.
21 # * fix -resent with -profile
22 # * rename -debug to -nosend and add -send (and note in doc that last one takes)
23 # * add -attach file ... switch
25 usage='Usage: mhmail [addrs ... [switches]]
36 and all post(8)/send(1) switches'
39 nmhbindir=`cd "${bindir}" && pwd`
42 #### Emulate mhmail for reading mail.
43 exec "${nmhbindir}"/inc
45 #### Go through all the switches so we can build the draft.
66 #### Post and send won't accept -f -or -s because they'd be
67 #### ambiguous, so no conflicts with them. And they don't have
68 #### -b, -c, or -r. For the new switches that compiled mhmail
69 #### didn't have: let -p indicate mhmail -profile, not send
70 #### -port, and let -d indicate mhmail -debug, not send -draft.
71 -b|-bo|-bod|-body) bodyarg=1 ;;
73 -d|-de|-deb|-debu|-debug) debug=echo ;;
74 -f|-fr|-fro|-from) fromarg=1 ;;
75 -h|-he|-hel|-help) printf "%s\n" "${usage}"; exit ;;
76 -p|-pr|-pro|-prof|-profi|-profil|-profile) use_send=1 ;;
77 -resend) printf "mhmail: did you mean -resent instead of -resend?\n" 1>&2
79 -r|-re|-res|-rese|-resen|-resent) resent=1 ;;
80 -s|-su|-sub|-subj|-subje|-subjec|-subject) subjectarg=1 ;;
81 -v|-ve|-ver|-vers|-versi|-versio|-version)
82 #### Cheat instead of using autoconf and make to fill in the version.
83 "${nmhbindir}"/mhpath -v | sed 's/mhpath/mhmail/'; exit ;;
84 -*) postsendargs="${postsendargs:+${postsendargs} }${arg}"; switcharg=1 ;;
85 *) if [ ${bodyarg} -eq 1 ]; then
88 #### Allow -body "" by using just a newline for the body.
89 [ "${body}"x = x ] && body='
91 elif [ ${fromarg} -eq 1 ]; then
92 from="${arg}"; fromarg=0
93 elif [ ${subjectarg} -eq 1 ]; then
94 subject="${arg}"; subjectarg=0
95 elif [ ${switcharg} -eq 1 ]; then
96 postsendargs="${postsendargs:+${postsendargs} }${arg}"
97 elif [ ${ccarg} -eq 1 ]; then
98 #### Never reset ccarg to 0, for compatibilty with compiled mhmail.
99 cclist="${cclist:+${cclist}, }${arg}"
102 tolist="${tolist:+${tolist}, }${arg}"
107 #### Check for at least one address and -from.
108 if [ "${tolist}"x = x ]; then
109 printf "mhmail: usage: mhmail addrs ... [switches]\n"
112 if [ "${from}"x = x ]; then
113 nmhlibdir=`${nmhbindir}/mhparam libdir`/
114 #### If nmhlibdir isn't right, assume that the nmh lib dir is on the PATH.
115 [ -x "${nmhlibdir}ap" ] || nmhlibdir=
116 from=`${nmhlibdir}ap -format '%(localmbox)' 0`
120 [ ${resent} -eq 0 ] && prefix= || prefix='Resent-'
121 header="${prefix}To: ${tolist}
123 [ "${cclist}"x = x ] || header="${header}${prefix}Cc: ${cclist}
125 [ "${subject}"x = x ] || header="${header}${prefix}Subject: ${subject}
127 [ "${from}"x = x ] || header="${header}${prefix}From: ${from}
130 #### Set up a file to supply as a draft to send/post. And set a
131 #### trap to remove it. send moves the file to a backup, so it will
132 #### remove that, too.
134 tmpdir="${MHTMPDIR:-${TMPDIR:-${TMP:-`${nmhbindir}/mhpath +`}}}"
135 tmpfil="${tmpdir}/mhmail$$"
136 tmpfilbackup="${tmpdir}/[,#]mhmail$$"
137 trap 'rm -f '"${tmpfil}"' '"${tmpfilbackup}" EXIT
139 if [ ${resent} -eq 0 ]; then
140 #### Add blank line after header if not resending.
144 if [ "$use_send" -eq 0 ]; then
145 postsendargs="${postsendargs:+${postsendargs} }-dist"
147 mhdist=1; export mhdist
148 mhaltmsg=${tmpfil}; export mhaltmsg
149 #### This doesn't work, I'm not sure about mhaltmsg.
150 printf "mhmail: -resent not currently supported with -profile\n"
155 if [ "${body}"x = x ]; then
156 #### First put message header in the file. cat >> handles blank
157 #### lines better than body=`cat`.
158 printf "%s" "${header}" > "${tmpfil}" || exit 1
160 tmpfile_size_before=`wc -c "${tmpfil}"`
161 #### Now grab the body from stdin.
163 tmpfile_size_after=`wc -c "${tmpfil}"`
165 #### Don't allow an empty body (from stdin). Use string
166 #### comparison so we don't have to strip the filename, etc.
167 if [ "${tmpfile_size_before}" = "${tmpfile_size_after}" ]; then
168 printf "mhmail: empty message not sent, use -body '' to force.\n" 1>&2
172 #### Add trailing newline to body if it doesn't have one.
173 [ `printf "${body}" | tail -n 1 | wc -l` -ne 1 ] && body="${body}
176 #### Put message header and body in the file.
177 printf "%s" "${header}${body}" > "${tmpfil}" || exit 1
180 if [ "${debug}" ]; then
181 printf "%s:\n" `ls -1 "${tmpfil}"`
185 if [ "$use_send" -eq 0 ]; then
186 post_or_send=`${nmhbindir}/mhparam postproc`
188 post_or_send="${nmhbindir}/send"
193 if $debug "${post_or_send}" "${tmpfil}" ${postsendargs}; then
196 printf "Letter saved in dead.letter\n"
197 #### exec skips the trap set above.
198 exec mv "${tmpfil}" dead.letter