2009-01-31 10:33:39 -08:00
|
|
|
#ifdef HAVE_CONFIG_H
|
|
|
|
# include <config.h>
|
|
|
|
#endif
|
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
#if USE_GNUTLS
|
|
|
|
# include <gnutls/gnutls.h>
|
2010-07-28 11:25:46 -07:00
|
|
|
# include <gnutls/x509.h>
|
|
|
|
# include <gcrypt.h>
|
2008-10-30 08:26:11 -07:00
|
|
|
#elif USE_OPENSSL
|
|
|
|
# include <openssl/ssl.h>
|
2010-07-26 23:30:27 -07:00
|
|
|
# include <openssl/err.h>
|
2010-09-22 10:37:25 -07:00
|
|
|
# include <openssl/dh.h>
|
2008-10-30 08:26:11 -07:00
|
|
|
#endif
|
|
|
|
|
2010-02-20 11:12:52 -08:00
|
|
|
#ifdef HAVE_WS2TCPIP_H
|
2010-02-20 10:01:50 -08:00
|
|
|
# include <ws2tcpip.h>
|
|
|
|
#endif
|
|
|
|
|
2009-03-18 01:38:43 -07:00
|
|
|
#include "Ecore.h"
|
2009-12-22 13:15:12 -08:00
|
|
|
#include "ecore_con_private.h"
|
2010-07-28 11:25:46 -07:00
|
|
|
#include <sys/mman.h>
|
|
|
|
#include <errno.h>
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2009-10-09 22:28:43 -07:00
|
|
|
static int _init_con_ssl_init_count = 0;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
|
|
|
#if USE_GNUTLS
|
2010-07-28 11:25:46 -07:00
|
|
|
# ifdef EFL_HAVE_PTHREAD
|
2010-09-17 22:31:00 -07:00
|
|
|
#include <pthread.h>
|
2010-07-28 11:25:46 -07:00
|
|
|
GCRY_THREAD_OPTION_PTHREAD_IMPL;
|
|
|
|
# endif
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
static int _client_connected = 0;
|
2010-07-26 23:30:27 -07:00
|
|
|
# define SSL_SUFFIX(ssl_func) ssl_func ## _gnutls
|
2008-10-30 08:26:11 -07:00
|
|
|
# define _ECORE_CON_SSL_AVAILABLE 1
|
|
|
|
|
|
|
|
#elif USE_OPENSSL
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
# define SSL_SUFFIX(ssl_func) ssl_func ## _openssl
|
2008-10-30 08:26:11 -07:00
|
|
|
# define _ECORE_CON_SSL_AVAILABLE 2
|
|
|
|
|
|
|
|
#else
|
2010-07-26 23:30:27 -07:00
|
|
|
# define SSL_SUFFIX(ssl_func) ssl_func ## _none
|
2008-10-30 08:26:11 -07:00
|
|
|
# define _ECORE_CON_SSL_AVAILABLE 0
|
|
|
|
|
|
|
|
#endif
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
#if USE_GNUTLS
|
2010-09-27 20:16:08 -07:00
|
|
|
static void
|
|
|
|
_gnutls_print_errors(int ret)
|
|
|
|
{
|
|
|
|
if (ret)
|
|
|
|
ERR("gnutls returned with error: %s - %s", gnutls_strerror_name(ret), gnutls_strerror(ret));
|
|
|
|
}
|
|
|
|
|
2010-09-23 23:54:49 -07:00
|
|
|
|
|
|
|
static const char*
|
|
|
|
SSL_GNUTLS_PRINT_HANDSHAKE_STATUS(gnutls_handshake_description_t status)
|
|
|
|
{
|
|
|
|
switch (status)
|
|
|
|
{
|
|
|
|
case GNUTLS_HANDSHAKE_HELLO_REQUEST:
|
|
|
|
return "Hello request";
|
|
|
|
case GNUTLS_HANDSHAKE_CLIENT_HELLO:
|
|
|
|
return "Client hello";
|
|
|
|
case GNUTLS_HANDSHAKE_SERVER_HELLO:
|
|
|
|
return "Server hello";
|
2010-09-24 15:49:06 -07:00
|
|
|
#ifdef USE_GNUTLS2_10
|
2010-09-23 23:54:49 -07:00
|
|
|
case GNUTLS_HANDSHAKE_NEW_SESSION_TICKET:
|
|
|
|
return "New session ticket";
|
2010-09-24 02:42:16 -07:00
|
|
|
#endif
|
2010-09-23 23:54:49 -07:00
|
|
|
case GNUTLS_HANDSHAKE_CERTIFICATE_PKT:
|
|
|
|
return "Certificate packet";
|
|
|
|
case GNUTLS_HANDSHAKE_SERVER_KEY_EXCHANGE:
|
|
|
|
return "Server key exchange";
|
|
|
|
case GNUTLS_HANDSHAKE_CERTIFICATE_REQUEST:
|
|
|
|
return "Certificate request";
|
|
|
|
case GNUTLS_HANDSHAKE_SERVER_HELLO_DONE:
|
|
|
|
return "Server hello done";
|
|
|
|
case GNUTLS_HANDSHAKE_CERTIFICATE_VERIFY:
|
|
|
|
return "Certificate verify";
|
|
|
|
case GNUTLS_HANDSHAKE_CLIENT_KEY_EXCHANGE:
|
|
|
|
return "Client key exchange";
|
|
|
|
case GNUTLS_HANDSHAKE_FINISHED:
|
|
|
|
return "Finished";
|
|
|
|
case GNUTLS_HANDSHAKE_SUPPLEMENTAL:
|
|
|
|
return "Supplemental";
|
|
|
|
}
|
|
|
|
return NULL;
|
|
|
|
}
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
#elif USE_OPENSSL
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
static void
|
|
|
|
_openssl_print_errors(void)
|
|
|
|
{
|
|
|
|
do
|
|
|
|
{
|
|
|
|
unsigned long err;
|
|
|
|
|
|
|
|
err = ERR_get_error();
|
|
|
|
if (!err) break;
|
|
|
|
ERR("openssl error: %s", ERR_reason_error_string(err));
|
|
|
|
} while (1);
|
|
|
|
}
|
2010-07-28 11:25:46 -07:00
|
|
|
#endif
|
|
|
|
|
2010-09-17 10:39:32 -07:00
|
|
|
#define SSL_ERROR_CHECK_GOTO_ERROR(X) \
|
|
|
|
do \
|
|
|
|
{ \
|
|
|
|
if ((X)) \
|
|
|
|
{ \
|
|
|
|
ERR("Error at %s:%s:%d!", __FILE__, __PRETTY_FUNCTION__, __LINE__); \
|
|
|
|
goto error; \
|
|
|
|
} \
|
|
|
|
} \
|
|
|
|
while (0)
|
|
|
|
|
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_init) (void);
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_shutdown) (void);
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
static Eina_Bool SSL_SUFFIX(_ecore_con_ssl_server_cafile_add) (Ecore_Con_Server *svr, const char *ca_file);
|
|
|
|
static Eina_Bool SSL_SUFFIX(_ecore_con_ssl_server_crl_add) (Ecore_Con_Server *svr, const char *crl_file);
|
|
|
|
static Eina_Bool SSL_SUFFIX(_ecore_con_ssl_server_cert_add) (Ecore_Con_Server *svr, const char *cert);
|
|
|
|
static Eina_Bool SSL_SUFFIX(_ecore_con_ssl_server_privkey_add) (Ecore_Con_Server *svr, const char *key_file);
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
static Ecore_Con_Ssl_Error SSL_SUFFIX(_ecore_con_ssl_server_prepare)(Ecore_Con_Server *svr, int ssl_type);
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_server_init) (Ecore_Con_Server * svr);
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_server_shutdown) (Ecore_Con_Server *
|
|
|
|
svr);
|
2008-10-30 08:26:11 -07:00
|
|
|
static int
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_server_read) (Ecore_Con_Server * svr,
|
2010-07-26 23:30:27 -07:00
|
|
|
unsigned char *buf, int size);
|
2008-10-30 08:26:11 -07:00
|
|
|
static int
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_server_write) (Ecore_Con_Server *
|
|
|
|
svr,
|
2010-07-26 23:30:27 -07:00
|
|
|
unsigned char *buf, int size);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_client_init) (Ecore_Con_Client * cl);
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_client_shutdown) (Ecore_Con_Client *
|
|
|
|
cl);
|
2008-10-30 08:26:11 -07:00
|
|
|
static int
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_client_read) (Ecore_Con_Client * cl,
|
2010-07-26 23:30:27 -07:00
|
|
|
unsigned char *buf, int size);
|
2008-10-30 08:26:11 -07:00
|
|
|
static int
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_client_write) (Ecore_Con_Client * cl,
|
2010-07-26 23:30:27 -07:00
|
|
|
unsigned char *buf, int size);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* General SSL API
|
|
|
|
*/
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_init(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (!_init_con_ssl_init_count++)
|
2010-07-28 11:25:46 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_init) ();
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return _init_con_ssl_init_count;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_shutdown(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (!--_init_con_ssl_init_count)
|
2010-09-27 20:16:08 -07:00
|
|
|
SSL_SUFFIX(_ecore_con_ssl_shutdown) ();
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return _init_con_ssl_init_count;
|
|
|
|
}
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
Ecore_Con_Ssl_Error
|
|
|
|
ecore_con_ssl_server_prepare(Ecore_Con_Server *svr, int ssl_type)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-09-24 13:03:09 -07:00
|
|
|
if (!ssl_type)
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-18 12:26:05 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_prepare) (svr, ssl_type);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_server_init(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_init) (svr);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_server_shutdown(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_shutdown) (svr);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
int
|
|
|
|
ecore_con_ssl_server_read(Ecore_Con_Server *svr, unsigned char *buf, int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_read) (svr, buf, size);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
int
|
|
|
|
ecore_con_ssl_server_write(Ecore_Con_Server *svr, unsigned char *buf, int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_write) (svr, buf, size);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_client_init(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_client_init) (cl);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
Ecore_Con_Ssl_Error
|
2008-10-30 08:26:11 -07:00
|
|
|
ecore_con_ssl_client_shutdown(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_client_shutdown) (cl);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
int
|
|
|
|
ecore_con_ssl_client_read(Ecore_Con_Client *cl, unsigned char *buf, int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_client_read) (cl, buf, size);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2008-12-15 09:59:19 -08:00
|
|
|
int
|
|
|
|
ecore_con_ssl_client_write(Ecore_Con_Client *cl, unsigned char *buf, int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_client_write) (cl, buf, size);
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
/**
|
|
|
|
* Returns if SSL support is available
|
|
|
|
* @return 1 if SSL is available and provided by gnutls, 2 if provided by openssl,
|
|
|
|
* 0 if it is not available.
|
|
|
|
* @ingroup Ecore_Con_Client_Group
|
|
|
|
*/
|
|
|
|
EAPI int
|
|
|
|
ecore_con_ssl_available_get(void)
|
|
|
|
{
|
|
|
|
return _ECORE_CON_SSL_AVAILABLE;
|
|
|
|
}
|
|
|
|
|
2010-10-11 23:34:31 -07:00
|
|
|
/**
|
|
|
|
* @addtogroup Ecore_Con_SSL_Group Ecore Connection SSL Functions
|
|
|
|
*
|
|
|
|
* Functions that operate on Ecore connection objects pertaining to SSL.
|
|
|
|
*
|
|
|
|
* @{
|
|
|
|
*/
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
/**
|
|
|
|
* @brief Enable certificate verification on a server object
|
|
|
|
*
|
|
|
|
* Call this function on a server object before main loop has started
|
|
|
|
* to enable verification of certificates against loaded certificates.
|
|
|
|
* @param svr The server object
|
|
|
|
*/
|
|
|
|
EAPI void
|
|
|
|
ecore_con_ssl_server_verify(Ecore_Con_Server *svr)
|
|
|
|
{
|
|
|
|
if (!ECORE_MAGIC_CHECK(svr, ECORE_MAGIC_CON_SERVER))
|
|
|
|
{
|
|
|
|
ECORE_MAGIC_FAIL(svr, ECORE_MAGIC_CON_SERVER, "ecore_con_ssl_server_verify");
|
|
|
|
return;
|
|
|
|
}
|
|
|
|
svr->verify = EINA_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @brief Add an ssl certificate for use in ecore_con functions.
|
|
|
|
*
|
|
|
|
* Use this function to add a SSL PEM certificate.
|
|
|
|
* Simply specify the cert here to use it in the server object for connecting or listening.
|
|
|
|
* If there is an error loading the certificate, an error will automatically be logged.
|
|
|
|
* @param cert The path to the certificate.
|
|
|
|
* @return EINA_FALSE if the file cannot be loaded, otherwise EINA_TRUE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
EAPI Eina_Bool
|
|
|
|
ecore_con_ssl_server_cert_add(Ecore_Con_Server *svr,
|
|
|
|
const char *cert)
|
|
|
|
{
|
|
|
|
if (!ECORE_MAGIC_CHECK(svr, ECORE_MAGIC_CON_SERVER))
|
|
|
|
{
|
|
|
|
ECORE_MAGIC_FAIL(svr, ECORE_MAGIC_CON_SERVER, "ecore_con_ssl_server_cert_add");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_cert_add)(svr, cert);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @brief Add an ssl CA file for use in ecore_con functions.
|
|
|
|
*
|
|
|
|
* Use this function to add a SSL PEM CA file.
|
|
|
|
* Simply specify the file here to use it in the server object for connecting or listening.
|
|
|
|
* If there is an error loading the CAs, an error will automatically be logged.
|
|
|
|
* @param ca_file The path to the CA file.
|
|
|
|
* @return EINA_FALSE if the file cannot be loaded, otherwise EINA_TRUE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
EAPI Eina_Bool
|
|
|
|
ecore_con_ssl_server_cafile_add(Ecore_Con_Server *svr,
|
|
|
|
const char *ca_file)
|
|
|
|
{
|
|
|
|
if (!ECORE_MAGIC_CHECK(svr, ECORE_MAGIC_CON_SERVER))
|
|
|
|
{
|
|
|
|
ECORE_MAGIC_FAIL(svr, ECORE_MAGIC_CON_SERVER, "ecore_con_ssl_server_cafile_add");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_cafile_add)(svr, ca_file);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @brief Add an ssl private key for use in ecore_con functions.
|
|
|
|
*
|
|
|
|
* Use this function to add a SSL PEM private key
|
|
|
|
* Simply specify the key file here to use it in the server object for connecting or listening.
|
|
|
|
* If there is an error loading the key, an error will automatically be logged.
|
|
|
|
* @param key_file The path to the key file.
|
|
|
|
* @return EINA_FALSE if the file cannot be loaded,
|
|
|
|
* otherwise EINA_TRUE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
EAPI Eina_Bool
|
|
|
|
ecore_con_ssl_server_privkey_add(Ecore_Con_Server *svr,
|
|
|
|
const char *key_file)
|
|
|
|
{
|
|
|
|
if (!ECORE_MAGIC_CHECK(svr, ECORE_MAGIC_CON_SERVER))
|
|
|
|
{
|
|
|
|
ECORE_MAGIC_FAIL(svr, ECORE_MAGIC_CON_SERVER, "ecore_con_ssl_server_privkey_add");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_privkey_add)(svr, key_file);
|
|
|
|
}
|
|
|
|
|
|
|
|
/**
|
|
|
|
* @brief Add an ssl CRL for use in ecore_con functions.
|
|
|
|
*
|
|
|
|
* Use this function to add a SSL PEM CRL file
|
|
|
|
* Simply specify the CRL file here to use it in the server object for connecting or listening.
|
|
|
|
* If there is an error loading the CRL, an error will automatically be logged.
|
|
|
|
* @param crl_file The path to the CRL file.
|
|
|
|
* @return EINA_FALSE if the file cannot be loaded,
|
|
|
|
* otherwise EINA_TRUE.
|
|
|
|
*/
|
|
|
|
|
|
|
|
EAPI Eina_Bool
|
|
|
|
ecore_con_ssl_server_crl_add(Ecore_Con_Server *svr,
|
|
|
|
const char *crl_file)
|
|
|
|
{
|
|
|
|
if (!ECORE_MAGIC_CHECK(svr, ECORE_MAGIC_CON_SERVER))
|
|
|
|
{
|
|
|
|
ECORE_MAGIC_FAIL(svr, ECORE_MAGIC_CON_SERVER, "ecore_con_ssl_server_crl_add");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
return SSL_SUFFIX(_ecore_con_ssl_server_crl_add)(svr, crl_file);
|
|
|
|
}
|
|
|
|
|
2010-10-11 23:34:31 -07:00
|
|
|
/**
|
|
|
|
* @}
|
|
|
|
*/
|
2010-09-27 20:16:08 -07:00
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
#if USE_GNUTLS
|
|
|
|
|
|
|
|
/*
|
|
|
|
* GnuTLS
|
|
|
|
*/
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_init_gnutls(void)
|
|
|
|
{
|
2010-07-28 11:25:46 -07:00
|
|
|
#ifdef EFL_HAVE_PTHREAD
|
|
|
|
if (gcry_control (GCRYCTL_SET_THREAD_CBS, &gcry_threads_pthread))
|
|
|
|
WRN(
|
|
|
|
"YOU ARE USING PTHREADS, BUT I CANNOT INITIALIZE THREADSAFE GCRYPT OPERATIONS!");
|
|
|
|
|
|
|
|
#endif
|
2010-07-26 23:30:27 -07:00
|
|
|
if (gnutls_global_init())
|
|
|
|
return ECORE_CON_SSL_ERROR_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_shutdown_gnutls(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
gnutls_global_deinit();
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-27 20:16:08 -07:00
|
|
|
_ecore_con_ssl_server_prepare_gnutls(Ecore_Con_Server *svr, int ssl_type __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-09-19 12:25:47 -07:00
|
|
|
int ret;
|
2010-09-18 12:26:05 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_certificate_allocate_credentials(&svr->cert));
|
2010-09-21 17:10:10 -07:00
|
|
|
|
|
|
|
if (svr->created)
|
|
|
|
{
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_dh_params_init(&svr->dh_params));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_dh_params_generate2(svr->dh_params, 1024));
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_anon_allocate_server_credentials(&svr->anoncred_s));
|
2010-09-21 23:13:29 -07:00
|
|
|
/* TODO: implement PSK */
|
2010-09-28 14:59:13 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_psk_allocate_server_credentials(&svr->pskcred_s));
|
2010-09-22 01:03:38 -07:00
|
|
|
|
2010-09-21 17:10:10 -07:00
|
|
|
gnutls_anon_set_server_dh_params(svr->anoncred_s, svr->dh_params);
|
|
|
|
gnutls_certificate_set_dh_params(svr->cert, svr->dh_params);
|
2010-09-28 14:59:13 -07:00
|
|
|
gnutls_psk_set_server_dh_params(svr->pskcred_s, svr->dh_params);
|
2010-09-21 17:10:10 -07:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2010-09-28 14:59:13 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_psk_allocate_client_credentials(&svr->pskcred_c));
|
2010-09-21 17:10:10 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_anon_allocate_client_credentials(&svr->anoncred_c));
|
|
|
|
}
|
2010-09-22 01:03:38 -07:00
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-19 12:25:47 -07:00
|
|
|
|
|
|
|
error:
|
2010-09-27 20:16:08 -07:00
|
|
|
_gnutls_print_errors(ret);
|
2010-09-21 17:10:10 -07:00
|
|
|
_ecore_con_ssl_server_shutdown_gnutls(svr);
|
2010-09-19 12:25:47 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 18:28:03 -07:00
|
|
|
/* Tries to connect an Ecore_Con_Server to an SSL host.
|
|
|
|
* Returns 1 on success, -1 on fatal errors and 0 if the caller
|
|
|
|
* should try again later.
|
|
|
|
*/
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_server_init_gnutls(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-09-27 20:16:08 -07:00
|
|
|
const gnutls_datum_t *cert_list;
|
|
|
|
unsigned int iter, cert_list_size;
|
|
|
|
gnutls_x509_crt_t cert = NULL;
|
2010-09-28 14:59:13 -07:00
|
|
|
#ifdef USE_GNUTLS2_10
|
|
|
|
const char *priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:+VERS-TLS1.2:+VERS-TLS1.1:+VERS-TLS1.0:+VERS-SSL3.0";
|
|
|
|
#else
|
|
|
|
const char *priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:+VERS-TLS1.1:+VERS-TLS1.0:+VERS-SSL3.0";
|
2010-09-22 01:03:38 -07:00
|
|
|
#endif
|
2010-09-28 14:59:13 -07:00
|
|
|
int ret = 0;
|
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (svr->ssl_state)
|
2010-07-26 23:30:27 -07:00
|
|
|
{
|
2010-09-23 21:15:42 -07:00
|
|
|
case ECORE_CON_SSL_STATE_DONE:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
case ECORE_CON_SSL_STATE_INIT:
|
|
|
|
if (svr->type & ECORE_CON_USE_SSL2) /* not supported because of security issues */
|
|
|
|
return ECORE_CON_SSL_ERROR_SSL2_NOT_SUPPORTED;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (svr->type & ECORE_CON_SSL)
|
|
|
|
{
|
|
|
|
case ECORE_CON_USE_SSL3:
|
|
|
|
case ECORE_CON_USE_SSL3 | ECORE_CON_LOAD_CERT:
|
2010-09-28 14:59:13 -07:00
|
|
|
priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:!VERS-TLS1.0:!VERS-TLS1.1";
|
2010-09-23 21:15:42 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
case ECORE_CON_USE_TLS:
|
|
|
|
case ECORE_CON_USE_TLS | ECORE_CON_LOAD_CERT:
|
2010-09-28 14:59:13 -07:00
|
|
|
priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:!VERS-SSL3.0";
|
2010-09-23 21:15:42 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
case ECORE_CON_USE_MIXED:
|
|
|
|
case ECORE_CON_USE_MIXED | ECORE_CON_LOAD_CERT:
|
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
}
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_init(&svr->session, GNUTLS_CLIENT));
|
2010-09-24 04:25:40 -07:00
|
|
|
#ifdef USE_GNUTLS2_10
|
2010-09-23 23:54:49 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_session_ticket_enable_client(svr->session));
|
2010-09-24 04:25:40 -07:00
|
|
|
#endif
|
2010-09-24 12:47:25 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_server_name_set(svr->session, GNUTLS_NAME_DNS, svr->name, strlen(svr->name)));
|
2010-09-28 14:59:13 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_priority_set_direct(svr->session, priority, NULL));
|
2010-09-23 21:15:42 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_credentials_set(svr->session, GNUTLS_CRD_CERTIFICATE, svr->cert));
|
2010-09-28 14:59:13 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_credentials_set(svr->session, GNUTLS_CRD_PSK, svr->pskcred_c));
|
2010-09-23 21:15:42 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_credentials_set(svr->session, GNUTLS_CRD_ANON, svr->anoncred_c));
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
gnutls_dh_set_prime_bits(svr->session, 512);
|
|
|
|
gnutls_transport_set_ptr(svr->session, (gnutls_transport_ptr_t)svr->fd);
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
case ECORE_CON_SSL_STATE_HANDSHAKING:
|
2010-09-21 17:10:10 -07:00
|
|
|
ret = gnutls_handshake(svr->session);
|
2010-09-29 15:04:11 -07:00
|
|
|
DBG("calling gnutls_handshake(): returned with '%s'", gnutls_strerror_name(ret));
|
2010-09-21 17:10:10 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_error_is_fatal(ret));
|
2010-09-23 21:15:42 -07:00
|
|
|
if (!ret)
|
|
|
|
{
|
|
|
|
svr->handshaking = EINA_FALSE;
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_DONE;
|
2010-09-29 16:56:31 -07:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2010-09-29 16:53:00 -07:00
|
|
|
if (gnutls_record_get_direction(svr->session))
|
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_WRITE);
|
|
|
|
else
|
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_READ);
|
2010-09-29 17:45:48 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-23 21:15:42 -07:00
|
|
|
}
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
if (!svr->verify)
|
|
|
|
/* not verifying certificates, so we're done! */
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
ret = 0;
|
|
|
|
/* use CRL/CA lists to verify */
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_certificate_verify_peers2(svr->session, &iter));
|
|
|
|
if (iter & GNUTLS_CERT_INVALID)
|
|
|
|
ERR("The certificate is not trusted.");
|
|
|
|
else if (iter & GNUTLS_CERT_SIGNER_NOT_FOUND)
|
2010-10-02 02:14:41 -07:00
|
|
|
ERR("The certificate hasn't got a known issuer.");
|
2010-09-27 20:16:08 -07:00
|
|
|
else if (iter & GNUTLS_CERT_REVOKED)
|
2010-10-02 02:14:41 -07:00
|
|
|
ERR("The certificate has been revoked.");
|
2010-09-27 20:16:08 -07:00
|
|
|
else if (iter & GNUTLS_CERT_EXPIRED)
|
2010-10-02 02:14:41 -07:00
|
|
|
ERR("The certificate has expired");
|
2010-09-27 20:16:08 -07:00
|
|
|
else if (iter & GNUTLS_CERT_NOT_ACTIVATED)
|
2010-10-02 02:14:41 -07:00
|
|
|
ERR("The certificate is not yet activated");
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
if (iter)
|
|
|
|
goto error;
|
|
|
|
|
|
|
|
if (gnutls_certificate_type_get(svr->session) != GNUTLS_CRT_X509)
|
|
|
|
{
|
|
|
|
ERR("Warning: PGP certificates are not yet supported!");
|
|
|
|
goto error;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(cert_list = gnutls_certificate_get_peers(svr->session, &cert_list_size)));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!cert_list_size);
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_x509_crt_init(&cert));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_x509_crt_import(cert, &cert_list[0], GNUTLS_X509_FMT_DER));
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!gnutls_x509_crt_check_hostname(cert, svr->name));
|
|
|
|
gnutls_x509_crt_deinit(cert);
|
2010-10-02 15:27:30 -07:00
|
|
|
DBG("SSL certificate verification succeeded!");
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-22 01:03:38 -07:00
|
|
|
|
2010-09-17 10:18:41 -07:00
|
|
|
error:
|
2010-09-27 20:16:08 -07:00
|
|
|
_gnutls_print_errors(ret);
|
2010-09-23 23:54:49 -07:00
|
|
|
if ((ret == GNUTLS_E_WARNING_ALERT_RECEIVED) || (ret == GNUTLS_E_FATAL_ALERT_RECEIVED))
|
|
|
|
ERR("Also received alert: %s", gnutls_alert_get_name(gnutls_alert_get(svr->session)));
|
2010-09-27 20:16:08 -07:00
|
|
|
if (svr->ssl_state != ECORE_CON_SSL_STATE_DONE)
|
|
|
|
{
|
|
|
|
ERR("last out: %s", SSL_GNUTLS_PRINT_HANDSHAKE_STATUS(gnutls_handshake_get_last_out(svr->session)));
|
|
|
|
ERR("last in: %s", SSL_GNUTLS_PRINT_HANDSHAKE_STATUS(gnutls_handshake_get_last_in(svr->session)));
|
|
|
|
}
|
|
|
|
if (cert)
|
|
|
|
gnutls_x509_crt_deinit(cert);
|
2010-09-17 10:22:59 -07:00
|
|
|
_ecore_con_ssl_server_shutdown_gnutls(svr);
|
2010-09-17 10:18:41 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
static Eina_Bool
|
2010-09-27 20:16:08 -07:00
|
|
|
_ecore_con_ssl_server_cafile_add_gnutls(Ecore_Con_Server *svr, const char *ca_file)
|
2010-07-28 11:25:46 -07:00
|
|
|
{
|
2010-09-27 20:16:08 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_certificate_set_x509_trust_file(svr->cert, ca_file,
|
|
|
|
GNUTLS_X509_FMT_PEM) < 1);
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
return EINA_TRUE;
|
|
|
|
error:
|
|
|
|
ERR("Could not load CA file!");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_crl_add_gnutls(Ecore_Con_Server *svr, const char *crl_file)
|
|
|
|
{
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_certificate_set_x509_crl_file(svr->cert, crl_file,
|
|
|
|
GNUTLS_X509_FMT_PEM) < 1);
|
2010-07-28 11:25:46 -07:00
|
|
|
|
|
|
|
return EINA_TRUE;
|
2010-09-27 20:16:08 -07:00
|
|
|
error:
|
|
|
|
ERR("Could not load CRL file!");
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
2010-07-28 11:25:46 -07:00
|
|
|
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_privkey_add_gnutls(Ecore_Con_Server *svr, const char *key_file)
|
|
|
|
{
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_certificate_set_x509_key_file(svr->cert, svr->cert_file, key_file,
|
2010-09-28 02:28:04 -07:00
|
|
|
GNUTLS_X509_FMT_PEM));
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
return EINA_TRUE;
|
|
|
|
error:
|
|
|
|
ERR("Could not load certificate/key file!");
|
2010-07-28 11:25:46 -07:00
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_cert_add_gnutls(Ecore_Con_Server *svr, const char *cert_file)
|
|
|
|
{
|
|
|
|
if (!(svr->cert_file = strdup(cert_file)))
|
|
|
|
return EINA_FALSE;
|
|
|
|
|
|
|
|
return EINA_TRUE;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_server_shutdown_gnutls(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (svr->session)
|
|
|
|
{
|
|
|
|
gnutls_bye(svr->session, GNUTLS_SHUT_RDWR);
|
|
|
|
gnutls_deinit(svr->session);
|
|
|
|
}
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
if (svr->cert_file)
|
|
|
|
free(svr->cert_file);
|
|
|
|
svr->cert_file = NULL;
|
|
|
|
if (svr->cert)
|
|
|
|
gnutls_certificate_free_credentials(svr->cert);
|
|
|
|
svr->cert = NULL;
|
|
|
|
|
2010-09-21 17:10:10 -07:00
|
|
|
if ((svr->type & ECORE_CON_SSL) && svr->created)
|
2010-09-19 12:25:47 -07:00
|
|
|
{
|
2010-09-21 17:10:10 -07:00
|
|
|
if (svr->dh_params)
|
|
|
|
{
|
|
|
|
gnutls_dh_params_deinit(svr->dh_params);
|
|
|
|
svr->dh_params = NULL;
|
|
|
|
}
|
|
|
|
if (svr->anoncred_s)
|
|
|
|
gnutls_anon_free_server_credentials(svr->anoncred_s);
|
|
|
|
if (svr->pskcred_s)
|
|
|
|
gnutls_psk_free_server_credentials(svr->pskcred_s);
|
|
|
|
|
|
|
|
svr->anoncred_s = NULL;
|
|
|
|
svr->pskcred_s = NULL;
|
2010-09-19 12:25:47 -07:00
|
|
|
}
|
2010-09-21 17:10:10 -07:00
|
|
|
else if (svr->type & ECORE_CON_SSL)
|
2010-07-28 11:25:46 -07:00
|
|
|
{
|
2010-09-21 17:10:10 -07:00
|
|
|
if (svr->anoncred_c)
|
|
|
|
gnutls_anon_free_client_credentials(svr->anoncred_c);
|
|
|
|
if (svr->pskcred_c)
|
|
|
|
gnutls_psk_free_client_credentials(svr->pskcred_c);
|
|
|
|
|
|
|
|
svr->anoncred_c = NULL;
|
|
|
|
svr->pskcred_c = NULL;
|
2010-07-28 11:25:46 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
svr->session = NULL;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_server_read_gnutls(Ecore_Con_Server *svr, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (svr->ssl_state == ECORE_CON_SSL_STATE_HANDSHAKING)
|
|
|
|
{
|
2010-09-28 20:52:32 -07:00
|
|
|
DBG("Continuing gnutls handshake");
|
2010-09-24 21:21:03 -07:00
|
|
|
if (!_ecore_con_ssl_server_init_gnutls(svr))
|
2010-09-24 20:02:10 -07:00
|
|
|
return 0;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
num = gnutls_record_recv(svr->session, buf, size);
|
|
|
|
if (num > 0)
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (num == GNUTLS_E_REHANDSHAKE)
|
|
|
|
{
|
2010-09-26 16:56:31 -07:00
|
|
|
WRN("Rehandshake request ignored");
|
|
|
|
return 0;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
svr->handshaking = EINA_TRUE;
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
if (!_ecore_con_ssl_server_init_gnutls(svr))
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
else if ((num == GNUTLS_E_AGAIN) || (num == GNUTLS_E_INTERRUPTED))
|
2010-07-26 23:30:27 -07:00
|
|
|
return 0;
|
|
|
|
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_server_write_gnutls(Ecore_Con_Server *svr, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
|
|
|
|
if (svr->ssl_state == ECORE_CON_SSL_STATE_HANDSHAKING)
|
|
|
|
{
|
2010-09-28 20:52:32 -07:00
|
|
|
DBG("Continuing gnutls handshake");
|
2010-09-24 20:02:10 -07:00
|
|
|
if (!_ecore_con_ssl_server_init_gnutls(svr))
|
|
|
|
return 0;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
num = gnutls_record_send(svr->session, buf, size);
|
|
|
|
if (num > 0)
|
|
|
|
return num;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (num == GNUTLS_E_REHANDSHAKE)
|
|
|
|
{
|
2010-09-26 16:56:31 -07:00
|
|
|
WRN("Rehandshake request ignored");
|
|
|
|
return 0;
|
|
|
|
/* this is only partly functional I think? */
|
2010-09-24 20:02:10 -07:00
|
|
|
svr->handshaking = EINA_TRUE;
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
if (!_ecore_con_ssl_server_init_gnutls(svr))
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
else if ((num == GNUTLS_E_AGAIN) || (num == GNUTLS_E_INTERRUPTED))
|
2010-07-26 23:30:27 -07:00
|
|
|
return 0;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_client_init_gnutls(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-09-28 14:59:13 -07:00
|
|
|
#ifdef USE_GNUTLS2_10
|
|
|
|
const char *priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:+VERS-TLS1.2:+VERS-TLS1.1:+VERS-TLS1.0:+VERS-SSL3.0";
|
|
|
|
#else
|
|
|
|
const char *priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:+VERS-TLS1.1:+VERS-TLS1.0:+VERS-SSL3.0";
|
2010-09-22 01:03:38 -07:00
|
|
|
#endif
|
2010-09-28 14:59:13 -07:00
|
|
|
int ret = 0;
|
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (cl->ssl_state)
|
2010-07-26 23:30:27 -07:00
|
|
|
{
|
2010-09-23 21:15:42 -07:00
|
|
|
case ECORE_CON_SSL_STATE_DONE:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
case ECORE_CON_SSL_STATE_INIT:
|
|
|
|
if (cl->host_server->type & ECORE_CON_USE_SSL2) /* not supported because of security issues */
|
|
|
|
return ECORE_CON_SSL_ERROR_SSL2_NOT_SUPPORTED;
|
2010-09-18 01:46:17 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (cl->host_server->type & ECORE_CON_SSL)
|
|
|
|
{
|
|
|
|
case ECORE_CON_USE_SSL3:
|
|
|
|
case ECORE_CON_USE_SSL3 | ECORE_CON_LOAD_CERT:
|
2010-09-28 14:59:13 -07:00
|
|
|
priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:!VERS-TLS1.0:!VERS-TLS1.1";
|
2010-09-23 21:15:42 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
case ECORE_CON_USE_TLS:
|
|
|
|
case ECORE_CON_USE_TLS | ECORE_CON_LOAD_CERT:
|
2010-09-28 14:59:13 -07:00
|
|
|
priority = "NONE:%VERIFY_ALLOW_X509_V1_CA_CRT:+RSA:+DHE-RSA:+DHE-DSS:+ANON-DH:+COMP-DEFLATE:+COMP-NULL:+CTYPE-X509:+SHA1:+SHA256:+SHA384:+SHA512:+AES-256-CBC:+AES-128-CBC:+3DES-CBC:!VERS-SSL3.0";
|
2010-09-23 21:15:42 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
_client_connected++;
|
2010-09-22 01:03:38 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_init(&cl->session, GNUTLS_SERVER));
|
2010-09-24 04:25:40 -07:00
|
|
|
#ifdef USE_GNUTLS_2_10
|
2010-09-23 23:54:49 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_session_ticket_key_generate(&cl->session_ticket));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_session_ticket_enable_server(cl->session, &cl->session_ticket));
|
2010-09-24 04:25:40 -07:00
|
|
|
#endif
|
2010-09-28 14:59:13 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(ret = gnutls_priority_set_direct(cl->session, priority, NULL));
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
gnutls_certificate_server_set_request(cl->session, GNUTLS_CERT_REQUEST);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
gnutls_dh_set_prime_bits(cl->session, 2048);
|
|
|
|
gnutls_transport_set_ptr(cl->session, (gnutls_transport_ptr_t)cl->fd);
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
case ECORE_CON_SSL_STATE_HANDSHAKING:
|
2010-09-29 07:52:36 -07:00
|
|
|
DBG("calling gnutls_handshake()");
|
2010-09-21 17:10:10 -07:00
|
|
|
ret = gnutls_handshake(cl->session);
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(gnutls_error_is_fatal(ret));
|
2010-09-23 21:15:42 -07:00
|
|
|
|
|
|
|
if (!ret)
|
|
|
|
{
|
|
|
|
cl->handshaking = EINA_FALSE;
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_DONE;
|
2010-09-29 16:56:31 -07:00
|
|
|
}
|
|
|
|
else
|
|
|
|
{
|
2010-09-29 16:53:00 -07:00
|
|
|
if (gnutls_record_get_direction(cl->session))
|
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_WRITE);
|
|
|
|
else
|
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_READ);
|
2010-09-29 17:45:48 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-23 21:15:42 -07:00
|
|
|
}
|
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
/* TODO: add cert verification support */
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-17 10:22:59 -07:00
|
|
|
|
2010-09-17 10:03:15 -07:00
|
|
|
error:
|
2010-09-27 20:16:08 -07:00
|
|
|
_gnutls_print_errors(ret);
|
2010-09-23 23:54:49 -07:00
|
|
|
if ((ret == GNUTLS_E_WARNING_ALERT_RECEIVED) || (ret == GNUTLS_E_FATAL_ALERT_RECEIVED))
|
|
|
|
ERR("Also received alert: %s", gnutls_alert_get_name(gnutls_alert_get(cl->session)));
|
|
|
|
ERR("last out: %s", SSL_GNUTLS_PRINT_HANDSHAKE_STATUS(gnutls_handshake_get_last_out(cl->session)));
|
|
|
|
ERR("last in: %s", SSL_GNUTLS_PRINT_HANDSHAKE_STATUS(gnutls_handshake_get_last_in(cl->session)));
|
2010-09-17 10:22:59 -07:00
|
|
|
_ecore_con_ssl_client_shutdown_gnutls(cl);
|
2010-09-17 10:03:15 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_client_shutdown_gnutls(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (cl->session)
|
|
|
|
{
|
|
|
|
gnutls_bye(cl->session, GNUTLS_SHUT_RDWR);
|
|
|
|
gnutls_deinit(cl->session);
|
2010-09-23 23:54:49 -07:00
|
|
|
gnutls_free(cl->session_ticket.data);
|
|
|
|
cl->session_ticket.data = NULL;
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
cl->session = NULL;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_client_read_gnutls(Ecore_Con_Client *cl, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (cl->ssl_state == ECORE_CON_SSL_STATE_HANDSHAKING)
|
|
|
|
{
|
|
|
|
if (!_ecore_con_ssl_client_init_gnutls(cl))
|
|
|
|
return 0;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
num = gnutls_record_recv(cl->session, buf, size);
|
|
|
|
if (num > 0)
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (num == GNUTLS_E_REHANDSHAKE)
|
|
|
|
{
|
2010-09-26 16:56:31 -07:00
|
|
|
WRN("Rehandshake request ignored");
|
|
|
|
return 0;
|
2010-09-24 20:02:10 -07:00
|
|
|
cl->handshaking = EINA_TRUE;
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
if (!_ecore_con_ssl_client_init_gnutls(cl))
|
|
|
|
return 0;
|
2010-09-26 16:56:31 -07:00
|
|
|
WRN("Rehandshake request ignored");
|
|
|
|
return 0;
|
2010-09-24 20:02:10 -07:00
|
|
|
}
|
|
|
|
else if ((num == GNUTLS_E_AGAIN) || (num == GNUTLS_E_INTERRUPTED))
|
2010-07-26 23:30:27 -07:00
|
|
|
return 0;
|
|
|
|
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_client_write_gnutls(Ecore_Con_Client *cl, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
|
|
|
|
if (cl->ssl_state == ECORE_CON_SSL_STATE_HANDSHAKING)
|
|
|
|
{
|
|
|
|
if (!_ecore_con_ssl_client_init_gnutls(cl))
|
|
|
|
return 0;
|
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
num = gnutls_record_send(cl->session, buf, size);
|
|
|
|
if (num > 0)
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-24 20:02:10 -07:00
|
|
|
if (num == GNUTLS_E_REHANDSHAKE)
|
|
|
|
{
|
2010-09-26 16:56:31 -07:00
|
|
|
WRN("Rehandshake request ignored");
|
|
|
|
return 0;
|
2010-09-24 20:02:10 -07:00
|
|
|
cl->handshaking = EINA_TRUE;
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
if (!_ecore_con_ssl_client_init_gnutls(cl))
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
else if ((num == GNUTLS_E_AGAIN) || (num == GNUTLS_E_INTERRUPTED))
|
2010-07-26 23:30:27 -07:00
|
|
|
return 0;
|
|
|
|
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 17:13:56 -07:00
|
|
|
#elif USE_OPENSSL && !USE_GNUTLS
|
2008-10-30 08:26:11 -07:00
|
|
|
|
|
|
|
/*
|
|
|
|
* OpenSSL
|
|
|
|
*/
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_init_openssl(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
SSL_library_init();
|
|
|
|
SSL_load_error_strings();
|
2010-09-17 18:27:38 -07:00
|
|
|
OpenSSL_add_all_algorithms();
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_shutdown_openssl(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
ERR_free_strings();
|
2010-09-17 18:27:38 -07:00
|
|
|
EVP_cleanup();
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-18 12:26:05 -07:00
|
|
|
_ecore_con_ssl_server_prepare_openssl(Ecore_Con_Server *svr, int ssl_type)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-09-18 01:36:13 -07:00
|
|
|
long options;
|
2010-09-22 15:06:49 -07:00
|
|
|
int dh = 0;
|
2010-09-18 01:36:13 -07:00
|
|
|
|
2010-09-19 12:38:38 -07:00
|
|
|
if (ssl_type & ECORE_CON_USE_SSL2)
|
|
|
|
return ECORE_CON_SSL_ERROR_SSL2_NOT_SUPPORTED;
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
switch (ssl_type)
|
2010-07-26 23:30:27 -07:00
|
|
|
{
|
|
|
|
case ECORE_CON_USE_SSL3:
|
2010-09-17 01:00:42 -07:00
|
|
|
case ECORE_CON_USE_SSL3 | ECORE_CON_LOAD_CERT:
|
2010-09-18 12:26:05 -07:00
|
|
|
if (!svr->created)
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(SSLv3_client_method())));
|
|
|
|
else
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(SSLv3_server_method())));
|
2010-07-26 23:30:27 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
case ECORE_CON_USE_TLS:
|
2010-09-17 01:00:42 -07:00
|
|
|
case ECORE_CON_USE_TLS | ECORE_CON_LOAD_CERT:
|
2010-09-18 12:26:05 -07:00
|
|
|
if (!svr->created)
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(TLSv1_client_method())));
|
|
|
|
else
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(TLSv1_server_method())));
|
2010-09-18 01:36:13 -07:00
|
|
|
break;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-09-22 15:44:54 -07:00
|
|
|
case ECORE_CON_USE_MIXED:
|
|
|
|
case ECORE_CON_USE_MIXED | ECORE_CON_LOAD_CERT:
|
2010-09-18 12:26:05 -07:00
|
|
|
if (!svr->created)
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(SSLv23_client_method())));
|
|
|
|
else
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl_ctx = SSL_CTX_new(SSLv23_server_method())));
|
2010-09-18 01:36:13 -07:00
|
|
|
options = SSL_CTX_get_options(svr->ssl_ctx);
|
2010-09-22 17:16:42 -07:00
|
|
|
SSL_CTX_set_options(svr->ssl_ctx, options | SSL_OP_NO_SSLv2 | SSL_OP_SINGLE_DH_USE);
|
2010-07-26 23:30:27 -07:00
|
|
|
break;
|
|
|
|
|
|
|
|
default:
|
2010-09-18 12:26:05 -07:00
|
|
|
break;
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
if ((!svr->use_cert) && svr->created)
|
2010-09-22 10:37:25 -07:00
|
|
|
{
|
2010-09-22 17:16:42 -07:00
|
|
|
DH *dh_params;
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(dh_params = DH_new()));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!DH_generate_parameters_ex(dh_params, 1024, DH_GENERATOR_5, NULL));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!DH_check(dh_params, &dh));
|
2010-09-22 15:06:49 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR((dh & DH_CHECK_P_NOT_PRIME) || (dh & DH_CHECK_P_NOT_SAFE_PRIME));
|
2010-09-22 17:16:42 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!DH_generate_key(dh_params));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_CTX_set_tmp_dh(svr->ssl_ctx, dh_params));
|
|
|
|
DH_free(dh_params);
|
2010-09-23 03:35:30 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_CTX_set_cipher_list(svr->ssl_ctx, "aNULL:!eNULL:!LOW:!EXPORT:@STRENGTH"));
|
2010-09-22 10:37:25 -07:00
|
|
|
}
|
2010-09-27 20:16:08 -07:00
|
|
|
else if (!svr->use_cert)
|
2010-09-23 03:35:30 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_CTX_set_cipher_list(svr->ssl_ctx, "aNULL:!eNULL:!LOW:!EXPORT:!ECDH:RSA:AES:!PSK:@STRENGTH"));
|
2010-09-22 17:16:42 -07:00
|
|
|
|
2010-10-02 15:01:43 -07:00
|
|
|
SSL_CTX_set_verify(svr->ssl_ctx, SSL_VERIFY_PEER, NULL);
|
2010-10-02 02:14:41 -07:00
|
|
|
|
2010-10-02 15:01:43 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-18 12:26:05 -07:00
|
|
|
|
|
|
|
error:
|
2010-09-22 15:06:49 -07:00
|
|
|
if (dh)
|
|
|
|
{
|
|
|
|
if (dh & DH_CHECK_P_NOT_PRIME)
|
|
|
|
ERR("openssl error: dh_params could not generate a prime!");
|
|
|
|
else
|
|
|
|
ERR("openssl error: dh_params could not generate a safe prime!");
|
|
|
|
}
|
|
|
|
else
|
2010-09-27 20:16:08 -07:00
|
|
|
_openssl_print_errors();
|
2010-09-22 15:06:49 -07:00
|
|
|
_ecore_con_ssl_server_shutdown_openssl(svr);
|
2010-09-18 12:26:05 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
|
|
|
}
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
|
|
|
|
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_server_init_openssl(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-10-02 02:14:41 -07:00
|
|
|
int ret = -1;
|
2010-09-21 00:04:10 -07:00
|
|
|
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (svr->ssl_state)
|
2010-09-21 00:04:10 -07:00
|
|
|
{
|
2010-09-23 21:15:42 -07:00
|
|
|
case ECORE_CON_SSL_STATE_DONE:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
case ECORE_CON_SSL_STATE_INIT:
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(svr->ssl = SSL_new(svr->ssl_ctx)));
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_set_fd(svr->ssl, svr->fd));
|
|
|
|
SSL_set_connect_state(svr->ssl);
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
case ECORE_CON_SSL_STATE_HANDSHAKING:
|
2010-09-22 10:37:25 -07:00
|
|
|
ret = SSL_do_handshake(svr->ssl);
|
2010-10-02 02:14:41 -07:00
|
|
|
svr->ssl_err = SSL_get_error(svr->ssl, ret);
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR((svr->ssl_err == SSL_ERROR_SYSCALL) || (svr->ssl_err == SSL_ERROR_SSL));
|
2010-09-23 21:15:42 -07:00
|
|
|
|
|
|
|
if (ret == 1)
|
|
|
|
{
|
|
|
|
svr->handshaking = EINA_FALSE;
|
|
|
|
svr->ssl_state = ECORE_CON_SSL_STATE_DONE;
|
|
|
|
}
|
2010-09-29 18:50:58 -07:00
|
|
|
else
|
|
|
|
{
|
2010-10-02 02:14:41 -07:00
|
|
|
if (svr->ssl_err == SSL_ERROR_WANT_READ)
|
2010-09-29 18:53:23 -07:00
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_READ);
|
2010-10-02 02:14:41 -07:00
|
|
|
else if (svr->ssl_err == SSL_ERROR_WANT_WRITE)
|
2010-09-29 18:53:23 -07:00
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_WRITE);
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-29 18:50:58 -07:00
|
|
|
}
|
2010-09-23 21:15:42 -07:00
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
2010-07-26 23:30:27 -07:00
|
|
|
|
2010-10-02 02:58:06 -07:00
|
|
|
{
|
|
|
|
/* print session info into DBG */
|
|
|
|
SSL_SESSION *s;
|
|
|
|
BIO *b;
|
|
|
|
char log[4096];
|
|
|
|
|
|
|
|
|
|
|
|
memset(log, 0, sizeof(log));
|
|
|
|
s = SSL_get_session(svr->ssl);
|
|
|
|
b = BIO_new(BIO_s_mem());
|
|
|
|
SSL_SESSION_print(b, s);
|
|
|
|
while (BIO_read(b, log, sizeof(log)) > 0)
|
|
|
|
DBG("%s", log);
|
|
|
|
|
|
|
|
BIO_free(b);
|
|
|
|
}
|
|
|
|
|
2010-10-02 02:14:41 -07:00
|
|
|
if (!svr->verify)
|
|
|
|
/* not verifying certificates, so we're done! */
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
|
|
|
|
/* use CRL/CA lists to verify */
|
|
|
|
if (SSL_get_peer_certificate(svr->ssl))
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(SSL_get_verify_result(svr->ssl));
|
2010-10-02 15:27:30 -07:00
|
|
|
DBG("SSL certificate verification succeeded!");
|
2010-10-02 02:14:41 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-17 22:31:00 -07:00
|
|
|
|
|
|
|
error:
|
2010-09-27 20:16:08 -07:00
|
|
|
_openssl_print_errors();
|
2010-09-19 11:40:43 -07:00
|
|
|
_ecore_con_ssl_server_shutdown_openssl(svr);
|
2010-09-17 22:31:00 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
static Eina_Bool
|
2010-09-27 20:16:08 -07:00
|
|
|
_ecore_con_ssl_server_cafile_add_openssl(Ecore_Con_Server *svr, const char *ca_file)
|
2010-07-28 11:25:46 -07:00
|
|
|
{
|
2010-09-27 20:16:08 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_CTX_load_verify_locations(svr->ssl_ctx, ca_file, NULL));
|
|
|
|
return EINA_TRUE;
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
error:
|
|
|
|
_openssl_print_errors();
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_crl_add_openssl(Ecore_Con_Server *svr, const char *crl_file)
|
|
|
|
{
|
2010-10-01 18:32:05 -07:00
|
|
|
X509_STORE *st;
|
|
|
|
X509_LOOKUP *lu;
|
2010-10-02 02:58:06 -07:00
|
|
|
static Eina_Bool flag = EINA_FALSE;
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-10-01 18:32:05 -07:00
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(st = SSL_CTX_get_cert_store(svr->ssl_ctx)));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(lu = X509_STORE_add_lookup(st, X509_LOOKUP_file())));
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(X509_load_crl_file(lu, crl_file, X509_FILETYPE_PEM) < 1);
|
2010-10-02 02:58:06 -07:00
|
|
|
if (!flag)
|
|
|
|
{
|
|
|
|
X509_STORE_set_flags(st, X509_V_FLAG_CRL_CHECK | X509_V_FLAG_CRL_CHECK_ALL);
|
|
|
|
flag = EINA_TRUE;
|
|
|
|
}
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
return EINA_TRUE;
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
error:
|
|
|
|
_openssl_print_errors();
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_privkey_add_openssl(Ecore_Con_Server *svr, const char *key_file)
|
|
|
|
{
|
|
|
|
FILE *fp = NULL;
|
|
|
|
EVP_PKEY *privkey = NULL;
|
|
|
|
|
|
|
|
if (!(fp = fopen(key_file, "r")))
|
|
|
|
goto error;
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(privkey = PEM_read_PrivateKey(fp, NULL, NULL, NULL)));
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
fclose(fp);
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(SSL_CTX_use_PrivateKey(svr->ssl_ctx, privkey) < 1);
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(SSL_CTX_check_private_key(svr->ssl_ctx) < 1);
|
2010-07-28 11:25:46 -07:00
|
|
|
|
|
|
|
return EINA_TRUE;
|
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
error:
|
2010-07-28 11:25:46 -07:00
|
|
|
if (fp)
|
|
|
|
fclose(fp);
|
2010-09-27 20:16:08 -07:00
|
|
|
_openssl_print_errors();
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_cert_add_openssl(Ecore_Con_Server *svr, const char *cert_file)
|
|
|
|
{
|
|
|
|
FILE *fp = NULL;
|
|
|
|
X509 *cert = NULL;
|
|
|
|
|
|
|
|
if (!(fp = fopen(cert_file, "r")))
|
|
|
|
goto error;
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(cert = PEM_read_X509(fp, NULL, NULL, NULL)));
|
|
|
|
|
|
|
|
fclose(fp);
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(SSL_CTX_use_certificate(svr->ssl_ctx, cert) < 1);
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2010-09-27 20:16:08 -07:00
|
|
|
return EINA_TRUE;
|
|
|
|
|
|
|
|
error:
|
|
|
|
if (fp)
|
|
|
|
fclose(fp);
|
|
|
|
_openssl_print_errors();
|
2010-07-28 11:25:46 -07:00
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_server_shutdown_openssl(Ecore_Con_Server *svr)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (svr->ssl)
|
|
|
|
{
|
|
|
|
if (!SSL_shutdown(svr->ssl))
|
|
|
|
SSL_shutdown(svr->ssl);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
SSL_free(svr->ssl);
|
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (svr->ssl_ctx)
|
|
|
|
SSL_CTX_free(svr->ssl_ctx);
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
svr->ssl = NULL;
|
|
|
|
svr->ssl_ctx = NULL;
|
|
|
|
svr->ssl_err = SSL_ERROR_NONE;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_server_read_openssl(Ecore_Con_Server *svr, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
num = SSL_read(svr->ssl, buf, size);
|
|
|
|
svr->ssl_err = SSL_get_error(svr->ssl, num);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (svr->fd_handler)
|
|
|
|
{
|
2010-09-24 20:02:10 -07:00
|
|
|
if (svr->ssl && svr->ssl_err == SSL_ERROR_WANT_READ)
|
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_READ);
|
|
|
|
else if (svr->ssl && svr->ssl_err == SSL_ERROR_WANT_WRITE)
|
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_WRITE);
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if ((svr->ssl_err == SSL_ERROR_ZERO_RETURN) ||
|
|
|
|
(svr->ssl_err == SSL_ERROR_SYSCALL) ||
|
|
|
|
(svr->ssl_err == SSL_ERROR_SSL))
|
|
|
|
return -1;
|
|
|
|
|
|
|
|
if (num < 0)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_server_write_openssl(Ecore_Con_Server *svr, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
|
|
|
num = SSL_write(svr->ssl, buf, size);
|
|
|
|
svr->ssl_err = SSL_get_error(svr->ssl, num);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (svr->fd_handler)
|
|
|
|
{
|
2010-09-29 18:01:41 -07:00
|
|
|
if (svr->ssl && svr->ssl_err == SSL_ERROR_WANT_READ)
|
|
|
|
ecore_main_fd_handler_active_set(svr->fd_handler, ECORE_FD_READ);
|
|
|
|
else if (svr->ssl && svr->ssl_err == SSL_ERROR_WANT_WRITE)
|
|
|
|
ecore_main_fd_handler_active_set( svr->fd_handler, ECORE_FD_WRITE);
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if ((svr->ssl_err == SSL_ERROR_ZERO_RETURN) ||
|
|
|
|
(svr->ssl_err == SSL_ERROR_SYSCALL) ||
|
|
|
|
(svr->ssl_err == SSL_ERROR_SSL))
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (num < 0)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_client_init_openssl(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-10-02 02:14:41 -07:00
|
|
|
int ret = -1;
|
2010-09-23 21:15:42 -07:00
|
|
|
switch (cl->ssl_state)
|
2010-09-20 11:25:21 -07:00
|
|
|
{
|
2010-09-23 21:15:42 -07:00
|
|
|
case ECORE_CON_SSL_STATE_DONE:
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
case ECORE_CON_SSL_STATE_INIT:
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!(cl->ssl = SSL_new(cl->host_server->ssl_ctx)));
|
|
|
|
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(!SSL_set_fd(cl->ssl, cl->fd));
|
|
|
|
SSL_set_accept_state(cl->ssl);
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_HANDSHAKING;
|
|
|
|
case ECORE_CON_SSL_STATE_HANDSHAKING:
|
2010-09-22 10:37:25 -07:00
|
|
|
ret = SSL_do_handshake(cl->ssl);
|
2010-10-02 02:14:41 -07:00
|
|
|
cl->ssl_err = SSL_get_error(cl->ssl, ret);
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR((cl->ssl_err == SSL_ERROR_SYSCALL) || (cl->ssl_err == SSL_ERROR_SSL));
|
2010-09-23 21:15:42 -07:00
|
|
|
if (ret == 1)
|
|
|
|
{
|
|
|
|
cl->handshaking = EINA_FALSE;
|
|
|
|
cl->ssl_state = ECORE_CON_SSL_STATE_DONE;
|
|
|
|
}
|
2010-09-29 18:50:58 -07:00
|
|
|
else
|
|
|
|
{
|
2010-10-02 02:14:41 -07:00
|
|
|
if (cl->ssl_err == SSL_ERROR_WANT_READ)
|
2010-09-29 18:50:58 -07:00
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_READ);
|
2010-10-02 02:14:41 -07:00
|
|
|
else if (cl->ssl_err == SSL_ERROR_WANT_WRITE)
|
2010-09-29 18:50:58 -07:00
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_WRITE);
|
2010-09-29 18:53:23 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-29 18:50:58 -07:00
|
|
|
}
|
2010-09-23 21:15:42 -07:00
|
|
|
default:
|
|
|
|
break;
|
|
|
|
}
|
2010-09-22 01:03:38 -07:00
|
|
|
|
2010-10-02 02:58:06 -07:00
|
|
|
{
|
|
|
|
/* print session info into DBG */
|
|
|
|
SSL_SESSION *s;
|
|
|
|
BIO *b;
|
|
|
|
char log[4096];
|
|
|
|
|
|
|
|
|
|
|
|
memset(log, 0, sizeof(log));
|
|
|
|
s = SSL_get_session(cl->ssl);
|
|
|
|
b = BIO_new(BIO_s_mem());
|
|
|
|
SSL_SESSION_print(b, s);
|
|
|
|
while (BIO_read(b, log, sizeof(log)) > 0)
|
|
|
|
DBG("%s", log);
|
|
|
|
|
|
|
|
BIO_free(b);
|
|
|
|
}
|
|
|
|
|
|
|
|
|
2010-10-02 02:14:41 -07:00
|
|
|
if (!cl->host_server->verify)
|
|
|
|
/* not verifying certificates, so we're done! */
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
|
|
|
|
|
|
|
/* use CRL/CA lists to verify */
|
|
|
|
if (SSL_get_peer_certificate(cl->ssl))
|
|
|
|
SSL_ERROR_CHECK_GOTO_ERROR(SSL_get_verify_result(cl->ssl));
|
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2010-09-17 22:31:00 -07:00
|
|
|
|
|
|
|
error:
|
2010-09-27 20:16:08 -07:00
|
|
|
_openssl_print_errors();
|
2010-09-19 11:40:43 -07:00
|
|
|
_ecore_con_ssl_client_shutdown_openssl(cl);
|
2010-09-17 22:31:00 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_SERVER_INIT_FAILED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 11:25:46 -07:00
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_client_shutdown_openssl(Ecore_Con_Client *cl)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
if (cl->ssl)
|
|
|
|
{
|
|
|
|
if (!SSL_shutdown(cl->ssl))
|
|
|
|
SSL_shutdown(cl->ssl);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
SSL_free(cl->ssl);
|
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
cl->ssl = NULL;
|
|
|
|
cl->ssl_err = SSL_ERROR_NONE;
|
2010-07-26 23:30:27 -07:00
|
|
|
|
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_client_read_openssl(Ecore_Con_Client *cl, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
|
|
|
num = SSL_read(cl->ssl, buf, size);
|
|
|
|
cl->ssl_err = SSL_get_error(cl->ssl, num);
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (cl->fd_handler)
|
|
|
|
{
|
2010-09-29 18:01:41 -07:00
|
|
|
if (cl->ssl && cl->ssl_err == SSL_ERROR_WANT_READ)
|
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_READ);
|
|
|
|
else if (cl->ssl && cl->ssl_err == SSL_ERROR_WANT_WRITE)
|
|
|
|
ecore_main_fd_handler_active_set( cl->fd_handler, ECORE_FD_WRITE);
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if ((cl->ssl_err == SSL_ERROR_ZERO_RETURN) ||
|
|
|
|
(cl->ssl_err == SSL_ERROR_SYSCALL) ||
|
|
|
|
(cl->ssl_err == SSL_ERROR_SSL))
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (num < 0)
|
|
|
|
return 0;
|
|
|
|
|
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-07-26 23:30:27 -07:00
|
|
|
_ecore_con_ssl_client_write_openssl(Ecore_Con_Client *cl, unsigned char *buf,
|
|
|
|
int size)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
int num;
|
|
|
|
|
|
|
|
num = SSL_write(cl->ssl, buf, size);
|
|
|
|
cl->ssl_err = SSL_get_error(cl->ssl, num);
|
|
|
|
|
|
|
|
if (cl->fd_handler)
|
|
|
|
{
|
2010-09-29 18:01:41 -07:00
|
|
|
if (cl->ssl && cl->ssl_err == SSL_ERROR_WANT_READ)
|
|
|
|
ecore_main_fd_handler_active_set(cl->fd_handler, ECORE_FD_READ);
|
|
|
|
else if (cl->ssl && cl->ssl_err == SSL_ERROR_WANT_WRITE)
|
|
|
|
ecore_main_fd_handler_active_set( cl->fd_handler, ECORE_FD_WRITE);
|
2010-07-26 23:30:27 -07:00
|
|
|
}
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if ((cl->ssl_err == SSL_ERROR_ZERO_RETURN) ||
|
|
|
|
(cl->ssl_err == SSL_ERROR_SYSCALL) ||
|
|
|
|
(cl->ssl_err == SSL_ERROR_SSL))
|
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
if (num < 0)
|
|
|
|
return 0;
|
2008-10-30 08:26:11 -07:00
|
|
|
|
2010-07-26 23:30:27 -07:00
|
|
|
return num;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#else
|
|
|
|
|
|
|
|
/*
|
|
|
|
* No Ssl
|
|
|
|
*/
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_init_none(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_shutdown_none(void)
|
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-09-18 12:26:05 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
|
|
|
_ecore_con_ssl_server_prepare_none(Ecore_Con_Server *svr __UNUSED__, int ssl_type __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-09-18 12:26:05 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NONE;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_server_init_none(Ecore_Con_Server *svr __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NOT_SUPPORTED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
2010-07-28 12:58:57 -07:00
|
|
|
static Eina_Bool
|
2010-09-27 20:16:08 -07:00
|
|
|
_ecore_con_ssl_server_cafile_add_none(Ecore_Con_Server *svr __UNUSED__, const char *ca_file __UNUSED__)
|
2010-07-28 12:58:57 -07:00
|
|
|
{
|
2010-09-27 20:16:08 -07:00
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_cert_add_none(Ecore_Con_Server *svr __UNUSED__, const char *cert_file __UNUSED__)
|
|
|
|
{
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_privkey_add_none(Ecore_Con_Server *svr __UNUSED__, const char *key_file __UNUSED__)
|
|
|
|
{
|
|
|
|
return EINA_FALSE;
|
|
|
|
}
|
|
|
|
|
|
|
|
static Eina_Bool
|
|
|
|
_ecore_con_ssl_server_crl_add_none(Ecore_Con_Server *svr __UNUSED__, const char *crl_file __UNUSED__)
|
|
|
|
{
|
|
|
|
return EINA_FALSE;
|
2010-07-28 12:58:57 -07:00
|
|
|
}
|
|
|
|
|
2008-10-30 08:26:11 -07:00
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_server_shutdown_none(Ecore_Con_Server *svr __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NOT_SUPPORTED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_server_read_none(Ecore_Con_Server *svr __UNUSED__, unsigned char *buf __UNUSED__,
|
|
|
|
int size __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_server_write_none(Ecore_Con_Server *svr __UNUSED__, unsigned char *buf __UNUSED__,
|
|
|
|
int size __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_client_init_none(Ecore_Con_Client *cl __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NOT_SUPPORTED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static Ecore_Con_Ssl_Error
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_client_shutdown_none(Ecore_Con_Client *cl __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return ECORE_CON_SSL_ERROR_NOT_SUPPORTED;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_client_read_none(Ecore_Con_Client *cl __UNUSED__, unsigned char *buf __UNUSED__,
|
|
|
|
int size __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
static int
|
2010-09-18 20:55:06 -07:00
|
|
|
_ecore_con_ssl_client_write_none(Ecore_Con_Client *cl __UNUSED__, unsigned char *buf __UNUSED__,
|
|
|
|
int size __UNUSED__)
|
2008-10-30 08:26:11 -07:00
|
|
|
{
|
2010-07-26 23:30:27 -07:00
|
|
|
return -1;
|
2008-10-30 08:26:11 -07:00
|
|
|
}
|
|
|
|
|
|
|
|
#endif
|