--- /dev/null
+/*
+ * Copyright (c) 2012-2014 Apple Inc. All Rights Reserved.
+ *
+ * @APPLE_LICENSE_HEADER_START@
+ *
+ * This file contains Original Code and/or Modifications of Original Code
+ * as defined in and that are subject to the Apple Public Source License
+ * Version 2.0 (the 'License'). You may not use this file except in
+ * compliance with the License. Please obtain a copy of the License at
+ * http://www.opensource.apple.com/apsl/ and read it before using this
+ * file.
+ *
+ * The Original Code and all software distributed under the License are
+ * distributed on an 'AS IS' basis, WITHOUT WARRANTY OF ANY KIND, EITHER
+ * EXPRESS OR IMPLIED, AND APPLE HEREBY DISCLAIMS ALL SUCH WARRANTIES,
+ * INCLUDING WITHOUT LIMITATION, ANY WARRANTIES OF MERCHANTABILITY,
+ * FITNESS FOR A PARTICULAR PURPOSE, QUIET ENJOYMENT OR NON-INFRINGEMENT.
+ * Please see the License for the specific language governing rights and
+ * limitations under the License.
+ *
+ * @APPLE_LICENSE_HEADER_END@
+ */
+
+
+
+#include <CoreFoundation/CoreFoundation.h>
+#include <Security/Security.h>
+#include <Security/SecureTransportPriv.h> /* SSLSetOption */
+#include <Security/SecRandom.h>
+
+#include <AssertMacros.h>
+
+#include "ssl-utils.h"
+
+#if 0
+#include <Security/SecPolicy.h>
+#include <Security/SecTrust.h>
+#include <Security/SecIdentity.h>
+#include <Security/SecIdentityPriv.h>
+#include <Security/SecCertificatePriv.h>
+#include <Security/SecKeyPriv.h>
+#if TARGET_OS_IPHONE
+#include <Security/SecRSAKey.h>
+#endif
+#include <Security/SecItem.h>
+#include <Security/SecRandom.h>
+#endif
+
+#include <string.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <stdbool.h>
+#include <pthread.h>
+#include <fcntl.h>
+#include <unistd.h>
+#include <sys/types.h>
+#include <sys/socket.h>
+#include <sys/mman.h>
+#include <mach/mach_time.h>
+#include <netinet/in.h>
+#include <arpa/inet.h>
+#include <netdb.h>
+
+#include "tlssocket.h"
+
+/*
+ SSL CipherSuite tests
+
+ Below are all the ciphers that are individually tested. The first element
+ is the SecureTransport/RFC name; the second is what openssl calls it, which
+ can be looked up in ciphers(1).
+
+ All SSL_DH_* and TLS_DH_* are disabled because neither openssl nor
+ securetransport support them:
+ SSL_DH_DSS_EXPORT_WITH_DES40_CBC_SHA, SSL_DH_DSS_WITH_DES_CBC_SHA,
+ SSL_DH_DSS_WITH_3DES_EDE_CBC_SHA, SSL_DH_RSA_EXPORT_WITH_DES40_CBC_SHA,
+ SSL_DH_RSA_WITH_DES_CBC_SHA, SSL_DH_RSA_WITH_3DES_EDE_CBC_SHA,
+ TLS_DH_DSS_WITH_AES_128_CBC_SHA, TLS_DH_RSA_WITH_AES_128_CBC_SHA,
+ TLS_DH_DSS_WITH_AES_256_CBC_SHA, TLS_DH_RSA_WITH_AES_256_CBC_SHA,
+
+ DSS is unimplemented by securetransport on the phone:
+ SSL_DHE_DSS_EXPORT_WITH_DES40_CBC_SHA, SSL_DHE_DSS_WITH_DES_CBC_SHA,
+ SSL_DHE_DSS_WITH_3DES_EDE_CBC_SHA, TLS_DHE_DSS_WITH_AES_128_CBC_SHA,
+ TLS_DHE_DSS_WITH_AES_256_CBC_SHA,
+
+ SSLv2 ciphersuites disabled by securetransport on phone:
+ SSL_RSA_WITH_RC2_CBC_MD5, SSL_RSA_WITH_IDEA_CBC_MD5,
+ SSL_RSA_WITH_DES_CBC_MD5, SSL_RSA_WITH_3DES_EDE_CBC_MD5,
+
+ SSLv3 ciphersuites disabled by securetransport on phone:
+ SSL_RSA_WITH_IDEA_CBC_SHA, SSL_RSA_EXPORT_WITH_RC2_CBC_40_MD5
+
+ Export ciphersuites disabled on iOS 5.0:
+ SSL_RSA_EXPORT_WITH_RC4_40_MD5, SSL_RSA_EXPORT_WITH_DES40_CBC_SHA,
+ SSL_RSA_WITH_DES_CBC_SHA, SSL_DHE_RSA_EXPORT_WITH_DES40_CBC_SHA,
+ SSL_DHE_RSA_WITH_DES_CBC_SHA, SSL_DH_anon_EXPORT_WITH_RC4_40_MD5,
+ SSL_DH_anon_EXPORT_WITH_DES40_CBC_SHA, SSL_DH_anon_WITH_DES_CBC_SHA
+
+ */
+
+typedef struct _CipherSuiteName {
+ SSLCipherSuite cipher;
+ const char *name;
+ bool dh_anonymous;
+} CipherSuiteName;
+
+#define CIPHER(cipher, dh_anonymous) { cipher, #cipher, dh_anonymous },
+
+static const CipherSuiteName ciphers[] = {
+ //SSL_NULL_WITH_NULL_NULL, unsupported
+ CIPHER(SSL_RSA_WITH_NULL_SHA, false)
+ CIPHER(SSL_RSA_WITH_NULL_MD5, false)
+ CIPHER(TLS_RSA_WITH_NULL_SHA256, false)
+
+ // CIPHER(SSL_RSA_WITH_RC4_128_MD5, false)
+ //CIPHER(SSL_RSA_WITH_RC4_128_SHA, false)
+ CIPHER(SSL_RSA_WITH_3DES_EDE_CBC_SHA, false)
+
+ CIPHER(SSL_DHE_RSA_WITH_3DES_EDE_CBC_SHA, false)
+ //CIPHER(SSL_DH_anon_WITH_RC4_128_MD5, true)
+ CIPHER(SSL_DH_anon_WITH_3DES_EDE_CBC_SHA, true)
+ CIPHER(TLS_DHE_RSA_WITH_AES_128_CBC_SHA, false)
+ CIPHER(TLS_DH_anon_WITH_AES_128_CBC_SHA, true)
+ CIPHER(TLS_DHE_RSA_WITH_AES_256_CBC_SHA, false)
+ CIPHER(TLS_DH_anon_WITH_AES_256_CBC_SHA, true)
+
+ CIPHER(TLS_RSA_WITH_AES_128_CBC_SHA, false)
+ CIPHER(TLS_RSA_WITH_AES_256_CBC_SHA, false)
+
+
+#if 0
+ CIPHER(TLS_ECDH_ECDSA_WITH_3DES_EDE_CBC_SHA, false)
+ CIPHER(TLS_ECDH_ECDSA_WITH_AES_128_CBC_SHA, false)
+
+ CIPHER(TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA, false)
+ CIPHER(TLS_ECDHE_RSA_WITH_3DES_EDE_CBC_SHA, false)
+
+ CIPHER(TLS_ECDHE_ECDSA_WITH_AES_128_CBC_SHA, false)
+ CIPHER(TLS_ECDHE_ECDSA_WITH_AES_256_CBC_SHA, false)
+
+ CIPHER(TLS_ECDH_anon_WITH_AES_128_CBC_SHA, true)
+ CIPHER(TLS_ECDH_anon_WITH_AES_256_CBC_SHA, true)
+
+ CIPHER(TLS_ECDHE_RSA_WITH_AES_128_CBC_SHA256, false)
+ CIPHER(TLS_ECDHE_RSA_WITH_AES_256_CBC_SHA384, false)
+ CIPHER(TLS_ECDH_RSA_WITH_AES_128_CBC_SHA256, false)
+ CIPHER(TLS_ECDH_RSA_WITH_AES_256_CBC_SHA384, false)
+#endif
+
+#if 0
+ CIPHER(TLS_RSA_WITH_AES_256_GCM_SHA384, false)
+ CIPHER(TLS_RSA_WITH_AES_128_GCM_SHA256, false)
+#endif
+
+ /* Export ciphers are disabled */
+#if 0
+ CIPHER(SSL_RSA_EXPORT_WITH_RC4_40_MD5, false)
+ CIPHER(SSL_RSA_EXPORT_WITH_DES40_CBC_SHA, false)
+ CIPHER(SSL_RSA_WITH_DES_CBC_SHA, false)
+ CIPHER(SSL_DHE_RSA_EXPORT_WITH_DES40_CBC_SHA, false)
+ CIPHER(SSL_DHE_RSA_WITH_DES_CBC_SHA, false)
+ CIPHER(SSL_DH_anon_EXPORT_WITH_RC4_40_MD5, true)
+ CIPHER(SSL_DH_anon_EXPORT_WITH_DES40_CBC_SHA, true)
+ CIPHER(SSL_DH_anon_WITH_DES_CBC_SHA, true)
+#endif
+
+ { -1 }
+};
+
+static int protos[]={kTLSProtocol1, kTLSProtocol11, kTLSProtocol12 };
+
+#if 0 // currently unused
+static SSLCipherSuite sslcipher_atoi(const char *name)
+{
+ const CipherSuiteName *a = ciphers;
+ while(a->name) {
+ if (0 == strcmp(a->name, name)) break;
+ a++;
+ }
+ return a->cipher;
+}
+
+static const char * sslcipher_itoa(SSLCipherSuite num)
+{
+ const CipherSuiteName *a = ciphers;
+ while(a->cipher >= 0) {
+ if (num == a->cipher) break;
+ a++;
+ }
+ return a->name;
+}
+#endif // currently unused
+
+static unsigned char dh_param_512_bytes[] = {
+ 0x30, 0x46, 0x02, 0x41, 0x00, 0xdb, 0x3c, 0xfa, 0x13, 0xa6, 0xd2, 0x64,
+ 0xdf, 0xcc, 0x40, 0xb1, 0x21, 0xd4, 0xf2, 0xad, 0x22, 0x7f, 0xce, 0xa0,
+ 0xb9, 0x5b, 0x95, 0x1c, 0x2e, 0x99, 0xb0, 0x27, 0xd0, 0xed, 0xf4, 0xbd,
+ 0xbb, 0x36, 0x93, 0xd0, 0x9d, 0x2b, 0x32, 0xa3, 0x56, 0x53, 0xe3, 0x7b,
+ 0xed, 0xa1, 0x71, 0x82, 0x2e, 0x83, 0x14, 0xf9, 0xc0, 0x2f, 0x15, 0xcb,
+ 0xcf, 0x97, 0xab, 0x88, 0x49, 0x20, 0x28, 0x2e, 0x63, 0x02, 0x01, 0x02
+};
+static unsigned char *dh_param_512_der = dh_param_512_bytes;
+static unsigned int dh_param_512_der_len = 72;
+
+
+typedef struct {
+ uint32_t session_id;
+ bool is_session_resume;
+ SSLContextRef st;
+ bool is_server;
+ bool is_dtls;
+ bool client_side_auth;
+ bool dh_anonymous;
+ int comm;
+ CFArrayRef certs;
+ SSLProtocol proto;
+} ssl_test_handle;
+
+
+// MARK: -
+// MARK: SecureTransport support
+
+#if 0
+static void hexdump(const uint8_t *bytes, size_t len) {
+ size_t ix;
+ printf("socket write(%p, %lu)\n", bytes, len);
+ for (ix = 0; ix < len; ++ix) {
+ if (!(ix % 16))
+ printf("\n");
+ printf("%02X ", bytes[ix]);
+ }
+ printf("\n");
+}
+#else
+#define hexdump(bytes, len)
+#endif
+
+
+/* 2K should be enough for everybody */
+#define MTU 8000
+static unsigned char readBuffer[MTU];
+static unsigned int readOff=0;
+static size_t readLeft=0;
+
+static
+OSStatus SocketRead(
+ SSLConnectionRef connection,
+ void *data,
+ size_t *dataLength)
+{
+ int fd = (int)connection;
+ ssize_t len;
+
+ if(readLeft==0)
+ {
+ // printf("SocketRead(%d): waiting for data %ld\n", fd, *dataLength);
+
+ len = read(fd, readBuffer, MTU);
+
+ if(len>0) {
+ readOff=0;
+ readLeft=(size_t) len;
+ //printf("SocketRead(%d): %ld bytes... epoch: %02x seq=%02x%02x\n",
+ // fd, len, d[4], d[9], d[10]);
+
+ } else {
+ int theErr = errno;
+ switch(theErr) {
+ case EAGAIN:
+ printf("SocketRead(%d): WouldBlock\n", fd);
+ *dataLength=0;
+ /* nonblocking, no data */
+ return errSSLWouldBlock;
+ default:
+ perror("SocketRead");
+ return -36;
+ }
+ }
+ }
+
+ if(readLeft<*dataLength) {
+ *dataLength=readLeft;
+ }
+
+
+ memcpy(data, readBuffer+readOff, *dataLength);
+ readLeft-=*dataLength;
+ readOff+=*dataLength;
+
+ // printf("%s: returning %ld bytes, left %ld\n", __FUNCTION__, *dataLength, readLeft);
+
+ return errSecSuccess;
+
+}
+
+static
+OSStatus SocketWrite(
+ SSLConnectionRef connection,
+ const void *data,
+ size_t *dataLength) /* IN/OUT */
+{
+ int fd = (int)connection;
+ ssize_t len;
+ OSStatus err = errSecSuccess;
+
+#if 0
+ const uint8_t *d=data;
+
+ if((rand()&3)==1) {
+
+ /* drop 1/8th packets */
+ printf("SocketWrite: Drop %ld bytes... epoch: %02x seq=%02x%02x\n",
+ *dataLength, d[4], d[9], d[10]);
+ return errSecSuccess;
+
+ }
+#endif
+
+ // printf("SocketWrite(%d): Sending %ld bytes... epoch: %02x seq=%02x%02x\n",
+ // fd, *dataLength, d[4], d[9], d[10]);
+
+ len = send(fd, data, *dataLength, 0);
+ if(len>0) {
+ *dataLength=(size_t)len;
+ return err;
+ }
+
+ int theErr = errno;
+ switch(theErr) {
+ case EAGAIN:
+ /* nonblocking, no data */
+ printf("SocketWrite(%d): WouldBlock\n", fd);
+ err = errSSLWouldBlock;
+ break;
+ default:
+ perror("SocketWrite");
+ err = -36;
+ break;
+ }
+
+ return err;
+
+}
+
+
+static unsigned char dn[] = {
+ 0x30, 0x5e, 0x31, 0x0b, 0x30, 0x09, 0x06, 0x03, 0x55, 0x04, 0x06, 0x13,
+ 0x02, 0x55, 0x53, 0x31, 0x13, 0x30, 0x11, 0x06, 0x03, 0x55, 0x04, 0x0a,
+ 0x13, 0x0a, 0x41, 0x70, 0x70, 0x6c, 0x65, 0x20, 0x49, 0x6e, 0x63, 0x2e,
+ 0x31, 0x26, 0x30, 0x24, 0x06, 0x03, 0x55, 0x04, 0x0b, 0x13, 0x1d, 0x41,
+ 0x70, 0x70, 0x6c, 0x65, 0x20, 0x43, 0x65, 0x72, 0x74, 0x69, 0x66, 0x69,
+ 0x63, 0x61, 0x74, 0x69, 0x6f, 0x6e, 0x20, 0x41, 0x75, 0x74, 0x68, 0x6f,
+ 0x72, 0x69, 0x74, 0x79, 0x31, 0x12, 0x30, 0x10, 0x06, 0x03, 0x55, 0x04,
+ 0x03, 0x13, 0x09, 0x6c, 0x6f, 0x63, 0x61, 0x6c, 0x68, 0x6f, 0x73, 0x74
+};
+static unsigned int dn_len = 96;
+
+
+static SSLContextRef make_ssl_ref(bool server, bool client_side_auth, bool dh_anonymous,
+ bool dtls, int sock, CFArrayRef certs, SSLProtocol proto, bool kernel)
+{
+ SSLContextRef ctx;
+
+ if(kernel) {
+ require(dtls, out);
+ ctx = SSLCreateContextWithRecordFuncs(kCFAllocatorDefault, server?kSSLServerSide:kSSLClientSide, dtls?kSSLDatagramType:kSSLStreamType, &TLSSocket_Funcs);
+ require(ctx, out);
+ printf("Attaching filter\n");
+ require_noerr(TLSSocket_Attach(sock), out);
+ require_noerr(SSLSetRecordContext(ctx, (intptr_t) sock), out);
+ } else {
+ ctx = SSLCreateContext(kCFAllocatorDefault, server?kSSLServerSide:kSSLClientSide, dtls?kSSLDatagramType:kSSLStreamType);
+ require(ctx, out);
+ require_noerr(SSLSetIOFuncs(ctx,
+ (SSLReadFunc)SocketRead, (SSLWriteFunc)SocketWrite), out);
+ require_noerr(SSLSetConnection(ctx, (intptr_t)sock), out);
+ }
+ require(ctx, out);
+
+ if(dtls) {
+ size_t mtu;
+ require_noerr(SSLSetMaxDatagramRecordSize(ctx, 400), out);
+ require_noerr(SSLGetMaxDatagramRecordSize(ctx, &mtu), out);
+ } else {
+ require_noerr(SSLSetProtocolVersionMax(ctx, proto), out);
+ kernel = false; // not available for tls, only dtls currently.
+ }
+
+ static const char *peer_domain_name = "localhost";
+ require_noerr(SSLSetPeerDomainName(ctx, peer_domain_name,
+ strlen(peer_domain_name)), out);
+
+ if (!dh_anonymous) {
+ if (server)
+ require_noerr(SSLSetCertificate(ctx, certs), out);
+ if (client_side_auth && server) {
+ SSLAuthenticate auth;
+ require_noerr(SSLSetClientSideAuthenticate(ctx, kAlwaysAuthenticate), out);
+ require_noerr(SSLGetClientSideAuthenticate(ctx, &auth), out);
+ require(auth==kAlwaysAuthenticate, out);
+ require_noerr(SSLAddDistinguishedName(ctx, dn, dn_len), out);
+ }
+#if 0 /* Setting client certificate in advance */
+ if (client_side_auth && !server)
+ require_noerr(SSLSetCertificate(ctx, certs), out);
+#endif
+ if (client_side_auth && !server) /* enable break from SSLHandshake */
+ require_noerr(SSLSetSessionOption(ctx,
+ kSSLSessionOptionBreakOnCertRequested, true), out);
+ require_noerr(SSLSetSessionOption(ctx,
+ kSSLSessionOptionBreakOnServerAuth, true), out);
+ }
+
+ /* Tell SecureTransport to not check certs itself: it will break out of the
+ handshake to let us take care of it instead. */
+ require_noerr(SSLSetEnableCertVerify(ctx, false), out);
+
+ if (server) {
+ require_noerr(SSLSetDiffieHellmanParams(ctx,
+ dh_param_512_der, dh_param_512_der_len), out);
+ }
+ else /* if client */ {
+ }
+
+ return ctx;
+out:
+ if (ctx)
+ CFRelease(ctx);
+ return NULL;
+}
+
+static void *securetransport_ssl_thread(void *arg)
+{
+ OSStatus ortn;
+ ssl_test_handle * ssl = (ssl_test_handle *)arg;
+ SSLContextRef ctx = ssl->st;
+ SecTrustRef trust = NULL;
+ bool got_server_auth = false, got_client_cert_req = false;
+
+
+ if(ssl->is_server) {
+ struct sockaddr_in ca; /* client address for connect */
+ ssize_t l;
+ int fd = ssl->comm;
+
+ printf("Server waiting for first packet...\n");
+ /* PEEK only... */
+ socklen_t slen=sizeof(ca);
+ char b;
+ if((l=recvfrom(fd, &b, 1, MSG_PEEK, (struct sockaddr *)&ca, &slen))==-1)
+ {
+ perror("recvfrom");
+ return NULL;
+ }
+
+ printf("Received packet from %s:%d (%ld), connecting...\n", inet_ntoa(ca.sin_addr), ca.sin_port, l);
+
+ if(connect(fd, (struct sockaddr *)&ca, sizeof(ca))==-1)
+ {
+ perror("connect");
+ return NULL;
+ }
+ }
+
+ //uint64_t start = mach_absolute_time();
+ do {
+ ortn = SSLHandshake(ctx);
+
+ if (ortn == errSSLServerAuthCompleted)
+ {
+ require_string(!got_server_auth, out, "second server auth");
+ require_string(!got_client_cert_req, out, "got client cert req before server auth");
+ got_server_auth = true;
+ require_string(!trust, out, "Got errSSLServerAuthCompleted twice?");
+ /* verify peer cert chain */
+ require_noerr(SSLCopyPeerTrust(ctx, &trust), out);
+ SecTrustResultType trust_result = 0;
+ /* this won't verify without setting up a trusted anchor */
+ require_noerr(SecTrustEvaluate(trust, &trust_result), out);
+
+ CFIndex n_certs = SecTrustGetCertificateCount(trust);
+ /*fprintf(stderr, "%ld certs; trust_eval: %d\n", n_certs, trust_result); */
+
+ CFMutableArrayRef peer_cert_array =
+ CFArrayCreateMutable(NULL, n_certs, &kCFTypeArrayCallBacks);
+ CFMutableArrayRef orig_peer_cert_array =
+ CFArrayCreateMutableCopy(NULL, n_certs, ssl->certs);
+ while (n_certs--)
+ CFArrayInsertValueAtIndex(peer_cert_array, 0,
+ SecTrustGetCertificateAtIndex(trust, n_certs));
+
+ SecIdentityRef ident =
+ (SecIdentityRef)CFArrayGetValueAtIndex(orig_peer_cert_array, 0);
+ SecCertificateRef peer_cert = NULL;
+ require_noerr(SecIdentityCopyCertificate(ident, &peer_cert), out);
+ CFArraySetValueAtIndex(orig_peer_cert_array, 0, peer_cert);
+ CFRelease(peer_cert);
+
+ require(CFEqual(orig_peer_cert_array, peer_cert_array), out);
+ CFRelease(orig_peer_cert_array);
+ CFRelease(peer_cert_array);
+
+ /*
+ CFStringRef cert_name = SecCertificateCopySubjectSummary(cert);
+ char cert_name_buffer[1024];
+ require(CFStringGetFileSystemRepresentation(cert_name,
+ cert_name_buffer, sizeof(cert_name_buffer)), out);
+ fprintf(stderr, "cert name: %s\n", cert_name_buffer);
+ CFRelease(trust);
+ */
+ } else if (ortn == errSSLClientCertRequested) {
+ require_string(!got_client_cert_req, out, "second client cert req");
+ require_string(got_server_auth, out, "didn't get server auth first");
+ got_client_cert_req = true;
+
+ /* set client cert */
+ require_string(!ssl->is_server, out, "errSSLClientCertRequested while running server");
+ require_string(!ssl->dh_anonymous, out, "errSSLClientCertRequested while running anon DH");
+
+ CFArrayRef DNs = NULL;
+ require_noerr(SSLCopyDistinguishedNames (ctx, &DNs), out);
+ require(DNs, out);
+ CFRelease(DNs);
+
+ require_string(ssl->client_side_auth, out, "errSSLClientCertRequested in run not testing that");
+ require_noerr(SSLSetCertificate(ctx, ssl->certs), out);
+ }
+ } while (ortn == errSSLWouldBlock
+ || ortn == errSSLServerAuthCompleted
+ || ortn == errSSLClientCertRequested);
+ require_noerr_action_quiet(ortn, out,
+ fprintf(stderr, "Fell out of SSLHandshake with error: %ld\n", (long)ortn));
+
+ if (!ssl->is_server && !ssl->dh_anonymous && !ssl->is_session_resume) {
+ require_string(got_server_auth, out, "never got server auth");
+ if (ssl->client_side_auth)
+ require_string(got_client_cert_req, out, "never got client cert req");
+ }
+ //uint64_t elapsed = mach_absolute_time() - start;
+ //fprintf(stderr, "setr elapsed: %lld\n", elapsed);
+
+ /*
+ SSLProtocol proto = kSSLProtocolUnknown;
+ require_noerr_quiet(SSLGetNegotiatedProtocolVersion(ctx, &proto), out); */
+
+ SSLCipherSuite cipherSuite;
+ require_noerr_quiet(ortn = SSLGetNegotiatedCipher(ctx, &cipherSuite), out);
+ //fprintf(stderr, "st negotiated %s\n", sslcipher_itoa(cipherSuite));
+
+ if(ssl->is_dtls) {
+ size_t sz;
+ SSLGetDatagramWriteSize(ctx, &sz);
+ // fprintf(stderr, "Max Write Size = %ld\n", sz);
+ }
+
+ Boolean sessionWasResumed = false;
+ uint8_t session_id_data[MAX_SESSION_ID_LENGTH];
+ size_t session_id_length = sizeof(session_id_data);
+ require_noerr_quiet(ortn = SSLGetResumableSessionInfo(ctx, &sessionWasResumed, session_id_data, &session_id_length), out);
+ require_action(ssl->dh_anonymous || (ssl->is_session_resume == sessionWasResumed), out, ortn = -1);
+ // if (sessionWasResumed) fprintf(stderr, "st resumed session\n");
+ //hexdump(session_id_data, session_id_length);
+
+ unsigned char ibuf[300], obuf[300];
+ size_t len;
+ if (ssl->is_server) {
+ SecRandomCopyBytes(kSecRandomDefault, sizeof(obuf), obuf);
+ require_noerr_quiet(ortn = SSLWrite(ctx, obuf, sizeof(obuf), &len), out);
+ require_action_quiet(len == sizeof(obuf), out, ortn = -1);
+ }
+ require_noerr_quiet(ortn = SSLRead(ctx, ibuf, sizeof(ibuf), &len), out);
+ require_action_quiet(len == sizeof(ibuf), out, ortn = -1);
+
+ if (ssl->is_server) {
+ require_noerr(memcmp(ibuf, obuf, sizeof(ibuf)), out);
+ } else {
+ require_noerr_quiet(ortn = SSLWrite(ctx, ibuf, sizeof(ibuf), &len), out);
+ require_action_quiet(len == sizeof(ibuf), out, ortn = -1);
+ }
+
+out:
+ SSLClose(ctx);
+ CFRelease(ctx);
+ if (trust) CFRelease(trust);
+ close(ssl->comm);
+ pthread_exit((void *)(intptr_t)ortn);
+ return NULL;
+}
+
+
+
+static ssl_test_handle *
+ssl_test_handle_create(uint32_t session_id, bool resume, bool server, bool client_side_auth, bool dh_anonymous, bool dtls,
+ int comm, CFArrayRef certs, SSLProtocol proto, bool kernel)
+{
+ ssl_test_handle *handle = calloc(1, sizeof(ssl_test_handle));
+ if (handle) {
+ handle->session_id = session_id;
+ handle->is_session_resume = resume;
+ handle->is_server = server;
+ handle->is_dtls = dtls;
+ handle->client_side_auth = client_side_auth;
+ handle->dh_anonymous = dh_anonymous;
+ handle->comm = comm;
+ handle->certs = certs;
+ handle->proto = proto;
+ handle->st = make_ssl_ref(server, client_side_auth, dh_anonymous, dtls, comm, certs, proto, kernel);
+ }
+ return handle;
+}
+
+
+
+static void createsockets(int sp[2])
+{
+
+
+ int sock;
+ struct sockaddr_in server_addr;
+ struct hostent *host;
+ int err;
+
+ host = gethostbyname("localhost");
+
+ server_addr.sin_family = AF_INET;
+ server_addr.sin_port = htons(5000);
+ server_addr.sin_addr = *((struct in_addr *)host->h_addr);
+ bzero(&(server_addr.sin_zero),8);
+ if ((sock = socket(AF_INET, SOCK_DGRAM, 0)) == -1) {
+ perror("server socket");
+ exit(1);
+ }
+
+ if (bind(sock, (struct sockaddr *)&server_addr, sizeof(struct sockaddr))
+ == -1) {
+ perror("Unable to bind");
+ exit(1);
+ }
+
+ printf("Server Waiting for client on port 5000\n");
+
+ sp[0]=sock;
+
+ printf("Create client socket\n");
+ sock = socket(AF_INET, SOCK_DGRAM, IPPROTO_UDP);
+ if(sock<0) {
+ perror("client socket");
+ exit(1);
+ }
+
+ err = connect(sock, (struct sockaddr *)&server_addr,
+ sizeof(struct sockaddr));
+ if(err)
+ {
+ perror("connect");
+ exit(1);
+ }
+
+ sp[1]=sock;
+
+ printf("Connected\n");
+
+
+}
+
+int st_test(void);
+int st_test(void)
+{
+ pthread_t client_thread, server_thread;
+ CFArrayRef server_certs = server_chain();
+ check(server_certs);
+
+ char msg[128];
+
+ /* Enable this if you want to test a specific d/i/k/l/p/ combination */
+#if 0
+ int d=0, i=0, l=0, c=0, k=0; { {
+#else
+ int d,i,c,k,l,p;
+
+ p=0;
+ //for (p=0; p<nprotos; p++)
+ d=1;
+ //for (d=0;d<2; d++) /* dtls or not dtls */
+ //for (c=0; c<2; k++) /* csa or not */
+ for (k=1; k<2; k++) /* kernel or not */
+ {
+ for (i=0; ciphers[i].cipher != (SSLCipherSuite)(-1); i++) {
+ l=0;
+ //for (l = 0; l<2; l++) {
+#endif
+ SKIP:{
+ //skip("Session resumption tests do not work at this point", 1, l != 1);
+ int sp[2];
+
+#if 0
+ if (socketpair(AF_UNIX, SOCK_STREAM, 0, sp)) exit(errno);
+ fcntl(sp[0], F_SETNOSIGPIPE, 1);
+ fcntl(sp[1], F_SETNOSIGPIPE, 1);
+#else
+ createsockets(sp);
+#endif
+ ssl_test_handle *server, *client;
+
+ bool client_side_auth = (c);
+ bool kernel = (k);
+ uint32_t session_id = (c+1) << 16 | (i+1);
+ //fprintf(stderr, "session_id: %d\n", session_id);
+ server = ssl_test_handle_create(session_id, (l == 1), true /*server*/,
+ client_side_auth, ciphers[i].dh_anonymous, d,
+ sp[0], server_certs, protos[p], false);
+ client = ssl_test_handle_create(session_id, (l == 1), false/*client*/,
+ client_side_auth, ciphers[i].dh_anonymous, d,
+ sp[1], server_certs, protos[p], kernel);
+
+ require_noerr(SSLSetPeerID(server->st, &session_id, sizeof(session_id)), out);
+ require_noerr(SSLSetPeerID(client->st, &session_id, sizeof(session_id)), out);
+
+ /* set fixed cipher on client and server */
+ require_noerr(SSLSetEnabledCiphers(client->st, &ciphers[i].cipher, 1), out);
+ require_noerr(SSLSetEnabledCiphers(server->st, &ciphers[i].cipher, 1), out);
+
+
+ snprintf(msg, sizeof(msg),
+ "%40s ADH:%d CSA:%d DTLS:%d RESUME:%d PROTO:%d KERNEL:%d",
+ ciphers[i].name,
+ server->dh_anonymous,
+ server->client_side_auth,
+ d, l, p, k);
+
+ printf("%s\n", msg);
+
+ pthread_create(&client_thread, NULL, securetransport_ssl_thread, client);
+ pthread_create(&server_thread, NULL, securetransport_ssl_thread, server);
+
+ int server_err, client_err;
+ pthread_join(client_thread, (void*)&client_err);
+ pthread_join(server_thread, (void*)&server_err);
+
+
+ __Check_String(!server_err && !client_err, msg);
+
+ out:
+ free(client);
+ free(server);
+
+ printf("\n\n");
+ sleep(2);
+ }
+ } /* all ciphers */
+ } /* all configs */
+
+ CFRelease(server_certs);
+
+ return 0;
+}
+
+
projects / apple / security.git / blobdiff