Francois Berder / cyassl-lib

fork of cyassl-lib

Dependents:   TLS_cyassl TLS_cyassl

cyassl/test.h@0:714293de3836, 2013-09-05 (annotated)

Committer:
ashleymills
Date:
Thu Sep 05 10:33:04 2013 +0000
Revision:
0:714293de3836
Initial commit

Who changed what in which revision?

UserRevisionLine numberNew contents of line
ashleymills 0:714293de3836 1 /* test.h */
ashleymills 0:714293de3836 2
ashleymills 0:714293de3836 3 #ifndef CyaSSL_TEST_H
ashleymills 0:714293de3836 4 #define CyaSSL_TEST_H
ashleymills 0:714293de3836 5
ashleymills 0:714293de3836 6 #include <stdio.h>
ashleymills 0:714293de3836 7 #include <stdlib.h>
ashleymills 0:714293de3836 8 #include <assert.h>
ashleymills 0:714293de3836 9 #include <ctype.h>
ashleymills 0:714293de3836 10 #include <cyassl/ssl.h>
ashleymills 0:714293de3836 11 #include <cyassl/ctaocrypt/types.h>
ashleymills 0:714293de3836 12
ashleymills 0:714293de3836 13 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 14 #include <winsock2.h>
ashleymills 0:714293de3836 15 #include <process.h>
ashleymills 0:714293de3836 16 #ifdef TEST_IPV6 /* don't require newer SDK for IPV4 */
ashleymills 0:714293de3836 17 #include <ws2tcpip.h>
ashleymills 0:714293de3836 18 #include <wspiapi.h>
ashleymills 0:714293de3836 19 #endif
ashleymills 0:714293de3836 20 #define SOCKET_T SOCKET
ashleymills 0:714293de3836 21 #define SNPRINTF _snprintf
ashleymills 0:714293de3836 22 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 23 #include <string.h>
ashleymills 0:714293de3836 24 #else
ashleymills 0:714293de3836 25 #include <string.h>
ashleymills 0:714293de3836 26 #include <sys/types.h>
ashleymills 0:714293de3836 27 #ifndef CYASSL_LEANPSK
ashleymills 0:714293de3836 28 #include <unistd.h>
ashleymills 0:714293de3836 29 #include <netdb.h>
ashleymills 0:714293de3836 30 #include <netinet/in.h>
ashleymills 0:714293de3836 31 #include <netinet/tcp.h>
ashleymills 0:714293de3836 32 #include <arpa/inet.h>
ashleymills 0:714293de3836 33 #include <sys/ioctl.h>
ashleymills 0:714293de3836 34 #include <sys/time.h>
ashleymills 0:714293de3836 35 #include <sys/socket.h>
ashleymills 0:714293de3836 36 #include <pthread.h>
ashleymills 0:714293de3836 37 #include <fcntl.h>
ashleymills 0:714293de3836 38 #ifdef TEST_IPV6
ashleymills 0:714293de3836 39 #include <netdb.h>
ashleymills 0:714293de3836 40 #endif
ashleymills 0:714293de3836 41 #endif
ashleymills 0:714293de3836 42 #define SOCKET_T int
ashleymills 0:714293de3836 43 #ifndef SO_NOSIGPIPE
ashleymills 0:714293de3836 44 #include <signal.h> /* ignore SIGPIPE */
ashleymills 0:714293de3836 45 #endif
ashleymills 0:714293de3836 46 #define SNPRINTF snprintf
ashleymills 0:714293de3836 47 #endif /* USE_WINDOWS_API */
ashleymills 0:714293de3836 48
ashleymills 0:714293de3836 49 #ifdef HAVE_CAVIUM
ashleymills 0:714293de3836 50 #include "cavium_sysdep.h"
ashleymills 0:714293de3836 51 #include "cavium_common.h"
ashleymills 0:714293de3836 52 #include "cavium_ioctl.h"
ashleymills 0:714293de3836 53 #endif
ashleymills 0:714293de3836 54
ashleymills 0:714293de3836 55 #ifdef _MSC_VER
ashleymills 0:714293de3836 56 /* disable conversion warning */
ashleymills 0:714293de3836 57 /* 4996 warning to use MS extensions e.g., strcpy_s instead of strncpy */
ashleymills 0:714293de3836 58 #pragma warning(disable:4244 4996)
ashleymills 0:714293de3836 59 #endif
ashleymills 0:714293de3836 60
ashleymills 0:714293de3836 61
ashleymills 0:714293de3836 62 #if defined(__MACH__) || defined(USE_WINDOWS_API)
ashleymills 0:714293de3836 63 #ifndef _SOCKLEN_T
ashleymills 0:714293de3836 64 typedef int socklen_t;
ashleymills 0:714293de3836 65 #endif
ashleymills 0:714293de3836 66 #endif
ashleymills 0:714293de3836 67
ashleymills 0:714293de3836 68
ashleymills 0:714293de3836 69 /* HPUX doesn't use socklent_t for third parameter to accept, unless
ashleymills 0:714293de3836 70 _XOPEN_SOURCE_EXTENDED is defined */
ashleymills 0:714293de3836 71 #if !defined(__hpux__) && !defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 72 typedef socklen_t* ACCEPT_THIRD_T;
ashleymills 0:714293de3836 73 #else
ashleymills 0:714293de3836 74 #if defined _XOPEN_SOURCE_EXTENDED
ashleymills 0:714293de3836 75 typedef socklen_t* ACCEPT_THIRD_T;
ashleymills 0:714293de3836 76 #else
ashleymills 0:714293de3836 77 typedef int* ACCEPT_THIRD_T;
ashleymills 0:714293de3836 78 #endif
ashleymills 0:714293de3836 79 #endif
ashleymills 0:714293de3836 80
ashleymills 0:714293de3836 81
ashleymills 0:714293de3836 82 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 83 #define CloseSocket(s) closesocket(s)
ashleymills 0:714293de3836 84 #define StartTCP() { WSADATA wsd; WSAStartup(0x0002, &wsd); }
ashleymills 0:714293de3836 85 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 86 #define CloseSocket(s) closesocket(s)
ashleymills 0:714293de3836 87 #define StartTCP()
ashleymills 0:714293de3836 88 #else
ashleymills 0:714293de3836 89 #define CloseSocket(s) close(s)
ashleymills 0:714293de3836 90 #define StartTCP()
ashleymills 0:714293de3836 91 #endif
ashleymills 0:714293de3836 92
ashleymills 0:714293de3836 93
ashleymills 0:714293de3836 94 #ifdef SINGLE_THREADED
ashleymills 0:714293de3836 95 typedef unsigned int THREAD_RETURN;
ashleymills 0:714293de3836 96 typedef void* THREAD_TYPE;
ashleymills 0:714293de3836 97 #define CYASSL_THREAD
ashleymills 0:714293de3836 98 #else
ashleymills 0:714293de3836 99 #if defined(_POSIX_THREADS) && !defined(__MINGW32__)
ashleymills 0:714293de3836 100 typedef void* THREAD_RETURN;
ashleymills 0:714293de3836 101 typedef pthread_t THREAD_TYPE;
ashleymills 0:714293de3836 102 #define CYASSL_THREAD
ashleymills 0:714293de3836 103 #define INFINITE -1
ashleymills 0:714293de3836 104 #define WAIT_OBJECT_0 0L
ashleymills 0:714293de3836 105 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 106 typedef unsigned int THREAD_RETURN;
ashleymills 0:714293de3836 107 typedef int THREAD_TYPE;
ashleymills 0:714293de3836 108 #define CYASSL_THREAD
ashleymills 0:714293de3836 109 #else
ashleymills 0:714293de3836 110 typedef unsigned int THREAD_RETURN;
ashleymills 0:714293de3836 111 typedef intptr_t THREAD_TYPE;
ashleymills 0:714293de3836 112 #define CYASSL_THREAD __stdcall
ashleymills 0:714293de3836 113 #endif
ashleymills 0:714293de3836 114 #endif
ashleymills 0:714293de3836 115
ashleymills 0:714293de3836 116
ashleymills 0:714293de3836 117 #ifdef TEST_IPV6
ashleymills 0:714293de3836 118 typedef struct sockaddr_in6 SOCKADDR_IN_T;
ashleymills 0:714293de3836 119 #define AF_INET_V AF_INET6
ashleymills 0:714293de3836 120 #else
ashleymills 0:714293de3836 121 typedef struct sockaddr_in SOCKADDR_IN_T;
ashleymills 0:714293de3836 122 #define AF_INET_V AF_INET
ashleymills 0:714293de3836 123 #endif
ashleymills 0:714293de3836 124
ashleymills 0:714293de3836 125
ashleymills 0:714293de3836 126 #define SERVER_DEFAULT_VERSION 3
ashleymills 0:714293de3836 127 #define SERVER_DTLS_DEFAULT_VERSION (-2)
ashleymills 0:714293de3836 128 #define SERVER_INVALID_VERSION (-99)
ashleymills 0:714293de3836 129 #define CLIENT_DEFAULT_VERSION 3
ashleymills 0:714293de3836 130 #define CLIENT_DTLS_DEFAULT_VERSION (-2)
ashleymills 0:714293de3836 131 #define CLIENT_INVALID_VERSION (-99)
ashleymills 0:714293de3836 132
ashleymills 0:714293de3836 133 /* all certs relative to CyaSSL home directory now */
ashleymills 0:714293de3836 134 #define caCert "./certs/ca-cert.pem"
ashleymills 0:714293de3836 135 #define eccCert "./certs/server-ecc.pem"
ashleymills 0:714293de3836 136 #define eccKey "./certs/ecc-key.pem"
ashleymills 0:714293de3836 137 #define svrCert "./certs/server-cert.pem"
ashleymills 0:714293de3836 138 #define svrKey "./certs/server-key.pem"
ashleymills 0:714293de3836 139 #define cliCert "./certs/client-cert.pem"
ashleymills 0:714293de3836 140 #define cliKey "./certs/client-key.pem"
ashleymills 0:714293de3836 141 #define ntruCert "./certs/ntru-cert.pem"
ashleymills 0:714293de3836 142 #define ntruKey "./certs/ntru-key.raw"
ashleymills 0:714293de3836 143 #define dhParam "./certs/dh2048.pem"
ashleymills 0:714293de3836 144 #define cliEccKey "./certs/ecc-client-key.pem"
ashleymills 0:714293de3836 145 #define cliEccCert "./certs/client-ecc-cert.pem"
ashleymills 0:714293de3836 146 #define crlPemDir "./certs/crl"
ashleymills 0:714293de3836 147
ashleymills 0:714293de3836 148 typedef struct tcp_ready {
ashleymills 0:714293de3836 149 int ready; /* predicate */
ashleymills 0:714293de3836 150 int port;
ashleymills 0:714293de3836 151 #if defined(_POSIX_THREADS) && !defined(__MINGW32__)
ashleymills 0:714293de3836 152 pthread_mutex_t mutex;
ashleymills 0:714293de3836 153 pthread_cond_t cond;
ashleymills 0:714293de3836 154 #endif
ashleymills 0:714293de3836 155 } tcp_ready;
ashleymills 0:714293de3836 156
ashleymills 0:714293de3836 157
ashleymills 0:714293de3836 158 void InitTcpReady(tcp_ready*);
ashleymills 0:714293de3836 159 void FreeTcpReady(tcp_ready*);
ashleymills 0:714293de3836 160
ashleymills 0:714293de3836 161
ashleymills 0:714293de3836 162 typedef struct func_args {
ashleymills 0:714293de3836 163 int argc;
ashleymills 0:714293de3836 164 char** argv;
ashleymills 0:714293de3836 165 int return_code;
ashleymills 0:714293de3836 166 tcp_ready* signal;
ashleymills 0:714293de3836 167 } func_args;
ashleymills 0:714293de3836 168
ashleymills 0:714293de3836 169 void wait_tcp_ready(func_args*);
ashleymills 0:714293de3836 170
ashleymills 0:714293de3836 171 typedef THREAD_RETURN CYASSL_THREAD THREAD_FUNC(void*);
ashleymills 0:714293de3836 172
ashleymills 0:714293de3836 173 void start_thread(THREAD_FUNC, func_args*, THREAD_TYPE*);
ashleymills 0:714293de3836 174 void join_thread(THREAD_TYPE);
ashleymills 0:714293de3836 175
ashleymills 0:714293de3836 176 /* yaSSL */
ashleymills 0:714293de3836 177 #ifndef TEST_IPV6
ashleymills 0:714293de3836 178 static const char* const yasslIP = "127.0.0.1";
ashleymills 0:714293de3836 179 #else
ashleymills 0:714293de3836 180 static const char* const yasslIP = "::1";
ashleymills 0:714293de3836 181 #endif
ashleymills 0:714293de3836 182 static const word16 yasslPort = 11111;
ashleymills 0:714293de3836 183
ashleymills 0:714293de3836 184 static INLINE void err_sys(const char* msg)
ashleymills 0:714293de3836 185 {
ashleymills 0:714293de3836 186 printf("yassl error: %s\n", msg);
ashleymills 0:714293de3836 187 #ifndef CYASSL_MDK_SHELL
ashleymills 0:714293de3836 188 if (msg)
ashleymills 0:714293de3836 189 exit(EXIT_FAILURE);
ashleymills 0:714293de3836 190 #endif
ashleymills 0:714293de3836 191 }
ashleymills 0:714293de3836 192
ashleymills 0:714293de3836 193
ashleymills 0:714293de3836 194 #define MY_EX_USAGE 2
ashleymills 0:714293de3836 195
ashleymills 0:714293de3836 196 extern int myoptind;
ashleymills 0:714293de3836 197 extern char* myoptarg;
ashleymills 0:714293de3836 198
ashleymills 0:714293de3836 199 static INLINE int mygetopt(int argc, char** argv, const char* optstring)
ashleymills 0:714293de3836 200 {
ashleymills 0:714293de3836 201 static char* next = NULL;
ashleymills 0:714293de3836 202
ashleymills 0:714293de3836 203 char c;
ashleymills 0:714293de3836 204 char* cp;
ashleymills 0:714293de3836 205
ashleymills 0:714293de3836 206 if (myoptind == 0)
ashleymills 0:714293de3836 207 next = NULL; /* we're starting new/over */
ashleymills 0:714293de3836 208
ashleymills 0:714293de3836 209 if (next == NULL || *next == '\0') {
ashleymills 0:714293de3836 210 if (myoptind == 0)
ashleymills 0:714293de3836 211 myoptind++;
ashleymills 0:714293de3836 212
ashleymills 0:714293de3836 213 if (myoptind >= argc || argv[myoptind][0] != '-' ||
ashleymills 0:714293de3836 214 argv[myoptind][1] == '\0') {
ashleymills 0:714293de3836 215 myoptarg = NULL;
ashleymills 0:714293de3836 216 if (myoptind < argc)
ashleymills 0:714293de3836 217 myoptarg = argv[myoptind];
ashleymills 0:714293de3836 218
ashleymills 0:714293de3836 219 return -1;
ashleymills 0:714293de3836 220 }
ashleymills 0:714293de3836 221
ashleymills 0:714293de3836 222 if (strcmp(argv[myoptind], "--") == 0) {
ashleymills 0:714293de3836 223 myoptind++;
ashleymills 0:714293de3836 224 myoptarg = NULL;
ashleymills 0:714293de3836 225
ashleymills 0:714293de3836 226 if (myoptind < argc)
ashleymills 0:714293de3836 227 myoptarg = argv[myoptind];
ashleymills 0:714293de3836 228
ashleymills 0:714293de3836 229 return -1;
ashleymills 0:714293de3836 230 }
ashleymills 0:714293de3836 231
ashleymills 0:714293de3836 232 next = argv[myoptind];
ashleymills 0:714293de3836 233 next++; /* skip - */
ashleymills 0:714293de3836 234 myoptind++;
ashleymills 0:714293de3836 235 }
ashleymills 0:714293de3836 236
ashleymills 0:714293de3836 237 c = *next++;
ashleymills 0:714293de3836 238 /* The C++ strchr can return a different value */
ashleymills 0:714293de3836 239 cp = (char*)strchr(optstring, c);
ashleymills 0:714293de3836 240
ashleymills 0:714293de3836 241 if (cp == NULL || c == ':')
ashleymills 0:714293de3836 242 return '?';
ashleymills 0:714293de3836 243
ashleymills 0:714293de3836 244 cp++;
ashleymills 0:714293de3836 245
ashleymills 0:714293de3836 246 if (*cp == ':') {
ashleymills 0:714293de3836 247 if (*next != '\0') {
ashleymills 0:714293de3836 248 myoptarg = next;
ashleymills 0:714293de3836 249 next = NULL;
ashleymills 0:714293de3836 250 }
ashleymills 0:714293de3836 251 else if (myoptind < argc) {
ashleymills 0:714293de3836 252 myoptarg = argv[myoptind];
ashleymills 0:714293de3836 253 myoptind++;
ashleymills 0:714293de3836 254 }
ashleymills 0:714293de3836 255 else
ashleymills 0:714293de3836 256 return '?';
ashleymills 0:714293de3836 257 }
ashleymills 0:714293de3836 258
ashleymills 0:714293de3836 259 return c;
ashleymills 0:714293de3836 260 }
ashleymills 0:714293de3836 261
ashleymills 0:714293de3836 262
ashleymills 0:714293de3836 263 #ifdef OPENSSL_EXTRA
ashleymills 0:714293de3836 264
ashleymills 0:714293de3836 265 static INLINE int PasswordCallBack(char* passwd, int sz, int rw, void* userdata)
ashleymills 0:714293de3836 266 {
ashleymills 0:714293de3836 267 (void)rw;
ashleymills 0:714293de3836 268 (void)userdata;
ashleymills 0:714293de3836 269 strncpy(passwd, "yassl123", sz);
ashleymills 0:714293de3836 270 return 8;
ashleymills 0:714293de3836 271 }
ashleymills 0:714293de3836 272
ashleymills 0:714293de3836 273 #endif
ashleymills 0:714293de3836 274
ashleymills 0:714293de3836 275
ashleymills 0:714293de3836 276 #if defined(KEEP_PEER_CERT) || defined(SESSION_CERTS)
ashleymills 0:714293de3836 277
ashleymills 0:714293de3836 278 static INLINE void ShowX509(CYASSL_X509* x509, const char* hdr)
ashleymills 0:714293de3836 279 {
ashleymills 0:714293de3836 280 char* altName;
ashleymills 0:714293de3836 281 char* issuer = CyaSSL_X509_NAME_oneline(
ashleymills 0:714293de3836 282 CyaSSL_X509_get_issuer_name(x509), 0, 0);
ashleymills 0:714293de3836 283 char* subject = CyaSSL_X509_NAME_oneline(
ashleymills 0:714293de3836 284 CyaSSL_X509_get_subject_name(x509), 0, 0);
ashleymills 0:714293de3836 285 byte serial[32];
ashleymills 0:714293de3836 286 int ret;
ashleymills 0:714293de3836 287 int sz = sizeof(serial);
ashleymills 0:714293de3836 288
ashleymills 0:714293de3836 289 printf("%s\n issuer : %s\n subject: %s\n", hdr, issuer, subject);
ashleymills 0:714293de3836 290
ashleymills 0:714293de3836 291 while ( (altName = CyaSSL_X509_get_next_altname(x509)) != NULL)
ashleymills 0:714293de3836 292 printf(" altname = %s\n", altName);
ashleymills 0:714293de3836 293
ashleymills 0:714293de3836 294 ret = CyaSSL_X509_get_serial_number(x509, serial, &sz);
ashleymills 0:714293de3836 295 if (ret == SSL_SUCCESS) {
ashleymills 0:714293de3836 296 int i;
ashleymills 0:714293de3836 297 int strLen;
ashleymills 0:714293de3836 298 char serialMsg[80];
ashleymills 0:714293de3836 299
ashleymills 0:714293de3836 300 /* testsuite has multiple threads writing to stdout, get output
ashleymills 0:714293de3836 301 message ready to write once */
ashleymills 0:714293de3836 302 strLen = sprintf(serialMsg, " serial number");
ashleymills 0:714293de3836 303 for (i = 0; i < sz; i++)
ashleymills 0:714293de3836 304 sprintf(serialMsg + strLen + (i*3), ":%02x ", serial[i]);
ashleymills 0:714293de3836 305 printf("%s\n", serialMsg);
ashleymills 0:714293de3836 306 }
ashleymills 0:714293de3836 307
ashleymills 0:714293de3836 308 XFREE(subject, 0, DYNAMIC_TYPE_OPENSSL);
ashleymills 0:714293de3836 309 XFREE(issuer, 0, DYNAMIC_TYPE_OPENSSL);
ashleymills 0:714293de3836 310 }
ashleymills 0:714293de3836 311
ashleymills 0:714293de3836 312 #endif /* KEEP_PEER_CERT || SESSION_CERTS */
ashleymills 0:714293de3836 313
ashleymills 0:714293de3836 314
ashleymills 0:714293de3836 315 static INLINE void showPeer(CYASSL* ssl)
ashleymills 0:714293de3836 316 {
ashleymills 0:714293de3836 317
ashleymills 0:714293de3836 318 CYASSL_CIPHER* cipher;
ashleymills 0:714293de3836 319 #ifdef KEEP_PEER_CERT
ashleymills 0:714293de3836 320 CYASSL_X509* peer = CyaSSL_get_peer_certificate(ssl);
ashleymills 0:714293de3836 321 if (peer)
ashleymills 0:714293de3836 322 ShowX509(peer, "peer's cert info:");
ashleymills 0:714293de3836 323 else
ashleymills 0:714293de3836 324 printf("peer has no cert!\n");
ashleymills 0:714293de3836 325 #endif
ashleymills 0:714293de3836 326 printf("SSL version is %s\n", CyaSSL_get_version(ssl));
ashleymills 0:714293de3836 327
ashleymills 0:714293de3836 328 cipher = CyaSSL_get_current_cipher(ssl);
ashleymills 0:714293de3836 329 printf("SSL cipher suite is %s\n", CyaSSL_CIPHER_get_name(cipher));
ashleymills 0:714293de3836 330
ashleymills 0:714293de3836 331 #if defined(SESSION_CERTS) && defined(SHOW_CERTS)
ashleymills 0:714293de3836 332 {
ashleymills 0:714293de3836 333 CYASSL_X509_CHAIN* chain = CyaSSL_get_peer_chain(ssl);
ashleymills 0:714293de3836 334 int count = CyaSSL_get_chain_count(chain);
ashleymills 0:714293de3836 335 int i;
ashleymills 0:714293de3836 336
ashleymills 0:714293de3836 337 for (i = 0; i < count; i++) {
ashleymills 0:714293de3836 338 int length;
ashleymills 0:714293de3836 339 unsigned char buffer[3072];
ashleymills 0:714293de3836 340 CYASSL_X509* chainX509;
ashleymills 0:714293de3836 341
ashleymills 0:714293de3836 342 CyaSSL_get_chain_cert_pem(chain,i,buffer, sizeof(buffer), &length);
ashleymills 0:714293de3836 343 buffer[length] = 0;
ashleymills 0:714293de3836 344 printf("cert %d has length %d data = \n%s\n", i, length, buffer);
ashleymills 0:714293de3836 345
ashleymills 0:714293de3836 346 chainX509 = CyaSSL_get_chain_X509(chain, i);
ashleymills 0:714293de3836 347 if (chainX509)
ashleymills 0:714293de3836 348 ShowX509(chainX509, "session cert info:");
ashleymills 0:714293de3836 349 else
ashleymills 0:714293de3836 350 printf("get_chain_X509 failed\n");
ashleymills 0:714293de3836 351 CyaSSL_FreeX509(chainX509);
ashleymills 0:714293de3836 352 }
ashleymills 0:714293de3836 353 }
ashleymills 0:714293de3836 354 #endif
ashleymills 0:714293de3836 355 (void)ssl;
ashleymills 0:714293de3836 356 }
ashleymills 0:714293de3836 357
ashleymills 0:714293de3836 358
ashleymills 0:714293de3836 359 static INLINE void build_addr(SOCKADDR_IN_T* addr, const char* peer,
ashleymills 0:714293de3836 360 word16 port, int udp)
ashleymills 0:714293de3836 361 {
ashleymills 0:714293de3836 362 int useLookup = 0;
ashleymills 0:714293de3836 363 (void)useLookup;
ashleymills 0:714293de3836 364 (void)udp;
ashleymills 0:714293de3836 365
ashleymills 0:714293de3836 366 memset(addr, 0, sizeof(SOCKADDR_IN_T));
ashleymills 0:714293de3836 367
ashleymills 0:714293de3836 368 #ifndef TEST_IPV6
ashleymills 0:714293de3836 369 /* peer could be in human readable form */
ashleymills 0:714293de3836 370 if ( (peer != INADDR_ANY) && isalpha((int)peer[0])) {
ashleymills 0:714293de3836 371 #ifdef CYASSL_MDK_ARM
ashleymills 0:714293de3836 372 int err;
ashleymills 0:714293de3836 373 struct hostent* entry = gethostbyname(peer, &err);
ashleymills 0:714293de3836 374 #else
ashleymills 0:714293de3836 375 struct hostent* entry = gethostbyname(peer);
ashleymills 0:714293de3836 376 #endif
ashleymills 0:714293de3836 377
ashleymills 0:714293de3836 378 if (entry) {
ashleymills 0:714293de3836 379 memcpy(&addr->sin_addr.s_addr, entry->h_addr_list[0],
ashleymills 0:714293de3836 380 entry->h_length);
ashleymills 0:714293de3836 381 useLookup = 1;
ashleymills 0:714293de3836 382 }
ashleymills 0:714293de3836 383 else
ashleymills 0:714293de3836 384 err_sys("no entry for host");
ashleymills 0:714293de3836 385 }
ashleymills 0:714293de3836 386 #endif
ashleymills 0:714293de3836 387
ashleymills 0:714293de3836 388
ashleymills 0:714293de3836 389 #ifndef TEST_IPV6
ashleymills 0:714293de3836 390 #if defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 391 addr->sin_family = PF_INET;
ashleymills 0:714293de3836 392 #else
ashleymills 0:714293de3836 393 addr->sin_family = AF_INET_V;
ashleymills 0:714293de3836 394 #endif
ashleymills 0:714293de3836 395 addr->sin_port = htons(port);
ashleymills 0:714293de3836 396 if (peer == INADDR_ANY)
ashleymills 0:714293de3836 397 addr->sin_addr.s_addr = INADDR_ANY;
ashleymills 0:714293de3836 398 else {
ashleymills 0:714293de3836 399 if (!useLookup)
ashleymills 0:714293de3836 400 addr->sin_addr.s_addr = inet_addr(peer);
ashleymills 0:714293de3836 401 }
ashleymills 0:714293de3836 402 #else
ashleymills 0:714293de3836 403 addr->sin6_family = AF_INET_V;
ashleymills 0:714293de3836 404 addr->sin6_port = htons(port);
ashleymills 0:714293de3836 405 if (peer == INADDR_ANY)
ashleymills 0:714293de3836 406 addr->sin6_addr = in6addr_any;
ashleymills 0:714293de3836 407 else {
ashleymills 0:714293de3836 408 #ifdef HAVE_GETADDRINFO
ashleymills 0:714293de3836 409 struct addrinfo hints;
ashleymills 0:714293de3836 410 struct addrinfo* answer = NULL;
ashleymills 0:714293de3836 411 int ret;
ashleymills 0:714293de3836 412 char strPort[80];
ashleymills 0:714293de3836 413
ashleymills 0:714293de3836 414 memset(&hints, 0, sizeof(hints));
ashleymills 0:714293de3836 415
ashleymills 0:714293de3836 416 hints.ai_family = AF_INET_V;
ashleymills 0:714293de3836 417 hints.ai_socktype = udp ? SOCK_DGRAM : SOCK_STREAM;
ashleymills 0:714293de3836 418 hints.ai_protocol = udp ? IPPROTO_UDP : IPPROTO_TCP;
ashleymills 0:714293de3836 419
ashleymills 0:714293de3836 420 SNPRINTF(strPort, sizeof(strPort), "%d", port);
ashleymills 0:714293de3836 421 strPort[79] = '\0';
ashleymills 0:714293de3836 422
ashleymills 0:714293de3836 423 ret = getaddrinfo(peer, strPort, &hints, &answer);
ashleymills 0:714293de3836 424 if (ret < 0 || answer == NULL)
ashleymills 0:714293de3836 425 err_sys("getaddrinfo failed");
ashleymills 0:714293de3836 426
ashleymills 0:714293de3836 427 memcpy(addr, answer->ai_addr, answer->ai_addrlen);
ashleymills 0:714293de3836 428 freeaddrinfo(answer);
ashleymills 0:714293de3836 429 #else
ashleymills 0:714293de3836 430 printf("no ipv6 getaddrinfo, loopback only tests/examples\n");
ashleymills 0:714293de3836 431 addr->sin6_addr = in6addr_loopback;
ashleymills 0:714293de3836 432 #endif
ashleymills 0:714293de3836 433 }
ashleymills 0:714293de3836 434 #endif
ashleymills 0:714293de3836 435 }
ashleymills 0:714293de3836 436
ashleymills 0:714293de3836 437
ashleymills 0:714293de3836 438 static INLINE void tcp_socket(SOCKET_T* sockfd, int udp)
ashleymills 0:714293de3836 439 {
ashleymills 0:714293de3836 440 if (udp)
ashleymills 0:714293de3836 441 *sockfd = socket(AF_INET_V, SOCK_DGRAM, 0);
ashleymills 0:714293de3836 442 else
ashleymills 0:714293de3836 443 *sockfd = socket(AF_INET_V, SOCK_STREAM, 0);
ashleymills 0:714293de3836 444
ashleymills 0:714293de3836 445 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 446 if (*sockfd == INVALID_SOCKET)
ashleymills 0:714293de3836 447 err_sys("socket failed\n");
ashleymills 0:714293de3836 448 #else
ashleymills 0:714293de3836 449 if (*sockfd < 0)
ashleymills 0:714293de3836 450 err_sys("socket failed\n");
ashleymills 0:714293de3836 451 #endif
ashleymills 0:714293de3836 452
ashleymills 0:714293de3836 453 #ifndef USE_WINDOWS_API
ashleymills 0:714293de3836 454 #ifdef SO_NOSIGPIPE
ashleymills 0:714293de3836 455 {
ashleymills 0:714293de3836 456 int on = 1;
ashleymills 0:714293de3836 457 socklen_t len = sizeof(on);
ashleymills 0:714293de3836 458 int res = setsockopt(*sockfd, SOL_SOCKET, SO_NOSIGPIPE, &on, len);
ashleymills 0:714293de3836 459 if (res < 0)
ashleymills 0:714293de3836 460 err_sys("setsockopt SO_NOSIGPIPE failed\n");
ashleymills 0:714293de3836 461 }
ashleymills 0:714293de3836 462 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 463 /* nothing to define */
ashleymills 0:714293de3836 464 #else /* no S_NOSIGPIPE */
ashleymills 0:714293de3836 465 signal(SIGPIPE, SIG_IGN);
ashleymills 0:714293de3836 466 #endif /* S_NOSIGPIPE */
ashleymills 0:714293de3836 467
ashleymills 0:714293de3836 468 #if defined(TCP_NODELAY)
ashleymills 0:714293de3836 469 if (!udp)
ashleymills 0:714293de3836 470 {
ashleymills 0:714293de3836 471 int on = 1;
ashleymills 0:714293de3836 472 socklen_t len = sizeof(on);
ashleymills 0:714293de3836 473 int res = setsockopt(*sockfd, IPPROTO_TCP, TCP_NODELAY, &on, len);
ashleymills 0:714293de3836 474 if (res < 0)
ashleymills 0:714293de3836 475 err_sys("setsockopt TCP_NODELAY failed\n");
ashleymills 0:714293de3836 476 }
ashleymills 0:714293de3836 477 #endif
ashleymills 0:714293de3836 478 #endif /* USE_WINDOWS_API */
ashleymills 0:714293de3836 479 }
ashleymills 0:714293de3836 480
ashleymills 0:714293de3836 481 static INLINE void tcp_connect(SOCKET_T* sockfd, const char* ip, word16 port,
ashleymills 0:714293de3836 482 int udp)
ashleymills 0:714293de3836 483 {
ashleymills 0:714293de3836 484 SOCKADDR_IN_T addr;
ashleymills 0:714293de3836 485 build_addr(&addr, ip, port, udp);
ashleymills 0:714293de3836 486 tcp_socket(sockfd, udp);
ashleymills 0:714293de3836 487
ashleymills 0:714293de3836 488 if (!udp) {
ashleymills 0:714293de3836 489 if (connect(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0)
ashleymills 0:714293de3836 490 err_sys("tcp connect failed");
ashleymills 0:714293de3836 491 }
ashleymills 0:714293de3836 492 }
ashleymills 0:714293de3836 493
ashleymills 0:714293de3836 494
ashleymills 0:714293de3836 495 static INLINE void udp_connect(SOCKET_T* sockfd, void* addr, int addrSz)
ashleymills 0:714293de3836 496 {
ashleymills 0:714293de3836 497 if (connect(*sockfd, (const struct sockaddr*)addr, addrSz) != 0)
ashleymills 0:714293de3836 498 err_sys("tcp connect failed");
ashleymills 0:714293de3836 499 }
ashleymills 0:714293de3836 500
ashleymills 0:714293de3836 501
ashleymills 0:714293de3836 502 enum {
ashleymills 0:714293de3836 503 TEST_SELECT_FAIL,
ashleymills 0:714293de3836 504 TEST_TIMEOUT,
ashleymills 0:714293de3836 505 TEST_RECV_READY,
ashleymills 0:714293de3836 506 TEST_ERROR_READY
ashleymills 0:714293de3836 507 };
ashleymills 0:714293de3836 508
ashleymills 0:714293de3836 509
ashleymills 0:714293de3836 510 #if !defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 511 static INLINE int tcp_select(SOCKET_T socketfd, int to_sec)
ashleymills 0:714293de3836 512 {
ashleymills 0:714293de3836 513 fd_set recvfds, errfds;
ashleymills 0:714293de3836 514 SOCKET_T nfds = socketfd + 1;
ashleymills 0:714293de3836 515 struct timeval timeout = { (to_sec > 0) ? to_sec : 0, 0};
ashleymills 0:714293de3836 516 int result;
ashleymills 0:714293de3836 517
ashleymills 0:714293de3836 518 FD_ZERO(&recvfds);
ashleymills 0:714293de3836 519 FD_SET(socketfd, &recvfds);
ashleymills 0:714293de3836 520 FD_ZERO(&errfds);
ashleymills 0:714293de3836 521 FD_SET(socketfd, &errfds);
ashleymills 0:714293de3836 522
ashleymills 0:714293de3836 523 result = select(nfds, &recvfds, NULL, &errfds, &timeout);
ashleymills 0:714293de3836 524
ashleymills 0:714293de3836 525 if (result == 0)
ashleymills 0:714293de3836 526 return TEST_TIMEOUT;
ashleymills 0:714293de3836 527 else if (result > 0) {
ashleymills 0:714293de3836 528 if (FD_ISSET(socketfd, &recvfds))
ashleymills 0:714293de3836 529 return TEST_RECV_READY;
ashleymills 0:714293de3836 530 else if(FD_ISSET(socketfd, &errfds))
ashleymills 0:714293de3836 531 return TEST_ERROR_READY;
ashleymills 0:714293de3836 532 }
ashleymills 0:714293de3836 533
ashleymills 0:714293de3836 534 return TEST_SELECT_FAIL;
ashleymills 0:714293de3836 535 }
ashleymills 0:714293de3836 536 #endif /* !CYASSL_MDK_ARM */
ashleymills 0:714293de3836 537
ashleymills 0:714293de3836 538
ashleymills 0:714293de3836 539 static INLINE void tcp_listen(SOCKET_T* sockfd, int* port, int useAnyAddr,
ashleymills 0:714293de3836 540 int udp)
ashleymills 0:714293de3836 541 {
ashleymills 0:714293de3836 542 SOCKADDR_IN_T addr;
ashleymills 0:714293de3836 543
ashleymills 0:714293de3836 544 /* don't use INADDR_ANY by default, firewall may block, make user switch
ashleymills 0:714293de3836 545 on */
ashleymills 0:714293de3836 546 build_addr(&addr, (useAnyAddr ? INADDR_ANY : yasslIP), *port, udp);
ashleymills 0:714293de3836 547 tcp_socket(sockfd, udp);
ashleymills 0:714293de3836 548
ashleymills 0:714293de3836 549 #if !defined(USE_WINDOWS_API) && !defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 550 {
ashleymills 0:714293de3836 551 int res, on = 1;
ashleymills 0:714293de3836 552 socklen_t len = sizeof(on);
ashleymills 0:714293de3836 553 res = setsockopt(*sockfd, SOL_SOCKET, SO_REUSEADDR, &on, len);
ashleymills 0:714293de3836 554 if (res < 0)
ashleymills 0:714293de3836 555 err_sys("setsockopt SO_REUSEADDR failed\n");
ashleymills 0:714293de3836 556 }
ashleymills 0:714293de3836 557 #endif
ashleymills 0:714293de3836 558
ashleymills 0:714293de3836 559 if (bind(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0)
ashleymills 0:714293de3836 560 err_sys("tcp bind failed");
ashleymills 0:714293de3836 561 if (!udp) {
ashleymills 0:714293de3836 562 if (listen(*sockfd, 5) != 0)
ashleymills 0:714293de3836 563 err_sys("tcp listen failed");
ashleymills 0:714293de3836 564 }
ashleymills 0:714293de3836 565 #if defined(NO_MAIN_DRIVER) && !defined(USE_WINDOWS_API)
ashleymills 0:714293de3836 566 if (*port == 0) {
ashleymills 0:714293de3836 567 socklen_t len = sizeof(addr);
ashleymills 0:714293de3836 568 if (getsockname(*sockfd, (struct sockaddr*)&addr, &len) == 0) {
ashleymills 0:714293de3836 569 #ifndef TEST_IPV6
ashleymills 0:714293de3836 570 *port = ntohs(addr.sin_port);
ashleymills 0:714293de3836 571 #else
ashleymills 0:714293de3836 572 *port = ntohs(addr.sin6_port);
ashleymills 0:714293de3836 573 #endif
ashleymills 0:714293de3836 574 }
ashleymills 0:714293de3836 575 }
ashleymills 0:714293de3836 576 #endif
ashleymills 0:714293de3836 577 }
ashleymills 0:714293de3836 578
ashleymills 0:714293de3836 579
ashleymills 0:714293de3836 580 static INLINE int udp_read_connect(SOCKET_T sockfd)
ashleymills 0:714293de3836 581 {
ashleymills 0:714293de3836 582 SOCKADDR_IN_T cliaddr;
ashleymills 0:714293de3836 583 byte b[1500];
ashleymills 0:714293de3836 584 int n;
ashleymills 0:714293de3836 585 socklen_t len = sizeof(cliaddr);
ashleymills 0:714293de3836 586
ashleymills 0:714293de3836 587 n = (int)recvfrom(sockfd, (char*)b, sizeof(b), MSG_PEEK,
ashleymills 0:714293de3836 588 (struct sockaddr*)&cliaddr, &len);
ashleymills 0:714293de3836 589 if (n > 0) {
ashleymills 0:714293de3836 590 if (connect(sockfd, (const struct sockaddr*)&cliaddr,
ashleymills 0:714293de3836 591 sizeof(cliaddr)) != 0)
ashleymills 0:714293de3836 592 err_sys("udp connect failed");
ashleymills 0:714293de3836 593 }
ashleymills 0:714293de3836 594 else
ashleymills 0:714293de3836 595 err_sys("recvfrom failed");
ashleymills 0:714293de3836 596
ashleymills 0:714293de3836 597 return sockfd;
ashleymills 0:714293de3836 598 }
ashleymills 0:714293de3836 599
ashleymills 0:714293de3836 600 static INLINE void udp_accept(SOCKET_T* sockfd, SOCKET_T* clientfd,
ashleymills 0:714293de3836 601 int useAnyAddr, int port, func_args* args)
ashleymills 0:714293de3836 602 {
ashleymills 0:714293de3836 603 SOCKADDR_IN_T addr;
ashleymills 0:714293de3836 604
ashleymills 0:714293de3836 605 (void)args;
ashleymills 0:714293de3836 606 build_addr(&addr, (useAnyAddr ? INADDR_ANY : yasslIP), port, 1);
ashleymills 0:714293de3836 607 tcp_socket(sockfd, 1);
ashleymills 0:714293de3836 608
ashleymills 0:714293de3836 609
ashleymills 0:714293de3836 610 #if !defined(USE_WINDOWS_API) && !defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 611 {
ashleymills 0:714293de3836 612 int res, on = 1;
ashleymills 0:714293de3836 613 socklen_t len = sizeof(on);
ashleymills 0:714293de3836 614 res = setsockopt(*sockfd, SOL_SOCKET, SO_REUSEADDR, &on, len);
ashleymills 0:714293de3836 615 if (res < 0)
ashleymills 0:714293de3836 616 err_sys("setsockopt SO_REUSEADDR failed\n");
ashleymills 0:714293de3836 617 }
ashleymills 0:714293de3836 618 #endif
ashleymills 0:714293de3836 619
ashleymills 0:714293de3836 620 if (bind(*sockfd, (const struct sockaddr*)&addr, sizeof(addr)) != 0)
ashleymills 0:714293de3836 621 err_sys("tcp bind failed");
ashleymills 0:714293de3836 622
ashleymills 0:714293de3836 623 #if defined(NO_MAIN_DRIVER) && !defined(USE_WINDOWS_API)
ashleymills 0:714293de3836 624 if (port == 0) {
ashleymills 0:714293de3836 625 socklen_t len = sizeof(addr);
ashleymills 0:714293de3836 626 if (getsockname(*sockfd, (struct sockaddr*)&addr, &len) == 0) {
ashleymills 0:714293de3836 627 #ifndef TEST_IPV6
ashleymills 0:714293de3836 628 port = ntohs(addr.sin_port);
ashleymills 0:714293de3836 629 #else
ashleymills 0:714293de3836 630 port = ntohs(addr.sin6_port);
ashleymills 0:714293de3836 631 #endif
ashleymills 0:714293de3836 632 }
ashleymills 0:714293de3836 633 }
ashleymills 0:714293de3836 634 #endif
ashleymills 0:714293de3836 635
ashleymills 0:714293de3836 636 #if defined(_POSIX_THREADS) && defined(NO_MAIN_DRIVER) && !defined(__MINGW32__)
ashleymills 0:714293de3836 637 /* signal ready to accept data */
ashleymills 0:714293de3836 638 {
ashleymills 0:714293de3836 639 tcp_ready* ready = args->signal;
ashleymills 0:714293de3836 640 pthread_mutex_lock(&ready->mutex);
ashleymills 0:714293de3836 641 ready->ready = 1;
ashleymills 0:714293de3836 642 ready->port = port;
ashleymills 0:714293de3836 643 pthread_cond_signal(&ready->cond);
ashleymills 0:714293de3836 644 pthread_mutex_unlock(&ready->mutex);
ashleymills 0:714293de3836 645 }
ashleymills 0:714293de3836 646 #endif
ashleymills 0:714293de3836 647
ashleymills 0:714293de3836 648 *clientfd = udp_read_connect(*sockfd);
ashleymills 0:714293de3836 649 }
ashleymills 0:714293de3836 650
ashleymills 0:714293de3836 651 static INLINE void tcp_accept(SOCKET_T* sockfd, SOCKET_T* clientfd,
ashleymills 0:714293de3836 652 func_args* args, int port, int useAnyAddr,
ashleymills 0:714293de3836 653 int udp)
ashleymills 0:714293de3836 654 {
ashleymills 0:714293de3836 655 SOCKADDR_IN_T client;
ashleymills 0:714293de3836 656 socklen_t client_len = sizeof(client);
ashleymills 0:714293de3836 657
ashleymills 0:714293de3836 658 if (udp) {
ashleymills 0:714293de3836 659 udp_accept(sockfd, clientfd, useAnyAddr, port, args);
ashleymills 0:714293de3836 660 return;
ashleymills 0:714293de3836 661 }
ashleymills 0:714293de3836 662
ashleymills 0:714293de3836 663 tcp_listen(sockfd, &port, useAnyAddr, udp);
ashleymills 0:714293de3836 664
ashleymills 0:714293de3836 665 #if defined(_POSIX_THREADS) && defined(NO_MAIN_DRIVER) && !defined(__MINGW32__)
ashleymills 0:714293de3836 666 /* signal ready to tcp_accept */
ashleymills 0:714293de3836 667 {
ashleymills 0:714293de3836 668 tcp_ready* ready = args->signal;
ashleymills 0:714293de3836 669 pthread_mutex_lock(&ready->mutex);
ashleymills 0:714293de3836 670 ready->ready = 1;
ashleymills 0:714293de3836 671 ready->port = port;
ashleymills 0:714293de3836 672 pthread_cond_signal(&ready->cond);
ashleymills 0:714293de3836 673 pthread_mutex_unlock(&ready->mutex);
ashleymills 0:714293de3836 674 }
ashleymills 0:714293de3836 675 #endif
ashleymills 0:714293de3836 676
ashleymills 0:714293de3836 677 *clientfd = accept(*sockfd, (struct sockaddr*)&client,
ashleymills 0:714293de3836 678 (ACCEPT_THIRD_T)&client_len);
ashleymills 0:714293de3836 679 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 680 if (*clientfd == INVALID_SOCKET)
ashleymills 0:714293de3836 681 err_sys("tcp accept failed");
ashleymills 0:714293de3836 682 #else
ashleymills 0:714293de3836 683 if (*clientfd == -1)
ashleymills 0:714293de3836 684 err_sys("tcp accept failed");
ashleymills 0:714293de3836 685 #endif
ashleymills 0:714293de3836 686 }
ashleymills 0:714293de3836 687
ashleymills 0:714293de3836 688
ashleymills 0:714293de3836 689 static INLINE void tcp_set_nonblocking(SOCKET_T* sockfd)
ashleymills 0:714293de3836 690 {
ashleymills 0:714293de3836 691 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 692 unsigned long blocking = 1;
ashleymills 0:714293de3836 693 int ret = ioctlsocket(*sockfd, FIONBIO, &blocking);
ashleymills 0:714293de3836 694 if (ret == SOCKET_ERROR)
ashleymills 0:714293de3836 695 err_sys("ioctlsocket failed");
ashleymills 0:714293de3836 696 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 697 /* non blocking not suppported, for now */
ashleymills 0:714293de3836 698 #else
ashleymills 0:714293de3836 699 int flags = fcntl(*sockfd, F_GETFL, 0);
ashleymills 0:714293de3836 700 if (flags < 0)
ashleymills 0:714293de3836 701 err_sys("fcntl get failed");
ashleymills 0:714293de3836 702 flags = fcntl(*sockfd, F_SETFL, flags | O_NONBLOCK);
ashleymills 0:714293de3836 703 if (flags < 0)
ashleymills 0:714293de3836 704 err_sys("fcntl set failed");
ashleymills 0:714293de3836 705 #endif
ashleymills 0:714293de3836 706 }
ashleymills 0:714293de3836 707
ashleymills 0:714293de3836 708
ashleymills 0:714293de3836 709 #ifndef NO_PSK
ashleymills 0:714293de3836 710
ashleymills 0:714293de3836 711 static INLINE unsigned int my_psk_client_cb(CYASSL* ssl, const char* hint,
ashleymills 0:714293de3836 712 char* identity, unsigned int id_max_len, unsigned char* key,
ashleymills 0:714293de3836 713 unsigned int key_max_len)
ashleymills 0:714293de3836 714 {
ashleymills 0:714293de3836 715 (void)ssl;
ashleymills 0:714293de3836 716 (void)hint;
ashleymills 0:714293de3836 717 (void)key_max_len;
ashleymills 0:714293de3836 718
ashleymills 0:714293de3836 719 /* identity is OpenSSL testing default for openssl s_client, keep same */
ashleymills 0:714293de3836 720 strncpy(identity, "Client_identity", id_max_len);
ashleymills 0:714293de3836 721
ashleymills 0:714293de3836 722
ashleymills 0:714293de3836 723 /* test key in hex is 0x1a2b3c4d , in decimal 439,041,101 , we're using
ashleymills 0:714293de3836 724 unsigned binary */
ashleymills 0:714293de3836 725 key[0] = 26;
ashleymills 0:714293de3836 726 key[1] = 43;
ashleymills 0:714293de3836 727 key[2] = 60;
ashleymills 0:714293de3836 728 key[3] = 77;
ashleymills 0:714293de3836 729
ashleymills 0:714293de3836 730 return 4; /* length of key in octets or 0 for error */
ashleymills 0:714293de3836 731 }
ashleymills 0:714293de3836 732
ashleymills 0:714293de3836 733
ashleymills 0:714293de3836 734 static INLINE unsigned int my_psk_server_cb(CYASSL* ssl, const char* identity,
ashleymills 0:714293de3836 735 unsigned char* key, unsigned int key_max_len)
ashleymills 0:714293de3836 736 {
ashleymills 0:714293de3836 737 (void)ssl;
ashleymills 0:714293de3836 738 (void)key_max_len;
ashleymills 0:714293de3836 739
ashleymills 0:714293de3836 740 /* identity is OpenSSL testing default for openssl s_client, keep same */
ashleymills 0:714293de3836 741 if (strncmp(identity, "Client_identity", 15) != 0)
ashleymills 0:714293de3836 742 return 0;
ashleymills 0:714293de3836 743
ashleymills 0:714293de3836 744 /* test key in hex is 0x1a2b3c4d , in decimal 439,041,101 , we're using
ashleymills 0:714293de3836 745 unsigned binary */
ashleymills 0:714293de3836 746 key[0] = 26;
ashleymills 0:714293de3836 747 key[1] = 43;
ashleymills 0:714293de3836 748 key[2] = 60;
ashleymills 0:714293de3836 749 key[3] = 77;
ashleymills 0:714293de3836 750
ashleymills 0:714293de3836 751 return 4; /* length of key in octets or 0 for error */
ashleymills 0:714293de3836 752 }
ashleymills 0:714293de3836 753
ashleymills 0:714293de3836 754 #endif /* NO_PSK */
ashleymills 0:714293de3836 755
ashleymills 0:714293de3836 756
ashleymills 0:714293de3836 757 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 758
ashleymills 0:714293de3836 759 #define WIN32_LEAN_AND_MEAN
ashleymills 0:714293de3836 760 #include <windows.h>
ashleymills 0:714293de3836 761
ashleymills 0:714293de3836 762 static INLINE double current_time()
ashleymills 0:714293de3836 763 {
ashleymills 0:714293de3836 764 static int init = 0;
ashleymills 0:714293de3836 765 static LARGE_INTEGER freq;
ashleymills 0:714293de3836 766
ashleymills 0:714293de3836 767 LARGE_INTEGER count;
ashleymills 0:714293de3836 768
ashleymills 0:714293de3836 769 if (!init) {
ashleymills 0:714293de3836 770 QueryPerformanceFrequency(&freq);
ashleymills 0:714293de3836 771 init = 1;
ashleymills 0:714293de3836 772 }
ashleymills 0:714293de3836 773
ashleymills 0:714293de3836 774 QueryPerformanceCounter(&count);
ashleymills 0:714293de3836 775
ashleymills 0:714293de3836 776 return (double)count.QuadPart / freq.QuadPart;
ashleymills 0:714293de3836 777 }
ashleymills 0:714293de3836 778
ashleymills 0:714293de3836 779 #else
ashleymills 0:714293de3836 780
ashleymills 0:714293de3836 781 #if !defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 782 #include <sys/time.h>
ashleymills 0:714293de3836 783
ashleymills 0:714293de3836 784 static INLINE double current_time(void)
ashleymills 0:714293de3836 785 {
ashleymills 0:714293de3836 786 struct timeval tv;
ashleymills 0:714293de3836 787 gettimeofday(&tv, 0);
ashleymills 0:714293de3836 788
ashleymills 0:714293de3836 789 return (double)tv.tv_sec + (double)tv.tv_usec / 1000000;
ashleymills 0:714293de3836 790 }
ashleymills 0:714293de3836 791
ashleymills 0:714293de3836 792 #endif
ashleymills 0:714293de3836 793 #endif /* USE_WINDOWS_API */
ashleymills 0:714293de3836 794
ashleymills 0:714293de3836 795
ashleymills 0:714293de3836 796 #if defined(NO_FILESYSTEM) && !defined(NO_CERTS)
ashleymills 0:714293de3836 797
ashleymills 0:714293de3836 798 enum {
ashleymills 0:714293de3836 799 CYASSL_CA = 1,
ashleymills 0:714293de3836 800 CYASSL_CERT = 2,
ashleymills 0:714293de3836 801 CYASSL_KEY = 3
ashleymills 0:714293de3836 802 };
ashleymills 0:714293de3836 803
ashleymills 0:714293de3836 804 static INLINE void load_buffer(CYASSL_CTX* ctx, const char* fname, int type)
ashleymills 0:714293de3836 805 {
ashleymills 0:714293de3836 806 /* test buffer load */
ashleymills 0:714293de3836 807 long sz = 0;
ashleymills 0:714293de3836 808 byte buff[10000];
ashleymills 0:714293de3836 809 FILE* file = fopen(fname, "rb");
ashleymills 0:714293de3836 810
ashleymills 0:714293de3836 811 if (!file)
ashleymills 0:714293de3836 812 err_sys("can't open file for buffer load "
ashleymills 0:714293de3836 813 "Please run from CyaSSL home directory if not");
ashleymills 0:714293de3836 814 fseek(file, 0, SEEK_END);
ashleymills 0:714293de3836 815 sz = ftell(file);
ashleymills 0:714293de3836 816 rewind(file);
ashleymills 0:714293de3836 817 fread(buff, sizeof(buff), 1, file);
ashleymills 0:714293de3836 818
ashleymills 0:714293de3836 819 if (type == CYASSL_CA) {
ashleymills 0:714293de3836 820 if (CyaSSL_CTX_load_verify_buffer(ctx, buff, sz, SSL_FILETYPE_PEM)
ashleymills 0:714293de3836 821 != SSL_SUCCESS)
ashleymills 0:714293de3836 822 err_sys("can't load buffer ca file");
ashleymills 0:714293de3836 823 }
ashleymills 0:714293de3836 824 else if (type == CYASSL_CERT) {
ashleymills 0:714293de3836 825 if (CyaSSL_CTX_use_certificate_buffer(ctx, buff, sz,
ashleymills 0:714293de3836 826 SSL_FILETYPE_PEM) != SSL_SUCCESS)
ashleymills 0:714293de3836 827 err_sys("can't load buffer cert file");
ashleymills 0:714293de3836 828 }
ashleymills 0:714293de3836 829 else if (type == CYASSL_KEY) {
ashleymills 0:714293de3836 830 if (CyaSSL_CTX_use_PrivateKey_buffer(ctx, buff, sz,
ashleymills 0:714293de3836 831 SSL_FILETYPE_PEM) != SSL_SUCCESS)
ashleymills 0:714293de3836 832 err_sys("can't load buffer key file");
ashleymills 0:714293de3836 833 }
ashleymills 0:714293de3836 834 }
ashleymills 0:714293de3836 835
ashleymills 0:714293de3836 836 #endif /* NO_FILESYSTEM */
ashleymills 0:714293de3836 837
ashleymills 0:714293de3836 838 #ifdef VERIFY_CALLBACK
ashleymills 0:714293de3836 839
ashleymills 0:714293de3836 840 static INLINE int myVerify(int preverify, CYASSL_X509_STORE_CTX* store)
ashleymills 0:714293de3836 841 {
ashleymills 0:714293de3836 842 char buffer[80];
ashleymills 0:714293de3836 843
ashleymills 0:714293de3836 844 #ifdef OPENSSL_EXTRA
ashleymills 0:714293de3836 845 CYASSL_X509* peer;
ashleymills 0:714293de3836 846 #endif
ashleymills 0:714293de3836 847
ashleymills 0:714293de3836 848 printf("In verification callback, error = %d, %s\n", store->error,
ashleymills 0:714293de3836 849 CyaSSL_ERR_error_string(store->error, buffer));
ashleymills 0:714293de3836 850 #ifdef OPENSSL_EXTRA
ashleymills 0:714293de3836 851 peer = store->current_cert;
ashleymills 0:714293de3836 852 if (peer) {
ashleymills 0:714293de3836 853 char* issuer = CyaSSL_X509_NAME_oneline(
ashleymills 0:714293de3836 854 CyaSSL_X509_get_issuer_name(peer), 0, 0);
ashleymills 0:714293de3836 855 char* subject = CyaSSL_X509_NAME_oneline(
ashleymills 0:714293de3836 856 CyaSSL_X509_get_subject_name(peer), 0, 0);
ashleymills 0:714293de3836 857 printf("peer's cert info:\n issuer : %s\n subject: %s\n", issuer,
ashleymills 0:714293de3836 858 subject);
ashleymills 0:714293de3836 859 XFREE(subject, 0, DYNAMIC_TYPE_OPENSSL);
ashleymills 0:714293de3836 860 XFREE(issuer, 0, DYNAMIC_TYPE_OPENSSL);
ashleymills 0:714293de3836 861 }
ashleymills 0:714293de3836 862 else
ashleymills 0:714293de3836 863 printf("peer has no cert!\n");
ashleymills 0:714293de3836 864 #endif
ashleymills 0:714293de3836 865 printf("Subject's domain name is %s\n", store->domain);
ashleymills 0:714293de3836 866
ashleymills 0:714293de3836 867 printf("Allowing to continue anyway (shouldn't do this, EVER!!!)\n");
ashleymills 0:714293de3836 868 return 1;
ashleymills 0:714293de3836 869 }
ashleymills 0:714293de3836 870
ashleymills 0:714293de3836 871 #endif /* VERIFY_CALLBACK */
ashleymills 0:714293de3836 872
ashleymills 0:714293de3836 873
ashleymills 0:714293de3836 874 #ifdef HAVE_CRL
ashleymills 0:714293de3836 875
ashleymills 0:714293de3836 876 static INLINE void CRL_CallBack(const char* url)
ashleymills 0:714293de3836 877 {
ashleymills 0:714293de3836 878 printf("CRL callback url = %s\n", url);
ashleymills 0:714293de3836 879 }
ashleymills 0:714293de3836 880
ashleymills 0:714293de3836 881 #endif
ashleymills 0:714293de3836 882
ashleymills 0:714293de3836 883 #ifndef NO_CERTS
ashleymills 0:714293de3836 884
ashleymills 0:714293de3836 885 static INLINE void CaCb(unsigned char* der, int sz, int type)
ashleymills 0:714293de3836 886 {
ashleymills 0:714293de3836 887 (void)der;
ashleymills 0:714293de3836 888 printf("Got CA cache add callback, derSz = %d, type = %d\n", sz, type);
ashleymills 0:714293de3836 889 }
ashleymills 0:714293de3836 890
ashleymills 0:714293de3836 891
ashleymills 0:714293de3836 892 static INLINE void SetDH(CYASSL* ssl)
ashleymills 0:714293de3836 893 {
ashleymills 0:714293de3836 894 /* dh1024 p */
ashleymills 0:714293de3836 895 static unsigned char p[] =
ashleymills 0:714293de3836 896 {
ashleymills 0:714293de3836 897 0xE6, 0x96, 0x9D, 0x3D, 0x49, 0x5B, 0xE3, 0x2C, 0x7C, 0xF1, 0x80, 0xC3,
ashleymills 0:714293de3836 898 0xBD, 0xD4, 0x79, 0x8E, 0x91, 0xB7, 0x81, 0x82, 0x51, 0xBB, 0x05, 0x5E,
ashleymills 0:714293de3836 899 0x2A, 0x20, 0x64, 0x90, 0x4A, 0x79, 0xA7, 0x70, 0xFA, 0x15, 0xA2, 0x59,
ashleymills 0:714293de3836 900 0xCB, 0xD5, 0x23, 0xA6, 0xA6, 0xEF, 0x09, 0xC4, 0x30, 0x48, 0xD5, 0xA2,
ashleymills 0:714293de3836 901 0x2F, 0x97, 0x1F, 0x3C, 0x20, 0x12, 0x9B, 0x48, 0x00, 0x0E, 0x6E, 0xDD,
ashleymills 0:714293de3836 902 0x06, 0x1C, 0xBC, 0x05, 0x3E, 0x37, 0x1D, 0x79, 0x4E, 0x53, 0x27, 0xDF,
ashleymills 0:714293de3836 903 0x61, 0x1E, 0xBB, 0xBE, 0x1B, 0xAC, 0x9B, 0x5C, 0x60, 0x44, 0xCF, 0x02,
ashleymills 0:714293de3836 904 0x3D, 0x76, 0xE0, 0x5E, 0xEA, 0x9B, 0xAD, 0x99, 0x1B, 0x13, 0xA6, 0x3C,
ashleymills 0:714293de3836 905 0x97, 0x4E, 0x9E, 0xF1, 0x83, 0x9E, 0xB5, 0xDB, 0x12, 0x51, 0x36, 0xF7,
ashleymills 0:714293de3836 906 0x26, 0x2E, 0x56, 0xA8, 0x87, 0x15, 0x38, 0xDF, 0xD8, 0x23, 0xC6, 0x50,
ashleymills 0:714293de3836 907 0x50, 0x85, 0xE2, 0x1F, 0x0D, 0xD5, 0xC8, 0x6B,
ashleymills 0:714293de3836 908 };
ashleymills 0:714293de3836 909
ashleymills 0:714293de3836 910 /* dh1024 g */
ashleymills 0:714293de3836 911 static unsigned char g[] =
ashleymills 0:714293de3836 912 {
ashleymills 0:714293de3836 913 0x02,
ashleymills 0:714293de3836 914 };
ashleymills 0:714293de3836 915
ashleymills 0:714293de3836 916 CyaSSL_SetTmpDH(ssl, p, sizeof(p), g, sizeof(g));
ashleymills 0:714293de3836 917 }
ashleymills 0:714293de3836 918
ashleymills 0:714293de3836 919 static INLINE void SetDHCtx(CYASSL_CTX* ctx)
ashleymills 0:714293de3836 920 {
ashleymills 0:714293de3836 921 /* dh1024 p */
ashleymills 0:714293de3836 922 static unsigned char p[] =
ashleymills 0:714293de3836 923 {
ashleymills 0:714293de3836 924 0xE6, 0x96, 0x9D, 0x3D, 0x49, 0x5B, 0xE3, 0x2C, 0x7C, 0xF1, 0x80, 0xC3,
ashleymills 0:714293de3836 925 0xBD, 0xD4, 0x79, 0x8E, 0x91, 0xB7, 0x81, 0x82, 0x51, 0xBB, 0x05, 0x5E,
ashleymills 0:714293de3836 926 0x2A, 0x20, 0x64, 0x90, 0x4A, 0x79, 0xA7, 0x70, 0xFA, 0x15, 0xA2, 0x59,
ashleymills 0:714293de3836 927 0xCB, 0xD5, 0x23, 0xA6, 0xA6, 0xEF, 0x09, 0xC4, 0x30, 0x48, 0xD5, 0xA2,
ashleymills 0:714293de3836 928 0x2F, 0x97, 0x1F, 0x3C, 0x20, 0x12, 0x9B, 0x48, 0x00, 0x0E, 0x6E, 0xDD,
ashleymills 0:714293de3836 929 0x06, 0x1C, 0xBC, 0x05, 0x3E, 0x37, 0x1D, 0x79, 0x4E, 0x53, 0x27, 0xDF,
ashleymills 0:714293de3836 930 0x61, 0x1E, 0xBB, 0xBE, 0x1B, 0xAC, 0x9B, 0x5C, 0x60, 0x44, 0xCF, 0x02,
ashleymills 0:714293de3836 931 0x3D, 0x76, 0xE0, 0x5E, 0xEA, 0x9B, 0xAD, 0x99, 0x1B, 0x13, 0xA6, 0x3C,
ashleymills 0:714293de3836 932 0x97, 0x4E, 0x9E, 0xF1, 0x83, 0x9E, 0xB5, 0xDB, 0x12, 0x51, 0x36, 0xF7,
ashleymills 0:714293de3836 933 0x26, 0x2E, 0x56, 0xA8, 0x87, 0x15, 0x38, 0xDF, 0xD8, 0x23, 0xC6, 0x50,
ashleymills 0:714293de3836 934 0x50, 0x85, 0xE2, 0x1F, 0x0D, 0xD5, 0xC8, 0x6B,
ashleymills 0:714293de3836 935 };
ashleymills 0:714293de3836 936
ashleymills 0:714293de3836 937 /* dh1024 g */
ashleymills 0:714293de3836 938 static unsigned char g[] =
ashleymills 0:714293de3836 939 {
ashleymills 0:714293de3836 940 0x02,
ashleymills 0:714293de3836 941 };
ashleymills 0:714293de3836 942
ashleymills 0:714293de3836 943 CyaSSL_CTX_SetTmpDH(ctx, p, sizeof(p), g, sizeof(g));
ashleymills 0:714293de3836 944 }
ashleymills 0:714293de3836 945
ashleymills 0:714293de3836 946 #endif /* !NO_CERTS */
ashleymills 0:714293de3836 947
ashleymills 0:714293de3836 948 #ifdef HAVE_CAVIUM
ashleymills 0:714293de3836 949
ashleymills 0:714293de3836 950 static INLINE int OpenNitroxDevice(int dma_mode,int dev_id)
ashleymills 0:714293de3836 951 {
ashleymills 0:714293de3836 952 Csp1CoreAssignment core_assign;
ashleymills 0:714293de3836 953 Uint32 device;
ashleymills 0:714293de3836 954
ashleymills 0:714293de3836 955 if (CspInitialize(CAVIUM_DIRECT,CAVIUM_DEV_ID))
ashleymills 0:714293de3836 956 return -1;
ashleymills 0:714293de3836 957 if (Csp1GetDevType(&device))
ashleymills 0:714293de3836 958 return -1;
ashleymills 0:714293de3836 959 if (device != NPX_DEVICE) {
ashleymills 0:714293de3836 960 if (ioctl(gpkpdev_hdlr[CAVIUM_DEV_ID], IOCTL_CSP1_GET_CORE_ASSIGNMENT,
ashleymills 0:714293de3836 961 (Uint32 *)&core_assign)!= 0)
ashleymills 0:714293de3836 962 return -1;
ashleymills 0:714293de3836 963 }
ashleymills 0:714293de3836 964 CspShutdown(CAVIUM_DEV_ID);
ashleymills 0:714293de3836 965
ashleymills 0:714293de3836 966 return CspInitialize(dma_mode, dev_id);
ashleymills 0:714293de3836 967 }
ashleymills 0:714293de3836 968
ashleymills 0:714293de3836 969 #endif /* HAVE_CAVIUM */
ashleymills 0:714293de3836 970
ashleymills 0:714293de3836 971
ashleymills 0:714293de3836 972 #ifdef USE_WINDOWS_API
ashleymills 0:714293de3836 973
ashleymills 0:714293de3836 974 /* do back x number of directories */
ashleymills 0:714293de3836 975 static INLINE void ChangeDirBack(int x)
ashleymills 0:714293de3836 976 {
ashleymills 0:714293de3836 977 char path[MAX_PATH];
ashleymills 0:714293de3836 978
ashleymills 0:714293de3836 979 if (x == 1)
ashleymills 0:714293de3836 980 strncpy(path, "..\\", MAX_PATH);
ashleymills 0:714293de3836 981 else if (x == 2)
ashleymills 0:714293de3836 982 strncpy(path, "..\\..\\", MAX_PATH);
ashleymills 0:714293de3836 983 else if (x == 3)
ashleymills 0:714293de3836 984 strncpy(path, "..\\..\\..\\", MAX_PATH);
ashleymills 0:714293de3836 985 else if (x == 4)
ashleymills 0:714293de3836 986 strncpy(path, "..\\..\\..\\..\\", MAX_PATH);
ashleymills 0:714293de3836 987 else
ashleymills 0:714293de3836 988 strncpy(path, ".\\", MAX_PATH);
ashleymills 0:714293de3836 989
ashleymills 0:714293de3836 990 SetCurrentDirectoryA(path);
ashleymills 0:714293de3836 991 }
ashleymills 0:714293de3836 992
ashleymills 0:714293de3836 993 /* does current dir contain str */
ashleymills 0:714293de3836 994 static INLINE int CurrentDir(const char* str)
ashleymills 0:714293de3836 995 {
ashleymills 0:714293de3836 996 char path[MAX_PATH];
ashleymills 0:714293de3836 997 char* baseName;
ashleymills 0:714293de3836 998
ashleymills 0:714293de3836 999 GetCurrentDirectoryA(sizeof(path), path);
ashleymills 0:714293de3836 1000
ashleymills 0:714293de3836 1001 baseName = strrchr(path, '\\');
ashleymills 0:714293de3836 1002 if (baseName)
ashleymills 0:714293de3836 1003 baseName++;
ashleymills 0:714293de3836 1004 else
ashleymills 0:714293de3836 1005 baseName = path;
ashleymills 0:714293de3836 1006
ashleymills 0:714293de3836 1007 if (strstr(baseName, str))
ashleymills 0:714293de3836 1008 return 1;
ashleymills 0:714293de3836 1009
ashleymills 0:714293de3836 1010 return 0;
ashleymills 0:714293de3836 1011 }
ashleymills 0:714293de3836 1012
ashleymills 0:714293de3836 1013 #elif defined(CYASSL_MDK_ARM)
ashleymills 0:714293de3836 1014 /* KEIL-RL File System does not support relative directry */
ashleymills 0:714293de3836 1015 #else
ashleymills 0:714293de3836 1016
ashleymills 0:714293de3836 1017 #ifndef MAX_PATH
ashleymills 0:714293de3836 1018 #define MAX_PATH 256
ashleymills 0:714293de3836 1019 #endif
ashleymills 0:714293de3836 1020
ashleymills 0:714293de3836 1021 /* do back x number of directories */
ashleymills 0:714293de3836 1022 static INLINE void ChangeDirBack(int x)
ashleymills 0:714293de3836 1023 {
ashleymills 0:714293de3836 1024 char path[MAX_PATH];
ashleymills 0:714293de3836 1025
ashleymills 0:714293de3836 1026 if (x == 1)
ashleymills 0:714293de3836 1027 strncpy(path, "../", MAX_PATH);
ashleymills 0:714293de3836 1028 else if (x == 2)
ashleymills 0:714293de3836 1029 strncpy(path, "../../", MAX_PATH);
ashleymills 0:714293de3836 1030 else if (x == 3)
ashleymills 0:714293de3836 1031 strncpy(path, "../../../", MAX_PATH);
ashleymills 0:714293de3836 1032 else if (x == 4)
ashleymills 0:714293de3836 1033 strncpy(path, "../../../../", MAX_PATH);
ashleymills 0:714293de3836 1034 else
ashleymills 0:714293de3836 1035 strncpy(path, "./", MAX_PATH);
ashleymills 0:714293de3836 1036
ashleymills 0:714293de3836 1037 if (chdir(path) < 0)
ashleymills 0:714293de3836 1038 printf("chdir to %s failed\n", path);
ashleymills 0:714293de3836 1039 }
ashleymills 0:714293de3836 1040
ashleymills 0:714293de3836 1041 /* does current dir contain str */
ashleymills 0:714293de3836 1042 static INLINE int CurrentDir(const char* str)
ashleymills 0:714293de3836 1043 {
ashleymills 0:714293de3836 1044 char path[MAX_PATH];
ashleymills 0:714293de3836 1045 char* baseName;
ashleymills 0:714293de3836 1046
ashleymills 0:714293de3836 1047 if (getcwd(path, sizeof(path)) == NULL) {
ashleymills 0:714293de3836 1048 printf("no current dir?\n");
ashleymills 0:714293de3836 1049 return 0;
ashleymills 0:714293de3836 1050 }
ashleymills 0:714293de3836 1051
ashleymills 0:714293de3836 1052 baseName = strrchr(path, '/');
ashleymills 0:714293de3836 1053 if (baseName)
ashleymills 0:714293de3836 1054 baseName++;
ashleymills 0:714293de3836 1055 else
ashleymills 0:714293de3836 1056 baseName = path;
ashleymills 0:714293de3836 1057
ashleymills 0:714293de3836 1058 if (strstr(baseName, str))
ashleymills 0:714293de3836 1059 return 1;
ashleymills 0:714293de3836 1060
ashleymills 0:714293de3836 1061 return 0;
ashleymills 0:714293de3836 1062 }
ashleymills 0:714293de3836 1063
ashleymills 0:714293de3836 1064 #endif /* USE_WINDOWS_API */
ashleymills 0:714293de3836 1065
ashleymills 0:714293de3836 1066
ashleymills 0:714293de3836 1067 #ifdef USE_CYASSL_MEMORY
ashleymills 0:714293de3836 1068
ashleymills 0:714293de3836 1069 typedef struct memoryStats {
ashleymills 0:714293de3836 1070 size_t totalAllocs; /* number of allocations */
ashleymills 0:714293de3836 1071 size_t totalBytes; /* total number of bytes allocated */
ashleymills 0:714293de3836 1072 size_t peakBytes; /* concurrent max bytes */
ashleymills 0:714293de3836 1073 size_t currentBytes; /* total current bytes in use */
ashleymills 0:714293de3836 1074 } memoryStats;
ashleymills 0:714293de3836 1075
ashleymills 0:714293de3836 1076 typedef struct memHint {
ashleymills 0:714293de3836 1077 size_t thisSize; /* size of this memory */
ashleymills 0:714293de3836 1078 void* thisMemory; /* actual memory for user */
ashleymills 0:714293de3836 1079 } memHint;
ashleymills 0:714293de3836 1080
ashleymills 0:714293de3836 1081 typedef struct memoryTrack {
ashleymills 0:714293de3836 1082 union {
ashleymills 0:714293de3836 1083 memHint hint;
ashleymills 0:714293de3836 1084 byte alignit[16]; /* make sure we have strong alignment */
ashleymills 0:714293de3836 1085 } u;
ashleymills 0:714293de3836 1086 } memoryTrack;
ashleymills 0:714293de3836 1087
ashleymills 0:714293de3836 1088 #if defined(CYASSL_TRACK_MEMORY)
ashleymills 0:714293de3836 1089 #define DO_MEM_STATS
ashleymills 0:714293de3836 1090 static memoryStats ourMemStats;
ashleymills 0:714293de3836 1091 #endif
ashleymills 0:714293de3836 1092
ashleymills 0:714293de3836 1093 static INLINE void* TrackMalloc(size_t sz)
ashleymills 0:714293de3836 1094 {
ashleymills 0:714293de3836 1095 memoryTrack* mt;
ashleymills 0:714293de3836 1096
ashleymills 0:714293de3836 1097 if (sz == 0)
ashleymills 0:714293de3836 1098 return NULL;
ashleymills 0:714293de3836 1099
ashleymills 0:714293de3836 1100 mt = (memoryTrack*)malloc(sizeof(memoryTrack) + sz);
ashleymills 0:714293de3836 1101 if (mt == NULL)
ashleymills 0:714293de3836 1102 return NULL;
ashleymills 0:714293de3836 1103
ashleymills 0:714293de3836 1104 mt->u.hint.thisSize = sz;
ashleymills 0:714293de3836 1105 mt->u.hint.thisMemory = (byte*)mt + sizeof(memoryTrack);
ashleymills 0:714293de3836 1106
ashleymills 0:714293de3836 1107 #ifdef DO_MEM_STATS
ashleymills 0:714293de3836 1108 ourMemStats.totalAllocs++;
ashleymills 0:714293de3836 1109 ourMemStats.totalBytes += sz;
ashleymills 0:714293de3836 1110 ourMemStats.currentBytes += sz;
ashleymills 0:714293de3836 1111 if (ourMemStats.currentBytes > ourMemStats.peakBytes)
ashleymills 0:714293de3836 1112 ourMemStats.peakBytes = ourMemStats.currentBytes;
ashleymills 0:714293de3836 1113 #endif
ashleymills 0:714293de3836 1114
ashleymills 0:714293de3836 1115 return mt->u.hint.thisMemory;
ashleymills 0:714293de3836 1116 }
ashleymills 0:714293de3836 1117
ashleymills 0:714293de3836 1118
ashleymills 0:714293de3836 1119 static INLINE void TrackFree(void* ptr)
ashleymills 0:714293de3836 1120 {
ashleymills 0:714293de3836 1121 memoryTrack* mt;
ashleymills 0:714293de3836 1122
ashleymills 0:714293de3836 1123 if (ptr == NULL)
ashleymills 0:714293de3836 1124 return;
ashleymills 0:714293de3836 1125
ashleymills 0:714293de3836 1126 mt = (memoryTrack*)((byte*)ptr - sizeof(memoryTrack));
ashleymills 0:714293de3836 1127
ashleymills 0:714293de3836 1128 #ifdef DO_MEM_STATS
ashleymills 0:714293de3836 1129 ourMemStats.currentBytes -= mt->u.hint.thisSize;
ashleymills 0:714293de3836 1130 #endif
ashleymills 0:714293de3836 1131
ashleymills 0:714293de3836 1132 free(mt);
ashleymills 0:714293de3836 1133 }
ashleymills 0:714293de3836 1134
ashleymills 0:714293de3836 1135
ashleymills 0:714293de3836 1136 static INLINE void* TrackRealloc(void* ptr, size_t sz)
ashleymills 0:714293de3836 1137 {
ashleymills 0:714293de3836 1138 void* ret = TrackMalloc(sz);
ashleymills 0:714293de3836 1139
ashleymills 0:714293de3836 1140 if (ptr) {
ashleymills 0:714293de3836 1141 /* if realloc is bigger, don't overread old ptr */
ashleymills 0:714293de3836 1142 memoryTrack* mt = (memoryTrack*)((byte*)ptr - sizeof(memoryTrack));
ashleymills 0:714293de3836 1143
ashleymills 0:714293de3836 1144 if (mt->u.hint.thisSize < sz)
ashleymills 0:714293de3836 1145 sz = mt->u.hint.thisSize;
ashleymills 0:714293de3836 1146 }
ashleymills 0:714293de3836 1147
ashleymills 0:714293de3836 1148 if (ret && ptr)
ashleymills 0:714293de3836 1149 memcpy(ret, ptr, sz);
ashleymills 0:714293de3836 1150
ashleymills 0:714293de3836 1151 if (ret)
ashleymills 0:714293de3836 1152 TrackFree(ptr);
ashleymills 0:714293de3836 1153
ashleymills 0:714293de3836 1154 return ret;
ashleymills 0:714293de3836 1155 }
ashleymills 0:714293de3836 1156
ashleymills 0:714293de3836 1157 static INLINE void InitMemoryTracker(void)
ashleymills 0:714293de3836 1158 {
ashleymills 0:714293de3836 1159 if (CyaSSL_SetAllocators(TrackMalloc, TrackFree, TrackRealloc) != 0)
ashleymills 0:714293de3836 1160 err_sys("CyaSSL SetAllocators failed for track memory");
ashleymills 0:714293de3836 1161
ashleymills 0:714293de3836 1162 #ifdef DO_MEM_STATS
ashleymills 0:714293de3836 1163 ourMemStats.totalAllocs = 0;
ashleymills 0:714293de3836 1164 ourMemStats.totalBytes = 0;
ashleymills 0:714293de3836 1165 ourMemStats.peakBytes = 0;
ashleymills 0:714293de3836 1166 ourMemStats.currentBytes = 0;
ashleymills 0:714293de3836 1167 #endif
ashleymills 0:714293de3836 1168 }
ashleymills 0:714293de3836 1169
ashleymills 0:714293de3836 1170 static INLINE void ShowMemoryTracker(void)
ashleymills 0:714293de3836 1171 {
ashleymills 0:714293de3836 1172 #ifdef DO_MEM_STATS
ashleymills 0:714293de3836 1173 printf("total Allocs = %9lu\n",
ashleymills 0:714293de3836 1174 (unsigned long)ourMemStats.totalAllocs);
ashleymills 0:714293de3836 1175 printf("total Bytes = %9lu\n",
ashleymills 0:714293de3836 1176 (unsigned long)ourMemStats.totalBytes);
ashleymills 0:714293de3836 1177 printf("peak Bytes = %9lu\n",
ashleymills 0:714293de3836 1178 (unsigned long)ourMemStats.peakBytes);
ashleymills 0:714293de3836 1179 printf("current Bytes = %9lu\n",
ashleymills 0:714293de3836 1180 (unsigned long)ourMemStats.currentBytes);
ashleymills 0:714293de3836 1181 #endif
ashleymills 0:714293de3836 1182 }
ashleymills 0:714293de3836 1183
ashleymills 0:714293de3836 1184 #endif /* USE_CYASSL_MEMORY */
ashleymills 0:714293de3836 1185
ashleymills 0:714293de3836 1186
ashleymills 0:714293de3836 1187 #ifdef HAVE_STACK_SIZE
ashleymills 0:714293de3836 1188
ashleymills 0:714293de3836 1189 typedef THREAD_RETURN CYASSL_THREAD (*thread_func)(void* args);
ashleymills 0:714293de3836 1190
ashleymills 0:714293de3836 1191
ashleymills 0:714293de3836 1192 static INLINE void StackSizeCheck(func_args* args, thread_func tf)
ashleymills 0:714293de3836 1193 {
ashleymills 0:714293de3836 1194 int ret, i, used;
ashleymills 0:714293de3836 1195 unsigned char* myStack;
ashleymills 0:714293de3836 1196 int stackSize = 1024*128;
ashleymills 0:714293de3836 1197 pthread_attr_t myAttr;
ashleymills 0:714293de3836 1198 pthread_t threadId;
ashleymills 0:714293de3836 1199
ashleymills 0:714293de3836 1200 #ifdef PTHREAD_STACK_MIN
ashleymills 0:714293de3836 1201 if (stackSize < PTHREAD_STACK_MIN)
ashleymills 0:714293de3836 1202 stackSize = PTHREAD_STACK_MIN;
ashleymills 0:714293de3836 1203 #endif
ashleymills 0:714293de3836 1204
ashleymills 0:714293de3836 1205 ret = posix_memalign((void**)&myStack, sysconf(_SC_PAGESIZE), stackSize);
ashleymills 0:714293de3836 1206 if (ret != 0)
ashleymills 0:714293de3836 1207 err_sys("posix_memalign failed\n");
ashleymills 0:714293de3836 1208
ashleymills 0:714293de3836 1209 memset(myStack, 0xee, stackSize);
ashleymills 0:714293de3836 1210
ashleymills 0:714293de3836 1211 ret = pthread_attr_init(&myAttr);
ashleymills 0:714293de3836 1212 if (ret != 0)
ashleymills 0:714293de3836 1213 err_sys("attr_init failed");
ashleymills 0:714293de3836 1214
ashleymills 0:714293de3836 1215 ret = pthread_attr_setstack(&myAttr, myStack, stackSize);
ashleymills 0:714293de3836 1216 if (ret != 0)
ashleymills 0:714293de3836 1217 err_sys("attr_setstackaddr failed");
ashleymills 0:714293de3836 1218
ashleymills 0:714293de3836 1219 ret = pthread_create(&threadId, &myAttr, tf, args);
ashleymills 0:714293de3836 1220 if (ret != 0) {
ashleymills 0:714293de3836 1221 perror("pthread_create failed");
ashleymills 0:714293de3836 1222 exit(EXIT_FAILURE);
ashleymills 0:714293de3836 1223 }
ashleymills 0:714293de3836 1224
ashleymills 0:714293de3836 1225 ret = pthread_join(threadId, NULL);
ashleymills 0:714293de3836 1226 if (ret != 0)
ashleymills 0:714293de3836 1227 err_sys("pthread_join failed");
ashleymills 0:714293de3836 1228
ashleymills 0:714293de3836 1229 for (i = 0; i < stackSize; i++) {
ashleymills 0:714293de3836 1230 if (myStack[i] != 0xee) {
ashleymills 0:714293de3836 1231 break;
ashleymills 0:714293de3836 1232 }
ashleymills 0:714293de3836 1233 }
ashleymills 0:714293de3836 1234
ashleymills 0:714293de3836 1235 used = stackSize - i;
ashleymills 0:714293de3836 1236 printf("stack used = %d\n", used);
ashleymills 0:714293de3836 1237 }
ashleymills 0:714293de3836 1238
ashleymills 0:714293de3836 1239
ashleymills 0:714293de3836 1240 #endif /* HAVE_STACK_SIZE */
ashleymills 0:714293de3836 1241
ashleymills 0:714293de3836 1242
ashleymills 0:714293de3836 1243 #ifdef STACK_TRAP
ashleymills 0:714293de3836 1244
ashleymills 0:714293de3836 1245 /* good settings
ashleymills 0:714293de3836 1246 --enable-debug --disable-shared C_EXTRA_FLAGS="-DUSER_TIME -DTFM_TIMING_RESISTANT -DPOSITIVE_EXP_ONLY -DSTACK_TRAP"
ashleymills 0:714293de3836 1247
ashleymills 0:714293de3836 1248 */
ashleymills 0:714293de3836 1249
ashleymills 0:714293de3836 1250 #ifdef HAVE_STACK_SIZE
ashleymills 0:714293de3836 1251 /* client only for now, setrlimit will fail if pthread_create() called */
ashleymills 0:714293de3836 1252 /* STACK_SIZE does pthread_create() on client */
ashleymills 0:714293de3836 1253 #error "can't use STACK_TRAP with STACK_SIZE, setrlimit will fail"
ashleymills 0:714293de3836 1254 #endif /* HAVE_STACK_SIZE */
ashleymills 0:714293de3836 1255
ashleymills 0:714293de3836 1256 static INLINE void StackTrap(void)
ashleymills 0:714293de3836 1257 {
ashleymills 0:714293de3836 1258 struct rlimit rl;
ashleymills 0:714293de3836 1259 if (getrlimit(RLIMIT_STACK, &rl) != 0)
ashleymills 0:714293de3836 1260 err_sys("getrlimit failed");
ashleymills 0:714293de3836 1261 printf("rlim_cur = %llu\n", rl.rlim_cur);
ashleymills 0:714293de3836 1262 rl.rlim_cur = 1024*21; /* adjust trap size here */
ashleymills 0:714293de3836 1263 if (setrlimit(RLIMIT_STACK, &rl) != 0) {
ashleymills 0:714293de3836 1264 perror("setrlimit");
ashleymills 0:714293de3836 1265 err_sys("setrlimit failed");
ashleymills 0:714293de3836 1266 }
ashleymills 0:714293de3836 1267 }
ashleymills 0:714293de3836 1268
ashleymills 0:714293de3836 1269 #else /* STACK_TRAP */
ashleymills 0:714293de3836 1270
ashleymills 0:714293de3836 1271 static INLINE void StackTrap(void)
ashleymills 0:714293de3836 1272 {
ashleymills 0:714293de3836 1273 }
ashleymills 0:714293de3836 1274
ashleymills 0:714293de3836 1275 #endif /* STACK_TRAP */
ashleymills 0:714293de3836 1276
ashleymills 0:714293de3836 1277
ashleymills 0:714293de3836 1278 #if defined(__hpux__) || defined(__MINGW32__)
ashleymills 0:714293de3836 1279
ashleymills 0:714293de3836 1280 /* HP/UX doesn't have strsep, needed by test/suites.c */
ashleymills 0:714293de3836 1281 static INLINE char* strsep(char **stringp, const char *delim)
ashleymills 0:714293de3836 1282 {
ashleymills 0:714293de3836 1283 char* start;
ashleymills 0:714293de3836 1284 char* end;
ashleymills 0:714293de3836 1285
ashleymills 0:714293de3836 1286 start = *stringp;
ashleymills 0:714293de3836 1287 if (start == NULL)
ashleymills 0:714293de3836 1288 return NULL;
ashleymills 0:714293de3836 1289
ashleymills 0:714293de3836 1290 if ((end = strpbrk(start, delim))) {
ashleymills 0:714293de3836 1291 *end++ = '\0';
ashleymills 0:714293de3836 1292 *stringp = end;
ashleymills 0:714293de3836 1293 } else {
ashleymills 0:714293de3836 1294 *stringp = NULL;
ashleymills 0:714293de3836 1295 }
ashleymills 0:714293de3836 1296
ashleymills 0:714293de3836 1297 return start;
ashleymills 0:714293de3836 1298 }
ashleymills 0:714293de3836 1299
ashleymills 0:714293de3836 1300 #endif /* __hpux__ */
ashleymills 0:714293de3836 1301
ashleymills 0:714293de3836 1302 #endif /* CyaSSL_TEST_H */
ashleymills 0:714293de3836 1303