#include <sys/types.h>
#include <sys/socket.h>
#include <stdio.h>
#include <netinet/in.h>
#include <string.h>
#include <arpa/inet.h>
#include <unistd.h>
//Połączenia z wieloma klientami
void ObsluzPolaczenie(int gn)
{
  
  
  
  
  	/*
    char Msg[1024];
    char Sciezka[1024];
    
    while (1) {
    	//recv() <- czeka na wiadomość
		FD_ZERO(&readfds);
        FD_SET(gniazdoTCP, &readfds);
        timeout.tv_sec = 1;
        timeout.tv_usec = 0;
        gniazdo_src = socket();
        int gniazdo_kli;
        if (select(gniazdo+1, &readfds, NULL, NULL, &timeout) > 0)
        {
          gniazdo_kli = accept(gniazdo_src, (struct sockaddr*) adres, &dladr);
        }
        memset(Msg, 0, 1024);
        recv(Gniazdo_Klient, Msg, 1024, 0);
        
        //Porównywanie wiadomości
      	If (Msg == "wyślij") {	
          
      	} else (Msg = "pobierz") {
			
      	} else (Msg == "exit") {
        	close(Gniazdo_Klient);
            close(Gniazdo_Server);
        } else {
			//wyślij do wszystkich wiadomość
            //(opconalne)nadpisz plik z historią rozmów - plik tekstowy
            for(each gniazdo in readfs [select]){
            	send(gniazdo,wiadomość, );
            }
      	}
    }
    */
}

//Main Server
/*

struct client_socket
    {
    	int socket;
  		struct sockaddr_in address;
        
    };

*/

int main(void) {
    char bufor[1024]; //wiadomosc
    int gniazdo, gniazdo2;
    struct sockaddr_in adr, nadawca;
    socklen_t dl = sizeof(struct sockaddr_in);
 
    gniazdo = socket(PF_INET, SOCK_STREAM, 0);
    adr.sin_family = AF_INET;
    adr.sin_port = htons(44444); //port
    adr.sin_addr.s_addr = INADDR_ANY;

    printf("Slucham na %s:%d\n", inet_ntoa(adr.sin_addr), ntohs(adr.sin_port));

    if (bind(gniazdo, (struct sockaddr*) &adr, sizeof(adr)) < 0) { //bind
        printf("Bind nie powiodl sie.\n");
        return 1;
    }
    if (listen(gniazdo, 10) < 0) { //listen
        printf("Listen nie powiodl sie.\n");
        return 1; 
    }
    printf("Czekam na polaczenie ...\n");
    while ((gniazdo2 = accept(gniazdo, (struct sockaddr*) &nadawca, &dl)) > 0) { //odbieranie
        memset(bufor, 0, 1024);
        recv(gniazdo2, bufor, 1024, 0);
        printf("Wiadomosc od %s: %s\n", inet_ntoa(nadawca.sin_addr), bufor);
        close(gniazdo2);
    }
  
	/*
    
    struct sockaddr_in adr_bind;
    struct sockaddr_in adr_accept;
    int socket_bind, socket_accept;
    char msg[1024];
    pid_t child_id;
    int socket_client[5];
    socket_client client;
    fd_set Clients;
    struct sockaddr_in nadawca;
    socklen_t dl = sizeof(struct sockaddr_in);
    
    int i;
    int j;
    
  	for(i = 0; i < 4; i++)
  	{
    	clients[i].socket = 0;
 	}
    
    
    socket_bind = socket(AF_INET, SOCK_STREAM, 0);
    if(socket_bind < 0) {
    	printf("Error: Socket\n");
        return 1;
    }
    
    adr_bind.sin_family = AF_INET;
    adr_bind.sin_port = htons(44444);
    adr_bind.sin_addr.s_addr = INADDR_ANY;
    
    if (bind(socket_bind, (struct sockaddr*) &adr_bind, sizeof(adr_bind)) < 0) { //bind
        printf("Error: Bind\n");
        return 1;
    }
    if (listen(socket_bind, 10) < 0) { //listen
        printf("Error: Listen\n");
        return 1; 
    }
    //printf("Czekam na polaczenie ...\n");
    
    while (1) {
    	
    	max_fd = 0;
    	FD_ZERO(Clients);
        FD_SET(socket_bind, Clients);
        
        for(i =0; i<4; i++){

            if (client[i].socket > 0) {
            	FD_SET(client[i].socket, Clients);
                if(client[i].socket > max_fd) {
                	max_fd = client[i].socket;
                }
            }
        }
        
        if(select(max_fd+1, &Clients, NULL, NULL, NULL) < 0) {
        	ERROR
        }
        
        if(FD_ISSET(socket_bind, &Clients)) {
        	for(i=0;i<4;i++){
        		if (client[i].socket == 0){
            		client[i].socket = accept(socket_bind, (struct sockaddr*) &adr_bind, &dl));
                	break;
           	 	} else {
                	printf("Server Pełen");
            	}
        	}
        }
        
        for(i = 0; i < 4; i++)
      	{
      		if(client[i].socket > 0 && FD_ISSET(clients[i].socket, &Clients))
      		{
        		recv(clients[i].socket, &msg, 1024, 0);
                if (msg == "EXIT") {
                
                } else if (msg == "DOWNLOAD") {
                
                } else if (msg == "SEND"){
                
                } else {
                	for(j=0;j<4;j++) {
                    	if(i != j && client[j].socket != 0) {
                        	send(client[i].socket, &msg, 1024, 0);
                        }
                    }
                }
                
      		}
    	}
        
        
    }
    */
  
  
  
  
  
  
  
  
  
  	//Połączenie z wieloma Klientami
  /*
  struct sockaddr_in adr_serv;
  int gt, port;
  
  printf("Numer portu: ");
  scanf("%d", &port);
  
  gt = socket(PF_INET, SOCK_STREAM, 0);
  
  adr_serv.sin_family = AF_INET;
  adr_serv.sin_port = htons(port);
  adr_serv.sin_addr.s_addr = INADDR_ANY;
  
  if (bind(gt,(struct sockaddr*) &adr_serv,
           sizeof(struct sockaddr_in)) < 0)
  {
    printf("Bind nie powiodl sie.\n");
    return 1;
  }


	if (listen(gt, 10) < 0)
  {
    printf("Listen nie powiodl sie.\n");
    return 1;
  }

  
  ObsluzObaProtokoly(gt, &adr_serv);
  							  fd_set readfds;
                              struct timeval timeout;
                              unsigned long proba;
                              proba = 0;

                              while(1)
                              {
                                FD_ZERO(&readfds);
                                FD_SET(gniazdoTCP, &readfds);
                                timeout.tv_sec = 1;
                                timeout.tv_usec = 0;
                                if (select(gniazdoTCP+1, &readfds, NULL, NULL, &timeout) > 0)
                                {
                                  proba = 0;
                                  if (FD_ISSET(gniazdoTCP, &readfds))
                                    ObsluzTCP(gniazdoTCP, adres);
            																		int nowe_gniazdo;
                                                                                    char bufor[1024];
                                                                                    socklen_t dladr = sizeof(struct sockaddr_in);
                                                                                    nowe_gniazdo = 
                                                                                      accept(gniazdo, (struct sockaddr*) adres, 
                                                                                        &dladr);
                                                                                    if (nowe_gniazdo < 0)
                                                                                    {
                                                                                      printf("Bledne polaczenie (accept < 0)\n");
                                                                                      return;
                                                                                    }
                                                                                    memset(bufor, 0, 1024);
                                                                                    while (recv(nowe_gniazdo, bufor, 1024, 0) <= 0);
                                                                                    DrukujNadawce(adres);
                                                                                    printf("[TCP]: %s\n", bufor);
                                                                                    close(nowe_gniazdo);
                                }
                                else
                                {
                                  proba++;
                                  printf("Czekam %lu sekund i nic ...\n", proba);
                                }
                              }
  
  return 0;
  */
    //Polączenie z wieloma klientami
    
  
    close(gniazdo); 
    return 0; 
}