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


int initializeSocketUDP(char* service, char* adresse)
{
	int sock_id;
	struct addrinfo precisions, *resultat=NULL, *origine; // On stocke dans précisions nos besoins pour le socket, dans resultat l'adresse qui respectera les requêtes


	memset(&precisions, 0, sizeof precisions);
	precisions.ai_family = AF_UNSPEC;
	precisions.ai_socktype = SOCK_DGRAM;

/*"172.26.145.35"*/
	if(getaddrinfo(adresse, service, &precisions, &origine)<0) { fprintf(stderr, "Erreur getaddrinfo\n"); return(-1); }
	
	for(struct addrinfo* i=origine; i!=NULL && resultat==NULL; i=i->ai_next)
	{
		if(i->ai_family==AF_INET)
		{
			resultat=i;
			printf("Test : %d", origine->ai_addrlen);
		}
	}

	struct sockaddr_in* test=(struct sockaddr_in*)(resultat->ai_addr);
	printf("Addr : %x\n", test->sin_addr.s_addr);
	if((sock_id=socket(resultat->ai_family, resultat->ai_socktype, resultat->ai_protocol))<0) { fprintf(stderr, "Erreur socket\n"); return(-1); }

	int val=1;
	
	if(setsockopt(sock_id, SOL_SOCKET, SO_BROADCAST, &val, sizeof(val))<0) { fprintf(stderr, "Erreur setsockopt\n"); return(-1); }

	if(setsockopt(sock_id, SOL_SOCKET, SO_REUSEADDR, &val, sizeof(val))<0) { fprintf(stderr, "Erreur setsockopt\n"); return(-1); }


	freeaddrinfo(origine);
	return sock_id;
}


int sendUDPBroadcast(char* message, int port)
{
	static struct sockaddr_in addrUDP;
	addrUDP.sin_family=AF_INET;
	addrUDP.sin_port=htons(port); // Converti au format réseau

	struct in_addr tmpadd={0xffffffff};	
	addrUDP.sin_addr=tmpadd;
	
	char tmp_str[15];
	sprintf(tmp_str, "%d", port);
	int sock_id=initializeSocketUDP( tmp_str , "255.255.255.255");

	printf("Initialize via Broadcast %d\n", sock_id);
	
	if(sendto(sock_id, message, sizeof(message), 0, (struct sockaddr*) &addrUDP, sizeof(addrUDP)) < 0) { fprintf(stderr, "Erreur sendto\n"); return(-1);}       

	close(sock_id);	
	return 0;
}



int sendUDPUnicast(char* address, char* message, int port)
{
	static struct sockaddr_in addrUDP;
	addrUDP.sin_family=AF_INET;
	addrUDP.sin_port=htons(port);

	inet_aton(address, &(addrUDP.sin_addr)); // Converti l'écriture string de format a.b.c.d en format Internet

	char tmp_str[15];
	sprintf(tmp_str, "%d", port);
	int sock_id=initializeSocketUDP( tmp_str , address);
	printf("Initialize via Unicast %d\n", sock_id);

	if(sendto(sock_id, message, sizeof(message), 0, (struct sockaddr*) &addrUDP, sizeof(addrUDP)) < 0 ) { fprintf(stderr, "Error sendto %d\n", errno); return(-1); }

	close(sock_id);
	
	return 0;
}