X-Git-Url: http://git.marmaro.de/?a=blobdiff_plain;f=uip%2Fsend.c;h=07f25457480898b665de0f990afac7637b4f6147;hb=8ab7ca4f2b4caa1f1ed2859d7d911513a7b2b2a2;hp=0660e9588a376d52f640b0be4a4a81785ec06c03;hpb=ca0b3e830b86700d9e5e31b1784de2bdcaf58fc5;p=mmh

diff --git a/uip/send.c b/uip/send.c
index 0660e95..07f2545 100644
--- a/uip/send.c
+++ b/uip/send.c
@@ -11,10 +11,11 @@
 #include <errno.h>
 #include <signal.h>
 #include <h/signals.h>
-#include <setjmp.h>
 #include <h/mime.h>
 #include <h/tws.h>
 #include <h/utils.h>
+#include <sysexits.h>
+#include <sys/wait.h>
 
 #ifdef HAVE_SYS_TIME_H
 # include <sys/time.h>
@@ -22,12 +23,10 @@
 #include <time.h>
 
 int debugsw = 0;  /* global */
-char *altmsg   = NULL;
+char *altmsg = NULL;
 char *annotext = NULL;
 char *distfile = NULL;
 
-static jmp_buf env;
-
 /* name of temp file for body content */
 static char body_file_name[MAXPATHLEN + 1];
 /* name of mhbuild composition temporary file */
@@ -42,13 +41,14 @@ static FILE *composition_file;  /* composition file pointer */
 ** static prototypes
 */
 static int sendsbr(char **, int, char *, struct stat *);
-static void armed_done(int) NORETURN;
 static void anno(struct stat *);
 static int sendaux(char **, int, char *, struct stat *);
 static int attach(char *);
+static int signandenc(char *);
 static void clean_up_temporary_files(void);
 static int get_line(void);
 static void make_mime_composition_file_entry(char *);
+static char* strexit(int status);
 
 
 static struct swit switches[] = {
@@ -69,7 +69,7 @@ static struct swit switches[] = {
 int
 main(int argc, char **argv)
 {
-	int msgp = 0, nfiles = 0, distsw = 0, vecp = 1;
+	int nmsgs = 0, nfiles = 0, distsw = 0, vecp = 1;
 	int msgnum, status;
 	int in, out;
 	int n;
@@ -95,7 +95,7 @@ main(int argc, char **argv)
 			switch (smatch(++cp, switches)) {
 			case AMBIGSW:
 				ambigsw(cp, switches);
-				done(1);
+				exit(1);
 			case UNKWNSW:
 				adios(NULL, "-%s unknown\n", cp);
 
@@ -104,10 +104,10 @@ main(int argc, char **argv)
 						"%s [file] [switches]",
 						invo_name);
 				print_help(buf, switches, 1);
-				done(1);
+				exit(0);
 			case VERSIONSW:
 				print_version(invo_name);
-				done(1);
+				exit(0);
 
 			case DEBUGSW:
 				debugsw++;
@@ -121,43 +121,47 @@ main(int argc, char **argv)
 			if (*cp == '/') {
 				files[nfiles++] = cp;
 			} else {
-				msgs[msgp++] = cp;
+				msgs[nmsgs++] = cp;
 			}
 		}
 	}
 
-	if (!msgp && !nfiles) {
-		msgs[msgp++] = seq_cur;
-	}
-	maildir = toabsdir(draftfolder);
-
-	if (chdir(maildir) == NOTOK) {
-		adios(maildir, "unable to change directory to");
+	if (!nmsgs && !nfiles) {
+		msgs[nmsgs++] = seq_cur;
 	}
 
-	if (!(mp = folder_read(draftfolder))) {
-		adios(NULL, "unable to read draft folder %s", draftfolder);
-	}
-	if (mp->nummsg == 0) {
-		adios(NULL, "no messages in draft folder %s", draftfolder);
-	}
-	/* parse all the message ranges/sequences and set SELECTED */
-	for (msgnum = 0; msgnum < msgp; msgnum++) {
-		if (!m_convert(mp, msgs[msgnum])) {
-			done(1);
+	if (nmsgs) {
+		maildir = toabsdir(draftfolder);
+		if (chdir(maildir) == NOTOK) {
+			adios(maildir, "unable to change directory to");
 		}
-	}
-	seq_setprev(mp);
+		if (!(mp = folder_read(draftfolder))) {
+			adios(NULL, "unable to read draft folder %s",
+					draftfolder);
+		}
+		if (mp->nummsg == 0) {
+			adios(NULL, "no messages in draft folder %s",
+					draftfolder);
+		}
+		/* parse all the msgranges/sequences and set SELECTED */
+		for (msgnum = 0; msgnum < nmsgs; msgnum++) {
+			if (!m_convert(mp, msgs[msgnum])) {
+				exit(1);
+			}
+		}
+		seq_setprev(mp);
 
-	for (msgp = 0, msgnum = mp->lowsel; msgnum <= mp->hghsel; msgnum++) {
-		if (is_selected(mp, msgnum)) {
-			files[nfiles++] = getcpy(m_name(msgnum));
-			unset_exists(mp, msgnum);
+		for (nmsgs = 0, msgnum = mp->lowsel;
+				msgnum <= mp->hghsel; msgnum++) {
+			if (is_selected(mp, msgnum)) {
+				files[nfiles++] = getcpy(m_name(msgnum));
+				unset_exists(mp, msgnum);
+			}
 		}
-	}
 
-	mp->msgflags |= SEQMOD;
-	seq_save(mp);
+		mp->msgflags |= SEQMOD;
+		seq_save(mp);
+	}
 
 	if (!(cp = getenv("SIGNATURE")) || !*cp) {
 		if ((cp = context_find("signature")) && *cp) {
@@ -165,9 +169,9 @@ main(int argc, char **argv)
 		}
 	}
 
-	for (msgnum = 0; msgnum < nfiles; msgnum++) {
-		if (stat(files[msgnum], &st) == NOTOK) {
-			adios(files[msgnum], "unable to stat draft file");
+	for (n = 0; n < nfiles; n++) {
+		if (stat(files[n], &st) == NOTOK) {
+			adios(files[n], "unable to stat draft file");
 		}
 	}
 
@@ -206,10 +210,10 @@ main(int argc, char **argv)
 		close(n);
 	}
 
-	for (msgnum = 0; msgnum < nfiles; msgnum++) {
-		switch (sendsbr(vec, vecp, files[msgnum], &st)) {
+	for (n = 0; n < nfiles; n++) {
+		switch (sendsbr(vec, vecp, files[n], &st)) {
 		case DONE:
-			done(++status);
+			exit(++status);
 		case NOTOK:
 			status++;  /* fall */
 		case OK:
@@ -218,8 +222,7 @@ main(int argc, char **argv)
 	}
 
 	context_save();
-	done(status);
-	return 1;
+	return status;
 }
 
 
@@ -229,8 +232,7 @@ main(int argc, char **argv)
 static int
 sendsbr(char **vec, int vecp, char *drft, struct stat *st)
 {
-	int status;
-	char buffer[BUFSIZ];
+	int status, dupfd;
 	char *original_draft;
 
 	/*
@@ -261,19 +263,39 @@ sendsbr(char **vec, int vecp, char *drft, struct stat *st)
 		break;
 	}
 
-	done=armed_done;
-	switch (setjmp(env)) {
+	/*
+	** Sign and encrypt the message as needed.
+	** Use the mhbuild composition file for the draft if there was
+	** a successful conversion because that now contains the MIME
+	** message.  A nice side effect of this is that it leaves the
+	** original draft file untouched so that it can be retrieved
+	** and modified if desired.
+	*/
+	switch (signandenc(drft)) {
 	case OK:
-		status = sendaux(vec, vecp, drft, st) ? NOTOK : OK;
-		if (status == OK) {
-			/* move original draft to +trash folder */
-			snprintf(buffer, sizeof buffer,
-					"</dev/null refile -file %s +trash",
-					original_draft);
-			if (system(buffer) != 0) {
-				advise(NULL, "unable to trash the draft");
-			}
+		drft = composition_file_name;
+		break;
+
+	case NOTOK:
+		return (NOTOK);
+
+	case DONE:
+		break;
+	}
+
+	switch (sendaux(vec, vecp, drft, st)) {
+	case OK:
+		/* move original draft to +trash folder */
+		/* temporary close stdin, for refile not to ask */
+		dupfd = dup(0);
+		close(0);
+		if (execprogl("refile", "refile", "-file",
+				original_draft, "+trash",
+				(char *)NULL) != 0) {
+			advise(NULL, "unable to trash the draft");
 		}
+		dup2(dupfd, 0);
+		close(dupfd);
 		break;
 
 	default:
@@ -281,7 +303,6 @@ sendsbr(char **vec, int vecp, char *drft, struct stat *st)
 		break;
 	}
 
-	done=exit;
 	if (distfile) {
 		unlink(distfile);
 	}
@@ -404,9 +425,7 @@ attach(char *draft_file_name)
 	while (get_line() != EOF && *field && *field != '-') {
 		if (strncasecmp(field, attach_hdr, length) == 0 &&
 				field[length] == ':') {
-			for (p = field+length+1; *p==' ' || *p=='\t'; p++) {
-				continue;
-			}
+			p = trim(field+length+1);
 			if (*p == '+') {
 				/* forwarded message */
 				fprintf(composition_file, "#forw [forwarded message(s)] %s\n", p);
@@ -419,8 +438,8 @@ attach(char *draft_file_name)
 	fclose(composition_file);
 
 	/* We're ready to roll! */
-	sprintf(buf, "mhbuild %s", composition_file_name);
-	if (system(buf) != 0) {
+	if (execprogl("mhbuild", "mhbuild", composition_file_name,
+			(char *)NULL) != 0) {
 		/* some problem */
 		clean_up_temporary_files();
 		return (NOTOK);
@@ -434,6 +453,59 @@ attach(char *draft_file_name)
 	return (OK);
 }
 
+static int
+signandenc(char *draft_file_name)
+{
+	char buf[BUFSIZ];
+	int dosign = 0;
+	int doenc = 0;
+	int ret;
+
+	if (!(draft_file = fopen(draft_file_name, "r"))) {
+		adios(NULL, "can't open draft file `%s'.", draft_file_name);
+	}
+
+	/* We'll grow the buffer as needed. */
+	field = (char *)mh_xmalloc(field_size = 256);
+
+	/* Scan the draft file for an attachment header field name. */
+	while (get_line() != EOF && *field != '\0' && *field != '-') {
+		if (strncasecmp(field, sign_hdr, strlen(sign_hdr))==0 &&
+				field[strlen(sign_hdr)] == ':') {
+			dosign = 1;
+		}
+		if (strncasecmp(field, enc_hdr, strlen(enc_hdr))==0 &&
+				field[strlen(enc_hdr)] == ':') {
+			doenc = 1;
+		}
+	}
+	if (!dosign && !doenc) {
+		return DONE;
+	}
+
+	strcpy(composition_file_name, draft_file_name);
+
+	/* We're ready to roll! */
+	if (doenc) {
+		ret = execprogl("mhsign", "mhsign", "-m", "-e",
+				draft_file_name, (char *)NULL);
+	} else {
+		ret = execprogl("mhsign", "mhsign", "-m",
+				draft_file_name, (char *)NULL);
+	}
+	if (ret != 0) {
+		/* some problem */
+		return (NOTOK);
+	}
+	/* Remove the automatically created backup of mhsign. */
+	snprintf(buf, sizeof buf, "%s.orig", draft_file_name);
+	if (unlink(buf) == -1) {
+		advise(NULL, "unable to remove original draft file.");
+	}
+
+	return (OK);
+}
+
 static void
 clean_up_temporary_files(void)
 {
@@ -481,6 +553,7 @@ make_mime_composition_file_entry(char *file_name)
 	char content_type[BUFSIZ];
 	char cmdbuf[BUFSIZ];
 	char *cmd = mimetypequeryproc;
+	int semicolon = 0;
 
 	for (np = m_defs; np; np = np->n_next) {
 		if (strcasecmp(np->n_name, mimetypequery)==0) {
@@ -511,11 +584,23 @@ make_mime_composition_file_entry(char *file_name)
 		adios(NULL, "unable to access file `%s'", file_name);
 	}
 
-	cp = (!(cp = strrchr(file_name, '/'))) ? file_name : cp + 1;
-	fprintf(composition_file, "#%s; name=\"%s\" <> [%s] {attachment}",
-			content_type, cp, cp);
+	/* Check for broken file(1). See man page mh-profile(5). */
+	for (cp=content_type; *cp; cp++) {
+		if (isspace(*cp)) {
+			if (!semicolon) {
+				adios(NULL, "Sorry, your Mime-Type-Query command (%s) is broken.\n\tThe output misses a semicolon before the whitespace.\n\tOutput was: %s", cmd, content_type);
+			}
+		} else if (*cp == ';') {
+			semicolon = 1;
+		} else {
+			semicolon = 0;
+		}
+	}
 
-	fprintf(composition_file, " %s\n", file_name);
+	cp = (!(cp = strrchr(file_name, '/'))) ? file_name : cp + 1;
+	fprintf(composition_file,
+			"#%s; name=\"%s\" <> [%s] {attachment} %s\n",
+			content_type, cp, cp, file_name);
 
 	return;
 }
@@ -533,15 +618,15 @@ sendaux(char **vec, int vecp, char *drft, struct stat *st)
 
 	vec[vecp++] = drft;
 	if (distfile && distout(drft, distfile, backup) == NOTOK) {
-		done(1);
+		return DONE;
 	}
 	vec[vecp] = NULL;
 
 	switch (child_id = fork()) {
 	case -1:
 		/* oops -- fork error */
-		adios("fork", "unable to");
-		break;  /* NOT REACHED */
+		advise("fork", "unable to");
+		return DONE;
 
 	case 0:
 		/* child process -- send it */
@@ -553,13 +638,14 @@ sendaux(char **vec, int vecp, char *drft, struct stat *st)
 
 	default:
 		/* parent process -- wait for it */
-		if ((status = pidwait(child_id, NOTOK)) == OK) {
+		status = pidwait(child_id, NOTOK);
+		if (WIFEXITED(status) && WEXITSTATUS(status) == EX_OK) {
 			if (annotext) {
 				anno(st);
 			}
 		} else {
 			/* spost failed */
-			advise(NULL, "message not delivered to anyone");
+			advise(NULL, "%s", strexit(status));
 			if (distfile) {
 				unlink(drft);
 				if (rename(backup, drft) == NOTOK) {
@@ -568,10 +654,10 @@ sendaux(char **vec, int vecp, char *drft, struct stat *st)
 				}
 			}
 		}
-		break;
 	}
 
-	return status;
+
+	return status ? NOTOK : status;
 }
 
 
@@ -581,6 +667,9 @@ anno(struct stat *st)
 	struct stat st2;
 	char *msgs, *folder;
 	char buf[BUFSIZ];
+	char *vec[MAXARGS];
+	int vecp = 0;
+	char *cp, *dp;
 
 	if (altmsg && (stat(altmsg, &st2) == NOTOK ||
 			st->st_mtime != st2.st_mtime ||
@@ -608,18 +697,45 @@ anno(struct stat *st)
 		advise(NULL, "annotate as `%s': %s %s", annotext,
 				folder, msgs);
 	}
-	snprintf(buf, sizeof buf, "anno -comp '%s' '+%s' %s",
-			annotext, folder, msgs);
-	if (system(buf) != 0) {
+	vec[vecp++] = "anno";
+	vec[vecp++] = "-comp";
+	vec[vecp++] = annotext;
+	snprintf(buf, sizeof buf, "+%s", folder);
+	vec[vecp++] = buf;
+
+	while (isspace(*msgs)) {
+		msgs++;
+	}
+	for (cp=dp=msgs; *cp; cp++) {
+		if (isspace(*cp)) {
+			while (isspace(*cp)) {
+				*cp++ = '\0';
+			}
+			vec[vecp++] = dp;
+			dp = cp;
+		}
+	}
+	vec[vecp++] = dp;
+	vec[vecp] = NULL;
+	if (execprog(*vec, vec) != 0) {
 		advise(NULL, "unable to annotate");
 	}
 }
 
 
-static void
-armed_done(int status)
+char*
+strexit(int status)
 {
-	longjmp(env, status ? status : NOTOK);
-
-	exit(status);
+	if (WIFSIGNALED(status)) {
+		return "spost or sendmail killed by signal";
+	}
+	if (!WIFEXITED(status)) {
+		return "message not delivered to anyone";
+	}
+	switch (WEXITSTATUS(status)) {
+	case EX_TEMPFAIL:
+		return "Temporary error, maybe the MTA has queued the message";
+	default:
+		return "message not delivered to anyone";
+	}
 }