mblaze/mexport.c
2017-01-26 20:27:26 +01:00

140 lines
2.4 KiB
C

#include <sys/stat.h>
#include <sys/types.h>
#include <ctype.h>
#include <errno.h>
#include <fcntl.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include "blaze822.h"
static int Sflag;
static int status;
void
export(char *file)
{
struct message *msg;
while (*file == ' ' || *file == '\t')
file++;
msg = blaze822(file);
if (!msg)
return;
char from[1024] = "nobody";
char *v;
if ((v = blaze822_hdr(msg, "return-path")) ||
(v = blaze822_hdr(msg, "x-envelope-from"))) {
char *s = strchr(v, '<');
char *e = strchr(s, '>');
if (s && e) {
e++;
memcpy(from, s, e-s);
from[e-s] = 0;
}
}
time_t date = -1;
if ((v = blaze822_hdr(msg, "date"))) {
date = blaze822_date(v);
}
char *line = 0;
size_t linelen = 0;
FILE *infile = fopen(file, "r");
if (!infile) {
status = 1;
return;
}
printf("From %s %s", from, ctime(&date));
int in_header = 1;
int final_nl = 0;
while (1) {
errno = 0;
ssize_t rd = getdelim(&line, &linelen, '\n', infile);
if (rd == -1) {
if (errno == 0)
break;
// XXX print error?
status = 1;
return;
}
if (in_header && line[0] == '\n' && !line[1]) {
if (Sflag) {
char *flags = strstr(file, ":2,");
if (!flags)
flags = "";
fputs("Status: ", stdout);
if (strchr(flags, 'S'))
putchar('R');
char *ee = strrchr(file, '/');
if (!ee ||
!(ee >= file + 3 && ee[-3] == 'n' && ee[-2] == 'e' && ee[-1] == 'w'))
putchar('O');
putchar('\n');
fputs("X-Status: ", stdout);
if (strchr(flags, 'R')) putchar('A');
if (strchr(flags, 'T')) putchar('D');
if (strchr(flags, 'F')) putchar('F');
putchar('\n');
}
in_header = 0;
}
// MBOXRD: add first > to >>..>>From
char *s = line;
while (*s == '>')
s++;
if (strncmp("From ", s, 5) == 0)
putchar('>');
fputs(line, stdout);
final_nl = (line[rd-1] == '\n');
}
// ensure trailing newline
if (!final_nl)
putchar('\n');
fclose(infile);
blaze822_free(msg);
}
int
main(int argc, char *argv[])
{
int c;
while ((c = getopt(argc, argv, "S")) != -1)
switch(c) {
case 'S': Sflag = 1; break;
default:
fprintf(stderr, "Usage: mexport [-S] [msgs...]\n");
exit(2);
}
status = 0;
if (argc == optind && isatty(0))
blaze822_loop1(":", export);
else
blaze822_loop(argc-optind, argv+optind, export);
return status;
}