#include <windows.h>
#include<stdio.h>
#include<stdlib.h>
#include<winsock2.h>
#include <string.h>

/*  This function is called by the Windows function DispatchMessage()  */
LRESULT CALLBACK WindowProcedure (HWND hwnd, UINT message, WPARAM wParam, LPARAM lParam)
{
    switch (message)                  /* handle the messages */
    {
        case WM_DESTROY:
            PostQuitMessage (0);       /* send a WM_QUIT to the message queue */
            break;
        default:                      /* for messages that we don't deal with */
            return DefWindowProc (hwnd, message, wParam, lParam);
    }

    return 0;
}

/*  Make the class name into a global variable  */
char szClassName[ ] = "CodeBlocksWindowsApp";

int WINAPI WinMain (HINSTANCE hThisInstance,HINSTANCE hPrevInstance,LPSTR lpszArgument,int nCmdShow)
{
    WSADATA wsa;
    SOCKET s;
    struct sockaddr_in server;
    int bytesSent;
    int bytesRecv = SOCKET_ERROR;
    char sendbuf[1024] = "GET /projekt.html HTTP/1.1\r\n";
    char recvbuf[50000] = "";

    // WSASTARTUP
    printf("\nInicjalizowanie Winsocka...\t");
    if (WSAStartup(MAKEWORD(2,2),&wsa) != 0)
    {
        printf("Blad o kodzie: %d\n",WSAGetLastError());
        return 1;
    }
    else
    printf("Zainicjalizowano.");
    //tworzenie socketu
    printf("\nTworzenie Socketu...\t");
    if((s = socket(AF_INET , SOCK_STREAM , IPPROTO_TCP )) == INVALID_SOCKET)
    {
        printf("Nie mozna bylo utworzyc socketu: %d\n" , WSAGetLastError());
        WSACleanup();
    }
    else
    printf("Socket utworzony.");

    memset( &server, 0, sizeof( server ) );
    server.sin_addr.s_addr = inet_addr("127.0.0.1");
    server.sin_family = AF_INET;
    server.sin_port = htons(80);

    //laczenie
    printf("\nLaczenie...\t");
    if (connect(s , (struct sockaddr *)&server , sizeof(server)) == SOCKET_ERROR)
    {
        printf("Blad polaczenia.");
        closesocket(s);
        WSACleanup();
        return 1;
    }
    //wysyla get
    printf("\nWysylanie.");
    bytesSent = send(s, sendbuf, strlen(sendbuf), 0);
    printf( "\nWyslano bajtow: %d\n", bytesSent );

    while( bytesRecv == SOCKET_ERROR )
    {
        bytesRecv = recv( s, recvbuf, 50000, 0 );

        if( bytesRecv == 0 || bytesRecv == WSAECONNRESET )
        {
            printf( "\nPolaczenie zakonczone." );
            break;
        }

        if( bytesRecv < 0 )
             return 1;

       printf( "\nOdebrano bajtow: %d", bytesRecv );
       printf( "\nOdebrany tekst: %s\n", recvbuf );

       FILE *fp; /* używamy metody wysokopoziomowej - musimy mieć zatem identyfikator pliku, uwaga na gwiazdkę! */

        if ((fp=fopen("strona.html", "w"))==NULL) {
            printf ("Nie mogę otworzyć pliku strona.html do zapisu!\n");
            exit(1);
        }
        fprintf (fp, "%s", recvbuf); /* zapisz nasz łańcuch w pliku */
        fclose (fp); /* zamknij plik */
    }
//*********************************************************************************************************
    HWND hwnd;               /* This is the handle for our window */
    MSG messages;            /* Here messages to the application are saved */
    WNDCLASSEX wincl;        /* Data structure for the windowclass */

    /* The Window structure */
    wincl.hInstance = hThisInstance;
    wincl.lpszClassName = szClassName;
    wincl.lpfnWndProc = WindowProcedure;      /* This function is called by windows */
    wincl.style = CS_DBLCLKS;                 /* Catch double-clicks */
    wincl.cbSize = sizeof (WNDCLASSEX);

    /* Use default icon and mouse-pointer */
    wincl.hIcon = LoadIcon (NULL, IDI_APPLICATION);
    wincl.hIconSm = LoadIcon (NULL, IDI_APPLICATION);
    wincl.hCursor = LoadCursor (NULL, IDC_ARROW);
    wincl.lpszMenuName = NULL;                 /* No menu */
    wincl.cbClsExtra = 0;                      /* No extra bytes after the window class */
    wincl.cbWndExtra = 0;                      /* structure or the window instance */
    /* Use Windows's default colour as the background of the window */
    wincl.hbrBackground = (HBRUSH) COLOR_BACKGROUND;

    /* Register the window class, and if it fails quit the program */
    if (!RegisterClassEx (&wincl))
        return 0;

    /* The class is registered, let's create the program*/
    hwnd = CreateWindowEx (
           0,                   /* Extended possibilites for variation */
           szClassName,         /* Classname */
           "Chromolo",          /* Title Text */
           WS_OVERLAPPEDWINDOW, /* default window */
           CW_USEDEFAULT,       /* Windows decides the position */
           CW_USEDEFAULT,       /* where the window ends up on the screen */
           800,                 /* The programs width */
           600,                 /* and height in pixels */
           HWND_DESKTOP,        /* The window is a child-window to desktop */
           NULL,                /* No menu */
           hThisInstance,       /* Program Instance handler */
           NULL                 /* No Window Creation data */
           );

    /* Make the window visible on the screen */
    ShowWindow (hwnd, nCmdShow);
    /* Run the message loop. It will run until GetMessage() returns 0 */
    while (GetMessage (&messages, NULL, 0, 0))
    {
        /* Translate virtual-key messages into character messages */
        TranslateMessage(&messages);
        /* Send message to WindowProcedure */
        DispatchMessage(&messages);
        closesocket(s);
        WSACleanup();
    }

    /* The program return-value is 0 - The value that PostQuitMessage() gave */
    return messages.wParam;
}