/*	blastserver.c	- a server program that uses the socket interface to tcp  */
/*				this program just swallows all input it receives from clients */
/*				then when client closes connection it sends 1 byte back */


#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <sys/socket.h>
#include <netdb.h>
#include <netinet/in.h>
#include <arpa/inet.h>

#include "server.h"
#include "tcpblockio.h"


#define BUFSIZE					10000000
#define listening_depth			2

char					buffer[BUFSIZE];

void server( int server_port, char *server_name, int argc, char *argv[] )
	{
	int						n, len, fd, client_fd;
	struct sockaddr_in		address, client;


	fd = openserver(server_port, server_name, &address);

	/*	we are now successfully established as a server */
	for( ; ; )
		{
		/*	now accept a client connection (we'll block until one arrives) */
		len = sizeof(client);
		if( (client_fd = accept(fd, (struct sockaddr *)&client, &len)) < 0 )
			{
			perror("server accept");
			exit(EXIT_FAILURE);
			}

		/*	we are now successfully connected to a remote client */
		fprintf(stderr,
				"server: connected to client at internet address %s, port %d\n",
							inet_ntoa(client.sin_addr), ntohs(client.sin_port));

		/*	read data from client and do nothing with it */
		while( (n = recv(client_fd, buffer, BUFSIZE, 0)) > 0 )
			{
			}

		/* when done, write back one byte to sink the sender */
		writeblock(client_fd, buffer, 1);

		/*	close the connection to the client */
		fprintf(stderr,
		"server: disconnected from client at internet address %s, port %d\n",
							inet_ntoa(client.sin_addr), ntohs(client.sin_port));

		if( close(client_fd) < 0 )
			{
			perror("server close connection to client");
			exit(EXIT_FAILURE);
			}
		}

	/*	close the "listening post" socket by which server made connections */
	if( close(fd) < 0 )
		{
		perror("server close");
		exit(EXIT_FAILURE);
		}
	}