WinHTTP и callback

#include "stdafx.h"
#include <windows.h>
#include <winhttp.h>
#include <stdio.h>
#pragma comment(lib,"winhttp")



// Context value structure.
typedef struct {
    HINTERNET   hSession;               // HTTP Session
    HINTERNET   hConnect;               // Connection handle
    HINTERNET   hRequest;               // Resource request handle
    DWORD       dwSize;                 // Size of the latest data block
    DWORD       dwTotalSize;            // Size of the total data
    LPSTR       lpBuffer;               // Buffer for storing read data
    char*       SendBuffer;             // Send buffer
    wchar_t*    URL;                    // URL
    int         Resend;                 // flag to resend
    DWORD       SendTimeout;            // send timeout
    DWORD       ReceiveTimeout;         // receive timeout
    DWORD       ConnectTimeout;         // connect timeout
    DWORD       ResolveTimeout;         // resolve timeout
    bool        IsBadRequest;           // bad request complete
    WINHTTP_STATUS_CALLBACK pCallback;  //callback

} REQUEST_CONTEXT;


int CounterGood = 0;
int CounterBad = 0;

// This macro returns the constant name in a string.
#define CASE_OF(constant)   case constant: return (L# constant)

LPCWSTR GetApiErrorString(DWORD dwResult)
{
    // Return the error result as a string so that the
    // name of the function causing the error can be displayed.
    switch(dwResult)
    {
        CASE_OF( API_RECEIVE_RESPONSE );
        CASE_OF( API_QUERY_DATA_AVAILABLE );
        CASE_OF( API_READ_DATA );
        CASE_OF( API_WRITE_DATA );
        CASE_OF( API_SEND_REQUEST );
    }
    return L"Unknown function";
}



void Cleanup (REQUEST_CONTEXT *cpContext)
{
   
    if (!cpContext)
    {
        return;
    }
    if (cpContext->IsBadRequest)
        CounterBad++;
    else
        CounterGood++;
    WCHAR szBuffer[256];
    // Set the memo to indicate a closed handle.
    swprintf(szBuffer,sizeof(szBuffer), L"Cleanup");
    //printf("%ws",szBuffer);
    if (cpContext->hRequest)
    {
        swprintf(szBuffer, sizeof(szBuffer), L">WinHttpSetStatusCallback NULL");
        //printf("%ws",szBuffer);
        WinHttpSetStatusCallback(cpContext->hRequest, NULL, NULL, NULL);
        swprintf(szBuffer, sizeof(szBuffer), L"<WinHttpSetStatusCallback NULL");
        //printf("%ws",szBuffer);

        swprintf(szBuffer, sizeof(szBuffer), L">WinHttpCloseHandle hRequest (%X)", (unsigned int)cpContext->hRequest);
        //printf("%ws",szBuffer);
        WinHttpCloseHandle(cpContext->hRequest);
        swprintf(szBuffer, sizeof(szBuffer), L"<WinHttpCloseHandle");
        //printf("%ws",szBuffer);
        cpContext->hRequest = NULL;
    }

    if (cpContext->hConnect)
    {
        swprintf(szBuffer, sizeof(szBuffer), L">WinHttpCloseHandle hConnect (%X)", (unsigned int)cpContext->hConnect);
        //printf("%ws",szBuffer);
        WinHttpCloseHandle(cpContext->hConnect);
        swprintf(szBuffer, sizeof(szBuffer), L"<WinHttpCloseHandle");
        //printf("%ws",szBuffer);
        cpContext->hConnect = NULL;
    }

    if (cpContext->hSession)
    {
        swprintf(szBuffer, sizeof(szBuffer), L">WinHttpCloseHandle hConnect (%X)", (unsigned int)cpContext->hSession);
        //printf("%ws",szBuffer);
        WinHttpCloseHandle(cpContext->hSession);
        swprintf(szBuffer, sizeof(szBuffer), L"<WinHttpCloseHandle");
        //printf("%ws",szBuffer);
        cpContext->hSession = NULL;
    }

    delete [] cpContext->lpBuffer;
    cpContext->lpBuffer = NULL;

    if (cpContext->SendBuffer)
    {
        delete cpContext->SendBuffer;
        cpContext->SendBuffer = NULL;
    }

    if (cpContext && cpContext->URL)
    {
        delete cpContext->URL;
        cpContext->URL = NULL;

    }  
    delete cpContext;
    cpContext = NULL;
}


// Forward declaration.
void __stdcall AsyncCallback(HINTERNET, DWORD_PTR, DWORD, LPVOID, DWORD);

BOOL SendRequest(REQUEST_CONTEXT *cpContext)
{
    if (!cpContext) return FALSE;
    if (!cpContext->URL) return FALSE;
    WCHAR szHost[256];
    DWORD dwOpenRequestFlag = 0;
    URL_COMPONENTS urlComp;
    BOOL fRet = FALSE;
    WCHAR szBuffer[256];

    // Initialize URL_COMPONENTS structure.
    ZeroMemory(&urlComp, sizeof(urlComp));
    urlComp.dwStructSize = sizeof(urlComp);

    // Use allocated buffer to store the Host Name.
    urlComp.lpszHostName        = szHost;
    urlComp.dwHostNameLength    = sizeof(szHost) / sizeof(szHost[0]);

    // Set non zero lengths to obtain pointer to the URL Path.
    /* note: if we threat this pointer as a NULL terminated string
            this pointer will contain Extra Info as well. */
    urlComp.dwUrlPathLength = -1;

    // Crack HTTP scheme.
    urlComp.dwSchemeLength = -1;


    swprintf( szBuffer, sizeof(szBuffer), L">Calling WinHttpCrackURL for %s", cpContext->URL);
    //printf("%wsn",szBuffer);

    // Crack the URL.
    if (!WinHttpCrackUrl(cpContext->URL, 0, 0, &urlComp))
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpCrackUrl failed : %X", GetLastError());
        //printf("%wsn",szBuffer);
        goto cleanup;
    }

    // Install the status callback function.
   
    if (cpContext->pCallback == NULL)
    {
        swprintf(szBuffer, sizeof(szBuffer), L">Calling WinHttpSetStatusCallback with WINHTTP_CALLBACK_FLAG_ALL_NOTIFICATIONS");
        //printf("%wsn",szBuffer);
        cpContext->pCallback = WinHttpSetStatusCallback(cpContext->hSession,
            (WINHTTP_STATUS_CALLBACK)AsyncCallback,
            WINHTTP_CALLBACK_FLAG_ALL_NOTIFICATIONS,
            NULL);
    }
    // note: On success WinHttpSetStatusCallback returns the previously defined callback function.
    // Here it should be NULL
    if (cpContext->pCallback == WINHTTP_INVALID_STATUS_CALLBACK)
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpSetStatusCallback WINHTTP_INVALID_STATUS_CALLBACK");
        //printf("%wsn",szBuffer);
        goto cleanup;
    }

    swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpSetStatusCallback succeeded");
    //printf("%wsn",szBuffer);

    swprintf(szBuffer, sizeof(szBuffer), L">Calling WinHttpConnect for host %s and port %d", szHost, urlComp.nPort);
    //printf("%wsn",szBuffer);

    // Open an HTTP session.
    cpContext->hConnect = WinHttpConnect(cpContext->hSession, szHost, urlComp.nPort, 0);
    if (NULL == cpContext->hConnect)
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpConnect failed : %X", GetLastError());
        //printf("%wsn",szBuffer);
        goto cleanup;
    }
    swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpConnect  succeeded");

    //printf("%wsn",szBuffer);

    swprintf(szBuffer, sizeof(szBuffer), L"> Calling WinHttpGetIEProxyConfigForCurrentUser");
    //printf("%wsn",szBuffer);

    // Prepare OpenRequest flag
    dwOpenRequestFlag = (INTERNET_SCHEME_HTTPS == urlComp.nScheme) ?
                            WINHTTP_FLAG_SECURE : 0;

    swprintf(szBuffer, sizeof(szBuffer), L">Calling WinHttpOpenRequest");
    //printf("%wsn",szBuffer);

    // Open a "GET" request.
    cpContext->hRequest = WinHttpOpenRequest(cpContext->hConnect,
                                        L"GET", urlComp.lpszUrlPath,
                                        NULL, WINHTTP_NO_REFERER,
                                        WINHTTP_DEFAULT_ACCEPT_TYPES,
                                        dwOpenRequestFlag);

    if (cpContext->hRequest == 0)
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpOpenRequest failed : %X", GetLastError());
        //printf("%wsn",szBuffer);
        goto cleanup;
    }
    swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpOpenRequest succeeded");
    //printf("%wsn",szBuffer);

    swprintf( szBuffer, sizeof(szBuffer), L"> Calling WinHttpSendRequest");
    //printf("%wsn",szBuffer);

    if (cpContext->Resend == 0)
    if (!WinHttpSetTimeouts(cpContext->hRequest,cpContext->ResolveTimeout,cpContext->ConnectTimeout,cpContext->SendTimeout,cpContext->ReceiveTimeout))
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpSetTimeouts failed : %X", GetLastError());
        goto cleanup;
    }

    DWORD f = 0;
    if (cpContext->SendBuffer)
    {
        f = strlen(cpContext->SendBuffer);
    }
    swprintf( szBuffer, sizeof(szBuffer), L"> Calling WinHttpSendRequest");

    // Send the request.
    if (!WinHttpSendRequest(cpContext->hRequest, WINHTTP_NO_ADDITIONAL_HEADERS, 0, cpContext->SendBuffer,f,f, (DWORD_PTR)cpContext))
    {
        swprintf(szBuffer, sizeof(szBuffer), L"< WinHttpSendRequest failed : %X", GetLastError());
        goto cleanup;
    }

    fRet = TRUE;

cleanup:

    if (fRet == FALSE)
    {
        WCHAR szError[256];

        // Set the error message.
        swprintf(szError, sizeof(szBuffer), L"%s failed with error %d", szBuffer, GetLastError());
        //printf("%wsn",szBuffer);
        // Cleanup handles.
        Cleanup(cpContext);
                   
        // Display the error message.
        //printf("%wsn",szError);

    }
               
    return fRet;
}
 


BOOL Header(REQUEST_CONTEXT *cpContext)
{
    DWORD dwSize=0;
    LPVOID lpOutBuffer = NULL;
    WCHAR szBuffer[256];

    // Set the state memo.
    swprintf(szBuffer, sizeof(szBuffer), L">Calling WinHttpQueryHeaders");
    //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);

    // Use HttpQueryInfo to obtain the size of the buffer.
    if (!WinHttpQueryHeaders( cpContext->hRequest,
                              WINHTTP_QUERY_RAW_HEADERS_CRLF,
                              WINHTTP_HEADER_NAME_BY_INDEX, NULL, &dwSize, WINHTTP_NO_HEADER_INDEX))
    {
        // An ERROR_INSUFFICIENT_BUFFER is expected because you
        // are looking for the size of the headers.  If any other
        // error is encountered, display error information.
        DWORD dwErr = GetLastError();
        if (dwErr != ERROR_INSUFFICIENT_BUFFER)
        {
 
            swprintf( szBuffer, sizeof(szBuffer), L"Error %d encountered.", dwErr);
            //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);
            //SetDlgItemText( cpContext->hWindow, cpContext->nResource, szBuffer);
            return FALSE;
        }
    }
   
    // Allocate memory for the buffer.
    lpOutBuffer = new WCHAR[dwSize];

    // Use HttpQueryInfo to obtain the header buffer.
    if(WinHttpQueryHeaders( cpContext->hRequest,
                            WINHTTP_QUERY_RAW_HEADERS_CRLF,
                            WINHTTP_HEADER_NAME_BY_INDEX, lpOutBuffer, &dwSize, WINHTTP_NO_HEADER_INDEX))
    {
       // SetDlgItemText( cpContext->hWindow, cpContext->nHeader, (LPWSTR)lpOutBuffer);
    }

    // Free the allocated memory.
    delete [] lpOutBuffer;

    return TRUE;
}


BOOL QueryData(REQUEST_CONTEXT *cpContext)
{
    WCHAR szBuffer[256];
    // Set the state memo.
    swprintf( szBuffer, sizeof(szBuffer), L">Calling WinHttpQueryDataAvailable");
       
    // Chech for available data.
    if (WinHttpQueryDataAvailable(cpContext->hRequest, NULL) == FALSE)
    {
        // If a synchronous error occured, display the error.  Otherwise
        // the query is successful or asynchronous.
        DWORD dwErr = GetLastError();
        swprintf( szBuffer, sizeof(szBuffer), L"Error %d encountered.", dwErr);
        //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);
        //SetDlgItemText( cpContext->hWindow, cpContext->nResource, szBuffer);
        return FALSE;
    }
    return TRUE;
}


void TransferAndDeleteBuffers(REQUEST_CONTEXT *cpContext, LPSTR lpReadBuffer, DWORD dwBytesRead)
{
    cpContext->dwSize = dwBytesRead;

    if(!cpContext->lpBuffer)
    {
        // If there is no context buffer, start one with the read data.
        cpContext->lpBuffer = lpReadBuffer;
    }
    else
    {
        // Store the previous buffer, and create a new one big
        // enough to hold the old data and the new data.
        LPSTR lpOldBuffer = cpContext->lpBuffer;
        cpContext->lpBuffer = new char[cpContext->dwTotalSize + cpContext->dwSize];

        // Copy the old and read buffer into the new context buffer.
        memcpy(cpContext->lpBuffer, lpOldBuffer, cpContext->dwTotalSize);
        memcpy(cpContext->lpBuffer + cpContext->dwTotalSize, lpReadBuffer, cpContext->dwSize);

        // Free the memory allocated to the old and read buffers.
        delete [] lpOldBuffer;
        delete [] lpReadBuffer;
    }
   
    // Keep track of the total size.
    cpContext->dwTotalSize += cpContext->dwSize;
}
 

BOOL ReadData(REQUEST_CONTEXT *cpContext)
{
    LPSTR lpOutBuffer = new char[cpContext->dwSize+1];
    WCHAR szBuffer[256];
    ZeroMemory(lpOutBuffer, cpContext->dwSize+1);

    // Set the state memo.
    swprintf( szBuffer, sizeof(szBuffer), L">Calling WinHttpReadData with size %d", cpContext->dwSize);
    //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);

    // Read the available data.
    if (WinHttpReadData( cpContext->hRequest, (LPVOID)lpOutBuffer,
                          cpContext->dwSize, NULL) == FALSE)
    {
        // If a synchronous error occurred, display the error.  Otherwise
        // the read is successful or asynchronous.
        DWORD dwErr = GetLastError();
        swprintf( szBuffer, sizeof(szBuffer), L"WinHttpReadData Error %d encountered.", dwErr);
       // SetDlgItemText( cpContext->hWindow, cpContext->nResource, szBuffer);
        //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);
        delete [] lpOutBuffer;
        return FALSE;
    }
    swprintf(szBuffer, sizeof(szBuffer), L"<WinHttpReadData");
    //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);

    return TRUE;
}


//********************************************************************
//                                                   Status Callback  
//********************************************************************

void __stdcall AsyncCallback( HINTERNET hInternet, DWORD_PTR dwContext,
                              DWORD dwInternetStatus,
                              LPVOID lpvStatusInformation,
                              DWORD dwStatusInformationLength)
{
    REQUEST_CONTEXT *cpContext;
    WCHAR szBuffer[1024];
    cpContext = (REQUEST_CONTEXT*)dwContext;
    WINHTTP_ASYNC_RESULT *pAR;

    if (cpContext == NULL)
    {
        // this should not happen, but we are being defensive here
        return;
    }

    szBuffer[0] = 0;

    // Create a string that reflects the status flag.
    switch (dwInternetStatus)
    {
    case WINHTTP_CALLBACK_STATUS_CLOSING_CONNECTION:
        //Closing the connection to the server.The lpvStatusInformation parameter is NULL.
        swprintf(szBuffer, sizeof(szBuffer), L"CLOSING_CONNECTION (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_CONNECTED_TO_SERVER:
        //Successfully connected to the server.
        //The lpvStatusInformation parameter contains a pointer to an LPWSTR that indicates the IP address of the server in dotted notation.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"CONNECTED_TO_SERVER (%s)",  (WCHAR *)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"CONNECTED_TO_SERVER (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_CONNECTING_TO_SERVER:
        //Connecting to the server.
        //The lpvStatusInformation parameter contains a pointer to an LPWSTR that indicates the IP address of the server in dotted notation.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"CONNECTING_TO_SERVER (%s)",  (WCHAR *)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"CONNECTING_TO_SERVER (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_CONNECTION_CLOSED:
        //Successfully closed the connection to the server. The lpvStatusInformation parameter is NULL.
        swprintf(szBuffer, sizeof(szBuffer), L"CONNECTION_CLOSED (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_DATA_AVAILABLE:
        //Data is available to be retrieved with WinHttpReadData.The lpvStatusInformation parameter points to a DWORD that contains the number of bytes of data available.
        //The dwStatusInformationLength parameter itself is 4 (the size of a DWORD).

        cpContext->dwSize = *((LPDWORD)lpvStatusInformation);
       
        // If there is no data, the process is complete.
        if (cpContext->dwSize == 0)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"DATA_AVAILABLE Number of bytes available : %d. All data has been read -> Displaying the data.", cpContext->dwSize);
            // All of the data has been read.  Display the data.
            if (cpContext->dwTotalSize)
            {
                // Convert the final context buffer to wide characters,
                // and display.
                LPWSTR lpWideBuffer = new WCHAR[cpContext->dwTotalSize + 1];
                MultiByteToWideChar(CP_ACP, MB_PRECOMPOSED,
                    cpContext->lpBuffer,
                    cpContext->dwTotalSize,
                    lpWideBuffer,
                    cpContext->dwTotalSize);
                lpWideBuffer[cpContext->dwTotalSize] = 0;
                /* note: in the case of binary data, only data upto the first null will be displayed */
                //SetDlgItemText(cpContext->hWindow, cpContext->nResource, lpWideBuffer);

                // Delete the remaining data buffers.
                delete[] lpWideBuffer;
                delete[] cpContext->lpBuffer;
                cpContext->lpBuffer = NULL;
            }

            // Close the request and connect handles for this context.
            Cleanup(cpContext);

        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"DATA_AVAILABLE Number of bytes available : %d. Reading next block of data", cpContext->dwSize);
            // Otherwise, read the next block of data.
            if (ReadData(cpContext) == FALSE)
            {
                swprintf(szBuffer, sizeof(szBuffer), L"DATA_AVAILABLE Number of bytes available : %d. ReadData returning FALSE", cpContext->dwSize);
                Cleanup(cpContext);
            }
        }
        break;

    case WINHTTP_CALLBACK_STATUS_HANDLE_CREATED:
        //An HINTERNET handle has been created. The lpvStatusInformation parameter contains a pointer to the HINTERNET handle.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"HANDLE_CREATED : %X",  (unsigned int)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"HANDLE_CREATED (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_HANDLE_CLOSING:
        //This handle value has been terminated. The lpvStatusInformation parameter contains a pointer to the HINTERNET handle. There will be no more callbacks for this handle.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"HANDLE_CLOSING : %X",  (unsigned int)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"HANDLE_CLOSING (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_HEADERS_AVAILABLE:
        //The response header has been received and is available with WinHttpQueryHeaders. The lpvStatusInformation parameter is NULL.
        swprintf(szBuffer, sizeof(szBuffer), L"HEADERS_AVAILABLE (%d)",  dwStatusInformationLength);
        Header(cpContext);

        // Initialize the buffer sizes.
        cpContext->dwSize = 0;
        cpContext->dwTotalSize = 0;

        // Begin downloading the resource.
        if (QueryData(cpContext) == FALSE)
        {
            Cleanup(cpContext);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_INTERMEDIATE_RESPONSE:
        //Received an intermediate (100 level) status code message from the server.
        //The lpvStatusInformation parameter contains a pointer to a DWORD that indicates the status code.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"INTERMEDIATE_RESPONSE Status code : %d",  *(DWORD*)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"INTERMEDIATE_RESPONSE (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_NAME_RESOLVED:
        //Successfully found the IP address of the server. The lpvStatusInformation parameter contains a pointer to a LPWSTR that indicates the name that was resolved.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"NAME_RESOLVED : %s",  (WCHAR *)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"NAME_RESOLVED (%d)",  dwStatusInformationLength);
        }
        break;


    case WINHTTP_CALLBACK_STATUS_READ_COMPLETE:
        //Data was successfully read from the server. The lpvStatusInformation parameter contains a pointer to the buffer specified in the call to WinHttpReadData.
        //The dwStatusInformationLength parameter contains the number of bytes read.
        //When used by WinHttpWebSocketReceive, the lpvStatusInformation parameter contains a pointer to a WINHTTP_WEB_SOCKET_STATUS structure,
        //  and the dwStatusInformationLength parameter indicates the size of lpvStatusInformation.

        swprintf(szBuffer, sizeof(szBuffer), L"READ_COMPLETE Number of bytes read : %d",  dwStatusInformationLength);

        // Copy the data and delete the buffers.

        if (dwStatusInformationLength != 0)
        {
            TransferAndDeleteBuffers(cpContext, (LPSTR)lpvStatusInformation, dwStatusInformationLength);

            // Check for more data.
            if (QueryData(cpContext) == FALSE)
            {
                Cleanup(cpContext);
            }
        }
        break;


    case WINHTTP_CALLBACK_STATUS_RECEIVING_RESPONSE:
        //Waiting for the server to respond to a request. The lpvStatusInformation parameter is NULL.
        swprintf(szBuffer, sizeof(szBuffer), L"RECEIVING_RESPONSE (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_REDIRECT:
        //An HTTP request is about to automatically redirect the request. The lpvStatusInformation parameter contains a pointer to an LPWSTR indicating the new URL.
        //At this point, the application can read any data returned by the server with the redirect response and can query the response headers. It can also cancel the operation by closing the handle

        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"REDIRECT to %s",  (WCHAR *)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"REDIRECT (%d)",  dwStatusInformationLength);
        }      
        break;

    case WINHTTP_CALLBACK_STATUS_REQUEST_ERROR:
        //An error occurred while sending an HTTP request.
        //The lpvStatusInformation parameter contains a pointer to a WINHTTP_ASYNC_RESULT structure. Its dwResult member indicates the ID of the called function and dwError indicates the return value.
        pAR = (WINHTTP_ASYNC_RESULT *)lpvStatusInformation;
        swprintf(szBuffer, sizeof(szBuffer), L"REQUEST_ERROR - error %d, result %s",  pAR->dwError, GetApiErrorString(pAR->dwResult));
        if (cpContext)

            cpContext->IsBadRequest = true;
        Cleanup(cpContext);
        break;

    case WINHTTP_CALLBACK_STATUS_REQUEST_SENT:
        //Successfully sent the information request to the server.
        //The lpvStatusInformation parameter contains a pointer to a DWORD indicating the number of bytes sent.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"REQUEST_SENT Number of bytes sent : %d",  *(DWORD*)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"REQUEST_SENT (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_RESOLVING_NAME:
        //Looking up the IP address of a server name. The lpvStatusInformation parameter contains a pointer to the server name being resolved.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"RESOLVING_NAME %s",  (WCHAR*)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"RESOLVING_NAME (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_RESPONSE_RECEIVED:
        //Successfully received a response from the server.
        //The lpvStatusInformation parameter contains a pointer to a DWORD indicating the number of bytes received.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"RESPONSE_RECEIVED. Number of bytes : %d",  *(DWORD*)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"RESPONSE_RECEIVED (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_SECURE_FAILURE:
        //One or more errors were encountered while retrieving a Secure Sockets Layer (SSL) certificate from the server.
        /*If the dwInternetStatus parameter is WINHTTP_CALLBACK_STATUS_SECURE_FAILURE, this parameter can be a bitwise-OR combination of one or more of the following values:
            WINHTTP_CALLBACK_STATUS_FLAG_CERT_REV_FAILED
            Certification revocation checking has been enabled, but the revocation check failed to verify whether a certificate has been revoked.The server used to check for revocation might be unreachable.
            WINHTTP_CALLBACK_STATUS_FLAG_INVALID_CERT
            SSL certificate is invalid.
            WINHTTP_CALLBACK_STATUS_FLAG_CERT_REVOKED
            SSL certificate was revoked.
            WINHTTP_CALLBACK_STATUS_FLAG_INVALID_CA
            The function is unfamiliar with the Certificate Authority that generated the server's certificate.
            WINHTTP_CALLBACK_STATUS_FLAG_CERT_CN_INVALID
            SSL certificate common name(host name field) is incorrect, for example, if you entered www.microsoft.com and the common name on the certificate says www.msn.com.
            WINHTTP_CALLBACK_STATUS_FLAG_CERT_DATE_INVALID
            SSL certificate date that was received from the server is bad.The certificate is expired.
            WINHTTP_CALLBACK_STATUS_FLAG_SECURITY_CHANNEL_ERROR
            The application experienced an internal error loading the SSL libraries.
        */
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"SECURE_FAILURE (%d).",  *(DWORD*)lpvStatusInformation);
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_CERT_REV_FAILED)  //1
            {
                wcscat_s(szBuffer, L"Revocation check failed to verify whether a certificate has been revoked.");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_INVALID_CERT)  //2
            {
                wcscat_s(szBuffer, L"SSL certificate is invalid.");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_CERT_REVOKED)  //4
            {
                wcscat_s(szBuffer, L"SSL certificate was revoked.");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_INVALID_CA)  //8
            {
                wcscat_s(szBuffer, L"The function is unfamiliar with the Certificate Authority that generated the server's certificate.");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_CERT_CN_INVALID)  //10
            {
                wcscat_s(szBuffer, L"SSL certificate common name(host name field) is incorrect");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_CERT_DATE_INVALID)  //20
            {
                wcscat_s(szBuffer, L"CSSL certificate date that was received from the server is bad.The certificate is expired.");
            }
            if (*(DWORD*)lpvStatusInformation & WINHTTP_CALLBACK_STATUS_FLAG_SECURITY_CHANNEL_ERROR)  //80000000
            {
                wcscat_s(szBuffer, L"The application experienced an internal error loading the SSL libraries.");
            }
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"SECURE_FAILURE (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_SENDING_REQUEST:
        // Sending the information request to the server.The lpvStatusInformation parameter is NULL.
        swprintf(szBuffer, sizeof(szBuffer), L"SENDING_REQUEST (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_SENDREQUEST_COMPLETE:
            swprintf(szBuffer, sizeof(szBuffer), L"SENDREQUEST_COMPLETE (%d)",   dwStatusInformationLength);

            // Prepare the request handle to receive a response.
            if (WinHttpReceiveResponse( cpContext->hRequest, NULL) == FALSE)
            {
                Cleanup(cpContext);
            }
            break;

    case WINHTTP_CALLBACK_STATUS_WRITE_COMPLETE:
        //Data was successfully written to the server. The lpvStatusInformation parameter contains a pointer to a DWORD that indicates the number of bytes written.
        //When used by WinHttpWebSocketSend, the lpvStatusInformation parameter contains a pointer to a WINHTTP_WEB_SOCKET_STATUS structure,
        //and the dwStatusInformationLength parameter indicates the size of lpvStatusInformation.
        if (lpvStatusInformation)
        {
            swprintf(szBuffer, sizeof(szBuffer), L"WRITE_COMPLETE (%d)",  *(DWORD*)lpvStatusInformation);
        }
        else
        {
            swprintf(szBuffer, sizeof(szBuffer), L"WRITE_COMPLETE (%d)",  dwStatusInformationLength);
        }
        break;

    case WINHTTP_CALLBACK_STATUS_GETPROXYFORURL_COMPLETE:
        // The operation initiated by a call to WinHttpGetProxyForUrlEx is complete. Data is available to be retrieved with WinHttpReadData.
        swprintf(szBuffer, sizeof(szBuffer), L"GETPROXYFORURL_COMPLETE (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_CLOSE_COMPLETE:
        // The connection was successfully closed via a call to WinHttpWebSocketClose.
        swprintf(szBuffer, sizeof(szBuffer), L"CLOSE_COMPLETE (%d)",  dwStatusInformationLength);
        break;

    case WINHTTP_CALLBACK_STATUS_SHUTDOWN_COMPLETE:
        // The connection was successfully shut down via a call to WinHttpWebSocketShutdown
        swprintf(szBuffer, sizeof(szBuffer), L"SHUTDOWN_COMPLETE (%d)",  dwStatusInformationLength);
        break;

    default:
            swprintf(szBuffer, sizeof(szBuffer),L"Unknown/unhandled callback - status %d given", dwInternetStatus);
            break;
    }

    printf("%wsn",szBuffer);
    // Add the callback information to the listbox.
    //LRESULT index = SendDlgItemMessage( cpContext->hWindow, IDC_CBLIST, LB_ADDSTRING, 0, (LPARAM)szBuffer);
    //SendDlgItemMessage(cpContext->hWindow, IDC_CBLIST, LB_SETTOPINDEX, index, 0);

}

int main()
{
    #define ZC L"http://127.0.0.1:40450"

    for (int i = 0; i < 2000; i++)
    {
   
        // Create the session handle using the default settings.
        HANDLE hSession = WinHttpOpen( L"Asynchronous WinHTTP Demo",
                                WINHTTP_ACCESS_TYPE_DEFAULT_PROXY,
                                WINHTTP_NO_PROXY_NAME,
                                WINHTTP_NO_PROXY_BYPASS,
                                WINHTTP_FLAG_ASYNC);

        // Check to see if the session handle was successfully created.
        if(hSession != NULL)
        {          
            REQUEST_CONTEXT* rcContext = new REQUEST_CONTEXT;
            if (rcContext)
            {
                memset(rcContext,0,sizeof(REQUEST_CONTEXT));
                rcContext->URL = new wchar_t[256];
               
                rcContext->ReceiveTimeout = 5000;
                rcContext->ConnectTimeout = 5000;
                rcContext->ResolveTimeout = 5000;
                rcContext->SendTimeout = 5000;
                rcContext->hSession = hSession;
                if (!rcContext->URL)
                {
                    delete rcContext;
                    WinHttpCloseHandle(hSession);
                    continue;
                }
                wcscpy(rcContext->URL,ZC);

                char* request = "<?xml version="1.0" encoding="windows-1251"?>"
                    "<soapenv:Envelope xmlns:env="http://schemas.xmlsoap.org/soap/envelope">"
                    "<soapenv:Header/>"
                    "<soapenv:Body/>"                  
                    "</soapenv:Envelope>";

                rcContext->SendBuffer = NULL;

                int f = strlen(request);

                rcContext->SendBuffer = new char[f+1];
                if (rcContext->SendBuffer)
                {
                    memset(rcContext->SendBuffer,0,f+1);
                    strncpy(rcContext->SendBuffer,request,f);
                }
                BOOL fRequest = SendRequest(rcContext);
//Sleep(1);
            }          
        }
    }
   
    getchar();
    printf("CounterGood = %d, CounterBad = %dn",CounterGood,CounterBad);   
    Sleep(2000);
    return 0;
}