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

int main()
{
	// Make WSA
	WSADATA wsaData;	
	int iResult = WSAStartup( MAKEWORD( 2, 2 ), &wsaData );
	if( iResult != NO_ERROR )
	{
		printf( "Error at WSAStartup()\n" );
		return 0;
	}

	// Make a socket
	SOCKET m_socket;
	m_socket = socket( AF_INET, SOCK_STREAM, IPPROTO_TCP );
	if( m_socket == INVALID_SOCKET )
	{
		printf( "Error at socket(): %ld\n", WSAGetLastError() );
		WSACleanup();
		return 0;
	}

	// 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 );
	if( bind( m_socket, (SOCKADDR*)&service, sizeof( service ) ) == SOCKET_ERROR )
	{
		printf( "bind() failed.\n" );
		closesocket( m_socket );
		return 0;
	}

	// Listen on the socket
	if( listen( m_socket, 1 ) == SOCKET_ERROR )
	{
		printf( "Error listening on socket.\n" );
		return 0;
	}

	// Accept the connection
	SOCKET AcceptSocket;
	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;
	}

	// Connecting to the socket
	sockaddr_in clientService;
	clientService.sin_family = AF_INET;
	clientService.sin_addr.s_addr = inet_addr( "127.0.0.1" );
	clientService.sin_port = htons( 27015 );
	if( connect( m_socket, (SOCKADDR*)&clientService, sizeof( clientService ) ) == SOCKET_ERROR )
	{
		printf( "Failed to connect().\n" );
		WSACleanup();
		return 0;
	}

	// Sending and receiving data
	int bytesSent;
	int bytesRecv = SOCKET_ERROR;
	char sendbuf[ 32 ] = "Server: Sending Data.";
	char recvbuf[ 32 ] = "";
	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 );

	return 0;
}