1 f1509490 2022-03-20 martijn /*
   2 f1509490 2022-03-20 martijn  * Copyright (c) 2022 Martijn van Duren <martijn@openbsd.org>
   3 f1509490 2022-03-20 martijn  *
   4 f1509490 2022-03-20 martijn  * Permission to use, copy, modify, and distribute this software for any
   5 f1509490 2022-03-20 martijn  * purpose with or without fee is hereby granted, provided that the above
   6 f1509490 2022-03-20 martijn  * copyright notice and this permission notice appear in all copies.
   7 f1509490 2022-03-20 martijn  *
   8 f1509490 2022-03-20 martijn  * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
   9 f1509490 2022-03-20 martijn  * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
  10 f1509490 2022-03-20 martijn  * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
  11 f1509490 2022-03-20 martijn  * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
  12 f1509490 2022-03-20 martijn  * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
  13 f1509490 2022-03-20 martijn  * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
  14 f1509490 2022-03-20 martijn  * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
  15 f1509490 2022-03-20 martijn  */
  16 f1509490 2022-03-20 martijn #include <sys/types.h>
  17 f1509490 2022-03-20 martijn #include <sys/socket.h>
  18 f1509490 2022-03-20 martijn 
  19 f1509490 2022-03-20 martijn #include <openssl/evp.h>
  20 f1509490 2022-03-20 martijn #include <openssl/pem.h>
  21 f1509490 2022-03-20 martijn #include <openssl/sha.h>
  22 f1509490 2022-03-20 martijn #include <openssl/err.h>
  23 f1509490 2022-03-20 martijn 
  24 f1509490 2022-03-20 martijn #include <arpa/nameser.h>
  25 f1509490 2022-03-20 martijn 
  26 f1509490 2022-03-20 martijn #include <ctype.h>
  27 f1509490 2022-03-20 martijn #include <errno.h>
  28 f1509490 2022-03-20 martijn #include <event.h>
  29 f1509490 2022-03-20 martijn #include <limits.h>
  30 f1509490 2022-03-20 martijn #include <netdb.h>
  31 b5876c84 2022-04-08 martijn #include <opensmtpd.h>
  32 721f8c43 2026-02-18 martijn #include <paths.h>
  33 f1509490 2022-03-20 martijn #include <stdarg.h>
  34 f1509490 2022-03-20 martijn #include <stdio.h>
  35 f1509490 2022-03-20 martijn #include <stdlib.h>
  36 f1509490 2022-03-20 martijn #include <string.h>
  37 f1509490 2022-03-20 martijn #include <time.h>
  38 f1509490 2022-03-20 martijn #include <unistd.h>
  39 f1509490 2022-03-20 martijn #include <asr.h>
  40 f1509490 2022-03-20 martijn 
  41 f1509490 2022-03-20 martijn #include "unpack_dns.h"
  42 4e2dd90f 2022-03-26 martijn #include "ltok.h"
  43 f1509490 2022-03-20 martijn 
  44 f1509490 2022-03-20 martijn /*
  45 f1509490 2022-03-20 martijn  * Use RFC8601 (Authentication-Results) codes instead of RFC6376 codes,
  46 f1509490 2022-03-20 martijn  * since they're more expressive.
  47 f1509490 2022-03-20 martijn  */
  48 f1509490 2022-03-20 martijn enum state {
  49 f1509490 2022-03-20 martijn 	DKIM_UNKNOWN,
  50 f1509490 2022-03-20 martijn 	DKIM_PASS,
  51 f1509490 2022-03-20 martijn 	DKIM_FAIL,
  52 f1509490 2022-03-20 martijn 	DKIM_POLICY,
  53 f1509490 2022-03-20 martijn 	DKIM_NEUTRAL,
  54 f1509490 2022-03-20 martijn 	DKIM_TEMPERROR,
  55 f1509490 2022-03-20 martijn 	DKIM_PERMERROR
  56 f1509490 2022-03-20 martijn };
  57 f1509490 2022-03-20 martijn 
  58 f1509490 2022-03-20 martijn struct signature {
  59 f1509490 2022-03-20 martijn 	struct header *header;
  60 f1509490 2022-03-20 martijn 	enum state state;
  61 f1509490 2022-03-20 martijn 	const char *state_reason;
  62 f1509490 2022-03-20 martijn 	int v;
  63 4e2dd90f 2022-03-26 martijn 	const char *a;
  64 f1509490 2022-03-20 martijn 	size_t asz;
  65 f1509490 2022-03-20 martijn 	int ak;
  66 338537df 2022-04-08 martijn 	int sephash;
  67 f1509490 2022-03-20 martijn 	const EVP_MD *ah;
  68 f1509490 2022-03-20 martijn 	char *b;
  69 f1509490 2022-03-20 martijn 	size_t bsz;
  70 4e2dd90f 2022-03-26 martijn 	const char *bheader;
  71 f1509490 2022-03-20 martijn 	/* Make sure padding bits for base64 decoding fit */
  72 f1509490 2022-03-20 martijn 	char bh[EVP_MAX_MD_SIZE + (3 - (EVP_MAX_MD_SIZE % 3))];
  73 f1509490 2022-03-20 martijn 	size_t bhsz;
  74 f1509490 2022-03-20 martijn 	EVP_MD_CTX *bhctx;
  75 f1509490 2022-03-20 martijn 	int c;
  76 f1509490 2022-03-20 martijn #define CANON_HEADER_SIMPLE	0
  77 f1509490 2022-03-20 martijn #define CANON_HEADER_RELAXED	1
  78 f1509490 2022-03-20 martijn #define CANON_HEADER		1
  79 f1509490 2022-03-20 martijn #define CANON_BODY_SIMPLE	0
  80 f1509490 2022-03-20 martijn #define CANON_BODY_RELAXED	1 << 1
  81 f1509490 2022-03-20 martijn #define CANON_BODY		1 << 1
  82 f1509490 2022-03-20 martijn #define CANON_DONE		1 << 2
  83 f1509490 2022-03-20 martijn 	char d[HOST_NAME_MAX + 1];
  84 f1509490 2022-03-20 martijn 	char **h;
  85 4e2dd90f 2022-03-26 martijn 	const char *i;
  86 f1509490 2022-03-20 martijn 	size_t isz;
  87 f1509490 2022-03-20 martijn 	ssize_t l;
  88 f1509490 2022-03-20 martijn 	int q;
  89 f1509490 2022-03-20 martijn 	char s[HOST_NAME_MAX + 1];
  90 f1509490 2022-03-20 martijn 	time_t t;	/* Signature t=/timestamp */
  91 f1509490 2022-03-20 martijn #define KT_Y			1
  92 f1509490 2022-03-20 martijn #define KT_S			1 << 1
  93 f1509490 2022-03-20 martijn 	int kt;		/* Key t=/Flags */
  94 f1509490 2022-03-20 martijn 	time_t x;
  95 f1509490 2022-03-20 martijn 	int z;
  96 f1509490 2022-03-20 martijn 	struct event_asr *query;
  97 f1509490 2022-03-20 martijn 	EVP_PKEY *p;
  98 f1509490 2022-03-20 martijn };
  99 f1509490 2022-03-20 martijn 
 100 f1509490 2022-03-20 martijn struct header {
 101 f1509490 2022-03-20 martijn 	struct message *msg;
 102 f1509490 2022-03-20 martijn 	uint8_t readdone;
 103 f1509490 2022-03-20 martijn 	uint8_t parsed;
 104 f1509490 2022-03-20 martijn 	char *buf;
 105 f1509490 2022-03-20 martijn 	size_t buflen;
 106 f1509490 2022-03-20 martijn 	struct signature *sig;
 107 f1509490 2022-03-20 martijn };
 108 f1509490 2022-03-20 martijn 
 109 f1509490 2022-03-20 martijn #define AUTHENTICATION_RESULTS_LINELEN 78
 110 f1509490 2022-03-20 martijn #define MIN(a, b) ((a) < (b) ? (a) : (b))
 111 f1509490 2022-03-20 martijn 
 112 f1509490 2022-03-20 martijn struct message {
 113 f1509490 2022-03-20 martijn 	struct osmtpd_ctx *ctx;
 114 f1509490 2022-03-20 martijn 	FILE *origf;
 115 f1509490 2022-03-20 martijn 	int parsing_headers;
 116 f1509490 2022-03-20 martijn 	size_t body_whitelines;
 117 f1509490 2022-03-20 martijn 	int has_body;
 118 f1509490 2022-03-20 martijn 	struct header *header;
 119 f1509490 2022-03-20 martijn 	size_t nheaders;
 120 f1509490 2022-03-20 martijn 	int err;
 121 f1509490 2022-03-20 martijn 	int readdone;
 122 f1509490 2022-03-20 martijn };
 123 f1509490 2022-03-20 martijn 
 124 f1509490 2022-03-20 martijn void usage(void);
 125 f1509490 2022-03-20 martijn void dkim_err(struct message *, char *);
 126 f1509490 2022-03-20 martijn void dkim_errx(struct message *, char *);
 127 f1509490 2022-03-20 martijn void dkim_conf(const char *, const char *);
 128 f1509490 2022-03-20 martijn void dkim_dataline(struct osmtpd_ctx *, const char *);
 129 f1509490 2022-03-20 martijn void dkim_commit(struct osmtpd_ctx *);
 130 f1509490 2022-03-20 martijn void *dkim_message_new(struct osmtpd_ctx *);
 131 f1509490 2022-03-20 martijn void dkim_message_free(struct osmtpd_ctx *, void *);
 132 f1509490 2022-03-20 martijn void dkim_header_add(struct osmtpd_ctx *, const char *);
 133 f1509490 2022-03-20 martijn void dkim_signature_parse(struct header *);
 134 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_v(struct signature *, const char *, const char *);
 135 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_a(struct signature *, const char *, const char *);
 136 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_b(struct signature *, const char *, const char *);
 137 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_bh(struct signature *, const char *, const char *);
 138 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_c(struct signature *, const char *, const char *);
 139 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_d(struct signature *, const char *, const char *);
 140 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_h(struct signature *, const char *, const char *);
 141 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_i(struct signature *, const char *, const char *);
 142 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_l(struct signature *, const char *, const char *);
 143 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_q(struct signature *, const char *, const char *);
 144 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_s(struct signature *, const char *, const char *);
 145 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_t(struct signature *, const char *, const char *);
 146 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_x(struct signature *, const char *, const char *);
 147 4e2dd90f 2022-03-26 martijn void dkim_signature_parse_z(struct signature *, const char *, const char *);
 148 f1509490 2022-03-20 martijn void dkim_signature_verify(struct signature *);
 149 f1509490 2022-03-20 martijn void dkim_signature_header(EVP_MD_CTX *, struct signature *, struct header *);
 150 f1509490 2022-03-20 martijn void dkim_signature_state(struct signature *, enum state, const char *);
 151 f1509490 2022-03-20 martijn const char *dkim_state2str(enum state);
 152 f1509490 2022-03-20 martijn void dkim_header_cat(struct osmtpd_ctx *, const char *);
 153 f1509490 2022-03-20 martijn void dkim_body_parse(struct message *, const char *);
 154 f1509490 2022-03-20 martijn void dkim_body_verify(struct signature *);
 155 f1509490 2022-03-20 martijn void dkim_rr_resolve(struct asr_result *, void *);
 156 f1509490 2022-03-20 martijn void dkim_message_verify(struct message *);
 157 f1509490 2022-03-20 martijn ssize_t dkim_ar_cat(char **ar, size_t *n, size_t aroff, const char *fmt, ...)
 158 f1509490 2022-03-20 martijn     __attribute__((__format__ (printf, 4, 5)));
 159 4e2dd90f 2022-03-26 martijn void dkim_ar_print(struct osmtpd_ctx *, const char *);
 160 4e2dd90f 2022-03-26 martijn int dkim_key_text_parse(struct signature *, const char *);
 161 f1509490 2022-03-20 martijn 
 162 f1509490 2022-03-20 martijn char *authservid;
 163 f1509490 2022-03-20 martijn EVP_ENCODE_CTX *ectx = NULL;
 164 f1509490 2022-03-20 martijn 
 165 f1509490 2022-03-20 martijn int
 166 f1509490 2022-03-20 martijn main(int argc, char *argv[])
 167 f1509490 2022-03-20 martijn {
 168 f1509490 2022-03-20 martijn 	if (argc != 1)
 169 f1509490 2022-03-20 martijn 		osmtpd_errx(1, "Invalid argument count");
 170 f1509490 2022-03-20 martijn 
 171 f1509490 2022-03-20 martijn 	OpenSSL_add_all_digests();
 172 f1509490 2022-03-20 martijn 
 173 721f8c43 2026-02-18 martijn 	if (unveil(_PATH_TMP, "rwc") == -1)
 174 721f8c43 2026-02-18 martijn 		osmtpd_err(1, "unveil");
 175 721f8c43 2026-02-18 martijn 	if (pledge("stdio rpath wpath cpath dns", NULL) == -1)
 176 f1509490 2022-03-20 martijn 		osmtpd_err(1, "pledge");
 177 f1509490 2022-03-20 martijn 
 178 f1509490 2022-03-20 martijn 	if ((ectx = EVP_ENCODE_CTX_new()) == NULL)
 179 f1509490 2022-03-20 martijn 		osmtpd_err(1, "EVP_ENCODE_CTX_new");
 180 f1509490 2022-03-20 martijn 
 181 f1509490 2022-03-20 martijn 	osmtpd_register_conf(dkim_conf);
 182 f1509490 2022-03-20 martijn 	osmtpd_register_filter_dataline(dkim_dataline);
 183 f1509490 2022-03-20 martijn 	osmtpd_register_filter_commit(dkim_commit);
 184 f1509490 2022-03-20 martijn 	osmtpd_local_message(dkim_message_new, dkim_message_free);
 185 f1509490 2022-03-20 martijn 	osmtpd_run();
 186 f1509490 2022-03-20 martijn 
 187 f1509490 2022-03-20 martijn 	return 0;
 188 f1509490 2022-03-20 martijn }
 189 f1509490 2022-03-20 martijn 
 190 f1509490 2022-03-20 martijn void
 191 f1509490 2022-03-20 martijn dkim_conf(const char *key, const char *value)
 192 f1509490 2022-03-20 martijn {
 193 4e2dd90f 2022-03-26 martijn 	const char *end;
 194 f1509490 2022-03-20 martijn 
 195 f1509490 2022-03-20 martijn 	if (key == NULL) {
 196 f1509490 2022-03-20 martijn 		if (authservid == NULL)
 197 f1509490 2022-03-20 martijn 			osmtpd_errx(1, "Didn't receive admd config option");
 198 f1509490 2022-03-20 martijn 		return;
 199 f1509490 2022-03-20 martijn 	}
 200 f1509490 2022-03-20 martijn 	if (strcmp(key, "admd") == 0 && authservid == NULL) {
 201 f1509490 2022-03-20 martijn 		if ((authservid = strdup(value)) == NULL)
 202 f1509490 2022-03-20 martijn 			osmtpd_err(1, "malloc");
 203 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_value(authservid, 0);
 204 f1509490 2022-03-20 martijn 		if (authservid + strlen(authservid) != end)
 205 f1509490 2022-03-20 martijn 			osmtpd_errx(1, "Invalid authservid");
 206 f1509490 2022-03-20 martijn 	}
 207 f1509490 2022-03-20 martijn }
 208 f1509490 2022-03-20 martijn 
 209 f1509490 2022-03-20 martijn void
 210 f1509490 2022-03-20 martijn dkim_dataline(struct osmtpd_ctx *ctx, const char *line)
 211 f1509490 2022-03-20 martijn {
 212 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 213 f1509490 2022-03-20 martijn 	size_t i;
 214 f1509490 2022-03-20 martijn 
 215 f1509490 2022-03-20 martijn 	if (msg->err) {
 216 f1509490 2022-03-20 martijn 		if (line[0] == '.' && line[1] =='\0') {
 217 f1509490 2022-03-20 martijn 			msg->readdone = 1;
 218 f1509490 2022-03-20 martijn 			osmtpd_filter_dataline(ctx, ".");
 219 f1509490 2022-03-20 martijn 		}
 220 f1509490 2022-03-20 martijn 		return;
 221 f1509490 2022-03-20 martijn 	}
 222 f1509490 2022-03-20 martijn 
 223 f1509490 2022-03-20 martijn 	if (fprintf(msg->origf, "%s\n", line) < 0) {
 224 f1509490 2022-03-20 martijn 		dkim_err(msg, "Couldn't write to tempfile");
 225 f1509490 2022-03-20 martijn 		return;
 226 f1509490 2022-03-20 martijn 	}
 227 f1509490 2022-03-20 martijn 	if (line[0] == '.') {
 228 f1509490 2022-03-20 martijn 		line++;
 229 f1509490 2022-03-20 martijn 		if (line[0] == '\0') {
 230 f1509490 2022-03-20 martijn 			msg->readdone = 1;
 231 f1509490 2022-03-20 martijn 			for (i = 0; i < msg->nheaders; i++) {
 232 f1509490 2022-03-20 martijn 				if (msg->header[i].sig == NULL)
 233 f1509490 2022-03-20 martijn 					continue;
 234 f1509490 2022-03-20 martijn 				dkim_body_verify(msg->header[i].sig);
 235 f1509490 2022-03-20 martijn 			}
 236 f1509490 2022-03-20 martijn 			dkim_message_verify(msg);
 237 f1509490 2022-03-20 martijn 			return;
 238 f1509490 2022-03-20 martijn 		}
 239 f1509490 2022-03-20 martijn 	}
 240 f1509490 2022-03-20 martijn 	if (msg->parsing_headers) {
 241 f1509490 2022-03-20 martijn 		dkim_header_add(ctx, line);
 242 f1509490 2022-03-20 martijn 		if (line[0] == '\0') {
 243 f1509490 2022-03-20 martijn 			msg->parsing_headers = 0;
 244 f1509490 2022-03-20 martijn 			for (i = 0; i < msg->nheaders; i++) {
 245 f1509490 2022-03-20 martijn 				if (msg->header[i].sig == NULL)
 246 f1509490 2022-03-20 martijn 					continue;
 247 f1509490 2022-03-20 martijn 				if (msg->header[i].sig->query == NULL)
 248 f1509490 2022-03-20 martijn 					dkim_signature_verify(
 249 f1509490 2022-03-20 martijn 					    msg->header[i].sig);
 250 f1509490 2022-03-20 martijn 			}
 251 f1509490 2022-03-20 martijn 		}
 252 f1509490 2022-03-20 martijn 		return;
 253 f1509490 2022-03-20 martijn 	} else {
 254 f1509490 2022-03-20 martijn 		dkim_body_parse(msg, line);
 255 f1509490 2022-03-20 martijn 	}
 256 f1509490 2022-03-20 martijn }
 257 f1509490 2022-03-20 martijn 
 258 f1509490 2022-03-20 martijn void
 259 f1509490 2022-03-20 martijn dkim_commit(struct osmtpd_ctx *ctx)
 260 f1509490 2022-03-20 martijn {
 261 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 262 f1509490 2022-03-20 martijn 
 263 f1509490 2022-03-20 martijn 	if (msg->err)
 264 f1509490 2022-03-20 martijn 		osmtpd_filter_disconnect(ctx, "Internal server error");
 265 f1509490 2022-03-20 martijn 	else
 266 f1509490 2022-03-20 martijn 		osmtpd_filter_proceed(ctx);
 267 f1509490 2022-03-20 martijn }
 268 f1509490 2022-03-20 martijn 
 269 f1509490 2022-03-20 martijn void *
 270 f1509490 2022-03-20 martijn dkim_message_new(struct osmtpd_ctx *ctx)
 271 f1509490 2022-03-20 martijn {
 272 f1509490 2022-03-20 martijn 	struct message *msg;
 273 f1509490 2022-03-20 martijn 
 274 f1509490 2022-03-20 martijn 	if ((msg = malloc(sizeof(*msg))) == NULL)
 275 f1509490 2022-03-20 martijn 		osmtpd_err(1, NULL);
 276 f1509490 2022-03-20 martijn 
 277 f1509490 2022-03-20 martijn 	if ((msg->origf = tmpfile()) == NULL) {
 278 f1509490 2022-03-20 martijn 		dkim_err(msg, "Can't open tempfile");
 279 f1509490 2022-03-20 martijn 		return NULL;
 280 f1509490 2022-03-20 martijn 	}
 281 f1509490 2022-03-20 martijn 	msg->ctx = ctx;
 282 f1509490 2022-03-20 martijn 	msg->parsing_headers = 1;
 283 f1509490 2022-03-20 martijn 	msg->body_whitelines = 0;
 284 f1509490 2022-03-20 martijn 	msg->has_body = 0;
 285 f1509490 2022-03-20 martijn 	msg->header = NULL;
 286 f1509490 2022-03-20 martijn 	msg->nheaders = 0;
 287 f1509490 2022-03-20 martijn 	msg->err = 0;
 288 f1509490 2022-03-20 martijn 	msg->readdone = 0;
 289 f1509490 2022-03-20 martijn 
 290 f1509490 2022-03-20 martijn 	return msg;
 291 f1509490 2022-03-20 martijn }
 292 f1509490 2022-03-20 martijn 
 293 f1509490 2022-03-20 martijn void
 294 f1509490 2022-03-20 martijn dkim_message_free(struct osmtpd_ctx *ctx, void *data)
 295 f1509490 2022-03-20 martijn {
 296 f1509490 2022-03-20 martijn 	struct message *msg = data;
 297 f1509490 2022-03-20 martijn 	size_t i, j;
 298 f1509490 2022-03-20 martijn 
 299 f1509490 2022-03-20 martijn 	fclose(msg->origf);
 300 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++) {
 301 f1509490 2022-03-20 martijn 		if (msg->header[i].sig != NULL) {
 302 f1509490 2022-03-20 martijn 			free(msg->header[i].sig->b);
 303 f1509490 2022-03-20 martijn 			EVP_MD_CTX_free(msg->header[i].sig->bhctx);
 304 f1509490 2022-03-20 martijn 			for (j = 0; msg->header[i].sig->h != NULL &&
 305 f1509490 2022-03-20 martijn 			    msg->header[i].sig->h[j] != NULL; j++)
 306 f1509490 2022-03-20 martijn 				free(msg->header[i].sig->h[j]);
 307 f1509490 2022-03-20 martijn 			free(msg->header[i].sig->h);
 308 bf67701d 2022-03-29 martijn 			EVP_PKEY_free(msg->header[i].sig->p);
 309 f1509490 2022-03-20 martijn 		}
 310 8cc3b72a 2022-03-27 martijn 		free(msg->header[i].buf);
 311 f1509490 2022-03-20 martijn 		free(msg->header[i].sig);
 312 f1509490 2022-03-20 martijn 	}
 313 f1509490 2022-03-20 martijn 	free(msg->header);
 314 f1509490 2022-03-20 martijn 	free(msg);
 315 f1509490 2022-03-20 martijn }
 316 f1509490 2022-03-20 martijn 
 317 f1509490 2022-03-20 martijn void
 318 f1509490 2022-03-20 martijn dkim_header_add(struct osmtpd_ctx *ctx, const char *line)
 319 f1509490 2022-03-20 martijn {
 320 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 321 4e2dd90f 2022-03-26 martijn 	const char *start, *end, *verify;
 322 f1509490 2022-03-20 martijn 	struct header *headers;
 323 f1509490 2022-03-20 martijn 	size_t i;
 324 f1509490 2022-03-20 martijn 
 325 f1509490 2022-03-20 martijn 	if (msg->nheaders > 0 &&
 326 f1509490 2022-03-20 martijn 	    msg->header[msg->nheaders - 1].readdone == 0) {
 327 f1509490 2022-03-20 martijn 		if (line[0] != ' ' && line[0] != '\t') {
 328 f1509490 2022-03-20 martijn 			msg->header[msg->nheaders - 1].readdone = 1;
 329 f1509490 2022-03-20 martijn 			start = msg->header[msg->nheaders - 1].buf;
 330 4e2dd90f 2022-03-26 martijn 			end = osmtpd_ltok_skip_field_name(start, 0);
 331 f1509490 2022-03-20 martijn 			/* In case someone uses an obs-optional */
 332 5c6a6550 2022-03-24 martijn 			if (end != NULL)
 333 4e2dd90f 2022-03-26 martijn 				verify = osmtpd_ltok_skip_wsp(end, 1);
 334 5c6a6550 2022-03-24 martijn 			if (end != NULL &&
 335 5c6a6550 2022-03-24 martijn 			    strncasecmp(
 336 f1509490 2022-03-20 martijn 			    start, "DKIM-Signature", end - start) == 0 &&
 337 f1509490 2022-03-20 martijn 			    verify[0] == ':')
 338 f1509490 2022-03-20 martijn 				dkim_signature_parse(
 339 f1509490 2022-03-20 martijn 				    &msg->header[msg->nheaders - 1]);
 340 f1509490 2022-03-20 martijn 			if (line[0] == '\0')
 341 f1509490 2022-03-20 martijn 				return;
 342 f1509490 2022-03-20 martijn 		} else {
 343 f1509490 2022-03-20 martijn 			dkim_header_cat(ctx, line);
 344 f1509490 2022-03-20 martijn 			return;
 345 f1509490 2022-03-20 martijn 		}
 346 f1509490 2022-03-20 martijn 	}
 347 f1509490 2022-03-20 martijn 	if (msg->nheaders % 10 == 0) {
 348 f1509490 2022-03-20 martijn 		if ((headers = recallocarray(msg->header, msg->nheaders,
 349 f1509490 2022-03-20 martijn 		    msg->nheaders + 10, sizeof(*msg->header))) == NULL) {
 350 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
 351 f1509490 2022-03-20 martijn 			return;
 352 f1509490 2022-03-20 martijn 		}
 353 f1509490 2022-03-20 martijn 		msg->header = headers;
 354 f1509490 2022-03-20 martijn 		for (i = 0; i < msg->nheaders; i++) {
 355 f1509490 2022-03-20 martijn 			if (msg->header[i].sig == NULL)
 356 f1509490 2022-03-20 martijn 				continue;
 357 f1509490 2022-03-20 martijn 			msg->header[i].sig->header = &msg->header[i];
 358 f1509490 2022-03-20 martijn 		}
 359 f1509490 2022-03-20 martijn 	}
 360 f1509490 2022-03-20 martijn 	msg->header[msg->nheaders].msg = msg;
 361 f1509490 2022-03-20 martijn 	msg->nheaders++;
 362 f1509490 2022-03-20 martijn 	dkim_header_cat(ctx, line);
 363 f1509490 2022-03-20 martijn }
 364 f1509490 2022-03-20 martijn 
 365 f1509490 2022-03-20 martijn void
 366 f1509490 2022-03-20 martijn dkim_header_cat(struct osmtpd_ctx *ctx, const char *line)
 367 f1509490 2022-03-20 martijn {
 368 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 369 f1509490 2022-03-20 martijn 	struct header *header = &msg->header[msg->nheaders - 1];
 370 f1509490 2022-03-20 martijn 	char *buf;
 371 f1509490 2022-03-20 martijn 
 372 f1509490 2022-03-20 martijn 	size_t needed = header->buflen + strlen(line) + 2;
 373 f1509490 2022-03-20 martijn 
 374 f1509490 2022-03-20 martijn 	if (needed > (header->buflen / 1024) + 1) {
 375 f1509490 2022-03-20 martijn 		buf = reallocarray(header->buf, (needed / 1024) + 1, 1024);
 376 f1509490 2022-03-20 martijn 		if (buf == NULL) {
 377 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
 378 f1509490 2022-03-20 martijn 			return;
 379 f1509490 2022-03-20 martijn 		}
 380 f1509490 2022-03-20 martijn 		header->buf = buf;
 381 f1509490 2022-03-20 martijn 	}
 382 f1509490 2022-03-20 martijn 	header->buflen += snprintf(header->buf + header->buflen,
 383 f1509490 2022-03-20 martijn 	    (((needed / 1024) + 1) * 1024) - header->buflen, "%s%s",
 384 f1509490 2022-03-20 martijn 	    header->buflen == 0 ? "" : "\r\n", line);
 385 f1509490 2022-03-20 martijn }
 386 f1509490 2022-03-20 martijn 
 387 f1509490 2022-03-20 martijn void
 388 f1509490 2022-03-20 martijn dkim_signature_parse(struct header *header)
 389 f1509490 2022-03-20 martijn {
 390 cc08de51 2022-03-24 martijn 	struct signature *sig;
 391 cc08de51 2022-03-24 martijn 	struct asr_query *query;
 392 4e2dd90f 2022-03-26 martijn 	const char *buf, *i, *end;
 393 4e2dd90f 2022-03-26 martijn 	char tagname[3];
 394 f1509490 2022-03-20 martijn 	char subdomain[HOST_NAME_MAX + 1];
 395 cc08de51 2022-03-24 martijn 	size_t ilen, dlen;
 396 f1509490 2022-03-20 martijn 
 397 f1509490 2022-03-20 martijn 	/* Format checked by dkim_header_add */
 398 4e2dd90f 2022-03-26 martijn 	buf = osmtpd_ltok_skip_field_name(header->buf, 0);
 399 4e2dd90f 2022-03-26 martijn 	buf = osmtpd_ltok_skip_wsp(buf, 1) + 1;
 400 f1509490 2022-03-20 martijn 
 401 f1509490 2022-03-20 martijn 	if ((header->sig = calloc(1, sizeof(*header->sig))) == NULL) {
 402 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "malloc");
 403 f1509490 2022-03-20 martijn 		return;
 404 f1509490 2022-03-20 martijn 	}
 405 f1509490 2022-03-20 martijn 	sig = header->sig;
 406 f1509490 2022-03-20 martijn 	sig->header = header;
 407 f1509490 2022-03-20 martijn 	sig->l = -1;
 408 f1509490 2022-03-20 martijn 	sig->t = -1;
 409 f1509490 2022-03-20 martijn 	sig->x = -1;
 410 f1509490 2022-03-20 martijn 
 411 4e2dd90f 2022-03-26 martijn 	end = osmtpd_ltok_skip_tag_list(buf, 0);
 412 f1509490 2022-03-20 martijn 	if (end == NULL || end[0] != '\0') {
 413 4e2dd90f 2022-03-26 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid tag-list");
 414 f1509490 2022-03-20 martijn 		return;
 415 f1509490 2022-03-20 martijn 	}
 416 f1509490 2022-03-20 martijn 
 417 f1509490 2022-03-20 martijn 	while (buf[0] != '\0') {
 418 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(buf, 1);
 419 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_tag_name(buf, 0);
 420 f1509490 2022-03-20 martijn 
 421 f1509490 2022-03-20 martijn 		/* Unknown tag-name */
 422 f1509490 2022-03-20 martijn 		if ((size_t)(end - buf) >= sizeof(tagname))
 423 f1509490 2022-03-20 martijn 			tagname[0] = '\0';
 424 f1509490 2022-03-20 martijn 		else
 425 f1509490 2022-03-20 martijn 			strlcpy(tagname, buf, (end - buf) + 1);
 426 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(end, 1);
 427 f1509490 2022-03-20 martijn 		/* '=' */
 428 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(buf + 1, 1);
 429 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_tag_value(buf, 1);
 430 f1509490 2022-03-20 martijn 		if (strcmp(tagname, "v") == 0)
 431 f1509490 2022-03-20 martijn 			dkim_signature_parse_v(sig, buf, end);
 432 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "a") == 0)
 433 f1509490 2022-03-20 martijn 			dkim_signature_parse_a(sig, buf, end);
 434 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "b") == 0)
 435 f1509490 2022-03-20 martijn 			dkim_signature_parse_b(sig, buf, end);
 436 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "bh") == 0)
 437 f1509490 2022-03-20 martijn 			dkim_signature_parse_bh(sig, buf, end);
 438 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "c") == 0)
 439 f1509490 2022-03-20 martijn 			dkim_signature_parse_c(sig, buf, end);
 440 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "d") == 0)
 441 f1509490 2022-03-20 martijn 			dkim_signature_parse_d(sig, buf, end);
 442 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "h") == 0)
 443 f1509490 2022-03-20 martijn 			dkim_signature_parse_h(sig, buf, end);
 444 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "i") == 0)
 445 f1509490 2022-03-20 martijn 			dkim_signature_parse_i(sig, buf, end);
 446 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "l") == 0)
 447 f1509490 2022-03-20 martijn 			dkim_signature_parse_l(sig, buf, end);
 448 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "q") == 0)
 449 f1509490 2022-03-20 martijn 			dkim_signature_parse_q(sig, buf, end);
 450 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "s") == 0)
 451 f1509490 2022-03-20 martijn 			dkim_signature_parse_s(sig, buf, end);
 452 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "t") == 0)
 453 f1509490 2022-03-20 martijn 			dkim_signature_parse_t(sig, buf, end);
 454 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "x") == 0)
 455 f1509490 2022-03-20 martijn 			dkim_signature_parse_x(sig, buf, end);
 456 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "z") == 0)
 457 f1509490 2022-03-20 martijn 			dkim_signature_parse_z(sig, buf, end);
 458 f1509490 2022-03-20 martijn 
 459 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(end, 1);
 460 f1509490 2022-03-20 martijn 		if (buf[0] == ';')
 461 f1509490 2022-03-20 martijn 			buf++;
 462 f1509490 2022-03-20 martijn 		else if (buf[0] != '\0') {
 463 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 464 4e2dd90f 2022-03-26 martijn 			    "Invalid tag-list");
 465 f1509490 2022-03-20 martijn 			return;
 466 f1509490 2022-03-20 martijn 		}
 467 f1509490 2022-03-20 martijn 	}
 468 f1509490 2022-03-20 martijn 	if (sig->state != DKIM_UNKNOWN)
 469 f1509490 2022-03-20 martijn 		return;
 470 f1509490 2022-03-20 martijn 
 471 f1509490 2022-03-20 martijn 	if (sig->v != 1)
 472 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing v tag");
 473 f1509490 2022-03-20 martijn 	else if (sig->ah == NULL)
 474 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing a tag");
 475 f1509490 2022-03-20 martijn 	else if (sig->b == NULL)
 476 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing b tag");
 477 f1509490 2022-03-20 martijn 	else if (sig->bhsz == 0)
 478 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing bh tag");
 479 f1509490 2022-03-20 martijn 	else if (sig->d[0] == '\0')
 480 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing d tag");
 481 f1509490 2022-03-20 martijn 	else if (sig->h == NULL)
 482 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing h tag");
 483 f1509490 2022-03-20 martijn 	else if (sig->s[0] == '\0')
 484 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing s tag");
 485 759a6c7b 2022-03-24 martijn 	if (sig->state != DKIM_UNKNOWN)
 486 759a6c7b 2022-03-24 martijn 		return;
 487 f1509490 2022-03-20 martijn 
 488 cc08de51 2022-03-24 martijn 	if (sig->i != NULL) {
 489 4e2dd90f 2022-03-26 martijn 		i = osmtpd_ltok_skip_local_part(sig->i, 1) + 1;
 490 efee726e 2022-03-27 martijn 		ilen = sig->isz - (size_t)(i - sig->i);
 491 cc08de51 2022-03-24 martijn 		dlen = strlen(sig->d);
 492 cc08de51 2022-03-24 martijn 		if (ilen < dlen) {
 493 cc08de51 2022-03-24 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 494 f85da730 2022-03-27 martijn 			    "i tag not subdomain of d");
 495 cc08de51 2022-03-24 martijn 			return;
 496 cc08de51 2022-03-24 martijn 		}
 497 cc08de51 2022-03-24 martijn 		i += ilen - dlen;
 498 efee726e 2022-03-27 martijn 		if ((i[-1] != '.' && i[-1] != '@') ||
 499 7847bd66 2022-04-05 martijn 		    strncasecmp(i, sig->d, dlen) != 0) {
 500 cc08de51 2022-03-24 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 501 efee726e 2022-03-27 martijn 			    "i tag not subdomain of d");
 502 cc08de51 2022-03-24 martijn 			return;
 503 cc08de51 2022-03-24 martijn 		}
 504 cc08de51 2022-03-24 martijn 	}
 505 2d83468e 2022-03-24 martijn 	if (sig->t != -1 && sig->x != -1 && sig->t > sig->x) {
 506 2d83468e 2022-03-24 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "t tag after x tag");
 507 2d83468e 2022-03-24 martijn 		return;
 508 2d83468e 2022-03-24 martijn 	}
 509 cc08de51 2022-03-24 martijn 
 510 f1509490 2022-03-20 martijn 	if ((size_t)snprintf(subdomain, sizeof(subdomain), "%s._domainkey.%s",
 511 f1509490 2022-03-20 martijn 	    sig->s, sig->d) >= sizeof(subdomain)) {
 512 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
 513 f1509490 2022-03-20 martijn 		    "dns/txt query too long");
 514 f1509490 2022-03-20 martijn 		return;
 515 f1509490 2022-03-20 martijn 	}
 516 f1509490 2022-03-20 martijn 
 517 f1509490 2022-03-20 martijn 	if ((query = res_query_async(subdomain, C_IN, T_TXT, NULL)) == NULL) {
 518 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "res_query_async");
 519 f1509490 2022-03-20 martijn 		return;
 520 f1509490 2022-03-20 martijn 	}
 521 f1509490 2022-03-20 martijn 	if ((sig->query = event_asr_run(query, dkim_rr_resolve, sig)) == NULL) {
 522 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "event_asr_run");
 523 f1509490 2022-03-20 martijn 		asr_abort(query);
 524 f1509490 2022-03-20 martijn 		return;
 525 f1509490 2022-03-20 martijn 	}
 526 f1509490 2022-03-20 martijn }
 527 f1509490 2022-03-20 martijn 
 528 f1509490 2022-03-20 martijn void
 529 4e2dd90f 2022-03-26 martijn dkim_signature_parse_v(struct signature *sig, const char *start, const char *end)
 530 f1509490 2022-03-20 martijn {
 531 f1509490 2022-03-20 martijn 	if (sig->v != 0) {	/* Duplicate tag */
 532 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate v tag");
 533 f1509490 2022-03-20 martijn 		return;
 534 f1509490 2022-03-20 martijn 	}
 535 f1509490 2022-03-20 martijn 	/* Unsupported version */
 536 f1509490 2022-03-20 martijn 	if (start[0] != '1' || start + 1 != end)
 537 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsupported v tag");
 538 f1509490 2022-03-20 martijn 	else
 539 f1509490 2022-03-20 martijn 		sig->v = 1;
 540 f1509490 2022-03-20 martijn }
 541 f1509490 2022-03-20 martijn 
 542 f1509490 2022-03-20 martijn void
 543 4e2dd90f 2022-03-26 martijn dkim_signature_parse_a(struct signature *sig, const char *start, const char *end)
 544 f1509490 2022-03-20 martijn {
 545 f1509490 2022-03-20 martijn 	char ah[sizeof("sha256")];
 546 f1509490 2022-03-20 martijn 
 547 f1509490 2022-03-20 martijn 	if (sig->ah != NULL) {
 548 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate a tag");
 549 f1509490 2022-03-20 martijn 		return;
 550 f1509490 2022-03-20 martijn 	}
 551 f1509490 2022-03-20 martijn 
 552 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_sig_a_tag_alg(start, 0) != end) {
 553 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid a tag");
 554 f1509490 2022-03-20 martijn 		return;
 555 f1509490 2022-03-20 martijn 	}
 556 f1509490 2022-03-20 martijn 	sig->a = start;
 557 f1509490 2022-03-20 martijn 	sig->asz = (size_t)(end - start);
 558 f1509490 2022-03-20 martijn 	if (strncmp(start, "rsa-", 4) == 0) {
 559 f1509490 2022-03-20 martijn 		start += 4;
 560 f1509490 2022-03-20 martijn 		sig->ak = EVP_PKEY_RSA;
 561 338537df 2022-04-08 martijn 		sig->sephash = 0;
 562 72580136 2022-12-16 martijn #if HAVE_ED25519
 563 338537df 2022-04-08 martijn 	} else if (strncmp(start, "ed25519-", 8) == 0) {
 564 338537df 2022-04-08 martijn 		start += 8;
 565 338537df 2022-04-08 martijn 		sig->ak = EVP_PKEY_ED25519;
 566 338537df 2022-04-08 martijn 		sig->sephash = 1;
 567 72580136 2022-12-16 martijn #endif
 568 f1509490 2022-03-20 martijn 	} else {
 569 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag k");
 570 f1509490 2022-03-20 martijn 		return;
 571 f1509490 2022-03-20 martijn 	}
 572 f1509490 2022-03-20 martijn 	if ((size_t)(end - start) >= sizeof(ah)) {
 573 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag h");
 574 f1509490 2022-03-20 martijn 		return;
 575 f1509490 2022-03-20 martijn 	}
 576 f1509490 2022-03-20 martijn 	strlcpy(ah, start, sizeof(ah));
 577 f1509490 2022-03-20 martijn 	ah[end - start] = '\0';
 578 f1509490 2022-03-20 martijn 	if ((sig->ah = EVP_get_digestbyname(ah)) == NULL) {
 579 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag h");
 580 f1509490 2022-03-20 martijn 		return;
 581 f1509490 2022-03-20 martijn 	}
 582 f1509490 2022-03-20 martijn 	if ((sig->bhctx = EVP_MD_CTX_new()) == NULL) {
 583 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "EVP_MD_CTX_new");
 584 f1509490 2022-03-20 martijn 		return;
 585 f1509490 2022-03-20 martijn 	}
 586 f1509490 2022-03-20 martijn 	if (EVP_DigestInit_ex(sig->bhctx, sig->ah, NULL) <= 0) {
 587 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "EVP_DigestInit_ex");
 588 f1509490 2022-03-20 martijn 		return;
 589 f1509490 2022-03-20 martijn 	}
 590 f1509490 2022-03-20 martijn }
 591 f1509490 2022-03-20 martijn 
 592 f1509490 2022-03-20 martijn void
 593 4e2dd90f 2022-03-26 martijn dkim_signature_parse_b(struct signature *sig, const char *start, const char *end)
 594 f1509490 2022-03-20 martijn {
 595 f1509490 2022-03-20 martijn 	int decodesz;
 596 f1509490 2022-03-20 martijn 
 597 f1509490 2022-03-20 martijn 	if (sig->b != NULL) {
 598 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate b tag");
 599 f1509490 2022-03-20 martijn 		return;
 600 f1509490 2022-03-20 martijn 	}
 601 f1509490 2022-03-20 martijn 	sig->bheader = start;
 602 f1509490 2022-03-20 martijn 	if ((sig->b = malloc((((end - start) / 4) + 1) * 3)) == NULL) {
 603 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "malloc");
 604 f1509490 2022-03-20 martijn 		return;
 605 f1509490 2022-03-20 martijn 	}
 606 f1509490 2022-03-20 martijn 	/* EVP_DecodeBlock doesn't handle internal whitespace */
 607 f1509490 2022-03-20 martijn 	EVP_DecodeInit(ectx);
 608 f1509490 2022-03-20 martijn 	if (EVP_DecodeUpdate(ectx, sig->b, &decodesz, start,
 609 f1509490 2022-03-20 martijn 	    (int)(end - start)) == -1) {
 610 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid b tag");
 611 f1509490 2022-03-20 martijn 		return;
 612 f1509490 2022-03-20 martijn 	}
 613 f1509490 2022-03-20 martijn 	sig->bsz = decodesz;
 614 f1509490 2022-03-20 martijn 	if (EVP_DecodeFinal(ectx, sig->b + sig->bsz,
 615 f1509490 2022-03-20 martijn 	    &decodesz) == -1) {
 616 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid b tag");
 617 f1509490 2022-03-20 martijn 		return;
 618 f1509490 2022-03-20 martijn 	}
 619 f1509490 2022-03-20 martijn 	sig->bsz += decodesz;
 620 f1509490 2022-03-20 martijn }
 621 f1509490 2022-03-20 martijn 
 622 f1509490 2022-03-20 martijn void
 623 4e2dd90f 2022-03-26 martijn dkim_signature_parse_bh(struct signature *sig, const char *start, const char *end)
 624 f1509490 2022-03-20 martijn {
 625 4e2dd90f 2022-03-26 martijn 	const char *b64;
 626 f1509490 2022-03-20 martijn 	size_t n;
 627 f1509490 2022-03-20 martijn 	int decodesz;
 628 f1509490 2022-03-20 martijn 
 629 f1509490 2022-03-20 martijn 	if (sig->bhsz != 0) {
 630 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate bh tag");
 631 f1509490 2022-03-20 martijn 		return;
 632 f1509490 2022-03-20 martijn 	}
 633 f1509490 2022-03-20 martijn 	/*
 634 f1509490 2022-03-20 martijn 	 * EVP_Decode* expects sig->bh to be large enough,
 635 f1509490 2022-03-20 martijn 	 * so count the actual b64 characters.
 636 f1509490 2022-03-20 martijn 	 */
 637 f1509490 2022-03-20 martijn 	b64 = start;
 638 f1509490 2022-03-20 martijn 	n = 0;
 639 f1509490 2022-03-20 martijn 	while (1) {
 640 4e2dd90f 2022-03-26 martijn 		b64 = osmtpd_ltok_skip_fws(b64, 1);
 641 4e2dd90f 2022-03-26 martijn 		if (osmtpd_ltok_skip_alphadigitps(b64, 0) == NULL)
 642 f1509490 2022-03-20 martijn 			break;
 643 f1509490 2022-03-20 martijn 		n++;
 644 f1509490 2022-03-20 martijn 		b64++;
 645 f1509490 2022-03-20 martijn 	}
 646 f1509490 2022-03-20 martijn 	if (b64[0] == '=') {
 647 f1509490 2022-03-20 martijn 		n++;
 648 4e2dd90f 2022-03-26 martijn 		b64 = osmtpd_ltok_skip_fws(b64 + 1, 1);
 649 f1509490 2022-03-20 martijn 		if (b64[0] == '=') {
 650 f1509490 2022-03-20 martijn 			n++;
 651 f1509490 2022-03-20 martijn 			b64++;
 652 f1509490 2022-03-20 martijn 		}
 653 f1509490 2022-03-20 martijn 	}
 654 f1509490 2022-03-20 martijn 	/* Invalid tag value */
 655 f1509490 2022-03-20 martijn 	if (b64 != end || n % 4 != 0 || (n / 4) * 3 > sizeof(sig->bh)) {
 656 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 657 f1509490 2022-03-20 martijn 		return;
 658 f1509490 2022-03-20 martijn 	}
 659 f1509490 2022-03-20 martijn 	/* EVP_DecodeBlock doesn't handle internal whitespace */
 660 f1509490 2022-03-20 martijn 	EVP_DecodeInit(ectx);
 661 f1509490 2022-03-20 martijn 	if (EVP_DecodeUpdate(ectx, sig->bh, &decodesz, start,
 662 f1509490 2022-03-20 martijn 	    (int)(end - start)) == -1) {
 663 f1509490 2022-03-20 martijn 		/* Paranoia check */
 664 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 665 f1509490 2022-03-20 martijn 		return;
 666 f1509490 2022-03-20 martijn 	}
 667 f1509490 2022-03-20 martijn 	sig->bhsz = decodesz;
 668 f1509490 2022-03-20 martijn 	if (EVP_DecodeFinal(ectx, sig->bh + sig->bhsz, &decodesz) == -1) {
 669 f1509490 2022-03-20 martijn 		/* Paranoia check */
 670 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 671 f1509490 2022-03-20 martijn 		return;
 672 f1509490 2022-03-20 martijn 	}
 673 f1509490 2022-03-20 martijn 	sig->bhsz += decodesz;
 674 f1509490 2022-03-20 martijn }
 675 f1509490 2022-03-20 martijn 
 676 f1509490 2022-03-20 martijn void
 677 4e2dd90f 2022-03-26 martijn dkim_signature_parse_c(struct signature *sig, const char *start, const char *end)
 678 f1509490 2022-03-20 martijn {
 679 f1509490 2022-03-20 martijn 	if (sig->c != 0) {
 680 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate c tag");
 681 f1509490 2022-03-20 martijn 		return;
 682 f1509490 2022-03-20 martijn 	}
 683 f1509490 2022-03-20 martijn 	if (strncmp(start, "simple", 6) == 0) {
 684 f1509490 2022-03-20 martijn 		sig->c = CANON_HEADER_SIMPLE;
 685 f1509490 2022-03-20 martijn 		start += 6;
 686 f1509490 2022-03-20 martijn 	} else if (strncmp(start, "relaxed", 7) == 0) {
 687 f1509490 2022-03-20 martijn 		sig->c = CANON_HEADER_RELAXED;
 688 f1509490 2022-03-20 martijn 		start += 7;
 689 f1509490 2022-03-20 martijn 	} else {
 690 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid c tag");
 691 f1509490 2022-03-20 martijn 		return;
 692 f1509490 2022-03-20 martijn 	}
 693 f1509490 2022-03-20 martijn 	if (start[0] == '/') {
 694 f1509490 2022-03-20 martijn 		start++;
 695 f1509490 2022-03-20 martijn 		if (strncmp(start, "simple", 6) == 0) {
 696 f1509490 2022-03-20 martijn 			sig->c |= CANON_BODY_SIMPLE;
 697 f1509490 2022-03-20 martijn 			start += 6;
 698 f1509490 2022-03-20 martijn 		} else if (strncmp(start, "relaxed", 7) == 0) {
 699 f1509490 2022-03-20 martijn 			sig->c |= CANON_BODY_RELAXED;
 700 f1509490 2022-03-20 martijn 			start += 7;
 701 f1509490 2022-03-20 martijn 		} else {
 702 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 703 f1509490 2022-03-20 martijn 			    "Invalid c tag");
 704 f1509490 2022-03-20 martijn 			return;
 705 f1509490 2022-03-20 martijn 		}
 706 f1509490 2022-03-20 martijn 	}
 707 f1509490 2022-03-20 martijn 
 708 f1509490 2022-03-20 martijn 	if (start != end) {
 709 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid c tag");
 710 f1509490 2022-03-20 martijn 		return;
 711 f1509490 2022-03-20 martijn 	}
 712 f1509490 2022-03-20 martijn 	sig->c |= CANON_DONE;
 713 f1509490 2022-03-20 martijn }
 714 f1509490 2022-03-20 martijn 
 715 f1509490 2022-03-20 martijn void
 716 4e2dd90f 2022-03-26 martijn dkim_signature_parse_d(struct signature *sig, const char *start, const char *end)
 717 f1509490 2022-03-20 martijn {
 718 f1509490 2022-03-20 martijn 	if (sig->d[0] != '\0') {
 719 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate d tag");
 720 f1509490 2022-03-20 martijn 		return;
 721 f1509490 2022-03-20 martijn 	}
 722 2817edca 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_d_tag_value(start, 0) != end ||
 723 f1509490 2022-03-20 martijn 	    (size_t)(end - start) >= sizeof(sig->d)) {
 724 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid d tag");
 725 f1509490 2022-03-20 martijn 		return;
 726 f1509490 2022-03-20 martijn 	}
 727 f1509490 2022-03-20 martijn 	strlcpy(sig->d, start, end - start + 1);
 728 f1509490 2022-03-20 martijn }
 729 f1509490 2022-03-20 martijn 
 730 f1509490 2022-03-20 martijn void
 731 4e2dd90f 2022-03-26 martijn dkim_signature_parse_h(struct signature *sig, const char *start, const char *end)
 732 f1509490 2022-03-20 martijn {
 733 4e2dd90f 2022-03-26 martijn 	const char *h;
 734 f1509490 2022-03-20 martijn 	size_t n = 0;
 735 f1509490 2022-03-20 martijn 
 736 f1509490 2022-03-20 martijn 	if (sig->h != NULL) {
 737 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate h tag");
 738 f1509490 2022-03-20 martijn 		return;
 739 f1509490 2022-03-20 martijn 	}
 740 022782a1 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_h_tag_value(start, 0) < end) {
 741 04225ff9 2022-03-30 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid h tag");
 742 04225ff9 2022-03-30 martijn 		return;
 743 04225ff9 2022-03-30 martijn 	}
 744 f1509490 2022-03-20 martijn 	h = start;
 745 f1509490 2022-03-20 martijn 	while (1) {
 746 4e2dd90f 2022-03-26 martijn 		if ((h = osmtpd_ltok_skip_hdr_name(h, 0)) == NULL) {
 747 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 748 f1509490 2022-03-20 martijn 			    "Invalid h tag");
 749 f1509490 2022-03-20 martijn 			return;
 750 f1509490 2022-03-20 martijn 		}
 751 f1509490 2022-03-20 martijn 		n++;
 752 f1509490 2022-03-20 martijn 		/* ';' is part of hdr-name */
 753 f1509490 2022-03-20 martijn 		if (h > end) {
 754 f1509490 2022-03-20 martijn 			h = end;
 755 f1509490 2022-03-20 martijn 			break;
 756 f1509490 2022-03-20 martijn 		}
 757 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_fws(h, 1);
 758 f1509490 2022-03-20 martijn 		if (h[0] != ':')
 759 f1509490 2022-03-20 martijn 			break;
 760 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_fws(h + 1, 1);
 761 f1509490 2022-03-20 martijn 	}
 762 f1509490 2022-03-20 martijn 	if ((sig->h = calloc(n + 1, sizeof(*sig->h))) == NULL) {
 763 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "malloc");
 764 f1509490 2022-03-20 martijn 		return;
 765 f1509490 2022-03-20 martijn 	}
 766 f1509490 2022-03-20 martijn 	n = 0;
 767 f1509490 2022-03-20 martijn 	h = start;
 768 f1509490 2022-03-20 martijn 	while (1) {
 769 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_hdr_name(start, 0);
 770 f1509490 2022-03-20 martijn 		/* ';' is part of hdr-name */
 771 f1509490 2022-03-20 martijn 		if (h > end) {
 772 f1509490 2022-03-20 martijn 			sig->h[n] = strndup(start, end - start);
 773 f1509490 2022-03-20 martijn 			break;
 774 f1509490 2022-03-20 martijn 		}
 775 f1509490 2022-03-20 martijn 		if ((sig->h[n++] = strndup(start, h - start)) == NULL) {
 776 f1509490 2022-03-20 martijn 			dkim_err(sig->header->msg, "malloc");
 777 f1509490 2022-03-20 martijn 			return;
 778 f1509490 2022-03-20 martijn 		}
 779 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(h, 1);
 780 f1509490 2022-03-20 martijn 		if (start[0] != ':')
 781 f1509490 2022-03-20 martijn 			break;
 782 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(start + 1, 1);
 783 f1509490 2022-03-20 martijn 	}
 784 f1509490 2022-03-20 martijn }
 785 f1509490 2022-03-20 martijn 
 786 f1509490 2022-03-20 martijn void
 787 4e2dd90f 2022-03-26 martijn dkim_signature_parse_i(struct signature *sig, const char *start, const char *end)
 788 f1509490 2022-03-20 martijn {
 789 f1509490 2022-03-20 martijn 	if (sig->i != NULL) {
 790 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate i tag");
 791 f1509490 2022-03-20 martijn 		return;
 792 f1509490 2022-03-20 martijn 	}
 793 2b49c695 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_i_tag_value(start, 0) != end) {
 794 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid i tag");
 795 f1509490 2022-03-20 martijn 		return;
 796 f1509490 2022-03-20 martijn 	}
 797 f1509490 2022-03-20 martijn 	sig->i = start;
 798 f1509490 2022-03-20 martijn 	sig->isz = (size_t)(end - start);
 799 f1509490 2022-03-20 martijn }
 800 f1509490 2022-03-20 martijn 
 801 f1509490 2022-03-20 martijn void
 802 4e2dd90f 2022-03-26 martijn dkim_signature_parse_l(struct signature *sig, const char *start, const char *end)
 803 f1509490 2022-03-20 martijn {
 804 f1509490 2022-03-20 martijn 	long long l;
 805 f1509490 2022-03-20 martijn 	char *lend;
 806 f1509490 2022-03-20 martijn 
 807 f1509490 2022-03-20 martijn 	if (sig->l != -1) {	/* Duplicate tag */
 808 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate l tag");
 809 f1509490 2022-03-20 martijn 		return;
 810 f1509490 2022-03-20 martijn 	}
 811 f1509490 2022-03-20 martijn 	errno = 0;
 812 f1509490 2022-03-20 martijn 	l = strtoll(start, &lend, 10);
 813 f1509490 2022-03-20 martijn 	/* > 76 digits in stroll is an overflow */
 814 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL ||
 815 f1509490 2022-03-20 martijn 	    lend != end || errno != 0) {
 816 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid l tag");
 817 f1509490 2022-03-20 martijn 		return;
 818 f1509490 2022-03-20 martijn 	}
 819 f1509490 2022-03-20 martijn 	if (l > SSIZE_MAX) {
 820 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "l tag too large");
 821 f1509490 2022-03-20 martijn 		return;
 822 f1509490 2022-03-20 martijn 	}
 823 f1509490 2022-03-20 martijn 	sig->l = (ssize_t)l;
 824 f1509490 2022-03-20 martijn }
 825 f1509490 2022-03-20 martijn 
 826 f1509490 2022-03-20 martijn void
 827 4e2dd90f 2022-03-26 martijn dkim_signature_parse_q(struct signature *sig, const char *start, const char *end)
 828 f1509490 2022-03-20 martijn {
 829 4e2dd90f 2022-03-26 martijn 	const char *qend;
 830 f1509490 2022-03-20 martijn 
 831 f1509490 2022-03-20 martijn 	if (sig->q != 0) {
 832 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate q tag");
 833 f1509490 2022-03-20 martijn 		return;
 834 f1509490 2022-03-20 martijn 	}
 835 f1509490 2022-03-20 martijn 
 836 f1509490 2022-03-20 martijn 	while (1) {
 837 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(start, 1);
 838 4e2dd90f 2022-03-26 martijn 		qend = osmtpd_ltok_skip_sig_q_tag_method(start, 0);
 839 f1509490 2022-03-20 martijn 		if (qend == NULL) {
 840 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR, "Invalid q tag");
 841 f1509490 2022-03-20 martijn 			return;
 842 f1509490 2022-03-20 martijn 		}
 843 f1509490 2022-03-20 martijn 		if (strncmp(start, "dns/txt", qend - start) == 0)
 844 f1509490 2022-03-20 martijn 			sig->q = 1;
 845 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(qend, 1);
 846 f1509490 2022-03-20 martijn 		if (start[0] != ':')
 847 f1509490 2022-03-20 martijn 			break;
 848 f1509490 2022-03-20 martijn 	}
 849 f1509490 2022-03-20 martijn 	if (start != end) {
 850 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid q tag");
 851 f1509490 2022-03-20 martijn 		return;
 852 f1509490 2022-03-20 martijn 	}
 853 f1509490 2022-03-20 martijn 	if (sig->q != 1) {
 854 f1509490 2022-03-20 martijn 		sig->q = 1;
 855 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "No useable q found");
 856 f1509490 2022-03-20 martijn 		return;
 857 f1509490 2022-03-20 martijn 	}
 858 f1509490 2022-03-20 martijn }
 859 f1509490 2022-03-20 martijn 
 860 f1509490 2022-03-20 martijn void
 861 4e2dd90f 2022-03-26 martijn dkim_signature_parse_s(struct signature *sig, const char *start, const char *end)
 862 f1509490 2022-03-20 martijn {
 863 f1509490 2022-03-20 martijn 	if (sig->s[0] != '\0') {
 864 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate s tag");
 865 f1509490 2022-03-20 martijn 		return;
 866 f1509490 2022-03-20 martijn 	}
 867 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_selector(start, 0) != end) {
 868 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid s tag");
 869 f1509490 2022-03-20 martijn 		return;
 870 f1509490 2022-03-20 martijn 	}
 871 f1509490 2022-03-20 martijn 	strlcpy(sig->s, start, end - start + 1);
 872 f1509490 2022-03-20 martijn }
 873 f1509490 2022-03-20 martijn 
 874 f1509490 2022-03-20 martijn void
 875 4e2dd90f 2022-03-26 martijn dkim_signature_parse_t(struct signature *sig, const char *start, const char *end)
 876 f1509490 2022-03-20 martijn {
 877 f1509490 2022-03-20 martijn 	char *tend;
 878 f1509490 2022-03-20 martijn 
 879 f1509490 2022-03-20 martijn 	if (sig->t != -1) {
 880 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate t tag");
 881 f1509490 2022-03-20 martijn 		return;
 882 f1509490 2022-03-20 martijn 	}
 883 f1509490 2022-03-20 martijn 	errno = 0;
 884 f1509490 2022-03-20 martijn 	sig->t = strtoll(start, &tend, 10);
 885 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL || tend != end ||
 886 f1509490 2022-03-20 martijn 	    tend - start > 12 || errno != 0) {
 887 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid t tag");
 888 f1509490 2022-03-20 martijn 		return;
 889 f1509490 2022-03-20 martijn 	}
 890 f1509490 2022-03-20 martijn }
 891 f1509490 2022-03-20 martijn 
 892 f1509490 2022-03-20 martijn void
 893 4e2dd90f 2022-03-26 martijn dkim_signature_parse_x(struct signature *sig, const char *start, const char *end)
 894 f1509490 2022-03-20 martijn {
 895 f1509490 2022-03-20 martijn 	char *xend;
 896 f1509490 2022-03-20 martijn 
 897 f1509490 2022-03-20 martijn 	if (sig->x != -1) {
 898 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate x tag");
 899 f1509490 2022-03-20 martijn 		return;
 900 f1509490 2022-03-20 martijn 	}
 901 f1509490 2022-03-20 martijn 	errno = 0;
 902 f1509490 2022-03-20 martijn 	sig->x = strtoll(start, &xend, 10);
 903 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL || xend != end ||
 904 f1509490 2022-03-20 martijn 	    xend - start > 12 || errno != 0) {
 905 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid x tag");
 906 f1509490 2022-03-20 martijn 		return;
 907 f1509490 2022-03-20 martijn 	}
 908 f1509490 2022-03-20 martijn }
 909 f1509490 2022-03-20 martijn 
 910 f1509490 2022-03-20 martijn void
 911 4e2dd90f 2022-03-26 martijn dkim_signature_parse_z(struct signature *sig, const char *start, const char *end)
 912 f1509490 2022-03-20 martijn {
 913 f1509490 2022-03-20 martijn 	if (sig->z != 0) {
 914 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate z tag");
 915 f1509490 2022-03-20 martijn 		return;
 916 f1509490 2022-03-20 martijn 	}
 917 f1509490 2022-03-20 martijn 
 918 f1509490 2022-03-20 martijn 	sig->z = 1;
 919 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_sig_z_tag_value(start, 0) != end) {
 920 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid z tag");
 921 f1509490 2022-03-20 martijn 		return;
 922 f1509490 2022-03-20 martijn 	}
 923 f1509490 2022-03-20 martijn }
 924 f1509490 2022-03-20 martijn 
 925 f1509490 2022-03-20 martijn void
 926 f1509490 2022-03-20 martijn dkim_signature_verify(struct signature *sig)
 927 f1509490 2022-03-20 martijn {
 928 f1509490 2022-03-20 martijn 	struct message *msg = sig->header->msg;
 929 f1509490 2022-03-20 martijn 	static EVP_MD_CTX *bctx = NULL;
 930 338537df 2022-04-08 martijn 	char digest[EVP_MAX_MD_SIZE];
 931 338537df 2022-04-08 martijn 	unsigned int digestsz;
 932 4e2dd90f 2022-03-26 martijn 	const char *end;
 933 f1509490 2022-03-20 martijn 	size_t i, header;
 934 f1509490 2022-03-20 martijn 
 935 f1509490 2022-03-20 martijn 	if (sig->state != DKIM_UNKNOWN)
 936 f1509490 2022-03-20 martijn 		return;
 937 f1509490 2022-03-20 martijn 
 938 f1509490 2022-03-20 martijn 	if (bctx == NULL) {
 939 f1509490 2022-03-20 martijn 		if ((bctx = EVP_MD_CTX_new()) == NULL) {
 940 f1509490 2022-03-20 martijn 			dkim_errx(msg, "EVP_MD_CTX_new");
 941 f1509490 2022-03-20 martijn 			return;
 942 f1509490 2022-03-20 martijn 		}
 943 f1509490 2022-03-20 martijn 	}
 944 8015d1bc 2022-03-23 martijn 	EVP_MD_CTX_reset(bctx);
 945 338537df 2022-04-08 martijn 	if (!sig->sephash) {
 946 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyInit(bctx, NULL, sig->ah, NULL,
 947 338537df 2022-04-08 martijn 		    sig->p) != 1) {
 948 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerifyInit");
 949 338537df 2022-04-08 martijn 			return;
 950 338537df 2022-04-08 martijn 		}
 951 338537df 2022-04-08 martijn 	} else {
 952 338537df 2022-04-08 martijn 		if (EVP_DigestInit_ex(bctx, sig->ah, NULL) != 1) {
 953 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestInit_ex");
 954 338537df 2022-04-08 martijn 			return;
 955 338537df 2022-04-08 martijn 		}
 956 f1509490 2022-03-20 martijn 	}
 957 f1509490 2022-03-20 martijn 
 958 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++)
 959 f1509490 2022-03-20 martijn 		msg->header[i].parsed = 0;
 960 f1509490 2022-03-20 martijn 
 961 f1509490 2022-03-20 martijn 	for (header = 0; sig->h[header] != NULL; header++) {
 962 f1509490 2022-03-20 martijn 		for (i = msg->nheaders; i > 0; ) {
 963 f1509490 2022-03-20 martijn 			i--;
 964 f1509490 2022-03-20 martijn 			if (msg->header[i].parsed ||
 965 f1509490 2022-03-20 martijn 			    strncasecmp(msg->header[i].buf, sig->h[header],
 966 f1509490 2022-03-20 martijn 			    strlen(sig->h[header])) != 0 ||
 967 f1509490 2022-03-20 martijn 			    msg->header[i].sig == sig)
 968 f1509490 2022-03-20 martijn 				continue;
 969 4e2dd90f 2022-03-26 martijn 			end = osmtpd_ltok_skip_fws(
 970 f1509490 2022-03-20 martijn 			    msg->header[i].buf + strlen(sig->h[header]), 1);
 971 f1509490 2022-03-20 martijn 			if (end[0] != ':')
 972 f1509490 2022-03-20 martijn 				continue;
 973 f1509490 2022-03-20 martijn 			dkim_signature_header(bctx, sig, &(msg->header[i]));
 974 f1509490 2022-03-20 martijn 			msg->header[i].parsed = 1;
 975 f1509490 2022-03-20 martijn 		}
 976 f1509490 2022-03-20 martijn 	}
 977 f1509490 2022-03-20 martijn 	dkim_signature_header(bctx, sig, sig->header);
 978 338537df 2022-04-08 martijn 	if (!sig->sephash) {
 979 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyFinal(bctx, sig->b, sig->bsz) != 1)
 980 338537df 2022-04-08 martijn 			dkim_signature_state(sig, DKIM_FAIL, "b mismatch");
 981 338537df 2022-04-08 martijn 	} else {
 982 338537df 2022-04-08 martijn 		if (EVP_DigestFinal_ex(bctx, digest, &digestsz) == 0) {
 983 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestFinal_ex");
 984 338537df 2022-04-08 martijn 			return;
 985 338537df 2022-04-08 martijn 		}
 986 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyInit(bctx, NULL, NULL, NULL, sig->p) != 1) {
 987 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerifyInit");
 988 338537df 2022-04-08 martijn 			return;
 989 338537df 2022-04-08 martijn 		}
 990 338537df 2022-04-08 martijn 		switch (EVP_DigestVerify(bctx, sig->b, sig->bsz, digest,
 991 338537df 2022-04-08 martijn 		    digestsz)) {
 992 338537df 2022-04-08 martijn 		case 1:
 993 338537df 2022-04-08 martijn 			break;
 994 338537df 2022-04-08 martijn 		case 0:
 995 338537df 2022-04-08 martijn 			dkim_signature_state(sig, DKIM_FAIL, "b mismatch");
 996 338537df 2022-04-08 martijn 			break;
 997 338537df 2022-04-08 martijn 		default:
 998 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerify");
 999 338537df 2022-04-08 martijn 			return;
1000 338537df 2022-04-08 martijn 		}
1001 338537df 2022-04-08 martijn 	}
1002 f1509490 2022-03-20 martijn }
1003 f1509490 2022-03-20 martijn 
1004 338537df 2022-04-08 martijn /* EVP_DigestVerifyUpdate is a macro, so we can't alias this on a variable */
1005 338537df 2022-04-08 martijn #define dkim_b_digest_update(a, b, c)					\
1006 338537df 2022-04-08 martijn 	(sig->sephash ? EVP_DigestUpdate((a), (b), (c)) :\
1007 338537df 2022-04-08 martijn 	    EVP_DigestVerifyUpdate((a), (b), (c)))
1008 338537df 2022-04-08 martijn 
1009 f1509490 2022-03-20 martijn void
1010 f1509490 2022-03-20 martijn dkim_signature_header(EVP_MD_CTX *bctx, struct signature *sig,
1011 f1509490 2022-03-20 martijn     struct header *header)
1012 f1509490 2022-03-20 martijn {
1013 4e2dd90f 2022-03-26 martijn 	char c;
1014 4e2dd90f 2022-03-26 martijn 	const char *ptr = header->buf, *end;
1015 f1509490 2022-03-20 martijn 	int inhdrname = 1;
1016 f1509490 2022-03-20 martijn 	int canon = sig->c & CANON_HEADER;
1017 f1509490 2022-03-20 martijn 
1018 f1509490 2022-03-20 martijn 	for (ptr = header->buf; ptr[0] != '\0'; ptr++) {
1019 f1509490 2022-03-20 martijn 		if (inhdrname) {
1020 f1509490 2022-03-20 martijn 			if (canon == CANON_HEADER_RELAXED) {
1021 4e2dd90f 2022-03-26 martijn 				ptr = osmtpd_ltok_skip_fws(ptr, 1);
1022 f1509490 2022-03-20 martijn 				c = tolower(ptr[0]);
1023 f1509490 2022-03-20 martijn 			} else
1024 f1509490 2022-03-20 martijn 				c = ptr[0];
1025 f1509490 2022-03-20 martijn 			if (c == ':') {
1026 f1509490 2022-03-20 martijn 				inhdrname = 0;
1027 f1509490 2022-03-20 martijn 				if (canon == CANON_HEADER_RELAXED)
1028 4e2dd90f 2022-03-26 martijn 					ptr = osmtpd_ltok_skip_fws(
1029 f1509490 2022-03-20 martijn 					    ptr + 1, 1) - 1;
1030 f1509490 2022-03-20 martijn 			}
1031 338537df 2022-04-08 martijn 			if (dkim_b_digest_update(bctx, &c, 1) == 0) {
1032 f1509490 2022-03-20 martijn 				dkim_errx(sig->header->msg,
1033 338537df 2022-04-08 martijn 				    "dkim_b_digest_update");
1034 f1509490 2022-03-20 martijn 				return;
1035 f1509490 2022-03-20 martijn 			}
1036 f1509490 2022-03-20 martijn 			continue;
1037 f1509490 2022-03-20 martijn 		}
1038 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_fws(ptr, 1);
1039 f1509490 2022-03-20 martijn 		if (end == ptr) {
1040 f1509490 2022-03-20 martijn 			if (sig->header == header && ptr == sig->bheader) {
1041 4e2dd90f 2022-03-26 martijn 				ptr = osmtpd_ltok_skip_tag_value(
1042 f1509490 2022-03-20 martijn 				    ptr, 0) - 1;
1043 f1509490 2022-03-20 martijn 				continue;
1044 f1509490 2022-03-20 martijn 			}
1045 338537df 2022-04-08 martijn 			if (dkim_b_digest_update(bctx, ptr, 1) == 0) {
1046 f1509490 2022-03-20 martijn 				dkim_errx(sig->header->msg,
1047 338537df 2022-04-08 martijn 				    "dkim_b_digest_update");
1048 f1509490 2022-03-20 martijn 				return;
1049 f1509490 2022-03-20 martijn 			}
1050 f1509490 2022-03-20 martijn 		} else {
1051 f1509490 2022-03-20 martijn 			if (canon == CANON_HEADER_RELAXED) {
1052 f1509490 2022-03-20 martijn 				if (end[0] == '\0')
1053 f1509490 2022-03-20 martijn 					continue;
1054 338537df 2022-04-08 martijn 				if (dkim_b_digest_update(bctx, " ", 1) == 0) {
1055 f1509490 2022-03-20 martijn 					dkim_errx(sig->header->msg,
1056 338537df 2022-04-08 martijn 					    "dkim_b_digest_update");
1057 f1509490 2022-03-20 martijn 					return;
1058 f1509490 2022-03-20 martijn 				}
1059 f1509490 2022-03-20 martijn 			} else {
1060 338537df 2022-04-08 martijn 				if (dkim_b_digest_update(bctx, ptr,
1061 f1509490 2022-03-20 martijn 				    end - ptr) == 0) {
1062 f1509490 2022-03-20 martijn 					dkim_errx(sig->header->msg,
1063 338537df 2022-04-08 martijn 					    "dkim_b_digest_update");
1064 f1509490 2022-03-20 martijn 					return;
1065 f1509490 2022-03-20 martijn 				}
1066 f1509490 2022-03-20 martijn 			}
1067 28bea7cc 2022-03-21 martijn 			ptr = end - 1;
1068 f1509490 2022-03-20 martijn 		}
1069 f1509490 2022-03-20 martijn 			
1070 f1509490 2022-03-20 martijn 	}
1071 f1509490 2022-03-20 martijn 	if (sig->header != header) {
1072 338537df 2022-04-08 martijn 		if (dkim_b_digest_update(bctx, "\r\n", 2) == 0) {
1073 338537df 2022-04-08 martijn 			dkim_errx(sig->header->msg, "dkim_b_digest_update");
1074 f1509490 2022-03-20 martijn 			return;
1075 f1509490 2022-03-20 martijn 		}
1076 f1509490 2022-03-20 martijn 	}
1077 f1509490 2022-03-20 martijn }
1078 f1509490 2022-03-20 martijn 
1079 f1509490 2022-03-20 martijn void
1080 f1509490 2022-03-20 martijn dkim_signature_state(struct signature *sig, enum state state,
1081 f1509490 2022-03-20 martijn     const char *reason)
1082 f1509490 2022-03-20 martijn {
1083 f1509490 2022-03-20 martijn 	if (sig->query != NULL) {
1084 f1509490 2022-03-20 martijn 		event_asr_abort(sig->query);
1085 f1509490 2022-03-20 martijn 		sig->query = NULL;
1086 f1509490 2022-03-20 martijn 	}
1087 f1509490 2022-03-20 martijn 	switch (sig->state) {
1088 f1509490 2022-03-20 martijn 	case DKIM_UNKNOWN:
1089 f1509490 2022-03-20 martijn 		break;
1090 f1509490 2022-03-20 martijn 	case DKIM_PASS:
1091 f1509490 2022-03-20 martijn 	case DKIM_FAIL:
1092 f1509490 2022-03-20 martijn 		osmtpd_errx(1, "Unexpected transition");
1093 f1509490 2022-03-20 martijn 	case DKIM_POLICY:
1094 f1509490 2022-03-20 martijn 		if (state == DKIM_PASS)
1095 f1509490 2022-03-20 martijn 			return;
1096 f1509490 2022-03-20 martijn 		break;
1097 f1509490 2022-03-20 martijn 	case DKIM_NEUTRAL:
1098 f1509490 2022-03-20 martijn 		if (state == DKIM_PASS)
1099 f1509490 2022-03-20 martijn 			return;
1100 f1509490 2022-03-20 martijn 		if (state == DKIM_TEMPERROR || state == DKIM_PERMERROR)
1101 f1509490 2022-03-20 martijn 			break;
1102 f1509490 2022-03-20 martijn 		osmtpd_errx(1, "Unexpected transition");
1103 f1509490 2022-03-20 martijn 	case DKIM_TEMPERROR:
1104 f1509490 2022-03-20 martijn 		if (state == DKIM_PERMERROR)
1105 f1509490 2022-03-20 martijn 			break;
1106 f1509490 2022-03-20 martijn 		return;
1107 f1509490 2022-03-20 martijn 	case DKIM_PERMERROR:
1108 f1509490 2022-03-20 martijn 		return;
1109 f1509490 2022-03-20 martijn 	}
1110 f1509490 2022-03-20 martijn 	sig->state = state;
1111 f1509490 2022-03-20 martijn 	sig->state_reason = reason;
1112 f1509490 2022-03-20 martijn }
1113 f1509490 2022-03-20 martijn 
1114 f1509490 2022-03-20 martijn const char *
1115 f1509490 2022-03-20 martijn dkim_state2str(enum state state)
1116 f1509490 2022-03-20 martijn {
1117 f1509490 2022-03-20 martijn 	switch (state)
1118 f1509490 2022-03-20 martijn 	{
1119 f1509490 2022-03-20 martijn 	case DKIM_UNKNOWN:
1120 f1509490 2022-03-20 martijn 		return "unknown";
1121 f1509490 2022-03-20 martijn 	case DKIM_PASS:
1122 f1509490 2022-03-20 martijn 		return "pass";
1123 f1509490 2022-03-20 martijn 	case DKIM_FAIL:
1124 f1509490 2022-03-20 martijn 		return "fail";
1125 f1509490 2022-03-20 martijn 	case DKIM_POLICY:
1126 f1509490 2022-03-20 martijn 		return "policy";
1127 f1509490 2022-03-20 martijn 	case DKIM_NEUTRAL:
1128 f1509490 2022-03-20 martijn 		return "neutral";
1129 f1509490 2022-03-20 martijn 	case DKIM_TEMPERROR:
1130 f1509490 2022-03-20 martijn 		return "temperror";
1131 f1509490 2022-03-20 martijn 	case DKIM_PERMERROR:
1132 f1509490 2022-03-20 martijn 		return "permerror";
1133 f1509490 2022-03-20 martijn 	}
1134 f1509490 2022-03-20 martijn }
1135 f1509490 2022-03-20 martijn 
1136 f1509490 2022-03-20 martijn void
1137 f1509490 2022-03-20 martijn dkim_rr_resolve(struct asr_result *ar, void *arg)
1138 f1509490 2022-03-20 martijn {
1139 f1509490 2022-03-20 martijn 	struct signature *sig = arg;
1140 f1509490 2022-03-20 martijn 	char key[UINT16_MAX + 1];
1141 f1509490 2022-03-20 martijn 	const char *rr_txt;
1142 f1509490 2022-03-20 martijn 	size_t keylen, cstrlen;
1143 f1509490 2022-03-20 martijn 	struct unpack pack;
1144 f1509490 2022-03-20 martijn 	struct dns_header h;
1145 f1509490 2022-03-20 martijn 	struct dns_query q;
1146 f1509490 2022-03-20 martijn 	struct dns_rr rr;
1147 f1509490 2022-03-20 martijn 
1148 f1509490 2022-03-20 martijn 	sig->query = NULL;
1149 f1509490 2022-03-20 martijn 
1150 f1509490 2022-03-20 martijn 	if (ar->ar_h_errno == TRY_AGAIN || ar->ar_h_errno == NO_RECOVERY) {
1151 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_TEMPERROR,
1152 f1509490 2022-03-20 martijn 		    hstrerror(ar->ar_h_errno));
1153 1c524edb 2022-03-24 martijn 		goto verify;
1154 f1509490 2022-03-20 martijn 	}
1155 f1509490 2022-03-20 martijn 	if (ar->ar_h_errno != NETDB_SUCCESS) {
1156 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
1157 f1509490 2022-03-20 martijn 		    hstrerror(ar->ar_h_errno));
1158 1c524edb 2022-03-24 martijn 		goto verify;
1159 f1509490 2022-03-20 martijn 	}
1160 f1509490 2022-03-20 martijn 
1161 f1509490 2022-03-20 martijn 	unpack_init(&pack, ar->ar_data, ar->ar_datalen);
1162 f1509490 2022-03-20 martijn 	if (unpack_header(&pack, &h) != 0 ||
1163 f1509490 2022-03-20 martijn 	    unpack_query(&pack, &q) != 0) {
1164 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid dns/txt");
1165 1c524edb 2022-03-24 martijn 		goto verify;
1166 f1509490 2022-03-20 martijn 	}
1167 f1509490 2022-03-20 martijn 	for (; h.ancount > 0; h.ancount--) {
1168 f1509490 2022-03-20 martijn 		unpack_rr(&pack, &rr);
1169 f1509490 2022-03-20 martijn 		if (rr.rr_type != T_TXT)
1170 f1509490 2022-03-20 martijn 			continue;
1171 f1509490 2022-03-20 martijn 
1172 f1509490 2022-03-20 martijn 		keylen = 0;
1173 f1509490 2022-03-20 martijn 		rr_txt = rr.rr.other.rdata;
1174 f1509490 2022-03-20 martijn 		while (rr.rr.other.rdlen > 0) {
1175 f1509490 2022-03-20 martijn 			cstrlen = ((const unsigned char *)rr_txt)[0];
1176 f1509490 2022-03-20 martijn 			if (cstrlen >= rr.rr.other.rdlen ||
1177 f1509490 2022-03-20 martijn 			    keylen + cstrlen >= sizeof(key))
1178 f1509490 2022-03-20 martijn 				break;
1179 f1509490 2022-03-20 martijn 			/*
1180 f1509490 2022-03-20 martijn 			 * RFC 6376 Section 3.6.2.2
1181 f1509490 2022-03-20 martijn 			 * Strings in a TXT RR MUST be concatenated together
1182 f1509490 2022-03-20 martijn 			 * before use with no intervening whitespace.
1183 f1509490 2022-03-20 martijn 			 */
1184 f1509490 2022-03-20 martijn 			strlcpy(key + keylen, rr_txt + 1, cstrlen + 1);
1185 f1509490 2022-03-20 martijn 			rr.rr.other.rdlen -= (cstrlen + 1);
1186 f1509490 2022-03-20 martijn 			rr_txt += (cstrlen + 1);
1187 f1509490 2022-03-20 martijn 			keylen += cstrlen;
1188 f1509490 2022-03-20 martijn 		}
1189 f1509490 2022-03-20 martijn 		if (rr.rr.other.rdlen > 0)	/* Invalid TXT RDATA */
1190 f1509490 2022-03-20 martijn 			continue;
1191 f1509490 2022-03-20 martijn 
1192 f1509490 2022-03-20 martijn 		if (dkim_key_text_parse(sig, key))
1193 f1509490 2022-03-20 martijn 			break;
1194 f1509490 2022-03-20 martijn 	}
1195 f1509490 2022-03-20 martijn 
1196 f1509490 2022-03-20 martijn 	if (h.ancount == 0) {
1197 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
1198 f1509490 2022-03-20 martijn 		    "No matching key found");
1199 f1509490 2022-03-20 martijn 	} else {
1200 f1509490 2022-03-20 martijn 		/* Only verify if all headers have been read */
1201 f1509490 2022-03-20 martijn 		if (!sig->header->msg->parsing_headers)
1202 f1509490 2022-03-20 martijn 			dkim_signature_verify(sig);
1203 f1509490 2022-03-20 martijn 	}
1204 1c524edb 2022-03-24 martijn  verify:
1205 8986823b 2022-03-29 martijn 	free(ar->ar_data);
1206 f1509490 2022-03-20 martijn 	dkim_message_verify(sig->header->msg);
1207 f1509490 2022-03-20 martijn }
1208 f1509490 2022-03-20 martijn 
1209 f1509490 2022-03-20 martijn int
1210 4e2dd90f 2022-03-26 martijn dkim_key_text_parse(struct signature *sig, const char *key)
1211 f1509490 2022-03-20 martijn {
1212 4e2dd90f 2022-03-26 martijn 	char tagname, *hashname;
1213 3082f098 2022-04-19 martijn 	const char *end, *tagvend;
1214 4e2dd90f 2022-03-26 martijn 	char pkraw[UINT16_MAX] = "", pkimp[UINT16_MAX];
1215 b3380529 2022-04-08 martijn 	size_t pkrawlen = 0, pkoff, linelen;
1216 b3380529 2022-04-08 martijn 	int h = 0, k = 0, n = 0, p = 0, s = 0, t = 0, first = 1;
1217 f1509490 2022-03-20 martijn 	BIO *bio;
1218 72580136 2022-12-16 martijn #ifdef HAVE_ED25519
1219 b3380529 2022-04-08 martijn 	size_t pklen;
1220 b3380529 2022-04-08 martijn 	int tmp;
1221 72580136 2022-12-16 martijn #endif
1222 f1509490 2022-03-20 martijn 
1223 4e2dd90f 2022-03-26 martijn 	key = osmtpd_ltok_skip_fws(key, 1);
1224 f1509490 2022-03-20 martijn 	/* Validate syntax early */
1225 4e2dd90f 2022-03-26 martijn 	if ((end = osmtpd_ltok_skip_tag_list(key, 0)) == NULL)
1226 f1509490 2022-03-20 martijn 		return 0;
1227 f1509490 2022-03-20 martijn 
1228 f1509490 2022-03-20 martijn 	while (key[0] != '\0') {
1229 4e2dd90f 2022-03-26 martijn 		key = osmtpd_ltok_skip_fws(key, 1);
1230 d842ff09 2022-03-27 martijn 		if ((end = osmtpd_ltok_skip_tag_name(key, 0)) == NULL)
1231 d842ff09 2022-03-27 martijn 			return 0;
1232 f1509490 2022-03-20 martijn 
1233 bccb8fb3 2022-03-27 martijn 		if ((size_t)(end - key) != 1)
1234 bccb8fb3 2022-03-27 martijn 			tagname = '\0';
1235 bccb8fb3 2022-03-27 martijn 		else
1236 bccb8fb3 2022-03-27 martijn 			tagname = key[0];
1237 4e2dd90f 2022-03-26 martijn 		key = osmtpd_ltok_skip_fws(end, 1);
1238 f1509490 2022-03-20 martijn 		/* '=' */
1239 7e24437d 2022-03-27 martijn 		if (key[0] != '=')
1240 d842ff09 2022-03-27 martijn 			return 0;
1241 d842ff09 2022-03-27 martijn 		key = osmtpd_ltok_skip_fws(key + 1, 1);
1242 d842ff09 2022-03-27 martijn 		if ((end = osmtpd_ltok_skip_tag_value(key, 0)) == NULL)
1243 d842ff09 2022-03-27 martijn 			return 0;
1244 f1509490 2022-03-20 martijn 		switch (tagname) {
1245 f1509490 2022-03-20 martijn 		case 'v':
1246 2b1224a8 2022-03-27 martijn 			/*
1247 2b1224a8 2022-03-27 martijn 			 * RFC 6376 section 3.6.1, v=:
1248 2b1224a8 2022-03-27 martijn 			 * RECOMMENDED...This tag MUST be the first tag in the
1249 2b1224a8 2022-03-27 martijn 			 * record.
1250 2b1224a8 2022-03-27 martijn 			 */
1251 2b1224a8 2022-03-27 martijn 			if (!first ||
1252 2b1224a8 2022-03-27 martijn 			    osmtpd_ltok_skip_key_v_tag_value(key, 0) != end)
1253 2b1224a8 2022-03-27 martijn 				return 0;
1254 6eeac6a1 2022-03-27 martijn 			key = end;
1255 2b1224a8 2022-03-27 martijn 			break;
1256 f1509490 2022-03-20 martijn 		case 'h':
1257 f1509490 2022-03-20 martijn 			if (h != 0)	/* Duplicate tag */
1258 f1509490 2022-03-20 martijn 				return 0;
1259 f1509490 2022-03-20 martijn 			/* Invalid tag value */
1260 475eae65 2022-03-27 martijn 			if (osmtpd_ltok_skip_key_h_tag_value(key, 0) != end)
1261 f1509490 2022-03-20 martijn 				return 0;
1262 f1509490 2022-03-20 martijn 			while (1) {
1263 475eae65 2022-03-27 martijn 				if ((tagvend = osmtpd_ltok_skip_key_h_tag_alg(
1264 048fb98b 2022-03-21 martijn 				    key, 0)) == NULL)
1265 f1509490 2022-03-20 martijn 					break;
1266 4e2dd90f 2022-03-26 martijn 				hashname = strndup(key, tagvend - key);
1267 4e2dd90f 2022-03-26 martijn 				if (hashname == NULL) {
1268 4e2dd90f 2022-03-26 martijn 					dkim_err(sig->header->msg, "malloc");
1269 4e2dd90f 2022-03-26 martijn 					return 0;
1270 4e2dd90f 2022-03-26 martijn 				}
1271 4e2dd90f 2022-03-26 martijn 				if (EVP_get_digestbyname(hashname) == sig->ah) {
1272 4e2dd90f 2022-03-26 martijn 					free(hashname);
1273 f1509490 2022-03-20 martijn 					h = 1;
1274 f1509490 2022-03-20 martijn 					break;
1275 f1509490 2022-03-20 martijn 				}
1276 4e2dd90f 2022-03-26 martijn 				free(hashname);
1277 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(tagvend, 1);
1278 f1509490 2022-03-20 martijn 				if (key[0] != ':')
1279 f1509490 2022-03-20 martijn 					break;
1280 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(key + 1, 1);
1281 f1509490 2022-03-20 martijn 			}
1282 f1509490 2022-03-20 martijn 			if (h != 1)
1283 f1509490 2022-03-20 martijn 				return 0;
1284 f1509490 2022-03-20 martijn 			key = end;
1285 f1509490 2022-03-20 martijn 			break;
1286 f1509490 2022-03-20 martijn 		case 'k':
1287 f1509490 2022-03-20 martijn 			if (k != 0)	/* Duplicate tag */
1288 f1509490 2022-03-20 martijn 				return 0;
1289 f1509490 2022-03-20 martijn 			k = 1;
1290 338537df 2022-04-08 martijn 			if (strncmp(key, "rsa", end - key) == 0) {
1291 338537df 2022-04-08 martijn 				if (sig->ak != EVP_PKEY_RSA)
1292 338537df 2022-04-08 martijn 					return 0;
1293 72580136 2022-12-16 martijn #if HAVE_ED25519
1294 338537df 2022-04-08 martijn 			} else if (strncmp(key, "ed25519", end - key) == 0) {
1295 338537df 2022-04-08 martijn 				if (sig->ak != EVP_PKEY_ED25519)
1296 338537df 2022-04-08 martijn 					return 0;
1297 72580136 2022-12-16 martijn #endif
1298 338537df 2022-04-08 martijn 			} else
1299 f1509490 2022-03-20 martijn 				return 0;
1300 f1509490 2022-03-20 martijn 			key = end;
1301 f1509490 2022-03-20 martijn 			break;
1302 f1509490 2022-03-20 martijn 		case 'n':
1303 f1509490 2022-03-20 martijn 			if (n != 0)	/* Duplicate tag */
1304 f1509490 2022-03-20 martijn 				return 0;
1305 f1509490 2022-03-20 martijn 			n = 1;
1306 749b2bf7 2022-03-28 martijn 			/* semicolon is part of safe-char */
1307 749b2bf7 2022-03-28 martijn 			if (osmtpd_ltok_skip_key_n_tag_value(key, 0) < end)
1308 4e2dd90f 2022-03-26 martijn 				return 0;
1309 f1509490 2022-03-20 martijn 			key = end;
1310 f1509490 2022-03-20 martijn 			break;
1311 f1509490 2022-03-20 martijn 		case 'p':
1312 62823db4 2022-04-08 martijn 			if (p != 0)	/* Duplicate tag */
1313 f1509490 2022-03-20 martijn 				return 0;
1314 62823db4 2022-04-08 martijn 			p = 1;
1315 338537df 2022-04-08 martijn 			while (1) {
1316 3082f098 2022-04-19 martijn 				key = osmtpd_ltok_skip_fws(key, 1);
1317 338537df 2022-04-08 martijn 				if (osmtpd_ltok_skip_alphadigitps(
1318 3082f098 2022-04-19 martijn 				    key, 0) == NULL)
1319 338537df 2022-04-08 martijn 					break;
1320 3082f098 2022-04-19 martijn 				pkraw[pkrawlen++] = key++[0];
1321 338537df 2022-04-08 martijn 				if (pkrawlen >= sizeof(pkraw))
1322 338537df 2022-04-08 martijn 					return 0;
1323 338537df 2022-04-08 martijn 			}
1324 3082f098 2022-04-19 martijn 			if (key[0] == '=') {
1325 338537df 2022-04-08 martijn 				pkraw[pkrawlen++] = '=';
1326 3082f098 2022-04-19 martijn 				key = osmtpd_ltok_skip_fws(key + 1, 1);
1327 338537df 2022-04-08 martijn 				if (pkrawlen >= sizeof(pkraw))
1328 338537df 2022-04-08 martijn 					return 0;
1329 3082f098 2022-04-19 martijn 				if (key[0] == '=') {
1330 338537df 2022-04-08 martijn 					pkraw[pkrawlen++] = '=';
1331 3082f098 2022-04-19 martijn 					key++;
1332 338537df 2022-04-08 martijn 					if (pkrawlen >= sizeof(pkraw))
1333 338537df 2022-04-08 martijn 						return 0;
1334 338537df 2022-04-08 martijn 				}
1335 338537df 2022-04-08 martijn 			}
1336 f1509490 2022-03-20 martijn 			/* Invalid tag value */
1337 3082f098 2022-04-19 martijn 			if (pkrawlen % 4 != 0 || key != end)
1338 f1509490 2022-03-20 martijn 				return 0;
1339 f1509490 2022-03-20 martijn 			break;
1340 f1509490 2022-03-20 martijn 		case 's':
1341 f1509490 2022-03-20 martijn 			if (s != 0)	/* Duplicate tag */
1342 f1509490 2022-03-20 martijn 				return 0;
1343 f1509490 2022-03-20 martijn 			/* Invalid tag value */
1344 2e9f7a5e 2022-03-27 martijn 			if (osmtpd_ltok_skip_key_s_tag_value(key, 0) != end)
1345 f1509490 2022-03-20 martijn 				return 0;
1346 f1509490 2022-03-20 martijn 			while (1) {
1347 f1509490 2022-03-20 martijn 				if ((tagvend =
1348 4e2dd90f 2022-03-26 martijn 				    osmtpd_ltok_skip_key_s_tag_type(
1349 71b63ce6 2022-03-22 martijn 				    key, 0)) == NULL)
1350 f1509490 2022-03-20 martijn 					break;
1351 f1509490 2022-03-20 martijn 				if (strncmp(key, "*", tagvend - key) == 0 ||
1352 f1509490 2022-03-20 martijn 				    strncmp(key, "email", tagvend - key) == 0) {
1353 f1509490 2022-03-20 martijn 					s = 1;
1354 f1509490 2022-03-20 martijn 					break;
1355 f1509490 2022-03-20 martijn 				}
1356 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(tagvend, 1);
1357 f1509490 2022-03-20 martijn 				if (key[0] != ':')
1358 f1509490 2022-03-20 martijn 					break;
1359 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(key + 1, 1);
1360 f1509490 2022-03-20 martijn 			}
1361 f1509490 2022-03-20 martijn 			if (s != 1)
1362 f1509490 2022-03-20 martijn 				return 0;
1363 f1509490 2022-03-20 martijn 			key = end;
1364 f1509490 2022-03-20 martijn 			break;
1365 f1509490 2022-03-20 martijn 		case 't':
1366 f1509490 2022-03-20 martijn 			if (t != 0)	/* Duplicate tag */
1367 f1509490 2022-03-20 martijn 				return 0;
1368 f1509490 2022-03-20 martijn 			t = 1;
1369 2e9f7a5e 2022-03-27 martijn 			if (osmtpd_ltok_skip_key_t_tag_value(key, 0) != end)
1370 f1509490 2022-03-20 martijn 				return 0;
1371 f1509490 2022-03-20 martijn 			while (1) {
1372 2e9f7a5e 2022-03-27 martijn 				tagvend = osmtpd_ltok_skip_key_t_tag_flag(
1373 f1509490 2022-03-20 martijn 				    key, 0);
1374 f1509490 2022-03-20 martijn 				if (strncmp(key, "y", tagvend - key) == 0)
1375 f1509490 2022-03-20 martijn 					sig->kt |= KT_Y;
1376 f1509490 2022-03-20 martijn 				else if (strncmp(key, "s", tagvend - key) == 0)
1377 f1509490 2022-03-20 martijn 					sig->kt |= KT_S;
1378 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(tagvend, 1);
1379 f1509490 2022-03-20 martijn 				if (key[0] != ':')
1380 f1509490 2022-03-20 martijn 					break;
1381 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(key + 1, 1);
1382 f1509490 2022-03-20 martijn 			}
1383 f1509490 2022-03-20 martijn 			break;
1384 f1509490 2022-03-20 martijn 		default:
1385 f1509490 2022-03-20 martijn 			key = end;
1386 f1509490 2022-03-20 martijn 			break;
1387 f1509490 2022-03-20 martijn 		}
1388 f1509490 2022-03-20 martijn 
1389 2b1224a8 2022-03-27 martijn 		first = 0;
1390 4e2dd90f 2022-03-26 martijn 		key = osmtpd_ltok_skip_fws(key, 1);
1391 f1509490 2022-03-20 martijn 		if (key[0] == ';')
1392 f1509490 2022-03-20 martijn 			key++;
1393 f1509490 2022-03-20 martijn 		else if (key[0] != '\0')
1394 f1509490 2022-03-20 martijn 			return 0;
1395 f1509490 2022-03-20 martijn 	}
1396 f1509490 2022-03-20 martijn 
1397 62823db4 2022-04-08 martijn 	if (!p)					/* Missing tag */
1398 f1509490 2022-03-20 martijn 		return 0;
1399 f1509490 2022-03-20 martijn 	if (k == 0 && sig->ak != EVP_PKEY_RSA)	/* Default to RSA */
1400 f1509490 2022-03-20 martijn 		return 0;
1401 f1509490 2022-03-20 martijn 
1402 f1509490 2022-03-20 martijn 	if (pkraw[0] == '\0') {
1403 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Key is revoked");
1404 f1509490 2022-03-20 martijn 		return 1;
1405 f1509490 2022-03-20 martijn 	}
1406 f1509490 2022-03-20 martijn 
1407 f1509490 2022-03-20 martijn 	switch (sig->ak) {
1408 f1509490 2022-03-20 martijn 	case EVP_PKEY_RSA:
1409 f1509490 2022-03-20 martijn 		pkoff = strlcpy(pkimp, "-----BEGIN PUBLIC KEY-----\n",
1410 f1509490 2022-03-20 martijn 		    sizeof(pkimp));
1411 f1509490 2022-03-20 martijn 		linelen = 0;
1412 f1509490 2022-03-20 martijn 		for (key = pkraw; key[0] != '\0';) {
1413 f1509490 2022-03-20 martijn 			if (pkoff + 2 >= sizeof(pkimp))
1414 f1509490 2022-03-20 martijn 				return 0;
1415 2732fb68 2022-04-08 martijn 			pkimp[pkoff++] = key++[0];
1416 f1509490 2022-03-20 martijn 			if (++linelen == 64) {
1417 f1509490 2022-03-20 martijn 				pkimp[pkoff++] = '\n';
1418 f1509490 2022-03-20 martijn 				linelen = 0;
1419 f1509490 2022-03-20 martijn 			}
1420 f1509490 2022-03-20 martijn 		}
1421 f1509490 2022-03-20 martijn 		/* Leverage pkoff check in loop */
1422 f1509490 2022-03-20 martijn 		if (linelen != 0)
1423 f1509490 2022-03-20 martijn 			pkimp[pkoff++] = '\n';
1424 f1509490 2022-03-20 martijn 		/* PEM_read_bio_PUBKEY will catch truncated keys */
1425 f1509490 2022-03-20 martijn 		pkoff += strlcpy(pkimp + pkoff, "-----END PUBLIC KEY-----\n",
1426 f1509490 2022-03-20 martijn 		    sizeof(pkimp) - pkoff);
1427 f1509490 2022-03-20 martijn 		if ((bio = BIO_new_mem_buf(pkimp, pkoff)) == NULL) {
1428 f1509490 2022-03-20 martijn 			dkim_err(sig->header->msg, "BIO_new_mem_buf");
1429 f1509490 2022-03-20 martijn 			return 1;
1430 f1509490 2022-03-20 martijn 		}
1431 f1509490 2022-03-20 martijn 		sig->p = PEM_read_bio_PUBKEY(bio, NULL, NULL, NULL);
1432 f1509490 2022-03-20 martijn 		BIO_free(bio);
1433 338537df 2022-04-08 martijn 		break;
1434 72580136 2022-12-16 martijn #if HAVE_ED25519
1435 338537df 2022-04-08 martijn 	case EVP_PKEY_ED25519:
1436 338537df 2022-04-08 martijn 		if ((pkrawlen / 4) * 3 >= sizeof(pkimp))
1437 f1509490 2022-03-20 martijn 			return 0;
1438 338537df 2022-04-08 martijn 		EVP_DecodeInit(ectx);
1439 338537df 2022-04-08 martijn 		if (EVP_DecodeUpdate(ectx, pkimp, &tmp, pkraw, pkrawlen) == -1)
1440 338537df 2022-04-08 martijn 			return 0;
1441 338537df 2022-04-08 martijn 		pklen = tmp;
1442 338537df 2022-04-08 martijn 		if (EVP_DecodeFinal(ectx, pkimp, &tmp) == -1)
1443 338537df 2022-04-08 martijn 			return 0;
1444 338537df 2022-04-08 martijn 		pklen += tmp;
1445 338537df 2022-04-08 martijn 		sig->p = EVP_PKEY_new_raw_public_key(sig->ak, NULL, pkimp,
1446 338537df 2022-04-08 martijn 		    pklen);
1447 f1509490 2022-03-20 martijn 		break;
1448 72580136 2022-12-16 martijn #endif
1449 f1509490 2022-03-20 martijn 	}
1450 338537df 2022-04-08 martijn 	if (sig->p == NULL) {
1451 338537df 2022-04-08 martijn 		/*
1452 338537df 2022-04-08 martijn 		 * XXX No clue how to differentiate between invalid key and
1453 338537df 2022-04-08 martijn 		 * temporary failure like *alloc.
1454 338537df 2022-04-08 martijn 		 * Assume invalid key, because it's more likely.
1455 338537df 2022-04-08 martijn 		 */
1456 338537df 2022-04-08 martijn 		return 0;
1457 338537df 2022-04-08 martijn 	}
1458 f1509490 2022-03-20 martijn 	return 1;
1459 f1509490 2022-03-20 martijn }
1460 f1509490 2022-03-20 martijn 
1461 f1509490 2022-03-20 martijn void
1462 f1509490 2022-03-20 martijn dkim_body_parse(struct message *msg, const char *line)
1463 f1509490 2022-03-20 martijn {
1464 f1509490 2022-03-20 martijn 	struct signature *sig;
1465 31ffb916 2022-03-27 martijn 	const char *end = line, *hash, *prev;
1466 31ffb916 2022-03-27 martijn 	size_t hashn, len, i;
1467 31ffb916 2022-03-27 martijn 	int wsp, ret;
1468 f1509490 2022-03-20 martijn 
1469 31ffb916 2022-03-27 martijn 	if (line[0] == '\0') {
1470 f1509490 2022-03-20 martijn 		msg->body_whitelines++;
1471 f1509490 2022-03-20 martijn 		return;
1472 f1509490 2022-03-20 martijn 	}
1473 f1509490 2022-03-20 martijn 
1474 f1509490 2022-03-20 martijn 	while (msg->body_whitelines-- > 0) {
1475 f1509490 2022-03-20 martijn 		for (i = 0; i < msg->nheaders; i++) {
1476 5d58b443 2022-03-27 martijn 			if ((sig = msg->header[i].sig) == NULL ||
1477 5d58b443 2022-03-27 martijn 			    sig->state != DKIM_UNKNOWN)
1478 f1509490 2022-03-20 martijn 				continue;
1479 31ffb916 2022-03-27 martijn 			hashn = sig->l == -1 ? 2 : MIN(2, sig->l);
1480 31ffb916 2022-03-27 martijn 			sig->l -= sig->l == -1 ? 0 : hashn;
1481 31ffb916 2022-03-27 martijn 			if (EVP_DigestUpdate(sig->bhctx, "\r\n", hashn) == 0) {
1482 31ffb916 2022-03-27 martijn 				dkim_errx(msg, "EVP_DigestUpdate");
1483 f1509490 2022-03-20 martijn 				return;
1484 f1509490 2022-03-20 martijn 			}
1485 f1509490 2022-03-20 martijn 		}
1486 f1509490 2022-03-20 martijn 	}
1487 f1509490 2022-03-20 martijn 	msg->body_whitelines = 0;
1488 f1509490 2022-03-20 martijn 	msg->has_body = 1;
1489 f1509490 2022-03-20 martijn 
1490 31ffb916 2022-03-27 martijn 	while (line[0] != '\0') {
1491 31ffb916 2022-03-27 martijn 		while (1) {
1492 31ffb916 2022-03-27 martijn 			prev = end;
1493 31ffb916 2022-03-27 martijn 			if ((end = osmtpd_ltok_skip_wsp(end, 0)) == NULL)
1494 31ffb916 2022-03-27 martijn 				break;
1495 31ffb916 2022-03-27 martijn 		}
1496 31ffb916 2022-03-27 martijn 		end = prev;
1497 31ffb916 2022-03-27 martijn 		wsp = end != line;
1498 31ffb916 2022-03-27 martijn 		if (!wsp) {
1499 31ffb916 2022-03-27 martijn 			while (osmtpd_ltok_skip_wsp(end, 0) == NULL &&
1500 31ffb916 2022-03-27 martijn 			    end[0] != '\0')
1501 31ffb916 2022-03-27 martijn 				end++;
1502 31ffb916 2022-03-27 martijn 		}
1503 31ffb916 2022-03-27 martijn 		for (i = 0; i < msg->nheaders; i++) {
1504 31ffb916 2022-03-27 martijn 			sig = msg->header[i].sig;
1505 31ffb916 2022-03-27 martijn 			if (sig == NULL || sig->state != DKIM_UNKNOWN)
1506 31ffb916 2022-03-27 martijn 				continue;
1507 31ffb916 2022-03-27 martijn 			if (wsp &&
1508 31ffb916 2022-03-27 martijn 			    (sig->c & CANON_BODY) == CANON_BODY_RELAXED) {
1509 31ffb916 2022-03-27 martijn 				hash = " ";
1510 31ffb916 2022-03-27 martijn 				len = end[0] == '\0' ? 0 : 1;
1511 31ffb916 2022-03-27 martijn 			} else {
1512 31ffb916 2022-03-27 martijn 				hash = line;
1513 31ffb916 2022-03-27 martijn 				len = (size_t)(end - line);
1514 31ffb916 2022-03-27 martijn 			}
1515 31ffb916 2022-03-27 martijn 			hashn = sig->l == -1 ? len : MIN(len, (size_t)sig->l);
1516 31ffb916 2022-03-27 martijn 			sig->l -= sig->l == -1 ? 0 : hashn;
1517 31ffb916 2022-03-27 martijn 			ret = EVP_DigestUpdate(sig->bhctx, hash, hashn);
1518 31ffb916 2022-03-27 martijn 			if (ret == 0) {
1519 31ffb916 2022-03-27 martijn 				dkim_errx(msg, "EVP_DigestUpdate");
1520 31ffb916 2022-03-27 martijn 				return;
1521 31ffb916 2022-03-27 martijn 			}
1522 31ffb916 2022-03-27 martijn 		}
1523 31ffb916 2022-03-27 martijn 		line = end;
1524 31ffb916 2022-03-27 martijn 	}
1525 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++) {
1526 f1509490 2022-03-20 martijn 		sig = msg->header[i].sig;
1527 31ffb916 2022-03-27 martijn 		if (sig == NULL || sig->state != DKIM_UNKNOWN)
1528 f1509490 2022-03-20 martijn 			continue;
1529 31ffb916 2022-03-27 martijn 		hashn = sig->l == -1 ? 2 : MIN(2, sig->l);
1530 f1509490 2022-03-20 martijn 		sig->l -= sig->l == -1 ? 0 : hashn;
1531 31ffb916 2022-03-27 martijn 		ret = EVP_DigestUpdate(sig->bhctx, "\r\n", hashn);
1532 31ffb916 2022-03-27 martijn 		if (ret == 0) {
1533 31ffb916 2022-03-27 martijn 			dkim_errx(msg, "EVP_DigestUpdate");
1534 f1509490 2022-03-20 martijn 			return;
1535 f1509490 2022-03-20 martijn 		}
1536 f1509490 2022-03-20 martijn 	}
1537 f1509490 2022-03-20 martijn }
1538 f1509490 2022-03-20 martijn 
1539 f1509490 2022-03-20 martijn void
1540 f1509490 2022-03-20 martijn dkim_body_verify(struct signature *sig)
1541 f1509490 2022-03-20 martijn {
1542 f1509490 2022-03-20 martijn 	unsigned char digest[EVP_MAX_MD_SIZE];
1543 f1509490 2022-03-20 martijn 	unsigned int digestsz;
1544 f1509490 2022-03-20 martijn 
1545 f1509490 2022-03-20 martijn 	if (sig->state != DKIM_UNKNOWN)
1546 f1509490 2022-03-20 martijn 		return;
1547 f1509490 2022-03-20 martijn 
1548 f1509490 2022-03-20 martijn 	if ((sig->c & CANON_BODY) == CANON_BODY_SIMPLE &&
1549 f1509490 2022-03-20 martijn 	    !sig->header->msg->has_body) {
1550 f1509490 2022-03-20 martijn 		if (EVP_DigestUpdate(sig->bhctx, "\r\n",
1551 f1509490 2022-03-20 martijn 		    sig->l == -1 ? 2 : MIN(2, sig->l)) <= 0) {
1552 f1509490 2022-03-20 martijn 			dkim_errx(sig->header->msg,
1553 f1509490 2022-03-20 martijn 			    "Can't update hash context");
1554 f1509490 2022-03-20 martijn 			return;
1555 f1509490 2022-03-20 martijn 		}
1556 f1509490 2022-03-20 martijn 	}
1557 a9f7aa12 2022-03-24 martijn 	if (sig->l > 0) {
1558 a9f7aa12 2022-03-24 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
1559 a9f7aa12 2022-03-24 martijn 		    "l tag larger than body");
1560 a9f7aa12 2022-03-24 martijn 		return;
1561 a9f7aa12 2022-03-24 martijn 	}
1562 f1509490 2022-03-20 martijn 
1563 f1509490 2022-03-20 martijn 	if (EVP_DigestFinal_ex(sig->bhctx, digest, &digestsz) == 0) {
1564 338537df 2022-04-08 martijn 		dkim_errx(sig->header->msg, "EVP_DigestFinal_ex");
1565 f1509490 2022-03-20 martijn 		return;
1566 f1509490 2022-03-20 martijn 	}
1567 f1509490 2022-03-20 martijn 
1568 f1509490 2022-03-20 martijn 	if (digestsz != sig->bhsz || memcmp(digest, sig->bh, digestsz) != 0)
1569 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_FAIL, "bh mismatch");
1570 f1509490 2022-03-20 martijn }
1571 f1509490 2022-03-20 martijn 
1572 f1509490 2022-03-20 martijn void
1573 f1509490 2022-03-20 martijn dkim_message_verify(struct message *msg)
1574 f1509490 2022-03-20 martijn {
1575 f1509490 2022-03-20 martijn 	struct signature *sig;
1576 f1509490 2022-03-20 martijn 	size_t i;
1577 f1509490 2022-03-20 martijn 	ssize_t n, aroff = 0;
1578 f1509490 2022-03-20 martijn 	int found = 0;
1579 f1509490 2022-03-20 martijn 	char *line = NULL;
1580 f1509490 2022-03-20 martijn 	size_t linelen = 0;
1581 f1509490 2022-03-20 martijn 
1582 f1509490 2022-03-20 martijn 	if (!msg->readdone)
1583 f1509490 2022-03-20 martijn 		return;
1584 f1509490 2022-03-20 martijn 
1585 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++) {
1586 f1509490 2022-03-20 martijn 		if (msg->header[i].sig == NULL)
1587 f1509490 2022-03-20 martijn 			continue;
1588 f1509490 2022-03-20 martijn 		if (msg->header[i].sig->query != NULL)
1589 f1509490 2022-03-20 martijn 			return;
1590 f1509490 2022-03-20 martijn 		if (msg->header[i].sig->state != DKIM_UNKNOWN)
1591 f1509490 2022-03-20 martijn 			continue;
1592 f1509490 2022-03-20 martijn 		dkim_signature_state(msg->header[i].sig, DKIM_PASS, NULL);
1593 f1509490 2022-03-20 martijn 	}
1594 f1509490 2022-03-20 martijn 	
1595 f1509490 2022-03-20 martijn 	if ((aroff = dkim_ar_cat(&line, &linelen, aroff,
1596 f1509490 2022-03-20 martijn 	    "Authentication-Results: %s", authservid)) == -1) {
1597 f1509490 2022-03-20 martijn 		dkim_err(msg, "malloc");
1598 f1509490 2022-03-20 martijn 		goto fail;
1599 f1509490 2022-03-20 martijn 	}
1600 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++) {
1601 f1509490 2022-03-20 martijn 		sig = msg->header[i].sig;
1602 f1509490 2022-03-20 martijn 		if (sig == NULL)
1603 f1509490 2022-03-20 martijn 			continue;
1604 f1509490 2022-03-20 martijn 		found = 1;
1605 f1509490 2022-03-20 martijn 		if ((aroff = dkim_ar_cat(&line, &linelen, aroff, "; dkim=%s",
1606 f1509490 2022-03-20 martijn 		    dkim_state2str(sig->state))) == -1) {
1607 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
1608 f1509490 2022-03-20 martijn 			goto fail;
1609 f1509490 2022-03-20 martijn 		}
1610 f1509490 2022-03-20 martijn 		if (sig->state_reason != NULL) {
1611 f1509490 2022-03-20 martijn 			if ((aroff = dkim_ar_cat(&line, &linelen, aroff,
1612 f1509490 2022-03-20 martijn 			    " reason=\"%s\"", sig->state_reason)) == -1) {
1613 f1509490 2022-03-20 martijn 				dkim_err(msg, "malloc");
1614 f1509490 2022-03-20 martijn 				goto fail;
1615 f1509490 2022-03-20 martijn 			}
1616 f1509490 2022-03-20 martijn 		}
1617 f1509490 2022-03-20 martijn 		if (sig->s[0] != '\0') {
1618 f1509490 2022-03-20 martijn 			if ((aroff = dkim_ar_cat(&line, &linelen, aroff,
1619 f1509490 2022-03-20 martijn 			    " header.s=%s", sig->s)) == -1) {
1620 f1509490 2022-03-20 martijn 				dkim_err(msg, "malloc");
1621 f1509490 2022-03-20 martijn 				goto fail;
1622 f1509490 2022-03-20 martijn 			}
1623 f1509490 2022-03-20 martijn 		}
1624 f1509490 2022-03-20 martijn 		if (sig->d[0] != '\0') {
1625 f1509490 2022-03-20 martijn 			if ((aroff = dkim_ar_cat(&line, &linelen, aroff,
1626 f1509490 2022-03-20 martijn 			    " header.d=%s", sig->d)) == -1) {
1627 f1509490 2022-03-20 martijn 				dkim_err(msg, "malloc");
1628 f1509490 2022-03-20 martijn 				goto fail;
1629 f1509490 2022-03-20 martijn 			}
1630 f1509490 2022-03-20 martijn 		}
1631 f1509490 2022-03-20 martijn 		/*
1632 f1509490 2022-03-20 martijn 		 * Don't print i-tag, since localpart can be a quoted-string,
1633 f1509490 2022-03-20 martijn 		 * which can contain FWS and CFWS.
1634 f1509490 2022-03-20 martijn 		 */
1635 f1509490 2022-03-20 martijn 		if (sig->a != NULL) {
1636 f1509490 2022-03-20 martijn 			if ((aroff = dkim_ar_cat(&line, &linelen, aroff,
1637 f1509490 2022-03-20 martijn 			    " header.a=%.*s", (int)sig->asz, sig->a)) == -1) {
1638 f1509490 2022-03-20 martijn 				dkim_err(msg, "malloc");
1639 f1509490 2022-03-20 martijn 				goto fail;
1640 f1509490 2022-03-20 martijn 			}
1641 f1509490 2022-03-20 martijn 		}
1642 f1509490 2022-03-20 martijn 	}
1643 f1509490 2022-03-20 martijn 	if (!found) {
1644 f1509490 2022-03-20 martijn 		aroff = dkim_ar_cat(&line, &linelen, aroff, "; dkim=none");
1645 f1509490 2022-03-20 martijn 		if (aroff == -1) {
1646 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
1647 f1509490 2022-03-20 martijn 			goto fail;
1648 f1509490 2022-03-20 martijn 		}
1649 f1509490 2022-03-20 martijn 	}
1650 f1509490 2022-03-20 martijn 	dkim_ar_print(msg->ctx, line);
1651 f1509490 2022-03-20 martijn 
1652 f1509490 2022-03-20 martijn 	rewind(msg->origf);
1653 f1509490 2022-03-20 martijn 	while ((n = getline(&line, &linelen, msg->origf)) != -1) {
1654 f1509490 2022-03-20 martijn 		line[n - 1] = '\0';
1655 f1509490 2022-03-20 martijn 		osmtpd_filter_dataline(msg->ctx, "%s", line);
1656 f1509490 2022-03-20 martijn 	}
1657 f1509490 2022-03-20 martijn 	if (ferror(msg->origf))
1658 f1509490 2022-03-20 martijn 		dkim_err(msg, "getline");
1659 f1509490 2022-03-20 martijn  fail:
1660 f1509490 2022-03-20 martijn 	free(line);
1661 f1509490 2022-03-20 martijn 	return;
1662 f1509490 2022-03-20 martijn }
1663 f1509490 2022-03-20 martijn 
1664 f1509490 2022-03-20 martijn void
1665 4e2dd90f 2022-03-26 martijn dkim_ar_print(struct osmtpd_ctx *ctx, const char *start)
1666 f1509490 2022-03-20 martijn {
1667 4e2dd90f 2022-03-26 martijn 	const char *scan, *checkpoint, *ncheckpoint;
1668 f1509490 2022-03-20 martijn 	size_t arlen = 0;
1669 f1509490 2022-03-20 martijn 	int first = 1, arid = 1;
1670 f1509490 2022-03-20 martijn 
1671 f1509490 2022-03-20 martijn 	checkpoint = start;
1672 4e2dd90f 2022-03-26 martijn 	ncheckpoint = osmtpd_ltok_skip_hdr_name(start, 0) + 1;
1673 f1509490 2022-03-20 martijn 	for (scan = start; scan[0] != '\0'; scan++) {
1674 f1509490 2022-03-20 martijn 		if (scan[0] == '\t')
1675 f1509490 2022-03-20 martijn 			arlen = (arlen + 8) & ~7;
1676 f1509490 2022-03-20 martijn 		else
1677 f1509490 2022-03-20 martijn 			arlen++;
1678 f1509490 2022-03-20 martijn 		if (arlen >= AUTHENTICATION_RESULTS_LINELEN) {
1679 f1509490 2022-03-20 martijn 			osmtpd_filter_dataline(ctx, "%s%.*s", first ? "" : "\t",
1680 f1509490 2022-03-20 martijn 			    (int)((checkpoint == start ?
1681 f1509490 2022-03-20 martijn 			    ncheckpoint : checkpoint) - start), start);
1682 4e2dd90f 2022-03-26 martijn 			start = osmtpd_ltok_skip_cfws(checkpoint, 1);
1683 f1509490 2022-03-20 martijn 			scan = start;
1684 f1509490 2022-03-20 martijn 			arlen = 8;
1685 f1509490 2022-03-20 martijn 			first = 0;
1686 f1509490 2022-03-20 martijn 		}
1687 f1509490 2022-03-20 martijn 		if (scan == ncheckpoint) {
1688 f1509490 2022-03-20 martijn 			checkpoint = ncheckpoint;
1689 4e2dd90f 2022-03-26 martijn 			ncheckpoint = osmtpd_ltok_skip_cfws(ncheckpoint, 1);
1690 f1509490 2022-03-20 martijn 			/* authserv-id */
1691 f1509490 2022-03-20 martijn 			if (arid) {
1692 4e2dd90f 2022-03-26 martijn 				ncheckpoint = osmtpd_ltok_skip_value(
1693 f1509490 2022-03-20 martijn 				    ncheckpoint, 0);
1694 f1509490 2022-03-20 martijn 				arid = 0;
1695 f1509490 2022-03-20 martijn 			/* methodspec */
1696 f1509490 2022-03-20 martijn 			} else if (strncmp(ncheckpoint, "dkim",
1697 f1509490 2022-03-20 martijn 			    sizeof("dkim") - 1) == 0) {
1698 4e2dd90f 2022-03-26 martijn 				ncheckpoint = osmtpd_ltok_skip_keyword(
1699 f1509490 2022-03-20 martijn 				    ncheckpoint + sizeof("dkim"), 0);
1700 f1509490 2022-03-20 martijn 			/* reasonspec */
1701 f1509490 2022-03-20 martijn 			} else if (strncmp(ncheckpoint, "reason",
1702 f1509490 2022-03-20 martijn 			    sizeof("reason") - 1) == 0) {
1703 4e2dd90f 2022-03-26 martijn 				ncheckpoint = osmtpd_ltok_skip_value(
1704 f1509490 2022-03-20 martijn 				    ncheckpoint + sizeof("reason"), 0);
1705 f1509490 2022-03-20 martijn 			/* propspec */
1706 f1509490 2022-03-20 martijn 			} else {
1707 f1509490 2022-03-20 martijn 				ncheckpoint += sizeof("header.x=") - 1;
1708 4e2dd90f 2022-03-26 martijn 				ncheckpoint = osmtpd_ltok_skip_ar_pvalue(
1709 f1509490 2022-03-20 martijn 				    ncheckpoint, 0);
1710 f1509490 2022-03-20 martijn 				if (ncheckpoint[0] == ';')
1711 f1509490 2022-03-20 martijn 					ncheckpoint++;
1712 f1509490 2022-03-20 martijn 			}
1713 f1509490 2022-03-20 martijn 		}
1714 f1509490 2022-03-20 martijn 	}
1715 f1509490 2022-03-20 martijn 	osmtpd_filter_dataline(ctx, "%s%s", first ? "" : "\t", start);
1716 f1509490 2022-03-20 martijn }
1717 f1509490 2022-03-20 martijn 
1718 f1509490 2022-03-20 martijn ssize_t
1719 f1509490 2022-03-20 martijn dkim_ar_cat(char **ar, size_t *n, size_t aroff, const char *fmt, ...)
1720 f1509490 2022-03-20 martijn {
1721 f1509490 2022-03-20 martijn 	va_list ap;
1722 f1509490 2022-03-20 martijn 	char *artmp;
1723 f1509490 2022-03-20 martijn 	int size;
1724 f1509490 2022-03-20 martijn 	size_t nn;
1725 f1509490 2022-03-20 martijn 
1726 f1509490 2022-03-20 martijn 	va_start(ap, fmt);
1727 f1509490 2022-03-20 martijn 	size = vsnprintf(*ar + aroff, *n - aroff, fmt, ap);
1728 f1509490 2022-03-20 martijn 	va_end(ap);
1729 f1509490 2022-03-20 martijn 	if (size + aroff <= *n)
1730 f1509490 2022-03-20 martijn 		return (ssize_t)size + aroff;
1731 f1509490 2022-03-20 martijn 	nn = (((aroff + size)  / 256) + 1) * 256;
1732 f1509490 2022-03-20 martijn 	artmp = realloc(*ar, nn);
1733 f1509490 2022-03-20 martijn 	if (artmp == NULL)
1734 f1509490 2022-03-20 martijn 		return -1;
1735 f1509490 2022-03-20 martijn 	*ar = artmp;
1736 f1509490 2022-03-20 martijn 	*n = nn;
1737 f1509490 2022-03-20 martijn 	va_start(ap, fmt);
1738 f1509490 2022-03-20 martijn 	size = vsnprintf(*ar + aroff, *n - aroff, fmt, ap);
1739 f1509490 2022-03-20 martijn 	va_end(ap);
1740 f1509490 2022-03-20 martijn 	return (ssize_t)size + aroff;
1741 f1509490 2022-03-20 martijn }
1742 f1509490 2022-03-20 martijn 
1743 f1509490 2022-03-20 martijn void
1744 f1509490 2022-03-20 martijn dkim_err(struct message *msg, char *text)
1745 f1509490 2022-03-20 martijn {
1746 f1509490 2022-03-20 martijn 	msg->err = 1;
1747 f1509490 2022-03-20 martijn 	fprintf(stderr, "%s: %s\n", text, strerror(errno));
1748 f1509490 2022-03-20 martijn }
1749 f1509490 2022-03-20 martijn 
1750 f1509490 2022-03-20 martijn void
1751 f1509490 2022-03-20 martijn dkim_errx(struct message *msg, char *text)
1752 f1509490 2022-03-20 martijn {
1753 f1509490 2022-03-20 martijn 	msg->err = 1;
1754 f1509490 2022-03-20 martijn 	fprintf(stderr, "%s\n", text);
1755 f1509490 2022-03-20 martijn }
1756 f1509490 2022-03-20 martijn 
1757 f1509490 2022-03-20 martijn __dead void
1758 f1509490 2022-03-20 martijn usage(void)
1759 f1509490 2022-03-20 martijn {
1760 f1509490 2022-03-20 martijn 	fprintf(stderr, "usage: filter-dkimverify\n");
1761 f1509490 2022-03-20 martijn 	exit(1);
1762 f1509490 2022-03-20 martijn }