123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184 |
- #include <stdio.h>
- #include <stdlib.h>
- #include <string.h>
- #include <time.h>
- #include <unistd.h>
- #include "util.h"
- static char *line;
- static size_t linesize;
- static char host[256], *user, dtimebuf[32], mtimebuf[32];
- static int usecontent = 0; /* env variable: $SFEED_MBOX_CONTENT */
- static unsigned long long
- djb2(unsigned char *s, unsigned long long hash)
- {
- int c;
- while ((c = *s++))
- hash = ((hash << 5) + hash) + c; /* hash * 33 + c */
- return hash;
- }
- /* Unescape / decode fields printed by string_print_encoded()
- * "\\" to "\", "\t", to TAB, "\n" to newline. Other escape sequences are
- * ignored: "\z" etc. Mangle "From " in mboxrd style (always prefix >). */
- static void
- printcontent(const char *s, FILE *fp)
- {
- escapefrom:
- for (; *s == '>'; s++)
- putc('>', fp);
- /* escape "From ", mboxrd-style. */
- if (!strncmp(s, "From ", 5))
- putc('>', fp);
- for (; *s; s++) {
- switch (*s) {
- case '\\':
- s++;
- switch (*s) {
- case 'n':
- putc('\n', fp);
- s++;
- goto escapefrom;
- case '\\': putc('\\', fp); break;
- case 't': putc('\t', fp); break;
- }
- break;
- default:
- putc(*s, fp); break;
- }
- }
- }
- static void
- printfeed(FILE *fp, const char *feedname)
- {
- char *fields[FieldLast], timebuf[32];
- struct tm parsedtm, *tm;
- time_t parsedtime;
- unsigned long long hash;
- ssize_t linelen;
- int ishtml;
- while ((linelen = getline(&line, &linesize, fp)) > 0 &&
- !ferror(stdout)) {
- if (line[linelen - 1] == '\n')
- line[--linelen] = '\0';
- hash = djb2((unsigned char *)line, 5381ULL);
- parseline(line, fields);
- /* mbox + mail header */
- printf("From MAILER-DAEMON %s\n", mtimebuf);
- parsedtime = 0;
- if (!strtotime(fields[FieldUnixTimestamp], &parsedtime) &&
- (tm = gmtime_r(&parsedtime, &parsedtm)) &&
- strftime(timebuf, sizeof(timebuf), "%a, %d %b %Y %H:%M:%S +0000", tm)) {
- printf("Date: %s\n", timebuf);
- } else {
- printf("Date: %s\n", dtimebuf); /* invalid/missing: use current time */
- }
- printf("From: %s <sfeed@>\n", fields[FieldAuthor][0] ? fields[FieldAuthor] : feedname);
- printf("To: %s <%s@%s>\n", user, user, host);
- printf("Subject: %s\n", fields[FieldTitle]);
- printf("Message-ID: <%s%s%llu@%s>\n",
- fields[FieldUnixTimestamp],
- fields[FieldUnixTimestamp][0] ? "." : "",
- hash, feedname);
- ishtml = usecontent && !strcmp(fields[FieldContentType], "html");
- if (ishtml)
- fputs("Content-Type: text/html; charset=\"utf-8\"\n", stdout);
- else
- fputs("Content-Type: text/plain; charset=\"utf-8\"\n", stdout);
- fputs("Content-Transfer-Encoding: binary\n", stdout);
- printf("X-Feedname: %s\n", feedname);
- fputs("\n", stdout);
- if (ishtml) {
- fputs("<p>\n", stdout);
- if (fields[FieldLink][0]) {
- fputs("Link: <a href=\"", stdout);
- xmlencode(fields[FieldLink], stdout);
- fputs("\">", stdout);
- xmlencode(fields[FieldLink], stdout);
- fputs("</a><br/>\n", stdout);
- }
- if (fields[FieldEnclosure][0]) {
- fputs("Enclosure: <a href=\"", stdout);
- xmlencode(fields[FieldEnclosure], stdout);
- fputs("\">", stdout);
- xmlencode(fields[FieldEnclosure], stdout);
- fputs("</a><br/>\n", stdout);
- }
- fputs("</p>\n", stdout);
- } else {
- if (fields[FieldLink][0])
- printf("Link: %s\n", fields[FieldLink]);
- if (fields[FieldEnclosure][0])
- printf("Enclosure: %s\n", fields[FieldEnclosure]);
- }
- if (usecontent) {
- fputs("\n", stdout);
- if (ishtml && fields[FieldLink][0]) {
- fputs("<base href=\"", stdout);
- xmlencode(fields[FieldLink], stdout);
- fputs("\"/>\n", stdout);
- }
- printcontent(fields[FieldContent], stdout);
- }
- fputs("\n\n", stdout);
- }
- }
- int
- main(int argc, char *argv[])
- {
- struct tm tmnow;
- time_t now;
- FILE *fp;
- char *name, *tmp;
- int i;
- if (pledge(argc == 1 ? "stdio" : "stdio rpath", NULL) == -1)
- err(1, "pledge");
- if ((tmp = getenv("SFEED_MBOX_CONTENT")))
- usecontent = !strcmp(tmp, "1");
- if (!(user = getenv("USER")))
- user = "you";
- if (gethostname(host, sizeof(host)) == -1)
- err(1, "gethostname");
- if ((now = time(NULL)) == (time_t)-1)
- errx(1, "time");
- if (!gmtime_r(&now, &tmnow))
- err(1, "gmtime_r: can't get current time");
- if (!strftime(mtimebuf, sizeof(mtimebuf), "%a %b %d %H:%M:%S %Y", &tmnow))
- errx(1, "strftime: can't format current time");
- if (!strftime(dtimebuf, sizeof(dtimebuf), "%a, %d %b %Y %H:%M:%S +0000", &tmnow))
- errx(1, "strftime: can't format current time");
- if (argc == 1) {
- printfeed(stdin, "");
- checkfileerror(stdin, "<stdin>", 'r');
- } else {
- for (i = 1; i < argc; i++) {
- if (!(fp = fopen(argv[i], "r")))
- err(1, "fopen: %s", argv[i]);
- name = ((name = strrchr(argv[i], '/'))) ? name + 1 : argv[i];
- printfeed(fp, name);
- checkfileerror(fp, argv[i], 'r');
- checkfileerror(stdout, "<stdout>", 'w');
- fclose(fp);
- }
- }
- checkfileerror(stdout, "<stdout>", 'w');
- return 0;
- }
|