// Verwaltermodul für Soft/AI4 im SS02 vom ÜBlatt 4
// erzeugt ne Menge Neuronen aus der Vorgabe des Benutzers. Die erfolgt
// via Stdin ...
#include <stdio.h>
#include <stdlib.h>
#include <signal.h>
#include <unistd.h>
#include <sys/types.h>
#include <sys/wait.h>
#include <errno.h>

#define MAXNR 100			// max. Anzahl Neuronen

char * filename = "network";		// Name der erzeugten KonfigDatei

int map[MAXNR];				// PIDs der Neuronen
volatile int count = 0;

// Terminierungsfunktion des Verwalters: schickt jedem Neuron 
// das SIGTERM, bevor er selbst stirbt

void do_term ()
{
	int i;
	unlink ("network");		// KonfigDatei noch loeschen
	for (i=0; i<MAXNR; ++i) {
		if (map[i])
			kill (map[i], SIGTERM);
	}
}

// Parent=Verwalter liest den Aufbau des Netzes von Stdin

int main ()
{
	char line[100];
	struct sigaction act;
	FILE * file;
	int i;

	for (i=0; i<MAXNR; ++i) {		// init. des PID-Vektors
		map[i] = 0;
	}
	act.sa_flags = 0;
	sigemptyset (&act.sa_mask);
	act.sa_handler = do_term;		// Terminierungsproz. einhaengen
						// die schickt den Neuronen
	/* Kill -15 */				// SIGTERM zum Aufhoeren
	if (sigaction (SIGTERM, &act, NULL) < 0) {
		perror ("sigaction");
		exit (1);
	}
	/* Ctrl-C */
	if (sigaction (SIGINT, &act, NULL) < 0) {
		perror ("sigaction");
		exit (1);
	}
	file = fopen (filename, "w");		// NeuronenKonfigFile erzeugen
	if (file == NULL) {
		perror ("open");
		exit (1);
	}
	while (1) {				// bis ich abgeschossen werde ..
		int nr;
		fgets (line, 100, stdin);	// Stdin = Konfig vom User
		if (feof (stdin))		// Ende der Eingabe verlaesst...
			break;			// mit break die while-Schleife
		fprintf (file, "%s", line);	// kopieren in NeuronenKonfig
		if (sscanf (line, "%d", &nr) != 1) {
			do_term ();		// Syntaxfehler!
			exit (1);
		}
		if (map[nr] == 0) {		// nextes Neuron erzeugen
			map[nr] = fork ();	// PID des Neurons merken
			if (map[nr] < 0) {	// FEHLER fork
				perror ("fork");
				map[nr] = 0;
				do_term ();
				exit (1);
			}
			if (map[nr] == 0) {  /* Child */
				char str[20];	// Neuron starten
				sprintf (str, "%d", nr);
				execl ("./neuron", "neuron", filename, str, NULL);
				perror ("execl");
				exit (1);
			} else {	     /* Parent */
				count++;
			}
		}
	}
	for (i=0; i<MAXNR; ++i) {		// PIDs der Neuronen in die
		if (map[i] == 0)		// Konfigdatei eintragen
			continue;
		fprintf (file, "map %d %d\n", i, map[i]);
	}
	fclose (file);
	/* Ein bischen warten, damit auch sicher alle Neuronen die
	 * Gelegenheit hatten einen Signalhandler fuer SIGUSR1 zu
	 * installieren. Danke an Sebastian Singer.
	 */
	sleep (1);
	for (i=0; i<MAXNR; ++i) {		// Startsignal an Neuronen ...
		if (map[i])			// ... abschicken
			kill (map[i], SIGUSR1);
	}
	while ((wait (NULL) > 0) || (errno != ECHILD)); // Vater schlafen legen
	return 0;
}