author | Sunil Nimmagadda <sunil@nimmagadda.net> |
Wed, 27 Aug 2014 10:36:03 +0500 | |
changeset 30 | fec6f692ba74 |
parent 10 | d1fb040b60d9 |
permissions | -rw-r--r-- |
0 | 1 |
/* |
2 |
* Copyright (c) 2014 Sunil Nimmagadda <sunil@nimmagadda.net> |
|
3 |
* |
|
4 |
* Permission to use, copy, modify, and distribute this software for any |
|
5 |
* purpose with or without fee is hereby granted, provided that the above |
|
6 |
* copyright notice and this permission notice appear in all copies. |
|
7 |
* |
|
8 |
* THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES |
|
9 |
* WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF |
|
10 |
* MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR |
|
11 |
* ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES |
|
12 |
* WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN |
|
13 |
* ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF |
|
14 |
* OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE. |
|
15 |
*/ |
|
16 |
||
17 |
#include <sys/param.h> |
|
18 |
#include <sys/types.h> |
|
19 |
#include <sys/queue.h> |
|
20 |
#include <sys/socket.h> |
|
21 |
#include <sys/stat.h> |
|
22 |
||
23 |
#include <errno.h> |
|
24 |
#include <fcntl.h> |
|
25 |
#include <stdio.h> |
|
26 |
#include <string.h> |
|
27 |
#include <syslog.h> |
|
28 |
#include <unistd.h> |
|
29 |
||
30 |
#include "pop3d.h" |
|
31 |
||
32 |
static int init(struct mdrop *, size_t *, size_t *); |
|
10
d1fb040b60d9
Fix clang warnings. offset is always long.
Sunil Nimmagadda <sunil@nimmagadda.net>
parents:
0
diff
changeset
|
33 |
static int retr(struct mdrop *, unsigned int, size_t *, long *); |
0 | 34 |
static int update(struct mdrop *); |
35 |
||
36 |
struct m_backend m_backend_mbox = { |
|
37 |
init, |
|
38 |
retr, |
|
39 |
update |
|
40 |
}; |
|
41 |
||
42 |
/* |
|
43 |
* Parse mbox calculating each message's offset, size and hash. |
|
44 |
* A message is identified by "From " at the start of a line. |
|
45 |
* Returns 0 on success with nmsgs and sz populated. |
|
46 |
*/ |
|
47 |
int |
|
48 |
init(struct mdrop *m, size_t *nmsgs, size_t *sz) |
|
49 |
{ |
|
50 |
SHA1_CTX ctx; |
|
51 |
FILE *fp; |
|
52 |
struct msg *msg = NULL; |
|
53 |
size_t i, len; |
|
54 |
long offset; |
|
55 |
char *line; |
|
56 |
||
57 |
*nmsgs = 0; |
|
58 |
*sz = 0; |
|
59 |
if (flock(m->fd, LOCK_EX|LOCK_NB) == -1) { |
|
60 |
switch (errno) { |
|
61 |
case EWOULDBLOCK: |
|
62 |
logit(LOG_INFO, "mbox: locked by other process"); |
|
63 |
return (-1); |
|
64 |
default: |
|
65 |
fatal("flock(LOCK_EX)"); |
|
66 |
} |
|
67 |
} |
|
68 |
||
69 |
if ((fp = fdopen(dup(m->fd), "r+")) == NULL) { |
|
70 |
logit(LOG_INFO, "mbox: fdopen failed"); |
|
71 |
return (-1); |
|
72 |
} |
|
73 |
||
74 |
SIMPLEQ_INIT(&m->e.q_msgs); |
|
75 |
offset = ftell(fp); |
|
76 |
while ((line = fgetln(fp, &len))) { |
|
77 |
if ((len > 5) && strncmp("From ", line, 5) == 0) { |
|
78 |
if (msg) |
|
79 |
SHA1End(&ctx, msg->hash); |
|
80 |
||
81 |
msg = xcalloc(1, sizeof(*msg), "init"); |
|
82 |
SHA1Init(&ctx); |
|
83 |
msg->u.offset = offset; |
|
84 |
m->nmsgs += 1; |
|
85 |
SIMPLEQ_INSERT_TAIL(&m->e.q_msgs, msg, e.q_entry); |
|
86 |
} else { |
|
87 |
if (msg == NULL) |
|
88 |
fatalx("mbox corrupted: no \"From \" line"); |
|
89 |
||
90 |
msg->sz += len; |
|
91 |
msg->nlines += 1; |
|
92 |
SHA1Update(&ctx, (u_int8_t *)line, len); |
|
93 |
offset = ftell(fp); |
|
94 |
} |
|
95 |
} |
|
96 |
||
97 |
if (msg) |
|
98 |
SHA1End(&ctx, msg->hash); |
|
99 |
||
100 |
/* allocate space for nmsgs of struct msg pointers */ |
|
101 |
m->msgs_index = xcalloc(m->nmsgs, sizeof(msg), "make_index"); |
|
102 |
i = 0; |
|
103 |
SIMPLEQ_FOREACH(msg, &m->e.q_msgs, e.q_entry) { |
|
104 |
m->msgs_index[i++] = msg; |
|
105 |
/* calculate mbox size by counting newline as 2 (CRLF) */ |
|
106 |
m->sz += msg->sz + msg->nlines; |
|
107 |
} |
|
108 |
||
109 |
*nmsgs = m->nmsgs; |
|
110 |
*sz = m->sz; |
|
111 |
fclose(fp); |
|
112 |
return (0); |
|
113 |
} |
|
114 |
||
115 |
static int |
|
10
d1fb040b60d9
Fix clang warnings. offset is always long.
Sunil Nimmagadda <sunil@nimmagadda.net>
parents:
0
diff
changeset
|
116 |
retr(struct mdrop *m, unsigned int idx, size_t *nlines, long *offset) |
0 | 117 |
{ |
118 |
if (m->msgs_index[idx]->flags & F_DELE) |
|
119 |
return (-1); |
|
120 |
||
121 |
*offset = m->msgs_index[idx]->u.offset; |
|
122 |
*nlines = m->msgs_index[idx]->nlines; |
|
123 |
return (dup(m->fd)); /* imsg closes sender's fd */ |
|
124 |
} |
|
125 |
||
126 |
/* |
|
127 |
* No resource management as this process is blown away |
|
128 |
* upon success or error. |
|
129 |
*/ |
|
130 |
static int |
|
131 |
update(struct mdrop *m) |
|
132 |
{ |
|
133 |
struct msg *cur; |
|
134 |
size_t i, j = 0, len, nlines; |
|
135 |
char buf[MAXBSIZE], fn[22], *line; |
|
136 |
FILE *tmp_fp, *m_fp; |
|
137 |
mode_t old_mask; |
|
138 |
int tmp_fd; |
|
139 |
||
140 |
for (i = 0; i < m->nmsgs; i++) |
|
141 |
if (m->msgs_index[i]->flags & F_DELE) |
|
142 |
j += 1; |
|
143 |
||
144 |
if ((m_fp = fdopen(dup(m->fd), "r+")) == NULL) { |
|
145 |
logit(LOG_INFO, "mbox: fdopen failed"); |
|
146 |
return (-1); |
|
147 |
} |
|
148 |
||
149 |
if (j == 0) |
|
150 |
return (0); |
|
151 |
else if (j == m->nmsgs) { |
|
152 |
if (ftruncate(fileno(m_fp), 0) == -1) { |
|
153 |
logit(LOG_CRIT, "update: ftruncate failed"); |
|
154 |
return (1); |
|
155 |
} |
|
156 |
||
157 |
return (0); |
|
158 |
} |
|
159 |
||
160 |
strlcpy(fn, "/tmp/pop3d.XXXXXXXXXX", sizeof(fn)); |
|
161 |
old_mask = umask(S_IXUSR|S_IXGRP|S_IWOTH|S_IROTH|S_IXOTH); |
|
162 |
if ((tmp_fd = mkstemp(fn)) == -1 || |
|
163 |
(tmp_fp = fdopen(tmp_fd, "r+")) == NULL) { |
|
164 |
logit(LOG_CRIT, "mbox: mkstemp failed"); |
|
165 |
return (1); |
|
166 |
} |
|
167 |
||
168 |
umask(old_mask); |
|
169 |
for (i = 0; i < m->nmsgs; i++) { |
|
170 |
cur = m->msgs_index[i]; |
|
171 |
if (cur->flags & F_DELE) |
|
172 |
continue; |
|
173 |
||
174 |
if (fseek(m_fp, cur->u.offset, SEEK_SET) == -1) { |
|
175 |
logit(LOG_CRIT, "update: fseek failed"); |
|
176 |
return (1); |
|
177 |
} |
|
178 |
/* |
|
179 |
* "From " line isn't counted in nlines but offset starts |
|
180 |
* there, adjust nlines here |
|
181 |
*/ |
|
182 |
nlines = m->msgs_index[i]->nlines + 1; |
|
183 |
while (nlines--) { |
|
184 |
if ((line = fgetln(m_fp, &len))) |
|
185 |
if (fwrite(line, len, 1, tmp_fp) != 1) |
|
186 |
fatalx("update: short write"); |
|
187 |
} |
|
188 |
} |
|
189 |
||
190 |
fflush(tmp_fp); |
|
191 |
rewind(m_fp); |
|
192 |
rewind(tmp_fp); |
|
193 |
while (!feof(tmp_fp)) { |
|
194 |
fread(buf, sizeof(buf), 1, tmp_fp); |
|
195 |
if (fwrite(buf, sizeof(buf), 1, m_fp) != 1) |
|
196 |
fatalx("update: short write"); |
|
197 |
} |
|
198 |
||
199 |
fflush(m_fp); |
|
200 |
if (ftruncate(fileno(m_fp), ftello(tmp_fp)) == -1) |
|
201 |
fatal("update: failed to truncate"); |
|
202 |
||
203 |
fclose(m_fp); |
|
204 |
return (0); |
|
205 |
} |
|
206 |