Unicode C

SSH Tunnel (Port Forwarding via direct-tcpip channel)

See more SSH Examples

Demonstrates how to create an SSH tunnel to a remote hostname:port via a direct-tcpip channel. Unicode C

#include <C_CkSshW.h>

void ChilkatSample(void)
    {
    BOOL success;
    HCkSshW ssh;
    const wchar_t *hostname;
    int port;
    int channelNum;
    const wchar_t *httpReq;
    BOOL caseSensitive;
    const wchar_t *matchStr;
    const wchar_t *responseHeader;
    int numBytesRead;
    int pollTimeoutMs;
    const wchar_t *htmlBody;

    success = FALSE;

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

    ssh = CkSshW_Create();

    // Connect to an SSH server:

    // Hostname may be an IP address or hostname:
    hostname = L"192.168.1.117";
    port = 22;

    success = CkSshW_Connect(ssh,hostname,port);
    if (success != TRUE) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Wait a max of 5 seconds when reading responses..
    CkSshW_putIdleTimeoutMs(ssh,5000);

    // Authenticate using login/password:
    success = CkSshW_AuthenticatePw(ssh,L"chilkat",L"myPassword");
    if (success != TRUE) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Open a direct-tcpip channel.  We want the SSH server to connect
    // to www.chilkatsoft.com, port 80 (i.e. the web server).
    // Data sent through the SSH tunnel is forwarded to the remote
    // host:port.  (Note: The remote host:port does not need to be 
    // a web server.  It can be anything.  It can be your own
    // customer application server that listens on a port, or any
    // other type of server.)
    // When we read from the SSH channel, we'll be reading data
    // sent from the remote host:port (i.e. the web server in this
    // example).

    channelNum = CkSshW_OpenDirectTcpIpChannel(ssh,L"www.chilkatsoft.com",80);
    if (channelNum < 0) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Build a simple HTTP GET request for http://www.chilkatsoft.com/xyz.html
    httpReq = L"GET /xyz123.html HTTP/1.1\r\nHost: www.chilkatsoft.com\r\n\r\n";

    // Send the HTTP request:
    success = CkSshW_ChannelSendString(ssh,channelNum,httpReq,L"ansi");
    if (success != TRUE) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Get the HTTP response.
    // First read the HTTP response header which ends with a double CRLF.
    // Calling ChannelReceiveUntilMatch will receive until match string is seen,
    // or until a timeout occurs (IdleTimeoutMs property).  ChannelReceiveUntilMatch
    // may read beyond the match string, but it will stop reading as soon as the match
    // string is seen.
    caseSensitive = FALSE;
    matchStr = L"\r\n\r\n";
    success = CkSshW_ChannelReceiveUntilMatch(ssh,channelNum,matchStr,L"ansi",caseSensitive);
    if (success != TRUE) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Extract the HTTP header from the receive buffer.
    // (GetReceiveTextS extracts up to and including the match string from the receive buffer)

    responseHeader = CkSshW_getReceivedTextS(ssh,channelNum,matchStr,L"ansi");
    wprintf(L"---- HTTP Response Header ----\n");
    wprintf(L"%s\n",responseHeader);

    // Now get the body of the HTTP response (this is the HTML content
    // of http://www.chilkatsoft.com/xyz.html
    // It's possible we've already received the entire HTTP response in the
    // call to ChannelReceiveUntilMatch.  Therefore, we'll poll for any remaining data
    // and wait a max of .2 seconds.

    pollTimeoutMs = 200;
    numBytesRead = CkSshW_ChannelPoll(ssh,channelNum,pollTimeoutMs);
    // We're not checking for an error here.
    // A return value of -2 means that no data was available and the poll simply timed out (not an error)
    // A return value of -1 indicates an error.
    // A return value greater than 0 indicates that additional data was received.

    wprintf(L"---- HTML BODY ----\n");

    // Extract the remainder of the accumulated data in the internal receive buffer.
    // This should be our HTML body:

    htmlBody = CkSshW_getReceivedText(ssh,channelNum,L"ansi");
    wprintf(L"%s\n",htmlBody);

    // Close the channel:
    success = CkSshW_ChannelSendClose(ssh,channelNum);
    if (success != TRUE) {
        wprintf(L"%s\n",CkSshW_lastErrorText(ssh));
        CkSshW_Dispose(ssh);
        return;
    }

    // Disconnect
    CkSshW_Disconnect(ssh);


    CkSshW_Dispose(ssh);

    }