/* Copyright (c) 2003, Rene Luria aka herel <rene@luria.ch>
 * All rights reserved.
 *
 * Redistribution and use in source and binary forms, with or without
 * modification, are permitted provided that the following conditions are met:
 *
 *     * Redistributions of source code must retain the above copyright notice,
 *     * this list of conditions and the following disclaimer.
 *     * Redistributions in binary form must reproduce the above copyright
 *     * notice, this list of conditions and the following disclaimer in the
 *     * documentation and/or other materials provided with the distribution.
 *     * Neither the name of the author nor the names of its
 *     * contributors may be used to endorse or promote products derived from
 *     * this software without specific prior written permission.
 *
 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
 * ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE
 * LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
 * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
 * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
 * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
 * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
 * POSSIBILITY OF SUCH DAMAGE. */

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

#define PORT_DEFAULT 8888
#define HOST_DEFAULT "localhost"
#define BUF_SIZE 128

static char *copyhost (char *p_source)
{
	char *p_dest;
	if ((p_dest = malloc (strlen (p_source) + 1)))
	{
		strcpy (p_dest, p_source);
	}
	else
	{
		perror ("malloc");
	}
	return p_dest;
}

/* on récup le host et le port en ligne de commande */
int main (int argc, char **argv)
{
	short int port;
	char *p_hostname;
	switch (argc)
	{
		case 3:
			port = atoi (argv[2]);
			if ((p_hostname = copyhost (argv[1])) == NULL)
			{
				return EXIT_FAILURE;
			}
			break;
		case 2:
			port = PORT_DEFAULT;
			if ((p_hostname = copyhost (argv[1])) == NULL)
			{
				return EXIT_FAILURE;
			}
			break;
		case 1:
			port = PORT_DEFAULT;
			if ((p_hostname = copyhost (HOST_DEFAULT)) == NULL)
			{
				return EXIT_FAILURE;
			}
			break;
		default:
			fprintf (stderr, "usage: ./sos.client [host [port]]\n");
			return EXIT_FAILURE;
	}
	{
		int sockfd;
		if ((sockfd = socket (PF_INET, SOCK_STREAM, 0)) < 0)
		{
			perror ("socket");
			return EXIT_FAILURE;
		}
		{
			struct sockaddr_in serveur;
			struct hostent *p_host;
			p_host = gethostbyname (p_hostname);
			memset (&serveur, 0, sizeof serveur);
			serveur.sin_family = AF_INET;
			serveur.sin_port = htons (port);
			serveur.sin_addr = * (struct in_addr *) p_host->h_addr;
			if (connect (sockfd, (struct sockaddr *) &serveur, sizeof serveur) < 0)
			{
				perror ("connect");
				return EXIT_FAILURE;
			}
			{
				char buffer[BUF_SIZE];
				memset (buffer, 0, BUF_SIZE);
				while (recv (sockfd, buffer, BUF_SIZE - 1, 0))
				{
					printf ("le PHARE a dit: %s", buffer);
				}
			}
		}
		close (sockfd);
	}
	return EXIT_SUCCESS;
}