Blame


1 48c4bdc1 2019-04-04 martijn /*
2 48c4bdc1 2019-04-04 martijn * Copyright (c) 2019 Martijn van Duren <martijn@openbsd.org>
3 48c4bdc1 2019-04-04 martijn *
4 48c4bdc1 2019-04-04 martijn * Permission to use, copy, modify, and distribute this software for any
5 48c4bdc1 2019-04-04 martijn * purpose with or without fee is hereby granted, provided that the above
6 48c4bdc1 2019-04-04 martijn * copyright notice and this permission notice appear in all copies.
7 48c4bdc1 2019-04-04 martijn *
8 48c4bdc1 2019-04-04 martijn * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
9 48c4bdc1 2019-04-04 martijn * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
10 48c4bdc1 2019-04-04 martijn * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
11 48c4bdc1 2019-04-04 martijn * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
12 48c4bdc1 2019-04-04 martijn * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
13 48c4bdc1 2019-04-04 martijn * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
14 48c4bdc1 2019-04-04 martijn * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
15 48c4bdc1 2019-04-04 martijn */
16 6bcbc798 2021-05-16 martijn #include <openssl/err.h>
17 48c4bdc1 2019-04-04 martijn #include <openssl/evp.h>
18 06f6b49b 2019-04-06 martijn #include <openssl/pem.h>
19 48c4bdc1 2019-04-04 martijn #include <openssl/sha.h>
20 48c4bdc1 2019-04-04 martijn
21 48c4bdc1 2019-04-04 martijn #include <ctype.h>
22 c826412d 2019-05-02 martijn #include <errno.h>
23 1308710c 2019-04-09 martijn #include <fcntl.h>
24 48c4bdc1 2019-04-04 martijn #include <stdio.h>
25 48c4bdc1 2019-04-04 martijn #include <stdlib.h>
26 48c4bdc1 2019-04-04 martijn #include <string.h>
27 48c4bdc1 2019-04-04 martijn #include <syslog.h>
28 48c4bdc1 2019-04-04 martijn #include <time.h>
29 48c4bdc1 2019-04-04 martijn #include <unistd.h>
30 48c4bdc1 2019-04-04 martijn
31 babf5d5a 2021-05-11 martijn #include "openbsd-compat.h"
32 6840f1a1 2019-08-22 martijn #include "opensmtpd.h"
33 40cd76f4 2020-08-30 martijn #include "mheader.h"
34 48c4bdc1 2019-04-04 martijn
35 06f6b49b 2019-04-06 martijn struct dkim_signature {
36 06f6b49b 2019-04-06 martijn char *signature;
37 06f6b49b 2019-04-06 martijn size_t size;
38 06f6b49b 2019-04-06 martijn size_t len;
39 06f6b49b 2019-04-06 martijn };
40 06f6b49b 2019-04-06 martijn
41 6840f1a1 2019-08-22 martijn struct dkim_message {
42 48c4bdc1 2019-04-04 martijn FILE *origf;
43 48c4bdc1 2019-04-04 martijn int parsing_headers;
44 48c4bdc1 2019-04-04 martijn char **headers;
45 48c4bdc1 2019-04-04 martijn int lastheader;
46 48c4bdc1 2019-04-04 martijn size_t body_whitelines;
47 48c4bdc1 2019-04-04 martijn int has_body;
48 06f6b49b 2019-04-06 martijn struct dkim_signature signature;
49 fa9e6602 2019-05-01 martijn int err;
50 6bcbc798 2021-05-16 martijn EVP_MD_CTX *dctx;
51 48c4bdc1 2019-04-04 martijn };
52 48c4bdc1 2019-04-04 martijn
53 37c6191b 2019-04-06 martijn /* RFC 6376 section 5.4.1 */
54 37c6191b 2019-04-06 martijn static char *dsign_headers[] = {
55 37c6191b 2019-04-06 martijn "from",
56 37c6191b 2019-04-06 martijn "reply-to",
57 37c6191b 2019-04-06 martijn "subject",
58 37c6191b 2019-04-06 martijn "date",
59 37c6191b 2019-04-06 martijn "to",
60 37c6191b 2019-04-06 martijn "cc",
61 37c6191b 2019-04-06 martijn "resent-date",
62 37c6191b 2019-04-06 martijn "resent-from",
63 37c6191b 2019-04-06 martijn "resent-to",
64 37c6191b 2019-04-06 martijn "resent-cc",
65 37c6191b 2019-04-06 martijn "in-reply-to",
66 37c6191b 2019-04-06 martijn "references",
67 37c6191b 2019-04-06 martijn "list-id",
68 37c6191b 2019-04-06 martijn "list-help",
69 37c6191b 2019-04-06 martijn "list-unsubscribe",
70 37c6191b 2019-04-06 martijn "list-subscribe",
71 37c6191b 2019-04-06 martijn "list-post",
72 37c6191b 2019-04-06 martijn "list-owner",
73 37c6191b 2019-04-06 martijn "list-archive"
74 37c6191b 2019-04-06 martijn };
75 37c6191b 2019-04-06 martijn static char **sign_headers = dsign_headers;
76 37c6191b 2019-04-06 martijn static size_t nsign_headers = sizeof(dsign_headers) / sizeof(*dsign_headers);
77 48c4bdc1 2019-04-04 martijn
78 fddd7e1e 2019-04-06 martijn static char *hashalg = "sha256";
79 fddd7e1e 2019-04-06 martijn static char *cryptalg = "rsa";
80 48c4bdc1 2019-04-04 martijn
81 48c4bdc1 2019-04-04 martijn #define CANON_SIMPLE 0
82 48c4bdc1 2019-04-04 martijn #define CANON_RELAXED 1
83 48c4bdc1 2019-04-04 martijn static int canonheader = CANON_SIMPLE;
84 48c4bdc1 2019-04-04 martijn static int canonbody = CANON_SIMPLE;
85 48c4bdc1 2019-04-04 martijn
86 e7076cef 2019-05-02 martijn static int addtime = 0;
87 e974922c 2019-05-02 martijn static long long addexpire = 0;
88 c826412d 2019-05-02 martijn static int addheaders = 0;
89 e7076cef 2019-05-02 martijn
90 40cd76f4 2020-08-30 martijn static char **domain = NULL;
91 40cd76f4 2020-08-30 martijn static size_t ndomains = 0;
92 06f6b49b 2019-04-06 martijn static char *selector = NULL;
93 48c4bdc1 2019-04-04 martijn
94 06f6b49b 2019-04-06 martijn static EVP_PKEY *pkey;
95 06f6b49b 2019-04-06 martijn static const EVP_MD *hash_md;
96 6bcbc798 2021-05-16 martijn static int keyid = EVP_PKEY_RSA;
97 6bcbc798 2021-05-16 martijn static int sephash = 0;
98 06f6b49b 2019-04-06 martijn
99 06f6b49b 2019-04-06 martijn #define DKIM_SIGNATURE_LINELEN 78
100 06f6b49b 2019-04-06 martijn
101 48c4bdc1 2019-04-04 martijn void usage(void);
102 5fdffb49 2022-01-27 martijn void dkim_adddomain(char *);
103 6840f1a1 2019-08-22 martijn void dkim_err(struct dkim_message *, char *);
104 6840f1a1 2019-08-22 martijn void dkim_errx(struct dkim_message *, char *);
105 48c4bdc1 2019-04-04 martijn void dkim_headers_set(char *);
106 6840f1a1 2019-08-22 martijn void dkim_dataline(struct osmtpd_ctx *, const char *);
107 6840f1a1 2019-08-22 martijn void dkim_commit(struct osmtpd_ctx *);
108 6840f1a1 2019-08-22 martijn void *dkim_message_new(struct osmtpd_ctx *);
109 6840f1a1 2019-08-22 martijn void dkim_message_free(struct osmtpd_ctx *, void *);
110 6840f1a1 2019-08-22 martijn void dkim_parse_header(struct dkim_message *, char *, int);
111 6840f1a1 2019-08-22 martijn void dkim_parse_body(struct dkim_message *, char *);
112 6840f1a1 2019-08-22 martijn void dkim_sign(struct osmtpd_ctx *);
113 6840f1a1 2019-08-22 martijn int dkim_signature_printheader(struct dkim_message *, const char *);
114 6840f1a1 2019-08-22 martijn int dkim_signature_printf(struct dkim_message *, char *, ...)
115 06f6b49b 2019-04-06 martijn __attribute__((__format__ (printf, 2, 3)));
116 6840f1a1 2019-08-22 martijn int dkim_signature_normalize(struct dkim_message *);
117 40cd76f4 2020-08-30 martijn const char *dkim_domain_select(struct dkim_message *, char *);
118 6840f1a1 2019-08-22 martijn int dkim_signature_need(struct dkim_message *, size_t);
119 6840f1a1 2019-08-22 martijn int dkim_sign_init(struct dkim_message *);
120 48c4bdc1 2019-04-04 martijn
121 48c4bdc1 2019-04-04 martijn int
122 48c4bdc1 2019-04-04 martijn main(int argc, char *argv[])
123 48c4bdc1 2019-04-04 martijn {
124 48c4bdc1 2019-04-04 martijn int ch;
125 5fdffb49 2022-01-27 martijn FILE *file;
126 5fdffb49 2022-01-27 martijn char *line;
127 5fdffb49 2022-01-27 martijn size_t linesz;
128 5fdffb49 2022-01-27 martijn ssize_t linelen;
129 e974922c 2019-05-02 martijn const char *errstr;
130 48c4bdc1 2019-04-04 martijn
131 5fdffb49 2022-01-27 martijn while ((ch = getopt(argc, argv, "a:c:D:d:h:k:s:tx:z")) != -1) {
132 48c4bdc1 2019-04-04 martijn switch (ch) {
133 48c4bdc1 2019-04-04 martijn case 'a':
134 6bcbc798 2021-05-16 martijn if (strncmp(optarg, "rsa-", 4) == 0) {
135 6bcbc798 2021-05-16 martijn cryptalg = "rsa";
136 6bcbc798 2021-05-16 martijn hashalg = optarg + 4;
137 6bcbc798 2021-05-16 martijn keyid = EVP_PKEY_RSA;
138 6bcbc798 2021-05-16 martijn sephash = 0;
139 6bcbc798 2021-05-16 martijn #ifdef HAVE_ED25519
140 6bcbc798 2021-05-16 martijn } else if (strncmp(optarg, "ed25519-", 8) == 0) {
141 6bcbc798 2021-05-16 martijn hashalg = optarg + 8;
142 6bcbc798 2021-05-16 martijn cryptalg = "ed25519";
143 6bcbc798 2021-05-16 martijn keyid = EVP_PKEY_ED25519;
144 6bcbc798 2021-05-16 martijn sephash = 1;
145 6bcbc798 2021-05-16 martijn #endif
146 6bcbc798 2021-05-16 martijn } else
147 6bcbc798 2021-05-16 martijn osmtpd_errx(1, "invalid algorithm");
148 48c4bdc1 2019-04-04 martijn break;
149 48c4bdc1 2019-04-04 martijn case 'c':
150 48c4bdc1 2019-04-04 martijn if (strncmp(optarg, "simple", 6) == 0) {
151 48c4bdc1 2019-04-04 martijn canonheader = CANON_SIMPLE;
152 48c4bdc1 2019-04-04 martijn optarg += 6;
153 48c4bdc1 2019-04-04 martijn } else if (strncmp(optarg, "relaxed", 7) == 0) {
154 48c4bdc1 2019-04-04 martijn canonheader = CANON_RELAXED;
155 48c4bdc1 2019-04-04 martijn optarg += 7;
156 48c4bdc1 2019-04-04 martijn } else
157 6840f1a1 2019-08-22 martijn osmtpd_err(1, "Invalid canonicalization");
158 48c4bdc1 2019-04-04 martijn if (optarg[0] == '/') {
159 48c4bdc1 2019-04-04 martijn if (strcmp(optarg + 1, "simple") == 0)
160 48c4bdc1 2019-04-04 martijn canonbody = CANON_SIMPLE;
161 48c4bdc1 2019-04-04 martijn else if (strcmp(optarg + 1, "relaxed") == 0)
162 48c4bdc1 2019-04-04 martijn canonbody = CANON_RELAXED;
163 48c4bdc1 2019-04-04 martijn else
164 6840f1a1 2019-08-22 martijn osmtpd_err(1,
165 6840f1a1 2019-08-22 martijn "Invalid canonicalization");
166 48c4bdc1 2019-04-04 martijn } else if (optarg[0] == '\0')
167 48c4bdc1 2019-04-04 martijn canonbody = CANON_SIMPLE;
168 48c4bdc1 2019-04-04 martijn else
169 6840f1a1 2019-08-22 martijn osmtpd_err(1, "Invalid canonicalization");
170 48c4bdc1 2019-04-04 martijn break;
171 5fdffb49 2022-01-27 martijn case 'D':
172 5fdffb49 2022-01-27 martijn if ((file = fopen(optarg, "r")) == NULL)
173 5fdffb49 2022-01-27 martijn osmtpd_err(1, "Can't open domain file (%s)",
174 5fdffb49 2022-01-27 martijn optarg);
175 5fdffb49 2022-01-27 martijn do {
176 5fdffb49 2022-01-27 martijn line = NULL;
177 5fdffb49 2022-01-27 martijn linesz = 0;
178 5fdffb49 2022-01-27 martijn linelen = getline(&line, &linesz, file);
179 5fdffb49 2022-01-27 martijn if (linelen > 0) {
180 5fdffb49 2022-01-27 martijn if (line[linelen - 1] == '\n')
181 5fdffb49 2022-01-27 martijn line[linelen - 1] = '\0';
182 5fdffb49 2022-01-27 martijn dkim_adddomain(line);
183 5fdffb49 2022-01-27 martijn }
184 5fdffb49 2022-01-27 martijn } while (linelen != -1);
185 5fdffb49 2022-01-27 martijn if (ferror(file))
186 5fdffb49 2022-01-27 martijn osmtpd_err(1, "Error reading domain file (%s)",
187 5fdffb49 2022-01-27 martijn optarg);
188 5fdffb49 2022-01-27 martijn fclose(file);
189 5fdffb49 2022-01-27 martijn break;
190 48c4bdc1 2019-04-04 martijn case 'd':
191 5fdffb49 2022-01-27 martijn dkim_adddomain(optarg);
192 48c4bdc1 2019-04-04 martijn break;
193 06f6b49b 2019-04-06 martijn case 'h':
194 06f6b49b 2019-04-06 martijn dkim_headers_set(optarg);
195 06f6b49b 2019-04-06 martijn break;
196 06f6b49b 2019-04-06 martijn case 'k':
197 5fdffb49 2022-01-27 martijn if ((file = fopen(optarg, "r")) == NULL)
198 6840f1a1 2019-08-22 martijn osmtpd_err(1, "Can't open key file (%s)",
199 6840f1a1 2019-08-22 martijn optarg);
200 5fdffb49 2022-01-27 martijn pkey = PEM_read_PrivateKey(file, NULL, NULL, NULL);
201 06f6b49b 2019-04-06 martijn if (pkey == NULL)
202 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "Can't read key file");
203 5fdffb49 2022-01-27 martijn fclose(file);
204 06f6b49b 2019-04-06 martijn break;
205 06f6b49b 2019-04-06 martijn case 's':
206 06f6b49b 2019-04-06 martijn selector = optarg;
207 06f6b49b 2019-04-06 martijn break;
208 e7076cef 2019-05-02 martijn case 't':
209 e7076cef 2019-05-02 martijn addtime = 1;
210 e7076cef 2019-05-02 martijn break;
211 e974922c 2019-05-02 martijn case 'x':
212 e974922c 2019-05-02 martijn addexpire = strtonum(optarg, 1, INT64_MAX, &errstr);
213 e974922c 2019-05-02 martijn if (addexpire == 0)
214 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "Expire offset is %s", errstr);
215 e974922c 2019-05-02 martijn break;
216 c826412d 2019-05-02 martijn case 'z':
217 6840f1a1 2019-08-22 martijn addheaders++;
218 c826412d 2019-05-02 martijn break;
219 48c4bdc1 2019-04-04 martijn default:
220 48c4bdc1 2019-04-04 martijn usage();
221 48c4bdc1 2019-04-04 martijn }
222 48c4bdc1 2019-04-04 martijn }
223 fddd7e1e 2019-04-06 martijn
224 fddd7e1e 2019-04-06 martijn OpenSSL_add_all_digests();
225 fddd7e1e 2019-04-06 martijn
226 6840f1a1 2019-08-22 martijn if (pledge("tmppath stdio", NULL) == -1)
227 6840f1a1 2019-08-22 martijn osmtpd_err(1, "pledge");
228 48c4bdc1 2019-04-04 martijn
229 6bcbc798 2021-05-16 martijn if ((hash_md = EVP_get_digestbyname(hashalg)) == NULL)
230 6bcbc798 2021-05-16 martijn osmtpd_errx(1, "Can't find hash: %s", hashalg);
231 6bcbc798 2021-05-16 martijn
232 06f6b49b 2019-04-06 martijn if (domain == NULL || selector == NULL || pkey == NULL)
233 48c4bdc1 2019-04-04 martijn usage();
234 48c4bdc1 2019-04-04 martijn
235 6bcbc798 2021-05-16 martijn if (EVP_PKEY_id(pkey) != keyid)
236 6bcbc798 2021-05-16 martijn osmtpd_errx(1, "Key is not of type %s", cryptalg);
237 6bcbc798 2021-05-16 martijn
238 6840f1a1 2019-08-22 martijn osmtpd_register_filter_dataline(dkim_dataline);
239 6840f1a1 2019-08-22 martijn osmtpd_register_filter_commit(dkim_commit);
240 6840f1a1 2019-08-22 martijn osmtpd_local_message(dkim_message_new, dkim_message_free);
241 6840f1a1 2019-08-22 martijn osmtpd_run();
242 48c4bdc1 2019-04-04 martijn
243 48c4bdc1 2019-04-04 martijn return 0;
244 48c4bdc1 2019-04-04 martijn }
245 48c4bdc1 2019-04-04 martijn
246 48c4bdc1 2019-04-04 martijn void
247 5fdffb49 2022-01-27 martijn dkim_adddomain(char *d)
248 5fdffb49 2022-01-27 martijn {
249 5fdffb49 2022-01-27 martijn domain = reallocarray(domain, ndomains + 1, sizeof(*domain));
250 5fdffb49 2022-01-27 martijn if (domain == NULL)
251 5fdffb49 2022-01-27 martijn osmtpd_err(1, "malloc");
252 5fdffb49 2022-01-27 martijn domain[ndomains++] = d;
253 5fdffb49 2022-01-27 martijn
254 5fdffb49 2022-01-27 martijn }
255 5fdffb49 2022-01-27 martijn
256 5fdffb49 2022-01-27 martijn void
257 6840f1a1 2019-08-22 martijn dkim_dataline(struct osmtpd_ctx *ctx, const char *line)
258 48c4bdc1 2019-04-04 martijn {
259 6840f1a1 2019-08-22 martijn struct dkim_message *message = ctx->local_message;
260 6840f1a1 2019-08-22 martijn char *linedup;
261 48c4bdc1 2019-04-04 martijn size_t linelen;
262 48c4bdc1 2019-04-04 martijn
263 d52cf19a 2020-07-25 martijn if (message->err) {
264 d52cf19a 2020-07-25 martijn if (line[0] == '.' && line[1] =='\0')
265 d52cf19a 2020-07-25 martijn osmtpd_filter_dataline(ctx, ".");
266 fa9e6602 2019-05-01 martijn return;
267 d52cf19a 2020-07-25 martijn }
268 48c4bdc1 2019-04-04 martijn
269 48c4bdc1 2019-04-04 martijn linelen = strlen(line);
270 6840f1a1 2019-08-22 martijn if (fprintf(message->origf, "%s\n", line) < (int) linelen)
271 71b92702 2021-05-14 martijn dkim_errx(message, "Couldn't write to tempfile");
272 48c4bdc1 2019-04-04 martijn
273 7ecf4491 2019-05-01 martijn if (line[0] == '.' && line[1] =='\0') {
274 6840f1a1 2019-08-22 martijn dkim_sign(ctx);
275 6840f1a1 2019-08-22 martijn } else if (linelen != 0 && message->parsing_headers) {
276 f5286ea3 2019-04-08 martijn if (line[0] == '.')
277 f5286ea3 2019-04-08 martijn line++;
278 6840f1a1 2019-08-22 martijn if ((linedup = strdup(line)) == NULL)
279 6840f1a1 2019-08-22 martijn osmtpd_err(1, "strdup");
280 6840f1a1 2019-08-22 martijn dkim_parse_header(message, linedup, 0);
281 6840f1a1 2019-08-22 martijn free(linedup);
282 6840f1a1 2019-08-22 martijn } else if (linelen == 0 && message->parsing_headers) {
283 6840f1a1 2019-08-22 martijn if (addheaders > 0 && !dkim_signature_printf(message, "; "))
284 c826412d 2019-05-02 martijn return;
285 6840f1a1 2019-08-22 martijn message->parsing_headers = 0;
286 f5286ea3 2019-04-08 martijn } else {
287 f5286ea3 2019-04-08 martijn if (line[0] == '.')
288 f5286ea3 2019-04-08 martijn line++;
289 6840f1a1 2019-08-22 martijn if ((linedup = strdup(line)) == NULL)
290 6840f1a1 2019-08-22 martijn osmtpd_err(1, "strdup");
291 6840f1a1 2019-08-22 martijn dkim_parse_body(message, linedup);
292 6840f1a1 2019-08-22 martijn free(linedup);
293 f5286ea3 2019-04-08 martijn }
294 48c4bdc1 2019-04-04 martijn }
295 48c4bdc1 2019-04-04 martijn
296 fa9e6602 2019-05-01 martijn void
297 6840f1a1 2019-08-22 martijn dkim_commit(struct osmtpd_ctx *ctx)
298 fa9e6602 2019-05-01 martijn {
299 6840f1a1 2019-08-22 martijn struct dkim_message *message = ctx->local_message;
300 fa9e6602 2019-05-01 martijn
301 6840f1a1 2019-08-22 martijn if (message->err)
302 6840f1a1 2019-08-22 martijn osmtpd_filter_disconnect(ctx, "Internal server error");
303 fa9e6602 2019-05-01 martijn else
304 6840f1a1 2019-08-22 martijn osmtpd_filter_proceed(ctx);
305 fa9e6602 2019-05-01 martijn }
306 fa9e6602 2019-05-01 martijn
307 6840f1a1 2019-08-22 martijn void *
308 6840f1a1 2019-08-22 martijn dkim_message_new(struct osmtpd_ctx *ctx)
309 48c4bdc1 2019-04-04 martijn {
310 6840f1a1 2019-08-22 martijn struct dkim_message *message;
311 48c4bdc1 2019-04-04 martijn
312 41815bcc 2021-05-14 martijn if ((message = calloc(1, sizeof(*message))) == NULL) {
313 41815bcc 2021-05-14 martijn dkim_err(message, "Failed to create message context");
314 41815bcc 2021-05-14 martijn return NULL;
315 41815bcc 2021-05-14 martijn }
316 48c4bdc1 2019-04-04 martijn
317 6840f1a1 2019-08-22 martijn if ((message->origf = tmpfile()) == NULL) {
318 41815bcc 2021-05-14 martijn dkim_err(message, "Failed to open tempfile");
319 41815bcc 2021-05-14 martijn goto fail;
320 48c4bdc1 2019-04-04 martijn }
321 6840f1a1 2019-08-22 martijn message->parsing_headers = 1;
322 48c4bdc1 2019-04-04 martijn
323 6840f1a1 2019-08-22 martijn message->body_whitelines = 0;
324 6840f1a1 2019-08-22 martijn message->headers = calloc(1, sizeof(*(message->headers)));
325 6840f1a1 2019-08-22 martijn if (message->headers == NULL) {
326 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't save headers");
327 41815bcc 2021-05-14 martijn goto fail;
328 48c4bdc1 2019-04-04 martijn }
329 6840f1a1 2019-08-22 martijn message->lastheader = 0;
330 6840f1a1 2019-08-22 martijn message->signature.signature = NULL;
331 6840f1a1 2019-08-22 martijn message->signature.size = 0;
332 6840f1a1 2019-08-22 martijn message->signature.len = 0;
333 6840f1a1 2019-08-22 martijn message->err = 0;
334 48c4bdc1 2019-04-04 martijn
335 6840f1a1 2019-08-22 martijn if (!dkim_signature_printf(message,
336 40cd76f4 2020-08-30 martijn "DKIM-Signature: v=%s; a=%s-%s; c=%s/%s; s=%s; ", "1",
337 fa10b9e8 2019-04-06 martijn cryptalg, hashalg,
338 06f6b49b 2019-04-06 martijn canonheader == CANON_SIMPLE ? "simple" : "relaxed",
339 40cd76f4 2020-08-30 martijn canonbody == CANON_SIMPLE ? "simple" : "relaxed", selector))
340 41815bcc 2021-05-14 martijn goto fail;
341 6840f1a1 2019-08-22 martijn if (addheaders > 0 && !dkim_signature_printf(message, "z="))
342 41815bcc 2021-05-14 martijn goto fail;
343 06f6b49b 2019-04-06 martijn
344 6bcbc798 2021-05-16 martijn if ((message->dctx = EVP_MD_CTX_new()) == NULL) {
345 41815bcc 2021-05-14 martijn dkim_errx(message, "Failed to create hash context");
346 41815bcc 2021-05-14 martijn goto fail;
347 06f6b49b 2019-04-06 martijn }
348 6bcbc798 2021-05-16 martijn if (EVP_DigestInit_ex(message->dctx, hash_md, NULL) <= 0) {
349 6840f1a1 2019-08-22 martijn dkim_errx(message, "Failed to initialize hash context");
350 41815bcc 2021-05-14 martijn goto fail;
351 37df18b6 2019-04-06 martijn }
352 6840f1a1 2019-08-22 martijn return message;
353 41815bcc 2021-05-14 martijn fail:
354 500ea6d4 2022-01-27 martijn dkim_message_free(ctx, message);
355 41815bcc 2021-05-14 martijn return NULL;
356 48c4bdc1 2019-04-04 martijn }
357 48c4bdc1 2019-04-04 martijn
358 48c4bdc1 2019-04-04 martijn void
359 6840f1a1 2019-08-22 martijn dkim_message_free(struct osmtpd_ctx *ctx, void *data)
360 48c4bdc1 2019-04-04 martijn {
361 6840f1a1 2019-08-22 martijn struct dkim_message *message = data;
362 48c4bdc1 2019-04-04 martijn size_t i;
363 48c4bdc1 2019-04-04 martijn
364 6840f1a1 2019-08-22 martijn fclose(message->origf);
365 6bcbc798 2021-05-16 martijn EVP_MD_CTX_free(message->dctx);
366 6840f1a1 2019-08-22 martijn free(message->signature.signature);
367 500ea6d4 2022-01-27 martijn for (i = 0; message->headers != NULL &&
368 500ea6d4 2022-01-27 martijn message->headers[i] != NULL; i++)
369 6840f1a1 2019-08-22 martijn free(message->headers[i]);
370 6840f1a1 2019-08-22 martijn free(message->headers);
371 6840f1a1 2019-08-22 martijn free(message);
372 48c4bdc1 2019-04-04 martijn }
373 48c4bdc1 2019-04-04 martijn
374 48c4bdc1 2019-04-04 martijn void
375 48c4bdc1 2019-04-04 martijn dkim_headers_set(char *headers)
376 48c4bdc1 2019-04-04 martijn {
377 48c4bdc1 2019-04-04 martijn size_t i;
378 48c4bdc1 2019-04-04 martijn int has_from = 0;
379 48c4bdc1 2019-04-04 martijn
380 48c4bdc1 2019-04-04 martijn nsign_headers = 1;
381 48c4bdc1 2019-04-04 martijn
382 48c4bdc1 2019-04-04 martijn for (i = 0; headers[i] != '\0'; i++) {
383 48c4bdc1 2019-04-04 martijn /* RFC 5322 field-name */
384 48c4bdc1 2019-04-04 martijn if (!(headers[i] >= 33 && headers[i] <= 126))
385 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "-h: invalid character");
386 48c4bdc1 2019-04-04 martijn if (headers[i] == ':') {
387 48c4bdc1 2019-04-04 martijn /* Test for empty headers */
388 48c4bdc1 2019-04-04 martijn if (i == 0 || headers[i - 1] == ':')
389 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "-h: header can't be empty");
390 48c4bdc1 2019-04-04 martijn nsign_headers++;
391 48c4bdc1 2019-04-04 martijn }
392 48c4bdc1 2019-04-04 martijn headers[i] = tolower(headers[i]);
393 48c4bdc1 2019-04-04 martijn }
394 48c4bdc1 2019-04-04 martijn if (headers[i - 1] == ':')
395 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "-h: header can't be empty");
396 48c4bdc1 2019-04-04 martijn
397 6840f1a1 2019-08-22 martijn if ((sign_headers = reallocarray(NULL, nsign_headers + 1,
398 6840f1a1 2019-08-22 martijn sizeof(*sign_headers))) == NULL)
399 6840f1a1 2019-08-22 martijn osmtpd_errx(1, NULL);
400 48c4bdc1 2019-04-04 martijn
401 48c4bdc1 2019-04-04 martijn for (i = 0; i < nsign_headers; i++) {
402 48c4bdc1 2019-04-04 martijn sign_headers[i] = headers;
403 48c4bdc1 2019-04-04 martijn if (i != nsign_headers - 1) {
404 48c4bdc1 2019-04-04 martijn headers = strchr(headers, ':');
405 48c4bdc1 2019-04-04 martijn headers++[0] = '\0';
406 48c4bdc1 2019-04-04 martijn }
407 48c4bdc1 2019-04-04 martijn if (strcasecmp(sign_headers[i], "from") == 0)
408 48c4bdc1 2019-04-04 martijn has_from = 1;
409 48c4bdc1 2019-04-04 martijn }
410 48c4bdc1 2019-04-04 martijn if (!has_from)
411 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "From header must be included");
412 48c4bdc1 2019-04-04 martijn }
413 48c4bdc1 2019-04-04 martijn
414 48c4bdc1 2019-04-04 martijn void
415 6840f1a1 2019-08-22 martijn dkim_err(struct dkim_message *message, char *msg)
416 48c4bdc1 2019-04-04 martijn {
417 6840f1a1 2019-08-22 martijn message->err = 1;
418 803cdd74 2020-07-25 martijn fprintf(stderr, "%s: %s\n", msg, strerror(errno));
419 48c4bdc1 2019-04-04 martijn }
420 48c4bdc1 2019-04-04 martijn
421 48c4bdc1 2019-04-04 martijn void
422 6840f1a1 2019-08-22 martijn dkim_errx(struct dkim_message *message, char *msg)
423 48c4bdc1 2019-04-04 martijn {
424 6840f1a1 2019-08-22 martijn message->err = 1;
425 6840f1a1 2019-08-22 martijn fprintf(stderr, "%s\n", msg);
426 48c4bdc1 2019-04-04 martijn }
427 48c4bdc1 2019-04-04 martijn
428 48c4bdc1 2019-04-04 martijn void
429 6840f1a1 2019-08-22 martijn dkim_parse_header(struct dkim_message *message, char *line, int force)
430 48c4bdc1 2019-04-04 martijn {
431 48c4bdc1 2019-04-04 martijn size_t i;
432 48c4bdc1 2019-04-04 martijn size_t r, w;
433 48c4bdc1 2019-04-04 martijn size_t linelen;
434 48c4bdc1 2019-04-04 martijn size_t lastheader;
435 06f6b49b 2019-04-06 martijn size_t hlen;
436 b6e37a5e 2019-04-08 martijn int fieldname = 0;
437 48c4bdc1 2019-04-04 martijn char **mtmp;
438 48c4bdc1 2019-04-04 martijn char *htmp;
439 63ac36ce 2019-04-08 martijn char *tmp;
440 48c4bdc1 2019-04-04 martijn
441 c826412d 2019-05-02 martijn if (addheaders == 2 && !force &&
442 6840f1a1 2019-08-22 martijn !dkim_signature_printheader(message, line))
443 c826412d 2019-05-02 martijn return;
444 c826412d 2019-05-02 martijn
445 6840f1a1 2019-08-22 martijn if ((line[0] == ' ' || line[0] == '\t') && !message->lastheader)
446 48c4bdc1 2019-04-04 martijn return;
447 48c4bdc1 2019-04-04 martijn if ((line[0] != ' ' && line[0] != '\t')) {
448 6840f1a1 2019-08-22 martijn message->lastheader = 0;
449 48c4bdc1 2019-04-04 martijn for (i = 0; i < nsign_headers; i++) {
450 06f6b49b 2019-04-06 martijn hlen = strlen(sign_headers[i]);
451 06f6b49b 2019-04-06 martijn if (strncasecmp(line, sign_headers[i], hlen) == 0) {
452 06f6b49b 2019-04-06 martijn while (line[hlen] == ' ' || line[hlen] == '\t')
453 06f6b49b 2019-04-06 martijn hlen++;
454 06f6b49b 2019-04-06 martijn if (line[hlen] != ':')
455 06f6b49b 2019-04-06 martijn continue;
456 48c4bdc1 2019-04-04 martijn break;
457 48c4bdc1 2019-04-04 martijn }
458 48c4bdc1 2019-04-04 martijn }
459 06f6b49b 2019-04-06 martijn if (i == nsign_headers && !force)
460 48c4bdc1 2019-04-04 martijn return;
461 48c4bdc1 2019-04-04 martijn }
462 48c4bdc1 2019-04-04 martijn
463 c826412d 2019-05-02 martijn if (addheaders == 1 && !force &&
464 6840f1a1 2019-08-22 martijn !dkim_signature_printheader(message, line))
465 c826412d 2019-05-02 martijn return;
466 c826412d 2019-05-02 martijn
467 48c4bdc1 2019-04-04 martijn if (canonheader == CANON_RELAXED) {
468 6840f1a1 2019-08-22 martijn if (!message->lastheader)
469 b6e37a5e 2019-04-08 martijn fieldname = 1;
470 48c4bdc1 2019-04-04 martijn for (r = w = 0; line[r] != '\0'; r++) {
471 5d06ccad 2019-04-08 martijn if (line[r] == ':' && fieldname) {
472 cd6f9b03 2019-10-23 martijn if (w > 0 && line[w - 1] == ' ')
473 48c4bdc1 2019-04-04 martijn line[w - 1] = ':';
474 48c4bdc1 2019-04-04 martijn else
475 48c4bdc1 2019-04-04 martijn line[w++] = ':';
476 48c4bdc1 2019-04-04 martijn fieldname = 0;
477 48c4bdc1 2019-04-04 martijn while (line[r + 1] == ' ' ||
478 48c4bdc1 2019-04-04 martijn line[r + 1] == '\t')
479 48c4bdc1 2019-04-04 martijn r++;
480 48c4bdc1 2019-04-04 martijn continue;
481 48c4bdc1 2019-04-04 martijn }
482 06f6b49b 2019-04-06 martijn if (line[r] == ' ' || line[r] == '\t' ||
483 06f6b49b 2019-04-06 martijn line[r] == '\r' || line[r] == '\n') {
484 cd6f9b03 2019-10-23 martijn if (r != 0 && w != 0 && line[w - 1] == ' ')
485 48c4bdc1 2019-04-04 martijn continue;
486 48c4bdc1 2019-04-04 martijn else
487 48c4bdc1 2019-04-04 martijn line[w++] = ' ';
488 48c4bdc1 2019-04-04 martijn } else if (fieldname) {
489 48c4bdc1 2019-04-04 martijn line[w++] = tolower(line[r]);
490 48c4bdc1 2019-04-04 martijn continue;
491 48c4bdc1 2019-04-04 martijn } else
492 48c4bdc1 2019-04-04 martijn line[w++] = line[r];
493 48c4bdc1 2019-04-04 martijn }
494 cd6f9b03 2019-10-23 martijn linelen = (w != 0 && line[w - 1] == ' ') ? w - 1 : w;
495 48c4bdc1 2019-04-04 martijn line[linelen] = '\0';
496 48c4bdc1 2019-04-04 martijn } else
497 48c4bdc1 2019-04-04 martijn linelen = strlen(line);
498 48c4bdc1 2019-04-04 martijn
499 6840f1a1 2019-08-22 martijn for (lastheader = 0; message->headers[lastheader] != NULL; lastheader++)
500 48c4bdc1 2019-04-04 martijn continue;
501 6840f1a1 2019-08-22 martijn if (!message->lastheader) {
502 6840f1a1 2019-08-22 martijn mtmp = recallocarray(message->headers, lastheader + 1,
503 a53d74c4 2019-04-08 martijn lastheader + 2, sizeof(*mtmp));
504 48c4bdc1 2019-04-04 martijn if (mtmp == NULL) {
505 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't store header");
506 48c4bdc1 2019-04-04 martijn return;
507 48c4bdc1 2019-04-04 martijn }
508 6840f1a1 2019-08-22 martijn message->headers = mtmp;
509 6840f1a1 2019-08-22 martijn
510 500ea6d4 2022-01-27 martijn if ((message->headers[lastheader] = strdup(line)) == NULL) {
511 500ea6d4 2022-01-27 martijn dkim_err(message, "Can't store header");
512 500ea6d4 2022-01-27 martijn return;
513 500ea6d4 2022-01-27 martijn }
514 6840f1a1 2019-08-22 martijn message->headers[lastheader + 1 ] = NULL;
515 6840f1a1 2019-08-22 martijn message->lastheader = 1;
516 48c4bdc1 2019-04-04 martijn } else {
517 48c4bdc1 2019-04-04 martijn lastheader--;
518 6840f1a1 2019-08-22 martijn linelen += strlen(message->headers[lastheader]);
519 48c4bdc1 2019-04-04 martijn if (canonheader == CANON_SIMPLE)
520 48c4bdc1 2019-04-04 martijn linelen += 2;
521 48c4bdc1 2019-04-04 martijn linelen++;
522 6840f1a1 2019-08-22 martijn htmp = reallocarray(message->headers[lastheader], linelen,
523 48c4bdc1 2019-04-04 martijn sizeof(*htmp));
524 48c4bdc1 2019-04-04 martijn if (htmp == NULL) {
525 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't store header");
526 48c4bdc1 2019-04-04 martijn return;
527 48c4bdc1 2019-04-04 martijn }
528 6840f1a1 2019-08-22 martijn message->headers[lastheader] = htmp;
529 48c4bdc1 2019-04-04 martijn if (canonheader == CANON_SIMPLE) {
530 48c4bdc1 2019-04-04 martijn if (strlcat(htmp, "\r\n", linelen) >= linelen)
531 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "Missized header");
532 63ac36ce 2019-04-08 martijn } else if (canonheader == CANON_RELAXED &&
533 6840f1a1 2019-08-22 martijn (tmp = strchr(message->headers[lastheader], ':')) != NULL &&
534 63ac36ce 2019-04-08 martijn tmp[1] == '\0')
535 63ac36ce 2019-04-08 martijn line++;
536 63ac36ce 2019-04-08 martijn
537 48c4bdc1 2019-04-04 martijn if (strlcat(htmp, line, linelen) >= linelen)
538 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "Missized header");
539 48c4bdc1 2019-04-04 martijn }
540 48c4bdc1 2019-04-04 martijn }
541 48c4bdc1 2019-04-04 martijn
542 48c4bdc1 2019-04-04 martijn void
543 6840f1a1 2019-08-22 martijn dkim_parse_body(struct dkim_message *message, char *line)
544 48c4bdc1 2019-04-04 martijn {
545 48c4bdc1 2019-04-04 martijn size_t r, w;
546 48c4bdc1 2019-04-04 martijn size_t linelen;
547 1308710c 2019-04-09 martijn
548 1308710c 2019-04-09 martijn if (canonbody == CANON_RELAXED) {
549 1308710c 2019-04-09 martijn for (r = w = 0; line[r] != '\0'; r++) {
550 1308710c 2019-04-09 martijn if (line[r] == ' ' || line[r] == '\t') {
551 1308710c 2019-04-09 martijn if (r != 0 && line[w - 1] == ' ')
552 1308710c 2019-04-09 martijn continue;
553 1308710c 2019-04-09 martijn else
554 1308710c 2019-04-09 martijn line[w++] = ' ';
555 1308710c 2019-04-09 martijn } else
556 1308710c 2019-04-09 martijn line[w++] = line[r];
557 1308710c 2019-04-09 martijn }
558 cd6f9b03 2019-10-23 martijn linelen = (w != 0 && line[w - 1] == ' ') ? w - 1 : w;
559 1308710c 2019-04-09 martijn line[linelen] = '\0';
560 1308710c 2019-04-09 martijn } else
561 1308710c 2019-04-09 martijn linelen = strlen(line);
562 1308710c 2019-04-09 martijn
563 48c4bdc1 2019-04-04 martijn if (line[0] == '\0') {
564 6840f1a1 2019-08-22 martijn message->body_whitelines++;
565 48c4bdc1 2019-04-04 martijn return;
566 48c4bdc1 2019-04-04 martijn }
567 48c4bdc1 2019-04-04 martijn
568 6840f1a1 2019-08-22 martijn while (message->body_whitelines--) {
569 6bcbc798 2021-05-16 martijn if (EVP_DigestUpdate(message->dctx, "\r\n", 2) == 0) {
570 71b92702 2021-05-14 martijn dkim_errx(message, "Can't update hash context");
571 48c4bdc1 2019-04-04 martijn return;
572 37df18b6 2019-04-06 martijn }
573 48c4bdc1 2019-04-04 martijn }
574 6840f1a1 2019-08-22 martijn message->body_whitelines = 0;
575 6840f1a1 2019-08-22 martijn message->has_body = 1;
576 48c4bdc1 2019-04-04 martijn
577 6bcbc798 2021-05-16 martijn if (EVP_DigestUpdate(message->dctx, line, linelen) == 0 ||
578 6bcbc798 2021-05-16 martijn EVP_DigestUpdate(message->dctx, "\r\n", 2) == 0) {
579 71b92702 2021-05-14 martijn dkim_errx(message, "Can't update hash context");
580 48c4bdc1 2019-04-04 martijn return;
581 37df18b6 2019-04-06 martijn }
582 48c4bdc1 2019-04-04 martijn }
583 48c4bdc1 2019-04-04 martijn
584 365862b1 2019-05-02 martijn void
585 6840f1a1 2019-08-22 martijn dkim_sign(struct osmtpd_ctx *ctx)
586 365862b1 2019-05-02 martijn {
587 6840f1a1 2019-08-22 martijn struct dkim_message *message = ctx->local_message;
588 365862b1 2019-05-02 martijn /* Use largest hash size here */
589 8e76d341 2021-06-02 martijn unsigned char bdigest[EVP_MAX_MD_SIZE];
590 8e76d341 2021-06-02 martijn unsigned char digest[(((sizeof(bdigest) + 2) / 3) * 4) + 1];
591 8e76d341 2021-06-02 martijn unsigned char *b;
592 40cd76f4 2020-08-30 martijn const char *sdomain = domain[0], *tsdomain;
593 e974922c 2019-05-02 martijn time_t now;
594 6840f1a1 2019-08-22 martijn ssize_t i;
595 6bcbc798 2021-05-16 martijn size_t linelen = 0;
596 365862b1 2019-05-02 martijn char *tmp, *tmp2;
597 8e76d341 2021-06-02 martijn unsigned int digestsz;
598 365862b1 2019-05-02 martijn
599 e974922c 2019-05-02 martijn if (addtime || addexpire)
600 e974922c 2019-05-02 martijn now = time(NULL);
601 a70fd4b2 2021-05-11 martijn if (addtime && !dkim_signature_printf(message, "t=%lld; ",
602 a70fd4b2 2021-05-11 martijn (long long)now))
603 2c88ced1 2021-05-16 martijn goto fail;
604 6840f1a1 2019-08-22 martijn if (addexpire != 0 && !dkim_signature_printf(message, "x=%lld; ",
605 e974922c 2019-05-02 martijn now + addexpire < now ? INT64_MAX : now + addexpire))
606 2c88ced1 2021-05-16 martijn goto fail;
607 e974922c 2019-05-02 martijn
608 6840f1a1 2019-08-22 martijn if (canonbody == CANON_SIMPLE && !message->has_body) {
609 6bcbc798 2021-05-16 martijn if (EVP_DigestUpdate(message->dctx, "\r\n", 2) <= 0) {
610 71b92702 2021-05-14 martijn dkim_errx(message, "Can't update hash context");
611 2c88ced1 2021-05-16 martijn goto fail;
612 365862b1 2019-05-02 martijn }
613 365862b1 2019-05-02 martijn }
614 6bcbc798 2021-05-16 martijn if (EVP_DigestFinal_ex(message->dctx, bdigest, &digestsz) == 0) {
615 71b92702 2021-05-14 martijn dkim_errx(message, "Can't finalize hash context");
616 2c88ced1 2021-05-16 martijn goto fail;
617 365862b1 2019-05-02 martijn }
618 6bcbc798 2021-05-16 martijn EVP_EncodeBlock(digest, bdigest, digestsz);
619 6bcbc798 2021-05-16 martijn if (!dkim_signature_printf(message, "bh=%s; h=", digest))
620 2c88ced1 2021-05-16 martijn goto fail;
621 365862b1 2019-05-02 martijn /* Reverse order for ease of use of RFC6367 section 5.4.2 */
622 6840f1a1 2019-08-22 martijn for (i = 0; message->headers[i] != NULL; i++)
623 365862b1 2019-05-02 martijn continue;
624 6bcbc798 2021-05-16 martijn EVP_MD_CTX_reset(message->dctx);
625 6bcbc798 2021-05-16 martijn if (!sephash) {
626 6bcbc798 2021-05-16 martijn if (EVP_DigestSignInit(message->dctx, NULL, hash_md, NULL,
627 6bcbc798 2021-05-16 martijn pkey) != 1) {
628 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to initialize signature "
629 6bcbc798 2021-05-16 martijn "context");
630 2c88ced1 2021-05-16 martijn goto fail;
631 6bcbc798 2021-05-16 martijn }
632 6bcbc798 2021-05-16 martijn } else {
633 6bcbc798 2021-05-16 martijn if (EVP_DigestInit_ex(message->dctx, hash_md, NULL) != 1) {
634 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to initialize hash context");
635 2c88ced1 2021-05-16 martijn goto fail;
636 6bcbc798 2021-05-16 martijn }
637 6bcbc798 2021-05-16 martijn }
638 365862b1 2019-05-02 martijn for (i--; i >= 0; i--) {
639 6bcbc798 2021-05-16 martijn if (!sephash) {
640 6bcbc798 2021-05-16 martijn if (EVP_DigestSignUpdate(message->dctx,
641 6bcbc798 2021-05-16 martijn message->headers[i],
642 6bcbc798 2021-05-16 martijn strlen(message->headers[i])) != 1 ||
643 6bcbc798 2021-05-16 martijn EVP_DigestSignUpdate(message->dctx, "\r\n",
644 6bcbc798 2021-05-16 martijn 2) <= 0) {
645 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to update signature "
646 6bcbc798 2021-05-16 martijn "context");
647 2c88ced1 2021-05-16 martijn goto fail;
648 6bcbc798 2021-05-16 martijn }
649 6bcbc798 2021-05-16 martijn } else {
650 6bcbc798 2021-05-16 martijn if (EVP_DigestUpdate(message->dctx, message->headers[i],
651 6bcbc798 2021-05-16 martijn strlen(message->headers[i])) != 1 ||
652 6bcbc798 2021-05-16 martijn EVP_DigestUpdate(message->dctx, "\r\n", 2) <= 0) {
653 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to update digest "
654 6bcbc798 2021-05-16 martijn "context");
655 2c88ced1 2021-05-16 martijn goto fail;
656 6bcbc798 2021-05-16 martijn }
657 365862b1 2019-05-02 martijn }
658 40cd76f4 2020-08-30 martijn if ((tsdomain = dkim_domain_select(message, message->headers[i])) != NULL)
659 40cd76f4 2020-08-30 martijn sdomain = tsdomain;
660 365862b1 2019-05-02 martijn /* We're done with the cached header after hashing */
661 6840f1a1 2019-08-22 martijn for (tmp = message->headers[i]; tmp[0] != ':'; tmp++) {
662 365862b1 2019-05-02 martijn if (tmp[0] == ' ' || tmp[0] == '\t')
663 365862b1 2019-05-02 martijn break;
664 365862b1 2019-05-02 martijn tmp[0] = tolower(tmp[0]);
665 365862b1 2019-05-02 martijn }
666 365862b1 2019-05-02 martijn tmp[0] = '\0';
667 6840f1a1 2019-08-22 martijn if (!dkim_signature_printf(message, "%s%s",
668 6840f1a1 2019-08-22 martijn message->headers[i + 1] == NULL ? "" : ":",
669 6840f1a1 2019-08-22 martijn message->headers[i]))
670 2c88ced1 2021-05-16 martijn goto fail;
671 365862b1 2019-05-02 martijn }
672 40cd76f4 2020-08-30 martijn dkim_signature_printf(message, "; d=%s; b=", sdomain);
673 6840f1a1 2019-08-22 martijn if (!dkim_signature_normalize(message))
674 2c88ced1 2021-05-16 martijn goto fail;
675 6840f1a1 2019-08-22 martijn if ((tmp = strdup(message->signature.signature)) == NULL) {
676 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't create DKIM signature");
677 2c88ced1 2021-05-16 martijn goto fail;
678 365862b1 2019-05-02 martijn }
679 6840f1a1 2019-08-22 martijn dkim_parse_header(message, tmp, 1);
680 6bcbc798 2021-05-16 martijn if (!sephash) {
681 6bcbc798 2021-05-16 martijn if (EVP_DigestSignUpdate(message->dctx, tmp,
682 6bcbc798 2021-05-16 martijn strlen(tmp)) != 1) {
683 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to update signature "
684 6bcbc798 2021-05-16 martijn "context");
685 2c88ced1 2021-05-16 martijn goto fail;
686 6bcbc798 2021-05-16 martijn }
687 6bcbc798 2021-05-16 martijn } else {
688 6bcbc798 2021-05-16 martijn if (EVP_DigestUpdate(message->dctx, tmp, strlen(tmp)) != 1) {
689 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to update digest context");
690 2c88ced1 2021-05-16 martijn goto fail;
691 6bcbc798 2021-05-16 martijn }
692 365862b1 2019-05-02 martijn }
693 365862b1 2019-05-02 martijn free(tmp);
694 6bcbc798 2021-05-16 martijn if (!sephash) {
695 6bcbc798 2021-05-16 martijn if (EVP_DigestSignFinal(message->dctx, NULL, &linelen) != 1) {
696 6bcbc798 2021-05-16 martijn dkim_errx(message, "Can't finalize signature context");
697 2c88ced1 2021-05-16 martijn goto fail;
698 6bcbc798 2021-05-16 martijn }
699 6bcbc798 2021-05-16 martijn #ifdef HAVE_ED25519
700 6bcbc798 2021-05-16 martijn } else {
701 6bcbc798 2021-05-16 martijn if (EVP_DigestFinal_ex(message->dctx, bdigest,
702 6bcbc798 2021-05-16 martijn &digestsz) != 1) {
703 6bcbc798 2021-05-16 martijn dkim_errx(message, "Can't finalize hash context");
704 2c88ced1 2021-05-16 martijn goto fail;
705 6bcbc798 2021-05-16 martijn }
706 6bcbc798 2021-05-16 martijn EVP_MD_CTX_reset(message->dctx);
707 6bcbc798 2021-05-16 martijn if (EVP_DigestSignInit(message->dctx, NULL, NULL, NULL,
708 6bcbc798 2021-05-16 martijn pkey) != 1) {
709 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to initialize signature "
710 6bcbc798 2021-05-16 martijn "context");
711 2c88ced1 2021-05-16 martijn goto fail;
712 6bcbc798 2021-05-16 martijn }
713 6bcbc798 2021-05-16 martijn if (EVP_DigestSign(message->dctx, NULL, &linelen, bdigest,
714 6bcbc798 2021-05-16 martijn digestsz) != 1) {
715 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to finalize signature");
716 2c88ced1 2021-05-16 martijn goto fail;
717 6bcbc798 2021-05-16 martijn }
718 6bcbc798 2021-05-16 martijn #endif
719 365862b1 2019-05-02 martijn }
720 365862b1 2019-05-02 martijn if ((tmp = malloc(linelen)) == NULL) {
721 6bcbc798 2021-05-16 martijn dkim_err(message, "Can't allocate space for signature");
722 2c88ced1 2021-05-16 martijn goto fail;
723 365862b1 2019-05-02 martijn }
724 6bcbc798 2021-05-16 martijn if (!sephash) {
725 6bcbc798 2021-05-16 martijn if (EVP_DigestSignFinal(message->dctx, tmp, &linelen) != 1) {
726 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to finalize signature");
727 2c88ced1 2021-05-16 martijn goto fail;
728 6bcbc798 2021-05-16 martijn }
729 6bcbc798 2021-05-16 martijn #ifdef HAVE_ED25519
730 6bcbc798 2021-05-16 martijn } else {
731 6bcbc798 2021-05-16 martijn if (EVP_DigestSign(message->dctx, tmp, &linelen, bdigest,
732 6bcbc798 2021-05-16 martijn digestsz) != 1) {
733 6bcbc798 2021-05-16 martijn dkim_errx(message, "Failed to finalize signature");
734 2c88ced1 2021-05-16 martijn goto fail;
735 6bcbc798 2021-05-16 martijn }
736 6bcbc798 2021-05-16 martijn #endif
737 365862b1 2019-05-02 martijn }
738 365862b1 2019-05-02 martijn if ((b = malloc((((linelen + 2) / 3) * 4) + 1)) == NULL) {
739 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't create DKIM signature");
740 2c88ced1 2021-05-16 martijn goto fail;
741 365862b1 2019-05-02 martijn }
742 365862b1 2019-05-02 martijn EVP_EncodeBlock(b, tmp, linelen);
743 365862b1 2019-05-02 martijn free(tmp);
744 6840f1a1 2019-08-22 martijn dkim_signature_printf(message, "%s\r\n", b);
745 365862b1 2019-05-02 martijn free(b);
746 6840f1a1 2019-08-22 martijn dkim_signature_normalize(message);
747 6840f1a1 2019-08-22 martijn tmp = message->signature.signature;
748 365862b1 2019-05-02 martijn while ((tmp2 = strchr(tmp, '\r')) != NULL) {
749 365862b1 2019-05-02 martijn tmp2[0] = '\0';
750 6840f1a1 2019-08-22 martijn osmtpd_filter_dataline(ctx, "%s", tmp);
751 365862b1 2019-05-02 martijn tmp = tmp2 + 2;
752 365862b1 2019-05-02 martijn }
753 365862b1 2019-05-02 martijn tmp = NULL;
754 365862b1 2019-05-02 martijn linelen = 0;
755 6840f1a1 2019-08-22 martijn rewind(message->origf);
756 6840f1a1 2019-08-22 martijn while ((i = getline(&tmp, &linelen, message->origf)) != -1) {
757 365862b1 2019-05-02 martijn tmp[i - 1] = '\0';
758 6840f1a1 2019-08-22 martijn osmtpd_filter_dataline(ctx, "%s", tmp);
759 365862b1 2019-05-02 martijn }
760 be6d950d 2021-03-21 martijn free(tmp);
761 2c88ced1 2021-05-16 martijn return;
762 2c88ced1 2021-05-16 martijn fail:
763 2c88ced1 2021-05-16 martijn osmtpd_filter_dataline(ctx, ".");
764 365862b1 2019-05-02 martijn }
765 365862b1 2019-05-02 martijn
766 06f6b49b 2019-04-06 martijn int
767 6840f1a1 2019-08-22 martijn dkim_signature_normalize(struct dkim_message *message)
768 48c4bdc1 2019-04-04 martijn {
769 06f6b49b 2019-04-06 martijn size_t i;
770 06f6b49b 2019-04-06 martijn size_t linelen;
771 06f6b49b 2019-04-06 martijn size_t checkpoint;
772 06f6b49b 2019-04-06 martijn size_t skip;
773 6840f1a1 2019-08-22 martijn size_t *headerlen = &(message->signature.len);
774 06f6b49b 2019-04-06 martijn int headername = 1;
775 06f6b49b 2019-04-06 martijn char tag = '\0';
776 6840f1a1 2019-08-22 martijn char *sig = message->signature.signature;
777 48c4bdc1 2019-04-04 martijn
778 06f6b49b 2019-04-06 martijn for (linelen = i = 0; sig[i] != '\0'; i++) {
779 ffa37923 2019-04-09 martijn if (sig[i] == '\r' && sig[i + 1] == '\n') {
780 ffa37923 2019-04-09 martijn i++;
781 06f6b49b 2019-04-06 martijn checkpoint = 0;
782 06f6b49b 2019-04-06 martijn linelen = 0;
783 06f6b49b 2019-04-06 martijn continue;
784 06f6b49b 2019-04-06 martijn }
785 06f6b49b 2019-04-06 martijn if (sig[i] == '\t')
786 06f6b49b 2019-04-06 martijn linelen = (linelen + 8) & ~7;
787 48c4bdc1 2019-04-04 martijn else
788 06f6b49b 2019-04-06 martijn linelen++;
789 06f6b49b 2019-04-06 martijn if (headername) {
790 06f6b49b 2019-04-06 martijn if (sig[i] == ':') {
791 06f6b49b 2019-04-06 martijn headername = 0;
792 06f6b49b 2019-04-06 martijn checkpoint = i;
793 06f6b49b 2019-04-06 martijn }
794 06f6b49b 2019-04-06 martijn continue;
795 06f6b49b 2019-04-06 martijn }
796 ffa37923 2019-04-09 martijn if (linelen > DKIM_SIGNATURE_LINELEN && checkpoint != 0) {
797 06f6b49b 2019-04-06 martijn for (skip = checkpoint + 1;
798 06f6b49b 2019-04-06 martijn sig[skip] == ' ' || sig[skip] == '\t';
799 06f6b49b 2019-04-06 martijn skip++)
800 06f6b49b 2019-04-06 martijn continue;
801 06f6b49b 2019-04-06 martijn skip -= checkpoint + 1;
802 6840f1a1 2019-08-22 martijn if (!dkim_signature_need(message,
803 226e5da8 2019-04-08 martijn skip > 3 ? 0 : 3 - skip + 1))
804 06f6b49b 2019-04-06 martijn return 0;
805 6840f1a1 2019-08-22 martijn sig = message->signature.signature;
806 6840f1a1 2019-08-22 martijn
807 06f6b49b 2019-04-06 martijn memmove(sig + checkpoint + 3,
808 06f6b49b 2019-04-06 martijn sig + checkpoint + skip,
809 540f552a 2019-04-06 martijn *headerlen - skip - checkpoint + 1);
810 06f6b49b 2019-04-06 martijn sig[checkpoint + 1] = '\r';
811 06f6b49b 2019-04-06 martijn sig[checkpoint + 2] = '\n';
812 06f6b49b 2019-04-06 martijn sig[checkpoint + 3] = '\t';
813 06f6b49b 2019-04-06 martijn linelen = 8;
814 06f6b49b 2019-04-06 martijn *headerlen = *headerlen + 3 - skip;
815 06f6b49b 2019-04-06 martijn i = checkpoint + 3;
816 06f6b49b 2019-04-06 martijn checkpoint = 0;
817 06f6b49b 2019-04-06 martijn }
818 06f6b49b 2019-04-06 martijn if (sig[i] == ';') {
819 06f6b49b 2019-04-06 martijn checkpoint = i;
820 06f6b49b 2019-04-06 martijn tag = '\0';
821 06f6b49b 2019-04-06 martijn continue;
822 06f6b49b 2019-04-06 martijn }
823 06f6b49b 2019-04-06 martijn switch (tag) {
824 06f6b49b 2019-04-06 martijn case 'B':
825 06f6b49b 2019-04-06 martijn case 'b':
826 c826412d 2019-05-02 martijn case 'z':
827 06f6b49b 2019-04-06 martijn checkpoint = i;
828 06f6b49b 2019-04-06 martijn break;
829 06f6b49b 2019-04-06 martijn case 'h':
830 06f6b49b 2019-04-06 martijn if (sig[i] == ':')
831 06f6b49b 2019-04-06 martijn checkpoint = i;
832 c826412d 2019-05-02 martijn break;
833 06f6b49b 2019-04-06 martijn }
834 06f6b49b 2019-04-06 martijn if (tag == '\0' && sig[i] != ' ' && sig[i] != '\t') {
835 06f6b49b 2019-04-06 martijn if ((tag = sig[i]) == 'b' && sig[i + 1] == 'h' &&
836 06f6b49b 2019-04-06 martijn sig[i + 2] == '=') {
837 06f6b49b 2019-04-06 martijn tag = 'B';
838 06f6b49b 2019-04-06 martijn linelen += 2;
839 06f6b49b 2019-04-06 martijn i += 2;
840 06f6b49b 2019-04-06 martijn } else
841 06f6b49b 2019-04-06 martijn tag = sig[i];
842 06f6b49b 2019-04-06 martijn }
843 48c4bdc1 2019-04-04 martijn }
844 06f6b49b 2019-04-06 martijn return 1;
845 06f6b49b 2019-04-06 martijn }
846 48c4bdc1 2019-04-04 martijn
847 06f6b49b 2019-04-06 martijn int
848 6840f1a1 2019-08-22 martijn dkim_signature_printheader(struct dkim_message *message, const char *header)
849 c826412d 2019-05-02 martijn {
850 c826412d 2019-05-02 martijn size_t i, j, len;
851 c826412d 2019-05-02 martijn static char *fmtheader = NULL;
852 c826412d 2019-05-02 martijn char *tmp;
853 c826412d 2019-05-02 martijn static size_t size = 0;
854 c826412d 2019-05-02 martijn int first;
855 c826412d 2019-05-02 martijn
856 c826412d 2019-05-02 martijn len = strlen(header);
857 c826412d 2019-05-02 martijn if ((len + 3) * 3 < len) {
858 c826412d 2019-05-02 martijn errno = EOVERFLOW;
859 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't add z-component to header");
860 c826412d 2019-05-02 martijn return 0;
861 c826412d 2019-05-02 martijn }
862 c826412d 2019-05-02 martijn if ((len + 3) * 3 > size) {
863 c826412d 2019-05-02 martijn if ((tmp = reallocarray(fmtheader, 3, len + 3)) == NULL) {
864 6840f1a1 2019-08-22 martijn dkim_err(message, "Can't add z-component to header");
865 c826412d 2019-05-02 martijn return 0;
866 c826412d 2019-05-02 martijn }
867 c826412d 2019-05-02 martijn fmtheader = tmp;
868 c826412d 2019-05-02 martijn size = (len + 1) * 3;
869 c826412d 2019-05-02 martijn }
870 c826412d 2019-05-02 martijn
871 6840f1a1 2019-08-22 martijn first = message->signature.signature[message->signature.len - 1] == '=';
872 c826412d 2019-05-02 martijn for (j = i = 0; header[i] != '\0'; i++, j++) {
873 c826412d 2019-05-02 martijn if (i == 0 && header[i] != ' ' && header[i] != '\t' && !first)
874 c826412d 2019-05-02 martijn fmtheader[j++] = '|';
875 c826412d 2019-05-02 martijn if ((header[i] >= 0x21 && header[i] <= 0x3A) ||
876 6840f1a1 2019-08-22 martijn (header[i] == 0x3C) ||
877 c826412d 2019-05-02 martijn (header[i] >= 0x3E && header[i] <= 0x7B) ||
878 c826412d 2019-05-02 martijn (header[i] >= 0x7D && header[i] <= 0x7E))
879 c826412d 2019-05-02 martijn fmtheader[j] = header[i];
880 c826412d 2019-05-02 martijn else {
881 c826412d 2019-05-02 martijn fmtheader[j++] = '=';
882 c826412d 2019-05-02 martijn (void) sprintf(fmtheader + j, "%02hhX", header[i]);
883 c826412d 2019-05-02 martijn j++;
884 c826412d 2019-05-02 martijn }
885 c826412d 2019-05-02 martijn }
886 c826412d 2019-05-02 martijn (void) sprintf(fmtheader + j, "=%02hhX=%02hhX", (unsigned char) '\r',
887 c826412d 2019-05-02 martijn (unsigned char) '\n');
888 c826412d 2019-05-02 martijn
889 6840f1a1 2019-08-22 martijn return dkim_signature_printf(message, "%s", fmtheader);
890 c826412d 2019-05-02 martijn }
891 c826412d 2019-05-02 martijn
892 c826412d 2019-05-02 martijn int
893 6840f1a1 2019-08-22 martijn dkim_signature_printf(struct dkim_message *message, char *fmt, ...)
894 06f6b49b 2019-04-06 martijn {
895 6840f1a1 2019-08-22 martijn struct dkim_signature *sig = &(message->signature);
896 06f6b49b 2019-04-06 martijn va_list ap;
897 06f6b49b 2019-04-06 martijn size_t len;
898 06f6b49b 2019-04-06 martijn
899 06f6b49b 2019-04-06 martijn va_start(ap, fmt);
900 06f6b49b 2019-04-06 martijn if ((len = vsnprintf(sig->signature + sig->len, sig->size - sig->len,
901 06f6b49b 2019-04-06 martijn fmt, ap)) >= sig->size - sig->len) {
902 06f6b49b 2019-04-06 martijn va_end(ap);
903 6840f1a1 2019-08-22 martijn if (!dkim_signature_need(message, len + 1))
904 06f6b49b 2019-04-06 martijn return 0;
905 06f6b49b 2019-04-06 martijn va_start(ap, fmt);
906 6840f1a1 2019-08-22 martijn if ((len = vsnprintf(sig->signature + sig->len,
907 6840f1a1 2019-08-22 martijn sig->size - sig->len, fmt, ap)) >= sig->size - sig->len)
908 6840f1a1 2019-08-22 martijn osmtpd_errx(1, "Miscalculated header size");
909 06f6b49b 2019-04-06 martijn }
910 06f6b49b 2019-04-06 martijn sig->len += len;
911 06f6b49b 2019-04-06 martijn va_end(ap);
912 06f6b49b 2019-04-06 martijn return 1;
913 06f6b49b 2019-04-06 martijn }
914 06f6b49b 2019-04-06 martijn
915 40cd76f4 2020-08-30 martijn const char *
916 40cd76f4 2020-08-30 martijn dkim_domain_select(struct dkim_message *message, char *from)
917 40cd76f4 2020-08-30 martijn {
918 40cd76f4 2020-08-30 martijn char *mdomain0, *mdomain;
919 40cd76f4 2020-08-30 martijn size_t i;
920 40cd76f4 2020-08-30 martijn
921 40cd76f4 2020-08-30 martijn if ((mdomain = mdomain0 = osmtpd_mheader_from_domain(from)) == NULL) {
922 40cd76f4 2020-08-30 martijn if (errno != EINVAL) {
923 71b92702 2021-05-14 martijn dkim_errx(message, "Couldn't parse from header");
924 40cd76f4 2020-08-30 martijn return NULL;
925 40cd76f4 2020-08-30 martijn }
926 40cd76f4 2020-08-30 martijn return NULL;
927 40cd76f4 2020-08-30 martijn }
928 40cd76f4 2020-08-30 martijn
929 40cd76f4 2020-08-30 martijn while (mdomain != NULL && mdomain[0] != '\0') {
930 40cd76f4 2020-08-30 martijn for (i = 0; i < ndomains; i++) {
931 40cd76f4 2020-08-30 martijn if (strcasecmp(mdomain, domain[i]) == 0) {
932 40cd76f4 2020-08-30 martijn free(mdomain0);
933 40cd76f4 2020-08-30 martijn return domain[i];
934 40cd76f4 2020-08-30 martijn }
935 40cd76f4 2020-08-30 martijn }
936 40cd76f4 2020-08-30 martijn if ((mdomain = strchr(mdomain, '.')) != NULL)
937 40cd76f4 2020-08-30 martijn mdomain++;
938 40cd76f4 2020-08-30 martijn }
939 40cd76f4 2020-08-30 martijn free(mdomain0);
940 40cd76f4 2020-08-30 martijn return NULL;
941 40cd76f4 2020-08-30 martijn }
942 40cd76f4 2020-08-30 martijn
943 06f6b49b 2019-04-06 martijn int
944 6840f1a1 2019-08-22 martijn dkim_signature_need(struct dkim_message *message, size_t len)
945 06f6b49b 2019-04-06 martijn {
946 6840f1a1 2019-08-22 martijn struct dkim_signature *sig = &(message->signature);
947 06f6b49b 2019-04-06 martijn char *tmp;
948 06f6b49b 2019-04-06 martijn
949 a27b5ff7 2019-04-08 martijn if (sig->len + len < sig->size)
950 06f6b49b 2019-04-06 martijn return 1;
951 503597cc 2019-04-08 martijn sig->size = (((len + sig->len) / 512) + 1) * 512;
952 06f6b49b 2019-04-06 martijn if ((tmp = realloc(sig->signature, sig->size)) == NULL) {
953 6840f1a1 2019-08-22 martijn dkim_err(message, "No room for signature");
954 06f6b49b 2019-04-06 martijn return 0;
955 06f6b49b 2019-04-06 martijn }
956 06f6b49b 2019-04-06 martijn sig->signature = tmp;
957 06f6b49b 2019-04-06 martijn return 1;
958 06f6b49b 2019-04-06 martijn }
959 06f6b49b 2019-04-06 martijn
960 48c4bdc1 2019-04-04 martijn __dead void
961 48c4bdc1 2019-04-04 martijn usage(void)
962 48c4bdc1 2019-04-04 martijn {
963 fe371fc9 2019-09-05 martijn fprintf(stderr, "usage: filter-dkimsign [-tz] [-a signalg] "
964 fe371fc9 2019-09-05 martijn "[-c canonicalization] \n [-h headerfields]"
965 5fdffb49 2022-01-27 martijn "[-x seconds] -D file -d domain -k keyfile -s selector\n");
966 48c4bdc1 2019-04-04 martijn exit(1);
967 48c4bdc1 2019-04-04 martijn }