#pragma comment(lib, "Ws2_32.lib")

#define NETWORK_ERROR -1
#define NETWORK_OK     0

#include <Winsock2.h>
#include <iostream>
using namespace std;

void ReportError(int errorCode, const char *whichFunc)
{
	char errorMsg[92];				// Declare a buffer to hold
									// the generated error message
	ZeroMemory(errorMsg, 92);		// Automatically NULL-terminate the string

	// The following line copies the phrase, whichFunc string, and integer errorCode into the buffer
	sprintf(errorMsg, "Call to %s returned error %d!", (char *)whichFunc, errorCode);
	MessageBox(NULL, errorMsg, "socketIndication", MB_OK);
}

int main(int argc, char **argv)
{
	WORD sockversion;
	WSADATA wsadata;
	int nret;

	sockversion = MAKEWORD(1, 1);
	WSAStartup(sockversion, &wsadata);

	SOCKET listeningsocket;

	listeningsocket = socket(AF_INET, SOCK_STREAM, IPPROTO_TCP);

	if (listeningsocket == INVALID_SOCKET)
	{
		nret = WSAGetLastError();
		ReportError(nret, "socket()");
		WSACleanup();
		return NETWORK_ERROR;
	}

	SOCKADDR_IN serverinfo;
	serverinfo.sin_family = AF_INET;
	serverinfo.sin_addr.s_addr = INADDR_ANY;
	serverinfo.sin_port = htons(711);

	nret = bind(listeningsocket, (LPSOCKADDR)&serverinfo, sizeof(struct sockaddr));

	if (nret == SOCKET_ERROR)
	{
		nret = WSAGetLastError();
		ReportError(nret, "bind()");
		WSACleanup();
		return NETWORK_ERROR;
	}

	nret = listen(listeningsocket, 10);

	if (nret == SOCKET_ERROR)
	{
		nret = WSAGetLastError();
		ReportError(nret, "listen()");
		WSACleanup();
		return NETWORK_ERROR;
	}

	SOCKET theclient;
	theclient = accept(listeningsocket, NULL, NULL);

	if (theclient == INVALID_SOCKET)
	{
		nret = WSAGetLastError();
		ReportError(nret, "accept()");
		WSACleanup();
		return NETWORK_ERROR;
	}

	cout << "Client connected" << endl;
	cout << "Client's IP address is: " << serverinfo.sin_addr.s_addr << endl;

	closesocket(theclient);
	closesocket(listeningsocket);
	WSACleanup();
	system("PAUSE");
	return NETWORK_OK;
}