mkinitrd-6_2_0/mailutils/mime.c

/* vi: set sw=4 ts=4: */
/*
 * makemime: create MIME-encoded message
 * reformime: parse MIME-encoded message
 *
 * Copyright (C) 2008 by Vladimir Dronnikov <dronnikov@gmail.com>
 *
 * Licensed under GPLv2, see file LICENSE in this tarball for details.
 */
#include "libbb.h"
#include "mail.h"

/*
  makemime -c type [-o file] [-e encoding] [-C charset] [-N name] \
                   [-a "Header: Contents"] file
           -m [ type ] [-o file] [-e encoding] [-a "Header: Contents"] file
           -j [-o file] file1 file2
           @file

   file:  filename    - read or write from filename
          -           - read or write from stdin or stdout
          &n          - read or write from file descriptor n
          \( opts \)  - read from child process, that generates [ opts ]

Options:

  -c type         - create a new MIME section from "file" with this
                    Content-Type: (default is application/octet-stream).
  -C charset      - MIME charset of a new text/plain section.
  -N name         - MIME content name of the new mime section.
  -m [ type ]     - create a multipart mime section from "file" of this
                    Content-Type: (default is multipart/mixed).
  -e encoding     - use the given encoding (7bit, 8bit, quoted-printable,
                    or base64), instead of guessing.  Omit "-e" and use
                    -c auto to set Content-Type: to text/plain or
                    application/octet-stream based on picked encoding.
  -j file1 file2  - join mime section file2 to multipart section file1.
  -o file         - write the result to file, instead of stdout (not
                    allowed in child processes).
  -a header       - prepend an additional header to the output.

  @file - read all of the above options from file, one option or
          value on each line.
  {which version of makemime is this? What do we support?}
*/


/* In busybox 1.15.0.svn, makemime generates output like this
 * (empty lines are shown exactly!):
{headers added with -a HDR}
Mime-Version: 1.0
Content-Type: multipart/mixed; boundary="24269534-2145583448-1655890676"

--24269534-2145583448-1655890676
Content-Type: {set by -c, e.g. text/plain}; charset={set by -C, e.g. us-ascii}
Content-Disposition: inline; filename="A"
Content-Transfer-Encoding: base64

...file A contents...
--24269534-2145583448-1655890676
Content-Type: {set by -c, e.g. text/plain}; charset={set by -C, e.g. us-ascii}
Content-Disposition: inline; filename="B"
Content-Transfer-Encoding: base64

...file B contents...
--24269534-2145583448-1655890676--

*/


/* For reference: here is an example email to LKML which has
 * 1st unnamed part (so it serves as an email body)
 * and one attached file:
...other headers...
Content-Type: multipart/mixed; boundary="=-tOfTf3byOS0vZgxEWcX+"
...other headers...
Mime-Version: 1.0
...other headers...


--=-tOfTf3byOS0vZgxEWcX+
Content-Type: text/plain
Content-Transfer-Encoding: 7bit

...email text...
...email text...


--=-tOfTf3byOS0vZgxEWcX+
Content-Disposition: attachment; filename="xyz"
Content-Type: text/plain; name="xyz"; charset="UTF-8"
Content-Transfer-Encoding: 7bit

...file contents...
...file contents...

--=-tOfTf3byOS0vZgxEWcX+--

...random junk added by mailing list robots and such...
*/

int makemime_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int makemime_main(int argc UNUSED_PARAM, char **argv)
{
	llist_t *opt_headers = NULL, *l;
	const char *opt_output;
#define boundary opt_output

	enum {
		OPT_c = 1 << 0,         // Content-Type:
		OPT_e = 1 << 1,         // Content-Transfer-Encoding. Ignored. Assumed base64
		OPT_o = 1 << 2,         // output to
		OPT_C = 1 << 3,         // charset
		OPT_N = 1 << 4,         // COMPAT
		OPT_a = 1 << 5,         // additional headers
		OPT_m = 1 << 6,         // COMPAT
		OPT_j = 1 << 7,         // COMPAT
	};

	INIT_G();

	// parse options
	opt_complementary = "a::";
	opts = getopt32(argv,
		"c:e:o:C:N:a:m:j:",
		&G.content_type, NULL, &opt_output, &G.opt_charset, NULL, &opt_headers, NULL, NULL
	);
	//argc -= optind;
	argv += optind;

	// respect -o output
	if (opts & OPT_o)
		freopen(opt_output, "w", stdout);

	// no files given on command line? -> use stdin
	if (!*argv)
		*--argv = (char *)"-";

	// put additional headers
	for (l = opt_headers; l; l = l->link)
		puts(l->data);

	// make a random string -- it will delimit message parts
	srand(monotonic_us());
	boundary = xasprintf("%u-%u-%u",
			(unsigned)rand(), (unsigned)rand(), (unsigned)rand());

	// put multipart header
	printf(
		"Mime-Version: 1.0\n"
		"Content-Type: multipart/mixed; boundary=\"%s\"\n"
		, boundary
	);

	// put attachments
	while (*argv) {
		printf(
			"\n--%s\n"
			"Content-Type: %s; charset=%s\n"
			"Content-Disposition: inline; filename=\"%s\"\n"
			"Content-Transfer-Encoding: base64\n"
			, boundary
			, G.content_type
			, G.opt_charset
			, bb_get_last_path_component_strip(*argv)
		);
		encode_base64(*argv++, (const char *)stdin, "");
	}

	// put multipart footer
	printf("\n--%s--\n" "\n", boundary);

	return EXIT_SUCCESS;
#undef boundary
}

static const char *find_token(const char *const string_array[], const char *key, const char *defvalue)
{
	const char *r = NULL;
	int i;
	for (i = 0; string_array[i] != NULL; i++) {
		if (strcasecmp(string_array[i], key) == 0) {
			r = (char *)string_array[i+1];
			break;
		}
	}
	return (r) ? r : defvalue;
}

static const char *xfind_token(const char *const string_array[], const char *key)
{
	const char *r = find_token(string_array, key, NULL);
	if (r)
		return r;
	bb_error_msg_and_die("header: %s", key);
}

enum {
	OPT_x = 1 << 0,
	OPT_X = 1 << 1,
#if ENABLE_FEATURE_REFORMIME_COMPAT
	OPT_d = 1 << 2,
	OPT_e = 1 << 3,
	OPT_i = 1 << 4,
	OPT_s = 1 << 5,
	OPT_r = 1 << 6,
	OPT_c = 1 << 7,
	OPT_m = 1 << 8,
	OPT_h = 1 << 9,
	OPT_o = 1 << 10,
	OPT_O = 1 << 11,
#endif
};

static int parse(const char *boundary, char **argv)
{
	char *line, *s, *p;
	const char *type;
	int boundary_len = strlen(boundary);
	const char *delims = " ;\"\t\r\n";
	const char *uniq;
	int ntokens;
	const char *tokens[32]; // 32 is enough

	// prepare unique string pattern
	uniq = xasprintf("%%llu.%u.%s", (unsigned)getpid(), safe_gethostname());

//bb_info_msg("PARSE[%s]", terminator);

	while ((line = xmalloc_fgets_str(stdin, "\r\n\r\n")) != NULL) {

		// seek to start of MIME section
		// N.B. to avoid false positives let us seek to the _last_ occurance
		p = NULL;
		s = line;
		while ((s = strcasestr(s, "Content-Type:")) != NULL)
			p = s++;
		if (!p)
			goto next;
//bb_info_msg("L[%s]", p);

		// split to tokens
		// TODO: strip of comments which are of form: (comment-text)
		ntokens = 0;
		tokens[ntokens] = NULL;
		for (s = strtok(p, delims); s; s = strtok(NULL, delims)) {
			tokens[ntokens] = s;
			if (ntokens < ARRAY_SIZE(tokens) - 1)
				ntokens++;
//bb_info_msg("L[%d][%s]", ntokens, s);
		}
		tokens[ntokens] = NULL;
//bb_info_msg("N[%d]", ntokens);

		// analyse tokens
		type = find_token(tokens, "Content-Type:", "text/plain");
//bb_info_msg("T[%s]", type);
		if (0 == strncasecmp(type, "multipart/", 10)) {
			if (0 == strcasecmp(type+10, "mixed")) {
				parse(xfind_token(tokens, "boundary="), argv);
			} else
				bb_error_msg_and_die("no support of content type '%s'", type);
		} else {
			pid_t pid = pid;
			int rc;
			FILE *fp;
			// fetch charset
			const char *charset = find_token(tokens, "charset=", CONFIG_FEATURE_MIME_CHARSET);
			// fetch encoding
			const char *encoding = find_token(tokens, "Content-Transfer-Encoding:", "7bit");
			// compose target filename
			char *filename = (char *)find_token(tokens, "filename=", NULL);
			if (!filename)
				filename = xasprintf(uniq, monotonic_us());
			else
				filename = bb_get_last_path_component_strip(xstrdup(filename));

			// start external helper, if any
			if (opts & OPT_X) {
				int fd[2];
				xpipe(fd);
				pid = vfork();
				if (0 == pid) {
					// child reads from fd[0]
					close(fd[1]);
					xmove_fd(fd[0], STDIN_FILENO);
					xsetenv("CONTENT_TYPE", type);
					xsetenv("CHARSET", charset);
					xsetenv("ENCODING", encoding);
					xsetenv("FILENAME", filename);
					BB_EXECVP(*argv, argv);
					_exit(EXIT_FAILURE);
				}
				// parent dumps to fd[1]
				close(fd[0]);
				fp = xfdopen_for_write(fd[1]);
				signal(SIGPIPE, SIG_IGN); // ignore EPIPE
			// or create a file for dump
			} else {
				char *fname = xasprintf("%s%s", *argv, filename);
				fp = xfopen_for_write(fname);
				free(fname);
			}

			// housekeeping
			free(filename);

			// dump to fp
			if (0 == strcasecmp(encoding, "base64")) {
				decode_base64(stdin, fp);
			} else if (0 != strcasecmp(encoding, "7bit")
				&& 0 != strcasecmp(encoding, "8bit")
			) {
				// quoted-printable, binary, user-defined are unsupported so far
				bb_error_msg_and_die("no support of encoding '%s'", encoding);
			} else {
				// N.B. we have written redundant \n. so truncate the file
				// The following weird 2-tacts reading technique is due to
				// we have to not write extra \n at the end of the file
				// In case of -x option we could truncate the resulting file as
				// fseek(fp, -1, SEEK_END);
				// if (ftruncate(fileno(fp), ftell(fp)))
				//	bb_perror_msg("ftruncate");
				// But in case of -X we have to be much more careful. There is
				// no means to truncate what we already have sent to the helper.
				p = xmalloc_fgets_str(stdin, "\r\n");
				while (p) {
					s = xmalloc_fgets_str(stdin, "\r\n");
					if (s == NULL)
						break;
					if ('-' == s[0]
					 && '-' == s[1]
					 && 0 == strncmp(s+2, boundary, boundary_len)
					) {
						break;
					}
					fputs(p, fp);
					p = s;
				}

/*
				while ((s = xmalloc_fgetline_str(stdin, "\r\n")) != NULL) {
					if ('-' == s[0] && '-' == s[1]
						&& 0 == strncmp(s+2, boundary, boundary_len))
						break;
					fprintf(fp, "%s\n", s);
				}
				// N.B. we have written redundant \n. so truncate the file
				fseek(fp, -1, SEEK_END);
				if (ftruncate(fileno(fp), ftell(fp)))
					bb_perror_msg("ftruncate");
*/
			}
			fclose(fp);

			// finalize helper
			if (opts & OPT_X) {
				signal(SIGPIPE, SIG_DFL);
				// exit if helper exited >0
				rc = wait4pid(pid);
				if (rc)
					return rc+20;
			}

			// check multipart finalized
			if (s && '-' == s[2+boundary_len] && '-' == s[2+boundary_len+1]) {
				free(line);
				break;
			}
		}
 next:
		free(line);
	}

//bb_info_msg("ENDPARSE[%s]", boundary);

	return EXIT_SUCCESS;
}

/*
Usage: reformime [options]
    -d - parse a delivery status notification.
    -e - extract contents of MIME section.
    -x - extract MIME section to a file.
    -X - pipe MIME section to a program.
    -i - show MIME info.
    -s n.n.n.n - specify MIME section.
    -r - rewrite message, filling in missing MIME headers.
    -r7 - also convert 8bit/raw encoding to quoted-printable, if possible.
    -r8 - also convert quoted-printable encoding to 8bit, if possible.
    -c charset - default charset for rewriting, -o, and -O.
    -m [file] [file]... - create a MIME message digest.
    -h "header" - decode RFC 2047-encoded header.
    -o "header" - encode unstructured header using RFC 2047.
    -O "header" - encode address list header using RFC 2047.
*/

int reformime_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
int reformime_main(int argc UNUSED_PARAM, char **argv)
{
	const char *opt_prefix = "";

	INIT_G();

	// parse options
	// N.B. only -x and -X are supported so far
	opt_complementary = "x--X:X--x" IF_FEATURE_REFORMIME_COMPAT(":m::");
	opts = getopt32(argv,
		"x:X" IF_FEATURE_REFORMIME_COMPAT("deis:r:c:m:h:o:O:"),
		&opt_prefix
		IF_FEATURE_REFORMIME_COMPAT(, NULL, NULL, &G.opt_charset, NULL, NULL, NULL, NULL)
	);
	//argc -= optind;
	argv += optind;

	return parse("", (opts & OPT_X) ? argv : (char **)&opt_prefix);
}
1	/* vi: set sw=4 ts=4: */
2	/*
3	* makemime: create MIME-encoded message
4	* reformime: parse MIME-encoded message
5	*
6	* Copyright (C) 2008 by Vladimir Dronnikov <dronnikov@gmail.com>
7	*
8	* Licensed under GPLv2, see file LICENSE in this tarball for details.
9	*/
10	#include "libbb.h"
11	#include "mail.h"
12
13	/*
14	makemime -c type [-o file] [-e encoding] [-C charset] [-N name] \
15	[-a "Header: Contents"] file
16	-m [ type ] [-o file] [-e encoding] [-a "Header: Contents"] file
17	-j [-o file] file1 file2
18	@file
19
20	file: filename - read or write from filename
21	- - read or write from stdin or stdout
22	&n - read or write from file descriptor n
23	\( opts \) - read from child process, that generates [ opts ]
24
25	Options:
26
27	-c type - create a new MIME section from "file" with this
28	Content-Type: (default is application/octet-stream).
29	-C charset - MIME charset of a new text/plain section.
30	-N name - MIME content name of the new mime section.
31	-m [ type ] - create a multipart mime section from "file" of this
32	Content-Type: (default is multipart/mixed).
33	-e encoding - use the given encoding (7bit, 8bit, quoted-printable,
34	or base64), instead of guessing. Omit "-e" and use
35	-c auto to set Content-Type: to text/plain or
36	application/octet-stream based on picked encoding.
37	-j file1 file2 - join mime section file2 to multipart section file1.
38	-o file - write the result to file, instead of stdout (not
39	allowed in child processes).
40	-a header - prepend an additional header to the output.
41
42	@file - read all of the above options from file, one option or
43	value on each line.
44	{which version of makemime is this? What do we support?}
45	*/
46
47
48	/* In busybox 1.15.0.svn, makemime generates output like this
49	* (empty lines are shown exactly!):
50	{headers added with -a HDR}
51	Mime-Version: 1.0
52	Content-Type: multipart/mixed; boundary="24269534-2145583448-1655890676"
53
54	--24269534-2145583448-1655890676
55	Content-Type: {set by -c, e.g. text/plain}; charset={set by -C, e.g. us-ascii}
56	Content-Disposition: inline; filename="A"
57	Content-Transfer-Encoding: base64
58
59	...file A contents...
60	--24269534-2145583448-1655890676
61	Content-Type: {set by -c, e.g. text/plain}; charset={set by -C, e.g. us-ascii}
62	Content-Disposition: inline; filename="B"
63	Content-Transfer-Encoding: base64
64
65	...file B contents...
66	--24269534-2145583448-1655890676--
67
68	*/
69
70
71	/* For reference: here is an example email to LKML which has
72	* 1st unnamed part (so it serves as an email body)
73	* and one attached file:
74	...other headers...
75	Content-Type: multipart/mixed; boundary="=-tOfTf3byOS0vZgxEWcX+"
76	...other headers...
77	Mime-Version: 1.0
78	...other headers...
79
80
81	--=-tOfTf3byOS0vZgxEWcX+
82	Content-Type: text/plain
83	Content-Transfer-Encoding: 7bit
84
85	...email text...
86	...email text...
87
88
89	--=-tOfTf3byOS0vZgxEWcX+
90	Content-Disposition: attachment; filename="xyz"
91	Content-Type: text/plain; name="xyz"; charset="UTF-8"
92	Content-Transfer-Encoding: 7bit
93
94	...file contents...
95	...file contents...
96
97	--=-tOfTf3byOS0vZgxEWcX+--
98
99	...random junk added by mailing list robots and such...
100	*/
101
102	int makemime_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
103	int makemime_main(int argc UNUSED_PARAM, char **argv)
104	{
105	llist_t opt_headers = NULL, l;
106	const char *opt_output;
107	#define boundary opt_output
108
109	enum {
110	OPT_c = 1 << 0, // Content-Type:
111	OPT_e = 1 << 1, // Content-Transfer-Encoding. Ignored. Assumed base64
112	OPT_o = 1 << 2, // output to
113	OPT_C = 1 << 3, // charset
114	OPT_N = 1 << 4, // COMPAT
115	OPT_a = 1 << 5, // additional headers
116	OPT_m = 1 << 6, // COMPAT
117	OPT_j = 1 << 7, // COMPAT
118	};
119
120	INIT_G();
121
122	// parse options
123	opt_complementary = "a::";
124	opts = getopt32(argv,
125	"c:e:o:C:N:a:m:j:",
126	&G.content_type, NULL, &opt_output, &G.opt_charset, NULL, &opt_headers, NULL, NULL
127	);
128	//argc -= optind;
129	argv += optind;
130
131	// respect -o output
132	if (opts & OPT_o)
133	freopen(opt_output, "w", stdout);
134
135	// no files given on command line? -> use stdin
136	if (!*argv)
137	--argv = (char )"-";
138
139	// put additional headers
140	for (l = opt_headers; l; l = l->link)
141	puts(l->data);
142
143	// make a random string -- it will delimit message parts
144	srand(monotonic_us());
145	boundary = xasprintf("%u-%u-%u",
146	(unsigned)rand(), (unsigned)rand(), (unsigned)rand());
147
148	// put multipart header
149	printf(
150	"Mime-Version: 1.0\n"
151	"Content-Type: multipart/mixed; boundary=\"%s\"\n"
152	, boundary
153	);
154
155	// put attachments
156	while (*argv) {
157	printf(
158	"\n--%s\n"
159	"Content-Type: %s; charset=%s\n"
160	"Content-Disposition: inline; filename=\"%s\"\n"
161	"Content-Transfer-Encoding: base64\n"
162	, boundary
163	, G.content_type
164	, G.opt_charset
165	, bb_get_last_path_component_strip(*argv)
166	);
167	encode_base64(argv++, (const char )stdin, "");
168	}
169
170	// put multipart footer
171	printf("\n--%s--\n" "\n", boundary);
172
173	return EXIT_SUCCESS;
174	#undef boundary
175	}
176
177	static const char find_token(const char const string_array[], const char key, const char defvalue)
178	{
179	const char *r = NULL;
180	int i;
181	for (i = 0; string_array[i] != NULL; i++) {
182	if (strcasecmp(string_array[i], key) == 0) {
183	r = (char *)string_array[i+1];
184	break;
185	}
186	}
187	return (r) ? r : defvalue;
188	}
189
190	static const char xfind_token(const char const string_array[], const char *key)
191	{
192	const char *r = find_token(string_array, key, NULL);
193	if (r)
194	return r;
195	bb_error_msg_and_die("header: %s", key);
196	}
197
198	enum {
199	OPT_x = 1 << 0,
200	OPT_X = 1 << 1,
201	#if ENABLE_FEATURE_REFORMIME_COMPAT
202	OPT_d = 1 << 2,
203	OPT_e = 1 << 3,
204	OPT_i = 1 << 4,
205	OPT_s = 1 << 5,
206	OPT_r = 1 << 6,
207	OPT_c = 1 << 7,
208	OPT_m = 1 << 8,
209	OPT_h = 1 << 9,
210	OPT_o = 1 << 10,
211	OPT_O = 1 << 11,
212	#endif
213	};
214
215	static int parse(const char boundary, char *argv)
216	{
217	char line, s, *p;
218	const char *type;
219	int boundary_len = strlen(boundary);
220	const char *delims = " ;\"\t\r\n";
221	const char *uniq;
222	int ntokens;
223	const char *tokens[32]; // 32 is enough
224
225	// prepare unique string pattern
226	uniq = xasprintf("%%llu.%u.%s", (unsigned)getpid(), safe_gethostname());
227
228	//bb_info_msg("PARSE[%s]", terminator);
229
230	while ((line = xmalloc_fgets_str(stdin, "\r\n\r\n")) != NULL) {
231
232	// seek to start of MIME section
233	// N.B. to avoid false positives let us seek to the _last_ occurance
234	p = NULL;
235	s = line;
236	while ((s = strcasestr(s, "Content-Type:")) != NULL)
237	p = s++;
238	if (!p)
239	goto next;
240	//bb_info_msg("L[%s]", p);
241
242	// split to tokens
243	// TODO: strip of comments which are of form: (comment-text)
244	ntokens = 0;
245	tokens[ntokens] = NULL;
246	for (s = strtok(p, delims); s; s = strtok(NULL, delims)) {
247	tokens[ntokens] = s;
248	if (ntokens < ARRAY_SIZE(tokens) - 1)
249	ntokens++;
250	//bb_info_msg("L[%d][%s]", ntokens, s);
251	}
252	tokens[ntokens] = NULL;
253	//bb_info_msg("N[%d]", ntokens);
254
255	// analyse tokens
256	type = find_token(tokens, "Content-Type:", "text/plain");
257	//bb_info_msg("T[%s]", type);
258	if (0 == strncasecmp(type, "multipart/", 10)) {
259	if (0 == strcasecmp(type+10, "mixed")) {
260	parse(xfind_token(tokens, "boundary="), argv);
261	} else
262	bb_error_msg_and_die("no support of content type '%s'", type);
263	} else {
264	pid_t pid = pid;
265	int rc;
266	FILE *fp;
267	// fetch charset
268	const char *charset = find_token(tokens, "charset=", CONFIG_FEATURE_MIME_CHARSET);
269	// fetch encoding
270	const char *encoding = find_token(tokens, "Content-Transfer-Encoding:", "7bit");
271	// compose target filename
272	char filename = (char )find_token(tokens, "filename=", NULL);
273	if (!filename)
274	filename = xasprintf(uniq, monotonic_us());
275	else
276	filename = bb_get_last_path_component_strip(xstrdup(filename));
277
278	// start external helper, if any
279	if (opts & OPT_X) {
280	int fd[2];
281	xpipe(fd);
282	pid = vfork();
283	if (0 == pid) {
284	// child reads from fd[0]
285	close(fd[1]);
286	xmove_fd(fd[0], STDIN_FILENO);
287	xsetenv("CONTENT_TYPE", type);
288	xsetenv("CHARSET", charset);
289	xsetenv("ENCODING", encoding);
290	xsetenv("FILENAME", filename);
291	BB_EXECVP(*argv, argv);
292	_exit(EXIT_FAILURE);
293	}
294	// parent dumps to fd[1]
295	close(fd[0]);
296	fp = xfdopen_for_write(fd[1]);
297	signal(SIGPIPE, SIG_IGN); // ignore EPIPE
298	// or create a file for dump
299	} else {
300	char fname = xasprintf("%s%s", argv, filename);
301	fp = xfopen_for_write(fname);
302	free(fname);
303	}
304
305	// housekeeping
306	free(filename);
307
308	// dump to fp
309	if (0 == strcasecmp(encoding, "base64")) {
310	decode_base64(stdin, fp);
311	} else if (0 != strcasecmp(encoding, "7bit")
312	&& 0 != strcasecmp(encoding, "8bit")
313	) {
314	// quoted-printable, binary, user-defined are unsupported so far
315	bb_error_msg_and_die("no support of encoding '%s'", encoding);
316	} else {
317	// N.B. we have written redundant \n. so truncate the file
318	// The following weird 2-tacts reading technique is due to
319	// we have to not write extra \n at the end of the file
320	// In case of -x option we could truncate the resulting file as
321	// fseek(fp, -1, SEEK_END);
322	// if (ftruncate(fileno(fp), ftell(fp)))
323	// bb_perror_msg("ftruncate");
324	// But in case of -X we have to be much more careful. There is
325	// no means to truncate what we already have sent to the helper.
326	p = xmalloc_fgets_str(stdin, "\r\n");
327	while (p) {
328	s = xmalloc_fgets_str(stdin, "\r\n");
329	if (s == NULL)
330	break;
331	if ('-' == s[0]
332	&& '-' == s[1]
333	&& 0 == strncmp(s+2, boundary, boundary_len)
334	) {
335	break;
336	}
337	fputs(p, fp);
338	p = s;
339	}
340
341	/*
342	while ((s = xmalloc_fgetline_str(stdin, "\r\n")) != NULL) {
343	if ('-' == s[0] && '-' == s[1]
344	&& 0 == strncmp(s+2, boundary, boundary_len))
345	break;
346	fprintf(fp, "%s\n", s);
347	}
348	// N.B. we have written redundant \n. so truncate the file
349	fseek(fp, -1, SEEK_END);
350	if (ftruncate(fileno(fp), ftell(fp)))
351	bb_perror_msg("ftruncate");
352	*/
353	}
354	fclose(fp);
355
356	// finalize helper
357	if (opts & OPT_X) {
358	signal(SIGPIPE, SIG_DFL);
359	// exit if helper exited >0
360	rc = wait4pid(pid);
361	if (rc)
362	return rc+20;
363	}
364
365	// check multipart finalized
366	if (s && '-' == s[2+boundary_len] && '-' == s[2+boundary_len+1]) {
367	free(line);
368	break;
369	}
370	}
371	next:
372	free(line);
373	}
374
375	//bb_info_msg("ENDPARSE[%s]", boundary);
376
377	return EXIT_SUCCESS;
378	}
379
380	/*
381	Usage: reformime [options]
382	-d - parse a delivery status notification.
383	-e - extract contents of MIME section.
384	-x - extract MIME section to a file.
385	-X - pipe MIME section to a program.
386	-i - show MIME info.
387	-s n.n.n.n - specify MIME section.
388	-r - rewrite message, filling in missing MIME headers.
389	-r7 - also convert 8bit/raw encoding to quoted-printable, if possible.
390	-r8 - also convert quoted-printable encoding to 8bit, if possible.
391	-c charset - default charset for rewriting, -o, and -O.
392	-m [file] [file]... - create a MIME message digest.
393	-h "header" - decode RFC 2047-encoded header.
394	-o "header" - encode unstructured header using RFC 2047.
395	-O "header" - encode address list header using RFC 2047.
396	*/
397
398	int reformime_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
399	int reformime_main(int argc UNUSED_PARAM, char **argv)
400	{
401	const char *opt_prefix = "";
402
403	INIT_G();
404
405	// parse options
406	// N.B. only -x and -X are supported so far
407	opt_complementary = "x--X:X--x" IF_FEATURE_REFORMIME_COMPAT(":m::");
408	opts = getopt32(argv,
409	"x:X" IF_FEATURE_REFORMIME_COMPAT("deis:r:c:m:h:o:O:"),
410	&opt_prefix
411	IF_FEATURE_REFORMIME_COMPAT(, NULL, NULL, &G.opt_charset, NULL, NULL, NULL, NULL)
412	);
413	//argc -= optind;
414	argv += optind;
415
416	return parse("", (opts & OPT_X) ? argv : (char **)&opt_prefix);
417	}