2 * WPA Supplicant / SSL/TLS interface functions for openssl
3 * Copyright (c) 2004-2008, Jouni Malinen <j@w1.fi>
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License version 2 as
7 * published by the Free Software Foundation.
9 * Alternatively, this software may be distributed under the terms of BSD
12 * See README and COPYING for more details.
17 #ifndef CONFIG_SMARTCARD
18 #ifndef OPENSSL_NO_ENGINE
19 #define OPENSSL_NO_ENGINE
23 #include <openssl/ssl.h>
24 #include <openssl/err.h>
25 #include <openssl/pkcs12.h>
26 #include <openssl/x509v3.h>
27 #ifndef OPENSSL_NO_ENGINE
28 #include <openssl/engine.h>
29 #endif /* OPENSSL_NO_ENGINE */
34 #if OPENSSL_VERSION_NUMBER >= 0x0090800fL
35 #define OPENSSL_d2i_TYPE const unsigned char **
37 #define OPENSSL_d2i_TYPE unsigned char **
40 #ifdef SSL_F_SSL_SET_SESSION_TICKET_EXT
41 #ifdef SSL_OP_NO_TICKET
43 * Session ticket override patch was merged into OpenSSL 0.9.9 tree on
44 * 2008-11-15. This version uses a bit different API compared to the old patch.
46 #define CONFIG_OPENSSL_TICKET_OVERRIDE
50 static int tls_openssl_ref_count
= 0;
52 struct tls_connection
{
54 BIO
*ssl_in
, *ssl_out
;
55 #ifndef OPENSSL_NO_ENGINE
56 ENGINE
*engine
; /* functional reference to the engine */
57 EVP_PKEY
*private_key
; /* the private key if using engine */
58 #endif /* OPENSSL_NO_ENGINE */
59 char *subject_match
, *altsubject_match
;
60 int read_alerts
, write_alerts
, failed
;
62 tls_session_ticket_cb session_ticket_cb
;
63 void *session_ticket_cb_ctx
;
65 /* SessionTicket received from OpenSSL hello_extension_cb (server) */
67 size_t session_ticket_len
;
71 #ifdef CONFIG_NO_STDOUT_DEBUG
73 static void _tls_show_errors(void)
77 while ((err
= ERR_get_error())) {
78 /* Just ignore the errors, since stdout is disabled */
81 #define tls_show_errors(l, f, t) _tls_show_errors()
83 #else /* CONFIG_NO_STDOUT_DEBUG */
85 static void tls_show_errors(int level
, const char *func
, const char *txt
)
89 wpa_printf(level
, "OpenSSL: %s - %s %s",
90 func
, txt
, ERR_error_string(ERR_get_error(), NULL
));
92 while ((err
= ERR_get_error())) {
93 wpa_printf(MSG_INFO
, "OpenSSL: pending error: %s",
94 ERR_error_string(err
, NULL
));
98 #endif /* CONFIG_NO_STDOUT_DEBUG */
101 #ifdef CONFIG_NATIVE_WINDOWS
103 /* Windows CryptoAPI and access to certificate stores */
104 #include <wincrypt.h>
106 #ifdef __MINGW32_VERSION
108 * MinGW does not yet include all the needed definitions for CryptoAPI, so
109 * define here whatever extra is needed.
111 #define CERT_SYSTEM_STORE_CURRENT_USER (1 << 16)
112 #define CERT_STORE_READONLY_FLAG 0x00008000
113 #define CERT_STORE_OPEN_EXISTING_FLAG 0x00004000
115 #endif /* __MINGW32_VERSION */
118 struct cryptoapi_rsa_data
{
119 const CERT_CONTEXT
*cert
;
120 HCRYPTPROV crypt_prov
;
122 BOOL free_crypt_prov
;
126 static void cryptoapi_error(const char *msg
)
128 wpa_printf(MSG_INFO
, "CryptoAPI: %s; err=%u",
129 msg
, (unsigned int) GetLastError());
133 static int cryptoapi_rsa_pub_enc(int flen
, const unsigned char *from
,
134 unsigned char *to
, RSA
*rsa
, int padding
)
136 wpa_printf(MSG_DEBUG
, "%s - not implemented", __func__
);
141 static int cryptoapi_rsa_pub_dec(int flen
, const unsigned char *from
,
142 unsigned char *to
, RSA
*rsa
, int padding
)
144 wpa_printf(MSG_DEBUG
, "%s - not implemented", __func__
);
149 static int cryptoapi_rsa_priv_enc(int flen
, const unsigned char *from
,
150 unsigned char *to
, RSA
*rsa
, int padding
)
152 struct cryptoapi_rsa_data
*priv
=
153 (struct cryptoapi_rsa_data
*) rsa
->meth
->app_data
;
155 DWORD hash_size
, len
, i
;
156 unsigned char *buf
= NULL
;
160 RSAerr(RSA_F_RSA_EAY_PRIVATE_ENCRYPT
,
161 ERR_R_PASSED_NULL_PARAMETER
);
165 if (padding
!= RSA_PKCS1_PADDING
) {
166 RSAerr(RSA_F_RSA_EAY_PRIVATE_ENCRYPT
,
167 RSA_R_UNKNOWN_PADDING_TYPE
);
171 if (flen
!= 16 /* MD5 */ + 20 /* SHA-1 */) {
172 wpa_printf(MSG_INFO
, "%s - only MD5-SHA1 hash supported",
174 RSAerr(RSA_F_RSA_EAY_PRIVATE_ENCRYPT
,
175 RSA_R_INVALID_MESSAGE_LENGTH
);
179 if (!CryptCreateHash(priv
->crypt_prov
, CALG_SSL3_SHAMD5
, 0, 0, &hash
))
181 cryptoapi_error("CryptCreateHash failed");
185 len
= sizeof(hash_size
);
186 if (!CryptGetHashParam(hash
, HP_HASHSIZE
, (BYTE
*) &hash_size
, &len
,
188 cryptoapi_error("CryptGetHashParam failed");
192 if ((int) hash_size
!= flen
) {
193 wpa_printf(MSG_INFO
, "CryptoAPI: Invalid hash size (%u != %d)",
194 (unsigned) hash_size
, flen
);
195 RSAerr(RSA_F_RSA_EAY_PRIVATE_ENCRYPT
,
196 RSA_R_INVALID_MESSAGE_LENGTH
);
199 if (!CryptSetHashParam(hash
, HP_HASHVAL
, (BYTE
* ) from
, 0)) {
200 cryptoapi_error("CryptSetHashParam failed");
205 buf
= os_malloc(len
);
207 RSAerr(RSA_F_RSA_EAY_PRIVATE_ENCRYPT
, ERR_R_MALLOC_FAILURE
);
211 if (!CryptSignHash(hash
, priv
->key_spec
, NULL
, 0, buf
, &len
)) {
212 cryptoapi_error("CryptSignHash failed");
216 for (i
= 0; i
< len
; i
++)
217 to
[i
] = buf
[len
- i
- 1];
222 CryptDestroyHash(hash
);
228 static int cryptoapi_rsa_priv_dec(int flen
, const unsigned char *from
,
229 unsigned char *to
, RSA
*rsa
, int padding
)
231 wpa_printf(MSG_DEBUG
, "%s - not implemented", __func__
);
236 static void cryptoapi_free_data(struct cryptoapi_rsa_data
*priv
)
240 if (priv
->crypt_prov
&& priv
->free_crypt_prov
)
241 CryptReleaseContext(priv
->crypt_prov
, 0);
243 CertFreeCertificateContext(priv
->cert
);
248 static int cryptoapi_finish(RSA
*rsa
)
250 cryptoapi_free_data((struct cryptoapi_rsa_data
*) rsa
->meth
->app_data
);
251 os_free((void *) rsa
->meth
);
257 static const CERT_CONTEXT
* cryptoapi_find_cert(const char *name
, DWORD store
)
260 const CERT_CONTEXT
*ret
= NULL
;
262 cs
= CertOpenStore((LPCSTR
) CERT_STORE_PROV_SYSTEM
, 0, 0,
263 store
| CERT_STORE_OPEN_EXISTING_FLAG
|
264 CERT_STORE_READONLY_FLAG
, L
"MY");
266 cryptoapi_error("Failed to open 'My system store'");
270 if (strncmp(name
, "cert://", 7) == 0) {
271 unsigned short wbuf
[255];
272 MultiByteToWideChar(CP_ACP
, 0, name
+ 7, -1, wbuf
, 255);
273 ret
= CertFindCertificateInStore(cs
, X509_ASN_ENCODING
|
275 0, CERT_FIND_SUBJECT_STR
,
277 } else if (strncmp(name
, "hash://", 7) == 0) {
278 CRYPT_HASH_BLOB blob
;
280 const char *hash
= name
+ 7;
283 len
= os_strlen(hash
) / 2;
284 buf
= os_malloc(len
);
285 if (buf
&& hexstr2bin(hash
, buf
, len
) == 0) {
288 ret
= CertFindCertificateInStore(cs
,
297 CertCloseStore(cs
, 0);
303 static int tls_cryptoapi_cert(SSL
*ssl
, const char *name
)
306 RSA
*rsa
= NULL
, *pub_rsa
;
307 struct cryptoapi_rsa_data
*priv
;
308 RSA_METHOD
*rsa_meth
;
311 (strncmp(name
, "cert://", 7) != 0 &&
312 strncmp(name
, "hash://", 7) != 0))
315 priv
= os_zalloc(sizeof(*priv
));
316 rsa_meth
= os_zalloc(sizeof(*rsa_meth
));
317 if (priv
== NULL
|| rsa_meth
== NULL
) {
318 wpa_printf(MSG_WARNING
, "CryptoAPI: Failed to allocate memory "
319 "for CryptoAPI RSA method");
325 priv
->cert
= cryptoapi_find_cert(name
, CERT_SYSTEM_STORE_CURRENT_USER
);
326 if (priv
->cert
== NULL
) {
327 priv
->cert
= cryptoapi_find_cert(
328 name
, CERT_SYSTEM_STORE_LOCAL_MACHINE
);
330 if (priv
->cert
== NULL
) {
331 wpa_printf(MSG_INFO
, "CryptoAPI: Could not find certificate "
336 cert
= d2i_X509(NULL
, (OPENSSL_d2i_TYPE
) &priv
->cert
->pbCertEncoded
,
337 priv
->cert
->cbCertEncoded
);
339 wpa_printf(MSG_INFO
, "CryptoAPI: Could not process X509 DER "
344 if (!CryptAcquireCertificatePrivateKey(priv
->cert
,
345 CRYPT_ACQUIRE_COMPARE_KEY_FLAG
,
346 NULL
, &priv
->crypt_prov
,
348 &priv
->free_crypt_prov
)) {
349 cryptoapi_error("Failed to acquire a private key for the "
354 rsa_meth
->name
= "Microsoft CryptoAPI RSA Method";
355 rsa_meth
->rsa_pub_enc
= cryptoapi_rsa_pub_enc
;
356 rsa_meth
->rsa_pub_dec
= cryptoapi_rsa_pub_dec
;
357 rsa_meth
->rsa_priv_enc
= cryptoapi_rsa_priv_enc
;
358 rsa_meth
->rsa_priv_dec
= cryptoapi_rsa_priv_dec
;
359 rsa_meth
->finish
= cryptoapi_finish
;
360 rsa_meth
->flags
= RSA_METHOD_FLAG_NO_CHECK
;
361 rsa_meth
->app_data
= (char *) priv
;
365 SSLerr(SSL_F_SSL_CTX_USE_CERTIFICATE_FILE
,
366 ERR_R_MALLOC_FAILURE
);
370 if (!SSL_use_certificate(ssl
, cert
)) {
375 pub_rsa
= cert
->cert_info
->key
->pkey
->pkey
.rsa
;
379 rsa
->n
= BN_dup(pub_rsa
->n
);
380 rsa
->e
= BN_dup(pub_rsa
->e
);
381 if (!RSA_set_method(rsa
, rsa_meth
))
384 if (!SSL_use_RSAPrivateKey(ssl
, rsa
))
397 cryptoapi_free_data(priv
);
403 static int tls_cryptoapi_ca_cert(SSL_CTX
*ssl_ctx
, SSL
*ssl
, const char *name
)
406 PCCERT_CONTEXT ctx
= NULL
;
414 if (name
== NULL
|| strncmp(name
, "cert_store://", 13) != 0)
419 wstore
= os_malloc((os_strlen(store
) + 1) * sizeof(WCHAR
));
422 wsprintf(wstore
, L
"%S", store
);
423 cs
= CertOpenSystemStore(0, wstore
);
426 cs
= CertOpenSystemStore(0, store
);
429 wpa_printf(MSG_DEBUG
, "%s: failed to open system cert store "
430 "'%s': error=%d", __func__
, store
,
431 (int) GetLastError());
435 while ((ctx
= CertEnumCertificatesInStore(cs
, ctx
))) {
436 cert
= d2i_X509(NULL
, (OPENSSL_d2i_TYPE
) &ctx
->pbCertEncoded
,
439 wpa_printf(MSG_INFO
, "CryptoAPI: Could not process "
440 "X509 DER encoding for CA cert");
444 X509_NAME_oneline(X509_get_subject_name(cert
), buf
,
446 wpa_printf(MSG_DEBUG
, "OpenSSL: Loaded CA certificate for "
447 "system certificate store: subject='%s'", buf
);
449 if (!X509_STORE_add_cert(ssl_ctx
->cert_store
, cert
)) {
450 tls_show_errors(MSG_WARNING
, __func__
,
451 "Failed to add ca_cert to OpenSSL "
452 "certificate store");
458 if (!CertCloseStore(cs
, 0)) {
459 wpa_printf(MSG_DEBUG
, "%s: failed to close system cert store "
460 "'%s': error=%d", __func__
, name
+ 13,
461 (int) GetLastError());
468 #else /* CONFIG_NATIVE_WINDOWS */
470 static int tls_cryptoapi_cert(SSL
*ssl
, const char *name
)
475 #endif /* CONFIG_NATIVE_WINDOWS */
478 static void ssl_info_cb(const SSL
*ssl
, int where
, int ret
)
483 wpa_printf(MSG_DEBUG
, "SSL: (where=0x%x ret=0x%x)", where
, ret
);
484 w
= where
& ~SSL_ST_MASK
;
485 if (w
& SSL_ST_CONNECT
)
487 else if (w
& SSL_ST_ACCEPT
)
492 if (where
& SSL_CB_LOOP
) {
493 wpa_printf(MSG_DEBUG
, "SSL: %s:%s",
494 str
, SSL_state_string_long(ssl
));
495 } else if (where
& SSL_CB_ALERT
) {
496 wpa_printf(MSG_INFO
, "SSL: SSL3 alert: %s:%s:%s",
497 where
& SSL_CB_READ
?
498 "read (remote end reported an error)" :
499 "write (local SSL3 detected an error)",
500 SSL_alert_type_string_long(ret
),
501 SSL_alert_desc_string_long(ret
));
502 if ((ret
>> 8) == SSL3_AL_FATAL
) {
503 struct tls_connection
*conn
=
504 SSL_get_app_data((SSL
*) ssl
);
505 if (where
& SSL_CB_READ
)
508 conn
->write_alerts
++;
510 } else if (where
& SSL_CB_EXIT
&& ret
<= 0) {
511 wpa_printf(MSG_DEBUG
, "SSL: %s:%s in %s",
512 str
, ret
== 0 ? "failed" : "error",
513 SSL_state_string_long(ssl
));
518 #ifndef OPENSSL_NO_ENGINE
520 * tls_engine_load_dynamic_generic - load any openssl engine
521 * @pre: an array of commands and values that load an engine initialized
522 * in the engine specific function
523 * @post: an array of commands and values that initialize an already loaded
524 * engine (or %NULL if not required)
525 * @id: the engine id of the engine to load (only required if post is not %NULL
527 * This function is a generic function that loads any openssl engine.
529 * Returns: 0 on success, -1 on failure
531 static int tls_engine_load_dynamic_generic(const char *pre
[],
532 const char *post
[], const char *id
)
535 const char *dynamic_id
= "dynamic";
537 engine
= ENGINE_by_id(id
);
540 wpa_printf(MSG_DEBUG
, "ENGINE: engine '%s' is already "
546 engine
= ENGINE_by_id(dynamic_id
);
547 if (engine
== NULL
) {
548 wpa_printf(MSG_INFO
, "ENGINE: Can't find engine %s [%s]",
550 ERR_error_string(ERR_get_error(), NULL
));
554 /* Perform the pre commands. This will load the engine. */
555 while (pre
&& pre
[0]) {
556 wpa_printf(MSG_DEBUG
, "ENGINE: '%s' '%s'", pre
[0], pre
[1]);
557 if (ENGINE_ctrl_cmd_string(engine
, pre
[0], pre
[1], 0) == 0) {
558 wpa_printf(MSG_INFO
, "ENGINE: ctrl cmd_string failed: "
559 "%s %s [%s]", pre
[0], pre
[1],
560 ERR_error_string(ERR_get_error(), NULL
));
568 * Free the reference to the "dynamic" engine. The loaded engine can
569 * now be looked up using ENGINE_by_id().
573 engine
= ENGINE_by_id(id
);
574 if (engine
== NULL
) {
575 wpa_printf(MSG_INFO
, "ENGINE: Can't find engine %s [%s]",
576 id
, ERR_error_string(ERR_get_error(), NULL
));
580 while (post
&& post
[0]) {
581 wpa_printf(MSG_DEBUG
, "ENGINE: '%s' '%s'", post
[0], post
[1]);
582 if (ENGINE_ctrl_cmd_string(engine
, post
[0], post
[1], 0) == 0) {
583 wpa_printf(MSG_DEBUG
, "ENGINE: ctrl cmd_string failed:"
584 " %s %s [%s]", post
[0], post
[1],
585 ERR_error_string(ERR_get_error(), NULL
));
586 ENGINE_remove(engine
);
599 * tls_engine_load_dynamic_pkcs11 - load the pkcs11 engine provided by opensc
600 * @pkcs11_so_path: pksc11_so_path from the configuration
601 * @pcks11_module_path: pkcs11_module_path from the configuration
603 static int tls_engine_load_dynamic_pkcs11(const char *pkcs11_so_path
,
604 const char *pkcs11_module_path
)
606 char *engine_id
= "pkcs11";
607 const char *pre_cmd
[] = {
608 "SO_PATH", NULL
/* pkcs11_so_path */,
609 "ID", NULL
/* engine_id */,
611 /* "NO_VCHECK", "1", */
615 const char *post_cmd
[] = {
616 "MODULE_PATH", NULL
/* pkcs11_module_path */,
620 if (!pkcs11_so_path
|| !pkcs11_module_path
)
623 pre_cmd
[1] = pkcs11_so_path
;
624 pre_cmd
[3] = engine_id
;
625 post_cmd
[1] = pkcs11_module_path
;
627 wpa_printf(MSG_DEBUG
, "ENGINE: Loading pkcs11 Engine from %s",
630 return tls_engine_load_dynamic_generic(pre_cmd
, post_cmd
, engine_id
);
635 * tls_engine_load_dynamic_opensc - load the opensc engine provided by opensc
636 * @opensc_so_path: opensc_so_path from the configuration
638 static int tls_engine_load_dynamic_opensc(const char *opensc_so_path
)
640 char *engine_id
= "opensc";
641 const char *pre_cmd
[] = {
642 "SO_PATH", NULL
/* opensc_so_path */,
643 "ID", NULL
/* engine_id */,
652 pre_cmd
[1] = opensc_so_path
;
653 pre_cmd
[3] = engine_id
;
655 wpa_printf(MSG_DEBUG
, "ENGINE: Loading OpenSC Engine from %s",
658 return tls_engine_load_dynamic_generic(pre_cmd
, NULL
, engine_id
);
660 #endif /* OPENSSL_NO_ENGINE */
663 void * tls_init(const struct tls_config
*conf
)
667 if (tls_openssl_ref_count
== 0) {
668 SSL_load_error_strings();
670 #ifndef OPENSSL_NO_SHA256
671 EVP_add_digest(EVP_sha256());
672 #endif /* OPENSSL_NO_SHA256 */
673 /* TODO: if /dev/urandom is available, PRNG is seeded
674 * automatically. If this is not the case, random data should
678 #ifndef OPENSSL_NO_RC2
680 * 40-bit RC2 is commonly used in PKCS#12 files, so enable it.
681 * This is enabled by PKCS12_PBE_add() in OpenSSL 0.9.8
682 * versions, but it looks like OpenSSL 1.0.0 does not do that
685 EVP_add_cipher(EVP_rc2_40_cbc());
686 #endif /* OPENSSL_NO_RC2 */
688 #endif /* PKCS12_FUNCS */
690 tls_openssl_ref_count
++;
692 ssl
= SSL_CTX_new(TLSv1_method());
696 SSL_CTX_set_info_callback(ssl
, ssl_info_cb
);
698 #ifndef OPENSSL_NO_ENGINE
700 (conf
->opensc_engine_path
|| conf
->pkcs11_engine_path
||
701 conf
->pkcs11_module_path
)) {
702 wpa_printf(MSG_DEBUG
, "ENGINE: Loading dynamic engine");
703 ERR_load_ENGINE_strings();
704 ENGINE_load_dynamic();
706 if (tls_engine_load_dynamic_opensc(conf
->opensc_engine_path
) ||
707 tls_engine_load_dynamic_pkcs11(conf
->pkcs11_engine_path
,
708 conf
->pkcs11_module_path
)) {
713 #endif /* OPENSSL_NO_ENGINE */
719 void tls_deinit(void *ssl_ctx
)
721 SSL_CTX
*ssl
= ssl_ctx
;
724 tls_openssl_ref_count
--;
725 if (tls_openssl_ref_count
== 0) {
726 #ifndef OPENSSL_NO_ENGINE
728 #endif /* OPENSSL_NO_ENGINE */
729 CRYPTO_cleanup_all_ex_data();
737 static int tls_engine_init(struct tls_connection
*conn
, const char *engine_id
,
738 const char *pin
, const char *key_id
,
739 const char *cert_id
, const char *ca_cert_id
)
741 #ifndef OPENSSL_NO_ENGINE
743 if (engine_id
== NULL
) {
744 wpa_printf(MSG_ERROR
, "ENGINE: Engine ID not set");
748 wpa_printf(MSG_ERROR
, "ENGINE: Smartcard PIN not set");
751 if (key_id
== NULL
) {
752 wpa_printf(MSG_ERROR
, "ENGINE: Key Id not set");
757 conn
->engine
= ENGINE_by_id(engine_id
);
759 wpa_printf(MSG_ERROR
, "ENGINE: engine %s not available [%s]",
760 engine_id
, ERR_error_string(ERR_get_error(), NULL
));
763 if (ENGINE_init(conn
->engine
) != 1) {
764 wpa_printf(MSG_ERROR
, "ENGINE: engine init failed "
765 "(engine: %s) [%s]", engine_id
,
766 ERR_error_string(ERR_get_error(), NULL
));
769 wpa_printf(MSG_DEBUG
, "ENGINE: engine initialized");
771 if (ENGINE_ctrl_cmd_string(conn
->engine
, "PIN", pin
, 0) == 0) {
772 wpa_printf(MSG_ERROR
, "ENGINE: cannot set pin [%s]",
773 ERR_error_string(ERR_get_error(), NULL
));
776 /* load private key first in-case PIN is required for cert */
777 conn
->private_key
= ENGINE_load_private_key(conn
->engine
,
779 if (!conn
->private_key
) {
780 wpa_printf(MSG_ERROR
, "ENGINE: cannot load private key with id"
781 " '%s' [%s]", key_id
,
782 ERR_error_string(ERR_get_error(), NULL
));
783 ret
= TLS_SET_PARAMS_ENGINE_PRV_INIT_FAILED
;
787 /* handle a certificate and/or CA certificate */
788 if (cert_id
|| ca_cert_id
) {
789 const char *cmd_name
= "LOAD_CERT_CTRL";
791 /* test if the engine supports a LOAD_CERT_CTRL */
792 if (!ENGINE_ctrl(conn
->engine
, ENGINE_CTRL_GET_CMD_FROM_NAME
,
793 0, (void *)cmd_name
, NULL
)) {
794 wpa_printf(MSG_ERROR
, "ENGINE: engine does not support"
795 " loading certificates");
796 ret
= TLS_SET_PARAMS_ENGINE_PRV_INIT_FAILED
;
805 ENGINE_free(conn
->engine
);
809 if (conn
->private_key
) {
810 EVP_PKEY_free(conn
->private_key
);
811 conn
->private_key
= NULL
;
815 #else /* OPENSSL_NO_ENGINE */
817 #endif /* OPENSSL_NO_ENGINE */
821 static void tls_engine_deinit(struct tls_connection
*conn
)
823 #ifndef OPENSSL_NO_ENGINE
824 wpa_printf(MSG_DEBUG
, "ENGINE: engine deinit");
825 if (conn
->private_key
) {
826 EVP_PKEY_free(conn
->private_key
);
827 conn
->private_key
= NULL
;
830 ENGINE_finish(conn
->engine
);
833 #endif /* OPENSSL_NO_ENGINE */
837 int tls_get_errors(void *ssl_ctx
)
842 while ((err
= ERR_get_error())) {
843 wpa_printf(MSG_INFO
, "TLS - SSL error: %s",
844 ERR_error_string(err
, NULL
));
851 struct tls_connection
* tls_connection_init(void *ssl_ctx
)
853 SSL_CTX
*ssl
= ssl_ctx
;
854 struct tls_connection
*conn
;
857 conn
= os_zalloc(sizeof(*conn
));
860 conn
->ssl
= SSL_new(ssl
);
861 if (conn
->ssl
== NULL
) {
862 tls_show_errors(MSG_INFO
, __func__
,
863 "Failed to initialize new SSL connection");
868 SSL_set_app_data(conn
->ssl
, conn
);
869 options
= SSL_OP_NO_SSLv2
| SSL_OP_NO_SSLv3
|
870 SSL_OP_SINGLE_DH_USE
;
871 #ifdef SSL_OP_NO_COMPRESSION
872 options
|= SSL_OP_NO_COMPRESSION
;
873 #endif /* SSL_OP_NO_COMPRESSION */
874 SSL_set_options(conn
->ssl
, options
);
876 conn
->ssl_in
= BIO_new(BIO_s_mem());
878 tls_show_errors(MSG_INFO
, __func__
,
879 "Failed to create a new BIO for ssl_in");
885 conn
->ssl_out
= BIO_new(BIO_s_mem());
886 if (!conn
->ssl_out
) {
887 tls_show_errors(MSG_INFO
, __func__
,
888 "Failed to create a new BIO for ssl_out");
890 BIO_free(conn
->ssl_in
);
895 SSL_set_bio(conn
->ssl
, conn
->ssl_in
, conn
->ssl_out
);
901 void tls_connection_deinit(void *ssl_ctx
, struct tls_connection
*conn
)
906 tls_engine_deinit(conn
);
907 os_free(conn
->subject_match
);
908 os_free(conn
->altsubject_match
);
909 os_free(conn
->session_ticket
);
914 int tls_connection_established(void *ssl_ctx
, struct tls_connection
*conn
)
916 return conn
? SSL_is_init_finished(conn
->ssl
) : 0;
920 int tls_connection_shutdown(void *ssl_ctx
, struct tls_connection
*conn
)
925 /* Shutdown previous TLS connection without notifying the peer
926 * because the connection was already terminated in practice
927 * and "close notify" shutdown alert would confuse AS. */
928 SSL_set_quiet_shutdown(conn
->ssl
, 1);
929 SSL_shutdown(conn
->ssl
);
934 static int tls_match_altsubject_component(X509
*cert
, int type
,
935 const char *value
, size_t len
)
941 ext
= X509_get_ext_d2i(cert
, NID_subject_alt_name
, NULL
, NULL
);
943 for (i
= 0; ext
&& i
< sk_GENERAL_NAME_num(ext
); i
++) {
944 gen
= sk_GENERAL_NAME_value(ext
, i
);
945 if (gen
->type
!= type
)
947 if (os_strlen((char *) gen
->d
.ia5
->data
) == len
&&
948 os_memcmp(value
, gen
->d
.ia5
->data
, len
) == 0)
956 static int tls_match_altsubject(X509
*cert
, const char *match
)
959 const char *pos
, *end
;
964 if (os_strncmp(pos
, "EMAIL:", 6) == 0) {
967 } else if (os_strncmp(pos
, "DNS:", 4) == 0) {
970 } else if (os_strncmp(pos
, "URI:", 4) == 0) {
974 wpa_printf(MSG_INFO
, "TLS: Invalid altSubjectName "
978 end
= os_strchr(pos
, ';');
980 if (os_strncmp(end
+ 1, "EMAIL:", 6) == 0 ||
981 os_strncmp(end
+ 1, "DNS:", 4) == 0 ||
982 os_strncmp(end
+ 1, "URI:", 4) == 0)
984 end
= os_strchr(end
+ 1, ';');
989 len
= os_strlen(pos
);
990 if (tls_match_altsubject_component(cert
, type
, pos
, len
) > 0)
999 static int tls_verify_cb(int preverify_ok
, X509_STORE_CTX
*x509_ctx
)
1005 struct tls_connection
*conn
;
1006 char *match
, *altmatch
;
1008 err_cert
= X509_STORE_CTX_get_current_cert(x509_ctx
);
1009 err
= X509_STORE_CTX_get_error(x509_ctx
);
1010 depth
= X509_STORE_CTX_get_error_depth(x509_ctx
);
1011 ssl
= X509_STORE_CTX_get_ex_data(x509_ctx
,
1012 SSL_get_ex_data_X509_STORE_CTX_idx());
1013 X509_NAME_oneline(X509_get_subject_name(err_cert
), buf
, sizeof(buf
));
1015 conn
= SSL_get_app_data(ssl
);
1016 match
= conn
? conn
->subject_match
: NULL
;
1017 altmatch
= conn
? conn
->altsubject_match
: NULL
;
1019 if (!preverify_ok
) {
1020 wpa_printf(MSG_WARNING
, "TLS: Certificate verification failed,"
1021 " error %d (%s) depth %d for '%s'", err
,
1022 X509_verify_cert_error_string(err
), depth
, buf
);
1024 wpa_printf(MSG_DEBUG
, "TLS: tls_verify_cb - "
1025 "preverify_ok=%d err=%d (%s) depth=%d buf='%s'",
1027 X509_verify_cert_error_string(err
), depth
, buf
);
1028 if (depth
== 0 && match
&& os_strstr(buf
, match
) == NULL
) {
1029 wpa_printf(MSG_WARNING
, "TLS: Subject '%s' did not "
1030 "match with '%s'", buf
, match
);
1032 } else if (depth
== 0 && altmatch
&&
1033 !tls_match_altsubject(err_cert
, altmatch
)) {
1034 wpa_printf(MSG_WARNING
, "TLS: altSubjectName match "
1035 "'%s' not found", altmatch
);
1040 return preverify_ok
;
1044 #ifndef OPENSSL_NO_STDIO
1045 static int tls_load_ca_der(void *_ssl_ctx
, const char *ca_cert
)
1047 SSL_CTX
*ssl_ctx
= _ssl_ctx
;
1048 X509_LOOKUP
*lookup
;
1051 lookup
= X509_STORE_add_lookup(ssl_ctx
->cert_store
,
1052 X509_LOOKUP_file());
1053 if (lookup
== NULL
) {
1054 tls_show_errors(MSG_WARNING
, __func__
,
1055 "Failed add lookup for X509 store");
1059 if (!X509_LOOKUP_load_file(lookup
, ca_cert
, X509_FILETYPE_ASN1
)) {
1060 unsigned long err
= ERR_peek_error();
1061 tls_show_errors(MSG_WARNING
, __func__
,
1062 "Failed load CA in DER format");
1063 if (ERR_GET_LIB(err
) == ERR_LIB_X509
&&
1064 ERR_GET_REASON(err
) == X509_R_CERT_ALREADY_IN_HASH_TABLE
) {
1065 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - ignoring "
1066 "cert already in hash table error",
1074 #endif /* OPENSSL_NO_STDIO */
1077 static int tls_connection_ca_cert(void *_ssl_ctx
, struct tls_connection
*conn
,
1078 const char *ca_cert
, const u8
*ca_cert_blob
,
1079 size_t ca_cert_blob_len
, const char *ca_path
)
1081 SSL_CTX
*ssl_ctx
= _ssl_ctx
;
1084 * Remove previously configured trusted CA certificates before adding
1087 X509_STORE_free(ssl_ctx
->cert_store
);
1088 ssl_ctx
->cert_store
= X509_STORE_new();
1089 if (ssl_ctx
->cert_store
== NULL
) {
1090 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - failed to allocate new "
1091 "certificate store", __func__
);
1096 X509
*cert
= d2i_X509(NULL
, (OPENSSL_d2i_TYPE
) &ca_cert_blob
,
1099 tls_show_errors(MSG_WARNING
, __func__
,
1100 "Failed to parse ca_cert_blob");
1104 if (!X509_STORE_add_cert(ssl_ctx
->cert_store
, cert
)) {
1105 unsigned long err
= ERR_peek_error();
1106 tls_show_errors(MSG_WARNING
, __func__
,
1107 "Failed to add ca_cert_blob to "
1108 "certificate store");
1109 if (ERR_GET_LIB(err
) == ERR_LIB_X509
&&
1110 ERR_GET_REASON(err
) ==
1111 X509_R_CERT_ALREADY_IN_HASH_TABLE
) {
1112 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - ignoring "
1113 "cert already in hash table error",
1121 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - added ca_cert_blob "
1122 "to certificate store", __func__
);
1123 SSL_set_verify(conn
->ssl
, SSL_VERIFY_PEER
, tls_verify_cb
);
1127 #ifdef CONFIG_NATIVE_WINDOWS
1128 if (ca_cert
&& tls_cryptoapi_ca_cert(ssl_ctx
, conn
->ssl
, ca_cert
) ==
1130 wpa_printf(MSG_DEBUG
, "OpenSSL: Added CA certificates from "
1131 "system certificate store");
1132 SSL_set_verify(conn
->ssl
, SSL_VERIFY_PEER
, tls_verify_cb
);
1135 #endif /* CONFIG_NATIVE_WINDOWS */
1137 if (ca_cert
|| ca_path
) {
1138 #ifndef OPENSSL_NO_STDIO
1139 if (SSL_CTX_load_verify_locations(ssl_ctx
, ca_cert
, ca_path
) !=
1141 tls_show_errors(MSG_WARNING
, __func__
,
1142 "Failed to load root certificates");
1144 tls_load_ca_der(ssl_ctx
, ca_cert
) == 0) {
1145 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - loaded "
1146 "DER format CA certificate",
1151 wpa_printf(MSG_DEBUG
, "TLS: Trusted root "
1152 "certificate(s) loaded");
1153 tls_get_errors(ssl_ctx
);
1155 SSL_set_verify(conn
->ssl
, SSL_VERIFY_PEER
, tls_verify_cb
);
1156 #else /* OPENSSL_NO_STDIO */
1157 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - OPENSSL_NO_STDIO",
1160 #endif /* OPENSSL_NO_STDIO */
1162 /* No ca_cert configured - do not try to verify server
1164 SSL_set_verify(conn
->ssl
, SSL_VERIFY_NONE
, NULL
);
1171 static int tls_global_ca_cert(SSL_CTX
*ssl_ctx
, const char *ca_cert
)
1174 if (SSL_CTX_load_verify_locations(ssl_ctx
, ca_cert
, NULL
) != 1)
1176 tls_show_errors(MSG_WARNING
, __func__
,
1177 "Failed to load root certificates");
1181 wpa_printf(MSG_DEBUG
, "TLS: Trusted root "
1182 "certificate(s) loaded");
1184 #ifndef OPENSSL_NO_STDIO
1185 /* Add the same CAs to the client certificate requests */
1186 SSL_CTX_set_client_CA_list(ssl_ctx
,
1187 SSL_load_client_CA_file(ca_cert
));
1188 #endif /* OPENSSL_NO_STDIO */
1195 int tls_global_set_verify(void *ssl_ctx
, int check_crl
)
1200 X509_STORE
*cs
= SSL_CTX_get_cert_store(ssl_ctx
);
1202 tls_show_errors(MSG_INFO
, __func__
, "Failed to get "
1203 "certificate store when enabling "
1207 flags
= X509_V_FLAG_CRL_CHECK
;
1209 flags
|= X509_V_FLAG_CRL_CHECK_ALL
;
1210 X509_STORE_set_flags(cs
, flags
);
1216 static int tls_connection_set_subject_match(struct tls_connection
*conn
,
1217 const char *subject_match
,
1218 const char *altsubject_match
)
1220 os_free(conn
->subject_match
);
1221 conn
->subject_match
= NULL
;
1222 if (subject_match
) {
1223 conn
->subject_match
= os_strdup(subject_match
);
1224 if (conn
->subject_match
== NULL
)
1228 os_free(conn
->altsubject_match
);
1229 conn
->altsubject_match
= NULL
;
1230 if (altsubject_match
) {
1231 conn
->altsubject_match
= os_strdup(altsubject_match
);
1232 if (conn
->altsubject_match
== NULL
)
1240 int tls_connection_set_verify(void *ssl_ctx
, struct tls_connection
*conn
,
1243 static int counter
= 0;
1249 SSL_set_verify(conn
->ssl
, SSL_VERIFY_PEER
|
1250 SSL_VERIFY_FAIL_IF_NO_PEER_CERT
|
1251 SSL_VERIFY_CLIENT_ONCE
, tls_verify_cb
);
1253 SSL_set_verify(conn
->ssl
, SSL_VERIFY_NONE
, NULL
);
1256 SSL_set_accept_state(conn
->ssl
);
1259 * Set session id context in order to avoid fatal errors when client
1260 * tries to resume a session. However, set the context to a unique
1261 * value in order to effectively disable session resumption for now
1262 * since not all areas of the server code are ready for it (e.g.,
1263 * EAP-TTLS needs special handling for Phase 2 after abbreviated TLS
1267 SSL_set_session_id_context(conn
->ssl
,
1268 (const unsigned char *) &counter
,
1275 static int tls_connection_client_cert(struct tls_connection
*conn
,
1276 const char *client_cert
,
1277 const u8
*client_cert_blob
,
1278 size_t client_cert_blob_len
)
1280 if (client_cert
== NULL
&& client_cert_blob
== NULL
)
1283 if (client_cert_blob
&&
1284 SSL_use_certificate_ASN1(conn
->ssl
, (u8
*) client_cert_blob
,
1285 client_cert_blob_len
) == 1) {
1286 wpa_printf(MSG_DEBUG
, "OpenSSL: SSL_use_certificate_ASN1 --> "
1289 } else if (client_cert_blob
) {
1290 tls_show_errors(MSG_DEBUG
, __func__
,
1291 "SSL_use_certificate_ASN1 failed");
1294 if (client_cert
== NULL
)
1297 #ifndef OPENSSL_NO_STDIO
1298 if (SSL_use_certificate_file(conn
->ssl
, client_cert
,
1299 SSL_FILETYPE_ASN1
) == 1) {
1300 wpa_printf(MSG_DEBUG
, "OpenSSL: SSL_use_certificate_file (DER)"
1304 tls_show_errors(MSG_DEBUG
, __func__
,
1305 "SSL_use_certificate_file (DER) failed");
1308 if (SSL_use_certificate_file(conn
->ssl
, client_cert
,
1309 SSL_FILETYPE_PEM
) == 1) {
1310 wpa_printf(MSG_DEBUG
, "OpenSSL: SSL_use_certificate_file (PEM)"
1314 tls_show_errors(MSG_DEBUG
, __func__
,
1315 "SSL_use_certificate_file (PEM) failed");
1317 #else /* OPENSSL_NO_STDIO */
1318 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - OPENSSL_NO_STDIO", __func__
);
1319 #endif /* OPENSSL_NO_STDIO */
1325 static int tls_global_client_cert(SSL_CTX
*ssl_ctx
, const char *client_cert
)
1327 #ifndef OPENSSL_NO_STDIO
1328 if (client_cert
== NULL
)
1331 if (SSL_CTX_use_certificate_file(ssl_ctx
, client_cert
,
1332 SSL_FILETYPE_ASN1
) != 1 &&
1333 SSL_CTX_use_certificate_file(ssl_ctx
, client_cert
,
1334 SSL_FILETYPE_PEM
) != 1) {
1335 tls_show_errors(MSG_INFO
, __func__
,
1336 "Failed to load client certificate");
1340 #else /* OPENSSL_NO_STDIO */
1341 if (client_cert
== NULL
)
1343 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - OPENSSL_NO_STDIO", __func__
);
1345 #endif /* OPENSSL_NO_STDIO */
1349 static int tls_passwd_cb(char *buf
, int size
, int rwflag
, void *password
)
1351 if (password
== NULL
) {
1354 os_strlcpy(buf
, (char *) password
, size
);
1355 return os_strlen(buf
);
1360 static int tls_parse_pkcs12(SSL_CTX
*ssl_ctx
, SSL
*ssl
, PKCS12
*p12
,
1365 STACK_OF(X509
) *certs
;
1372 if (!PKCS12_parse(p12
, passwd
, &pkey
, &cert
, &certs
)) {
1373 tls_show_errors(MSG_DEBUG
, __func__
,
1374 "Failed to parse PKCS12 file");
1378 wpa_printf(MSG_DEBUG
, "TLS: Successfully parsed PKCS12 data");
1381 X509_NAME_oneline(X509_get_subject_name(cert
), buf
,
1383 wpa_printf(MSG_DEBUG
, "TLS: Got certificate from PKCS12: "
1384 "subject='%s'", buf
);
1386 if (SSL_use_certificate(ssl
, cert
) != 1)
1389 if (SSL_CTX_use_certificate(ssl_ctx
, cert
) != 1)
1396 wpa_printf(MSG_DEBUG
, "TLS: Got private key from PKCS12");
1398 if (SSL_use_PrivateKey(ssl
, pkey
) != 1)
1401 if (SSL_CTX_use_PrivateKey(ssl_ctx
, pkey
) != 1)
1404 EVP_PKEY_free(pkey
);
1408 while ((cert
= sk_X509_pop(certs
)) != NULL
) {
1409 X509_NAME_oneline(X509_get_subject_name(cert
), buf
,
1411 wpa_printf(MSG_DEBUG
, "TLS: additional certificate"
1412 " from PKCS12: subject='%s'", buf
);
1414 * There is no SSL equivalent for the chain cert - so
1415 * always add it to the context...
1417 if (SSL_CTX_add_extra_chain_cert(ssl_ctx
, cert
) != 1) {
1422 sk_X509_free(certs
);
1428 tls_get_errors(ssl_ctx
);
1432 #endif /* PKCS12_FUNCS */
1435 static int tls_read_pkcs12(SSL_CTX
*ssl_ctx
, SSL
*ssl
, const char *private_key
,
1442 f
= fopen(private_key
, "rb");
1446 p12
= d2i_PKCS12_fp(f
, NULL
);
1450 tls_show_errors(MSG_INFO
, __func__
,
1451 "Failed to use PKCS#12 file");
1455 return tls_parse_pkcs12(ssl_ctx
, ssl
, p12
, passwd
);
1457 #else /* PKCS12_FUNCS */
1458 wpa_printf(MSG_INFO
, "TLS: PKCS12 support disabled - cannot read "
1461 #endif /* PKCS12_FUNCS */
1465 static int tls_read_pkcs12_blob(SSL_CTX
*ssl_ctx
, SSL
*ssl
,
1466 const u8
*blob
, size_t len
, const char *passwd
)
1471 p12
= d2i_PKCS12(NULL
, (OPENSSL_d2i_TYPE
) &blob
, len
);
1473 tls_show_errors(MSG_INFO
, __func__
,
1474 "Failed to use PKCS#12 blob");
1478 return tls_parse_pkcs12(ssl_ctx
, ssl
, p12
, passwd
);
1480 #else /* PKCS12_FUNCS */
1481 wpa_printf(MSG_INFO
, "TLS: PKCS12 support disabled - cannot parse "
1484 #endif /* PKCS12_FUNCS */
1488 #ifndef OPENSSL_NO_ENGINE
1489 static int tls_engine_get_cert(struct tls_connection
*conn
,
1490 const char *cert_id
,
1493 /* this runs after the private key is loaded so no PIN is required */
1495 const char *cert_id
;
1498 params
.cert_id
= cert_id
;
1501 if (!ENGINE_ctrl_cmd(conn
->engine
, "LOAD_CERT_CTRL",
1502 0, ¶ms
, NULL
, 1)) {
1503 wpa_printf(MSG_ERROR
, "ENGINE: cannot load client cert with id"
1504 " '%s' [%s]", cert_id
,
1505 ERR_error_string(ERR_get_error(), NULL
));
1506 return TLS_SET_PARAMS_ENGINE_PRV_INIT_FAILED
;
1509 wpa_printf(MSG_ERROR
, "ENGINE: did not properly cert with id"
1511 return TLS_SET_PARAMS_ENGINE_PRV_INIT_FAILED
;
1513 *cert
= params
.cert
;
1516 #endif /* OPENSSL_NO_ENGINE */
1519 static int tls_connection_engine_client_cert(struct tls_connection
*conn
,
1520 const char *cert_id
)
1522 #ifndef OPENSSL_NO_ENGINE
1525 if (tls_engine_get_cert(conn
, cert_id
, &cert
))
1528 if (!SSL_use_certificate(conn
->ssl
, cert
)) {
1529 tls_show_errors(MSG_ERROR
, __func__
,
1530 "SSL_use_certificate failed");
1535 wpa_printf(MSG_DEBUG
, "ENGINE: SSL_use_certificate --> "
1539 #else /* OPENSSL_NO_ENGINE */
1541 #endif /* OPENSSL_NO_ENGINE */
1545 static int tls_connection_engine_ca_cert(void *_ssl_ctx
,
1546 struct tls_connection
*conn
,
1547 const char *ca_cert_id
)
1549 #ifndef OPENSSL_NO_ENGINE
1551 SSL_CTX
*ssl_ctx
= _ssl_ctx
;
1553 if (tls_engine_get_cert(conn
, ca_cert_id
, &cert
))
1556 /* start off the same as tls_connection_ca_cert */
1557 X509_STORE_free(ssl_ctx
->cert_store
);
1558 ssl_ctx
->cert_store
= X509_STORE_new();
1559 if (ssl_ctx
->cert_store
== NULL
) {
1560 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - failed to allocate new "
1561 "certificate store", __func__
);
1565 if (!X509_STORE_add_cert(ssl_ctx
->cert_store
, cert
)) {
1566 unsigned long err
= ERR_peek_error();
1567 tls_show_errors(MSG_WARNING
, __func__
,
1568 "Failed to add CA certificate from engine "
1569 "to certificate store");
1570 if (ERR_GET_LIB(err
) == ERR_LIB_X509
&&
1571 ERR_GET_REASON(err
) == X509_R_CERT_ALREADY_IN_HASH_TABLE
) {
1572 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - ignoring cert"
1573 " already in hash table error",
1581 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - added CA certificate from engine "
1582 "to certificate store", __func__
);
1583 SSL_set_verify(conn
->ssl
, SSL_VERIFY_PEER
, tls_verify_cb
);
1586 #else /* OPENSSL_NO_ENGINE */
1588 #endif /* OPENSSL_NO_ENGINE */
1592 static int tls_connection_engine_private_key(struct tls_connection
*conn
)
1594 #ifndef OPENSSL_NO_ENGINE
1595 if (SSL_use_PrivateKey(conn
->ssl
, conn
->private_key
) != 1) {
1596 tls_show_errors(MSG_ERROR
, __func__
,
1597 "ENGINE: cannot use private key for TLS");
1600 if (!SSL_check_private_key(conn
->ssl
)) {
1601 tls_show_errors(MSG_INFO
, __func__
,
1602 "Private key failed verification");
1606 #else /* OPENSSL_NO_ENGINE */
1607 wpa_printf(MSG_ERROR
, "SSL: Configuration uses engine, but "
1608 "engine support was not compiled in");
1610 #endif /* OPENSSL_NO_ENGINE */
1614 static int tls_connection_private_key(void *_ssl_ctx
,
1615 struct tls_connection
*conn
,
1616 const char *private_key
,
1617 const char *private_key_passwd
,
1618 const u8
*private_key_blob
,
1619 size_t private_key_blob_len
)
1621 SSL_CTX
*ssl_ctx
= _ssl_ctx
;
1625 if (private_key
== NULL
&& private_key_blob
== NULL
)
1628 if (private_key_passwd
) {
1629 passwd
= os_strdup(private_key_passwd
);
1635 SSL_CTX_set_default_passwd_cb(ssl_ctx
, tls_passwd_cb
);
1636 SSL_CTX_set_default_passwd_cb_userdata(ssl_ctx
, passwd
);
1639 while (private_key_blob
) {
1640 if (SSL_use_PrivateKey_ASN1(EVP_PKEY_RSA
, conn
->ssl
,
1641 (u8
*) private_key_blob
,
1642 private_key_blob_len
) == 1) {
1643 wpa_printf(MSG_DEBUG
, "OpenSSL: SSL_use_PrivateKey_"
1644 "ASN1(EVP_PKEY_RSA) --> OK");
1648 tls_show_errors(MSG_DEBUG
, __func__
,
1649 "SSL_use_PrivateKey_ASN1(EVP_PKEY_RSA)"
1653 if (SSL_use_PrivateKey_ASN1(EVP_PKEY_DSA
, conn
->ssl
,
1654 (u8
*) private_key_blob
,
1655 private_key_blob_len
) == 1) {
1656 wpa_printf(MSG_DEBUG
, "OpenSSL: SSL_use_PrivateKey_"
1657 "ASN1(EVP_PKEY_DSA) --> OK");
1661 tls_show_errors(MSG_DEBUG
, __func__
,
1662 "SSL_use_PrivateKey_ASN1(EVP_PKEY_DSA)"
1666 if (SSL_use_RSAPrivateKey_ASN1(conn
->ssl
,
1667 (u8
*) private_key_blob
,
1668 private_key_blob_len
) == 1) {
1669 wpa_printf(MSG_DEBUG
, "OpenSSL: "
1670 "SSL_use_RSAPrivateKey_ASN1 --> OK");
1674 tls_show_errors(MSG_DEBUG
, __func__
,
1675 "SSL_use_RSAPrivateKey_ASN1 failed");
1678 if (tls_read_pkcs12_blob(ssl_ctx
, conn
->ssl
, private_key_blob
,
1679 private_key_blob_len
, passwd
) == 0) {
1680 wpa_printf(MSG_DEBUG
, "OpenSSL: PKCS#12 as blob --> "
1689 while (!ok
&& private_key
) {
1690 #ifndef OPENSSL_NO_STDIO
1691 if (SSL_use_PrivateKey_file(conn
->ssl
, private_key
,
1692 SSL_FILETYPE_ASN1
) == 1) {
1693 wpa_printf(MSG_DEBUG
, "OpenSSL: "
1694 "SSL_use_PrivateKey_File (DER) --> OK");
1698 tls_show_errors(MSG_DEBUG
, __func__
,
1699 "SSL_use_PrivateKey_File (DER) "
1703 if (SSL_use_PrivateKey_file(conn
->ssl
, private_key
,
1704 SSL_FILETYPE_PEM
) == 1) {
1705 wpa_printf(MSG_DEBUG
, "OpenSSL: "
1706 "SSL_use_PrivateKey_File (PEM) --> OK");
1710 tls_show_errors(MSG_DEBUG
, __func__
,
1711 "SSL_use_PrivateKey_File (PEM) "
1714 #else /* OPENSSL_NO_STDIO */
1715 wpa_printf(MSG_DEBUG
, "OpenSSL: %s - OPENSSL_NO_STDIO",
1717 #endif /* OPENSSL_NO_STDIO */
1719 if (tls_read_pkcs12(ssl_ctx
, conn
->ssl
, private_key
, passwd
)
1721 wpa_printf(MSG_DEBUG
, "OpenSSL: Reading PKCS#12 file "
1727 if (tls_cryptoapi_cert(conn
->ssl
, private_key
) == 0) {
1728 wpa_printf(MSG_DEBUG
, "OpenSSL: Using CryptoAPI to "
1729 "access certificate store --> OK");
1738 wpa_printf(MSG_INFO
, "OpenSSL: Failed to load private key");
1744 SSL_CTX_set_default_passwd_cb(ssl_ctx
, NULL
);
1747 if (!SSL_check_private_key(conn
->ssl
)) {
1748 tls_show_errors(MSG_INFO
, __func__
, "Private key failed "
1753 wpa_printf(MSG_DEBUG
, "SSL: Private key loaded successfully");
1758 static int tls_global_private_key(SSL_CTX
*ssl_ctx
, const char *private_key
,
1759 const char *private_key_passwd
)
1763 if (private_key
== NULL
)
1766 if (private_key_passwd
) {
1767 passwd
= os_strdup(private_key_passwd
);
1773 SSL_CTX_set_default_passwd_cb(ssl_ctx
, tls_passwd_cb
);
1774 SSL_CTX_set_default_passwd_cb_userdata(ssl_ctx
, passwd
);
1776 #ifndef OPENSSL_NO_STDIO
1777 SSL_CTX_use_PrivateKey_file(ssl_ctx
, private_key
,
1778 SSL_FILETYPE_ASN1
) != 1 &&
1779 SSL_CTX_use_PrivateKey_file(ssl_ctx
, private_key
,
1780 SSL_FILETYPE_PEM
) != 1 &&
1781 #endif /* OPENSSL_NO_STDIO */
1782 tls_read_pkcs12(ssl_ctx
, NULL
, private_key
, passwd
)) {
1783 tls_show_errors(MSG_INFO
, __func__
,
1784 "Failed to load private key");
1791 SSL_CTX_set_default_passwd_cb(ssl_ctx
, NULL
);
1793 if (!SSL_CTX_check_private_key(ssl_ctx
)) {
1794 tls_show_errors(MSG_INFO
, __func__
,
1795 "Private key failed verification");
1803 static int tls_connection_dh(struct tls_connection
*conn
, const char *dh_file
)
1805 #ifdef OPENSSL_NO_DH
1806 if (dh_file
== NULL
)
1808 wpa_printf(MSG_ERROR
, "TLS: openssl does not include DH support, but "
1809 "dh_file specified");
1811 #else /* OPENSSL_NO_DH */
1815 /* TODO: add support for dh_blob */
1816 if (dh_file
== NULL
)
1821 bio
= BIO_new_file(dh_file
, "r");
1823 wpa_printf(MSG_INFO
, "TLS: Failed to open DH file '%s': %s",
1824 dh_file
, ERR_error_string(ERR_get_error(), NULL
));
1827 dh
= PEM_read_bio_DHparams(bio
, NULL
, NULL
, NULL
);
1829 #ifndef OPENSSL_NO_DSA
1830 while (dh
== NULL
) {
1832 wpa_printf(MSG_DEBUG
, "TLS: Failed to parse DH file '%s': %s -"
1833 " trying to parse as DSA params", dh_file
,
1834 ERR_error_string(ERR_get_error(), NULL
));
1835 bio
= BIO_new_file(dh_file
, "r");
1838 dsa
= PEM_read_bio_DSAparams(bio
, NULL
, NULL
, NULL
);
1841 wpa_printf(MSG_DEBUG
, "TLS: Failed to parse DSA file "
1842 "'%s': %s", dh_file
,
1843 ERR_error_string(ERR_get_error(), NULL
));
1847 wpa_printf(MSG_DEBUG
, "TLS: DH file in DSA param format");
1848 dh
= DSA_dup_DH(dsa
);
1851 wpa_printf(MSG_INFO
, "TLS: Failed to convert DSA "
1852 "params into DH params");
1857 #endif /* !OPENSSL_NO_DSA */
1859 wpa_printf(MSG_INFO
, "TLS: Failed to read/parse DH/DSA file "
1864 if (SSL_set_tmp_dh(conn
->ssl
, dh
) != 1) {
1865 wpa_printf(MSG_INFO
, "TLS: Failed to set DH params from '%s': "
1867 ERR_error_string(ERR_get_error(), NULL
));
1873 #endif /* OPENSSL_NO_DH */
1877 static int tls_global_dh(SSL_CTX
*ssl_ctx
, const char *dh_file
)
1879 #ifdef OPENSSL_NO_DH
1880 if (dh_file
== NULL
)
1882 wpa_printf(MSG_ERROR
, "TLS: openssl does not include DH support, but "
1883 "dh_file specified");
1885 #else /* OPENSSL_NO_DH */
1889 /* TODO: add support for dh_blob */
1890 if (dh_file
== NULL
)
1892 if (ssl_ctx
== NULL
)
1895 bio
= BIO_new_file(dh_file
, "r");
1897 wpa_printf(MSG_INFO
, "TLS: Failed to open DH file '%s': %s",
1898 dh_file
, ERR_error_string(ERR_get_error(), NULL
));
1901 dh
= PEM_read_bio_DHparams(bio
, NULL
, NULL
, NULL
);
1903 #ifndef OPENSSL_NO_DSA
1904 while (dh
== NULL
) {
1906 wpa_printf(MSG_DEBUG
, "TLS: Failed to parse DH file '%s': %s -"
1907 " trying to parse as DSA params", dh_file
,
1908 ERR_error_string(ERR_get_error(), NULL
));
1909 bio
= BIO_new_file(dh_file
, "r");
1912 dsa
= PEM_read_bio_DSAparams(bio
, NULL
, NULL
, NULL
);
1915 wpa_printf(MSG_DEBUG
, "TLS: Failed to parse DSA file "
1916 "'%s': %s", dh_file
,
1917 ERR_error_string(ERR_get_error(), NULL
));
1921 wpa_printf(MSG_DEBUG
, "TLS: DH file in DSA param format");
1922 dh
= DSA_dup_DH(dsa
);
1925 wpa_printf(MSG_INFO
, "TLS: Failed to convert DSA "
1926 "params into DH params");
1931 #endif /* !OPENSSL_NO_DSA */
1933 wpa_printf(MSG_INFO
, "TLS: Failed to read/parse DH/DSA file "
1938 if (SSL_CTX_set_tmp_dh(ssl_ctx
, dh
) != 1) {
1939 wpa_printf(MSG_INFO
, "TLS: Failed to set DH params from '%s': "
1941 ERR_error_string(ERR_get_error(), NULL
));
1947 #endif /* OPENSSL_NO_DH */
1951 int tls_connection_get_keys(void *ssl_ctx
, struct tls_connection
*conn
,
1952 struct tls_keys
*keys
)
1956 if (conn
== NULL
|| keys
== NULL
)
1959 if (ssl
== NULL
|| ssl
->s3
== NULL
|| ssl
->session
== NULL
)
1962 os_memset(keys
, 0, sizeof(*keys
));
1963 keys
->master_key
= ssl
->session
->master_key
;
1964 keys
->master_key_len
= ssl
->session
->master_key_length
;
1965 keys
->client_random
= ssl
->s3
->client_random
;
1966 keys
->client_random_len
= SSL3_RANDOM_SIZE
;
1967 keys
->server_random
= ssl
->s3
->server_random
;
1968 keys
->server_random_len
= SSL3_RANDOM_SIZE
;
1974 int tls_connection_prf(void *tls_ctx
, struct tls_connection
*conn
,
1975 const char *label
, int server_random_first
,
1976 u8
*out
, size_t out_len
)
1982 u8
* tls_connection_handshake(void *ssl_ctx
, struct tls_connection
*conn
,
1983 const u8
*in_data
, size_t in_len
,
1984 size_t *out_len
, u8
**appl_data
,
1985 size_t *appl_data_len
)
1994 * Give TLS handshake data from the server (if available) to OpenSSL
1998 BIO_write(conn
->ssl_in
, in_data
, in_len
) < 0) {
1999 tls_show_errors(MSG_INFO
, __func__
,
2000 "Handshake failed - BIO_write");
2004 /* Initiate TLS handshake or continue the existing handshake */
2005 res
= SSL_connect(conn
->ssl
);
2007 int err
= SSL_get_error(conn
->ssl
, res
);
2008 if (err
== SSL_ERROR_WANT_READ
)
2009 wpa_printf(MSG_DEBUG
, "SSL: SSL_connect - want "
2011 else if (err
== SSL_ERROR_WANT_WRITE
)
2012 wpa_printf(MSG_DEBUG
, "SSL: SSL_connect - want to "
2015 tls_show_errors(MSG_INFO
, __func__
, "SSL_connect");
2020 /* Get the TLS handshake data to be sent to the server */
2021 res
= BIO_ctrl_pending(conn
->ssl_out
);
2022 wpa_printf(MSG_DEBUG
, "SSL: %d bytes pending from ssl_out", res
);
2023 out_data
= os_malloc(res
== 0 ? 1 : res
);
2024 if (out_data
== NULL
) {
2025 wpa_printf(MSG_DEBUG
, "SSL: Failed to allocate memory for "
2026 "handshake output (%d bytes)", res
);
2027 if (BIO_reset(conn
->ssl_out
) < 0) {
2028 tls_show_errors(MSG_INFO
, __func__
,
2029 "BIO_reset failed");
2034 res
= res
== 0 ? 0 : BIO_read(conn
->ssl_out
, out_data
, res
);
2036 tls_show_errors(MSG_INFO
, __func__
,
2037 "Handshake failed - BIO_read");
2038 if (BIO_reset(conn
->ssl_out
) < 0) {
2039 tls_show_errors(MSG_INFO
, __func__
,
2040 "BIO_reset failed");
2047 if (SSL_is_init_finished(conn
->ssl
) && appl_data
) {
2048 *appl_data
= os_malloc(in_len
);
2050 res
= SSL_read(conn
->ssl
, *appl_data
, in_len
);
2052 int err
= SSL_get_error(conn
->ssl
, res
);
2053 if (err
== SSL_ERROR_WANT_READ
||
2054 err
== SSL_ERROR_WANT_WRITE
) {
2055 wpa_printf(MSG_DEBUG
,
2056 "SSL: No Application Data "
2059 tls_show_errors(MSG_INFO
, __func__
,
2062 "Application Data");
2064 os_free(*appl_data
);
2067 *appl_data_len
= res
;
2068 wpa_hexdump_key(MSG_MSGDUMP
, "SSL: Application"
2069 " Data in Finish message",
2070 *appl_data
, *appl_data_len
);
2079 u8
* tls_connection_server_handshake(void *ssl_ctx
,
2080 struct tls_connection
*conn
,
2081 const u8
*in_data
, size_t in_len
,
2088 * Give TLS handshake data from the client (if available) to OpenSSL
2092 BIO_write(conn
->ssl_in
, in_data
, in_len
) < 0) {
2093 tls_show_errors(MSG_INFO
, __func__
,
2094 "Handshake failed - BIO_write");
2098 /* Initiate TLS handshake or continue the existing handshake */
2099 res
= SSL_accept(conn
->ssl
);
2101 int err
= SSL_get_error(conn
->ssl
, res
);
2102 if (err
== SSL_ERROR_WANT_READ
)
2103 wpa_printf(MSG_DEBUG
, "SSL: SSL_accept - want "
2105 else if (err
== SSL_ERROR_WANT_WRITE
)
2106 wpa_printf(MSG_DEBUG
, "SSL: SSL_accept - want to "
2109 tls_show_errors(MSG_INFO
, __func__
, "SSL_accept");
2114 /* Get the TLS handshake data to be sent to the client */
2115 res
= BIO_ctrl_pending(conn
->ssl_out
);
2116 wpa_printf(MSG_DEBUG
, "SSL: %d bytes pending from ssl_out", res
);
2117 out_data
= os_malloc(res
== 0 ? 1 : res
);
2118 if (out_data
== NULL
) {
2119 wpa_printf(MSG_DEBUG
, "SSL: Failed to allocate memory for "
2120 "handshake output (%d bytes)", res
);
2121 if (BIO_reset(conn
->ssl_out
) < 0) {
2122 tls_show_errors(MSG_INFO
, __func__
,
2123 "BIO_reset failed");
2128 res
= res
== 0 ? 0 : BIO_read(conn
->ssl_out
, out_data
, res
);
2130 tls_show_errors(MSG_INFO
, __func__
,
2131 "Handshake failed - BIO_read");
2132 if (BIO_reset(conn
->ssl_out
) < 0) {
2133 tls_show_errors(MSG_INFO
, __func__
,
2134 "BIO_reset failed");
2144 int tls_connection_encrypt(void *ssl_ctx
, struct tls_connection
*conn
,
2145 const u8
*in_data
, size_t in_len
,
2146 u8
*out_data
, size_t out_len
)
2153 /* Give plaintext data for OpenSSL to encrypt into the TLS tunnel. */
2154 if ((res
= BIO_reset(conn
->ssl_in
)) < 0 ||
2155 (res
= BIO_reset(conn
->ssl_out
)) < 0) {
2156 tls_show_errors(MSG_INFO
, __func__
, "BIO_reset failed");
2159 res
= SSL_write(conn
->ssl
, in_data
, in_len
);
2161 tls_show_errors(MSG_INFO
, __func__
,
2162 "Encryption failed - SSL_write");
2166 /* Read encrypted data to be sent to the server */
2167 res
= BIO_read(conn
->ssl_out
, out_data
, out_len
);
2169 tls_show_errors(MSG_INFO
, __func__
,
2170 "Encryption failed - BIO_read");
2178 int tls_connection_decrypt(void *ssl_ctx
, struct tls_connection
*conn
,
2179 const u8
*in_data
, size_t in_len
,
2180 u8
*out_data
, size_t out_len
)
2184 /* Give encrypted data from TLS tunnel for OpenSSL to decrypt. */
2185 res
= BIO_write(conn
->ssl_in
, in_data
, in_len
);
2187 tls_show_errors(MSG_INFO
, __func__
,
2188 "Decryption failed - BIO_write");
2191 if (BIO_reset(conn
->ssl_out
) < 0) {
2192 tls_show_errors(MSG_INFO
, __func__
, "BIO_reset failed");
2196 /* Read decrypted data for further processing */
2197 res
= SSL_read(conn
->ssl
, out_data
, out_len
);
2199 tls_show_errors(MSG_INFO
, __func__
,
2200 "Decryption failed - SSL_read");
2208 int tls_connection_resumed(void *ssl_ctx
, struct tls_connection
*conn
)
2210 return conn
? conn
->ssl
->hit
: 0;
2214 int tls_connection_set_cipher_list(void *tls_ctx
, struct tls_connection
*conn
,
2217 char buf
[100], *pos
, *end
;
2221 if (conn
== NULL
|| conn
->ssl
== NULL
|| ciphers
== NULL
)
2226 end
= pos
+ sizeof(buf
);
2229 while (*c
!= TLS_CIPHER_NONE
) {
2233 case TLS_CIPHER_RC4_SHA
:
2236 case TLS_CIPHER_AES128_SHA
:
2237 suite
= "AES128-SHA";
2239 case TLS_CIPHER_RSA_DHE_AES128_SHA
:
2240 suite
= "DHE-RSA-AES128-SHA";
2242 case TLS_CIPHER_ANON_DH_AES128_SHA
:
2243 suite
= "ADH-AES128-SHA";
2246 wpa_printf(MSG_DEBUG
, "TLS: Unsupported "
2247 "cipher selection: %d", *c
);
2250 ret
= os_snprintf(pos
, end
- pos
, ":%s", suite
);
2251 if (ret
< 0 || ret
>= end
- pos
)
2258 wpa_printf(MSG_DEBUG
, "OpenSSL: cipher suites: %s", buf
+ 1);
2260 if (SSL_set_cipher_list(conn
->ssl
, buf
+ 1) != 1) {
2261 tls_show_errors(MSG_INFO
, __func__
,
2262 "Cipher suite configuration failed");
2270 int tls_get_cipher(void *ssl_ctx
, struct tls_connection
*conn
,
2271 char *buf
, size_t buflen
)
2274 if (conn
== NULL
|| conn
->ssl
== NULL
)
2277 name
= SSL_get_cipher(conn
->ssl
);
2281 os_strlcpy(buf
, name
, buflen
);
2286 int tls_connection_enable_workaround(void *ssl_ctx
,
2287 struct tls_connection
*conn
)
2289 SSL_set_options(conn
->ssl
, SSL_OP_DONT_INSERT_EMPTY_FRAGMENTS
);
2295 #if defined(EAP_FAST) || defined(EAP_FAST_DYNAMIC)
2296 /* ClientHello TLS extensions require a patch to openssl, so this function is
2297 * commented out unless explicitly needed for EAP-FAST in order to be able to
2298 * build this file with unmodified openssl. */
2299 int tls_connection_client_hello_ext(void *ssl_ctx
, struct tls_connection
*conn
,
2300 int ext_type
, const u8
*data
,
2303 if (conn
== NULL
|| conn
->ssl
== NULL
|| ext_type
!= 35)
2306 #ifdef CONFIG_OPENSSL_TICKET_OVERRIDE
2307 if (SSL_set_session_ticket_ext(conn
->ssl
, (void *) data
,
2310 #else /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2311 if (SSL_set_hello_extension(conn
->ssl
, ext_type
, (void *) data
,
2314 #endif /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2318 #endif /* EAP_FAST || EAP_FAST_DYNAMIC */
2321 int tls_connection_get_failed(void *ssl_ctx
, struct tls_connection
*conn
)
2325 return conn
->failed
;
2329 int tls_connection_get_read_alerts(void *ssl_ctx
, struct tls_connection
*conn
)
2333 return conn
->read_alerts
;
2337 int tls_connection_get_write_alerts(void *ssl_ctx
, struct tls_connection
*conn
)
2341 return conn
->write_alerts
;
2345 int tls_connection_set_params(void *tls_ctx
, struct tls_connection
*conn
,
2346 const struct tls_connection_params
*params
)
2354 while ((err
= ERR_get_error())) {
2355 wpa_printf(MSG_INFO
, "%s: Clearing pending SSL error: %s",
2356 __func__
, ERR_error_string(err
, NULL
));
2359 if (params
->engine
) {
2360 wpa_printf(MSG_DEBUG
, "SSL: Initializing TLS engine");
2361 ret
= tls_engine_init(conn
, params
->engine_id
, params
->pin
,
2362 params
->key_id
, params
->cert_id
,
2363 params
->ca_cert_id
);
2367 if (tls_connection_set_subject_match(conn
,
2368 params
->subject_match
,
2369 params
->altsubject_match
))
2372 if (params
->engine
&& params
->ca_cert_id
) {
2373 if (tls_connection_engine_ca_cert(tls_ctx
, conn
,
2374 params
->ca_cert_id
))
2375 return TLS_SET_PARAMS_ENGINE_PRV_VERIFY_FAILED
;
2376 } else if (tls_connection_ca_cert(tls_ctx
, conn
, params
->ca_cert
,
2377 params
->ca_cert_blob
,
2378 params
->ca_cert_blob_len
,
2382 if (params
->engine
&& params
->cert_id
) {
2383 if (tls_connection_engine_client_cert(conn
, params
->cert_id
))
2384 return TLS_SET_PARAMS_ENGINE_PRV_VERIFY_FAILED
;
2385 } else if (tls_connection_client_cert(conn
, params
->client_cert
,
2386 params
->client_cert_blob
,
2387 params
->client_cert_blob_len
))
2390 if (params
->engine
&& params
->key_id
) {
2391 wpa_printf(MSG_DEBUG
, "TLS: Using private key from engine");
2392 if (tls_connection_engine_private_key(conn
))
2393 return TLS_SET_PARAMS_ENGINE_PRV_VERIFY_FAILED
;
2394 } else if (tls_connection_private_key(tls_ctx
, conn
,
2395 params
->private_key
,
2396 params
->private_key_passwd
,
2397 params
->private_key_blob
,
2398 params
->private_key_blob_len
)) {
2399 wpa_printf(MSG_INFO
, "TLS: Failed to load private key '%s'",
2400 params
->private_key
);
2404 if (tls_connection_dh(conn
, params
->dh_file
)) {
2405 wpa_printf(MSG_INFO
, "TLS: Failed to load DH file '%s'",
2410 tls_get_errors(tls_ctx
);
2416 int tls_global_set_params(void *tls_ctx
,
2417 const struct tls_connection_params
*params
)
2419 SSL_CTX
*ssl_ctx
= tls_ctx
;
2422 while ((err
= ERR_get_error())) {
2423 wpa_printf(MSG_INFO
, "%s: Clearing pending SSL error: %s",
2424 __func__
, ERR_error_string(err
, NULL
));
2427 if (tls_global_ca_cert(ssl_ctx
, params
->ca_cert
))
2430 if (tls_global_client_cert(ssl_ctx
, params
->client_cert
))
2433 if (tls_global_private_key(ssl_ctx
, params
->private_key
,
2434 params
->private_key_passwd
))
2437 if (tls_global_dh(ssl_ctx
, params
->dh_file
)) {
2438 wpa_printf(MSG_INFO
, "TLS: Failed to load DH file '%s'",
2447 int tls_connection_get_keyblock_size(void *tls_ctx
,
2448 struct tls_connection
*conn
)
2450 const EVP_CIPHER
*c
;
2453 if (conn
== NULL
|| conn
->ssl
== NULL
||
2454 conn
->ssl
->enc_read_ctx
== NULL
||
2455 conn
->ssl
->enc_read_ctx
->cipher
== NULL
||
2456 conn
->ssl
->read_hash
== NULL
)
2459 c
= conn
->ssl
->enc_read_ctx
->cipher
;
2460 #if OPENSSL_VERSION_NUMBER >= 0x00909000L
2461 h
= EVP_MD_CTX_md(conn
->ssl
->read_hash
);
2463 h
= conn
->ssl
->read_hash
;
2466 return 2 * (EVP_CIPHER_key_length(c
) +
2468 EVP_CIPHER_iv_length(c
));
2472 unsigned int tls_capabilities(void *tls_ctx
)
2478 int tls_connection_set_ia(void *tls_ctx
, struct tls_connection
*conn
,
2485 int tls_connection_ia_send_phase_finished(void *tls_ctx
,
2486 struct tls_connection
*conn
,
2488 u8
*out_data
, size_t out_len
)
2494 int tls_connection_ia_final_phase_finished(void *tls_ctx
,
2495 struct tls_connection
*conn
)
2501 int tls_connection_ia_permute_inner_secret(void *tls_ctx
,
2502 struct tls_connection
*conn
,
2503 const u8
*key
, size_t key_len
)
2509 #if defined(EAP_FAST) || defined(EAP_FAST_DYNAMIC)
2510 /* Pre-shared secred requires a patch to openssl, so this function is
2511 * commented out unless explicitly needed for EAP-FAST in order to be able to
2512 * build this file with unmodified openssl. */
2514 static int tls_sess_sec_cb(SSL
*s
, void *secret
, int *secret_len
,
2515 STACK_OF(SSL_CIPHER
) *peer_ciphers
,
2516 SSL_CIPHER
**cipher
, void *arg
)
2518 struct tls_connection
*conn
= arg
;
2521 if (conn
== NULL
|| conn
->session_ticket_cb
== NULL
)
2524 ret
= conn
->session_ticket_cb(conn
->session_ticket_cb_ctx
,
2525 conn
->session_ticket
,
2526 conn
->session_ticket_len
,
2527 s
->s3
->client_random
,
2528 s
->s3
->server_random
, secret
);
2529 os_free(conn
->session_ticket
);
2530 conn
->session_ticket
= NULL
;
2535 *secret_len
= SSL_MAX_MASTER_KEY_LENGTH
;
2540 #ifdef CONFIG_OPENSSL_TICKET_OVERRIDE
2541 static int tls_session_ticket_ext_cb(SSL
*s
, const unsigned char *data
,
2544 struct tls_connection
*conn
= arg
;
2546 if (conn
== NULL
|| conn
->session_ticket_cb
== NULL
)
2549 wpa_printf(MSG_DEBUG
, "OpenSSL: %s: length=%d", __func__
, len
);
2551 os_free(conn
->session_ticket
);
2552 conn
->session_ticket
= NULL
;
2554 wpa_hexdump(MSG_DEBUG
, "OpenSSL: ClientHello SessionTicket "
2555 "extension", data
, len
);
2557 conn
->session_ticket
= os_malloc(len
);
2558 if (conn
->session_ticket
== NULL
)
2561 os_memcpy(conn
->session_ticket
, data
, len
);
2562 conn
->session_ticket_len
= len
;
2566 #else /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2567 #ifdef SSL_OP_NO_TICKET
2568 static void tls_hello_ext_cb(SSL
*s
, int client_server
, int type
,
2569 unsigned char *data
, int len
, void *arg
)
2571 struct tls_connection
*conn
= arg
;
2573 if (conn
== NULL
|| conn
->session_ticket_cb
== NULL
)
2576 wpa_printf(MSG_DEBUG
, "OpenSSL: %s: type=%d length=%d", __func__
,
2579 if (type
== TLSEXT_TYPE_session_ticket
&& !client_server
) {
2580 os_free(conn
->session_ticket
);
2581 conn
->session_ticket
= NULL
;
2583 wpa_hexdump(MSG_DEBUG
, "OpenSSL: ClientHello SessionTicket "
2584 "extension", data
, len
);
2585 conn
->session_ticket
= os_malloc(len
);
2586 if (conn
->session_ticket
== NULL
)
2589 os_memcpy(conn
->session_ticket
, data
, len
);
2590 conn
->session_ticket_len
= len
;
2593 #else /* SSL_OP_NO_TICKET */
2594 static int tls_hello_ext_cb(SSL
*s
, TLS_EXTENSION
*ext
, void *arg
)
2596 struct tls_connection
*conn
= arg
;
2598 if (conn
== NULL
|| conn
->session_ticket_cb
== NULL
)
2601 wpa_printf(MSG_DEBUG
, "OpenSSL: %s: type=%d length=%d", __func__
,
2602 ext
->type
, ext
->length
);
2604 os_free(conn
->session_ticket
);
2605 conn
->session_ticket
= NULL
;
2607 if (ext
->type
== 35) {
2608 wpa_hexdump(MSG_DEBUG
, "OpenSSL: ClientHello SessionTicket "
2609 "extension", ext
->data
, ext
->length
);
2610 conn
->session_ticket
= os_malloc(ext
->length
);
2611 if (conn
->session_ticket
== NULL
)
2612 return SSL_AD_INTERNAL_ERROR
;
2614 os_memcpy(conn
->session_ticket
, ext
->data
, ext
->length
);
2615 conn
->session_ticket_len
= ext
->length
;
2620 #endif /* SSL_OP_NO_TICKET */
2621 #endif /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2622 #endif /* EAP_FAST || EAP_FAST_DYNAMIC */
2625 int tls_connection_set_session_ticket_cb(void *tls_ctx
,
2626 struct tls_connection
*conn
,
2627 tls_session_ticket_cb cb
,
2630 #if defined(EAP_FAST) || defined(EAP_FAST_DYNAMIC)
2631 conn
->session_ticket_cb
= cb
;
2632 conn
->session_ticket_cb_ctx
= ctx
;
2635 if (SSL_set_session_secret_cb(conn
->ssl
, tls_sess_sec_cb
,
2638 #ifdef CONFIG_OPENSSL_TICKET_OVERRIDE
2639 SSL_set_session_ticket_ext_cb(conn
->ssl
,
2640 tls_session_ticket_ext_cb
, conn
);
2641 #else /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2642 #ifdef SSL_OP_NO_TICKET
2643 SSL_set_tlsext_debug_callback(conn
->ssl
, tls_hello_ext_cb
);
2644 SSL_set_tlsext_debug_arg(conn
->ssl
, conn
);
2645 #else /* SSL_OP_NO_TICKET */
2646 if (SSL_set_hello_extension_cb(conn
->ssl
, tls_hello_ext_cb
,
2649 #endif /* SSL_OP_NO_TICKET */
2650 #endif /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2652 if (SSL_set_session_secret_cb(conn
->ssl
, NULL
, NULL
) != 1)
2654 #ifdef CONFIG_OPENSSL_TICKET_OVERRIDE
2655 SSL_set_session_ticket_ext_cb(conn
->ssl
, NULL
, NULL
);
2656 #else /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2657 #ifdef SSL_OP_NO_TICKET
2658 SSL_set_tlsext_debug_callback(conn
->ssl
, NULL
);
2659 SSL_set_tlsext_debug_arg(conn
->ssl
, conn
);
2660 #else /* SSL_OP_NO_TICKET */
2661 if (SSL_set_hello_extension_cb(conn
->ssl
, NULL
, NULL
) != 1)
2663 #endif /* SSL_OP_NO_TICKET */
2664 #endif /* CONFIG_OPENSSL_TICKET_OVERRIDE */
2668 #else /* EAP_FAST || EAP_FAST_DYNAMIC */
2670 #endif /* EAP_FAST || EAP_FAST_DYNAMIC */