/* test.h */ #ifndef wolfSSL_TEST_H #define wolfSSL_TEST_H #include #include #include #include #include #include #include #ifdef ATOMIC_USER #include #include #include #endif #ifdef HAVE_PK_CALLBACKS #include #ifdef HAVE_ECC #include #endif /* HAVE_ECC */ #endif /*HAVE_PK_CALLBACKS */ #ifdef USE_WINDOWS_API #include #include #ifdef TEST_IPV6 /* don't require newer SDK for IPV4 */ #include #include #endif #define SOCKET_T SOCKET #define SNPRINTF _snprintf #elif defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_TCP_NET) #include #include "rl_net.h" #define SOCKET_T int typedef int socklen_t ; static unsigned long inet_addr(const char *cp) { unsigned int a[4] ; unsigned long ret ; sscanf(cp, "%d.%d.%d.%d", &a[0], &a[1], &a[2], &a[3]) ; ret = ((a[3]<<24) + (a[2]<<16) + (a[1]<<8) + a[0]) ; return(ret) ; } #if defined(HAVE_KEIL_RTX) #define sleep(t) os_dly_wait(t/1000+1) ; #elif defined (WOLFSSL_CMSIS_RTOS) #define sleep(t) osDelay(t/1000+1) ; #endif static int wolfssl_tcp_select(int sd, int timeout) { return 0 ; } #define tcp_select(sd,t) wolfssl_tcp_select(sd, t) /* avoid conflicting Keil TCP tcp_select */ #elif defined(WOLFSSL_TIRTOS) #include #include #include #include #include #include struct hostent { char *h_name; /* official name of host */ char **h_aliases; /* alias list */ int h_addrtype; /* host address type */ int h_length; /* length of address */ char **h_addr_list; /* list of addresses from name server */ }; #define SOCKET_T int #elif defined(WOLFSSL_VXWORKS) #include #include #include #include #include #include #include #include #include #include #include #define SOCKET_T int #else #include #include #if 0//ndef WOLFSSL_LEANPSK #include #include #include #include #include #include #include #include #include #include #ifdef TEST_IPV6 #include #endif #endif #define SOCKET_T int #ifndef SO_NOSIGPIPE #include /* ignore SIGPIPE */ #endif #define SNPRINTF snprintf #endif /* USE_WINDOWS_API */ #ifdef HAVE_CAVIUM #include "cavium_sysdep.h" #include "cavium_common.h" #include "cavium_ioctl.h" #endif #ifdef _MSC_VER /* disable conversion warning */ /* 4996 warning to use MS extensions e.g., strcpy_s instead of strncpy */ #pragma warning(disable:4244 4996) #endif /* Buffer for benchmark tests */ #ifndef TEST_BUFFER_SIZE #define TEST_BUFFER_SIZE 16384 #endif #ifndef min #define WOLFSSL_HAVE_MIN static INLINE word32 min(word32 a, word32 b) { return a > b ? b : a; } #endif /* WOLFSSL_HAVE_MIN */ /* Socket Handling */ #ifndef WOLFSSL_SOCKET_INVALID #ifdef USE_WINDOWS_API #define WOLFSSL_SOCKET_INVALID INVALID_SOCKET #elif defined(WOLFSSL_TIRTOS) #define WOLFSSL_SOCKET_INVALID -1 #else #define WOLFSSL_SOCKET_INVALID 0 #endif #endif /* WOLFSSL_SOCKET_INVALID */ #ifndef WOLFSSL_SOCKET_IS_INVALID #ifdef USE_WINDOWS_API #define WOLFSSL_SOCKET_IS_INVALID(s) ((s) == WOLFSSL_SOCKET_INVALID) #elif defined(WOLFSSL_TIRTOS) #define WOLFSSL_SOCKET_IS_INVALID(s) ((s) == WOLFSSL_SOCKET_INVALID) #else #define WOLFSSL_SOCKET_IS_INVALID(s) ((s) < WOLFSSL_SOCKET_INVALID) #endif #endif /* WOLFSSL_SOCKET_IS_INVALID */ #if defined(__MACH__) || defined(USE_WINDOWS_API) #ifndef _SOCKLEN_T typedef int socklen_t; #endif #endif #ifdef WOLFSSL_LWIP /* lwIP needs to be configured to use sockets API in this mode */ /* LWIP_SOCKET 1 in lwip/opt.h or in build */ #pragma warning(disable : 4005) #include #include #pragma warning(default : 4005) //#include #ifndef LWIP_PROVIDE_ERRNO #define LWIP_PROVIDE_ERRNO 1 #endif #endif /* HPUX doesn't use socklent_t for third parameter to accept, unless _XOPEN_SOURCE_EXTENDED is defined */ #if !defined(__hpux__) && !defined(WOLFSSL_MDK_ARM) && !defined(WOLFSSL_IAR_ARM)\ && !defined(WOLFSSL_ROWLEY_ARM) && !defined(WOLFSSL_KEIL_TCP_NET) typedef socklen_t* ACCEPT_THIRD_T; #else #if defined _XOPEN_SOURCE_EXTENDED typedef socklen_t* ACCEPT_THIRD_T; #else typedef int* ACCEPT_THIRD_T; #endif #endif #ifdef USE_WINDOWS_API #define CloseSocket(s) closesocket(s) #define StartTCP() { WSADATA wsd; WSAStartup(0x0002, &wsd); } #elif defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_TCP_NET) #define CloseSocket(s) closesocket(s) #define StartTCP() #else #define CloseSocket(s) close(s) #define StartTCP() #endif #ifdef SINGLE_THREADED typedef unsigned int THREAD_RETURN; typedef void* THREAD_TYPE; #define WOLFSSL_THREAD #else #if defined(_POSIX_THREADS) && !defined(__MINGW32__) typedef void* THREAD_RETURN; typedef pthread_t THREAD_TYPE; #define WOLFSSL_THREAD #define INFINITE -1 #define WAIT_OBJECT_0 0L #elif defined(WOLFSSL_MDK_ARM)|| defined(WOLFSSL_KEIL_TCP_NET) typedef unsigned int THREAD_RETURN; typedef int THREAD_TYPE; #define WOLFSSL_THREAD #elif defined(WOLFSSL_TIRTOS) typedef void THREAD_RETURN; typedef Task_Handle THREAD_TYPE; #define WOLFSSL_THREAD #else typedef unsigned int THREAD_RETURN; typedef intptr_t THREAD_TYPE; #define WOLFSSL_THREAD __stdcall #endif #endif #ifdef TEST_IPV6 typedef struct sockaddr_in6 SOCKADDR_IN_T; #define AF_INET_V AF_INET6 #else typedef struct sockaddr_in SOCKADDR_IN_T; #define AF_INET_V AF_INET #endif #define SERVER_DEFAULT_VERSION 3 #define SERVER_DTLS_DEFAULT_VERSION (-2) #define SERVER_INVALID_VERSION (-99) #define CLIENT_DEFAULT_VERSION 3 #define CLIENT_DTLS_DEFAULT_VERSION (-2) #define CLIENT_INVALID_VERSION (-99) #if !defined(NO_FILESYSTEM) && defined(WOLFSSL_MAX_STRENGTH) #define DEFAULT_MIN_DHKEY_BITS 2048 #else #define DEFAULT_MIN_DHKEY_BITS 1024 #endif /* all certs relative to wolfSSL home directory now */ #if defined(WOLFSSL_NO_CURRDIR) || defined(WOLFSSL_MDK_SHELL) #define caCert "certs/ca-cert.pem" #define eccCert "certs/server-ecc.pem" #define eccKey "certs/ecc-key.pem" #define svrCert "certs/server-cert.pem" #define svrKey "certs/server-key.pem" #define cliCert "certs/client-cert.pem" #define cliKey "certs/client-key.pem" #define ntruCert "certs/ntru-cert.pem" #define ntruKey "certs/ntru-key.raw" #define dhParam "certs/dh2048.pem" #define cliEccKey "certs/ecc-client-key.pem" #define cliEccCert "certs/client-ecc-cert.pem" #define crlPemDir "certs/crl" #else #define caCert "./certs/ca-cert.pem" #define eccCert "./certs/server-ecc.pem" #define eccKey "./certs/ecc-key.pem" #define svrCert "./certs/server-cert.pem" #define svrKey "./certs/server-key.pem" #define cliCert "./certs/client-cert.pem" #define cliKey "./certs/client-key.pem" #define ntruCert "./certs/ntru-cert.pem" #define ntruKey "./certs/ntru-key.raw" #define dhParam "./certs/dh2048.pem" #define cliEccKey "./certs/ecc-client-key.pem" #define cliEccCert "./certs/client-ecc-cert.pem" #define crlPemDir "./certs/crl" #endif typedef struct tcp_ready { word16 ready; /* predicate */ word16 port; #if defined(_POSIX_THREADS) && !defined(__MINGW32__) pthread_mutex_t mutex; pthread_cond_t cond; #endif } tcp_ready; void InitTcpReady(tcp_ready*); void FreeTcpReady(tcp_ready*); typedef WOLFSSL_METHOD* (*method_provider)(void); typedef void (*ctx_callback)(WOLFSSL_CTX* ctx); typedef void (*ssl_callback)(WOLFSSL* ssl); typedef struct callback_functions { method_provider method; ctx_callback ctx_ready; ssl_callback ssl_ready; ssl_callback on_result; } callback_functions; typedef struct func_args { int argc; char** argv; int return_code; tcp_ready* signal; callback_functions *callbacks; } func_args; void wait_tcp_ready(func_args*); typedef THREAD_RETURN WOLFSSL_THREAD THREAD_FUNC(void*); void start_thread(THREAD_FUNC, func_args*, THREAD_TYPE*); void join_thread(THREAD_TYPE); #undef INADDR_ANY static const char* const INADDR_ANY = "0.0.0.0"; /* wolfSSL */ #ifndef TEST_IPV6 static const char* const wolfSSLIP = "127.0.0.1"; #else static const char* const wolfSSLIP = "::1"; #endif static const word16 wolfSSLPort = 11111; static INLINE void err_sys(const char* msg) { printf("wolfSSL error: %s\n", msg); if (msg) exit(EXIT_FAILURE); } #define MY_EX_USAGE 2 extern int myoptind; extern char* myoptarg; static INLINE int mygetopt(int argc, char** argv, const char* optstring) { static char* next = NULL; char c; char* cp; if (myoptind == 0) next = NULL; /* we're starting new/over */ if (next == NULL || *next == '\0') { if (myoptind == 0) myoptind++; if (myoptind >= argc || argv[myoptind][0] != '-' || argv[myoptind][1] == '\0') { myoptarg = NULL; if (myoptind < argc) myoptarg = argv[myoptind]; return -1; } if (strcmp(argv[myoptind], "--") == 0) { myoptind++; myoptarg = NULL; if (myoptind < argc) myoptarg = argv[myoptind]; return -1; } next = argv[myoptind]; next++; /* skip - */ myoptind++; } c = *next++; /* The C++ strchr can return a different value */ cp = (char*)strchr(optstring, c); if (cp == NULL || c == ':') return '?'; cp++; if (*cp == ':') { if (*next != '\0') { myoptarg = next; next = NULL; } else if (myoptind < argc) { myoptarg = argv[myoptind]; myoptind++; } else return '?'; } return c; } #if defined(OPENSSL_EXTRA) || defined(HAVE_WEBSERVER) static INLINE int PasswordCallBack(char* passwd, int sz, int rw, void* userdata) { (void)rw; (void)userdata; strncpy(passwd, "yassl123", sz); return 8; } #endif #if defined(KEEP_PEER_CERT) || defined(SESSION_CERTS) static INLINE void ShowX509(WOLFSSL_X509* x509, const char* hdr) { char* altName; char* issuer = wolfSSL_X509_NAME_oneline( wolfSSL_X509_get_issuer_name(x509), 0, 0); char* subject = wolfSSL_X509_NAME_oneline( wolfSSL_X509_get_subject_name(x509), 0, 0); byte serial[32]; int ret; int sz = sizeof(serial); printf("%s\n issuer : %s\n subject: %s\n", hdr, issuer, subject); while ( (altName = wolfSSL_X509_get_next_altname(x509)) != NULL) printf(" altname = %s\n", altName); ret = wolfSSL_X509_get_serial_number(x509, serial, &sz); if (ret == SSL_SUCCESS) { int i; int strLen; char serialMsg[80]; /* testsuite has multiple threads writing to stdout, get output message ready to write once */ strLen = sprintf(serialMsg, " serial number"); for (i = 0; i < sz; i++) sprintf(serialMsg + strLen + (i*3), ":%02x ", serial[i]); printf("%s\n", serialMsg); } XFREE(subject, 0, DYNAMIC_TYPE_OPENSSL); XFREE(issuer, 0, DYNAMIC_TYPE_OPENSSL); } #endif /* KEEP_PEER_CERT || SESSION_CERTS */ static INLINE void showPeer(WOLFSSL* ssl) { WOLFSSL_CIPHER* cipher; #ifdef KEEP_PEER_CERT WOLFSSL_X509* peer = wolfSSL_get_peer_certificate(ssl); if (peer) ShowX509(peer, "peer's cert info:"); else printf("peer has no cert!\n"); wolfSSL_FreeX509(peer); #endif printf("SSL version is %s\n", wolfSSL_get_version(ssl)); cipher = wolfSSL_get_current_cipher(ssl); printf("SSL cipher suite is %s\n", wolfSSL_CIPHER_get_name(cipher)); #if defined(SESSION_CERTS) && defined(SHOW_CERTS) { WOLFSSL_X509_CHAIN* chain = wolfSSL_get_peer_chain(ssl); int count = wolfSSL_get_chain_count(chain); int i; for (i = 0; i < count; i++) { int length; unsigned char buffer[3072]; WOLFSSL_X509* chainX509; wolfSSL_get_chain_cert_pem(chain,i,buffer, sizeof(buffer), &length); buffer[length] = 0; printf("cert %d has length %d data = \n%s\n", i, length, buffer); chainX509 = wolfSSL_get_chain_X509(chain, i); if (chainX509) ShowX509(chainX509, "session cert info:"); else printf("get_chain_X509 failed\n"); wolfSSL_FreeX509(chainX509); } } #endif (void)ssl; } static INLINE void build_addr(SOCKADDR_IN_T* addr, const char* peer, word16 port, int udp) { int useLookup = 0; (void)useLookup; (void)udp; memset(addr, 0, sizeof(SOCKADDR_IN_T)); #ifndef TEST_IPV6 /* peer could be in human readable form */ if ( (peer != INADDR_ANY) && isalpha((int)peer[0])) { #if defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_TCP_NET) int err; struct hostent* entry = gethostbyname(peer, &err); #elif defined(WOLFSSL_TIRTOS) struct hostent* entry = DNSGetHostByName(peer); #elif defined(WOLFSSL_VXWORKS) struct hostent* entry = (struct hostent*)hostGetByName(peer); #else struct hostent* entry = gethostbyname(peer); #endif if (entry) { memcpy(&addr->sin_addr.s_addr, entry->h_addr_list[0], entry->h_length); useLookup = 1; } else err_sys("no entry for host"); } #endif #ifndef TEST_IPV6 #if defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_TCP_NET) addr->sin_family = PF_INET; #else addr->sin_family = AF_INET_V; #endif addr->sin_port = htons(port); if (peer == INADDR_ANY) addr->sin_addr.s_addr = IPADDR_ANY; else { if (!useLookup) addr->sin_addr.s_addr = inet_addr(peer); } #else addr->sin6_family = AF_INET_V; addr->sin6_port = htons(port); if (peer == INADDR_ANY) addr->sin6_addr = in6addr_any; else { #ifdef HAVE_GETADDRINFO struct addrinfo hints; struct addrinfo* answer = NULL; int ret; char strPort[80]; memset(&hints, 0, sizeof(hints)); hints.ai_family = AF_INET_V; hints.ai_socktype = udp ? SOCK_DGRAM : SOCK_STREAM; hints.ai_protocol = udp ? IPPROTO_UDP : IPPROTO_TCP; SNPRINTF(strPort, sizeof(strPort), "%d", port); strPort[79] = '\0'; ret = getaddrinfo(peer, strPort, &hints, &answer); if (ret < 0 || answer == NULL) err_sys("getaddrinfo failed"); memcpy(addr, answer->ai_addr, answer->ai_addrlen); freeaddrinfo(answer); #else printf("no ipv6 getaddrinfo, loopback only tests/examples\n"); addr->sin6_addr = in6addr_loopback; #endif } #endif } static INLINE void tcp_socket(SOCKET_T* sockfd, int udp) { if (udp) *sockfd = socket(AF_INET_V, SOCK_DGRAM, 0); else *sockfd = socket(AF_INET_V, SOCK_STREAM, 0); if(WOLFSSL_SOCKET_IS_INVALID(*sockfd)) { err_sys("socket failed\n"); } #ifndef USE_WINDOWS_API #ifdef SO_NOSIGPIPE { int on = 1; socklen_t len = sizeof(on); int res = setsockopt(*sockfd, SOL_SOCKET, SO_NOSIGPIPE, &on, len); if (res < 0) err_sys("setsockopt SO_NOSIGPIPE failed\n"); } #elif defined(WOLFSSL_MDK_ARM) || defined (WOLFSSL_TIRTOS) ||\ defined(WOLFSSL_KEIL_TCP_NET) /* nothing to define */ #else /* no S_NOSIGPIPE */ //signal(SIGPIPE, SIG_IGN); #endif /* S_NOSIGPIPE */ #if defined(TCP_NODELAY) if (!udp) { int on = 1; socklen_t len = sizeof(on); int res = setsockopt(*sockfd, IPPROTO_TCP, TCP_NODELAY, &on, len); if (res < 0) err_sys("setsockopt TCP_NODELAY failed\n"); } #endif #endif /* USE_WINDOWS_API */ } static INLINE void tcp_connect(SOCKET_T* sockfd, const char* ip, word16 port, int udp, WOLFSSL* ssl) { SOCKADDR_IN_T addr; build_addr(&addr, ip, port, udp); if(udp) { wolfSSL_dtls_set_peer(ssl, &addr, sizeof(addr)); } tcp_socket(sockfd, udp); if (!udp) { if (connect(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0) err_sys("tcp connect failed"); } } static INLINE void udp_connect(SOCKET_T* sockfd, void* addr, int addrSz) { if (connect(*sockfd, (const struct sockaddr*)addr, addrSz) != 0) err_sys("tcp connect failed"); } enum { TEST_SELECT_FAIL, TEST_TIMEOUT, TEST_RECV_READY, TEST_ERROR_READY }; #if !defined(WOLFSSL_MDK_ARM) && !defined(WOLFSSL_KEIL_TCP_NET) && \ !defined(WOLFSSL_TIRTOS) static INLINE int tcp_select(SOCKET_T socketfd, int to_sec) { fd_set recvfds, errfds; SOCKET_T nfds = socketfd + 1; struct timeval timeout = { (to_sec > 0) ? to_sec : 0, 0}; int result; FD_ZERO(&recvfds); FD_SET(socketfd, &recvfds); FD_ZERO(&errfds); FD_SET(socketfd, &errfds); result = select(nfds, &recvfds, NULL, &errfds, &timeout); if (result == 0) return TEST_TIMEOUT; else if (result > 0) { if (FD_ISSET(socketfd, &recvfds)) return TEST_RECV_READY; else if(FD_ISSET(socketfd, &errfds)) return TEST_ERROR_READY; } return TEST_SELECT_FAIL; } #elif defined(WOLFSSL_TIRTOS) static INLINE int tcp_select(SOCKET_T socketfd, int to_sec) { return TEST_RECV_READY; } #endif /* !WOLFSSL_MDK_ARM */ static INLINE void tcp_listen(SOCKET_T* sockfd, word16* port, int useAnyAddr, int udp) { SOCKADDR_IN_T addr; /* don't use INADDR_ANY by default, firewall may block, make user switch on */ build_addr(&addr, (useAnyAddr ? INADDR_ANY : wolfSSLIP), *port, udp); tcp_socket(sockfd, udp); #if !defined(USE_WINDOWS_API) && !defined(WOLFSSL_MDK_ARM)\ && !defined(WOLFSSL_KEIL_TCP_NET) { int res, on = 1; socklen_t len = sizeof(on); res = setsockopt(*sockfd, SOL_SOCKET, SO_REUSEADDR, &on, len); if (res < 0) err_sys("setsockopt SO_REUSEADDR failed\n"); } #endif if (bind(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0) err_sys("tcp bind failed"); if (!udp) { if (listen(*sockfd, 5) != 0) err_sys("tcp listen failed"); } #if (defined(NO_MAIN_DRIVER) && !defined(USE_WINDOWS_API)) && !defined(WOLFSSL_TIRTOS) if (*port == 0) { socklen_t len = sizeof(addr); if (getsockname(*sockfd, (struct sockaddr*)&addr, &len) == 0) { #ifndef TEST_IPV6 *port = ntohs(addr.sin_port); #else *port = ntohs(addr.sin6_port); #endif } } #endif } #if 0 static INLINE int udp_read_connect(SOCKET_T sockfd) { SOCKADDR_IN_T cliaddr; byte b[1500]; int n; socklen_t len = sizeof(cliaddr); n = (int)recvfrom(sockfd, (char*)b, sizeof(b), MSG_PEEK, (struct sockaddr*)&cliaddr, &len); if (n > 0) { if (connect(sockfd, (const struct sockaddr*)&cliaddr, sizeof(cliaddr)) != 0) err_sys("udp connect failed"); } else err_sys("recvfrom failed"); return sockfd; } #endif static INLINE void udp_accept(SOCKET_T* sockfd, SOCKET_T* clientfd, int useAnyAddr, word16 port, func_args* args) { SOCKADDR_IN_T addr; (void)args; build_addr(&addr, (useAnyAddr ? INADDR_ANY : wolfSSLIP), port, 1); tcp_socket(sockfd, 1); #if !defined(USE_WINDOWS_API) && !defined(WOLFSSL_MDK_ARM) \ && !defined(WOLFSSL_KEIL_TCP_NET) { int res, on = 1; socklen_t len = sizeof(on); res = setsockopt(*sockfd, SOL_SOCKET, SO_REUSEADDR, &on, len); if (res < 0) err_sys("setsockopt SO_REUSEADDR failed\n"); } #endif if (bind(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0) err_sys("tcp bind failed"); #if (defined(NO_MAIN_DRIVER) && !defined(USE_WINDOWS_API)) && !defined(WOLFSSL_TIRTOS) if (port == 0) { socklen_t len = sizeof(addr); if (getsockname(*sockfd, (struct sockaddr*)&addr, &len) == 0) { #ifndef TEST_IPV6 port = ntohs(addr.sin_port); #else port = ntohs(addr.sin6_port); #endif } } #endif #if defined(_POSIX_THREADS) && defined(NO_MAIN_DRIVER) && !defined(__MINGW32__) /* signal ready to accept data */ { tcp_ready* ready = args->signal; pthread_mutex_lock(&ready->mutex); ready->ready = 1; ready->port = port; pthread_cond_signal(&ready->cond); pthread_mutex_unlock(&ready->mutex); } #elif defined (WOLFSSL_TIRTOS) /* Need mutex? */ tcp_ready* ready = args->signal; ready->ready = 1; ready->port = port; #endif *clientfd = *sockfd; } static INLINE void tcp_accept(SOCKET_T* sockfd, SOCKET_T* clientfd, func_args* args, word16 port, int useAnyAddr, int udp, int ready_file, int do_listen) { SOCKADDR_IN_T client; socklen_t client_len = sizeof(client); if (udp) { udp_accept(sockfd, clientfd, useAnyAddr, port, args); return; } if(do_listen) { tcp_listen(sockfd, &port, useAnyAddr, udp); #if defined(_POSIX_THREADS) && defined(NO_MAIN_DRIVER) && !defined(__MINGW32__) /* signal ready to tcp_accept */ { tcp_ready* ready = args->signal; pthread_mutex_lock(&ready->mutex); ready->ready = 1; ready->port = port; pthread_cond_signal(&ready->cond); pthread_mutex_unlock(&ready->mutex); } #elif defined (WOLFSSL_TIRTOS) /* Need mutex? */ tcp_ready* ready = args->signal; ready->ready = 1; ready->port = port; #endif if (ready_file) { #ifndef NO_FILESYSTEM #ifndef USE_WINDOWS_API FILE* srf = fopen("/tmp/wolfssl_server_ready", "w"); #else FILE* srf = fopen("wolfssl_server_ready", "w"); #endif if (srf) { fputs("ready", srf); fclose(srf); } #endif } } *clientfd = accept(*sockfd, (struct sockaddr*)&client, (ACCEPT_THIRD_T)&client_len); if(WOLFSSL_SOCKET_IS_INVALID(*clientfd)) { err_sys("tcp accept failed"); } } static INLINE void tcp_set_nonblocking(SOCKET_T* sockfd) { #ifdef USE_WINDOWS_API unsigned long blocking = 1; int ret = ioctlsocket(*sockfd, FIONBIO, &blocking); if (ret == SOCKET_ERROR) err_sys("ioctlsocket failed"); #elif defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_TCP_NET) \ || defined (WOLFSSL_TIRTOS)|| defined(WOLFSSL_VXWORKS) /* non blocking not suppported, for now */ #else int flags = fcntl(*sockfd, F_GETFL, 0); if (flags < 0) err_sys("fcntl get failed"); flags = fcntl(*sockfd, F_SETFL, flags | O_NONBLOCK); if (flags < 0) err_sys("fcntl set failed"); #endif } #ifndef NO_PSK static INLINE unsigned int my_psk_client_cb(WOLFSSL* ssl, const char* hint, char* identity, unsigned int id_max_len, unsigned char* key, unsigned int key_max_len) { (void)ssl; (void)hint; (void)key_max_len; /* identity is OpenSSL testing default for openssl s_client, keep same */ strncpy(identity, "Client_identity", id_max_len); /* test key in hex is 0x1a2b3c4d , in decimal 439,041,101 , we're using unsigned binary */ key[0] = 26; key[1] = 43; key[2] = 60; key[3] = 77; return 4; /* length of key in octets or 0 for error */ } static INLINE unsigned int my_psk_server_cb(WOLFSSL* ssl, const char* identity, unsigned char* key, unsigned int key_max_len) { (void)ssl; (void)key_max_len; /* identity is OpenSSL testing default for openssl s_client, keep same */ if (strncmp(identity, "Client_identity", 15) != 0) return 0; /* test key in hex is 0x1a2b3c4d , in decimal 439,041,101 , we're using unsigned binary */ key[0] = 26; key[1] = 43; key[2] = 60; key[3] = 77; return 4; /* length of key in octets or 0 for error */ } #endif /* NO_PSK */ #ifdef USE_WINDOWS_API #define WIN32_LEAN_AND_MEAN #include static INLINE double current_time() { static int init = 0; static LARGE_INTEGER freq; LARGE_INTEGER count; if (!init) { QueryPerformanceFrequency(&freq); init = 1; } QueryPerformanceCounter(&count); return (double)count.QuadPart / freq.QuadPart; } #elif defined(WOLFSSL_TIRTOS) extern double current_time(); #elif defined(WOLFSSL_uITRON4) #include static INLINE double current_time() { SYSTIM time; get_tim(&time); return (double)time; } #else #if !defined(WOLFSSL_MDK_ARM) && !defined(WOLFSSL_KEIL_TCP_NET) #include static INLINE double current_time(void) { struct timeval tv; gettimeofday(&tv, 0); return (double)tv.tv_sec + (double)tv.tv_usec / 1000000; } #endif #endif /* USE_WINDOWS_API */ #if defined(NO_FILESYSTEM) && !defined(NO_CERTS) enum { WOLFSSL_CA = 1, WOLFSSL_CERT = 2, WOLFSSL_KEY = 3 }; static INLINE void load_buffer(WOLFSSL_CTX* ctx, const char* fname, int type) { /* test buffer load */ long sz = 0; byte buff[10000]; FILE* file = fopen(fname, "rb"); if (!file) err_sys("can't open file for buffer load " "Please run from wolfSSL home directory if not"); fseek(file, 0, SEEK_END); sz = ftell(file); rewind(file); fread(buff, sizeof(buff), 1, file); if (type == WOLFSSL_CA) { if (wolfSSL_CTX_load_verify_buffer(ctx, buff, sz, SSL_FILETYPE_PEM) != SSL_SUCCESS) err_sys("can't load buffer ca file"); } else if (type == WOLFSSL_CERT) { if (wolfSSL_CTX_use_certificate_buffer(ctx, buff, sz, SSL_FILETYPE_PEM) != SSL_SUCCESS) err_sys("can't load buffer cert file"); } else if (type == WOLFSSL_KEY) { if (wolfSSL_CTX_use_PrivateKey_buffer(ctx, buff, sz, SSL_FILETYPE_PEM) != SSL_SUCCESS) err_sys("can't load buffer key file"); } fclose(file); } #endif /* NO_FILESYSTEM */ #ifdef VERIFY_CALLBACK static INLINE int myVerify(int preverify, WOLFSSL_X509_STORE_CTX* store) { (void)preverify; char buffer[WOLFSSL_MAX_ERROR_SZ]; #ifdef OPENSSL_EXTRA WOLFSSL_X509* peer; #endif printf("In verification callback, error = %d, %s\n", store->error, wolfSSL_ERR_error_string(store->error, buffer)); #ifdef OPENSSL_EXTRA peer = store->current_cert; if (peer) { char* issuer = wolfSSL_X509_NAME_oneline( wolfSSL_X509_get_issuer_name(peer), 0, 0); char* subject = wolfSSL_X509_NAME_oneline( wolfSSL_X509_get_subject_name(peer), 0, 0); printf("peer's cert info:\n issuer : %s\n subject: %s\n", issuer, subject); XFREE(subject, 0, DYNAMIC_TYPE_OPENSSL); XFREE(issuer, 0, DYNAMIC_TYPE_OPENSSL); } else printf("peer has no cert!\n"); #endif printf("Subject's domain name is %s\n", store->domain); printf("Allowing to continue anyway (shouldn't do this, EVER!!!)\n"); return 1; } #endif /* VERIFY_CALLBACK */ static INLINE int myDateCb(int preverify, WOLFSSL_X509_STORE_CTX* store) { char buffer[WOLFSSL_MAX_ERROR_SZ]; (void)preverify; printf("In verification callback, error = %d, %s\n", store->error, wolfSSL_ERR_error_string(store->error, buffer)); printf("Subject's domain name is %s\n", store->domain); if (store->error == ASN_BEFORE_DATE_E || store->error == ASN_AFTER_DATE_E) { printf("Overriding cert date error as example for bad clock testing\n"); return 1; } printf("Cert error is not date error, not overriding\n"); return 0; } #ifdef HAVE_CRL static INLINE void CRL_CallBack(const char* url) { printf("CRL callback url = %s\n", url); } #endif #ifndef NO_DH static INLINE void SetDH(WOLFSSL* ssl) { /* dh1024 p */ static unsigned char p[] = { 0xE6, 0x96, 0x9D, 0x3D, 0x49, 0x5B, 0xE3, 0x2C, 0x7C, 0xF1, 0x80, 0xC3, 0xBD, 0xD4, 0x79, 0x8E, 0x91, 0xB7, 0x81, 0x82, 0x51, 0xBB, 0x05, 0x5E, 0x2A, 0x20, 0x64, 0x90, 0x4A, 0x79, 0xA7, 0x70, 0xFA, 0x15, 0xA2, 0x59, 0xCB, 0xD5, 0x23, 0xA6, 0xA6, 0xEF, 0x09, 0xC4, 0x30, 0x48, 0xD5, 0xA2, 0x2F, 0x97, 0x1F, 0x3C, 0x20, 0x12, 0x9B, 0x48, 0x00, 0x0E, 0x6E, 0xDD, 0x06, 0x1C, 0xBC, 0x05, 0x3E, 0x37, 0x1D, 0x79, 0x4E, 0x53, 0x27, 0xDF, 0x61, 0x1E, 0xBB, 0xBE, 0x1B, 0xAC, 0x9B, 0x5C, 0x60, 0x44, 0xCF, 0x02, 0x3D, 0x76, 0xE0, 0x5E, 0xEA, 0x9B, 0xAD, 0x99, 0x1B, 0x13, 0xA6, 0x3C, 0x97, 0x4E, 0x9E, 0xF1, 0x83, 0x9E, 0xB5, 0xDB, 0x12, 0x51, 0x36, 0xF7, 0x26, 0x2E, 0x56, 0xA8, 0x87, 0x15, 0x38, 0xDF, 0xD8, 0x23, 0xC6, 0x50, 0x50, 0x85, 0xE2, 0x1F, 0x0D, 0xD5, 0xC8, 0x6B, }; /* dh1024 g */ static unsigned char g[] = { 0x02, }; wolfSSL_SetTmpDH(ssl, p, sizeof(p), g, sizeof(g)); } static INLINE void SetDHCtx(WOLFSSL_CTX* ctx) { /* dh1024 p */ static unsigned char p[] = { 0xE6, 0x96, 0x9D, 0x3D, 0x49, 0x5B, 0xE3, 0x2C, 0x7C, 0xF1, 0x80, 0xC3, 0xBD, 0xD4, 0x79, 0x8E, 0x91, 0xB7, 0x81, 0x82, 0x51, 0xBB, 0x05, 0x5E, 0x2A, 0x20, 0x64, 0x90, 0x4A, 0x79, 0xA7, 0x70, 0xFA, 0x15, 0xA2, 0x59, 0xCB, 0xD5, 0x23, 0xA6, 0xA6, 0xEF, 0x09, 0xC4, 0x30, 0x48, 0xD5, 0xA2, 0x2F, 0x97, 0x1F, 0x3C, 0x20, 0x12, 0x9B, 0x48, 0x00, 0x0E, 0x6E, 0xDD, 0x06, 0x1C, 0xBC, 0x05, 0x3E, 0x37, 0x1D, 0x79, 0x4E, 0x53, 0x27, 0xDF, 0x61, 0x1E, 0xBB, 0xBE, 0x1B, 0xAC, 0x9B, 0x5C, 0x60, 0x44, 0xCF, 0x02, 0x3D, 0x76, 0xE0, 0x5E, 0xEA, 0x9B, 0xAD, 0x99, 0x1B, 0x13, 0xA6, 0x3C, 0x97, 0x4E, 0x9E, 0xF1, 0x83, 0x9E, 0xB5, 0xDB, 0x12, 0x51, 0x36, 0xF7, 0x26, 0x2E, 0x56, 0xA8, 0x87, 0x15, 0x38, 0xDF, 0xD8, 0x23, 0xC6, 0x50, 0x50, 0x85, 0xE2, 0x1F, 0x0D, 0xD5, 0xC8, 0x6B, }; /* dh1024 g */ static unsigned char g[] = { 0x02, }; wolfSSL_CTX_SetTmpDH(ctx, p, sizeof(p), g, sizeof(g)); } #endif /* NO_DH */ #ifndef NO_CERTS static INLINE void CaCb(unsigned char* der, int sz, int type) { (void)der; printf("Got CA cache add callback, derSz = %d, type = %d\n", sz, type); } #endif /* !NO_CERTS */ #ifdef HAVE_CAVIUM static INLINE int OpenNitroxDevice(int dma_mode,int dev_id) { Csp1CoreAssignment core_assign; Uint32 device; if (CspInitialize(CAVIUM_DIRECT,CAVIUM_DEV_ID)) return -1; if (Csp1GetDevType(&device)) return -1; if (device != NPX_DEVICE) { if (ioctl(gpkpdev_hdlr[CAVIUM_DEV_ID], IOCTL_CSP1_GET_CORE_ASSIGNMENT, (Uint32 *)&core_assign)!= 0) return -1; } CspShutdown(CAVIUM_DEV_ID); return CspInitialize(dma_mode, dev_id); } #endif /* HAVE_CAVIUM */ #ifdef USE_WINDOWS_API /* do back x number of directories */ static INLINE void ChangeDirBack(int x) { char path[MAX_PATH]; XMEMSET(path, 0, MAX_PATH); XSTRNCAT(path, ".\\", MAX_PATH); while (x-- > 0) { XSTRNCAT(path, "..\\", MAX_PATH); } SetCurrentDirectoryA(path); } /* does current dir contain str */ static INLINE int CurrentDir(const char* str) { char path[MAX_PATH]; char* baseName; GetCurrentDirectoryA(sizeof(path), path); baseName = strrchr(path, '\\'); if (baseName) baseName++; else baseName = path; if (strstr(baseName, str)) return 1; return 0; } #elif defined(WOLFSSL_MDK_ARM) || defined(WOLFSSL_KEIL_FS) /* KEIL-RL File System does not support relative directry */ #elif defined(WOLFSSL_TIRTOS) #else #ifndef MAX_PATH #define MAX_PATH 256 #endif /* do back x number of directories */ static INLINE void ChangeDirBack(int x) { char path[MAX_PATH]; XMEMSET(path, 0, MAX_PATH); XSTRNCAT(path, "./", MAX_PATH); while (x-- > 0) { XSTRNCAT(path, "../", MAX_PATH); } //if (chdir(path) < 0) { // printf("chdir to %s failed\n", path); //} } /* does current dir contain str */ static INLINE int CurrentDir(const char* str) { char path[MAX_PATH]; char* baseName; //if (getcwd(path, sizeof(path)) == NULL) { // printf("no current dir?\n"); // return 0; //} baseName = strrchr(path, '/'); if (baseName) baseName++; else baseName = path; if (strstr(baseName, str)) return 1; return 0; } #endif /* USE_WINDOWS_API */ #ifdef USE_WOLFSSL_MEMORY typedef struct memoryStats { size_t totalAllocs; /* number of allocations */ size_t totalBytes; /* total number of bytes allocated */ size_t peakBytes; /* concurrent max bytes */ size_t currentBytes; /* total current bytes in use */ } memoryStats; typedef struct memHint { size_t thisSize; /* size of this memory */ void* thisMemory; /* actual memory for user */ } memHint; typedef struct memoryTrack { union { memHint hint; byte alignit[16]; /* make sure we have strong alignment */ } u; } memoryTrack; #if defined(WOLFSSL_TRACK_MEMORY) #define DO_MEM_STATS static memoryStats ourMemStats; #endif static INLINE void* TrackMalloc(size_t sz) { memoryTrack* mt; if (sz == 0) return NULL; mt = (memoryTrack*)malloc(sizeof(memoryTrack) + sz); if (mt == NULL) return NULL; mt->u.hint.thisSize = sz; mt->u.hint.thisMemory = (byte*)mt + sizeof(memoryTrack); #ifdef DO_MEM_STATS ourMemStats.totalAllocs++; ourMemStats.totalBytes += sz; ourMemStats.currentBytes += sz; if (ourMemStats.currentBytes > ourMemStats.peakBytes) ourMemStats.peakBytes = ourMemStats.currentBytes; #endif return mt->u.hint.thisMemory; } static INLINE void TrackFree(void* ptr) { memoryTrack* mt; if (ptr == NULL) return; mt = (memoryTrack*)ptr; --mt; /* same as minus sizeof(memoryTrack), removes header */ #ifdef DO_MEM_STATS ourMemStats.currentBytes -= mt->u.hint.thisSize; #endif free(mt); } static INLINE void* TrackRealloc(void* ptr, size_t sz) { void* ret = TrackMalloc(sz); if (ptr) { /* if realloc is bigger, don't overread old ptr */ memoryTrack* mt = (memoryTrack*)ptr; --mt; /* same as minus sizeof(memoryTrack), removes header */ if (mt->u.hint.thisSize < sz) sz = mt->u.hint.thisSize; } if (ret && ptr) memcpy(ret, ptr, sz); if (ret) TrackFree(ptr); return ret; } static INLINE void InitMemoryTracker(void) { if (wolfSSL_SetAllocators(TrackMalloc, TrackFree, TrackRealloc) != 0) err_sys("wolfSSL SetAllocators failed for track memory"); #ifdef DO_MEM_STATS ourMemStats.totalAllocs = 0; ourMemStats.totalBytes = 0; ourMemStats.peakBytes = 0; ourMemStats.currentBytes = 0; #endif } static INLINE void ShowMemoryTracker(void) { #ifdef DO_MEM_STATS printf("total Allocs = %9lu\n", (unsigned long)ourMemStats.totalAllocs); printf("total Bytes = %9lu\n", (unsigned long)ourMemStats.totalBytes); printf("peak Bytes = %9lu\n", (unsigned long)ourMemStats.peakBytes); printf("current Bytes = %9lu\n", (unsigned long)ourMemStats.currentBytes); #endif } #endif /* USE_WOLFSSL_MEMORY */ #ifdef HAVE_STACK_SIZE typedef THREAD_RETURN WOLFSSL_THREAD (*thread_func)(void* args); static INLINE void StackSizeCheck(func_args* args, thread_func tf) { int ret, i, used; unsigned char* myStack; int stackSize = 1024*128; pthread_attr_t myAttr; pthread_t threadId; #ifdef PTHREAD_STACK_MIN if (stackSize < PTHREAD_STACK_MIN) stackSize = PTHREAD_STACK_MIN; #endif ret = posix_memalign((void**)&myStack, sysconf(_SC_PAGESIZE), stackSize); if (ret != 0) err_sys("posix_memalign failed\n"); memset(myStack, 0x01, stackSize); ret = pthread_attr_init(&myAttr); if (ret != 0) err_sys("attr_init failed"); ret = pthread_attr_setstack(&myAttr, myStack, stackSize); if (ret != 0) err_sys("attr_setstackaddr failed"); ret = pthread_create(&threadId, &myAttr, tf, args); if (ret != 0) { perror("pthread_create failed"); exit(EXIT_FAILURE); } ret = pthread_join(threadId, NULL); if (ret != 0) err_sys("pthread_join failed"); for (i = 0; i < stackSize; i++) { if (myStack[i] != 0x01) { break; } } used = stackSize - i; printf("stack used = %d\n", used); } #endif /* HAVE_STACK_SIZE */ #ifdef STACK_TRAP /* good settings --enable-debug --disable-shared C_EXTRA_FLAGS="-DUSER_TIME -DTFM_TIMING_RESISTANT -DPOSITIVE_EXP_ONLY -DSTACK_TRAP" */ #ifdef HAVE_STACK_SIZE /* client only for now, setrlimit will fail if pthread_create() called */ /* STACK_SIZE does pthread_create() on client */ #error "can't use STACK_TRAP with STACK_SIZE, setrlimit will fail" #endif /* HAVE_STACK_SIZE */ static INLINE void StackTrap(void) { struct rlimit rl; if (getrlimit(RLIMIT_STACK, &rl) != 0) err_sys("getrlimit failed"); printf("rlim_cur = %llu\n", rl.rlim_cur); rl.rlim_cur = 1024*21; /* adjust trap size here */ if (setrlimit(RLIMIT_STACK, &rl) != 0) { perror("setrlimit"); err_sys("setrlimit failed"); } } #else /* STACK_TRAP */ static INLINE void StackTrap(void) { } #endif /* STACK_TRAP */ #ifdef ATOMIC_USER /* Atomic Encrypt Context example */ typedef struct AtomicEncCtx { int keySetup; /* have we done key setup yet */ Aes aes; /* for aes example */ } AtomicEncCtx; /* Atomic Decrypt Context example */ typedef struct AtomicDecCtx { int keySetup; /* have we done key setup yet */ Aes aes; /* for aes example */ } AtomicDecCtx; static INLINE int myMacEncryptCb(WOLFSSL* ssl, unsigned char* macOut, const unsigned char* macIn, unsigned int macInSz, int macContent, int macVerify, unsigned char* encOut, const unsigned char* encIn, unsigned int encSz, void* ctx) { int ret; Hmac hmac; byte myInner[WOLFSSL_TLS_HMAC_INNER_SZ]; AtomicEncCtx* encCtx = (AtomicEncCtx*)ctx; const char* tlsStr = "TLS"; /* example supports (d)tls aes */ if (wolfSSL_GetBulkCipher(ssl) != wolfssl_aes) { printf("myMacEncryptCb not using AES\n"); return -1; } if (strstr(wolfSSL_get_version(ssl), tlsStr) == NULL) { printf("myMacEncryptCb not using (D)TLS\n"); return -1; } /* hmac, not needed if aead mode */ wolfSSL_SetTlsHmacInner(ssl, myInner, macInSz, macContent, macVerify); ret = wc_HmacSetKey(&hmac, wolfSSL_GetHmacType(ssl), wolfSSL_GetMacSecret(ssl, macVerify), wolfSSL_GetHmacSize(ssl)); if (ret != 0) return ret; ret = wc_HmacUpdate(&hmac, myInner, sizeof(myInner)); if (ret != 0) return ret; ret = wc_HmacUpdate(&hmac, macIn, macInSz); if (ret != 0) return ret; ret = wc_HmacFinal(&hmac, macOut); if (ret != 0) return ret; /* encrypt setup on first time */ if (encCtx->keySetup == 0) { int keyLen = wolfSSL_GetKeySize(ssl); const byte* key; const byte* iv; if (wolfSSL_GetSide(ssl) == WOLFSSL_CLIENT_END) { key = wolfSSL_GetClientWriteKey(ssl); iv = wolfSSL_GetClientWriteIV(ssl); } else { key = wolfSSL_GetServerWriteKey(ssl); iv = wolfSSL_GetServerWriteIV(ssl); } ret = wc_AesSetKey(&encCtx->aes, key, keyLen, iv, AES_ENCRYPTION); if (ret != 0) { printf("AesSetKey failed in myMacEncryptCb\n"); return ret; } encCtx->keySetup = 1; } /* encrypt */ return wc_AesCbcEncrypt(&encCtx->aes, encOut, encIn, encSz); } static INLINE int myDecryptVerifyCb(WOLFSSL* ssl, unsigned char* decOut, const unsigned char* decIn, unsigned int decSz, int macContent, int macVerify, unsigned int* padSz, void* ctx) { AtomicDecCtx* decCtx = (AtomicDecCtx*)ctx; int ret = 0; int macInSz = 0; int ivExtra = 0; int digestSz = wolfSSL_GetHmacSize(ssl); unsigned int pad = 0; unsigned int padByte = 0; Hmac hmac; byte myInner[WOLFSSL_TLS_HMAC_INNER_SZ]; byte verify[MAX_DIGEST_SIZE]; const char* tlsStr = "TLS"; /* example supports (d)tls aes */ if (wolfSSL_GetBulkCipher(ssl) != wolfssl_aes) { printf("myMacEncryptCb not using AES\n"); return -1; } if (strstr(wolfSSL_get_version(ssl), tlsStr) == NULL) { printf("myMacEncryptCb not using (D)TLS\n"); return -1; } /*decrypt */ if (decCtx->keySetup == 0) { int keyLen = wolfSSL_GetKeySize(ssl); const byte* key; const byte* iv; /* decrypt is from other side (peer) */ if (wolfSSL_GetSide(ssl) == WOLFSSL_SERVER_END) { key = wolfSSL_GetClientWriteKey(ssl); iv = wolfSSL_GetClientWriteIV(ssl); } else { key = wolfSSL_GetServerWriteKey(ssl); iv = wolfSSL_GetServerWriteIV(ssl); } ret = wc_AesSetKey(&decCtx->aes, key, keyLen, iv, AES_DECRYPTION); if (ret != 0) { printf("AesSetKey failed in myDecryptVerifyCb\n"); return ret; } decCtx->keySetup = 1; } /* decrypt */ ret = wc_AesCbcDecrypt(&decCtx->aes, decOut, decIn, decSz); if (ret != 0) return ret; if (wolfSSL_GetCipherType(ssl) == WOLFSSL_AEAD_TYPE) { *padSz = wolfSSL_GetAeadMacSize(ssl); return 0; /* hmac, not needed if aead mode */ } if (wolfSSL_GetCipherType(ssl) == WOLFSSL_BLOCK_TYPE) { pad = *(decOut + decSz - 1); padByte = 1; if (wolfSSL_IsTLSv1_1(ssl)) ivExtra = wolfSSL_GetCipherBlockSize(ssl); } *padSz = wolfSSL_GetHmacSize(ssl) + pad + padByte; macInSz = decSz - ivExtra - digestSz - pad - padByte; wolfSSL_SetTlsHmacInner(ssl, myInner, macInSz, macContent, macVerify); ret = wc_HmacSetKey(&hmac, wolfSSL_GetHmacType(ssl), wolfSSL_GetMacSecret(ssl, macVerify), digestSz); if (ret != 0) return ret; ret = wc_HmacUpdate(&hmac, myInner, sizeof(myInner)); if (ret != 0) return ret; ret = wc_HmacUpdate(&hmac, decOut + ivExtra, macInSz); if (ret != 0) return ret; ret = wc_HmacFinal(&hmac, verify); if (ret != 0) return ret; if (memcmp(verify, decOut + decSz - digestSz - pad - padByte, digestSz) != 0) { printf("myDecryptVerify verify failed\n"); return -1; } return ret; } static INLINE void SetupAtomicUser(WOLFSSL_CTX* ctx, WOLFSSL* ssl) { AtomicEncCtx* encCtx; AtomicDecCtx* decCtx; encCtx = (AtomicEncCtx*)malloc(sizeof(AtomicEncCtx)); if (encCtx == NULL) err_sys("AtomicEncCtx malloc failed"); memset(encCtx, 0, sizeof(AtomicEncCtx)); decCtx = (AtomicDecCtx*)malloc(sizeof(AtomicDecCtx)); if (decCtx == NULL) { free(encCtx); err_sys("AtomicDecCtx malloc failed"); } memset(decCtx, 0, sizeof(AtomicDecCtx)); wolfSSL_CTX_SetMacEncryptCb(ctx, myMacEncryptCb); wolfSSL_SetMacEncryptCtx(ssl, encCtx); wolfSSL_CTX_SetDecryptVerifyCb(ctx, myDecryptVerifyCb); wolfSSL_SetDecryptVerifyCtx(ssl, decCtx); } static INLINE void FreeAtomicUser(WOLFSSL* ssl) { AtomicEncCtx* encCtx = (AtomicEncCtx*)wolfSSL_GetMacEncryptCtx(ssl); AtomicDecCtx* decCtx = (AtomicDecCtx*)wolfSSL_GetDecryptVerifyCtx(ssl); free(decCtx); free(encCtx); } #endif /* ATOMIC_USER */ #ifdef HAVE_PK_CALLBACKS #ifdef HAVE_ECC static INLINE int myEccSign(WOLFSSL* ssl, const byte* in, word32 inSz, byte* out, word32* outSz, const byte* key, word32 keySz, void* ctx) { WC_RNG rng; int ret; word32 idx = 0; ecc_key myKey; (void)ssl; (void)ctx; ret = wc_InitRng(&rng); if (ret != 0) return ret; wc_ecc_init(&myKey); ret = wc_EccPrivateKeyDecode(key, &idx, &myKey, keySz); if (ret == 0) ret = wc_ecc_sign_hash(in, inSz, out, outSz, &rng, &myKey); wc_ecc_free(&myKey); wc_FreeRng(&rng); return ret; } static INLINE int myEccVerify(WOLFSSL* ssl, const byte* sig, word32 sigSz, const byte* hash, word32 hashSz, const byte* key, word32 keySz, int* result, void* ctx) { int ret; ecc_key myKey; (void)ssl; (void)ctx; wc_ecc_init(&myKey); ret = wc_ecc_import_x963(key, keySz, &myKey); if (ret == 0) ret = wc_ecc_verify_hash(sig, sigSz, hash, hashSz, result, &myKey); wc_ecc_free(&myKey); return ret; } #endif /* HAVE_ECC */ #ifndef NO_RSA static INLINE int myRsaSign(WOLFSSL* ssl, const byte* in, word32 inSz, byte* out, word32* outSz, const byte* key, word32 keySz, void* ctx) { WC_RNG rng; int ret; word32 idx = 0; RsaKey myKey; (void)ssl; (void)ctx; ret = wc_InitRng(&rng); if (ret != 0) return ret; wc_InitRsaKey(&myKey, NULL); ret = wc_RsaPrivateKeyDecode(key, &idx, &myKey, keySz); if (ret == 0) ret = wc_RsaSSL_Sign(in, inSz, out, *outSz, &myKey, &rng); if (ret > 0) { /* save and convert to 0 success */ *outSz = ret; ret = 0; } wc_FreeRsaKey(&myKey); wc_FreeRng(&rng); return ret; } static INLINE int myRsaVerify(WOLFSSL* ssl, byte* sig, word32 sigSz, byte** out, const byte* key, word32 keySz, void* ctx) { int ret; word32 idx = 0; RsaKey myKey; (void)ssl; (void)ctx; wc_InitRsaKey(&myKey, NULL); ret = wc_RsaPublicKeyDecode(key, &idx, &myKey, keySz); if (ret == 0) ret = wc_RsaSSL_VerifyInline(sig, sigSz, out, &myKey); wc_FreeRsaKey(&myKey); return ret; } static INLINE int myRsaEnc(WOLFSSL* ssl, const byte* in, word32 inSz, byte* out, word32* outSz, const byte* key, word32 keySz, void* ctx) { int ret; word32 idx = 0; RsaKey myKey; WC_RNG rng; (void)ssl; (void)ctx; ret = wc_InitRng(&rng); if (ret != 0) return ret; wc_InitRsaKey(&myKey, NULL); ret = wc_RsaPublicKeyDecode(key, &idx, &myKey, keySz); if (ret == 0) { ret = wc_RsaPublicEncrypt(in, inSz, out, *outSz, &myKey, &rng); if (ret > 0) { *outSz = ret; ret = 0; /* reset to success */ } } wc_FreeRsaKey(&myKey); wc_FreeRng(&rng); return ret; } static INLINE int myRsaDec(WOLFSSL* ssl, byte* in, word32 inSz, byte** out, const byte* key, word32 keySz, void* ctx) { int ret; word32 idx = 0; RsaKey myKey; (void)ssl; (void)ctx; wc_InitRsaKey(&myKey, NULL); ret = wc_RsaPrivateKeyDecode(key, &idx, &myKey, keySz); if (ret == 0) { ret = wc_RsaPrivateDecryptInline(in, inSz, out, &myKey); } wc_FreeRsaKey(&myKey); return ret; } #endif /* NO_RSA */ static INLINE void SetupPkCallbacks(WOLFSSL_CTX* ctx, WOLFSSL* ssl) { (void)ctx; (void)ssl; #ifdef HAVE_ECC wolfSSL_CTX_SetEccSignCb(ctx, myEccSign); wolfSSL_CTX_SetEccVerifyCb(ctx, myEccVerify); #endif /* HAVE_ECC */ #ifndef NO_RSA wolfSSL_CTX_SetRsaSignCb(ctx, myRsaSign); wolfSSL_CTX_SetRsaVerifyCb(ctx, myRsaVerify); wolfSSL_CTX_SetRsaEncCb(ctx, myRsaEnc); wolfSSL_CTX_SetRsaDecCb(ctx, myRsaDec); #endif /* NO_RSA */ } #endif /* HAVE_PK_CALLBACKS */ #if defined(__hpux__) || defined(__MINGW32__) || defined (WOLFSSL_TIRTOS) \ || defined(_MSC_VER) /* HP/UX doesn't have strsep, needed by test/suites.c */ static INLINE char* strsep(char **stringp, const char *delim) { char* start; char* end; start = *stringp; if (start == NULL) return NULL; if ((end = strpbrk(start, delim))) { *end++ = '\0'; *stringp = end; } else { *stringp = NULL; } return start; } #endif /* __hpux__ and others */ /* Create unique filename, len is length of tempfn name, assuming len does not include null terminating character, num is number of characters in tempfn name to randomize */ static INLINE const char* mymktemp(char *tempfn, int len, int num) { int x, size; static const char alphanum[] = "0123456789ABCDEFGHIJKLMNOPQRSTUVWXYZ" "abcdefghijklmnopqrstuvwxyz"; WC_RNG rng; byte out; if (tempfn == NULL || len < 1 || num < 1 || len <= num) { printf("Bad input\n"); return NULL; } size = len - 1; if (wc_InitRng(&rng) != 0) { printf("InitRng failed\n"); return NULL; } for (x = size; x > size - num; x--) { if (wc_RNG_GenerateBlock(&rng,(byte*)&out, sizeof(out)) != 0) { printf("RNG_GenerateBlock failed\n"); return NULL; } tempfn[x] = alphanum[out % (sizeof(alphanum) - 1)]; } tempfn[len] = '\0'; wc_FreeRng(&rng); return tempfn; } #if defined(HAVE_SESSION_TICKET) && defined(HAVE_CHACHA) && \ defined(HAVE_POLY1305) #include typedef struct key_ctx { byte name[WOLFSSL_TICKET_NAME_SZ]; /* name for this context */ byte key[16]; /* cipher key */ } key_ctx; static key_ctx myKey_ctx; static WC_RNG myKey_rng; static INLINE int TicketInit(void) { int ret = wc_InitRng(&myKey_rng); if (ret != 0) return ret; ret = wc_RNG_GenerateBlock(&myKey_rng, myKey_ctx.key, sizeof(myKey_ctx.key)); if (ret != 0) return ret; ret = wc_RNG_GenerateBlock(&myKey_rng, myKey_ctx.name,sizeof(myKey_ctx.name)); if (ret != 0) return ret; return 0; } static INLINE void TicketCleanup(void) { wc_FreeRng(&myKey_rng); } static INLINE int myTicketEncCb(WOLFSSL* ssl, byte key_name[WOLFSSL_TICKET_NAME_SZ], byte iv[WOLFSSL_TICKET_IV_SZ], byte mac[WOLFSSL_TICKET_MAC_SZ], int enc, byte* ticket, int inLen, int* outLen, void* userCtx) { (void)ssl; (void)userCtx; int ret; word16 sLen = htons(inLen); byte aad[WOLFSSL_TICKET_NAME_SZ + WOLFSSL_TICKET_IV_SZ + 2]; int aadSz = WOLFSSL_TICKET_NAME_SZ + WOLFSSL_TICKET_IV_SZ + 2; byte* tmp = aad; if (enc) { XMEMCPY(key_name, myKey_ctx.name, WOLFSSL_TICKET_NAME_SZ); ret = wc_RNG_GenerateBlock(&myKey_rng, iv, WOLFSSL_TICKET_IV_SZ); if (ret != 0) return WOLFSSL_TICKET_RET_REJECT; /* build aad from key name, iv, and length */ XMEMCPY(tmp, key_name, WOLFSSL_TICKET_NAME_SZ); tmp += WOLFSSL_TICKET_NAME_SZ; XMEMCPY(tmp, iv, WOLFSSL_TICKET_IV_SZ); tmp += WOLFSSL_TICKET_IV_SZ; XMEMCPY(tmp, &sLen, 2); ret = wc_ChaCha20Poly1305_Encrypt(myKey_ctx.key, iv, aad, aadSz, ticket, inLen, ticket, mac); if (ret != 0) return WOLFSSL_TICKET_RET_REJECT; *outLen = inLen; /* no padding in this mode */ } else { /* decrypt */ /* see if we know this key */ if (XMEMCMP(key_name, myKey_ctx.name, WOLFSSL_TICKET_NAME_SZ) != 0){ printf("client presented unknown ticket key name "); return WOLFSSL_TICKET_RET_FATAL; } /* build aad from key name, iv, and length */ XMEMCPY(tmp, key_name, WOLFSSL_TICKET_NAME_SZ); tmp += WOLFSSL_TICKET_NAME_SZ; XMEMCPY(tmp, iv, WOLFSSL_TICKET_IV_SZ); tmp += WOLFSSL_TICKET_IV_SZ; XMEMCPY(tmp, &sLen, 2); ret = wc_ChaCha20Poly1305_Decrypt(myKey_ctx.key, iv, aad, aadSz, ticket, inLen, mac, ticket); if (ret != 0) return WOLFSSL_TICKET_RET_REJECT; *outLen = inLen; /* no padding in this mode */ } return WOLFSSL_TICKET_RET_OK; } #endif /* HAVE_SESSION_TICKET && CHACHA20 && POLY1305 */ #endif /* wolfSSL_TEST_H */