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