+++ /dev/null
-/*
- * Measure performance of SecureTransport - setup and sustained data
- * throughput.
- *
- * Written by Doug Mitchell.
- */
-#include <Security/SecureTransport.h>
-#include <clAppUtils/sslAppUtils.h>
-#include <clAppUtils/ioSock.h>
-#include <security_cdsa_utils/cuFileIo.h>
-#include <utilLib/common.h>
-
-#include <CoreServices/../Frameworks/CarbonCore.framework/Headers/MacErrors.h>
-#include <stdio.h>
-#include <stdlib.h>
-#include <string.h>
-#include <time.h>
-#include <ctype.h>
-#include <sys/param.h>
-#include <CoreFoundation/CoreFoundation.h>
-#include <security_utilities/devrandom.h>
-
-/* default - run both server and client on this machine, port 1200 */
-#define HOST_DEF "localhost"
-#define PORT_DEF 1200
-
-/* default keychain */
-#define DEFAULT_KC "localcert"
-
-#define XFERSIZE_DEF (1024 * 1024)
-#define BUFSIZE 1024
-
-#define DH_PARAM_FILE "dhParams_1024.der"
-
-static void usage(char **argv)
-{
- printf("Usage: %s s[erver]|c[lient] [option ...]\n", argv[0]);
- printf("Options:\n");
- printf(" -h hostname (default = %s)\n", HOST_DEF);
- printf(" -p port (default = %d)\n", PORT_DEF);
- printf(" -k keychain (default = %s)\n", DEFAULT_KC);
- printf(" -x transferSize (default = %d)\n", XFERSIZE_DEF);
- printf(" -c cipher (default = RSA/AES128; server side only)\n");
- printf(" ciphers: r=RSA/RC4; d=RSA/DES; D=RSA/3DES; h=DHA/RC4; "
- "H=DH/DSS/DES; A=AES256\n");
- printf(" -v version (t|2|3 default = t(TLS1); server side only)\n");
- printf(" -b bufsize (default = %d)\n", BUFSIZE);
- printf(" -w password (unlock server keychain with password)\n");
- printf(" -a (enable client authentication)\n");
- printf(" -B non-blocking I/O\n");
- exit(1);
-}
-
-
-int main(int argc, char **argv)
-{
- /* user-spec'd variables */
- const char *kcName = DEFAULT_KC;
- unsigned xferSize = XFERSIZE_DEF;
- int port = PORT_DEF;
- const char *hostName = HOST_DEF;
- SSLCipherSuite cipherSuite = TLS_RSA_WITH_AES_128_CBC_SHA;
- SSLProtocol prot = kTLSProtocol1Only;
- char password[200];
- bool clientAuthEnable = false;
- bool isServer = false;
- unsigned bufSize = BUFSIZE;
- bool diffieHellman = false;
- int nonBlocking = 0;
-
- if(argc < 2) {
- usage(argv);
- }
- password[0] = 0;
- switch(argv[1][0]) {
- case 's':
- isServer = true;
- break;
- case 'c':
- isServer = false;
- break;
- default:
- usage(argv);
- }
-
- extern int optind;
- extern char *optarg;
- int arg;
- optind = 2;
- while ((arg = getopt(argc, argv, "h:p:k:x:c:v:w:b:aB")) != -1) {
- switch (arg) {
- case 'h':
- hostName = optarg;
- break;
- case 'p':
- port = atoi(optarg);
- break;
- case 'k':
- kcName = optarg;
- break;
- case 'x':
- xferSize = atoi(optarg);
- break;
- case 'c':
- if(!isServer) {
- printf("***Specify cipherSuite on server side.\n");
- exit(1);
- }
- switch(optarg[0]) {
- case 'r':
- cipherSuite = SSL_RSA_WITH_RC4_128_SHA;
- break;
- case 'd':
- cipherSuite = SSL_RSA_WITH_DES_CBC_SHA;
- break;
- case 'D':
- cipherSuite = SSL_RSA_WITH_3DES_EDE_CBC_SHA;
- break;
- case 'h':
- cipherSuite = SSL_DH_anon_WITH_RC4_128_MD5;
- diffieHellman = true;
- break;
- case 'H':
- cipherSuite = SSL_DHE_DSS_WITH_DES_CBC_SHA;
- diffieHellman = true;
- break;
- case 'A':
- cipherSuite = TLS_RSA_WITH_AES_256_CBC_SHA;
- break;
- default:
- usage(argv);
- }
- break;
- case 'v':
- if(!isServer) {
- printf("***Specify protocol on server side.\n");
- exit(1);
- }
- switch(optarg[0]) {
- case 't':
- prot = kTLSProtocol1Only;
- break;
- case '2':
- prot = kSSLProtocol2;
- break;
- case '3':
- prot = kSSLProtocol3Only;
- break;
- default:
- usage(argv);
- }
- break;
- case 'w':
- strcpy(password, optarg);
- break;
- case 'b':
- bufSize = atoi(optarg);
- break;
- case 'a':
- clientAuthEnable = true;
- break;
- case 'B':
- nonBlocking = 1;
- break;
- default:
- usage(argv);
- }
- }
-
- /* per-transfer buffer - make it random for server */
- char *buf = (char *)malloc(bufSize);
- if(isServer) {
- Security::DevRandomGenerator rng;
- rng.random(buf, bufSize);
- }
-
- /* gather Diffie-Hellman params from cwd */
- unsigned char *dhParams = NULL;
- unsigned dhParamsLen = 0;
- if(diffieHellman && isServer) {
- if(readFile(DH_PARAM_FILE, &dhParams, &dhParamsLen)) {
- printf("***Error reading Diffie-Hellman Params. Prepare to "
- "wait for a minute during SSL handshake.\n");
- }
- }
-
- /*
- * Open keychain; both sides use the same one.
- */
- OSStatus ortn;
- SecKeychainRef certKc = NULL;
- CFAbsoluteTime kcOpenStart = CFAbsoluteTimeGetCurrent();
- ortn = SecKeychainOpen(kcName, &certKc);
- if(ortn) {
- printf("Error opening keychain %s (%d); aborting.\n",
- kcName, (int)ortn);
- exit(1);
- }
- if(password[0]) {
- ortn = SecKeychainUnlock(certKc, strlen(password), password, true);
- if(ortn) {
- printf("SecKeychainUnlock returned %d\n", (int)ortn);
- /* oh well */
- }
- }
- CFAbsoluteTime kcOpenEnd = CFAbsoluteTimeGetCurrent();
-
- otSocket peerSock = 0;
- otSocket listenSock = 0; // for server only
- PeerSpec peerId;
-
- if(isServer) {
- printf("...listening for client connection on port %d\n", port);
- ortn = ListenForClients(port, nonBlocking, &listenSock);
- if(ortn) {
- printf("...error establishing a listen socket. Aborting.\n");
- exit(1);
- }
- ortn = AcceptClientConnection(listenSock, &peerSock, &peerId);
- if(ortn) {
- printf("...error listening for connection. Aborting.\n");
- exit(1);
- }
- }
- else {
- printf("...connecting to host %s at port %d\n", hostName, port);
- ortn = MakeServerConnection(hostName, port, nonBlocking, &peerSock,
- &peerId);
- if(ortn) {
- printf("...error connecting to server %s. Aborting.\n",
- hostName);
- exit(1);
- }
- }
-
- /* start timing SSL setup */
- CFAbsoluteTime setupStart = CFAbsoluteTimeGetCurrent();
-
- SSLContextRef ctx;
- ortn = SSLNewContext(isServer, &ctx);
- if(ortn) {
- printSslErrStr("SSLNewContext", ortn);
- exit(1);
- }
- ortn = SSLSetIOFuncs(ctx, SocketRead, SocketWrite);
- if(ortn) {
- printSslErrStr("SSLSetIOFuncs", ortn);
- exit(1);
- }
- ortn = SSLSetConnection(ctx, (SSLConnectionRef)peerSock);
- if(ortn) {
- printSslErrStr("SSLSetConnection", ortn);
- exit(1);
- }
- ortn = SSLSetPeerDomainName(ctx, hostName, strlen(hostName) + 1);
- if(ortn) {
- printSslErrStr("SSLSetPeerDomainName", ortn);
- exit(1);
- }
-
- /*
- * Server/client specific setup.
- *
- * Client uses the same keychain as server, but it uses it for
- * sslAddTrustedRoots() instead of getSslCerts() and
- * SSLSetCertificate().
- */
- CFArrayRef myCerts = NULL;
- if(clientAuthEnable || isServer) {
- myCerts = sslKcRefToCertArray(certKc, CSSM_FALSE, CSSM_FALSE, NULL, NULL);
- if(myCerts == NULL) {
- exit(1);
- }
- ortn = addIdentityAsTrustedRoot(ctx, myCerts);
- if(ortn) {
- exit(1);
- }
- ortn = SSLSetCertificate(ctx, myCerts);
- if(ortn) {
- printSslErrStr("SSLSetCertificate", ortn);
- exit(1);
- }
- }
- if(isServer) {
- SSLAuthenticate auth;
- if(clientAuthEnable) {
- auth = kAlwaysAuthenticate;
- }
- else {
- auth = kNeverAuthenticate;
- }
- ortn = SSLSetClientSideAuthenticate(ctx, auth);
- if(ortn) {
- printSslErrStr("SSLSetClientSideAuthenticate", ortn);
- exit(1);
- }
- ortn = SSLSetEnabledCiphers(ctx, &cipherSuite, 1);
- if(ortn) {
- printSslErrStr("SSLSetEnabledCiphers", ortn);
- exit(1);
- }
- ortn = SSLSetProtocolVersion(ctx, prot);
- if(ortn) {
- printSslErrStr("SSLSetProtocolVersion", ortn);
- exit(1);
- }
- if(dhParams != NULL) {
- ortn = SSLSetDiffieHellmanParams(ctx, dhParams, dhParamsLen);
- if(ortn) {
- printSslErrStr("SSLSetDiffieHellmanParams", ortn);
- exit(1);
- }
- }
- }
- else {
- /* client setup */
- if(!clientAuthEnable) {
- /* We're not presenting a cert; trust the server certs */
- bool foundOne;
- ortn = sslAddTrustedRoots(ctx, certKc, &foundOne);
- if(ortn) {
- printSslErrStr("sslAddTrustedRoots", ortn);
- exit(1);
- }
- }
- }
-
- /*
- * Context setup complete. Start timing handshake.
- */
- CFAbsoluteTime hshakeStart = CFAbsoluteTimeGetCurrent();
- do {
- ortn = SSLHandshake(ctx);
- } while (ortn == errSSLWouldBlock);
- if(ortn) {
- printSslErrStr("SSLHandshake", ortn);
- exit(1);
- }
- CFAbsoluteTime hshakeEnd = CFAbsoluteTimeGetCurrent();
-
- /* snag these before data xfer possibly shuts down connection */
- SSLProtocol negVersion;
- SSLCipherSuite negCipher;
- SSLClientCertificateState certState; // RETURNED
-
- SSLGetNegotiatedCipher(ctx, &negCipher);
- SSLGetNegotiatedProtocolVersion(ctx, &negVersion);
- SSLGetClientCertificateState(ctx, &certState);
-
- /* server sends xferSize bytes to client and shuts down */
- size_t bytesMoved;
-
- CFAbsoluteTime dataStart = CFAbsoluteTimeGetCurrent();
- size_t totalMoved = 0;
- if(isServer) {
- size_t bytesToGo = xferSize;
- bool done = false;
- do {
- size_t thisMove = bufSize;
- if(thisMove > bytesToGo) {
- thisMove = bytesToGo;
- }
- ortn = SSLWrite(ctx, buf, thisMove, &bytesMoved);
- switch(ortn) {
- case noErr:
- case errSSLWouldBlock:
- break;
- default:
- done = true;
- break;
- }
- bytesToGo -= bytesMoved;
- totalMoved += bytesMoved;
- if(bytesToGo == 0) {
- done = true;
- }
- } while(!done);
- if(ortn != noErr) {
- printSslErrStr("SSLWrite", ortn);
- exit(1);
- }
- }
- else {
- /* client reads until error or errSSLClosedGraceful */
- bool done = false;
- do {
- ortn = SSLRead(ctx, buf, bufSize, &bytesMoved);
- switch(ortn) {
- case errSSLClosedGraceful:
- done = true;
- break;
- case noErr:
- case errSSLWouldBlock:
- break;
- default:
- done = true;
- break;
- }
- totalMoved += bytesMoved;
- } while(!done);
- if(ortn != errSSLClosedGraceful) {
- printSslErrStr("SSLRead", ortn);
- exit(1);
- }
- }
-
- /* shut down channel */
- ortn = SSLClose(ctx);
- if(ortn) {
- printSslErrStr("SSLCLose", ortn);
- exit(1);
- }
- CFAbsoluteTime dataEnd = CFAbsoluteTimeGetCurrent();
-
- /* how'd we do? */
- printf("SSL version : %s\n",
- sslGetProtocolVersionString(negVersion));
- printf("CipherSuite : %s\n",
- sslGetCipherSuiteString(negCipher));
- printf("Client Cert State : %s\n",
- sslGetClientCertStateString(certState));
-
- if(password[0]) {
- printf("keychain open/unlock : ");
- }
- else {
- printf("keychain open : ");
- }
- printf("%f s\n", kcOpenEnd - kcOpenStart);
- printf("SSLContext setup : %f s\n", hshakeStart - setupStart);
- printf("SSL Handshake : %f s\n", hshakeEnd - hshakeStart);
- printf("Data Transfer : %u bytes in %f s\n", (unsigned)totalMoved,
- dataEnd - dataStart);
- printf(" : %.1f Kbytes/s\n",
- totalMoved / (dataEnd - dataStart) / 1024.0);
- return 0;
-}
-
-
-