#include <stdio.h>
#include "winsock2.h"

#include <string>
#include <iostream>

using namespace std;

void main() {

    // Initialize Winsock.
    WSADATA wsaData;
    int iResult = WSAStartup( MAKEWORD(2,2), &wsaData );
    if ( iResult != NO_ERROR )
        printf("Error at WSAStartup()\n");

    // Create a socket.
    SOCKET m_socket;
    m_socket = socket( AF_INET, SOCK_STREAM, IPPROTO_TCP );
	//m_socket = socket( AF_INET, SOCK_DGRAM, IPPROTO_UDP );

    if ( m_socket == INVALID_SOCKET ) {
        printf( "Error at socket(): %ld\n", WSAGetLastError() );
        WSACleanup();
        return;
    }

    // Bind the socket.
    sockaddr_in service;

    service.sin_family = AF_INET;
    //service.sin_addr.s_addr = inet_addr( "127.0.0.1" );
    service.sin_port = htons( 27015 );

	service.sin_addr.s_addr = inet_addr( "0.0.0.0" );

    if ( bind( m_socket, (SOCKADDR*) &service, sizeof(service) ) == SOCKET_ERROR ) {
        printf( "bind() failed.\n" );
        closesocket(m_socket);
        return;
    }
    
    // Listen on the socket.
    if ( listen( m_socket, 1 ) == SOCKET_ERROR )
        printf( "Error listening on socket.\n");

    // Accept connections.
    SOCKET AcceptSocket;

	char *a1;
	a1 = inet_ntoa(service.sin_addr);
	cout <<"your ip is: " << a1 << endl;

	char a2[100];
	gethostname(a2,100);
	cout <<"your hostname is: " << a2 << endl;

    printf( "Waiting for a client to connect...\n" );
    while (1) {
        AcceptSocket = SOCKET_ERROR;
        while ( AcceptSocket == SOCKET_ERROR ) {
            AcceptSocket = accept( m_socket, NULL, NULL );
        }
        printf( "Client Connected.\n");
        m_socket = AcceptSocket; 
        break;
    }
    
    // Send and receive data.
    int bytesSent;
    int bytesRecv = SOCKET_ERROR;
    char sendbuf[32] = "Server: Sending Data.";
    char recvbuf[32] = "Default recv";
    /*
    bytesRecv = recv( m_socket, recvbuf, 32, 0 );
    printf( "Bytes Recv: %ld\n", bytesRecv );
    
    bytesSent = send( m_socket, sendbuf, strlen(sendbuf), 0 );
    printf( "Bytes Sent: %ld\n", bytesSent );*/


	//string input="null";
	//char input[1];//='$';
	int a =0;

	//int sd =0;
	struct timeval tv;

	tv.tv_sec  = 0;
    tv.tv_usec = 0;

	fd_set socketReadSet;
	FD_ZERO(&socketReadSet);
	FD_SET(m_socket,&socketReadSet);

	//socketReadSet.fd_array[0]=m_socket;

	while(a==0)
	{
		cout << select(m_socket,&socketReadSet,0,0,&tv) << endl;

		if(select(m_socket,&socketReadSet,0,0,&tv)==1)
		{
		recv( m_socket, recvbuf, 32, 0 );
		}
		
		for(int b=0;b<strlen(recvbuf);b++)
		cout << recvbuf;

		cout << endl;

		/*
		recv( m_socket, input, 1, 0 );
		cout << input[0];

		cout << endl;
		*/
	}

    return;
}