1 /* vi: set sw=4 ts=4: */
3 * makemime: create MIME-encoded message
4 * reformime: parse MIME-encoded message
6 * Copyright (C) 2008 by Vladimir Dronnikov <dronnikov@gmail.com>
8 * Licensed under GPLv2, see file LICENSE in this source tree.
11 //kbuild:lib-$(CONFIG_REFORMIME) += reformime.o mail.o
17 # define dbg_error_msg(...) bb_error_msg(__VA_ARGS__)
19 # define dbg_error_msg(...) ((void)0)
22 static const char *find_token(const char *const string_array[], const char *key, const char *defvalue)
26 for (i = 0; string_array[i] != NULL; i++) {
27 if (strcasecmp(string_array[i], key) == 0) {
28 r = (char *)string_array[i+1];
32 return (r) ? r : defvalue;
35 static const char *xfind_token(const char *const string_array[], const char *key)
37 const char *r = find_token(string_array, key, NULL);
40 bb_error_msg_and_die("not found: '%s'", key);
46 #if ENABLE_FEATURE_REFORMIME_COMPAT
60 static int parse(const char *boundary, char **argv)
62 int boundary_len = strlen(boundary);
63 char uniq[sizeof("%%llu.%u") + sizeof(int)*3];
65 dbg_error_msg("BOUNDARY[%s]", boundary);
67 // prepare unique string pattern
68 sprintf(uniq, "%%llu.%u", (unsigned)getpid());
69 dbg_error_msg("UNIQ[%s]", uniq);
73 const char *tokens[32]; /* 32 is enough */
76 /* Read the header (everything up to two \n) */
78 unsigned header_idx = 0;
82 int ch = fgetc(stdin);
83 if (ch == '\r') /* Support both line endings */
87 if (ch == '\n' && last_ch == ch)
89 if (!(header_idx & 0xff))
90 header = xrealloc(header, header_idx + 0x101);
91 header[header_idx++] = last_ch = ch;
97 header[header_idx] = '\0';
98 dbg_error_msg("H:'%s'", p);
101 /* Split to tokens */
105 const char *delims = ";=\" \t\n";
107 /* Skip to last Content-Type: */
109 while ((p = strchr(p, '\n')) != NULL) {
111 if (strncasecmp(p, "Content-Type:", sizeof("Content-Type:")-1) == 0)
114 dbg_error_msg("L:'%s'", p);
116 s = strtok(s, delims);
119 if (ntokens < ARRAY_SIZE(tokens) - 1)
121 dbg_error_msg("L[%d]='%s'", ntokens, s);
122 s = strtok(NULL, delims);
124 tokens[ntokens] = NULL;
125 dbg_error_msg("EMPTYLINE, ntokens:%d", ntokens);
130 /* Is it multipart? */
131 type = find_token(tokens, "Content-Type:", "text/plain");
132 dbg_error_msg("TYPE:'%s'", type);
133 if (0 == strncasecmp(type, "multipart/", 10)) {
135 if (strcasecmp(type + 10, "mixed") != 0)
136 bb_error_msg_and_die("no support of content type '%s'", type);
137 parse(xfind_token(tokens, "boundary"), argv);
140 /* No, process one non-multipart section */
145 const char *charset = find_token(tokens, "charset", CONFIG_FEATURE_MIME_CHARSET);
146 const char *encoding = find_token(tokens, "Content-Transfer-Encoding:", "7bit");
148 /* Compose target filename */
149 char *filename = (char *)find_token(tokens, "filename", NULL);
151 filename = xasprintf(uniq, monotonic_us());
153 filename = bb_get_last_path_component_strip(xstrdup(filename));
158 /* start external helper */
162 /* child reads from fd[0] */
164 xmove_fd(fd[0], STDIN_FILENO);
165 xsetenv("CONTENT_TYPE", type);
166 xsetenv("CHARSET", charset);
167 xsetenv("ENCODING", encoding);
168 xsetenv("FILENAME", filename);
169 BB_EXECVP_or_die(argv);
171 /* parent will write to fd[1] */
173 fp = xfdopen_for_write(fd[1]);
174 signal(SIGPIPE, SIG_IGN);
177 char *fname = xasprintf("%s%s", *argv, filename);
178 fp = xfopen_for_write(fname);
185 if (0 == strcasecmp(encoding, "base64")) {
186 read_base64(stdin, fp, '-');
188 if (0 != strcasecmp(encoding, "7bit")
189 && 0 != strcasecmp(encoding, "8bit")
191 /* quoted-printable, binary, user-defined are unsupported so far */
192 bb_error_msg_and_die("encoding '%s' not supported", encoding);
194 /* plain 7bit or 8bit */
195 while ((end = xmalloc_fgets(stdin)) != NULL) {
198 && strncmp(end + 2, boundary, boundary_len) == 0
210 signal(SIGPIPE, SIG_DFL);
211 rc = (wait4pid(pid) & 0xff);
216 /* Multipart ended? */
217 if (end && '-' == end[2 + boundary_len] && '-' == end[2 + boundary_len + 1]) {
218 dbg_error_msg("FINISHED MPART:'%s'", end);
221 dbg_error_msg("FINISHED:'%s'", end);
223 } /* end of "handle one non-multipart block" */
228 dbg_error_msg("ENDPARSE[%s]", boundary);
233 //usage:#define reformime_trivial_usage
235 //usage:#define reformime_full_usage "\n\n"
236 //usage: "Parse MIME-encoded message on stdin\n"
237 //usage: "\n -x PREFIX Extract content of MIME sections to files"
238 //usage: "\n -X PROG ARGS Filter content of MIME sections through PROG"
239 //usage: "\n Must be the last option"
241 //usage: "\nOther options are silently ignored"
244 Usage: reformime [options]
245 -d - parse a delivery status notification.
246 -e - extract contents of MIME section.
247 -x - extract MIME section to a file.
248 -X - pipe MIME section to a program.
250 -s n.n.n.n - specify MIME section.
251 -r - rewrite message, filling in missing MIME headers.
252 -r7 - also convert 8bit/raw encoding to quoted-printable, if possible.
253 -r8 - also convert quoted-printable encoding to 8bit, if possible.
254 -c charset - default charset for rewriting, -o, and -O.
255 -m [file] [file]... - create a MIME message digest.
256 -h "header" - decode RFC 2047-encoded header.
257 -o "header" - encode unstructured header using RFC 2047.
258 -O "header" - encode address list header using RFC 2047.
261 int reformime_main(int argc, char **argv) MAIN_EXTERNALLY_VISIBLE;
262 int reformime_main(int argc UNUSED_PARAM, char **argv)
264 const char *opt_prefix = "";
269 // N.B. only -x and -X are supported so far
270 opt_complementary = "x--X:X--x" IF_FEATURE_REFORMIME_COMPAT(":m::");
271 opts = getopt32(argv,
272 "x:X" IF_FEATURE_REFORMIME_COMPAT("deis:r:c:m:h:o:O:"),
274 IF_FEATURE_REFORMIME_COMPAT(, NULL, NULL, &G.opt_charset, NULL, NULL, NULL, NULL)
278 return parse("", (opts & OPT_X) ? argv : (char **)&opt_prefix);