X-Git-Url: http://git.marmaro.de/?p=mmh;a=blobdiff_plain;f=uip%2Fmhl.c;h=2987c0d2a6a9b89d3d3dbdbd64a8184353bbc604;hp=e4e8dbf31dd10fd9dd4e7f348b218ab9f72f9b0d;hb=de6974ed610ffbfaff335021ea7e359e85c27cfa;hpb=9cf6132a6ea29968131a000bc2fb6860affac45e

diff --git a/uip/mhl.c b/uip/mhl.c
index e4e8dbf..2987c0d 100644
--- a/uip/mhl.c
+++ b/uip/mhl.c
@@ -61,6 +61,8 @@ static struct swit switches[] = {
 	{ NULL, 0 }
 };
 
+char *version=VERSION;
+
 #define NOCOMPONENT 0x000001  /* don't show component name   */
 #define UPPERCASE   0x000002  /* display in all upper case   */
 #define CENTER      0x000004  /* center line                 */
@@ -75,7 +77,8 @@ static struct swit switches[] = {
 #define INIT        0x000800  /* initialize component        */
 #define SPLIT       0x001000  /* split headers (don't concatenate) */
 #define NONEWLINE   0x002000  /* don't write trailing newline */
-#define LBITS       "\020\01NOCOMPONENT\02UPPERCASE\03CENTER\04CLEARTEXT\05EXTRA\06HDROUTPUT\07LEFTADJUST\010COMPRESS\011ADDRFMT\012DATEFMT\013FORMAT\014INIT\015SPLIT\016NONEWLINE"
+#define RTRIM       0x004000  /* trim trailing whitespace    */
+#define LBITS       "\020\01NOCOMPONENT\02UPPERCASE\03CENTER\04CLEARTEXT\05EXTRA\06HDROUTPUT\07LEFTADJUST\010COMPRESS\011ADDRFMT\012DATEFMT\013FORMAT\014INIT\015SPLIT\016NONEWLINE\017RTRIM"
 #define GFLAGS      (NOCOMPONENT | UPPERCASE | CENTER | LEFTADJUST | COMPRESS | SPLIT)
 
 struct mcomp {
@@ -146,6 +149,8 @@ static struct triple triples[] = {
 	{ "nocompress", 0, COMPRESS },
 	{ "split", SPLIT, 0 },
 	{ "nosplit", 0, SPLIT },
+	{ "rtrim", RTRIM, 0 },
+	{ "nortrim", 0, RTRIM },
 	{ "addrfield", ADDRFMT, DATEFMT },
 	{ "datefield", DATEFMT, ADDRFMT },
 	{ "newline", 0, NONEWLINE },
@@ -597,16 +602,18 @@ process(char *fname, int ofilen, int ofilec)
 static void
 mhlfile(FILE *fp, char *mname, int ofilen, int ofilec)
 {
-	int state;
+	enum state state;
+	struct field f = {{0}};
 	struct mcomp *c1, *c2, *c3;
-	char **ip, name[NAMESZ], buf[BUFSIZ];
+	char **ip;
 
 	if (forwall) {
 		printf("\n-------");
-		if (ofilen == 1)
+		if (ofilen == 1) {
 			printf(" Forwarded Message%s", ofilec > 1 ? "s" : "");
-		else
+		} else {
 			printf(" Message %d", ofilen);
+		}
 		printf("\n\n");
 	} else if (ofilec > 1) {
 		if (ofilen > 1) {
@@ -615,84 +622,86 @@ mhlfile(FILE *fp, char *mname, int ofilen, int ofilec)
 		printf(">>> %s\n\n", mname);
 	}
 
-	for (state = FLD;!eflag;) {
-		switch (state = m_getfld(state, name, buf, sizeof(buf), fp)) {
-		case FLD:
-		case FLDPLUS:
+	for (state = FLD2; !eflag; ) {
+		switch (state = m_getfld2(state, &f, fp)) {
+		case FLD2:
 			for (ip = ignores; *ip; ip++)
-				if (!mh_strcasecmp(name, *ip)) {
-					while (state == FLDPLUS)
-						state = m_getfld(state, name, buf, sizeof(buf), fp);
+				if (mh_strcasecmp(f.name, *ip)==0) {
 					break;
 				}
-			if (*ip)
+			if (*ip) {
 				continue;
+			}
 
 			for (c2 = fmthd; c2; c2 = c2->c_next)
-				if (!mh_strcasecmp(c2->c_name, name))
+				if (mh_strcasecmp(c2->c_name, f.name)==0) {
 					break;
+				}
 			c1 = NULL;
 			if (!((c3 = c2 ? c2 : &global)->c_flags & SPLIT))
 				for (c1 = msghd; c1; c1 = c1->c_next)
-					if (!mh_strcasecmp(c1->c_name,
-							c3->c_name)) {
-						c1->c_text = mcomp_add(c1->c_flags, buf, c1->c_text);
+					if (mh_strcasecmp(c1->c_name,
+							c3->c_name)==0) {
+						c1->c_text = mcomp_add(c1->c_flags, f.value, c1->c_text);
 						break;
 					}
-			if (c1 == NULL)
-				c1 = add_queue(&msghd, &msgtl, name, buf, 0);
-			while (state == FLDPLUS) {
-				state = m_getfld(state, name, buf,
-						sizeof(buf), fp);
-				c1->c_text = add(buf, c1->c_text);
+			if (c1 == NULL) {
+				c1 = add_queue(&msghd, &msgtl, f.name, f.value, 0);
 			}
-			if (c2 == NULL)
+			if (c2 == NULL) {
 				c1->c_flags |= EXTRA;
+			}
 			continue;
 
-		case BODY:
-		case FILEEOF:
+		case BODY2:
+		case FILEEOF2:
 			column = 0;
 			for (c1 = fmthd; c1; c1 = c1->c_next) {
 				if (c1->c_flags & CLEARTEXT) {
 					putcomp(c1, c1, ONECOMP);
 					continue;
 				}
-				if (!mh_strcasecmp(c1->c_name, "messagename")) {
+				if (mh_strcasecmp(c1->c_name, "messagename")==0) {
 					holder.c_text = concat("(Message ",
 							mname, ")\n", NULL);
 					putcomp(c1, &holder, ONECOMP);
 					mh_free0(&(holder.c_text));
 					continue;
 				}
-				if (!mh_strcasecmp(c1->c_name, "extras")) {
-					for (c2 = msghd; c2; c2 = c2->c_next)
-						if (c2->c_flags & EXTRA)
+				if (mh_strcasecmp(c1->c_name, "extras")==0) {
+					for (c2 = msghd; c2; c2 = c2->c_next) {
+						if (c2->c_flags & EXTRA) {
 							putcomp(c1, c2, TWOCOMP);
+						}
+					}
 					continue;
 				}
-				if (dobody && !mh_strcasecmp(c1->c_name, "body")) {
-					holder.c_text = mh_xcalloc(sizeof(buf), sizeof(char));
-					strncpy(holder.c_text, buf, sizeof(buf));
-					while (state == BODY) {
+				if (dobody && mh_strcasecmp(c1->c_name, "body")==0) {
+					holder.c_text = mh_xstrdup(f.value);
+					while (state == BODY2) {
 						putcomp(c1, &holder, BODYCOMP);
-						state = m_getfld(state, name, holder.c_text, sizeof(buf), fp);
+						state = m_getfld2(state, &f, fp);
+						free(holder.c_text);
+						holder.c_text = mh_xstrdup(f.value);
 					}
 					mh_free0(&(holder.c_text));
 					continue;
 				}
-				for (c2 = msghd; c2; c2 = c2->c_next)
-					if (!mh_strcasecmp(c2->c_name,
-							c1->c_name)) {
+				for (c2 = msghd; c2; c2 = c2->c_next) {
+					if (mh_strcasecmp(c2->c_name,
+							c1->c_name)==0) {
 						putcomp(c1, c2, ONECOMP);
-						if (!(c1->c_flags & SPLIT))
+						if (!(c1->c_flags & SPLIT)) {
 							break;
+						}
 					}
+				}
 			}
 			return;
 
-		case LENERR:
-		case FMTERR:
+		case LENERR2:
+		case FMTERR2:
+		case IOERR2:
 			advise(NULL, "format error in message %s", mname);
 			exitstat++;
 			return;
@@ -878,7 +887,10 @@ putcomp(struct mcomp *c1, struct mcomp *c2, int flag)
 {
 	int count, cchdr;
 	unsigned char *cp;
+	char trimmed_prefix[BUFSIZ];
 
+	strncpy(trimmed_prefix, c1->c_text ? c1->c_text : c1->c_name, sizeof(trimmed_prefix) - 1);
+	rtrim(trimmed_prefix);
 	cchdr = 0;
 	lm = 0;
 	wid = c1->c_width ? c1->c_width : global.c_width;
@@ -891,7 +903,7 @@ putcomp(struct mcomp *c1, struct mcomp *c2, int flag)
 	onelp = NULL;
 
 	if (c1->c_flags & CLEARTEXT) {
-		putstr(c1->c_text);
+		putstr((c1->c_flags & RTRIM) ? rtrim(c1->c_text) : c1->c_text);
 		putstr("\n");
 		return;
 	}
@@ -916,7 +928,11 @@ putcomp(struct mcomp *c1, struct mcomp *c2, int flag)
 			for (cp = (c1->c_text ? c1->c_text : c1->c_name); *cp; cp++)
 				if (islower(*cp))
 					*cp = toupper(*cp);
-		putstr(c1->c_text ? c1->c_text : c1->c_name);
+		if (*c2->c_text && *c2->c_text != '\n' && *c2->c_text != '\r') {
+			putstr(c1->c_text ? c1->c_text : c1->c_name);
+		} else {
+			putstr(trimmed_prefix);
+		}
 		if (flag != BODYCOMP) {
 			putstr(": ");
 			if (!(c1->c_flags & SPLIT))
@@ -964,16 +980,23 @@ putcomp(struct mcomp *c1, struct mcomp *c2, int flag)
 	}
 	count += c1->c_offset;
 
-	if ((cp = oneline(c2->c_text, c1->c_flags)))
-	   putstr(cp);
+	if ((cp = oneline(c2->c_text, c1->c_flags))) {
+	  putstr((c1->c_flags & RTRIM) ? rtrim(cp) : cp);
+	}
 	if (term == '\n')
 		putstr("\n");
 	while ((cp = oneline(c2->c_text, c1->c_flags))) {
 		lm = count;
-		if (flag == BODYCOMP && !(c1->c_flags & NOCOMPONENT))
-			putstr(c1->c_text ? c1->c_text : c1->c_name);
+		if (flag == BODYCOMP && !(c1->c_flags & NOCOMPONENT)) {
+			if (*cp) {
+				putstr(c1->c_text ? c1->c_text : c1->c_name);
+			} else {
+				putstr(trimmed_prefix);
+			}
+		}
 		if (*cp)
-			putstr(cp);
+			putstr((c1->c_flags & RTRIM) ? rtrim(cp) : cp);
+
 		if (term == '\n')
 			putstr("\n");
 	}