--- rpl/src/daemon.c	2011/09/14 17:55:59	1.32
+++ rpl/src/daemon.c	2019/10/31 15:40:02	1.76
@@ -1,7 +1,7 @@
 /*
 ================================================================================
-  RPL/2 (R) version 4.1.3
-  Copyright (C) 1989-2011 Dr. BERTRAND Joël
+  RPL/2 (R) version 4.1.32
+  Copyright (C) 1989-2019 Dr. BERTRAND Joël
 
   This file is part of RPL/2.
 
@@ -61,16 +61,6 @@ lancement_daemon(struct_processus *s_eta
 
 	pid = fork();
 
-#	ifdef OS2
-	if (pid == 0)
-	{
-		sem_init(&semaphore_liste_threads, 0, 1);
-		sem_init(&semaphore_gestionnaires_signaux, 0, 0);
-		sem_init(&semaphore_gestionnaires_signaux_atomique, 0, 1);
-		sem_init(&((*s_etat_processus).semaphore_fork), 0, 0);
-	}
-#	endif
-
 	if (pid < 0)
 	{
 		(*s_etat_processus).erreur_systeme = d_es_processus;
@@ -80,6 +70,20 @@ lancement_daemon(struct_processus *s_eta
 	if (pid > 0)
 	{
 		// Fin du processus père.
+
+		// À noter : dans le cas où l'on utilise l'émulation des
+		// sémaphores anonymes POSIX ou la sémantique SysV, il faut
+		// détruire les sémaphores et les recréer dans le processus fils.
+
+#		ifndef SEMAPHORES_NOMMES
+		sem_post(&((*s_etat_processus).semaphore_fork));
+		sem_destroy(&((*s_etat_processus).semaphore_fork));
+#		else
+		sem_post((*s_etat_processus).semaphore_fork);
+		sem_destroy3((*s_etat_processus).semaphore_fork, getpid(),
+				pthread_self(), SEM_FORK);
+#		endif
+
 		destruction_queue_signaux(s_etat_processus);
 		_exit(EXIT_SUCCESS);
 	}
@@ -98,9 +102,12 @@ lancement_daemon(struct_processus *s_eta
 		return;
 	}
 
+#	pragma GCC diagnostic push
+#	pragma GCC diagnostic ignored "-Wunused-result"
 	freopen("/dev/null", "r", stdin);
 	freopen("/dev/null", "w", stdout);
 	freopen("/dev/null", "w", stderr);
+#	pragma GCC diagnostic pop
 
 	/*
 	 * Second fork pour ne plus être un session leader.
@@ -109,16 +116,6 @@ lancement_daemon(struct_processus *s_eta
 	fflush(NULL);
 	pid = fork();
 
-#	ifdef OS2
-	if (pid == 0)
-	{
-		sem_init(&semaphore_liste_threads, 0, 1);
-		sem_init(&semaphore_gestionnaires_signaux, 0, 0);
-		sem_init(&semaphore_gestionnaires_signaux_atomique, 0, 1);
-		sem_init(&((*s_etat_processus).semaphore_fork), 0, 0);
-	}
-#	endif
-
 	if (pid < 0)
 	{
 		(*s_etat_processus).erreur_systeme = d_es_processus;
@@ -132,6 +129,7 @@ lancement_daemon(struct_processus *s_eta
 	}
 
 	(*s_etat_processus).pid_processus_pere = getpid();
+	liberation_queue_signaux(s_etat_processus);
 	creation_queue_signaux(s_etat_processus);
 	modification_pid_thread_pere(s_etat_processus);