xref: /freebsd/contrib/bearssl/tools/ta.c (revision 2aaf9152a852aba9eb2036b95f4948ee77988826)
1*0957b409SSimon J. Gerraty /*
2*0957b409SSimon J. Gerraty  * Copyright (c) 2016 Thomas Pornin <pornin@bolet.org>
3*0957b409SSimon J. Gerraty  *
4*0957b409SSimon J. Gerraty  * Permission is hereby granted, free of charge, to any person obtaining
5*0957b409SSimon J. Gerraty  * a copy of this software and associated documentation files (the
6*0957b409SSimon J. Gerraty  * "Software"), to deal in the Software without restriction, including
7*0957b409SSimon J. Gerraty  * without limitation the rights to use, copy, modify, merge, publish,
8*0957b409SSimon J. Gerraty  * distribute, sublicense, and/or sell copies of the Software, and to
9*0957b409SSimon J. Gerraty  * permit persons to whom the Software is furnished to do so, subject to
10*0957b409SSimon J. Gerraty  * the following conditions:
11*0957b409SSimon J. Gerraty  *
12*0957b409SSimon J. Gerraty  * The above copyright notice and this permission notice shall be
13*0957b409SSimon J. Gerraty  * included in all copies or substantial portions of the Software.
14*0957b409SSimon J. Gerraty  *
15*0957b409SSimon J. Gerraty  * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
16*0957b409SSimon J. Gerraty  * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
17*0957b409SSimon J. Gerraty  * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
18*0957b409SSimon J. Gerraty  * NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS
19*0957b409SSimon J. Gerraty  * BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN
20*0957b409SSimon J. Gerraty  * ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
21*0957b409SSimon J. Gerraty  * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
22*0957b409SSimon J. Gerraty  * SOFTWARE.
23*0957b409SSimon J. Gerraty  */
24*0957b409SSimon J. Gerraty 
25*0957b409SSimon J. Gerraty #include <stdio.h>
26*0957b409SSimon J. Gerraty #include <stdlib.h>
27*0957b409SSimon J. Gerraty #include <string.h>
28*0957b409SSimon J. Gerraty #include <stdint.h>
29*0957b409SSimon J. Gerraty #include <errno.h>
30*0957b409SSimon J. Gerraty 
31*0957b409SSimon J. Gerraty #include "brssl.h"
32*0957b409SSimon J. Gerraty #include "bearssl.h"
33*0957b409SSimon J. Gerraty 
34*0957b409SSimon J. Gerraty static const char *
curve_to_sym(int curve)35*0957b409SSimon J. Gerraty curve_to_sym(int curve)
36*0957b409SSimon J. Gerraty {
37*0957b409SSimon J. Gerraty 	switch (curve) {
38*0957b409SSimon J. Gerraty 	case BR_EC_sect163k1:         return "BR_EC_sect163k1";
39*0957b409SSimon J. Gerraty 	case BR_EC_sect163r1:         return "BR_EC_sect163r1";
40*0957b409SSimon J. Gerraty 	case BR_EC_sect163r2:         return "BR_EC_sect163r2";
41*0957b409SSimon J. Gerraty 	case BR_EC_sect193r1:         return "BR_EC_sect193r1";
42*0957b409SSimon J. Gerraty 	case BR_EC_sect193r2:         return "BR_EC_sect193r2";
43*0957b409SSimon J. Gerraty 	case BR_EC_sect233k1:         return "BR_EC_sect233k1";
44*0957b409SSimon J. Gerraty 	case BR_EC_sect233r1:         return "BR_EC_sect233r1";
45*0957b409SSimon J. Gerraty 	case BR_EC_sect239k1:         return "BR_EC_sect239k1";
46*0957b409SSimon J. Gerraty 	case BR_EC_sect283k1:         return "BR_EC_sect283k1";
47*0957b409SSimon J. Gerraty 	case BR_EC_sect283r1:         return "BR_EC_sect283r1";
48*0957b409SSimon J. Gerraty 	case BR_EC_sect409k1:         return "BR_EC_sect409k1";
49*0957b409SSimon J. Gerraty 	case BR_EC_sect409r1:         return "BR_EC_sect409r1";
50*0957b409SSimon J. Gerraty 	case BR_EC_sect571k1:         return "BR_EC_sect571k1";
51*0957b409SSimon J. Gerraty 	case BR_EC_sect571r1:         return "BR_EC_sect571r1";
52*0957b409SSimon J. Gerraty 	case BR_EC_secp160k1:         return "BR_EC_secp160k1";
53*0957b409SSimon J. Gerraty 	case BR_EC_secp160r1:         return "BR_EC_secp160r1";
54*0957b409SSimon J. Gerraty 	case BR_EC_secp160r2:         return "BR_EC_secp160r2";
55*0957b409SSimon J. Gerraty 	case BR_EC_secp192k1:         return "BR_EC_secp192k1";
56*0957b409SSimon J. Gerraty 	case BR_EC_secp192r1:         return "BR_EC_secp192r1";
57*0957b409SSimon J. Gerraty 	case BR_EC_secp224k1:         return "BR_EC_secp224k1";
58*0957b409SSimon J. Gerraty 	case BR_EC_secp224r1:         return "BR_EC_secp224r1";
59*0957b409SSimon J. Gerraty 	case BR_EC_secp256k1:         return "BR_EC_secp256k1";
60*0957b409SSimon J. Gerraty 	case BR_EC_secp256r1:         return "BR_EC_secp256r1";
61*0957b409SSimon J. Gerraty 	case BR_EC_secp384r1:         return "BR_EC_secp384r1";
62*0957b409SSimon J. Gerraty 	case BR_EC_secp521r1:         return "BR_EC_secp521r1";
63*0957b409SSimon J. Gerraty 	case BR_EC_brainpoolP256r1:   return "BR_EC_brainpoolP256r1";
64*0957b409SSimon J. Gerraty 	case BR_EC_brainpoolP384r1:   return "BR_EC_brainpoolP384r1";
65*0957b409SSimon J. Gerraty 	case BR_EC_brainpoolP512r1:   return "BR_EC_brainpoolP512r1";
66*0957b409SSimon J. Gerraty 	}
67*0957b409SSimon J. Gerraty 	return NULL;
68*0957b409SSimon J. Gerraty }
69*0957b409SSimon J. Gerraty 
70*0957b409SSimon J. Gerraty static void
print_blob(const char * name,const unsigned char * buf,size_t len)71*0957b409SSimon J. Gerraty print_blob(const char *name, const unsigned char *buf, size_t len)
72*0957b409SSimon J. Gerraty {
73*0957b409SSimon J. Gerraty 	size_t u;
74*0957b409SSimon J. Gerraty 
75*0957b409SSimon J. Gerraty 	printf("\nstatic const unsigned char %s[] = {", name);
76*0957b409SSimon J. Gerraty 	for (u = 0; u < len; u ++) {
77*0957b409SSimon J. Gerraty 		if (u != 0) {
78*0957b409SSimon J. Gerraty 			printf(",");
79*0957b409SSimon J. Gerraty 		}
80*0957b409SSimon J. Gerraty 		if (u % 12 == 0) {
81*0957b409SSimon J. Gerraty 			printf("\n\t");
82*0957b409SSimon J. Gerraty 		} else {
83*0957b409SSimon J. Gerraty 			printf(" ");
84*0957b409SSimon J. Gerraty 		}
85*0957b409SSimon J. Gerraty 		printf("0x%02X", buf[u]);
86*0957b409SSimon J. Gerraty 	}
87*0957b409SSimon J. Gerraty 	printf("\n};\n");
88*0957b409SSimon J. Gerraty }
89*0957b409SSimon J. Gerraty 
90*0957b409SSimon J. Gerraty static int
print_ta_internals(br_x509_trust_anchor * ta,long ctr)91*0957b409SSimon J. Gerraty print_ta_internals(br_x509_trust_anchor *ta, long ctr)
92*0957b409SSimon J. Gerraty {
93*0957b409SSimon J. Gerraty 	char tmp[25];
94*0957b409SSimon J. Gerraty 
95*0957b409SSimon J. Gerraty 	sprintf(tmp, "TA%ld_DN", ctr);
96*0957b409SSimon J. Gerraty 	print_blob(tmp, ta->dn.data, ta->dn.len);
97*0957b409SSimon J. Gerraty 	switch (ta->pkey.key_type) {
98*0957b409SSimon J. Gerraty 	case BR_KEYTYPE_RSA:
99*0957b409SSimon J. Gerraty 		sprintf(tmp, "TA%ld_RSA_N", ctr);
100*0957b409SSimon J. Gerraty 		print_blob(tmp, ta->pkey.key.rsa.n, ta->pkey.key.rsa.nlen);
101*0957b409SSimon J. Gerraty 		sprintf(tmp, "TA%ld_RSA_E", ctr);
102*0957b409SSimon J. Gerraty 		print_blob(tmp, ta->pkey.key.rsa.e, ta->pkey.key.rsa.elen);
103*0957b409SSimon J. Gerraty 		break;
104*0957b409SSimon J. Gerraty 	case BR_KEYTYPE_EC:
105*0957b409SSimon J. Gerraty 		sprintf(tmp, "TA%ld_EC_Q", ctr);
106*0957b409SSimon J. Gerraty 		print_blob(tmp, ta->pkey.key.ec.q, ta->pkey.key.ec.qlen);
107*0957b409SSimon J. Gerraty 		break;
108*0957b409SSimon J. Gerraty 	default:
109*0957b409SSimon J. Gerraty 		fprintf(stderr, "ERROR: unknown anchor key type '%d'\n",
110*0957b409SSimon J. Gerraty 			ta->pkey.key_type);
111*0957b409SSimon J. Gerraty 		return -1;
112*0957b409SSimon J. Gerraty 	}
113*0957b409SSimon J. Gerraty 	return 0;
114*0957b409SSimon J. Gerraty }
115*0957b409SSimon J. Gerraty 
116*0957b409SSimon J. Gerraty static void
print_ta(br_x509_trust_anchor * ta,long ctr)117*0957b409SSimon J. Gerraty print_ta(br_x509_trust_anchor *ta, long ctr)
118*0957b409SSimon J. Gerraty {
119*0957b409SSimon J. Gerraty 	char tmp[25];
120*0957b409SSimon J. Gerraty 
121*0957b409SSimon J. Gerraty 	printf("\t{\n");
122*0957b409SSimon J. Gerraty 	printf("\t\t{ (unsigned char *)TA%ld_DN, sizeof TA%ld_DN },\n",
123*0957b409SSimon J. Gerraty 		ctr, ctr);
124*0957b409SSimon J. Gerraty 	printf("\t\t%s,\n", (ta->flags & BR_X509_TA_CA)
125*0957b409SSimon J. Gerraty 		? "BR_X509_TA_CA" : "0");
126*0957b409SSimon J. Gerraty 	printf("\t\t{\n");
127*0957b409SSimon J. Gerraty 	switch (ta->pkey.key_type) {
128*0957b409SSimon J. Gerraty 		const char *cname;
129*0957b409SSimon J. Gerraty 
130*0957b409SSimon J. Gerraty 	case BR_KEYTYPE_RSA:
131*0957b409SSimon J. Gerraty 		printf("\t\t\tBR_KEYTYPE_RSA,\n");
132*0957b409SSimon J. Gerraty 		printf("\t\t\t{ .rsa = {\n");
133*0957b409SSimon J. Gerraty 		printf("\t\t\t\t(unsigned char *)TA%ld_RSA_N,"
134*0957b409SSimon J. Gerraty 			" sizeof TA%ld_RSA_N,\n", ctr, ctr);
135*0957b409SSimon J. Gerraty 		printf("\t\t\t\t(unsigned char *)TA%ld_RSA_E,"
136*0957b409SSimon J. Gerraty 			" sizeof TA%ld_RSA_E,\n", ctr, ctr);
137*0957b409SSimon J. Gerraty 		printf("\t\t\t} }\n");
138*0957b409SSimon J. Gerraty 		break;
139*0957b409SSimon J. Gerraty 	case BR_KEYTYPE_EC:
140*0957b409SSimon J. Gerraty 		printf("\t\t\tBR_KEYTYPE_EC,\n");
141*0957b409SSimon J. Gerraty 		printf("\t\t\t{ .ec = {\n");
142*0957b409SSimon J. Gerraty 		cname = curve_to_sym(ta->pkey.key.ec.curve);
143*0957b409SSimon J. Gerraty 		if (cname == NULL) {
144*0957b409SSimon J. Gerraty 			sprintf(tmp, "%d", ta->pkey.key.ec.curve);
145*0957b409SSimon J. Gerraty 			cname = tmp;
146*0957b409SSimon J. Gerraty 		}
147*0957b409SSimon J. Gerraty 		printf("\t\t\t\t%s,\n", cname);
148*0957b409SSimon J. Gerraty 		printf("\t\t\t\t(unsigned char *)TA%ld_EC_Q,"
149*0957b409SSimon J. Gerraty 			" sizeof TA%ld_EC_Q,\n", ctr, ctr);
150*0957b409SSimon J. Gerraty 		printf("\t\t\t} }\n");
151*0957b409SSimon J. Gerraty 	}
152*0957b409SSimon J. Gerraty 	printf("\t\t}\n");
153*0957b409SSimon J. Gerraty 	printf("\t}");
154*0957b409SSimon J. Gerraty }
155*0957b409SSimon J. Gerraty 
156*0957b409SSimon J. Gerraty static void
usage_ta(void)157*0957b409SSimon J. Gerraty usage_ta(void)
158*0957b409SSimon J. Gerraty {
159*0957b409SSimon J. Gerraty 	fprintf(stderr,
160*0957b409SSimon J. Gerraty "usage: brssl ta [ options ] file...\n");
161*0957b409SSimon J. Gerraty 	fprintf(stderr,
162*0957b409SSimon J. Gerraty "options:\n");
163*0957b409SSimon J. Gerraty 	fprintf(stderr,
164*0957b409SSimon J. Gerraty "   -q            suppress verbose messages\n");
165*0957b409SSimon J. Gerraty }
166*0957b409SSimon J. Gerraty 
167*0957b409SSimon J. Gerraty /* see brssl.h */
168*0957b409SSimon J. Gerraty int
do_ta(int argc,char * argv[])169*0957b409SSimon J. Gerraty do_ta(int argc, char *argv[])
170*0957b409SSimon J. Gerraty {
171*0957b409SSimon J. Gerraty 	int retcode;
172*0957b409SSimon J. Gerraty 	int verbose;
173*0957b409SSimon J. Gerraty 	int i, num_files;
174*0957b409SSimon J. Gerraty 	anchor_list tas = VEC_INIT;
175*0957b409SSimon J. Gerraty 	size_t u, num;
176*0957b409SSimon J. Gerraty 
177*0957b409SSimon J. Gerraty 	retcode = 0;
178*0957b409SSimon J. Gerraty 	verbose = 1;
179*0957b409SSimon J. Gerraty 	num_files = 0;
180*0957b409SSimon J. Gerraty 	for (i = 0; i < argc; i ++) {
181*0957b409SSimon J. Gerraty 		const char *arg;
182*0957b409SSimon J. Gerraty 
183*0957b409SSimon J. Gerraty 		arg = argv[i];
184*0957b409SSimon J. Gerraty 		if (arg[0] != '-') {
185*0957b409SSimon J. Gerraty 			num_files ++;
186*0957b409SSimon J. Gerraty 			continue;
187*0957b409SSimon J. Gerraty 		}
188*0957b409SSimon J. Gerraty 		argv[i] = NULL;
189*0957b409SSimon J. Gerraty 		if (eqstr(arg, "-v") || eqstr(arg, "-verbose")) {
190*0957b409SSimon J. Gerraty 			verbose = 1;
191*0957b409SSimon J. Gerraty 		} else if (eqstr(arg, "-q") || eqstr(arg, "-quiet")) {
192*0957b409SSimon J. Gerraty 			verbose = 0;
193*0957b409SSimon J. Gerraty 		} else {
194*0957b409SSimon J. Gerraty 			fprintf(stderr, "ERROR: unknown option: '%s'\n", arg);
195*0957b409SSimon J. Gerraty 			usage_ta();
196*0957b409SSimon J. Gerraty 			goto ta_exit_error;
197*0957b409SSimon J. Gerraty 		}
198*0957b409SSimon J. Gerraty 	}
199*0957b409SSimon J. Gerraty 	if (num_files == 0) {
200*0957b409SSimon J. Gerraty 		fprintf(stderr, "ERROR: no certificate file provided\n");
201*0957b409SSimon J. Gerraty 		usage_ta();
202*0957b409SSimon J. Gerraty 		goto ta_exit_error;
203*0957b409SSimon J. Gerraty 	}
204*0957b409SSimon J. Gerraty 
205*0957b409SSimon J. Gerraty 	for (i = 0; i < argc; i ++) {
206*0957b409SSimon J. Gerraty 		const char *fname;
207*0957b409SSimon J. Gerraty 		size_t len1, len2;
208*0957b409SSimon J. Gerraty 
209*0957b409SSimon J. Gerraty 		fname = argv[i];
210*0957b409SSimon J. Gerraty 		if (fname == NULL) {
211*0957b409SSimon J. Gerraty 			continue;
212*0957b409SSimon J. Gerraty 		}
213*0957b409SSimon J. Gerraty 		if (verbose) {
214*0957b409SSimon J. Gerraty 			fprintf(stderr, "Reading file '%s': ", fname);
215*0957b409SSimon J. Gerraty 			fflush(stderr);
216*0957b409SSimon J. Gerraty 		}
217*0957b409SSimon J. Gerraty 		len1 = VEC_LEN(tas);
218*0957b409SSimon J. Gerraty 		if (read_trust_anchors(&tas, fname) == 0) {
219*0957b409SSimon J. Gerraty 			goto ta_exit_error;
220*0957b409SSimon J. Gerraty 		}
221*0957b409SSimon J. Gerraty 		len2 = VEC_LEN(tas) - len1;
222*0957b409SSimon J. Gerraty 		if (verbose) {
223*0957b409SSimon J. Gerraty 			fprintf(stderr, "%lu trust anchor%s\n",
224*0957b409SSimon J. Gerraty 				(unsigned long)len2, len2 > 1 ? "s" : "");
225*0957b409SSimon J. Gerraty 		}
226*0957b409SSimon J. Gerraty 	}
227*0957b409SSimon J. Gerraty 	num = VEC_LEN(tas);
228*0957b409SSimon J. Gerraty 	for (u = 0; u < num; u ++) {
229*0957b409SSimon J. Gerraty 		if (print_ta_internals(&VEC_ELT(tas, u), u) < 0) {
230*0957b409SSimon J. Gerraty 			goto ta_exit_error;
231*0957b409SSimon J. Gerraty 		}
232*0957b409SSimon J. Gerraty 	}
233*0957b409SSimon J. Gerraty 	printf("\nstatic const br_x509_trust_anchor TAs[%ld] = {", (long)num);
234*0957b409SSimon J. Gerraty 	for (u = 0; u < num; u ++) {
235*0957b409SSimon J. Gerraty 		if (u != 0) {
236*0957b409SSimon J. Gerraty 			printf(",");
237*0957b409SSimon J. Gerraty 		}
238*0957b409SSimon J. Gerraty 		printf("\n");
239*0957b409SSimon J. Gerraty 		print_ta(&VEC_ELT(tas, u), u);
240*0957b409SSimon J. Gerraty 	}
241*0957b409SSimon J. Gerraty 	printf("\n};\n");
242*0957b409SSimon J. Gerraty 	printf("\n#define TAs_NUM   %ld\n", (long)num);
243*0957b409SSimon J. Gerraty 
244*0957b409SSimon J. Gerraty 	/*
245*0957b409SSimon J. Gerraty 	 * Release allocated structures.
246*0957b409SSimon J. Gerraty 	 */
247*0957b409SSimon J. Gerraty ta_exit:
248*0957b409SSimon J. Gerraty 	VEC_CLEAREXT(tas, free_ta_contents);
249*0957b409SSimon J. Gerraty 	return retcode;
250*0957b409SSimon J. Gerraty 
251*0957b409SSimon J. Gerraty ta_exit_error:
252*0957b409SSimon J. Gerraty 	retcode = -1;
253*0957b409SSimon J. Gerraty 	goto ta_exit;
254*0957b409SSimon J. Gerraty }
255