#define _POSIX_SOURCE
#include <sys/types.h>
#include <unistd.h>
#include <stdlib.h>
#include <stdio.h>
#include <signal.h>
#include <wait.h>

#define NUM_HIJOS 5//El numero de hijos debe ser tantos como numero de parametros haya
#define NOMBREHIJO "hijo"

void FinalizarProcesos();

void Manejador(int num);
pid_t pids[NUM_HIJOS];

int main(int argc, char *argv[]){
	int i, j;
	int pid;
	/*Tratamiento de la linea de ordenes*/
	if(argc != 2){
		printf(stderr, "Error en el numero de argumentos\n");
		exit(EXIT_FAILURE);
	}
	/*Tratamiento de la señal*/
	if(signal(SIGINT, Manejador)== SIG_ERR){
		fprintf(stderr, "Error en la manipulacion de la señal\n");
		exit(EXIT_FAILURE);
	}
	/*Creacion de los procesos hijos*/
	for(i=0; i<NUM_HIJOS; i++){
		switch(pids[i]=fork()){ //Se guarda el pid en la tabla de procesos
		case -1:
			fprintf(stderr, "Error en la creacion del proceso hijo\n");
			FinalizarProcesos();
			break;
		case 0:
			if(execl(NOMBREHIJO, NOMBREHIJO, argv[1], NULL) == -1){
				fprintf(stderr, "Error en la ejecucioon del proceso hijo\n");
				exit(EXIT_FAILURE);
			}
			break;
		}

	}
	/*Espera a la finalizacion de los procesos hijos*/
	for(i=0; i<NUM_HIJOS; i++){
		pid=wait(NULL);
		for(j=0;j<NUM_HIJOS; j++){
			if(pid==pids[j]){
				printf("[Preoceso padre] el proceso %d ha terminado\n", pid);
				pids[j]=0; //0 para indicar que no existe el proceso
			}
		}
	}
	printf("[Proceso padre] finaliza\n");
	return EXIT_SUCCESS;
}

/*FinalizarProcesos: Termina todos los procesos hijos vivos*/
void FinalizarProcesos(void){
	int i;
	
	for(i=0; i<NUM_HIJOS; i++){
		if(pids[i] != 0){ //Solo se mata a los procesos hijos vivos
			if(kill(pids[i], SIGINT) == -1){
				fprintf(stderr, "Error al enviar una señal\n");
			}
		}
	}
}

/*Manejador: Manejador de señal*/
void Manejador(int num){
	FinalizarProcesos();
	printf("[Proceso padre] finaliza\n");
	exit(EXIR_SUCCESS);
}