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