Sample code for 30+ languages & platforms
Unicode C

SSL Server Example

See more Socket/SSL/TLS Examples

Demonstrates how to create an SSL socket for accepting connections. This example is *very* simple in that it will create an SSL socket for accepting a single connection. It will read a message from the client, send a reply, and exit.

Chilkat Unicode C Downloads

Unicode C
#include <C_CkSocketW.h>
#include <C_CkCertStoreW.h>
#include <C_CkJsonObjectW.h>
#include <C_CkCertW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkSocketW listenSslSocket;
    HCkCertStoreW certStore;
    HCkJsonObjectW jsonCN;
    HCkCertW cert;
    int myPort;
    int backLog;
    int maxWaitMillisec;
    HCkSocketW clientSock;
    const wchar_t *receivedMsg;

    success = FALSE;

    // This example requires the Chilkat API to have been previously unlocked.
    // See Global Unlock Sample for sample code.

    listenSslSocket = CkSocketW_Create();

    // An SSL server needs a digital certificate.  This example loads it from a PFX file.

    // Create an instance of a certificate store object, load a PFX file,
    // locate the certificate we need, and use it.
    // (a PFX file may contain more than one certificate.)
    certStore = CkCertStoreW_Create();
    // The 1st argument is the filename, the 2nd arg is the 
    // PFX file's password:
    success = CkCertStoreW_LoadPfxFile(certStore,L"chilkat.pfx",L"test");
    if (success == FALSE) {
        wprintf(L"%s\n",CkCertStoreW_lastErrorText(certStore));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        return;
    }

    // Find the certificate to be used for SSL:
    jsonCN = CkJsonObjectW_Create();
    CkJsonObjectW_UpdateString(jsonCN,L"CN",L"example.com");

    cert = CkCertW_Create();
    success = CkCertStoreW_FindCert(certStore,jsonCN,cert);
    if (success == FALSE) {
        wprintf(L"%s\n",CkCertStoreW_lastErrorText(certStore));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        return;
    }

    // Use the certificate:
    success = CkSocketW_InitSslServer(listenSslSocket,cert);
    if (success == FALSE) {
        wprintf(L"%s\n",CkSocketW_lastErrorText(listenSslSocket));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        return;
    }

    // Bind and listen on a port:
    myPort = 8123;
    // Allow for a max of 5 queued connect requests.
    backLog = 5;
    success = CkSocketW_BindAndListen(listenSslSocket,myPort,backLog);
    if (success == FALSE) {
        wprintf(L"%s\n",CkSocketW_lastErrorText(listenSslSocket));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        return;
    }

    // If accepting an SSL/TLS connection, the SSL handshake is part of the connection
    // establishment process. This involves a few back-and-forth messages between the 
    // client and server to establish algorithms and a shared key to create the secure 
    // channel. The sending and receiving of these messages are governed by the 
    // MaxReadIdleMs and MaxSendIdleMs properties. If these properties are set to 0 
    // (and this is the default unless changed by your application), then the 
    // AcceptNext can hang indefinitely during the SSL handshake process. 
    // Make sure these properties are set to appropriate values before calling AcceptNext.

    // Set a 10 second max for waiting to read/write.  This is for the SSL/TLS handshake establishment.
    CkSocketW_putMaxReadIdleMs(listenSslSocket,10000);
    CkSocketW_putMaxSendIdleMs(listenSslSocket,10000);

    // Accept a single client connection and establish the secure SSL/TLS channel:
    maxWaitMillisec = 20000;
    clientSock = CkSocketW_Create();
    success = CkSocketW_AcceptNext(listenSslSocket,maxWaitMillisec,clientSock);
    if (success == FALSE) {
        wprintf(L"%s\n",CkSocketW_lastErrorText(listenSslSocket));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        CkSocketW_Dispose(clientSock);
        return;
    }

    // The client (in this example) is going to send a "Hello Server! -EOM-" 
    // message.  Read it:
    receivedMsg = CkSocketW_receiveUntilMatch(clientSock,L"-EOM-");
    if (CkSocketW_getLastMethodSuccess(clientSock) == FALSE) {
        wprintf(L"%s\n",CkSocketW_lastErrorText(clientSock));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        CkSocketW_Dispose(clientSock);
        return;
    }

    wprintf(L"%s\n",receivedMsg);

    // Send a "Hello Client! -EOM-" message:
    success = CkSocketW_SendString(clientSock,L"Hello Client! -EOM-");
    if (success == FALSE) {
        wprintf(L"%s\n",CkSocketW_lastErrorText(clientSock));
        CkSocketW_Dispose(listenSslSocket);
        CkCertStoreW_Dispose(certStore);
        CkJsonObjectW_Dispose(jsonCN);
        CkCertW_Dispose(cert);
        CkSocketW_Dispose(clientSock);
        return;
    }

    // Close the connection with the client
    // Wait a max of 20 seconds (20000 millsec)
    success = CkSocketW_Close(clientSock,20000);


    CkSocketW_Dispose(listenSslSocket);
    CkCertStoreW_Dispose(certStore);
    CkJsonObjectW_Dispose(jsonCN);
    CkCertW_Dispose(cert);
    CkSocketW_Dispose(clientSock);

    }