#include <stdio.h>
#include <winsock.h>
// Function prototype
void StreamClient(char *szServer, short nPort);

// Helper macro for displaying errors
int PRINTERROR(char* s){
		fprintf(stderr,"\n%s: %d\n", s, WSAGetLastError());
}


void main(int argc, char **argv)
{
	WORD wVersionRequested = MAKEWORD(1,1);
	WSADATA wsaData;
	int nRet;
	short nPort;
	//
	// Check for the host and port arguments
	//
	if (argc != 3)
	{
		fprintf(stderr,"\nSyntax: client ServerName PortNumber\n");
		return;
	}
	nPort = atoi(argv[2]);
	//
	// Initialize WinSock and check the version
	//
	nRet = WSAStartup(wVersionRequested, &wsaData);
	if (wsaData.wVersion != wVersionRequested)
	{	
		fprintf(stderr,"\n Wrong version\n");
		return;
	}
	//
	// Go do the stuff a stream client does
	//
	StreamClient(argv[1], nPort);	
	//
	// Release WinSock
	//
	WSACleanup();
}

////////////////////////////////////////////////////////////

void StreamClient(char *szServer, short nPort)
{	
	//
	// Find the server
	//
    LPHOSTENT lpHostEntry;
	SOCKET	theSocket;
	SOCKADDR_IN saServer;
	int nRet;
    char szBuf[256];

	printf("\nStream Client connecting to server: %s on port: %d\n",
				szServer, nPort);
	lpHostEntry = gethostbyname(szServer);
    if (lpHostEntry == NULL)
    {
        PRINTERROR("gethostbyname()");
        return;
    }
	else{
		printf("hostname found\n");
	}

	//
	// Create a TCP/IP stream socket
	//
	theSocket = socket(AF_INET,				// Address family
					   SOCK_STREAM,			// Socket type
					   IPPROTO_TCP);		// Protocol

	if (theSocket == INVALID_SOCKET)
	{
		PRINTERROR("socket()");
		return;
	}
	else{
		printf(" socket created\n");
	}

	//
	// Fill in the address structure
	//
	saServer.sin_family = AF_INET;
	saServer.sin_addr = *((LPIN_ADDR)*lpHostEntry->h_addr_list);
										// ^ Server's address
	saServer.sin_port = htons(nPort);	// Port number from command line
	//
	// connect to the server
	//
	nRet = connect(theSocket,				// Socket
				   (LPSOCKADDR)&saServer,	// Server address
				   sizeof(struct sockaddr));// Length of server address structure

	if (nRet == SOCKET_ERROR)
	{
		PRINTERROR("connect()");
		closesocket(theSocket);
		return;
	}
	else{
		printf("connected\n");
	}
	//
	// Send data to the server
	//	
	strcpy(szBuf, "12345678901234567890");	
	nRet = send(theSocket,				// Connected socket
				szBuf,					// Data buffer
				strlen(szBuf),			// Length of data
				0);						// Flags

	if (nRet == SOCKET_ERROR)
	{
		PRINTERROR("send()");
		closesocket(theSocket);
		return;
	}
	else{
		printf("data sent: %s\n",szBuf);
	}
	//
	// Wait for a reply
	//
	nRet = recv(theSocket,				// Connected socket
				szBuf,					// Receive buffer
				sizeof(szBuf),			// Size of receive buffer
				0);						// Flags
	if (nRet == SOCKET_ERROR)
	{
		PRINTERROR("recv()");
		closesocket(theSocket);
		return;
	}
	//
	// Display the received data
	//
	printf("\nData received: %s", szBuf);
	closesocket(theSocket);
	return;
}