dma: restructure logging
[dragonfly.git] / libexec / dma / local.c
1 #include <err.h>
2 #include <errno.h>
3 #include <fcntl.h>
4 #include <paths.h>
5 #include <stdint.h>
6 #include <stdio.h>
7 #include <syslog.h>
8 #include <unistd.h>
9
10 #include "dma.h"
11
12 int
13 deliver_local(struct qitem *it, const char **errmsg)
14 {
15         char fn[PATH_MAX+1];
16         char line[1000];
17         size_t linelen;
18         int mbox;
19         int error;
20         off_t mboxlen;
21         time_t now = time(NULL);
22
23         error = snprintf(fn, sizeof(fn), "%s/%s", _PATH_MAILDIR, it->addr);
24         if (error < 0 || (size_t)error >= sizeof(fn)) {
25                 syslog(LOG_NOTICE, "local delivery deferred: %m");
26                 return (1);
27         }
28
29         /* mailx removes users mailspool file if empty, so open with O_CREAT */
30         mbox = open_locked(fn, O_WRONLY | O_APPEND | O_CREAT);
31         if (mbox < 0) {
32                 syslog(LOG_NOTICE, "local delivery deferred: can not open `%s': %m", fn);
33                 return (1);
34         }
35         mboxlen = lseek(mbox, 0, SEEK_CUR);
36
37         if (fseek(it->mailf, it->hdrlen, SEEK_SET) != 0) {
38                 syslog(LOG_NOTICE, "local delivery deferred: can not seek: %m");
39                 return (1);
40         }
41
42         error = snprintf(line, sizeof(line), "From %s\t%s", it->sender, ctime(&now));
43         if (error < 0 || (size_t)error >= sizeof(line)) {
44                 syslog(LOG_NOTICE, "local delivery deferred: can not write header: %m");
45                 return (1);
46         }
47         if (write(mbox, line, error) != error)
48                 goto wrerror;
49
50         while (!feof(it->mailf)) {
51                 if (fgets(line, sizeof(line), it->mailf) == NULL)
52                         break;
53                 linelen = strlen(line);
54                 if (linelen == 0 || line[linelen - 1] != '\n') {
55                         syslog(LOG_CRIT, "local delivery failed: corrupted queue file");
56                         *errmsg = "corrupted queue file";
57                         error = -1;
58                         goto chop;
59                 }
60
61                 if (strncmp(line, "From ", 5) == 0) {
62                         const char *gt = ">";
63
64                         if (write(mbox, gt, 1) != 1)
65                                 goto wrerror;
66                 }
67                 if ((size_t)write(mbox, line, linelen) != linelen)
68                         goto wrerror;
69         }
70         line[0] = '\n';
71         if (write(mbox, line, 1) != 1)
72                 goto wrerror;
73         close(mbox);
74         return (0);
75
76 wrerror:
77         syslog(LOG_ERR, "local delivery failed: write error: %m");
78         error = 1;
79 chop:
80         if (ftruncate(mbox, mboxlen) != 0)
81                 syslog(LOG_WARNING, "error recovering mbox `%s': %m", fn);
82         close(mbox);
83         return (error);
84 }