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 "inner.h"
26*0957b409SSimon J. Gerraty
27*0957b409SSimon J. Gerraty static int
se_choose(const br_ssl_server_policy_class ** pctx,const br_ssl_server_context * cc,br_ssl_server_choices * choices)28*0957b409SSimon J. Gerraty se_choose(const br_ssl_server_policy_class **pctx,
29*0957b409SSimon J. Gerraty const br_ssl_server_context *cc,
30*0957b409SSimon J. Gerraty br_ssl_server_choices *choices)
31*0957b409SSimon J. Gerraty {
32*0957b409SSimon J. Gerraty br_ssl_server_policy_ec_context *pc;
33*0957b409SSimon J. Gerraty const br_suite_translated *st;
34*0957b409SSimon J. Gerraty size_t u, st_num;
35*0957b409SSimon J. Gerraty unsigned hash_id;
36*0957b409SSimon J. Gerraty
37*0957b409SSimon J. Gerraty pc = (br_ssl_server_policy_ec_context *)pctx;
38*0957b409SSimon J. Gerraty st = br_ssl_server_get_client_suites(cc, &st_num);
39*0957b409SSimon J. Gerraty hash_id = br_ssl_choose_hash(br_ssl_server_get_client_hashes(cc) >> 8);
40*0957b409SSimon J. Gerraty if (cc->eng.session.version < BR_TLS12) {
41*0957b409SSimon J. Gerraty hash_id = br_sha1_ID;
42*0957b409SSimon J. Gerraty }
43*0957b409SSimon J. Gerraty choices->chain = pc->chain;
44*0957b409SSimon J. Gerraty choices->chain_len = pc->chain_len;
45*0957b409SSimon J. Gerraty for (u = 0; u < st_num; u ++) {
46*0957b409SSimon J. Gerraty unsigned tt;
47*0957b409SSimon J. Gerraty
48*0957b409SSimon J. Gerraty tt = st[u][1];
49*0957b409SSimon J. Gerraty switch (tt >> 12) {
50*0957b409SSimon J. Gerraty case BR_SSLKEYX_ECDH_RSA:
51*0957b409SSimon J. Gerraty if ((pc->allowed_usages & BR_KEYTYPE_KEYX) != 0
52*0957b409SSimon J. Gerraty && pc->cert_issuer_key_type == BR_KEYTYPE_RSA)
53*0957b409SSimon J. Gerraty {
54*0957b409SSimon J. Gerraty choices->cipher_suite = st[u][0];
55*0957b409SSimon J. Gerraty return 1;
56*0957b409SSimon J. Gerraty }
57*0957b409SSimon J. Gerraty break;
58*0957b409SSimon J. Gerraty case BR_SSLKEYX_ECDH_ECDSA:
59*0957b409SSimon J. Gerraty if ((pc->allowed_usages & BR_KEYTYPE_KEYX) != 0
60*0957b409SSimon J. Gerraty && pc->cert_issuer_key_type == BR_KEYTYPE_EC)
61*0957b409SSimon J. Gerraty {
62*0957b409SSimon J. Gerraty choices->cipher_suite = st[u][0];
63*0957b409SSimon J. Gerraty return 1;
64*0957b409SSimon J. Gerraty }
65*0957b409SSimon J. Gerraty break;
66*0957b409SSimon J. Gerraty case BR_SSLKEYX_ECDHE_ECDSA:
67*0957b409SSimon J. Gerraty if ((pc->allowed_usages & BR_KEYTYPE_SIGN) != 0
68*0957b409SSimon J. Gerraty && hash_id != 0)
69*0957b409SSimon J. Gerraty {
70*0957b409SSimon J. Gerraty choices->cipher_suite = st[u][0];
71*0957b409SSimon J. Gerraty choices->algo_id = hash_id + 0xFF00;
72*0957b409SSimon J. Gerraty return 1;
73*0957b409SSimon J. Gerraty }
74*0957b409SSimon J. Gerraty break;
75*0957b409SSimon J. Gerraty }
76*0957b409SSimon J. Gerraty }
77*0957b409SSimon J. Gerraty return 0;
78*0957b409SSimon J. Gerraty }
79*0957b409SSimon J. Gerraty
80*0957b409SSimon J. Gerraty static uint32_t
se_do_keyx(const br_ssl_server_policy_class ** pctx,unsigned char * data,size_t * len)81*0957b409SSimon J. Gerraty se_do_keyx(const br_ssl_server_policy_class **pctx,
82*0957b409SSimon J. Gerraty unsigned char *data, size_t *len)
83*0957b409SSimon J. Gerraty {
84*0957b409SSimon J. Gerraty br_ssl_server_policy_ec_context *pc;
85*0957b409SSimon J. Gerraty uint32_t r;
86*0957b409SSimon J. Gerraty size_t xoff, xlen;
87*0957b409SSimon J. Gerraty
88*0957b409SSimon J. Gerraty pc = (br_ssl_server_policy_ec_context *)pctx;
89*0957b409SSimon J. Gerraty r = pc->iec->mul(data, *len, pc->sk->x, pc->sk->xlen, pc->sk->curve);
90*0957b409SSimon J. Gerraty xoff = pc->iec->xoff(pc->sk->curve, &xlen);
91*0957b409SSimon J. Gerraty memmove(data, data + xoff, xlen);
92*0957b409SSimon J. Gerraty *len = xlen;
93*0957b409SSimon J. Gerraty return r;
94*0957b409SSimon J. Gerraty }
95*0957b409SSimon J. Gerraty
96*0957b409SSimon J. Gerraty static size_t
se_do_sign(const br_ssl_server_policy_class ** pctx,unsigned algo_id,unsigned char * data,size_t hv_len,size_t len)97*0957b409SSimon J. Gerraty se_do_sign(const br_ssl_server_policy_class **pctx,
98*0957b409SSimon J. Gerraty unsigned algo_id, unsigned char *data, size_t hv_len, size_t len)
99*0957b409SSimon J. Gerraty {
100*0957b409SSimon J. Gerraty br_ssl_server_policy_ec_context *pc;
101*0957b409SSimon J. Gerraty unsigned char hv[64];
102*0957b409SSimon J. Gerraty const br_hash_class *hc;
103*0957b409SSimon J. Gerraty
104*0957b409SSimon J. Gerraty algo_id &= 0xFF;
105*0957b409SSimon J. Gerraty pc = (br_ssl_server_policy_ec_context *)pctx;
106*0957b409SSimon J. Gerraty hc = br_multihash_getimpl(pc->mhash, algo_id);
107*0957b409SSimon J. Gerraty if (hc == NULL) {
108*0957b409SSimon J. Gerraty return 0;
109*0957b409SSimon J. Gerraty }
110*0957b409SSimon J. Gerraty memcpy(hv, data, hv_len);
111*0957b409SSimon J. Gerraty if (len < 139) {
112*0957b409SSimon J. Gerraty return 0;
113*0957b409SSimon J. Gerraty }
114*0957b409SSimon J. Gerraty return pc->iecdsa(pc->iec, hc, hv, pc->sk, data);
115*0957b409SSimon J. Gerraty }
116*0957b409SSimon J. Gerraty
117*0957b409SSimon J. Gerraty static const br_ssl_server_policy_class se_policy_vtable = {
118*0957b409SSimon J. Gerraty sizeof(br_ssl_server_policy_ec_context),
119*0957b409SSimon J. Gerraty se_choose,
120*0957b409SSimon J. Gerraty se_do_keyx,
121*0957b409SSimon J. Gerraty se_do_sign
122*0957b409SSimon J. Gerraty };
123*0957b409SSimon J. Gerraty
124*0957b409SSimon J. Gerraty /* see bearssl_ssl.h */
125*0957b409SSimon J. Gerraty void
br_ssl_server_set_single_ec(br_ssl_server_context * cc,const br_x509_certificate * chain,size_t chain_len,const br_ec_private_key * sk,unsigned allowed_usages,unsigned cert_issuer_key_type,const br_ec_impl * iec,br_ecdsa_sign iecdsa)126*0957b409SSimon J. Gerraty br_ssl_server_set_single_ec(br_ssl_server_context *cc,
127*0957b409SSimon J. Gerraty const br_x509_certificate *chain, size_t chain_len,
128*0957b409SSimon J. Gerraty const br_ec_private_key *sk, unsigned allowed_usages,
129*0957b409SSimon J. Gerraty unsigned cert_issuer_key_type,
130*0957b409SSimon J. Gerraty const br_ec_impl *iec, br_ecdsa_sign iecdsa)
131*0957b409SSimon J. Gerraty {
132*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.vtable = &se_policy_vtable;
133*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.chain = chain;
134*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.chain_len = chain_len;
135*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.sk = sk;
136*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.allowed_usages = allowed_usages;
137*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.cert_issuer_key_type = cert_issuer_key_type;
138*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.mhash = &cc->eng.mhash;
139*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.iec = iec;
140*0957b409SSimon J. Gerraty cc->chain_handler.single_ec.iecdsa = iecdsa;
141*0957b409SSimon J. Gerraty cc->policy_vtable = &cc->chain_handler.single_ec.vtable;
142*0957b409SSimon J. Gerraty }
143