Contents of /trunk/mkinitrd-magellan/busybox/mailutils/mime.c
Parent Directory | Revision Log
Revision 984 -
(show annotations)
(download)
Sun May 30 11:32:42 2010 UTC (14 years, 3 months ago) by niro
File MIME type: text/plain
File size: 11790 byte(s)
Sun May 30 11:32:42 2010 UTC (14 years, 3 months ago) by niro
File MIME type: text/plain
File size: 11790 byte(s)
-updated to busybox-1.16.1 and enabled blkid/uuid support in default config
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 | } |