// Yuri Zarechny for News2News (c) 2006
 
#pragma once
 
#include < windows.h >
#include < conio.h >
#include < stdio.h >
#include < tchar.h >
 
#include < wininet.h > // dependencies: wininet.lib
 
wchar_t  ccHost [256];
wchar_t  ccRemotePath [256];
wchar_t  ccExtraInfo [256];
 
HINTERNET    hConn,
            hSes,
            hReq;
 
void inetexit()
{
    if (hReq) InternetCloseHandle(hReq);
    if (hConn) InternetCloseHandle(hConn);
    if (hSes) InternetCloseHandle(hSes);
    printf("\nPress any key to exit\n");
    getch();
}
 
int _tmain(int argc, _TCHAR* argv[])
{
    LPWSTR    ccUrl = L"http://www.news2news.com/vfp/?example=397";
    LPSTR    cBuf;
    URL_COMPONENTS strUrl;
    DWORD    i;
 
    ZeroMemory(&strUrl, sizeof(strUrl));
    strUrl.dwStructSize = sizeof(strUrl);
 
    strUrl.lpszHostName = (LPWSTR) &ccHost;
    strUrl.lpszUrlPath = (LPWSTR) &ccRemotePath;
    strUrl.lpszExtraInfo = (LPWSTR) &ccExtraInfo;
    strUrl.dwSchemeLength    = -1;
    strUrl.dwHostNameLength  = 255;
    strUrl.dwUrlPathLength   = 255;
    strUrl.dwExtraInfoLength = 255;
 
    if (!InternetCrackUrl(ccUrl, 0, 0, &strUrl)) {
        printf("Could not crack Url\n");
        inetexit();
        return -1;
    }
    hSes = InternetOpen(L"news2news example agent",    
        INTERNET_OPEN_TYPE_PRECONFIG, 0, 0, 0);
    if (hSes == 0) {
        printf("Could not activate WinHTTP library\n");
        inetexit();
        return -2;
    }
    for (i=0; i<10; i++) {
        hConn = InternetConnect(hSes, ccHost, 
                INTERNET_DEFAULT_HTTP_PORT, 0, 0,
                INTERNET_SERVICE_HTTP, 0 ,0);
        if (hConn == 0) {
            wprintf(L"Could not connect to host: %s. Attempt #:%d\n", 
                ccHost, i);
            Sleep(1000); 
        } else break;
    }
    if (hConn == 0) {
        inetexit();
        return -3;
    }
    strUrl.lpszUrlPath = wcscat(strUrl.lpszUrlPath, 
        strUrl.lpszExtraInfo);
 
    hReq = HttpOpenRequest(hConn, L"GET", strUrl.lpszUrlPath, 
        L"HTTP/1.1", 0, 0, 0, 0);
 
    if (hReq == 0) {
        printf("Could not open HTTP request\n");
        inetexit();
        return -4;
    }
    BOOL bFlag = HttpSendRequest(hReq, NULL, NULL, 0, 0);
    if (!bFlag) {
        printf("Call to WinHttpSendRequest failed. LastError: %d\n", 
            GetLastError());
        inetexit();
        return -5;
    }
    do {
        i = 0;
        if (InternetQueryDataAvailable(hReq, &i, 0, 0)) {
            cBuf = new char[i+1];
            if (!cBuf) {
                printf("Out of memory\n");
                inetexit();
                return -7;
            }
            bFlag = InternetReadFile(hReq, (LPVOID) cBuf, i, &i);
            if (!bFlag) {
                printf("Call to WinHttpReadData failed. LastError: %d\n",
                    GetLastError());
                inetexit();
                return -8;
            }
            printf("%s", cBuf);
            delete [] cBuf;
        }
 
    } while (i>0);
 
    inetexit();
    return 0;
}