int main(int argc, char **argv) { OSStatus err; int arg; char fullFileBase[100]; SSLProtocol negVersion; SSLCipherSuite negCipher; CFArrayRef peerCerts = NULL; char *argp; otSocket listenSock; CFArrayRef serverCerts = nil; // required CFArrayRef encryptCerts = nil; // optional SecKeychainRef serverKc = nil; SecKeychainRef encryptKc = nil; /* user-spec'd parameters */ char *hostName = DEFAULT_HOST; unsigned short portNum = DEFAULT_PORT; CSSM_BOOL allowExpired = CSSM_FALSE; CSSM_BOOL allowAnyRoot = CSSM_FALSE; char *fileBase = NULL; CSSM_BOOL displayRxData = CSSM_FALSE; CSSM_BOOL displayCerts = CSSM_FALSE; char cipherRestrict = '\0'; SSLProtocol attemptProt = kTLSProtocol1; CSSM_BOOL protXOnly = CSSM_FALSE; // kSSLProtocol3Only, // kTLSProtocol1Only CSSM_BOOL quiet = CSSM_FALSE; CSSM_BOOL resumableEnable = CSSM_TRUE; CSSM_BOOL pause = CSSM_FALSE; char *keyChainName = NULL; char *encryptKeyChainName = NULL; CSSM_BOOL loop = CSSM_FALSE; SSLAuthenticate authenticate = kNeverAuthenticate; for(arg=1; arg<argc; arg++) { argp = argv[arg]; switch(argp[0]) { case 'H': hostName = &argp[2]; break; case 'P': portNum = atoi(&argp[2]); break; case 'k': keyChainName = &argp[2]; break; case 'E': encryptKeyChainName = &argp[2]; break; case 'e': allowExpired = CSSM_TRUE; break; case 'r': allowAnyRoot = CSSM_TRUE; break; case 'd': displayRxData = CSSM_TRUE; break; case 'c': displayCerts = CSSM_TRUE; break; case 'f': fileBase = &argp[2]; break; case 'C': cipherRestrict = argp[2]; break; case '2': attemptProt = kSSLProtocol2; break; case '3': attemptProt = kSSLProtocol3; break; case 't': attemptProt = kTLSProtocol1; break; case 'o': protXOnly = CSSM_TRUE; break; case 'R': resumableEnable = CSSM_FALSE; break; case 'a': if(argp[1] != '=') { usage(argv); } switch(argp[2]) { case 'a': authenticate = kAlwaysAuthenticate; break; case 'n': authenticate = kNeverAuthenticate; break; case 't': authenticate = kTryAuthenticate; break; default: usage(argv); } break; case 'p': pause = CSSM_TRUE; break; case 'q': quiet = CSSM_TRUE; break; case 'l': loop = CSSM_TRUE; break; default: usage(argv); } } /* get server cert and optional encryption cert as CFArrayRef */ serverCerts = getSslCerts(keyChainName, CSSM_FALSE, &serverKc); if(serverCerts == nil) { exit(1); } if(encryptKeyChainName) { encryptCerts = getSslCerts(encryptKeyChainName, CSSM_TRUE, &encryptKc); if(encryptCerts == nil) { exit(1); } } /* one-time only server port setup */ err = ListenForClients(portNum, &listenSock); if(err) { printf("ListenForClients returned %d; aborting\n", err); exit(1); } do { err = sslServe(listenSock, attemptProt, hostName, serverCerts, encryptCerts, allowExpired, allowAnyRoot, cipherRestrict, authenticate, resumableEnable, quiet, pause, &negVersion, &negCipher, &peerCerts); if(!quiet) { showSSLResult(attemptProt, err, negVersion, negCipher, peerCerts, displayCerts, fileBase ? fullFileBase : NULL); } freePeerCerts(peerCerts); } while(loop); endpointShutdown(listenSock); parseCertShutdown(); if(serverKc) { CFRelease(serverKc); } if(encryptKc) { CFRelease(encryptKc); } return 0; }
int main(int argc, char **argv) { RingBuffer serverToClientRing; RingBuffer clientToServerRing; unsigned numBufs = DEFAULT_NUM_BUFS; unsigned bufSize = DEFAULT_BUF_SIZE; unsigned chunkSize = DEFAULT_CHUNK; unsigned char clientBuf[DEFAULT_CHUNK]; unsigned char serverBuf[DEFAULT_CHUNK]; RingBufferArgs clientArgs; RingBufferArgs serverArgs; bool abortFlag = false; pthread_t client_thread = NULL; int result; OSStatus ortn; unsigned char sessionTicket[SESSION_TICKET_SIZE]; int ourRtn = 0; CFArrayRef idArray = NULL; /* for SSLSetCertificate */ CFArrayRef anchorArray = NULL; /* trusted roots */ char *hostName = NULL; /* user-spec'd variables */ char *kcName = NULL; unsigned xferSize = DEFAULT_XFER; bool pauseOnError = false; bool runForever = false; bool skipPAC = false; extern int optind; extern char *optarg; int arg; optind = 1; while ((arg = getopt(argc, argv, "x:c:k:h:np")) != -1) { switch (arg) { case 'x': { unsigned xsize = atoi(optarg); if(xsize == 0) { runForever = true; /* and leave xferSize alone */ } else { xferSize = xsize; } break; } case 'k': kcName = optarg; break; case 'n': skipPAC = true; break; case 'h': /* mainly to test EAP session ticket and ServerName simultaneously */ hostName = optarg; break; case 'p': pauseOnError = true; break; default: usage(argv); } } if(optind != argc) { usage(argv); } /* set up ring buffers */ ringBufSetup(&serverToClientRing, "serveToClient", numBufs, bufSize); ringBufSetup(&clientToServerRing, "clientToServe", numBufs, bufSize); /* get optional server SecIdentity */ if(kcName) { SecKeychainRef kcRef = NULL; SecCertificateRef anchorCert = NULL; SecIdentityRef idRef = NULL; idArray = getSslCerts(kcName, CSSM_FALSE, /* encryptOnly */ CSSM_FALSE, /* completeCertChain */ NULL, /* anchorFile */ &kcRef); if(idArray == NULL) { printf("***Can't get signing cert from %s\n", kcName); exit(1); } idRef = (SecIdentityRef)CFArrayGetValueAtIndex(idArray, 0); ortn = SecIdentityCopyCertificate(idRef, &anchorCert); if(ortn) { cssmPerror("SecIdentityCopyCertificate", ortn); exit(1); } anchorArray = CFArrayCreate(NULL, (const void **)&anchorCert, 1, &kCFTypeArrayCallBacks); CFRelease(kcRef); CFRelease(anchorCert); } /* set up server side */ memset(&serverArgs, 0, sizeof(serverArgs)); serverArgs.xferSize = xferSize; serverArgs.xferBuf = serverBuf; serverArgs.chunkSize = chunkSize; serverArgs.ringWrite = &serverToClientRing; serverArgs.ringRead = &clientToServerRing; serverArgs.goFlag = &clientArgs.iAmReady; serverArgs.abortFlag = &abortFlag; serverArgs.pauseOnError = pauseOnError; appGetRandomBytes(serverArgs.sharedSecret, SHARED_SECRET_SIZE); if(!skipPAC) { serverArgs.setMasterSecret = true; } serverArgs.idArray = idArray; serverArgs.trustedRoots = anchorArray; /* set up client side */ memset(&clientArgs, 0, sizeof(clientArgs)); clientArgs.xferSize = xferSize; clientArgs.xferBuf = clientBuf; clientArgs.chunkSize = chunkSize; clientArgs.ringWrite = &clientToServerRing; clientArgs.ringRead = &serverToClientRing; clientArgs.goFlag = &serverArgs.iAmReady; clientArgs.abortFlag = &abortFlag; clientArgs.pauseOnError = pauseOnError; memmove(clientArgs.sharedSecret, serverArgs.sharedSecret, SHARED_SECRET_SIZE); clientArgs.hostName = hostName; /* for now set up an easily recognizable ticket */ for(unsigned dex=0; dex<SESSION_TICKET_SIZE; dex++) { sessionTicket[dex] = dex; } clientArgs.sessionTicket = sessionTicket; clientArgs.sessionTicketLen = SESSION_TICKET_SIZE; /* client always tries setting the master secret in this test */ clientArgs.setMasterSecret = true; clientArgs.trustedRoots = anchorArray; /* fire up client thread */ result = pthread_create(&client_thread, NULL, rbClientThread, &clientArgs); if(result) { printf("***pthread_create returned %d, aborting\n", result); exit(1); } /* * And the server pseudo thread. This returns when all data has been transferred. */ ortn = rbServerThread(&serverArgs); if(abortFlag) { printf("***Test aborted.\n"); exit(1); } printf("\n"); printf("SSL Protocol Version : %s\n", sslGetProtocolVersionString(serverArgs.negotiatedProt)); printf("SSL Cipher : %s\n", sslGetCipherSuiteString(serverArgs.negotiatedCipher)); if(skipPAC) { if(clientArgs.sessionWasResumed) { printf("***skipPAC true, but client reported sessionWasResumed\n"); ourRtn = -1; } if(serverArgs.sessionWasResumed) { printf("***skipPAC true, but server reported sessionWasResumed\n"); ourRtn = -1; } if(ourRtn == 0) { printf("...PAC session attempted by client; refused by server;\n"); printf(" Normal session proceeded correctly.\n"); } } else { if(!clientArgs.sessionWasResumed) { printf("***client reported !sessionWasResumed\n"); ourRtn = -1; } if(!serverArgs.sessionWasResumed) { printf("***server reported !sessionWasResumed\n"); ourRtn = -1; } if(memcmp(clientBuf, serverBuf, DEFAULT_CHUNK)) { printf("***Data miscompare***\n"); ourRtn = -1; } if(ourRtn == 0) { printf("...PAC session resumed correctly.\n"); } } /* FIXME other stuff? */ return ourRtn; }
int main(int argc, char **argv) { OSStatus err; int arg; char fullFileBase[100]; SSLProtocol negVersion; SSLCipherSuite negCipher; Boolean sessionWasResumed; unsigned char sessionID[MAX_SESSION_ID_LENGTH]; size_t sessionIDLength; CFArrayRef peerCerts = NULL; char *argp; otSocket listenSock; CFArrayRef serverCerts = nil; // required CFArrayRef encryptCerts = nil; // optional SecKeychainRef serverKc = nil; SecKeychainRef encryptKc = nil; int loopNum; int errCount = 0; SSLClientCertificateState certState; // obtained from sslServe /* user-spec'd parameters */ unsigned short portNum = DEFAULT_PORT; bool allowExpired = false; bool allowAnyRoot = false; char *fileBase = NULL; bool displayCerts = false; char cipherRestrict = '\0'; SSLProtocol attemptProt = kTLSProtocol1; bool protXOnly = false; // kSSLProtocol3Only, // kTLSProtocol1Only char *acceptedProts = NULL; // "23t" ==> SSLSetProtocolVersionEnabled bool quiet = false; bool resumableEnable = true; bool pause = false; char *keyChainName = NULL; char *encryptKeyChainName = NULL; int loops = 1; SSLAuthenticate authenticate = kNeverAuthenticate; bool nonBlocking = false; bool allowExpiredRoot = false; bool disableCertVerify = false; char *anchorFile = NULL; bool replaceAnchors = false; bool vfyCertState = false; SSLClientCertificateState expectCertState = kSSLClientCertNone; char *password = NULL; char *dhParamsFile = NULL; unsigned char *dhParams = NULL; unsigned dhParamsLen = 0; bool doIdSearch = false; bool completeCertChain = false; uint32_t sessionCacheTimeout = 0; bool disableAnonCiphers = false; CFMutableArrayRef acceptableDNList = NULL; for(arg=1; arg<argc; arg++) { argp = argv[arg]; switch(argp[0]) { case 'P': portNum = atoi(&argp[2]); break; case 'k': keyChainName = &argp[2]; break; case 'y': encryptKeyChainName = &argp[2]; break; case 'e': allowExpired = true; break; case 'E': allowExpiredRoot = true; break; case 'x': disableCertVerify = true; break; case 'a': if(++arg == argc) { /* requires another arg */ usage(argv); } anchorFile = argv[arg]; break; case 'A': if(++arg == argc) { /* requires another arg */ usage(argv); } anchorFile = argv[arg]; replaceAnchors = true; break; case 'T': if(argp[1] != '=') { usage(argv); } vfyCertState = true; switch(argp[2]) { case 'n': expectCertState = kSSLClientCertNone; break; case 'r': expectCertState = kSSLClientCertRequested; break; case 's': expectCertState = kSSLClientCertSent; break; case 'j': expectCertState = kSSLClientCertRejected; break; default: usage(argv); } break; case 'r': allowAnyRoot = true; break; case 'd': break; case 'c': displayCerts = true; break; case 'f': fileBase = &argp[2]; break; case 'C': cipherRestrict = argp[2]; break; case '2': attemptProt = kSSLProtocol2; break; case '3': attemptProt = kSSLProtocol3; break; case 't': attemptProt = kTLSProtocol1; break; case 'o': protXOnly = true; break; case 'g': if(argp[1] != '=') { usage(argv); } acceptedProts = &argp[2]; break; case 'R': resumableEnable = false; break; case 'b': nonBlocking = true; break; case 'u': if(argp[1] != '=') { usage(argv); } switch(argp[2]) { case 'a': authenticate = kAlwaysAuthenticate; break; case 'n': authenticate = kNeverAuthenticate; break; case 't': authenticate = kTryAuthenticate; break; default: usage(argv); } break; case 'D': if(++arg == argc) { /* requires another arg */ usage(argv); } dhParamsFile = argv[arg]; break; case 'z': password = &argp[2]; break; case 'H': doIdSearch = true; break; case 'M': completeCertChain = true; break; case 'i': sessionCacheTimeout = atoi(&argp[2]); break; case '4': disableAnonCiphers = true; break; case 'p': pause = true; break; case 'q': quiet = true; break; #if 0 case 'U': if(++arg == argc) { /* requires another arg */ usage(argv); } if(cspReadFile(argv[arg], &caCert, &caCertLen)) { printf("***Error reading file %s. Aborting.\n", argv[arg]); exit(1); } if(acceptableDNList == NULL) { acceptableDNList = CFArrayCreateMutable(NULL, 0, &kCFTypeArrayCallBacks); } certData.Data = caCert; certData.Length = caCertLen; ortn = SecCertificateCreateFromData(&certData, CSSM_CERT_X_509v3, CSSM_CERT_ENCODING_DER, &secCert); if(ortn) { cssmPerror("SecCertificateCreateFromData", ortn); exit(1); } CFArrayAppendValue(acceptableDNList, secCert); CFRelease(secCert); break; #endif case 'l': if(argp[1] == '\0') { /* no loop count --> loop forever */ loops = 0; break; } else if(argp[1] != '=') { usage(argv); } loops = atoi(&argp[2]); break; default: usage(argv); } } #if NO_SERVER # if DEBUG securityd_init(NULL); # endif #endif /* get server cert and optional encryption cert as CFArrayRef */ if(keyChainName) { serverCerts = getSslCerts(keyChainName, false, completeCertChain, anchorFile, &serverKc); if(serverCerts == nil) { exit(1); } } else #if 0 if(doIdSearch) { OSStatus ortn = sslIdentityPicker(NULL, anchorFile, true, NULL, &serverCerts); if(ortn) { printf("***IdentitySearch failure; aborting.\n"); exit(1); } } if(password) { OSStatus ortn = SecKeychainUnlock(serverKc, strlen(password), password, true); if(ortn) { printf("SecKeychainUnlock returned %d\n", (int)ortn); /* oh well */ } } if(encryptKeyChainName) { encryptCerts = getSslCerts(encryptKeyChainName, true, completeCertChain, anchorFile, &encryptKc); if(encryptCerts == nil) { exit(1); } } #else (void) doIdSearch; (void) encryptKeyChainName; #endif if(protXOnly) { switch(attemptProt) { case kTLSProtocol1: attemptProt = kTLSProtocol1Only; break; case kSSLProtocol3: attemptProt = kSSLProtocol3Only; break; default: break; } } #if 0 if(dhParamsFile) { int r = cspReadFile(dhParamsFile, &dhParams, &dhParamsLen); if(r) { printf("***Error reading diffie-hellman params from %s; aborting\n", dhParamsFile); } } #else (void) dhParamsFile; #endif /* one-time only server port setup */ err = ListenForClients(portNum, nonBlocking, &listenSock); if(err) { printf("ListenForClients returned %d; aborting\n", (int)err); exit(1); } for(loopNum=1; ; loopNum++) { err = sslServe(listenSock, portNum, attemptProt, acceptedProts, serverCerts, password, encryptCerts, allowExpired, allowAnyRoot, allowExpiredRoot, disableCertVerify, anchorFile, replaceAnchors, cipherRestrict, authenticate, dhParams, dhParamsLen, acceptableDNList, resumableEnable, sessionCacheTimeout, disableAnonCiphers, quiet, pause, &negVersion, &negCipher, &certState, &sessionWasResumed, sessionID, &sessionIDLength, &peerCerts, argv); if(err) { errCount++; } if(!quiet) { SSLProtocol tryProt = attemptProt; showSSLResult(tryProt, acceptedProts, err, negVersion, negCipher, sessionWasResumed, sessionID, sessionIDLength, peerCerts, displayCerts, certState, fileBase ? fullFileBase : NULL); } errCount += verifyClientCertState(vfyCertState, expectCertState, certState); freePeerCerts(peerCerts); if(loops && (loopNum == loops)) { break; } }; endpointShutdown(listenSock); if(serverKc) { CFRelease(serverKc); } if(encryptKc) { CFRelease(encryptKc); } return errCount; }
/* * params->lock is held for us by runSession() - we use it as a semapahore by * unlocking it when we've created a port to listen on. * This is generally run from a thread via sslRunSession() and * sslServerThread() in sslAppUtils.cpp. */ OSStatus sslAppServe( SslAppTestParams *params) { otSocket listenSock = 0; otSocket acceptSock = 0; PeerSpec peerId; OSStatus ortn; SSLContextRef ctx = NULL; SecKeychainRef serverKc = nil; CFArrayRef serverCerts = nil; sslThrDebug("Server", "starting"); params->negVersion = kSSLProtocolUnknown; params->negCipher = SSL_NULL_WITH_NULL_NULL; params->ortn = noHardwareErr; /* set up a socket on which to listen */ for(unsigned retry=0; retry<BIND_RETRIES; retry++) { ortn = ListenForClients(params->port, params->nonBlocking, &listenSock); switch(ortn) { case errSecSuccess: break; case errSecOpWr: /* port already in use - try another */ params->port++; if(params->verbose || THREADING_DEBUG) { printf("...retrying ListenForClients at port %d\n", params->port); } break; default: break; } if(ortn != errSecOpWr) { break; } } /* let main thread know a socket is ready */ if(pthread_mutex_lock(¶ms->pthreadMutex)) { printf("***Error acquiring server lock; aborting.\n"); return -1; } params->serverReady = true; if(pthread_cond_broadcast(¶ms->pthreadCond)) { printf("***Error waking main thread; aborting.\n"); return -1; } if(pthread_mutex_unlock(¶ms->pthreadMutex)) { printf("***Error acquiring server lock; aborting.\n"); return -1; } if(ortn) { printf("ListenForClients returned %d; aborting\n", (int)ortn); return ortn; } /* wait for a connection */ if(params->verbose) { printf("Waiting for client connection..."); fflush(stdout); } ortn = AcceptClientConnection(listenSock, &acceptSock, &peerId); if(ortn) { printf("AcceptClientConnection returned %d; aborting\n", (int)ortn); return ortn; } /* * Set up a SecureTransport session. */ ortn = SSLNewContext(true, &ctx); if(ortn) { printSslErrStr("SSLNewContext", ortn); goto cleanup; } ortn = SSLSetIOFuncs(ctx, SocketRead, SocketWrite); if(ortn) { printSslErrStr("SSLSetIOFuncs", ortn); goto cleanup; } ortn = SSLSetConnection(ctx, (SSLConnectionRef)acceptSock); if(ortn) { printSslErrStr("SSLSetConnection", ortn); goto cleanup; } if(params->anchorFile) { ortn = sslAddTrustedRoot(ctx, params->anchorFile, params->replaceAnchors); if(ortn) { goto cleanup; } } if(params->myCertKcName != NULL) { /* if not, better be trying anonymous diff-hellman... :-) */ serverCerts = getSslCerts(params->myCertKcName, false, false, NULL, &serverKc); if(serverCerts == nil) { exit(1); } if(params->password) { ortn = SecKeychainUnlock(serverKc, strlen(params->password), (void *)params->password, true); if(ortn) { printf("SecKeychainUnlock returned %d\n", (int)ortn); /* oh well */ } } if(params->idIsTrustedRoot) { /* assume this is a root we want to implicitly trust */ ortn = addIdentityAsTrustedRoot(ctx, serverCerts); if(ortn) { goto cleanup; } } ortn = SSLSetCertificate(ctx, serverCerts); if(ortn) { printSslErrStr("SSLSetCertificate", ortn); goto cleanup; } } if(params->disableCertVerify) { ortn = SSLSetEnableCertVerify(ctx, false); if(ortn) { printSslErrStr("SSLSetEnableCertVerify", ortn); goto cleanup; } } ortn = sslSetProtocols(ctx, params->acceptedProts, params->tryVersion); if(ortn) { goto cleanup; } if(params->resumeEnable) { ortn = SSLSetPeerID(ctx, &peerId, sizeof(PeerSpec)); if(ortn) { printSslErrStr("SSLSetPeerID", ortn); goto cleanup; } } if(params->ciphers != NULL) { ortn = sslSetEnabledCiphers(ctx, params->ciphers); if(ortn) { goto cleanup; } } if(params->authenticate != kNeverAuthenticate) { ortn = SSLSetClientSideAuthenticate(ctx, params->authenticate); if(ortn) { printSslErrStr("SSLSetClientSideAuthenticate", ortn); goto cleanup; } } if(params->dhParams) { #if JAGUAR_BUILD printf("***Diffie-Hellman not supported in this config.\n"); #else ortn = SSLSetDiffieHellmanParams(ctx, params->dhParams, params->dhParamsLen); if(ortn) { printSslErrStr("SSLSetDiffieHellmanParams", ortn); goto cleanup; } #endif } /* Perform SSL/TLS handshake */ do { ortn = SSLHandshake(ctx); if((ortn == errSSLWouldBlock) && !params->silent) { /* keep UI responsive */ sslOutputDot(); } } while (ortn == errSSLWouldBlock); SSLGetClientCertificateState(ctx, ¶ms->certState); SSLGetNegotiatedCipher(ctx, ¶ms->negCipher); SSLGetNegotiatedProtocolVersion(ctx, ¶ms->negVersion); if(params->verbose) { printf("\n"); } if(ortn) { goto cleanup; } /* wait for one complete line */ char readBuf[READBUF_LEN]; size_t length; while(ortn == errSecSuccess) { length = READBUF_LEN; ortn = SSLRead(ctx, readBuf, length, &length); if (ortn == errSSLWouldBlock) { /* keep trying */ ortn = errSecSuccess; continue; } if(length == 0) { /* keep trying */ continue; } /* poor person's line completion scan */ for(unsigned i=0; i<length; i++) { if((readBuf[i] == '\n') || (readBuf[i] == '\r')) { goto serverResp; } } } serverResp: /* send out canned response */ ortn = SSLWrite(ctx, SERVER_MESSAGE, strlen(SERVER_MESSAGE), &length); if(ortn) { printSslErrStr("SSLWrite", ortn); } cleanup: /* * always do close, even on error - to flush outgoing write queue */ if(ctx) { OSStatus cerr = SSLClose(ctx); if(ortn == errSecSuccess) { ortn = cerr; } } if(acceptSock) { while(!params->clientDone && !params->serverAbort) { usleep(100); } endpointShutdown(acceptSock); } if(listenSock) { endpointShutdown(listenSock); } if(ctx) { SSLDisposeContext(ctx); } params->ortn = ortn; sslThrDebug("Server", "done"); return ortn; }
int main(int argc, char **argv) { RingBuffer serverToClientRing; RingBuffer clientToServerRing; unsigned numBufs = DEFAULT_NUM_BUFS; unsigned bufSize = DEFAULT_BUF_SIZE; unsigned chunkSize = DEFAULT_CHUNK; unsigned char clientBuf[DEFAULT_CHUNK]; unsigned char serverBuf[DEFAULT_CHUNK]; CFArrayRef idArray; /* for SSLSetCertificate */ CFArrayRef anchorArray; /* trusted roots */ SslRingBufferArgs clientArgs; SslRingBufferArgs serverArgs; SecKeychainRef kcRef = NULL; SecCertificateRef anchorCert = NULL; SecIdentityRef idRef = NULL; bool abortFlag = false; pthread_t client_thread = NULL; int result; bool diffieHellman = true; /* FIXME needs work */ OSStatus ortn; /* user-spec'd variables */ char *kcName = DEFAULT_KC; unsigned xferSize = DEFAULT_XFER; SSLCipherSuite cipherSuite = TLS_RSA_WITH_AES_128_CBC_SHA; SSLProtocol prot = kTLSProtocol1; char password[200]; bool clientAuthEnable = false; bool pauseOnError = false; bool runForever = false; bool mallocPause = false; password[0] = 0; extern int optind; extern char *optarg; int arg; optind = 1; while ((arg = getopt(argc, argv, "k:x:c:v:w:aBpm")) != -1) { switch (arg) { case 'k': kcName = optarg; break; case 'x': { unsigned xsize = atoi(optarg); if(xsize == 0) { runForever = true; /* and leave xferSize alone */ } else { xferSize = xsize; } break; } case 'c': switch(optarg[0]) { case 'a': cipherSuite = TLS_RSA_WITH_AES_128_CBC_SHA; break; 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': switch(optarg[0]) { case 't': prot = kTLSProtocol1; break; case '2': prot = kSSLProtocol2; break; case '3': prot = kSSLProtocol3; break; default: usage(argv); } break; case 'w': strcpy(password, optarg); break; case 'a': clientAuthEnable = true; break; case 'p': pauseOnError = true; break; case 'm': mallocPause = true; break; default: usage(argv); } } if(optind != argc) { usage(argv); } /* set up ring buffers */ ringBufSetup(&serverToClientRing, "serveToClient", numBufs, bufSize); ringBufSetup(&clientToServerRing, "clientToServe", numBufs, bufSize); /* get server SecIdentity */ idArray = getSslCerts(kcName, CSSM_FALSE, /* encryptOnly */ CSSM_FALSE, /* completeCertChain */ NULL, /* anchorFile */ &kcRef); if(idArray == NULL) { printf("***Can't get signing cert from %s\n", kcName); exit(1); } idRef = (SecIdentityRef)CFArrayGetValueAtIndex(idArray, 0); ortn = SecIdentityCopyCertificate(idRef, &anchorCert); if(ortn) { cssmPerror("SecIdentityCopyCertificate", ortn); exit(1); } anchorArray = CFArrayCreate(NULL, (const void **)&anchorCert, 1, &kCFTypeArrayCallBacks); /* unlock keychain? */ if(password[0]) { ortn = SecKeychainUnlock(kcRef, strlen(password), password, true); if(ortn) { cssmPerror("SecKeychainUnlock", ortn); /* oh well */ } } CFRelease(kcRef); if(mallocPause) { fpurge(stdin); printf("Pausing for MallocDebug setup. CR to proceed: "); getchar(); } /* set up server side */ memset(&serverArgs, 0, sizeof(serverArgs)); serverArgs.idArray = idArray; serverArgs.trustedRoots = anchorArray; serverArgs.xferSize = xferSize; serverArgs.xferBuf = serverBuf; serverArgs.chunkSize = chunkSize; serverArgs.runForever = runForever; serverArgs.cipherSuite = cipherSuite; serverArgs.prot = prot; serverArgs.ringWrite = &serverToClientRing; serverArgs.ringRead = &clientToServerRing; serverArgs.goFlag = &clientArgs.iAmReady; serverArgs.abortFlag = &abortFlag; serverArgs.pauseOnError = pauseOnError; /* set up client side */ memset(&clientArgs, 0, sizeof(clientArgs)); clientArgs.idArray = NULL; /* until we do client auth */ clientArgs.trustedRoots = anchorArray; clientArgs.xferSize = xferSize; clientArgs.xferBuf = clientBuf; clientArgs.chunkSize = chunkSize; clientArgs.runForever = runForever; clientArgs.cipherSuite = cipherSuite; clientArgs.prot = prot; clientArgs.ringWrite = &clientToServerRing; clientArgs.ringRead = &serverToClientRing; clientArgs.goFlag = &serverArgs.iAmReady; clientArgs.abortFlag = &abortFlag; clientArgs.pauseOnError = pauseOnError; /* fire up client thread */ result = pthread_create(&client_thread, NULL, sslRbClientThread, &clientArgs); if(result) { printf("***pthread_create returned %d, aborting\n", result); exit(1); } /* * And the server pseudo thread. This returns when all data has been transferred. */ ortn = sslRbServerThread(&serverArgs); if(abortFlag) { printf("***Test aborted.\n"); exit(1); } printf("\n"); if(mallocPause) { fpurge(stdin); printf("End of test. Pausing for MallocDebug analysis. CR to proceed: "); getchar(); } printf("SSL Protocol Version : %s\n", sslGetProtocolVersionString(serverArgs.negotiatedProt)); printf("SSL Cipher : %s\n", sslGetCipherSuiteString(serverArgs.negotiatedCipher)); printf("SSL Handshake : %f s\n", serverArgs.startData - serverArgs.startHandshake); printf("Data Transfer : %u bytes in %f s\n", (unsigned)xferSize, serverArgs.endData - serverArgs.startHandshake); printf(" : %.1f Kbytes/s\n", xferSize / (serverArgs.endData - serverArgs.startHandshake) / 1024.0); return 0; }
/* relies on SSLSetProtocolVersionEnabled */ OSStatus sslAppClient( SslAppTestParams *params) { PeerSpec peerId; otSocket sock = 0; OSStatus ortn; SSLContextRef ctx = NULL; SecKeychainRef clientKc = nil; CFArrayRef clientCerts = nil; sslThrDebug("Client", "starting"); params->negVersion = kSSLProtocolUnknown; params->negCipher = SSL_NULL_WITH_NULL_NULL; params->ortn = noHardwareErr; /* first make sure requested server is there */ ortn = MakeServerConnection(params->hostName, params->port, params->nonBlocking, &sock, &peerId); if(ortn) { printf("MakeServerConnection returned %d; aborting\n", (int)ortn); return ortn; } /* * Set up a SecureTransport session. */ ortn = SSLNewContext(false, &ctx); if(ortn) { printSslErrStr("SSLNewContext", ortn); goto cleanup; } ortn = SSLSetIOFuncs(ctx, SocketRead, SocketWrite); if(ortn) { printSslErrStr("SSLSetIOFuncs", ortn); goto cleanup; } ortn = SSLSetConnection(ctx, (SSLConnectionRef)sock); if(ortn) { printSslErrStr("SSLSetConnection", ortn); goto cleanup; } if(!params->skipHostNameCheck) { ortn = SSLSetPeerDomainName(ctx, params->hostName, strlen(params->hostName)); if(ortn) { printSslErrStr("SSLSetPeerDomainName", ortn); goto cleanup; } } /* remainder of setup is optional */ if(params->anchorFile) { ortn = sslAddTrustedRoot(ctx, params->anchorFile, params->replaceAnchors); if(ortn) { goto cleanup; } } ortn = sslSetProtocols(ctx, params->acceptedProts, params->tryVersion); if(ortn) { goto cleanup; } if(params->resumeEnable) { ortn = SSLSetPeerID(ctx, &peerId, sizeof(PeerSpec)); if(ortn) { printSslErrStr("SSLSetPeerID", ortn); goto cleanup; } } if(params->disableCertVerify) { ortn = SSLSetEnableCertVerify(ctx, false); if(ortn) { printSslErrStr("SSLSetEnableCertVerify", ortn); goto cleanup; } } if(params->ciphers != NULL) { ortn = sslSetEnabledCiphers(ctx, params->ciphers); if(ortn) { goto cleanup; } } if(params->myCertKcName) { clientCerts = getSslCerts(params->myCertKcName, false, false, NULL, &clientKc); if(clientCerts == nil) { exit(1); } if(params->password) { ortn = SecKeychainUnlock(clientKc, strlen(params->password), (void *)params->password, true); if(ortn) { printf("SecKeychainUnlock returned %d\n", (int)ortn); /* oh well */ } } if(params->idIsTrustedRoot) { /* assume this is a root we want to implicitly trust */ ortn = addIdentityAsTrustedRoot(ctx, clientCerts); if(ortn) { goto cleanup; } } ortn = SSLSetCertificate(ctx, clientCerts); if(ortn) { printSslErrStr("SSLSetCertificate", ortn); goto cleanup; } } do { ortn = SSLHandshake(ctx); if((ortn == errSSLWouldBlock) && !params->silent) { /* keep UI responsive */ sslOutputDot(); } } while (ortn == errSSLWouldBlock); SSLGetClientCertificateState(ctx, ¶ms->certState); SSLGetNegotiatedCipher(ctx, ¶ms->negCipher); SSLGetNegotiatedProtocolVersion(ctx, ¶ms->negVersion); if(ortn != errSecSuccess) { goto cleanup; } /* send a GET msg */ size_t actLen; ortn = SSLWrite(ctx, CLIENT_GETMSG, strlen(CLIENT_GETMSG), &actLen); if(ortn) { printSslErrStr("SSLWrite", ortn); goto cleanup; } #if KEEP_CONNECTED /* * Consume any server data and wait for server to disconnect */ char readBuf[READBUF_LEN]; do { ortn = SSLRead(ctx, readBuf, READBUF_LEN, &actLen); } while (ortn == errSSLWouldBlock); /* convert normal "shutdown" into zero err rtn */ if(ortn == errSSLClosedGraceful) { ortn = errSecSuccess; } #endif /* KEEP_CONNECTED */ cleanup: if(ctx) { OSStatus cerr = SSLClose(ctx); if(ortn == errSecSuccess) { ortn = cerr; } } if(sock) { endpointShutdown(sock); } if(ctx) { SSLDisposeContext(ctx); } params->ortn = ortn; sslThrDebug("Client", "done"); return ortn; }