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 <assert.h>
  27 f1509490 2022-03-20 martijn #include <ctype.h>
  28 f1509490 2022-03-20 martijn #include <errno.h>
  29 f1509490 2022-03-20 martijn #include <event.h>
  30 f1509490 2022-03-20 martijn #include <limits.h>
  31 f1509490 2022-03-20 martijn #include <netdb.h>
  32 f1509490 2022-03-20 martijn #include <stdarg.h>
  33 f1509490 2022-03-20 martijn #include <stdio.h>
  34 f1509490 2022-03-20 martijn #include <stdlib.h>
  35 f1509490 2022-03-20 martijn #include <string.h>
  36 f1509490 2022-03-20 martijn #include <time.h>
  37 f1509490 2022-03-20 martijn #include <unistd.h>
  38 f1509490 2022-03-20 martijn #include <asr.h>
  39 f1509490 2022-03-20 martijn 
  40 f1509490 2022-03-20 martijn #include "opensmtpd.h"
  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 f1509490 2022-03-20 martijn 	if (pledge("tmppath stdio dns", NULL) == -1)
 174 f1509490 2022-03-20 martijn 		osmtpd_err(1, "pledge");
 175 f1509490 2022-03-20 martijn 
 176 f1509490 2022-03-20 martijn 	if ((ectx = EVP_ENCODE_CTX_new()) == NULL)
 177 f1509490 2022-03-20 martijn 		osmtpd_err(1, "EVP_ENCODE_CTX_new");
 178 f1509490 2022-03-20 martijn 
 179 f1509490 2022-03-20 martijn 	osmtpd_register_conf(dkim_conf);
 180 f1509490 2022-03-20 martijn 	osmtpd_register_filter_dataline(dkim_dataline);
 181 f1509490 2022-03-20 martijn 	osmtpd_register_filter_commit(dkim_commit);
 182 f1509490 2022-03-20 martijn 	osmtpd_local_message(dkim_message_new, dkim_message_free);
 183 f1509490 2022-03-20 martijn 	osmtpd_run();
 184 f1509490 2022-03-20 martijn 
 185 f1509490 2022-03-20 martijn 	return 0;
 186 f1509490 2022-03-20 martijn }
 187 f1509490 2022-03-20 martijn 
 188 f1509490 2022-03-20 martijn void
 189 f1509490 2022-03-20 martijn dkim_conf(const char *key, const char *value)
 190 f1509490 2022-03-20 martijn {
 191 4e2dd90f 2022-03-26 martijn 	const char *end;
 192 f1509490 2022-03-20 martijn 
 193 f1509490 2022-03-20 martijn 	if (key == NULL) {
 194 f1509490 2022-03-20 martijn 		if (authservid == NULL)
 195 f1509490 2022-03-20 martijn 			osmtpd_errx(1, "Didn't receive admd config option");
 196 f1509490 2022-03-20 martijn 		return;
 197 f1509490 2022-03-20 martijn 	}
 198 f1509490 2022-03-20 martijn 	if (strcmp(key, "admd") == 0 && authservid == NULL) {
 199 f1509490 2022-03-20 martijn 		if ((authservid = strdup(value)) == NULL)
 200 f1509490 2022-03-20 martijn 			osmtpd_err(1, "malloc");
 201 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_value(authservid, 0);
 202 f1509490 2022-03-20 martijn 		if (authservid + strlen(authservid) != end)
 203 f1509490 2022-03-20 martijn 			osmtpd_errx(1, "Invalid authservid");
 204 f1509490 2022-03-20 martijn 	}
 205 f1509490 2022-03-20 martijn }
 206 f1509490 2022-03-20 martijn 
 207 f1509490 2022-03-20 martijn void
 208 f1509490 2022-03-20 martijn dkim_dataline(struct osmtpd_ctx *ctx, const char *line)
 209 f1509490 2022-03-20 martijn {
 210 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 211 f1509490 2022-03-20 martijn 	size_t i;
 212 f1509490 2022-03-20 martijn 
 213 f1509490 2022-03-20 martijn 	if (msg->err) {
 214 f1509490 2022-03-20 martijn 		if (line[0] == '.' && line[1] =='\0') {
 215 f1509490 2022-03-20 martijn 			msg->readdone = 1;
 216 f1509490 2022-03-20 martijn 			osmtpd_filter_dataline(ctx, ".");
 217 f1509490 2022-03-20 martijn 		}
 218 f1509490 2022-03-20 martijn 		return;
 219 f1509490 2022-03-20 martijn 	}
 220 f1509490 2022-03-20 martijn 
 221 f1509490 2022-03-20 martijn 	if (fprintf(msg->origf, "%s\n", line) < 0) {
 222 f1509490 2022-03-20 martijn 		dkim_err(msg, "Couldn't write to tempfile");
 223 f1509490 2022-03-20 martijn 		return;
 224 f1509490 2022-03-20 martijn 	}
 225 f1509490 2022-03-20 martijn 	if (line[0] == '.') {
 226 f1509490 2022-03-20 martijn 		line++;
 227 f1509490 2022-03-20 martijn 		if (line[0] == '\0') {
 228 f1509490 2022-03-20 martijn 			msg->readdone = 1;
 229 f1509490 2022-03-20 martijn 			for (i = 0; i < msg->nheaders; i++) {
 230 f1509490 2022-03-20 martijn 				if (msg->header[i].sig == NULL)
 231 f1509490 2022-03-20 martijn 					continue;
 232 f1509490 2022-03-20 martijn 				dkim_body_verify(msg->header[i].sig);
 233 f1509490 2022-03-20 martijn 			}
 234 f1509490 2022-03-20 martijn 			dkim_message_verify(msg);
 235 f1509490 2022-03-20 martijn 			return;
 236 f1509490 2022-03-20 martijn 		}
 237 f1509490 2022-03-20 martijn 	}
 238 f1509490 2022-03-20 martijn 	if (msg->parsing_headers) {
 239 f1509490 2022-03-20 martijn 		dkim_header_add(ctx, line);
 240 f1509490 2022-03-20 martijn 		if (line[0] == '\0') {
 241 f1509490 2022-03-20 martijn 			msg->parsing_headers = 0;
 242 f1509490 2022-03-20 martijn 			for (i = 0; i < msg->nheaders; i++) {
 243 f1509490 2022-03-20 martijn 				if (msg->header[i].sig == NULL)
 244 f1509490 2022-03-20 martijn 					continue;
 245 f1509490 2022-03-20 martijn 				if (msg->header[i].sig->query == NULL)
 246 f1509490 2022-03-20 martijn 					dkim_signature_verify(
 247 f1509490 2022-03-20 martijn 					    msg->header[i].sig);
 248 f1509490 2022-03-20 martijn 			}
 249 f1509490 2022-03-20 martijn 		}
 250 f1509490 2022-03-20 martijn 		return;
 251 f1509490 2022-03-20 martijn 	} else {
 252 f1509490 2022-03-20 martijn 		dkim_body_parse(msg, line);
 253 f1509490 2022-03-20 martijn 	}
 254 f1509490 2022-03-20 martijn }
 255 f1509490 2022-03-20 martijn 
 256 f1509490 2022-03-20 martijn void
 257 f1509490 2022-03-20 martijn dkim_commit(struct osmtpd_ctx *ctx)
 258 f1509490 2022-03-20 martijn {
 259 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 260 f1509490 2022-03-20 martijn 
 261 f1509490 2022-03-20 martijn 	if (msg->err)
 262 f1509490 2022-03-20 martijn 		osmtpd_filter_disconnect(ctx, "Internal server error");
 263 f1509490 2022-03-20 martijn 	else
 264 f1509490 2022-03-20 martijn 		osmtpd_filter_proceed(ctx);
 265 f1509490 2022-03-20 martijn }
 266 f1509490 2022-03-20 martijn 
 267 f1509490 2022-03-20 martijn void *
 268 f1509490 2022-03-20 martijn dkim_message_new(struct osmtpd_ctx *ctx)
 269 f1509490 2022-03-20 martijn {
 270 f1509490 2022-03-20 martijn 	struct message *msg;
 271 f1509490 2022-03-20 martijn 
 272 f1509490 2022-03-20 martijn 	if ((msg = malloc(sizeof(*msg))) == NULL)
 273 f1509490 2022-03-20 martijn 		osmtpd_err(1, NULL);
 274 f1509490 2022-03-20 martijn 
 275 f1509490 2022-03-20 martijn 	if ((msg->origf = tmpfile()) == NULL) {
 276 f1509490 2022-03-20 martijn 		dkim_err(msg, "Can't open tempfile");
 277 f1509490 2022-03-20 martijn 		return NULL;
 278 f1509490 2022-03-20 martijn 	}
 279 f1509490 2022-03-20 martijn 	msg->ctx = ctx;
 280 f1509490 2022-03-20 martijn 	msg->parsing_headers = 1;
 281 f1509490 2022-03-20 martijn 	msg->body_whitelines = 0;
 282 f1509490 2022-03-20 martijn 	msg->has_body = 0;
 283 f1509490 2022-03-20 martijn 	msg->header = NULL;
 284 f1509490 2022-03-20 martijn 	msg->nheaders = 0;
 285 f1509490 2022-03-20 martijn 	msg->err = 0;
 286 f1509490 2022-03-20 martijn 	msg->readdone = 0;
 287 f1509490 2022-03-20 martijn 
 288 f1509490 2022-03-20 martijn 	return msg;
 289 f1509490 2022-03-20 martijn }
 290 f1509490 2022-03-20 martijn 
 291 f1509490 2022-03-20 martijn void
 292 f1509490 2022-03-20 martijn dkim_message_free(struct osmtpd_ctx *ctx, void *data)
 293 f1509490 2022-03-20 martijn {
 294 f1509490 2022-03-20 martijn 	struct message *msg = data;
 295 f1509490 2022-03-20 martijn 	size_t i, j;
 296 f1509490 2022-03-20 martijn 
 297 f1509490 2022-03-20 martijn 	fclose(msg->origf);
 298 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++) {
 299 f1509490 2022-03-20 martijn 		if (msg->header[i].sig != NULL) {
 300 f1509490 2022-03-20 martijn 			free(msg->header[i].sig->b);
 301 f1509490 2022-03-20 martijn 			EVP_MD_CTX_free(msg->header[i].sig->bhctx);
 302 f1509490 2022-03-20 martijn 			for (j = 0; msg->header[i].sig->h != NULL &&
 303 f1509490 2022-03-20 martijn 			    msg->header[i].sig->h[j] != NULL; j++)
 304 f1509490 2022-03-20 martijn 				free(msg->header[i].sig->h[j]);
 305 f1509490 2022-03-20 martijn 			free(msg->header[i].sig->h);
 306 bf67701d 2022-03-29 martijn 			EVP_PKEY_free(msg->header[i].sig->p);
 307 f1509490 2022-03-20 martijn 		}
 308 8cc3b72a 2022-03-27 martijn 		free(msg->header[i].buf);
 309 f1509490 2022-03-20 martijn 		free(msg->header[i].sig);
 310 f1509490 2022-03-20 martijn 	}
 311 f1509490 2022-03-20 martijn 	free(msg->header);
 312 f1509490 2022-03-20 martijn 	free(msg);
 313 f1509490 2022-03-20 martijn }
 314 f1509490 2022-03-20 martijn 
 315 f1509490 2022-03-20 martijn void
 316 f1509490 2022-03-20 martijn dkim_header_add(struct osmtpd_ctx *ctx, const char *line)
 317 f1509490 2022-03-20 martijn {
 318 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 319 4e2dd90f 2022-03-26 martijn 	const char *start, *end, *verify;
 320 f1509490 2022-03-20 martijn 	struct header *headers;
 321 f1509490 2022-03-20 martijn 	size_t i;
 322 f1509490 2022-03-20 martijn 
 323 f1509490 2022-03-20 martijn 	if (msg->nheaders > 0 &&
 324 f1509490 2022-03-20 martijn 	    msg->header[msg->nheaders - 1].readdone == 0) {
 325 f1509490 2022-03-20 martijn 		if (line[0] != ' ' && line[0] != '\t') {
 326 f1509490 2022-03-20 martijn 			msg->header[msg->nheaders - 1].readdone = 1;
 327 f1509490 2022-03-20 martijn 			start = msg->header[msg->nheaders - 1].buf;
 328 4e2dd90f 2022-03-26 martijn 			end = osmtpd_ltok_skip_field_name(start, 0);
 329 f1509490 2022-03-20 martijn 			/* In case someone uses an obs-optional */
 330 5c6a6550 2022-03-24 martijn 			if (end != NULL)
 331 4e2dd90f 2022-03-26 martijn 				verify = osmtpd_ltok_skip_wsp(end, 1);
 332 5c6a6550 2022-03-24 martijn 			if (end != NULL &&
 333 5c6a6550 2022-03-24 martijn 			    strncasecmp(
 334 f1509490 2022-03-20 martijn 			    start, "DKIM-Signature", end - start) == 0 &&
 335 f1509490 2022-03-20 martijn 			    verify[0] == ':')
 336 f1509490 2022-03-20 martijn 				dkim_signature_parse(
 337 f1509490 2022-03-20 martijn 				    &msg->header[msg->nheaders - 1]);
 338 f1509490 2022-03-20 martijn 			if (line[0] == '\0')
 339 f1509490 2022-03-20 martijn 				return;
 340 f1509490 2022-03-20 martijn 		} else {
 341 f1509490 2022-03-20 martijn 			dkim_header_cat(ctx, line);
 342 f1509490 2022-03-20 martijn 			return;
 343 f1509490 2022-03-20 martijn 		}
 344 f1509490 2022-03-20 martijn 	}
 345 f1509490 2022-03-20 martijn 	if (msg->nheaders % 10 == 0) {
 346 f1509490 2022-03-20 martijn 		if ((headers = recallocarray(msg->header, msg->nheaders,
 347 f1509490 2022-03-20 martijn 		    msg->nheaders + 10, sizeof(*msg->header))) == NULL) {
 348 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
 349 f1509490 2022-03-20 martijn 			return;
 350 f1509490 2022-03-20 martijn 		}
 351 f1509490 2022-03-20 martijn 		msg->header = headers;
 352 f1509490 2022-03-20 martijn 		for (i = 0; i < msg->nheaders; i++) {
 353 f1509490 2022-03-20 martijn 			if (msg->header[i].sig == NULL)
 354 f1509490 2022-03-20 martijn 				continue;
 355 f1509490 2022-03-20 martijn 			msg->header[i].sig->header = &msg->header[i];
 356 f1509490 2022-03-20 martijn 		}
 357 f1509490 2022-03-20 martijn 	}
 358 f1509490 2022-03-20 martijn 	msg->header[msg->nheaders].msg = msg;
 359 f1509490 2022-03-20 martijn 	msg->nheaders++;
 360 f1509490 2022-03-20 martijn 	dkim_header_cat(ctx, line);
 361 f1509490 2022-03-20 martijn }
 362 f1509490 2022-03-20 martijn 
 363 f1509490 2022-03-20 martijn void
 364 f1509490 2022-03-20 martijn dkim_header_cat(struct osmtpd_ctx *ctx, const char *line)
 365 f1509490 2022-03-20 martijn {
 366 f1509490 2022-03-20 martijn 	struct message *msg = ctx->local_message;
 367 f1509490 2022-03-20 martijn 	struct header *header = &msg->header[msg->nheaders - 1];
 368 f1509490 2022-03-20 martijn 	char *buf;
 369 f1509490 2022-03-20 martijn 
 370 f1509490 2022-03-20 martijn 	size_t needed = header->buflen + strlen(line) + 2;
 371 f1509490 2022-03-20 martijn 
 372 f1509490 2022-03-20 martijn 	if (needed > (header->buflen / 1024) + 1) {
 373 f1509490 2022-03-20 martijn 		buf = reallocarray(header->buf, (needed / 1024) + 1, 1024);
 374 f1509490 2022-03-20 martijn 		if (buf == NULL) {
 375 f1509490 2022-03-20 martijn 			dkim_err(msg, "malloc");
 376 f1509490 2022-03-20 martijn 			return;
 377 f1509490 2022-03-20 martijn 		}
 378 f1509490 2022-03-20 martijn 		header->buf = buf;
 379 f1509490 2022-03-20 martijn 	}
 380 f1509490 2022-03-20 martijn 	header->buflen += snprintf(header->buf + header->buflen,
 381 f1509490 2022-03-20 martijn 	    (((needed / 1024) + 1) * 1024) - header->buflen, "%s%s",
 382 f1509490 2022-03-20 martijn 	    header->buflen == 0 ? "" : "\r\n", line);
 383 f1509490 2022-03-20 martijn }
 384 f1509490 2022-03-20 martijn 
 385 f1509490 2022-03-20 martijn void
 386 f1509490 2022-03-20 martijn dkim_signature_parse(struct header *header)
 387 f1509490 2022-03-20 martijn {
 388 f1509490 2022-03-20 martijn 	struct signature *sig;
 389 f1509490 2022-03-20 martijn 	struct asr_query *query;
 390 4e2dd90f 2022-03-26 martijn 	const char *buf, *i, *end;
 391 4e2dd90f 2022-03-26 martijn 	char tagname[3];
 392 cc08de51 2022-03-24 martijn 	char subdomain[HOST_NAME_MAX + 1];
 393 cc08de51 2022-03-24 martijn 	size_t ilen, dlen;
 394 f1509490 2022-03-20 martijn 
 395 f1509490 2022-03-20 martijn 	/* Format checked by dkim_header_add */
 396 4e2dd90f 2022-03-26 martijn 	buf = osmtpd_ltok_skip_field_name(header->buf, 0);
 397 4e2dd90f 2022-03-26 martijn 	buf = osmtpd_ltok_skip_wsp(buf, 1) + 1;
 398 f1509490 2022-03-20 martijn 
 399 f1509490 2022-03-20 martijn 	if ((header->sig = calloc(1, sizeof(*header->sig))) == NULL) {
 400 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "malloc");
 401 f1509490 2022-03-20 martijn 		return;
 402 f1509490 2022-03-20 martijn 	}
 403 f1509490 2022-03-20 martijn 	sig = header->sig;
 404 f1509490 2022-03-20 martijn 	sig->header = header;
 405 f1509490 2022-03-20 martijn 	sig->l = -1;
 406 f1509490 2022-03-20 martijn 	sig->t = -1;
 407 f1509490 2022-03-20 martijn 	sig->x = -1;
 408 f1509490 2022-03-20 martijn 
 409 4e2dd90f 2022-03-26 martijn 	end = osmtpd_ltok_skip_tag_list(buf, 0);
 410 f1509490 2022-03-20 martijn 	if (end == NULL || end[0] != '\0') {
 411 4e2dd90f 2022-03-26 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid tag-list");
 412 f1509490 2022-03-20 martijn 		return;
 413 f1509490 2022-03-20 martijn 	}
 414 f1509490 2022-03-20 martijn 
 415 f1509490 2022-03-20 martijn 	while (buf[0] != '\0') {
 416 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(buf, 1);
 417 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_tag_name(buf, 0);
 418 f1509490 2022-03-20 martijn 
 419 f1509490 2022-03-20 martijn 		/* Unknown tag-name */
 420 f1509490 2022-03-20 martijn 		if ((size_t)(end - buf) >= sizeof(tagname))
 421 f1509490 2022-03-20 martijn 			tagname[0] = '\0';
 422 f1509490 2022-03-20 martijn 		else
 423 f1509490 2022-03-20 martijn 			strlcpy(tagname, buf, (end - buf) + 1);
 424 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(end, 1);
 425 f1509490 2022-03-20 martijn 		/* '=' */
 426 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(buf + 1, 1);
 427 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_tag_value(buf, 1);
 428 f1509490 2022-03-20 martijn 		if (strcmp(tagname, "v") == 0)
 429 f1509490 2022-03-20 martijn 			dkim_signature_parse_v(sig, buf, end);
 430 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "a") == 0)
 431 f1509490 2022-03-20 martijn 			dkim_signature_parse_a(sig, buf, end);
 432 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "b") == 0)
 433 f1509490 2022-03-20 martijn 			dkim_signature_parse_b(sig, buf, end);
 434 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "bh") == 0)
 435 f1509490 2022-03-20 martijn 			dkim_signature_parse_bh(sig, buf, end);
 436 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "c") == 0)
 437 f1509490 2022-03-20 martijn 			dkim_signature_parse_c(sig, buf, end);
 438 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "d") == 0)
 439 f1509490 2022-03-20 martijn 			dkim_signature_parse_d(sig, buf, end);
 440 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "h") == 0)
 441 f1509490 2022-03-20 martijn 			dkim_signature_parse_h(sig, buf, end);
 442 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "i") == 0)
 443 f1509490 2022-03-20 martijn 			dkim_signature_parse_i(sig, buf, end);
 444 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "l") == 0)
 445 f1509490 2022-03-20 martijn 			dkim_signature_parse_l(sig, buf, end);
 446 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "q") == 0)
 447 f1509490 2022-03-20 martijn 			dkim_signature_parse_q(sig, buf, end);
 448 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "s") == 0)
 449 f1509490 2022-03-20 martijn 			dkim_signature_parse_s(sig, buf, end);
 450 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "t") == 0)
 451 f1509490 2022-03-20 martijn 			dkim_signature_parse_t(sig, buf, end);
 452 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "x") == 0)
 453 f1509490 2022-03-20 martijn 			dkim_signature_parse_x(sig, buf, end);
 454 f1509490 2022-03-20 martijn 		else if (strcmp(tagname, "z") == 0)
 455 f1509490 2022-03-20 martijn 			dkim_signature_parse_z(sig, buf, end);
 456 f1509490 2022-03-20 martijn 
 457 4e2dd90f 2022-03-26 martijn 		buf = osmtpd_ltok_skip_fws(end, 1);
 458 f1509490 2022-03-20 martijn 		if (buf[0] == ';')
 459 f1509490 2022-03-20 martijn 			buf++;
 460 f1509490 2022-03-20 martijn 		else if (buf[0] != '\0') {
 461 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 462 4e2dd90f 2022-03-26 martijn 			    "Invalid tag-list");
 463 f1509490 2022-03-20 martijn 			return;
 464 f1509490 2022-03-20 martijn 		}
 465 f1509490 2022-03-20 martijn 	}
 466 f1509490 2022-03-20 martijn 	if (sig->state != DKIM_UNKNOWN)
 467 f1509490 2022-03-20 martijn 		return;
 468 f1509490 2022-03-20 martijn 
 469 f1509490 2022-03-20 martijn 	if (sig->v != 1)
 470 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing v tag");
 471 f1509490 2022-03-20 martijn 	else if (sig->ah == NULL)
 472 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing a tag");
 473 f1509490 2022-03-20 martijn 	else if (sig->b == NULL)
 474 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing b tag");
 475 f1509490 2022-03-20 martijn 	else if (sig->bhsz == 0)
 476 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing bh tag");
 477 f1509490 2022-03-20 martijn 	else if (sig->d[0] == '\0')
 478 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing d tag");
 479 f1509490 2022-03-20 martijn 	else if (sig->h == NULL)
 480 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing h tag");
 481 f1509490 2022-03-20 martijn 	else if (sig->s[0] == '\0')
 482 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Missing s tag");
 483 759a6c7b 2022-03-24 martijn 	if (sig->state != DKIM_UNKNOWN)
 484 759a6c7b 2022-03-24 martijn 		return;
 485 cc08de51 2022-03-24 martijn 
 486 cc08de51 2022-03-24 martijn 	if (sig->i != NULL) {
 487 4e2dd90f 2022-03-26 martijn 		i = osmtpd_ltok_skip_local_part(sig->i, 1) + 1;
 488 efee726e 2022-03-27 martijn 		ilen = sig->isz - (size_t)(i - sig->i);
 489 cc08de51 2022-03-24 martijn 		dlen = strlen(sig->d);
 490 cc08de51 2022-03-24 martijn 		if (ilen < dlen) {
 491 cc08de51 2022-03-24 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 492 f85da730 2022-03-27 martijn 			    "i tag not subdomain of d");
 493 cc08de51 2022-03-24 martijn 			return;
 494 cc08de51 2022-03-24 martijn 		}
 495 cc08de51 2022-03-24 martijn 		i += ilen - dlen;
 496 efee726e 2022-03-27 martijn 		if ((i[-1] != '.' && i[-1] != '@') ||
 497 7847bd66 2022-04-05 martijn 		    strncasecmp(i, sig->d, dlen) != 0) {
 498 cc08de51 2022-03-24 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 499 efee726e 2022-03-27 martijn 			    "i tag not subdomain of d");
 500 cc08de51 2022-03-24 martijn 			return;
 501 cc08de51 2022-03-24 martijn 		}
 502 2d83468e 2022-03-24 martijn 	}
 503 2d83468e 2022-03-24 martijn 	if (sig->t != -1 && sig->x != -1 && sig->t > sig->x) {
 504 2d83468e 2022-03-24 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "t tag after x tag");
 505 2d83468e 2022-03-24 martijn 		return;
 506 cc08de51 2022-03-24 martijn 	}
 507 f1509490 2022-03-20 martijn 
 508 f1509490 2022-03-20 martijn 	if ((size_t)snprintf(subdomain, sizeof(subdomain), "%s._domainkey.%s",
 509 f1509490 2022-03-20 martijn 	    sig->s, sig->d) >= sizeof(subdomain)) {
 510 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
 511 f1509490 2022-03-20 martijn 		    "dns/txt query too long");
 512 f1509490 2022-03-20 martijn 		return;
 513 f1509490 2022-03-20 martijn 	}
 514 f1509490 2022-03-20 martijn 
 515 f1509490 2022-03-20 martijn 	if ((query = res_query_async(subdomain, C_IN, T_TXT, NULL)) == NULL) {
 516 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "res_query_async");
 517 f1509490 2022-03-20 martijn 		return;
 518 f1509490 2022-03-20 martijn 	}
 519 f1509490 2022-03-20 martijn 	if ((sig->query = event_asr_run(query, dkim_rr_resolve, sig)) == NULL) {
 520 f1509490 2022-03-20 martijn 		dkim_err(header->msg, "event_asr_run");
 521 f1509490 2022-03-20 martijn 		asr_abort(query);
 522 f1509490 2022-03-20 martijn 		return;
 523 f1509490 2022-03-20 martijn 	}
 524 f1509490 2022-03-20 martijn }
 525 f1509490 2022-03-20 martijn 
 526 f1509490 2022-03-20 martijn void
 527 4e2dd90f 2022-03-26 martijn dkim_signature_parse_v(struct signature *sig, const char *start, const char *end)
 528 f1509490 2022-03-20 martijn {
 529 f1509490 2022-03-20 martijn 	if (sig->v != 0) {	/* Duplicate tag */
 530 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate v tag");
 531 f1509490 2022-03-20 martijn 		return;
 532 f1509490 2022-03-20 martijn 	}
 533 f1509490 2022-03-20 martijn 	/* Unsupported version */
 534 f1509490 2022-03-20 martijn 	if (start[0] != '1' || start + 1 != end)
 535 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsupported v tag");
 536 f1509490 2022-03-20 martijn 	else
 537 f1509490 2022-03-20 martijn 		sig->v = 1;
 538 f1509490 2022-03-20 martijn }
 539 f1509490 2022-03-20 martijn 
 540 f1509490 2022-03-20 martijn void
 541 4e2dd90f 2022-03-26 martijn dkim_signature_parse_a(struct signature *sig, const char *start, const char *end)
 542 f1509490 2022-03-20 martijn {
 543 f1509490 2022-03-20 martijn 	char ah[sizeof("sha256")];
 544 f1509490 2022-03-20 martijn 
 545 f1509490 2022-03-20 martijn 	if (sig->ah != NULL) {
 546 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate a tag");
 547 f1509490 2022-03-20 martijn 		return;
 548 f1509490 2022-03-20 martijn 	}
 549 f1509490 2022-03-20 martijn 
 550 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_sig_a_tag_alg(start, 0) != end) {
 551 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid a tag");
 552 f1509490 2022-03-20 martijn 		return;
 553 f1509490 2022-03-20 martijn 	}
 554 f1509490 2022-03-20 martijn 	sig->a = start;
 555 f1509490 2022-03-20 martijn 	sig->asz = (size_t)(end - start);
 556 f1509490 2022-03-20 martijn 	if (strncmp(start, "rsa-", 4) == 0) {
 557 f1509490 2022-03-20 martijn 		start += 4;
 558 f1509490 2022-03-20 martijn 		sig->ak = EVP_PKEY_RSA;
 559 338537df 2022-04-08 martijn 		sig->sephash = 0;
 560 338537df 2022-04-08 martijn #if HAVE_ED25519
 561 338537df 2022-04-08 martijn 	} else if (strncmp(start, "ed25519-", 8) == 0) {
 562 338537df 2022-04-08 martijn 		start += 8;
 563 338537df 2022-04-08 martijn 		sig->ak = EVP_PKEY_ED25519;
 564 338537df 2022-04-08 martijn 		sig->sephash = 1;
 565 338537df 2022-04-08 martijn #endif
 566 f1509490 2022-03-20 martijn 	} else {
 567 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag k");
 568 f1509490 2022-03-20 martijn 		return;
 569 f1509490 2022-03-20 martijn 	}
 570 f1509490 2022-03-20 martijn 	if ((size_t)(end - start) >= sizeof(ah)) {
 571 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag h");
 572 f1509490 2022-03-20 martijn 		return;
 573 f1509490 2022-03-20 martijn 	}
 574 f1509490 2022-03-20 martijn 	strlcpy(ah, start, sizeof(ah));
 575 f1509490 2022-03-20 martijn 	ah[end - start] = '\0';
 576 f1509490 2022-03-20 martijn 	if ((sig->ah = EVP_get_digestbyname(ah)) == NULL) {
 577 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "Unsuppored a tag h");
 578 f1509490 2022-03-20 martijn 		return;
 579 f1509490 2022-03-20 martijn 	}
 580 f1509490 2022-03-20 martijn 	if ((sig->bhctx = EVP_MD_CTX_new()) == NULL) {
 581 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "EVP_MD_CTX_new");
 582 f1509490 2022-03-20 martijn 		return;
 583 f1509490 2022-03-20 martijn 	}
 584 f1509490 2022-03-20 martijn 	if (EVP_DigestInit_ex(sig->bhctx, sig->ah, NULL) <= 0) {
 585 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "EVP_DigestInit_ex");
 586 f1509490 2022-03-20 martijn 		return;
 587 f1509490 2022-03-20 martijn 	}
 588 f1509490 2022-03-20 martijn }
 589 f1509490 2022-03-20 martijn 
 590 f1509490 2022-03-20 martijn void
 591 4e2dd90f 2022-03-26 martijn dkim_signature_parse_b(struct signature *sig, const char *start, const char *end)
 592 f1509490 2022-03-20 martijn {
 593 f1509490 2022-03-20 martijn 	int decodesz;
 594 f1509490 2022-03-20 martijn 
 595 f1509490 2022-03-20 martijn 	if (sig->b != NULL) {
 596 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate b tag");
 597 f1509490 2022-03-20 martijn 		return;
 598 f1509490 2022-03-20 martijn 	}
 599 f1509490 2022-03-20 martijn 	sig->bheader = start;
 600 f1509490 2022-03-20 martijn 	if ((sig->b = malloc((((end - start) / 4) + 1) * 3)) == NULL) {
 601 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "malloc");
 602 f1509490 2022-03-20 martijn 		return;
 603 f1509490 2022-03-20 martijn 	}
 604 f1509490 2022-03-20 martijn 	/* EVP_DecodeBlock doesn't handle internal whitespace */
 605 f1509490 2022-03-20 martijn 	EVP_DecodeInit(ectx);
 606 f1509490 2022-03-20 martijn 	if (EVP_DecodeUpdate(ectx, sig->b, &decodesz, start,
 607 f1509490 2022-03-20 martijn 	    (int)(end - start)) == -1) {
 608 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid b tag");
 609 f1509490 2022-03-20 martijn 		return;
 610 f1509490 2022-03-20 martijn 	}
 611 f1509490 2022-03-20 martijn 	sig->bsz = decodesz;
 612 f1509490 2022-03-20 martijn 	if (EVP_DecodeFinal(ectx, sig->b + sig->bsz,
 613 f1509490 2022-03-20 martijn 	    &decodesz) == -1) {
 614 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid b tag");
 615 f1509490 2022-03-20 martijn 		return;
 616 f1509490 2022-03-20 martijn 	}
 617 f1509490 2022-03-20 martijn 	sig->bsz += decodesz;
 618 f1509490 2022-03-20 martijn }
 619 f1509490 2022-03-20 martijn 
 620 f1509490 2022-03-20 martijn void
 621 4e2dd90f 2022-03-26 martijn dkim_signature_parse_bh(struct signature *sig, const char *start, const char *end)
 622 f1509490 2022-03-20 martijn {
 623 4e2dd90f 2022-03-26 martijn 	const char *b64;
 624 f1509490 2022-03-20 martijn 	size_t n;
 625 f1509490 2022-03-20 martijn 	int decodesz;
 626 f1509490 2022-03-20 martijn 
 627 f1509490 2022-03-20 martijn 	if (sig->bhsz != 0) {
 628 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate bh tag");
 629 f1509490 2022-03-20 martijn 		return;
 630 f1509490 2022-03-20 martijn 	}
 631 f1509490 2022-03-20 martijn 	/*
 632 f1509490 2022-03-20 martijn 	 * EVP_Decode* expects sig->bh to be large enough,
 633 f1509490 2022-03-20 martijn 	 * so count the actual b64 characters.
 634 f1509490 2022-03-20 martijn 	 */
 635 f1509490 2022-03-20 martijn 	b64 = start;
 636 f1509490 2022-03-20 martijn 	n = 0;
 637 f1509490 2022-03-20 martijn 	while (1) {
 638 4e2dd90f 2022-03-26 martijn 		b64 = osmtpd_ltok_skip_fws(b64, 1);
 639 4e2dd90f 2022-03-26 martijn 		if (osmtpd_ltok_skip_alphadigitps(b64, 0) == NULL)
 640 f1509490 2022-03-20 martijn 			break;
 641 f1509490 2022-03-20 martijn 		n++;
 642 f1509490 2022-03-20 martijn 		b64++;
 643 f1509490 2022-03-20 martijn 	}
 644 f1509490 2022-03-20 martijn 	if (b64[0] == '=') {
 645 f1509490 2022-03-20 martijn 		n++;
 646 4e2dd90f 2022-03-26 martijn 		b64 = osmtpd_ltok_skip_fws(b64 + 1, 1);
 647 f1509490 2022-03-20 martijn 		if (b64[0] == '=') {
 648 f1509490 2022-03-20 martijn 			n++;
 649 f1509490 2022-03-20 martijn 			b64++;
 650 f1509490 2022-03-20 martijn 		}
 651 f1509490 2022-03-20 martijn 	}
 652 f1509490 2022-03-20 martijn 	/* Invalid tag value */
 653 f1509490 2022-03-20 martijn 	if (b64 != end || n % 4 != 0 || (n / 4) * 3 > sizeof(sig->bh)) {
 654 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 655 f1509490 2022-03-20 martijn 		return;
 656 f1509490 2022-03-20 martijn 	}
 657 f1509490 2022-03-20 martijn 	/* EVP_DecodeBlock doesn't handle internal whitespace */
 658 f1509490 2022-03-20 martijn 	EVP_DecodeInit(ectx);
 659 f1509490 2022-03-20 martijn 	if (EVP_DecodeUpdate(ectx, sig->bh, &decodesz, start,
 660 f1509490 2022-03-20 martijn 	    (int)(end - start)) == -1) {
 661 f1509490 2022-03-20 martijn 		/* Paranoia check */
 662 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 663 f1509490 2022-03-20 martijn 		return;
 664 f1509490 2022-03-20 martijn 	}
 665 f1509490 2022-03-20 martijn 	sig->bhsz = decodesz;
 666 f1509490 2022-03-20 martijn 	if (EVP_DecodeFinal(ectx, sig->bh + sig->bhsz, &decodesz) == -1) {
 667 f1509490 2022-03-20 martijn 		/* Paranoia check */
 668 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid bh tag");
 669 f1509490 2022-03-20 martijn 		return;
 670 f1509490 2022-03-20 martijn 	}
 671 f1509490 2022-03-20 martijn 	sig->bhsz += decodesz;
 672 f1509490 2022-03-20 martijn }
 673 f1509490 2022-03-20 martijn 
 674 f1509490 2022-03-20 martijn void
 675 4e2dd90f 2022-03-26 martijn dkim_signature_parse_c(struct signature *sig, const char *start, const char *end)
 676 f1509490 2022-03-20 martijn {
 677 f1509490 2022-03-20 martijn 	if (sig->c != 0) {
 678 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate c tag");
 679 f1509490 2022-03-20 martijn 		return;
 680 f1509490 2022-03-20 martijn 	}
 681 f1509490 2022-03-20 martijn 	if (strncmp(start, "simple", 6) == 0) {
 682 f1509490 2022-03-20 martijn 		sig->c = CANON_HEADER_SIMPLE;
 683 f1509490 2022-03-20 martijn 		start += 6;
 684 f1509490 2022-03-20 martijn 	} else if (strncmp(start, "relaxed", 7) == 0) {
 685 f1509490 2022-03-20 martijn 		sig->c = CANON_HEADER_RELAXED;
 686 f1509490 2022-03-20 martijn 		start += 7;
 687 f1509490 2022-03-20 martijn 	} else {
 688 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid c tag");
 689 f1509490 2022-03-20 martijn 		return;
 690 f1509490 2022-03-20 martijn 	}
 691 f1509490 2022-03-20 martijn 	if (start[0] == '/') {
 692 f1509490 2022-03-20 martijn 		start++;
 693 f1509490 2022-03-20 martijn 		if (strncmp(start, "simple", 6) == 0) {
 694 f1509490 2022-03-20 martijn 			sig->c |= CANON_BODY_SIMPLE;
 695 f1509490 2022-03-20 martijn 			start += 6;
 696 f1509490 2022-03-20 martijn 		} else if (strncmp(start, "relaxed", 7) == 0) {
 697 f1509490 2022-03-20 martijn 			sig->c |= CANON_BODY_RELAXED;
 698 f1509490 2022-03-20 martijn 			start += 7;
 699 f1509490 2022-03-20 martijn 		} else {
 700 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 701 f1509490 2022-03-20 martijn 			    "Invalid c tag");
 702 f1509490 2022-03-20 martijn 			return;
 703 f1509490 2022-03-20 martijn 		}
 704 f1509490 2022-03-20 martijn 	}
 705 f1509490 2022-03-20 martijn 
 706 f1509490 2022-03-20 martijn 	if (start != end) {
 707 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid c tag");
 708 f1509490 2022-03-20 martijn 		return;
 709 f1509490 2022-03-20 martijn 	}
 710 f1509490 2022-03-20 martijn 	sig->c |= CANON_DONE;
 711 f1509490 2022-03-20 martijn }
 712 f1509490 2022-03-20 martijn 
 713 f1509490 2022-03-20 martijn void
 714 4e2dd90f 2022-03-26 martijn dkim_signature_parse_d(struct signature *sig, const char *start, const char *end)
 715 f1509490 2022-03-20 martijn {
 716 f1509490 2022-03-20 martijn 	if (sig->d[0] != '\0') {
 717 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate d tag");
 718 f1509490 2022-03-20 martijn 		return;
 719 f1509490 2022-03-20 martijn 	}
 720 2817edca 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_d_tag_value(start, 0) != end ||
 721 f1509490 2022-03-20 martijn 	    (size_t)(end - start) >= sizeof(sig->d)) {
 722 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid d tag");
 723 f1509490 2022-03-20 martijn 		return;
 724 f1509490 2022-03-20 martijn 	}
 725 f1509490 2022-03-20 martijn 	strlcpy(sig->d, start, end - start + 1);
 726 f1509490 2022-03-20 martijn }
 727 f1509490 2022-03-20 martijn 
 728 f1509490 2022-03-20 martijn void
 729 4e2dd90f 2022-03-26 martijn dkim_signature_parse_h(struct signature *sig, const char *start, const char *end)
 730 f1509490 2022-03-20 martijn {
 731 4e2dd90f 2022-03-26 martijn 	const char *h;
 732 f1509490 2022-03-20 martijn 	size_t n = 0;
 733 f1509490 2022-03-20 martijn 
 734 f1509490 2022-03-20 martijn 	if (sig->h != NULL) {
 735 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate h tag");
 736 04225ff9 2022-03-30 martijn 		return;
 737 04225ff9 2022-03-30 martijn 	}
 738 022782a1 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_h_tag_value(start, 0) < end) {
 739 04225ff9 2022-03-30 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid h tag");
 740 f1509490 2022-03-20 martijn 		return;
 741 f1509490 2022-03-20 martijn 	}
 742 f1509490 2022-03-20 martijn 	h = start;
 743 f1509490 2022-03-20 martijn 	while (1) {
 744 4e2dd90f 2022-03-26 martijn 		if ((h = osmtpd_ltok_skip_hdr_name(h, 0)) == NULL) {
 745 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR,
 746 f1509490 2022-03-20 martijn 			    "Invalid h tag");
 747 f1509490 2022-03-20 martijn 			return;
 748 f1509490 2022-03-20 martijn 		}
 749 f1509490 2022-03-20 martijn 		n++;
 750 f1509490 2022-03-20 martijn 		/* ';' is part of hdr-name */
 751 f1509490 2022-03-20 martijn 		if (h > end) {
 752 f1509490 2022-03-20 martijn 			h = end;
 753 f1509490 2022-03-20 martijn 			break;
 754 f1509490 2022-03-20 martijn 		}
 755 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_fws(h, 1);
 756 f1509490 2022-03-20 martijn 		if (h[0] != ':')
 757 f1509490 2022-03-20 martijn 			break;
 758 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_fws(h + 1, 1);
 759 f1509490 2022-03-20 martijn 	}
 760 f1509490 2022-03-20 martijn 	if ((sig->h = calloc(n + 1, sizeof(*sig->h))) == NULL) {
 761 f1509490 2022-03-20 martijn 		dkim_err(sig->header->msg, "malloc");
 762 f1509490 2022-03-20 martijn 		return;
 763 f1509490 2022-03-20 martijn 	}
 764 f1509490 2022-03-20 martijn 	n = 0;
 765 f1509490 2022-03-20 martijn 	h = start;
 766 f1509490 2022-03-20 martijn 	while (1) {
 767 4e2dd90f 2022-03-26 martijn 		h = osmtpd_ltok_skip_hdr_name(start, 0);
 768 f1509490 2022-03-20 martijn 		/* ';' is part of hdr-name */
 769 f1509490 2022-03-20 martijn 		if (h > end) {
 770 f1509490 2022-03-20 martijn 			sig->h[n] = strndup(start, end - start);
 771 f1509490 2022-03-20 martijn 			break;
 772 f1509490 2022-03-20 martijn 		}
 773 f1509490 2022-03-20 martijn 		if ((sig->h[n++] = strndup(start, h - start)) == NULL) {
 774 f1509490 2022-03-20 martijn 			dkim_err(sig->header->msg, "malloc");
 775 f1509490 2022-03-20 martijn 			return;
 776 f1509490 2022-03-20 martijn 		}
 777 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(h, 1);
 778 f1509490 2022-03-20 martijn 		if (start[0] != ':')
 779 f1509490 2022-03-20 martijn 			break;
 780 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(start + 1, 1);
 781 f1509490 2022-03-20 martijn 	}
 782 f1509490 2022-03-20 martijn }
 783 f1509490 2022-03-20 martijn 
 784 f1509490 2022-03-20 martijn void
 785 4e2dd90f 2022-03-26 martijn dkim_signature_parse_i(struct signature *sig, const char *start, const char *end)
 786 f1509490 2022-03-20 martijn {
 787 f1509490 2022-03-20 martijn 	if (sig->i != NULL) {
 788 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate i tag");
 789 f1509490 2022-03-20 martijn 		return;
 790 f1509490 2022-03-20 martijn 	}
 791 2b49c695 2022-03-30 martijn 	if (osmtpd_ltok_skip_sig_i_tag_value(start, 0) != end) {
 792 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid i tag");
 793 f1509490 2022-03-20 martijn 		return;
 794 f1509490 2022-03-20 martijn 	}
 795 f1509490 2022-03-20 martijn 	sig->i = start;
 796 f1509490 2022-03-20 martijn 	sig->isz = (size_t)(end - start);
 797 f1509490 2022-03-20 martijn }
 798 f1509490 2022-03-20 martijn 
 799 f1509490 2022-03-20 martijn void
 800 4e2dd90f 2022-03-26 martijn dkim_signature_parse_l(struct signature *sig, const char *start, const char *end)
 801 f1509490 2022-03-20 martijn {
 802 f1509490 2022-03-20 martijn 	long long l;
 803 f1509490 2022-03-20 martijn 	char *lend;
 804 f1509490 2022-03-20 martijn 
 805 f1509490 2022-03-20 martijn 	if (sig->l != -1) {	/* Duplicate tag */
 806 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate l tag");
 807 f1509490 2022-03-20 martijn 		return;
 808 f1509490 2022-03-20 martijn 	}
 809 f1509490 2022-03-20 martijn 	errno = 0;
 810 f1509490 2022-03-20 martijn 	l = strtoll(start, &lend, 10);
 811 f1509490 2022-03-20 martijn 	/* > 76 digits in stroll is an overflow */
 812 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL ||
 813 f1509490 2022-03-20 martijn 	    lend != end || errno != 0) {
 814 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid l tag");
 815 f1509490 2022-03-20 martijn 		return;
 816 f1509490 2022-03-20 martijn 	}
 817 f1509490 2022-03-20 martijn 	if (l > SSIZE_MAX) {
 818 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "l tag too large");
 819 f1509490 2022-03-20 martijn 		return;
 820 f1509490 2022-03-20 martijn 	}
 821 f1509490 2022-03-20 martijn 	sig->l = (ssize_t)l;
 822 f1509490 2022-03-20 martijn }
 823 f1509490 2022-03-20 martijn 
 824 f1509490 2022-03-20 martijn void
 825 4e2dd90f 2022-03-26 martijn dkim_signature_parse_q(struct signature *sig, const char *start, const char *end)
 826 f1509490 2022-03-20 martijn {
 827 4e2dd90f 2022-03-26 martijn 	const char *qend;
 828 f1509490 2022-03-20 martijn 
 829 f1509490 2022-03-20 martijn 	if (sig->q != 0) {
 830 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate q tag");
 831 f1509490 2022-03-20 martijn 		return;
 832 f1509490 2022-03-20 martijn 	}
 833 f1509490 2022-03-20 martijn 
 834 f1509490 2022-03-20 martijn 	while (1) {
 835 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(start, 1);
 836 4e2dd90f 2022-03-26 martijn 		qend = osmtpd_ltok_skip_sig_q_tag_method(start, 0);
 837 f1509490 2022-03-20 martijn 		if (qend == NULL) {
 838 f1509490 2022-03-20 martijn 			dkim_signature_state(sig, DKIM_PERMERROR, "Invalid q tag");
 839 f1509490 2022-03-20 martijn 			return;
 840 f1509490 2022-03-20 martijn 		}
 841 f1509490 2022-03-20 martijn 		if (strncmp(start, "dns/txt", qend - start) == 0)
 842 f1509490 2022-03-20 martijn 			sig->q = 1;
 843 4e2dd90f 2022-03-26 martijn 		start = osmtpd_ltok_skip_fws(qend, 1);
 844 f1509490 2022-03-20 martijn 		if (start[0] != ':')
 845 f1509490 2022-03-20 martijn 			break;
 846 f1509490 2022-03-20 martijn 	}
 847 f1509490 2022-03-20 martijn 	if (start != end) {
 848 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid q tag");
 849 f1509490 2022-03-20 martijn 		return;
 850 f1509490 2022-03-20 martijn 	}
 851 f1509490 2022-03-20 martijn 	if (sig->q != 1) {
 852 f1509490 2022-03-20 martijn 		sig->q = 1;
 853 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_NEUTRAL, "No useable q found");
 854 f1509490 2022-03-20 martijn 		return;
 855 f1509490 2022-03-20 martijn 	}
 856 f1509490 2022-03-20 martijn }
 857 f1509490 2022-03-20 martijn 
 858 f1509490 2022-03-20 martijn void
 859 4e2dd90f 2022-03-26 martijn dkim_signature_parse_s(struct signature *sig, const char *start, const char *end)
 860 f1509490 2022-03-20 martijn {
 861 f1509490 2022-03-20 martijn 	if (sig->s[0] != '\0') {
 862 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate s tag");
 863 f1509490 2022-03-20 martijn 		return;
 864 f1509490 2022-03-20 martijn 	}
 865 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_selector(start, 0) != end) {
 866 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid s tag");
 867 f1509490 2022-03-20 martijn 		return;
 868 f1509490 2022-03-20 martijn 	}
 869 f1509490 2022-03-20 martijn 	strlcpy(sig->s, start, end - start + 1);
 870 f1509490 2022-03-20 martijn }
 871 f1509490 2022-03-20 martijn 
 872 f1509490 2022-03-20 martijn void
 873 4e2dd90f 2022-03-26 martijn dkim_signature_parse_t(struct signature *sig, const char *start, const char *end)
 874 f1509490 2022-03-20 martijn {
 875 f1509490 2022-03-20 martijn 	char *tend;
 876 f1509490 2022-03-20 martijn 
 877 f1509490 2022-03-20 martijn 	if (sig->t != -1) {
 878 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate t tag");
 879 f1509490 2022-03-20 martijn 		return;
 880 f1509490 2022-03-20 martijn 	}
 881 f1509490 2022-03-20 martijn 	errno = 0;
 882 f1509490 2022-03-20 martijn 	sig->t = strtoll(start, &tend, 10);
 883 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL || tend != end ||
 884 f1509490 2022-03-20 martijn 	    tend - start > 12 || errno != 0) {
 885 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid t tag");
 886 f1509490 2022-03-20 martijn 		return;
 887 f1509490 2022-03-20 martijn 	}
 888 f1509490 2022-03-20 martijn }
 889 f1509490 2022-03-20 martijn 
 890 f1509490 2022-03-20 martijn void
 891 4e2dd90f 2022-03-26 martijn dkim_signature_parse_x(struct signature *sig, const char *start, const char *end)
 892 f1509490 2022-03-20 martijn {
 893 f1509490 2022-03-20 martijn 	char *xend;
 894 f1509490 2022-03-20 martijn 
 895 f1509490 2022-03-20 martijn 	if (sig->x != -1) {
 896 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate x tag");
 897 f1509490 2022-03-20 martijn 		return;
 898 f1509490 2022-03-20 martijn 	}
 899 f1509490 2022-03-20 martijn 	errno = 0;
 900 f1509490 2022-03-20 martijn 	sig->x = strtoll(start, &xend, 10);
 901 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_digit(start, 0) == NULL || xend != end ||
 902 f1509490 2022-03-20 martijn 	    xend - start > 12 || errno != 0) {
 903 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid x tag");
 904 f1509490 2022-03-20 martijn 		return;
 905 f1509490 2022-03-20 martijn 	}
 906 f1509490 2022-03-20 martijn }
 907 f1509490 2022-03-20 martijn 
 908 f1509490 2022-03-20 martijn void
 909 4e2dd90f 2022-03-26 martijn dkim_signature_parse_z(struct signature *sig, const char *start, const char *end)
 910 f1509490 2022-03-20 martijn {
 911 f1509490 2022-03-20 martijn 	if (sig->z != 0) {
 912 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Duplicate z tag");
 913 f1509490 2022-03-20 martijn 		return;
 914 f1509490 2022-03-20 martijn 	}
 915 f1509490 2022-03-20 martijn 
 916 f1509490 2022-03-20 martijn 	sig->z = 1;
 917 4e2dd90f 2022-03-26 martijn 	if (osmtpd_ltok_skip_sig_z_tag_value(start, 0) != end) {
 918 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid z tag");
 919 f1509490 2022-03-20 martijn 		return;
 920 f1509490 2022-03-20 martijn 	}
 921 f1509490 2022-03-20 martijn }
 922 f1509490 2022-03-20 martijn 
 923 f1509490 2022-03-20 martijn void
 924 f1509490 2022-03-20 martijn dkim_signature_verify(struct signature *sig)
 925 f1509490 2022-03-20 martijn {
 926 f1509490 2022-03-20 martijn 	struct message *msg = sig->header->msg;
 927 f1509490 2022-03-20 martijn 	static EVP_MD_CTX *bctx = NULL;
 928 338537df 2022-04-08 martijn 	char digest[EVP_MAX_MD_SIZE];
 929 338537df 2022-04-08 martijn 	unsigned int digestsz;
 930 4e2dd90f 2022-03-26 martijn 	const char *end;
 931 f1509490 2022-03-20 martijn 	size_t i, header;
 932 f1509490 2022-03-20 martijn 
 933 f1509490 2022-03-20 martijn 	if (sig->state != DKIM_UNKNOWN)
 934 f1509490 2022-03-20 martijn 		return;
 935 f1509490 2022-03-20 martijn 
 936 f1509490 2022-03-20 martijn 	if (bctx == NULL) {
 937 f1509490 2022-03-20 martijn 		if ((bctx = EVP_MD_CTX_new()) == NULL) {
 938 f1509490 2022-03-20 martijn 			dkim_errx(msg, "EVP_MD_CTX_new");
 939 f1509490 2022-03-20 martijn 			return;
 940 f1509490 2022-03-20 martijn 		}
 941 f1509490 2022-03-20 martijn 	}
 942 8015d1bc 2022-03-23 martijn 	EVP_MD_CTX_reset(bctx);
 943 338537df 2022-04-08 martijn 	if (!sig->sephash) {
 944 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyInit(bctx, NULL, sig->ah, NULL,
 945 338537df 2022-04-08 martijn 		    sig->p) != 1) {
 946 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerifyInit");
 947 338537df 2022-04-08 martijn 			return;
 948 338537df 2022-04-08 martijn 		}
 949 338537df 2022-04-08 martijn 	} else {
 950 338537df 2022-04-08 martijn 		if (EVP_DigestInit_ex(bctx, sig->ah, NULL) != 1) {
 951 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestInit_ex");
 952 338537df 2022-04-08 martijn 			return;
 953 338537df 2022-04-08 martijn 		}
 954 f1509490 2022-03-20 martijn 	}
 955 f1509490 2022-03-20 martijn 
 956 f1509490 2022-03-20 martijn 	for (i = 0; i < msg->nheaders; i++)
 957 f1509490 2022-03-20 martijn 		msg->header[i].parsed = 0;
 958 f1509490 2022-03-20 martijn 
 959 f1509490 2022-03-20 martijn 	for (header = 0; sig->h[header] != NULL; header++) {
 960 f1509490 2022-03-20 martijn 		for (i = msg->nheaders; i > 0; ) {
 961 f1509490 2022-03-20 martijn 			i--;
 962 f1509490 2022-03-20 martijn 			if (msg->header[i].parsed ||
 963 f1509490 2022-03-20 martijn 			    strncasecmp(msg->header[i].buf, sig->h[header],
 964 f1509490 2022-03-20 martijn 			    strlen(sig->h[header])) != 0 ||
 965 f1509490 2022-03-20 martijn 			    msg->header[i].sig == sig)
 966 f1509490 2022-03-20 martijn 				continue;
 967 4e2dd90f 2022-03-26 martijn 			end = osmtpd_ltok_skip_fws(
 968 f1509490 2022-03-20 martijn 			    msg->header[i].buf + strlen(sig->h[header]), 1);
 969 f1509490 2022-03-20 martijn 			if (end[0] != ':')
 970 f1509490 2022-03-20 martijn 				continue;
 971 f1509490 2022-03-20 martijn 			dkim_signature_header(bctx, sig, &(msg->header[i]));
 972 f1509490 2022-03-20 martijn 			msg->header[i].parsed = 1;
 973 f1509490 2022-03-20 martijn 		}
 974 f1509490 2022-03-20 martijn 	}
 975 f1509490 2022-03-20 martijn 	dkim_signature_header(bctx, sig, sig->header);
 976 338537df 2022-04-08 martijn 	if (!sig->sephash) {
 977 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyFinal(bctx, sig->b, sig->bsz) != 1)
 978 338537df 2022-04-08 martijn 			dkim_signature_state(sig, DKIM_FAIL, "b mismatch");
 979 338537df 2022-04-08 martijn 	} else {
 980 338537df 2022-04-08 martijn 		if (EVP_DigestFinal_ex(bctx, digest, &digestsz) == 0) {
 981 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestFinal_ex");
 982 338537df 2022-04-08 martijn 			return;
 983 338537df 2022-04-08 martijn 		}
 984 338537df 2022-04-08 martijn 		if (EVP_DigestVerifyInit(bctx, NULL, NULL, NULL, sig->p) != 1) {
 985 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerifyInit");
 986 338537df 2022-04-08 martijn 			return;
 987 338537df 2022-04-08 martijn 		}
 988 338537df 2022-04-08 martijn 		switch (EVP_DigestVerify(bctx, sig->b, sig->bsz, digest,
 989 338537df 2022-04-08 martijn 		    digestsz)) {
 990 338537df 2022-04-08 martijn 		case 1:
 991 338537df 2022-04-08 martijn 			break;
 992 338537df 2022-04-08 martijn 		case 0:
 993 338537df 2022-04-08 martijn 			dkim_signature_state(sig, DKIM_FAIL, "b mismatch");
 994 338537df 2022-04-08 martijn 			break;
 995 338537df 2022-04-08 martijn 		default:
 996 338537df 2022-04-08 martijn 			dkim_errx(msg, "EVP_DigestVerify");
 997 338537df 2022-04-08 martijn 			return;
 998 338537df 2022-04-08 martijn 		}
 999 338537df 2022-04-08 martijn 	}
1000 f1509490 2022-03-20 martijn }
1001 f1509490 2022-03-20 martijn 
1002 338537df 2022-04-08 martijn /* EVP_DigestVerifyUpdate is a macro, so we can't alias this on a variable */
1003 338537df 2022-04-08 martijn #define dkim_b_digest_update(a, b, c)					\
1004 338537df 2022-04-08 martijn 	(sig->sephash ? EVP_DigestUpdate((a), (b), (c)) :\
1005 338537df 2022-04-08 martijn 	    EVP_DigestVerifyUpdate((a), (b), (c)))
1006 338537df 2022-04-08 martijn 
1007 f1509490 2022-03-20 martijn void
1008 f1509490 2022-03-20 martijn dkim_signature_header(EVP_MD_CTX *bctx, struct signature *sig,
1009 f1509490 2022-03-20 martijn     struct header *header)
1010 f1509490 2022-03-20 martijn {
1011 4e2dd90f 2022-03-26 martijn 	char c;
1012 4e2dd90f 2022-03-26 martijn 	const char *ptr = header->buf, *end;
1013 f1509490 2022-03-20 martijn 	int inhdrname = 1;
1014 f1509490 2022-03-20 martijn 	int canon = sig->c & CANON_HEADER;
1015 f1509490 2022-03-20 martijn 
1016 f1509490 2022-03-20 martijn 	for (ptr = header->buf; ptr[0] != '\0'; ptr++) {
1017 f1509490 2022-03-20 martijn 		if (inhdrname) {
1018 f1509490 2022-03-20 martijn 			if (canon == CANON_HEADER_RELAXED) {
1019 4e2dd90f 2022-03-26 martijn 				ptr = osmtpd_ltok_skip_fws(ptr, 1);
1020 f1509490 2022-03-20 martijn 				c = tolower(ptr[0]);
1021 f1509490 2022-03-20 martijn 			} else
1022 f1509490 2022-03-20 martijn 				c = ptr[0];
1023 f1509490 2022-03-20 martijn 			if (c == ':') {
1024 f1509490 2022-03-20 martijn 				inhdrname = 0;
1025 f1509490 2022-03-20 martijn 				if (canon == CANON_HEADER_RELAXED)
1026 4e2dd90f 2022-03-26 martijn 					ptr = osmtpd_ltok_skip_fws(
1027 f1509490 2022-03-20 martijn 					    ptr + 1, 1) - 1;
1028 f1509490 2022-03-20 martijn 			}
1029 338537df 2022-04-08 martijn 			if (dkim_b_digest_update(bctx, &c, 1) == 0) {
1030 f1509490 2022-03-20 martijn 				dkim_errx(sig->header->msg,
1031 338537df 2022-04-08 martijn 				    "dkim_b_digest_update");
1032 f1509490 2022-03-20 martijn 				return;
1033 f1509490 2022-03-20 martijn 			}
1034 f1509490 2022-03-20 martijn 			continue;
1035 f1509490 2022-03-20 martijn 		}
1036 4e2dd90f 2022-03-26 martijn 		end = osmtpd_ltok_skip_fws(ptr, 1);
1037 f1509490 2022-03-20 martijn 		if (end == ptr) {
1038 f1509490 2022-03-20 martijn 			if (sig->header == header && ptr == sig->bheader) {
1039 4e2dd90f 2022-03-26 martijn 				ptr = osmtpd_ltok_skip_tag_value(
1040 f1509490 2022-03-20 martijn 				    ptr, 0) - 1;
1041 f1509490 2022-03-20 martijn 				continue;
1042 f1509490 2022-03-20 martijn 			}
1043 338537df 2022-04-08 martijn 			if (dkim_b_digest_update(bctx, ptr, 1) == 0) {
1044 f1509490 2022-03-20 martijn 				dkim_errx(sig->header->msg,
1045 338537df 2022-04-08 martijn 				    "dkim_b_digest_update");
1046 f1509490 2022-03-20 martijn 				return;
1047 f1509490 2022-03-20 martijn 			}
1048 f1509490 2022-03-20 martijn 		} else {
1049 f1509490 2022-03-20 martijn 			if (canon == CANON_HEADER_RELAXED) {
1050 f1509490 2022-03-20 martijn 				if (end[0] == '\0')
1051 f1509490 2022-03-20 martijn 					continue;
1052 338537df 2022-04-08 martijn 				if (dkim_b_digest_update(bctx, " ", 1) == 0) {
1053 f1509490 2022-03-20 martijn 					dkim_errx(sig->header->msg,
1054 338537df 2022-04-08 martijn 					    "dkim_b_digest_update");
1055 f1509490 2022-03-20 martijn 					return;
1056 f1509490 2022-03-20 martijn 				}
1057 f1509490 2022-03-20 martijn 			} else {
1058 338537df 2022-04-08 martijn 				if (dkim_b_digest_update(bctx, ptr,
1059 f1509490 2022-03-20 martijn 				    end - ptr) == 0) {
1060 f1509490 2022-03-20 martijn 					dkim_errx(sig->header->msg,
1061 338537df 2022-04-08 martijn 					    "dkim_b_digest_update");
1062 f1509490 2022-03-20 martijn 					return;
1063 f1509490 2022-03-20 martijn 				}
1064 f1509490 2022-03-20 martijn 			}
1065 28bea7cc 2022-03-21 martijn 			ptr = end - 1;
1066 f1509490 2022-03-20 martijn 		}
1067 f1509490 2022-03-20 martijn 			
1068 f1509490 2022-03-20 martijn 	}
1069 f1509490 2022-03-20 martijn 	if (sig->header != header) {
1070 338537df 2022-04-08 martijn 		if (dkim_b_digest_update(bctx, "\r\n", 2) == 0) {
1071 338537df 2022-04-08 martijn 			dkim_errx(sig->header->msg, "dkim_b_digest_update");
1072 f1509490 2022-03-20 martijn 			return;
1073 f1509490 2022-03-20 martijn 		}
1074 f1509490 2022-03-20 martijn 	}
1075 f1509490 2022-03-20 martijn }
1076 f1509490 2022-03-20 martijn 
1077 f1509490 2022-03-20 martijn void
1078 f1509490 2022-03-20 martijn dkim_signature_state(struct signature *sig, enum state state,
1079 f1509490 2022-03-20 martijn     const char *reason)
1080 f1509490 2022-03-20 martijn {
1081 f1509490 2022-03-20 martijn 	if (sig->query != NULL) {
1082 f1509490 2022-03-20 martijn 		event_asr_abort(sig->query);
1083 f1509490 2022-03-20 martijn 		sig->query = NULL;
1084 f1509490 2022-03-20 martijn 	}
1085 f1509490 2022-03-20 martijn 	switch (sig->state) {
1086 f1509490 2022-03-20 martijn 	case DKIM_UNKNOWN:
1087 f1509490 2022-03-20 martijn 		break;
1088 f1509490 2022-03-20 martijn 	case DKIM_PASS:
1089 f1509490 2022-03-20 martijn 	case DKIM_FAIL:
1090 f1509490 2022-03-20 martijn 		osmtpd_errx(1, "Unexpected transition");
1091 f1509490 2022-03-20 martijn 	case DKIM_POLICY:
1092 f1509490 2022-03-20 martijn 		if (state == DKIM_PASS)
1093 f1509490 2022-03-20 martijn 			return;
1094 f1509490 2022-03-20 martijn 		break;
1095 f1509490 2022-03-20 martijn 	case DKIM_NEUTRAL:
1096 f1509490 2022-03-20 martijn 		if (state == DKIM_PASS)
1097 f1509490 2022-03-20 martijn 			return;
1098 f1509490 2022-03-20 martijn 		if (state == DKIM_TEMPERROR || state == DKIM_PERMERROR)
1099 f1509490 2022-03-20 martijn 			break;
1100 f1509490 2022-03-20 martijn 		osmtpd_errx(1, "Unexpected transition");
1101 f1509490 2022-03-20 martijn 	case DKIM_TEMPERROR:
1102 f1509490 2022-03-20 martijn 		if (state == DKIM_PERMERROR)
1103 f1509490 2022-03-20 martijn 			break;
1104 f1509490 2022-03-20 martijn 		return;
1105 f1509490 2022-03-20 martijn 	case DKIM_PERMERROR:
1106 f1509490 2022-03-20 martijn 		return;
1107 f1509490 2022-03-20 martijn 	}
1108 f1509490 2022-03-20 martijn 	sig->state = state;
1109 f1509490 2022-03-20 martijn 	sig->state_reason = reason;
1110 f1509490 2022-03-20 martijn }
1111 f1509490 2022-03-20 martijn 
1112 f1509490 2022-03-20 martijn const char *
1113 f1509490 2022-03-20 martijn dkim_state2str(enum state state)
1114 f1509490 2022-03-20 martijn {
1115 f1509490 2022-03-20 martijn 	switch (state)
1116 f1509490 2022-03-20 martijn 	{
1117 f1509490 2022-03-20 martijn 	case DKIM_UNKNOWN:
1118 f1509490 2022-03-20 martijn 		return "unknown";
1119 f1509490 2022-03-20 martijn 	case DKIM_PASS:
1120 f1509490 2022-03-20 martijn 		return "pass";
1121 f1509490 2022-03-20 martijn 	case DKIM_FAIL:
1122 f1509490 2022-03-20 martijn 		return "fail";
1123 f1509490 2022-03-20 martijn 	case DKIM_POLICY:
1124 f1509490 2022-03-20 martijn 		return "policy";
1125 f1509490 2022-03-20 martijn 	case DKIM_NEUTRAL:
1126 f1509490 2022-03-20 martijn 		return "neutral";
1127 f1509490 2022-03-20 martijn 	case DKIM_TEMPERROR:
1128 f1509490 2022-03-20 martijn 		return "temperror";
1129 f1509490 2022-03-20 martijn 	case DKIM_PERMERROR:
1130 f1509490 2022-03-20 martijn 		return "permerror";
1131 f1509490 2022-03-20 martijn 	}
1132 f1509490 2022-03-20 martijn }
1133 f1509490 2022-03-20 martijn 
1134 f1509490 2022-03-20 martijn void
1135 f1509490 2022-03-20 martijn dkim_rr_resolve(struct asr_result *ar, void *arg)
1136 f1509490 2022-03-20 martijn {
1137 f1509490 2022-03-20 martijn 	struct signature *sig = arg;
1138 f1509490 2022-03-20 martijn 	char key[UINT16_MAX + 1];
1139 f1509490 2022-03-20 martijn 	const char *rr_txt;
1140 f1509490 2022-03-20 martijn 	size_t keylen, cstrlen;
1141 f1509490 2022-03-20 martijn 	struct unpack pack;
1142 f1509490 2022-03-20 martijn 	struct dns_header h;
1143 f1509490 2022-03-20 martijn 	struct dns_query q;
1144 f1509490 2022-03-20 martijn 	struct dns_rr rr;
1145 f1509490 2022-03-20 martijn 
1146 f1509490 2022-03-20 martijn 	sig->query = NULL;
1147 f1509490 2022-03-20 martijn 
1148 f1509490 2022-03-20 martijn 	if (ar->ar_h_errno == TRY_AGAIN || ar->ar_h_errno == NO_RECOVERY) {
1149 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_TEMPERROR,
1150 f1509490 2022-03-20 martijn 		    hstrerror(ar->ar_h_errno));
1151 1c524edb 2022-03-24 martijn 		goto verify;
1152 f1509490 2022-03-20 martijn 	}
1153 f1509490 2022-03-20 martijn 	if (ar->ar_h_errno != NETDB_SUCCESS) {
1154 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
1155 f1509490 2022-03-20 martijn 		    hstrerror(ar->ar_h_errno));
1156 1c524edb 2022-03-24 martijn 		goto verify;
1157 f1509490 2022-03-20 martijn 	}
1158 f1509490 2022-03-20 martijn 
1159 f1509490 2022-03-20 martijn 	unpack_init(&pack, ar->ar_data, ar->ar_datalen);
1160 f1509490 2022-03-20 martijn 	if (unpack_header(&pack, &h) != 0 ||
1161 f1509490 2022-03-20 martijn 	    unpack_query(&pack, &q) != 0) {
1162 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR, "Invalid dns/txt");
1163 1c524edb 2022-03-24 martijn 		goto verify;
1164 f1509490 2022-03-20 martijn 	}
1165 f1509490 2022-03-20 martijn 	for (; h.ancount > 0; h.ancount--) {
1166 f1509490 2022-03-20 martijn 		unpack_rr(&pack, &rr);
1167 f1509490 2022-03-20 martijn 		if (rr.rr_type != T_TXT)
1168 f1509490 2022-03-20 martijn 			continue;
1169 f1509490 2022-03-20 martijn 
1170 f1509490 2022-03-20 martijn 		keylen = 0;
1171 f1509490 2022-03-20 martijn 		rr_txt = rr.rr.other.rdata;
1172 f1509490 2022-03-20 martijn 		while (rr.rr.other.rdlen > 0) {
1173 f1509490 2022-03-20 martijn 			cstrlen = ((const unsigned char *)rr_txt)[0];
1174 f1509490 2022-03-20 martijn 			if (cstrlen >= rr.rr.other.rdlen ||
1175 f1509490 2022-03-20 martijn 			    keylen + cstrlen >= sizeof(key))
1176 f1509490 2022-03-20 martijn 				break;
1177 f1509490 2022-03-20 martijn 			/*
1178 f1509490 2022-03-20 martijn 			 * RFC 6376 Section 3.6.2.2
1179 f1509490 2022-03-20 martijn 			 * Strings in a TXT RR MUST be concatenated together
1180 f1509490 2022-03-20 martijn 			 * before use with no intervening whitespace.
1181 f1509490 2022-03-20 martijn 			 */
1182 f1509490 2022-03-20 martijn 			strlcpy(key + keylen, rr_txt + 1, cstrlen + 1);
1183 f1509490 2022-03-20 martijn 			rr.rr.other.rdlen -= (cstrlen + 1);
1184 f1509490 2022-03-20 martijn 			rr_txt += (cstrlen + 1);
1185 f1509490 2022-03-20 martijn 			keylen += cstrlen;
1186 f1509490 2022-03-20 martijn 		}
1187 f1509490 2022-03-20 martijn 		if (rr.rr.other.rdlen > 0)	/* Invalid TXT RDATA */
1188 f1509490 2022-03-20 martijn 			continue;
1189 f1509490 2022-03-20 martijn 
1190 f1509490 2022-03-20 martijn 		if (dkim_key_text_parse(sig, key))
1191 f1509490 2022-03-20 martijn 			break;
1192 f1509490 2022-03-20 martijn 	}
1193 f1509490 2022-03-20 martijn 
1194 f1509490 2022-03-20 martijn 	if (h.ancount == 0) {
1195 f1509490 2022-03-20 martijn 		dkim_signature_state(sig, DKIM_PERMERROR,
1196 f1509490 2022-03-20 martijn 		    "No matching key found");
1197 f1509490 2022-03-20 martijn 	} else {
1198 f1509490 2022-03-20 martijn 		/* Only verify if all headers have been read */
1199 f1509490 2022-03-20 martijn 		if (!sig->header->msg->parsing_headers)
1200 f1509490 2022-03-20 martijn 			dkim_signature_verify(sig);
1201 f1509490 2022-03-20 martijn 	}
1202 1c524edb 2022-03-24 martijn  verify:
1203 8986823b 2022-03-29 martijn 	free(ar->ar_data);
1204 f1509490 2022-03-20 martijn 	dkim_message_verify(sig->header->msg);
1205 f1509490 2022-03-20 martijn }
1206 f1509490 2022-03-20 martijn 
1207 f1509490 2022-03-20 martijn int
1208 4e2dd90f 2022-03-26 martijn dkim_key_text_parse(struct signature *sig, const char *key)
1209 f1509490 2022-03-20 martijn {
1210 4e2dd90f 2022-03-26 martijn 	char tagname, *hashname;
1211 338537df 2022-04-08 martijn 	const char *end, *tagvend, *b64;
1212 4e2dd90f 2022-03-26 martijn 	char pkraw[UINT16_MAX] = "", pkimp[UINT16_MAX];
1213 b3380529 2022-04-08 martijn 	size_t pkrawlen = 0, pkoff, linelen;
1214 b3380529 2022-04-08 martijn 	int h = 0, k = 0, n = 0, p = 0, s = 0, t = 0, first = 1;
1215 f1509490 2022-03-20 martijn 	BIO *bio;
1216 b3380529 2022-04-08 martijn #ifdef HAVE_ED25519
1217 b3380529 2022-04-08 martijn 	size_t pklen;
1218 b3380529 2022-04-08 martijn 	int tmp;
1219 b3380529 2022-04-08 martijn #endif
1220 f1509490 2022-03-20 martijn 
1221 4e2dd90f 2022-03-26 martijn 	key = osmtpd_ltok_skip_fws(key, 1);
1222 f1509490 2022-03-20 martijn 	/* Validate syntax early */
1223 4e2dd90f 2022-03-26 martijn 	if ((end = osmtpd_ltok_skip_tag_list(key, 0)) == NULL)
1224 f1509490 2022-03-20 martijn 		return 0;
1225 f1509490 2022-03-20 martijn 
1226 f1509490 2022-03-20 martijn 	while (key[0] != '\0') {
1227 4e2dd90f 2022-03-26 martijn 		key = osmtpd_ltok_skip_fws(key, 1);
1228 d842ff09 2022-03-27 martijn 		if ((end = osmtpd_ltok_skip_tag_name(key, 0)) == NULL)
1229 d842ff09 2022-03-27 martijn 			return 0;
1230 f1509490 2022-03-20 martijn 
1231 bccb8fb3 2022-03-27 martijn 		if ((size_t)(end - key) != 1)
1232 bccb8fb3 2022-03-27 martijn 			tagname = '\0';
1233 bccb8fb3 2022-03-27 martijn 		else
1234 bccb8fb3 2022-03-27 martijn 			tagname = key[0];
1235 4e2dd90f 2022-03-26 martijn 		key = osmtpd_ltok_skip_fws(end, 1);
1236 f1509490 2022-03-20 martijn 		/* '=' */
1237 7e24437d 2022-03-27 martijn 		if (key[0] != '=')
1238 d842ff09 2022-03-27 martijn 			return 0;
1239 d842ff09 2022-03-27 martijn 		key = osmtpd_ltok_skip_fws(key + 1, 1);
1240 d842ff09 2022-03-27 martijn 		if ((end = osmtpd_ltok_skip_tag_value(key, 0)) == NULL)
1241 d842ff09 2022-03-27 martijn 			return 0;
1242 f1509490 2022-03-20 martijn 		switch (tagname) {
1243 f1509490 2022-03-20 martijn 		case 'v':
1244 2b1224a8 2022-03-27 martijn 			/*
1245 2b1224a8 2022-03-27 martijn 			 * RFC 6376 section 3.6.1, v=:
1246 2b1224a8 2022-03-27 martijn 			 * RECOMMENDED...This tag MUST be the first tag in the
1247 2b1224a8 2022-03-27 martijn 			 * record.
1248 2b1224a8 2022-03-27 martijn 			 */
1249 2b1224a8 2022-03-27 martijn 			if (!first ||
1250 2b1224a8 2022-03-27 martijn 			    osmtpd_ltok_skip_key_v_tag_value(key, 0) != end)
1251 2b1224a8 2022-03-27 martijn 				return 0;
1252 6eeac6a1 2022-03-27 martijn 			key = end;
1253 2b1224a8 2022-03-27 martijn 			break;
1254 f1509490 2022-03-20 martijn 		case 'h':
1255 f1509490 2022-03-20 martijn 			if (h != 0)	/* Duplicate tag */
1256 f1509490 2022-03-20 martijn 				return 0;
1257 f1509490 2022-03-20 martijn 			/* Invalid tag value */
1258 475eae65 2022-03-27 martijn 			if (osmtpd_ltok_skip_key_h_tag_value(key, 0) != end)
1259 f1509490 2022-03-20 martijn 				return 0;
1260 f1509490 2022-03-20 martijn 			while (1) {
1261 475eae65 2022-03-27 martijn 				if ((tagvend = osmtpd_ltok_skip_key_h_tag_alg(
1262 048fb98b 2022-03-21 martijn 				    key, 0)) == NULL)
1263 f1509490 2022-03-20 martijn 					break;
1264 4e2dd90f 2022-03-26 martijn 				hashname = strndup(key, tagvend - key);
1265 4e2dd90f 2022-03-26 martijn 				if (hashname == NULL) {
1266 4e2dd90f 2022-03-26 martijn 					dkim_err(sig->header->msg, "malloc");
1267 4e2dd90f 2022-03-26 martijn 					return 0;
1268 4e2dd90f 2022-03-26 martijn 				}
1269 4e2dd90f 2022-03-26 martijn 				if (EVP_get_digestbyname(hashname) == sig->ah) {
1270 4e2dd90f 2022-03-26 martijn 					free(hashname);
1271 f1509490 2022-03-20 martijn 					h = 1;
1272 f1509490 2022-03-20 martijn 					break;
1273 f1509490 2022-03-20 martijn 				}
1274 4e2dd90f 2022-03-26 martijn 				free(hashname);
1275 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(tagvend, 1);
1276 f1509490 2022-03-20 martijn 				if (key[0] != ':')
1277 f1509490 2022-03-20 martijn 					break;
1278 4e2dd90f 2022-03-26 martijn 				key = osmtpd_ltok_skip_fws(key + 1, 1);
1279 f1509490 2022-03-20 martijn 			}
1280 f1509490 2022-03-20 martijn 			if (h != 1)
1281 f1509490 2022-03-20 martijn 				return 0;
1282 f1509490 2022-03-20 martijn 			key = end;
1283 f1509490 2022-03-20 martijn 			break;
1284 f1509490 2022-03-20 martijn 		case 'k':
1285 f1509490 2022-03-20 martijn 			if (k != 0)	/* Duplicate tag */
1286 f1509490 2022-03-20 martijn 				return 0;
1287 f1509490 2022-03-20 martijn 			k = 1;
1288 338537df 2022-04-08 martijn 			if (strncmp(key, "rsa", end - key) == 0) {
1289 338537df 2022-04-08 martijn 				if (sig->ak != EVP_PKEY_RSA)
1290 338537df 2022-04-08 martijn 					return 0;
1291 338537df 2022-04-08 martijn #if HAVE_ED25519
1292 338537df 2022-04-08 martijn 			} else if (strncmp(key, "ed25519", end - key) == 0) {
1293 338537df 2022-04-08 martijn 				if (sig->ak != EVP_PKEY_ED25519)
1294 338537df 2022-04-08 martijn 					return 0;
1295 338537df 2022-04-08 martijn #endif
1296 338537df 2022-04-08 martijn 			} else
1297 f1509490 2022-03-20 martijn 				return 0;
1298 f1509490 2022-03-20 martijn 			key = end;
1299 f1509490 2022-03-20 martijn 			break;
1300 f1509490 2022-03-20 martijn 		case 'n':
1301 f1509490 2022-03-20 martijn 			if (n != 0)	/* Duplicate tag */
1302 f1509490 2022-03-20 martijn 				return 0;
1303 f1509490 2022-03-20 martijn 			n = 1;
1304 749b2bf7 2022-03-28 martijn 			/* semicolon is part of safe-char */
1305 749b2bf7 2022-03-28 martijn 			if (osmtpd_ltok_skip_key_n_tag_value(key, 0) < end)
1306 4e2dd90f 2022-03-26 martijn 				return 0;
1307 f1509490 2022-03-20 martijn 			key = end;
1308 f1509490 2022-03-20 martijn 			break;
1309 f1509490 2022-03-20 martijn 		case 'p':
1310 62823db4 2022-04-08 martijn 			if (p != 0)	/* Duplicate tag */
1311 f1509490 2022-03-20 martijn 				return 0;
1312 62823db4 2022-04-08 martijn 			p = 1;
1313 338537df 2022-04-08 martijn 			tagvend = key;
1314 338537df 2022-04-08 martijn 			while (1) {
1315 338537df 2022-04-08 martijn 				b64 = osmtpd_ltok_skip_fws(tagvend, 1);
1316 338537df 2022-04-08 martijn 				if (osmtpd_ltok_skip_alphadigitps(
1317 338537df 2022-04-08 martijn 				    tagvend, 0) == NULL)
1318 338537df 2022-04-08 martijn 					break;
1319 338537df 2022-04-08 martijn 				pkraw[pkrawlen++] = tagvend++[0];
1320 338537df 2022-04-08 martijn 				if (pkrawlen >= sizeof(pkraw))
1321 338537df 2022-04-08 martijn 					return 0;
1322 338537df 2022-04-08 martijn 			}
1323 338537df 2022-04-08 martijn 			if (tagvend[0] == '=') {
1324 338537df 2022-04-08 martijn 				pkraw[pkrawlen++] = '=';
1325 338537df 2022-04-08 martijn 				tagvend = osmtpd_ltok_skip_fws(b64 + 1, 1);
1326 338537df 2022-04-08 martijn 				if (pkrawlen >= sizeof(pkraw))
1327 338537df 2022-04-08 martijn 					return 0;
1328 338537df 2022-04-08 martijn 				if (tagvend[0] == '=') {
1329 338537df 2022-04-08 martijn 					pkraw[pkrawlen++] = '=';
1330 338537df 2022-04-08 martijn 					tagvend++;
1331 338537df 2022-04-08 martijn 					if (pkrawlen >= sizeof(pkraw))
1332 338537df 2022-04-08 martijn 						return 0;
1333 338537df 2022-04-08 martijn 				}
1334 338537df 2022-04-08 martijn 			}
1335 f1509490 2022-03-20 martijn 			/* Invalid tag value */
1336 338537df 2022-04-08 martijn 			if (pkrawlen % 4 != 0 || tagvend != end)
1337 f1509490 2022-03-20 martijn 				return 0;
1338 f1509490 2022-03-20 martijn 			key = end;
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 338537df 2022-04-08 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 338537df 2022-04-08 martijn #endif
1449 338537df 2022-04-08 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 f1509490 2022-03-20 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 	assert(*n >= aroff);
1727 f1509490 2022-03-20 martijn 	va_start(ap, fmt);
1728 f1509490 2022-03-20 martijn 	size = vsnprintf(*ar + aroff, *n - aroff, fmt, ap);
1729 f1509490 2022-03-20 martijn 	va_end(ap);
1730 f1509490 2022-03-20 martijn 	if (size + aroff <= *n)
1731 f1509490 2022-03-20 martijn 		return (ssize_t)size + aroff;
1732 f1509490 2022-03-20 martijn 	nn = (((aroff + size)  / 256) + 1) * 256;
1733 f1509490 2022-03-20 martijn 	artmp = realloc(*ar, nn);
1734 f1509490 2022-03-20 martijn 	if (artmp == NULL)
1735 f1509490 2022-03-20 martijn 		return -1;
1736 f1509490 2022-03-20 martijn 	*ar = artmp;
1737 f1509490 2022-03-20 martijn 	*n = nn;
1738 f1509490 2022-03-20 martijn 	va_start(ap, fmt);
1739 f1509490 2022-03-20 martijn 	size = vsnprintf(*ar + aroff, *n - aroff, fmt, ap);
1740 f1509490 2022-03-20 martijn 	va_end(ap);
1741 f1509490 2022-03-20 martijn 	return (ssize_t)size + aroff;
1742 f1509490 2022-03-20 martijn }
1743 f1509490 2022-03-20 martijn 
1744 f1509490 2022-03-20 martijn void
1745 f1509490 2022-03-20 martijn dkim_err(struct message *msg, char *text)
1746 f1509490 2022-03-20 martijn {
1747 f1509490 2022-03-20 martijn 	msg->err = 1;
1748 f1509490 2022-03-20 martijn 	fprintf(stderr, "%s: %s\n", text, strerror(errno));
1749 f1509490 2022-03-20 martijn }
1750 f1509490 2022-03-20 martijn 
1751 f1509490 2022-03-20 martijn void
1752 f1509490 2022-03-20 martijn dkim_errx(struct message *msg, char *text)
1753 f1509490 2022-03-20 martijn {
1754 f1509490 2022-03-20 martijn 	msg->err = 1;
1755 f1509490 2022-03-20 martijn 	fprintf(stderr, "%s\n", text);
1756 f1509490 2022-03-20 martijn }
1757 f1509490 2022-03-20 martijn 
1758 f1509490 2022-03-20 martijn __dead void
1759 f1509490 2022-03-20 martijn usage(void)
1760 f1509490 2022-03-20 martijn {
1761 f1509490 2022-03-20 martijn 	fprintf(stderr, "usage: filter-dkimverify\n");
1762 f1509490 2022-03-20 martijn 	exit(1);
1763 f1509490 2022-03-20 martijn }