|
version 1.107, 2012/01/05 10:19:05
|
version 1.139, 2013/03/27 09:14:51
|
|
Line 1
|
Line 1
|
| /* |
/* |
| ================================================================================ |
================================================================================ |
| RPL/2 (R) version 4.1.5 |
RPL/2 (R) version 4.1.13 |
| Copyright (C) 1989-2012 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
| |
|
| This file is part of RPL/2. |
This file is part of RPL/2. |
| |
|
|
Line 51 rplinit(int argc, char *argv[], char *en
|
Line 51 rplinit(int argc, char *argv[], char *en
|
| int erreur_historique; |
int erreur_historique; |
| int option_P; |
int option_P; |
| |
|
| |
integer8 i; |
| |
|
| logical1 core; |
logical1 core; |
| logical1 debug; |
logical1 debug; |
| logical1 erreur_fichier; |
logical1 erreur_fichier; |
|
Line 80 rplinit(int argc, char *argv[], char *en
|
Line 82 rplinit(int argc, char *argv[], char *en
|
| |
|
| struct_processus *s_etat_processus; |
struct_processus *s_etat_processus; |
| |
|
| struct_table_variables_partagees s_variables_partagees; |
struct_liste_variables_partagees *l_element_partage_courant; |
| |
struct_liste_variables_partagees *l_element_partage_suivant; |
| |
|
| |
struct_liste_variables_statiques *l_element_statique_courant; |
| |
struct_liste_variables_statiques *l_element_statique_suivant; |
| |
|
| |
struct_arbre_variables_partagees *s_arbre_variables_partagees; |
| |
struct_liste_variables_partagees *l_liste_variables_partagees; |
| |
|
| struct sigaction action; |
struct sigaction action; |
| struct sigaction registre; |
struct sigaction registre; |
|
Line 99 rplinit(int argc, char *argv[], char *en
|
Line 108 rplinit(int argc, char *argv[], char *en
|
| unsigned char *ptr; |
unsigned char *ptr; |
| unsigned char *tampon; |
unsigned char *tampon; |
| |
|
| unsigned long i; |
|
| unsigned long unite_fichier; |
unsigned long unite_fichier; |
| |
|
| void *l_element_courant; |
void *l_element_courant; |
|
Line 151 rplinit(int argc, char *argv[], char *en
|
Line 159 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((s_etat_processus = malloc(sizeof(struct_processus))) == NULL) |
if ((s_etat_processus = malloc(sizeof(struct_processus))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
# else |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), SEM_SIGNAUX); |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((langue = getenv("LANG")) != NULL) |
if ((langue = getenv("LANG")) != NULL) |
|
Line 184 rplinit(int argc, char *argv[], char *en
|
Line 200 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (getcwd(repertoire_initial, RPL_PATH_MAX) == NULL) |
if (getcwd(repertoire_initial, RPL_PATH_MAX) == NULL) |
| { |
{ |
| if ((langue = getenv("LANG")) != NULL) |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
# else |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), SEM_SIGNAUX); |
| |
# endif |
| |
|
| |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| if (strncmp(langue, "fr", 2) == 0) |
uprintf("+++Système : Mémoire insuffisante\n"); |
| { |
|
| uprintf("+++Système : Mémoire insuffisante\n"); |
|
| } |
|
| else |
|
| { |
|
| uprintf("+++System : Not enough memory\n"); |
|
| } |
|
| } |
} |
| else |
else |
| { |
{ |
|
Line 203 rplinit(int argc, char *argv[], char *en
|
Line 220 rplinit(int argc, char *argv[], char *en
|
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| |
|
| if ((arg_exec = malloc((argc + 1) * sizeof(char *))) == NULL) |
if ((arg_exec = malloc((((size_t) argc) + 1) * sizeof(char *))) == NULL) |
| { |
{ |
| if ((langue = getenv("LANG")) != NULL) |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
# else |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), SEM_SIGNAUX); |
| |
# endif |
| |
|
| |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| if (strncmp(langue, "fr", 2) == 0) |
uprintf("+++Système : Mémoire insuffisante\n"); |
| { |
|
| uprintf("+++Système : Mémoire insuffisante\n"); |
|
| } |
|
| else |
|
| { |
|
| uprintf("+++System : Not enough memory\n"); |
|
| } |
|
| } |
} |
| else |
else |
| { |
{ |
|
Line 224 rplinit(int argc, char *argv[], char *en
|
Line 242 rplinit(int argc, char *argv[], char *en
|
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| |
|
| for(i = 0; i < (unsigned long) argc; i++) |
for(i = 0; i < argc; i++) |
| { |
{ |
| arg_exec[i] = argv[i]; |
arg_exec[i] = argv[i]; |
| } |
} |
|
Line 251 rplinit(int argc, char *argv[], char *en
|
Line 269 rplinit(int argc, char *argv[], char *en
|
| &attributs_mutex); |
&attributs_mutex); |
| pthread_mutexattr_destroy(&attributs_mutex); |
pthread_mutexattr_destroy(&attributs_mutex); |
| |
|
| |
pthread_mutexattr_init(&attributs_mutex); |
| |
pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_RECURSIVE); |
| |
pthread_mutex_init(&mutex_sections_critiques, &attributs_mutex); |
| |
pthread_mutexattr_destroy(&attributs_mutex); |
| |
|
| |
pthread_mutexattr_init(&attributs_mutex); |
| |
pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_RECURSIVE); |
| |
pthread_mutex_init(&mutex_liste_variables_partagees, &attributs_mutex); |
| |
pthread_mutexattr_destroy(&attributs_mutex); |
| |
|
| # ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
| sem_init(&((*s_etat_processus).semaphore_fork), 0, 0); |
sem_init(&((*s_etat_processus).semaphore_fork), 0, 0); |
| # else |
# else |
| if (((*s_etat_processus).semaphore_fork = sem_init3(0, getpid(), |
if (((*s_etat_processus).semaphore_fork = sem_init3(0, getpid(), |
| pthread_self(), SEM_FORK)) == SEM_FAILED) |
pthread_self(), SEM_FORK)) == SEM_FAILED) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
# else |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
# endif |
| |
|
| |
liberation(contexte_cas(s_etat_processus); |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| uprintf("+++Système : Mémoire insuffisante\n"); |
uprintf("+++Système : Mémoire insuffisante\n"); |
|
Line 276 rplinit(int argc, char *argv[], char *en
|
Line 315 rplinit(int argc, char *argv[], char *en
|
| &attributs_mutex); |
&attributs_mutex); |
| pthread_mutexattr_destroy(&attributs_mutex); |
pthread_mutexattr_destroy(&attributs_mutex); |
| |
|
| (*s_etat_processus).s_liste_variables_partagees = &s_variables_partagees; |
|
| |
|
| s_variables_partagees.nombre_variables = 0; |
|
| s_variables_partagees.nombre_variables_allouees = 0; |
|
| s_variables_partagees.table = NULL; |
|
| |
|
| pthread_mutexattr_init(&attributs_mutex); |
|
| pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_NORMAL); |
|
| pthread_mutex_init(&((*((*s_etat_processus).s_liste_variables_partagees)) |
|
| .mutex), &attributs_mutex); |
|
| pthread_mutexattr_destroy(&attributs_mutex); |
|
| |
|
| (*s_etat_processus).chemin_fichiers_temporaires = |
(*s_etat_processus).chemin_fichiers_temporaires = |
| recherche_chemin_fichiers_temporaires(s_etat_processus); |
recherche_chemin_fichiers_temporaires(s_etat_processus); |
| |
|
| insertion_thread(s_etat_processus, d_vrai); |
insertion_thread(s_etat_processus, d_vrai); |
| creation_queue_signaux(s_etat_processus); |
creation_queue_signaux(s_etat_processus); |
| |
|
| # ifndef OS2 |
|
| localisation_courante(s_etat_processus); |
|
| # else |
|
| if ((*s_etat_processus).erreur_systeme != d_es) |
if ((*s_etat_processus).erreur_systeme != d_es) |
| { |
{ |
| if (((*s_etat_processus).localisation = malloc((strlen(d_locale) + 1) * |
# ifndef SEMAPHORES_NOMMES |
| sizeof(unsigned char))) == NULL) |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
|
| |
if ((*s_etat_processus).langue == 'F') |
| |
{ |
| |
uprintf("+++Système : Mémoire insuffisante\n"); |
| |
} |
| |
else |
| |
{ |
| |
uprintf("+++System : Not enough memory\n"); |
| |
} |
| |
|
| |
return(EXIT_FAILURE); |
| |
} |
| |
|
| |
if (d_forced_locale == 0) |
| |
{ |
| |
localisation_courante(s_etat_processus); |
| |
} |
| |
else |
| |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
if (((*s_etat_processus).localisation = malloc((strlen(d_locale) |
| |
+ 1) * sizeof(unsigned char))) == NULL) |
| { |
{ |
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
|
Line 316 rplinit(int argc, char *argv[], char *en
|
Line 391 rplinit(int argc, char *argv[], char *en
|
| |
|
| strcpy((*s_etat_processus).localisation, d_locale); |
strcpy((*s_etat_processus).localisation, d_locale); |
| } |
} |
| # endif |
|
| |
|
| (*s_etat_processus).erreur_systeme = d_es; |
(*s_etat_processus).erreur_systeme = d_es; |
| |
|
|
Line 325 rplinit(int argc, char *argv[], char *en
|
Line 399 rplinit(int argc, char *argv[], char *en
|
| if (((*s_etat_processus).localisation = malloc((strlen(d_locale) + 1) * |
if (((*s_etat_processus).localisation = malloc((strlen(d_locale) + 1) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| uprintf("+++Système : Mémoire insuffisante\n"); |
uprintf("+++Système : Mémoire insuffisante\n"); |
|
Line 345 rplinit(int argc, char *argv[], char *en
|
Line 436 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Copyright (C) 1989 à 2011, 2012 BERTRAND Joël\n"); |
printf("+++Copyright (C) 1989 à 2012, 2013 BERTRAND Joël\n"); |
| } |
} |
| else |
else |
| { |
{ |
| printf("+++Copyright (C) 1989 to 2011, 2012 BERTRAND Joel\n"); |
printf("+++Copyright (C) 1989 to 2012, 2013 BERTRAND Joel\n"); |
| } |
} |
| |
|
| if (getenv("HOME") != NULL) |
if (getenv("HOME") != NULL) |
|
Line 378 rplinit(int argc, char *argv[], char *en
|
Line 469 rplinit(int argc, char *argv[], char *en
|
| if (stackoverflow_install_handler(interruption_depassement_pile, |
if (stackoverflow_install_handler(interruption_depassement_pile, |
| pile_signaux, sizeof(pile_signaux)) != 0) |
pile_signaux, sizeof(pile_signaux)) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 406 rplinit(int argc, char *argv[], char *en
|
Line 514 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| # endif |
# endif |
| |
|
| |
if (lancement_thread_signaux(s_etat_processus) != d_absence_erreur) |
| |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
erreur = d_es_signal; |
| |
|
| |
if ((*s_etat_processus).langue == 'F') |
| |
{ |
| |
printf("+++Système : Initialisation des signaux POSIX " |
| |
"impossible\n"); |
| |
} |
| |
else |
| |
{ |
| |
printf("+++System : Initialization of POSIX signals failed\n"); |
| |
} |
| |
|
| |
return(EXIT_FAILURE); |
| |
} |
| |
|
| action.sa_handler = interruption1; |
action.sa_handler = interruption1; |
| action.sa_flags = 0; |
action.sa_flags = 0; |
| |
|
| if (sigaction(SIGINT, &action, NULL) != 0) |
if (sigaction(SIGINT, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 427 rplinit(int argc, char *argv[], char *en
|
Line 594 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGINT); |
raise(SIGINT); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGINT) |
if (signal_test != SIGINT) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 448 rplinit(int argc, char *argv[], char *en
|
Line 644 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGTERM, &action, NULL) != 0) |
if (sigaction(SIGTERM, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 464 rplinit(int argc, char *argv[], char *en
|
Line 681 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGTERM); |
raise(SIGTERM); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGTERM) |
if (signal_test != SIGTERM) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 485 rplinit(int argc, char *argv[], char *en
|
Line 731 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGALRM, &action, NULL) != 0) |
if (sigaction(SIGALRM, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 501 rplinit(int argc, char *argv[], char *en
|
Line 768 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGALRM); |
raise(SIGALRM); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGALRM) |
if (signal_test != SIGALRM) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 525 rplinit(int argc, char *argv[], char *en
|
Line 821 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGTSTP, &action, NULL) != 0) |
if (sigaction(SIGTSTP, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Initialisation des signaux POSIX " |
printf("+++Système : Initialisation des signaux POSIX " |
|
Line 539 rplinit(int argc, char *argv[], char *en
|
Line 856 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGTSTP); |
raise(SIGTSTP); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGTSTP) |
if (signal_test != SIGTSTP) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 563 rplinit(int argc, char *argv[], char *en
|
Line 909 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGPIPE, &action, NULL) != 0) |
if (sigaction(SIGPIPE, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 579 rplinit(int argc, char *argv[], char *en
|
Line 946 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGPIPE); |
raise(SIGPIPE); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGPIPE) |
if (signal_test != SIGPIPE) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 603 rplinit(int argc, char *argv[], char *en
|
Line 999 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGUSR1, &action, NULL) != 0) |
if (sigaction(SIGUSR1, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 619 rplinit(int argc, char *argv[], char *en
|
Line 1036 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGUSR1); |
raise(SIGUSR1); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGUSR1) |
if (signal_test != SIGUSR1) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, getpid(), |
| |
SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 707 rplinit(int argc, char *argv[], char *en
|
Line 1153 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_a == d_vrai) |
if (option_a == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -a présente " |
printf("+++Erreur : option -a présente " |
|
Line 729 rplinit(int argc, char *argv[], char *en
|
Line 1197 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_A == d_vrai) |
if (option_A == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -A présente " |
printf("+++Erreur : option -A présente " |
|
Line 753 rplinit(int argc, char *argv[], char *en
|
Line 1243 rplinit(int argc, char *argv[], char *en
|
| if ((arguments = malloc((strlen(argv[0]) + 7) * |
if ((arguments = malloc((strlen(argv[0]) + 7) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 789 rplinit(int argc, char *argv[], char *en
|
Line 1306 rplinit(int argc, char *argv[], char *en
|
| if ((arguments = malloc((strlen(argv[0]) + 7) * |
if ((arguments = malloc((strlen(argv[0]) + 7) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 820 rplinit(int argc, char *argv[], char *en
|
Line 1364 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else |
else |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Aucune donnée " |
printf("+++Erreur : Aucune donnée " |
|
Line 841 rplinit(int argc, char *argv[], char *en
|
Line 1407 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_c == d_vrai) |
if (option_c == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -c présente " |
printf("+++Erreur : option -c présente " |
|
Line 864 rplinit(int argc, char *argv[], char *en
|
Line 1452 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_d == d_vrai) |
if (option_d == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -d présente " |
printf("+++Erreur : option -d présente " |
|
Line 887 rplinit(int argc, char *argv[], char *en
|
Line 1497 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_D == d_vrai) |
if (option_D == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -D présente " |
printf("+++Erreur : option -D présente " |
|
Line 909 rplinit(int argc, char *argv[], char *en
|
Line 1541 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_h == d_vrai) |
if (option_h == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -h présente " |
printf("+++Erreur : option -h présente " |
|
Line 932 rplinit(int argc, char *argv[], char *en
|
Line 1586 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_i == d_vrai) |
if (option_i == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -i présente " |
printf("+++Erreur : option -i présente " |
|
Line 947 rplinit(int argc, char *argv[], char *en
|
Line 1623 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else if (option_S == d_vrai) |
else if (option_S == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : options -i et -S " |
printf("+++Erreur : options -i et -S " |
|
Line 962 rplinit(int argc, char *argv[], char *en
|
Line 1660 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else if (option_p == d_vrai) |
else if (option_p == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : options -i et -p " |
printf("+++Erreur : options -i et -p " |
|
Line 986 rplinit(int argc, char *argv[], char *en
|
Line 1706 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_l == d_vrai) |
if (option_l == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -l présente " |
printf("+++Erreur : option -l présente " |
|
Line 1018 rplinit(int argc, char *argv[], char *en
|
Line 1760 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_n == d_vrai) |
if (option_n == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -n présente " |
printf("+++Erreur : option -n présente " |
|
Line 1041 rplinit(int argc, char *argv[], char *en
|
Line 1805 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_p == d_vrai) |
if (option_p == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -p présente " |
printf("+++Erreur : option -p présente " |
|
Line 1056 rplinit(int argc, char *argv[], char *en
|
Line 1842 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else if (option_i == d_vrai) |
else if (option_i == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : options -i et -p " |
printf("+++Erreur : options -i et -p " |
|
Line 1079 rplinit(int argc, char *argv[], char *en
|
Line 1887 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_P > 2) |
if (option_P > 2) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -P présente " |
printf("+++Erreur : option -P présente " |
|
Line 1102 rplinit(int argc, char *argv[], char *en
|
Line 1932 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_s == d_vrai) |
if (option_s == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -s présente " |
printf("+++Erreur : option -s présente " |
|
Line 1125 rplinit(int argc, char *argv[], char *en
|
Line 1977 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_S == d_vrai) |
if (option_S == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -S présente " |
printf("+++Erreur : option -S présente " |
|
Line 1140 rplinit(int argc, char *argv[], char *en
|
Line 2014 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else if (option_i == d_vrai) |
else if (option_i == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : options -i et -S " |
printf("+++Erreur : options -i et -S " |
|
Line 1165 rplinit(int argc, char *argv[], char *en
|
Line 2061 rplinit(int argc, char *argv[], char *en
|
| malloc((strlen(argv[0]) + 1) * |
malloc((strlen(argv[0]) + 1) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 1199 rplinit(int argc, char *argv[], char *en
|
Line 2122 rplinit(int argc, char *argv[], char *en
|
| malloc((strlen(argv[0]) + 1) * |
malloc((strlen(argv[0]) + 1) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 1227 rplinit(int argc, char *argv[], char *en
|
Line 2177 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else |
else |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Aucun script " |
printf("+++Erreur : Aucun script " |
|
Line 1245 rplinit(int argc, char *argv[], char *en
|
Line 2217 rplinit(int argc, char *argv[], char *en
|
| compactage((*s_etat_processus) |
compactage((*s_etat_processus) |
| .definitions_chainees)) == NULL) |
.definitions_chainees)) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 1260 rplinit(int argc, char *argv[], char *en
|
Line 2254 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| (*s_etat_processus).longueur_definitions_chainees = |
(*s_etat_processus).longueur_definitions_chainees = |
| strlen((*s_etat_processus) |
(integer8) strlen((*s_etat_processus) |
| .definitions_chainees); |
.definitions_chainees); |
| |
|
| break; |
break; |
|
Line 1270 rplinit(int argc, char *argv[], char *en
|
Line 2264 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_t == d_vrai) |
if (option_t == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -t présente " |
printf("+++Erreur : option -t présente " |
|
Line 1295 rplinit(int argc, char *argv[], char *en
|
Line 2311 rplinit(int argc, char *argv[], char *en
|
| if ((type_debug = malloc((strlen(argv[0]) + 1) * |
if ((type_debug = malloc((strlen(argv[0]) + 1) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 1329 rplinit(int argc, char *argv[], char *en
|
Line 2372 rplinit(int argc, char *argv[], char *en
|
| malloc((strlen(argv[0]) + 1) * |
malloc((strlen(argv[0]) + 1) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire " |
printf("+++Système : Mémoire " |
|
Line 1356 rplinit(int argc, char *argv[], char *en
|
Line 2426 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else |
else |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Aucun niveau " |
printf("+++Erreur : Aucun niveau " |
|
Line 1399 rplinit(int argc, char *argv[], char *en
|
Line 2491 rplinit(int argc, char *argv[], char *en
|
| |
|
| default: |
default: |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post( |
| |
semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas( |
| |
s_etat_processus); |
| |
liberation_queue_signaux( |
| |
s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Niveau " |
printf("+++Erreur : Niveau " |
|
Line 1422 rplinit(int argc, char *argv[], char *en
|
Line 2548 rplinit(int argc, char *argv[], char *en
|
| if (sscanf(type_debug, "%llX", |
if (sscanf(type_debug, "%llX", |
| &((*s_etat_processus).type_debug)) != 1) |
&((*s_etat_processus).type_debug)) != 1) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Niveau " |
printf("+++Erreur : Niveau " |
|
Line 1444 rplinit(int argc, char *argv[], char *en
|
Line 2592 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if (option_v == d_vrai) |
if (option_v == d_vrai) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : option -v présente " |
printf("+++Erreur : option -v présente " |
|
Line 1548 rplinit(int argc, char *argv[], char *en
|
Line 2718 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (debug == d_faux) |
if (debug == d_faux) |
| { |
{ |
| |
|
| # ifdef HAVE_SIGSEGV_RECOVERY |
# ifdef HAVE_SIGSEGV_RECOVERY |
| if (sigsegv_install_handler(interruption_violation_access) != 0) |
if (sigsegv_install_handler(interruption_violation_access) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 1573 rplinit(int argc, char *argv[], char *en
|
Line 2764 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGSEGV, &action, NULL) != 0) |
if (sigaction(SIGSEGV, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Initialisation des signaux POSIX " |
printf("+++Système : Initialisation des signaux POSIX " |
|
Line 1588 rplinit(int argc, char *argv[], char *en
|
Line 2801 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGSEGV); |
raise(SIGSEGV); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGSEGV) |
if (signal_test != SIGSEGV) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 1609 rplinit(int argc, char *argv[], char *en
|
Line 2852 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| # endif |
# endif |
| |
|
| |
action.sa_handler = interruption3; |
| |
action.sa_flags = 0; |
| |
|
| if (sigaction(SIGBUS, &action, NULL) != 0) |
if (sigaction(SIGBUS, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Initialisation des signaux POSIX " |
printf("+++Système : Initialisation des signaux POSIX " |
|
Line 1626 rplinit(int argc, char *argv[], char *en
|
Line 2901 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| signal_test = SIGTEST; |
signal_test = SIGTEST; |
| kill(getpid(), SIGBUS); |
raise(SIGBUS); |
| |
|
| |
attente.tv_sec = 0; |
| |
attente.tv_nsec = 1000000; |
| |
|
| |
for(i = 0; (i < 1000) && (signal_test == SIGTEST); i++) |
| |
{ |
| |
nanosleep(&attente, NULL); |
| |
} |
| |
|
| if (signal_test != SIGBUS) |
if (signal_test != SIGBUS) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_signal; |
erreur = d_es_signal; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 1655 rplinit(int argc, char *argv[], char *en
|
Line 2967 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (sigaction(SIGHUP, &action, NULL) != 0) |
if (sigaction(SIGHUP, &action, NULL) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Initialisation des signaux POSIX " |
printf("+++Système : Initialisation des signaux POSIX " |
|
Line 1697 rplinit(int argc, char *argv[], char *en
|
Line 3038 rplinit(int argc, char *argv[], char *en
|
| creation_nom_fichier(s_etat_processus, (*s_etat_processus) |
creation_nom_fichier(s_etat_processus, (*s_etat_processus) |
| .chemin_fichiers_temporaires)) == NULL) |
.chemin_fichiers_temporaires)) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Fichier indisponible\n"); |
printf("+++Système : Fichier indisponible\n"); |
|
Line 1712 rplinit(int argc, char *argv[], char *en
|
Line 3082 rplinit(int argc, char *argv[], char *en
|
| if ((f_source = fopen(nom_fichier_temporaire, "w")) |
if ((f_source = fopen(nom_fichier_temporaire, "w")) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Fichier introuvable\n"); |
printf("+++Système : Fichier introuvable\n"); |
|
Line 1726 rplinit(int argc, char *argv[], char *en
|
Line 3125 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (fprintf(f_source, "MODE_INTERACTIF\n") < 0) |
if (fprintf(f_source, "MODE_INTERACTIF\n") < 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Erreur d'écriture dans un fichier\n"); |
printf("+++Système : Erreur d'écriture dans un fichier\n"); |
|
Line 1741 rplinit(int argc, char *argv[], char *en
|
Line 3169 rplinit(int argc, char *argv[], char *en
|
| if (fprintf(f_source, |
if (fprintf(f_source, |
| "<< DO HALT UNTIL FALSE END >>\n") < 0) |
"<< DO HALT UNTIL FALSE END >>\n") < 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Erreur d'écriture dans un fichier\n"); |
printf("+++Système : Erreur d'écriture dans un fichier\n"); |
|
Line 1755 rplinit(int argc, char *argv[], char *en
|
Line 3212 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (fclose(f_source) != 0) |
if (fclose(f_source) != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Fichier indisponible\n"); |
printf("+++Système : Fichier indisponible\n"); |
|
Line 1792 rplinit(int argc, char *argv[], char *en
|
Line 3278 rplinit(int argc, char *argv[], char *en
|
| if (((existence == d_faux) || (erreur_fichier != d_absence_erreur)) && |
if (((existence == d_faux) || (erreur_fichier != d_absence_erreur)) && |
| (option_S == d_faux)) |
(option_S == d_faux)) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if (presence_definition == 'O') |
if (presence_definition == 'O') |
| { |
{ |
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 1824 rplinit(int argc, char *argv[], char *en
|
Line 3338 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((*s_etat_processus).chemin_fichiers_temporaires == NULL) |
if ((*s_etat_processus).chemin_fichiers_temporaires == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Chemin des fichiers temporaires nul\n"); |
printf("+++Système : Chemin des fichiers temporaires nul\n"); |
|
Line 1861 rplinit(int argc, char *argv[], char *en
|
Line 3403 rplinit(int argc, char *argv[], char *en
|
| gettimeofday(&((*s_etat_processus).horodatage_profilage), NULL); |
gettimeofday(&((*s_etat_processus).horodatage_profilage), NULL); |
| |
|
| (*s_etat_processus).liste_mutexes = NULL; |
(*s_etat_processus).liste_mutexes = NULL; |
| |
(*s_etat_processus).sections_critiques = 0; |
| |
|
| (*s_etat_processus).test_instruction = 'N'; |
(*s_etat_processus).test_instruction = 'N'; |
| (*s_etat_processus).nombre_arguments = 0; |
(*s_etat_processus).nombre_arguments = 0; |
|
Line 1894 rplinit(int argc, char *argv[], char *en
|
Line 3437 rplinit(int argc, char *argv[], char *en
|
| |
|
| (*s_etat_processus).s_arbre_variables = NULL; |
(*s_etat_processus).s_arbre_variables = NULL; |
| (*s_etat_processus).l_liste_variables_par_niveau = NULL; |
(*s_etat_processus).l_liste_variables_par_niveau = NULL; |
| |
(*s_etat_processus).l_liste_variables_statiques = NULL; |
| (*s_etat_processus).gel_liste_variables = d_faux; |
(*s_etat_processus).gel_liste_variables = d_faux; |
| |
s_arbre_variables_partagees = NULL; |
| |
l_liste_variables_partagees = NULL; |
| |
(*s_etat_processus).s_arbre_variables_partagees = |
| |
&s_arbre_variables_partagees; |
| |
(*s_etat_processus).l_liste_variables_partagees = |
| |
&l_liste_variables_partagees; |
| (*s_etat_processus).pointeur_variable_courante = NULL; |
(*s_etat_processus).pointeur_variable_courante = NULL; |
| (*s_etat_processus).s_liste_variables_statiques = NULL; |
(*s_etat_processus).pointeur_variable_statique_courante = NULL; |
| (*s_etat_processus).nombre_variables_statiques = 0; |
(*s_etat_processus).pointeur_variable_partagee_courante = NULL; |
| (*s_etat_processus).nombre_variables_statiques_allouees = 0; |
|
| (*s_etat_processus).niveau_courant = 0; |
(*s_etat_processus).niveau_courant = 0; |
| (*s_etat_processus).niveau_initial = 0; |
(*s_etat_processus).niveau_initial = 0; |
| (*s_etat_processus).creation_variables_statiques = d_faux; |
(*s_etat_processus).creation_variables_statiques = d_faux; |
| (*s_etat_processus).creation_variables_partagees = d_faux; |
(*s_etat_processus).creation_variables_partagees = d_faux; |
| (*s_etat_processus).position_variable_statique_courante = 0; |
|
| |
|
| (*s_etat_processus).s_bibliotheques = NULL; |
(*s_etat_processus).s_bibliotheques = NULL; |
| (*s_etat_processus).s_instructions_externes = NULL; |
(*s_etat_processus).s_instructions_externes = NULL; |
|
Line 2032 rplinit(int argc, char *argv[], char *en
|
Line 3580 rplinit(int argc, char *argv[], char *en
|
| (*s_etat_processus).arbre_instructions = NULL; |
(*s_etat_processus).arbre_instructions = NULL; |
| |
|
| (*s_etat_processus).tid_processus_pere = pthread_self(); |
(*s_etat_processus).tid_processus_pere = pthread_self(); |
| (*s_etat_processus).tid= pthread_self(); |
(*s_etat_processus).tid = pthread_self(); |
| (*s_etat_processus).pid_processus_pere = getpid(); |
(*s_etat_processus).pid_processus_pere = getpid(); |
| (*s_etat_processus).processus_detache = d_vrai; |
(*s_etat_processus).processus_detache = d_vrai; |
| (*s_etat_processus).var_volatile_processus_pere = -1; |
(*s_etat_processus).var_volatile_processus_pere = -1; |
|
Line 2056 rplinit(int argc, char *argv[], char *en
|
Line 3604 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((*s_etat_processus).erreur_systeme != d_es) |
if ((*s_etat_processus).erreur_systeme != d_es) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Système : Mémoire insuffisante\n"); |
printf("+++Système : Mémoire insuffisante\n"); |
|
Line 2071 rplinit(int argc, char *argv[], char *en
|
Line 3647 rplinit(int argc, char *argv[], char *en
|
| if (((*s_etat_processus).instruction_derniere_erreur = |
if (((*s_etat_processus).instruction_derniere_erreur = |
| malloc(sizeof(unsigned char))) == NULL) |
malloc(sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2100 rplinit(int argc, char *argv[], char *en
|
Line 3704 rplinit(int argc, char *argv[], char *en
|
| if (((*s_etat_processus).instruction_courante = (unsigned char *) |
if (((*s_etat_processus).instruction_courante = (unsigned char *) |
| malloc(sizeof(unsigned char))) == NULL) |
malloc(sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2129 rplinit(int argc, char *argv[], char *en
|
Line 3761 rplinit(int argc, char *argv[], char *en
|
| (*((*s_etat_processus).l_base_pile_systeme)) |
(*((*s_etat_processus).l_base_pile_systeme)) |
| .retour_definition = 'Y'; |
.retour_definition = 'Y'; |
| |
|
| (*s_etat_processus).indep = (struct_objet *) malloc( |
(*s_etat_processus).indep = allocation(s_etat_processus, NON); |
| sizeof(struct_objet)); |
(*s_etat_processus).depend = allocation(s_etat_processus, NON); |
| (*s_etat_processus).depend = (struct_objet *) malloc( |
|
| sizeof(struct_objet)); |
|
| (*s_etat_processus).parametres_courbes_de_niveau = |
(*s_etat_processus).parametres_courbes_de_niveau = |
| (struct_objet *) malloc(sizeof(struct_objet)); |
allocation(s_etat_processus, NON); |
| |
|
| if (((*s_etat_processus).indep != NULL) && |
if (((*s_etat_processus).indep != NULL) && |
| ((*s_etat_processus).depend != NULL) && |
((*s_etat_processus).depend != NULL) && |
|
Line 2164 rplinit(int argc, char *argv[], char *en
|
Line 3794 rplinit(int argc, char *argv[], char *en
|
| ((*((*s_etat_processus). |
((*((*s_etat_processus). |
| parametres_courbes_de_niveau)).objet == NULL)) |
parametres_courbes_de_niveau)).objet == NULL)) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2188 rplinit(int argc, char *argv[], char *en
|
Line 3846 rplinit(int argc, char *argv[], char *en
|
| (*((*s_etat_processus).depend)).objet)).nom == |
(*((*s_etat_processus).depend)).objet)).nom == |
| NULL)) |
NULL)) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2240 rplinit(int argc, char *argv[], char *en
|
Line 3926 rplinit(int argc, char *argv[], char *en
|
| .parametres_courbes_de_niveau)).objet)).donnee |
.parametres_courbes_de_niveau)).objet)).donnee |
| == NULL)) |
== NULL)) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2268 rplinit(int argc, char *argv[], char *en
|
Line 3982 rplinit(int argc, char *argv[], char *en
|
| .objet = malloc(10 * sizeof(unsigned char))) |
.objet = malloc(10 * sizeof(unsigned char))) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2328 rplinit(int argc, char *argv[], char *en
|
Line 4070 rplinit(int argc, char *argv[], char *en
|
| (*s_etat_processus).my2_lines = d_faux; |
(*s_etat_processus).my2_lines = d_faux; |
| (*s_etat_processus).mz2_lines = d_faux; |
(*s_etat_processus).mz2_lines = d_faux; |
| |
|
| if ((*s_etat_processus).erreur_systeme != d_es) |
|
| { |
|
| if ((*s_etat_processus).langue == 'F') |
|
| { |
|
| printf("+++Système : Mémoire insuffisante\n"); |
|
| } |
|
| else |
|
| { |
|
| printf("+++System : Not enough memory\n"); |
|
| } |
|
| |
|
| return(EXIT_FAILURE); |
|
| } |
|
| |
|
| (*s_etat_processus).mode_evaluation_expression = 'N'; |
(*s_etat_processus).mode_evaluation_expression = 'N'; |
| (*s_etat_processus).mode_execution_programme = 'Y'; |
(*s_etat_processus).mode_execution_programme = 'Y'; |
| |
|
|
Line 2350 rplinit(int argc, char *argv[], char *en
|
Line 4078 rplinit(int argc, char *argv[], char *en
|
| if ((erreur = chainage(s_etat_processus)) != |
if ((erreur = chainage(s_etat_processus)) != |
| d_absence_erreur) |
d_absence_erreur) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Fatal :" |
printf("+++Fatal :" |
|
Line 2381 rplinit(int argc, char *argv[], char *en
|
Line 4138 rplinit(int argc, char *argv[], char *en
|
| if ((erreur = compilation(s_etat_processus)) != |
if ((erreur = compilation(s_etat_processus)) != |
| d_absence_erreur) |
d_absence_erreur) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if (traitement_fichier_temporaire == 'Y') |
if (traitement_fichier_temporaire == 'Y') |
| { |
{ |
| if (destruction_fichier(nom_fichier_temporaire) |
if (destruction_fichier(nom_fichier_temporaire) |
|
Line 2440 rplinit(int argc, char *argv[], char *en
|
Line 4225 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((*s_etat_processus).s_arbre_variables == NULL) |
if ((*s_etat_processus).s_arbre_variables == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Fatal : Aucun point d'entrée\n"); |
printf("+++Fatal : Aucun point d'entrée\n"); |
|
Line 2460 rplinit(int argc, char *argv[], char *en
|
Line 4273 rplinit(int argc, char *argv[], char *en
|
| if (recherche_instruction_suivante(s_etat_processus) |
if (recherche_instruction_suivante(s_etat_processus) |
| == d_erreur) |
== d_erreur) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Fatal : Aucun point d'entrée\n"); |
printf("+++Fatal : Aucun point d'entrée\n"); |
|
Line 2481 rplinit(int argc, char *argv[], char *en
|
Line 4322 rplinit(int argc, char *argv[], char *en
|
| (*s_etat_processus) |
(*s_etat_processus) |
| .instruction_courante) == d_faux) |
.instruction_courante) == d_faux) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Fatal : Aucun point d'entrée\n"); |
printf("+++Fatal : Aucun point d'entrée\n"); |
|
Line 2501 rplinit(int argc, char *argv[], char *en
|
Line 4370 rplinit(int argc, char *argv[], char *en
|
| if ((*(*s_etat_processus).pointeur_variable_courante) |
if ((*(*s_etat_processus).pointeur_variable_courante) |
| .niveau != 0) |
.niveau != 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Fatal : Aucun point d'entrée\n"); |
printf("+++Fatal : Aucun point d'entrée\n"); |
|
Line 2526 rplinit(int argc, char *argv[], char *en
|
Line 4423 rplinit(int argc, char *argv[], char *en
|
| strlen(ds_fichier_historique) + 2) * |
strlen(ds_fichier_historique) + 2) * |
| sizeof(unsigned char))) == NULL) |
sizeof(unsigned char))) == NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2544 rplinit(int argc, char *argv[], char *en
|
Line 4469 rplinit(int argc, char *argv[], char *en
|
| home, ds_fichier_historique); |
home, ds_fichier_historique); |
| |
|
| using_history(); |
using_history(); |
| |
|
| |
// Pour pouvoir utiliser le keymap avant le premier |
| |
// appel à readline(). |
| |
rl_initialize(); |
| |
|
| erreur_historique = read_history( |
erreur_historique = read_history( |
| (*s_etat_processus).nom_fichier_historique); |
(*s_etat_processus).nom_fichier_historique); |
| |
|
|
Line 2553 rplinit(int argc, char *argv[], char *en
|
Line 4483 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| (*s_etat_processus).erreur_systeme = d_es; |
(*s_etat_processus).erreur_systeme = d_es; |
| encart(s_etat_processus, |
encart(s_etat_processus, |
| (unsigned long) (5 * 1000000)); |
(integer8) (5 * 1000000)); |
| |
|
| if ((*s_etat_processus).erreur_systeme != d_es) |
if ((*s_etat_processus).erreur_systeme != d_es) |
| { |
{ |
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2596 rplinit(int argc, char *argv[], char *en
|
Line 4560 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| if ((*s_etat_processus).erreur_systeme != d_es) |
if ((*s_etat_processus).erreur_systeme != d_es) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2613 rplinit(int argc, char *argv[], char *en
|
Line 4611 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| else |
else |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
| { |
{ |
| printf("+++Erreur : Erreur de " |
printf("+++Erreur : Erreur de " |
|
Line 2636 rplinit(int argc, char *argv[], char *en
|
Line 4668 rplinit(int argc, char *argv[], char *en
|
| |
|
| if ((*s_etat_processus).erreur_systeme != d_es) |
if ((*s_etat_processus).erreur_systeme != d_es) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
|
Line 2666 rplinit(int argc, char *argv[], char *en
|
Line 4727 rplinit(int argc, char *argv[], char *en
|
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2685 rplinit(int argc, char *argv[], char *en
|
Line 4780 rplinit(int argc, char *argv[], char *en
|
| printf("%s [%d]\n", message, (int) getpid()); |
printf("%s [%d]\n", message, (int) getpid()); |
| free(message); |
free(message); |
| |
|
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| |
|
|
Line 2695 rplinit(int argc, char *argv[], char *en
|
Line 4819 rplinit(int argc, char *argv[], char *en
|
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| |
erreur = d_es_allocation_memoire; |
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2714 rplinit(int argc, char *argv[], char *en
|
Line 4873 rplinit(int argc, char *argv[], char *en
|
| printf("%s [%d]\n", message, (int) getpid()); |
printf("%s [%d]\n", message, (int) getpid()); |
| free(message); |
free(message); |
| |
|
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus).semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus).semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2(semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus).semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| |
|
|
Line 2725 rplinit(int argc, char *argv[], char *en
|
Line 4913 rplinit(int argc, char *argv[], char *en
|
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post( |
| |
semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2745 rplinit(int argc, char *argv[], char *en
|
Line 4972 rplinit(int argc, char *argv[], char *en
|
| (int) getpid()); |
(int) getpid()); |
| free(message); |
free(message); |
| |
|
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| |
erreur = d_es_allocation_memoire; |
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| |
|
|
Line 2754 rplinit(int argc, char *argv[], char *en
|
Line 5016 rplinit(int argc, char *argv[], char *en
|
| if ((message = messages(s_etat_processus)) |
if ((message = messages(s_etat_processus)) |
| == NULL) |
== NULL) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post( |
| |
semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| erreur = d_es_allocation_memoire; |
erreur = d_es_allocation_memoire; |
| |
|
| if ((*s_etat_processus).langue == 'F') |
if ((*s_etat_processus).langue == 'F') |
|
Line 2774 rplinit(int argc, char *argv[], char *en
|
Line 5075 rplinit(int argc, char *argv[], char *en
|
| (int) getpid()); |
(int) getpid()); |
| free(message); |
free(message); |
| |
|
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post(&semaphore_gestionnaires_signaux); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post(semaphore_gestionnaires_signaux); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, |
| |
getpid(), pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
| } |
} |
| } |
} |
|
Line 2804 rplinit(int argc, char *argv[], char *en
|
Line 5139 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (erreur == d_absence_erreur) |
if (erreur == d_absence_erreur) |
| { |
{ |
| if (((*s_etat_processus).var_volatile_alarme |
if (((*s_etat_processus) |
| == 0) && ((*s_etat_processus) |
|
| .arret_depuis_abort == 0) && |
.arret_depuis_abort == 0) && |
| ((*s_etat_processus).at_exit |
((*s_etat_processus).at_exit |
| != NULL)) |
!= NULL)) |
| { |
{ |
| |
// Permet de traiter ATEXIT |
| |
// même après réception d'un SIGINT. |
| |
(*s_etat_processus) |
| |
.var_volatile_alarme = 0; |
| |
(*s_etat_processus) |
| |
.var_volatile_requete_arret = 0; |
| |
|
| |
if ((*s_etat_processus).profilage == |
| |
d_vrai) |
| |
{ |
| |
profilage(s_etat_processus, |
| |
"ATEXIT"); |
| |
} |
| |
|
| erreur = evaluation(s_etat_processus, |
erreur = evaluation(s_etat_processus, |
| (*s_etat_processus).at_exit, |
(*s_etat_processus).at_exit, |
| 'E'); |
'E'); |
| |
|
| |
if ((*s_etat_processus).profilage == |
| |
d_vrai) |
| |
{ |
| |
profilage(s_etat_processus, NULL); |
| |
} |
| |
|
| |
if (((*s_etat_processus) |
| |
.erreur_execution != d_ex) || |
| |
((*s_etat_processus).exception |
| |
!= d_ep) || ((*s_etat_processus) |
| |
.erreur_systeme != d_es)) |
| |
{ |
| |
printf("%s [%d]\n", message = |
| |
messages(s_etat_processus), |
| |
(int) getpid()); |
| |
free(message); |
| |
|
| |
if (test_cfsf(s_etat_processus, 51) |
| |
== d_faux) |
| |
{ |
| |
printf("%s", ds_beep); |
| |
} |
| |
|
| |
if ((*s_etat_processus).core == |
| |
d_vrai) |
| |
{ |
| |
printf("\n"); |
| |
|
| |
if ((*s_etat_processus).langue |
| |
== 'F') |
| |
{ |
| |
printf("+++Information : Gé" |
| |
"nération du fichie" |
| |
"r rpl-core " |
| |
"[%d]\n", (int) |
| |
getpid()); |
| |
} |
| |
else |
| |
{ |
| |
printf("+++Information : Wr" |
| |
"iting rpl-core fil" |
| |
"e [%d]\n", |
| |
(int) getpid()); |
| |
} |
| |
|
| |
rplcore(s_etat_processus); |
| |
|
| |
if ((*s_etat_processus).langue |
| |
== 'F') |
| |
{ |
| |
printf("+++Information : Pr" |
| |
"ocessus tracé [%d]" |
| |
"\n", |
| |
(int) getpid()); |
| |
} |
| |
else |
| |
{ |
| |
printf("+++Information : Do" |
| |
"ne [%d]\n", (int) |
| |
getpid()); |
| |
} |
| |
|
| |
printf("\n"); |
| |
fflush(stdout); |
| |
} |
| |
} |
| } |
} |
| } |
} |
| } |
} |
|
Line 2825 rplinit(int argc, char *argv[], char *en
|
Line 5240 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (erreur == d_absence_erreur) |
if (erreur == d_absence_erreur) |
| { |
{ |
| if (((*s_etat_processus).var_volatile_alarme |
if (((*s_etat_processus) |
| == 0) && ((*s_etat_processus) |
|
| .arret_depuis_abort == 0) && |
.arret_depuis_abort == 0) && |
| ((*s_etat_processus).at_exit |
((*s_etat_processus).at_exit |
| != NULL)) |
!= NULL)) |
| { |
{ |
| |
// Permet de traiter ATEXIT |
| |
// même après réception d'un SIGINT. |
| |
(*s_etat_processus) |
| |
.var_volatile_alarme = 0; |
| |
(*s_etat_processus) |
| |
.var_volatile_requete_arret = 0; |
| |
|
| |
if ((*s_etat_processus).profilage == |
| |
d_vrai) |
| |
{ |
| |
profilage(s_etat_processus, |
| |
"ATEXIT"); |
| |
} |
| |
|
| erreur = evaluation(s_etat_processus, |
erreur = evaluation(s_etat_processus, |
| (*s_etat_processus).at_exit, |
(*s_etat_processus).at_exit, |
| 'E'); |
'E'); |
| |
|
| |
if ((*s_etat_processus).profilage == |
| |
d_vrai) |
| |
{ |
| |
profilage(s_etat_processus, NULL); |
| |
} |
| |
|
| |
if (((*s_etat_processus) |
| |
.erreur_execution != d_ex) || |
| |
((*s_etat_processus).exception |
| |
!= d_ep) || ((*s_etat_processus) |
| |
.erreur_systeme != d_es)) |
| |
{ |
| |
printf("%s [%d]\n", message = |
| |
messages(s_etat_processus), |
| |
(int) getpid()); |
| |
free(message); |
| |
|
| |
if (test_cfsf(s_etat_processus, 51) |
| |
== d_faux) |
| |
{ |
| |
printf("%s", ds_beep); |
| |
} |
| |
|
| |
if ((*s_etat_processus).core == |
| |
d_vrai) |
| |
{ |
| |
printf("\n"); |
| |
|
| |
if ((*s_etat_processus).langue |
| |
== 'F') |
| |
{ |
| |
printf("+++Information : Gé" |
| |
"nération du fichie" |
| |
"r rpl-core " |
| |
"[%d]\n", (int) |
| |
getpid()); |
| |
} |
| |
else |
| |
{ |
| |
printf("+++Information : Wr" |
| |
"iting rpl-core fil" |
| |
"e [%d]\n", |
| |
(int) getpid()); |
| |
} |
| |
|
| |
rplcore(s_etat_processus); |
| |
|
| |
if ((*s_etat_processus).langue |
| |
== 'F') |
| |
{ |
| |
printf("+++Information : Pr" |
| |
"ocessus tracé [%d]" |
| |
"\n", |
| |
(int) getpid()); |
| |
} |
| |
else |
| |
{ |
| |
printf("+++Information : Do" |
| |
"ne [%d]\n", (int) |
| |
getpid()); |
| |
} |
| |
|
| |
printf("\n"); |
| |
fflush(stdout); |
| |
} |
| |
} |
| } |
} |
| } |
} |
| } |
} |
| } |
} |
| } |
} |
| |
|
| |
for(i = 0; i < (*s_etat_processus).sections_critiques; i++) |
| |
{ |
| |
pthread_mutex_unlock(&mutex_sections_critiques); |
| |
} |
| |
|
| liberation(s_etat_processus, (*s_etat_processus).at_exit); |
liberation(s_etat_processus, (*s_etat_processus).at_exit); |
| liberation(s_etat_processus, (*s_etat_processus).at_poke); |
liberation(s_etat_processus, (*s_etat_processus).at_poke); |
| |
|
|
Line 3041 rplinit(int argc, char *argv[], char *en
|
Line 5541 rplinit(int argc, char *argv[], char *en
|
| l_element_courant = (void *) |
l_element_courant = (void *) |
| (*s_etat_processus).l_base_pile_processus; |
(*s_etat_processus).l_base_pile_processus; |
| |
|
| for(i = 0; i < (unsigned long) |
for(i = 0; i < (*(*((struct_processus_fils *) |
| (*(*((struct_processus_fils *) |
|
| (*(*((struct_liste_chainee *) |
(*(*((struct_liste_chainee *) |
| l_element_courant)).donnee).objet)).thread) |
l_element_courant)).donnee).objet)).thread) |
| .nombre_objets_dans_pipe; i++) |
.nombre_objets_dans_pipe; i++) |
|
Line 3067 rplinit(int argc, char *argv[], char *en
|
Line 5566 rplinit(int argc, char *argv[], char *en
|
| if (sigaction(SIGPIPE, &action, ®istre) |
if (sigaction(SIGPIPE, &action, ®istre) |
| != 0) |
!= 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post( |
| |
semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| pthread_mutex_unlock( |
pthread_mutex_unlock( |
| &((*s_etat_processus).mutex)); |
&((*s_etat_processus).mutex)); |
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
|
Line 3091 rplinit(int argc, char *argv[], char *en
|
Line 5629 rplinit(int argc, char *argv[], char *en
|
| if (sigaction(SIGPIPE, ®istre, NULL) |
if (sigaction(SIGPIPE, ®istre, NULL) |
| != 0) |
!= 0) |
| { |
{ |
| |
# ifndef SEMAPHORES_NOMMES |
| |
sem_post(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
sem_post( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy( |
| |
&semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy(&((*s_etat_processus) |
| |
.semaphore_fork)); |
| |
# else |
| |
sem_post((*s_etat_processus) |
| |
.semaphore_fork); |
| |
sem_post( |
| |
semaphore_gestionnaires_signaux |
| |
); |
| |
sem_destroy2( |
| |
semaphore_gestionnaires_signaux, |
| |
getpid(), SEM_SIGNAUX); |
| |
sem_destroy3((*s_etat_processus) |
| |
.semphore_fork, getpid(), |
| |
pthread_self(), SEM_FORK); |
| |
# endif |
| |
|
| |
liberation_contexte_cas(s_etat_processus); |
| |
liberation_queue_signaux(s_etat_processus); |
| |
|
| |
# ifdef HAVE_STACK_OVERFLOW_RECOVERY |
| |
stackoverflow_deinstall_handler(); |
| |
# endif |
| |
|
| |
# ifdef HAVE_SIGSEGV_RECOVERY |
| |
if (debug == d_faux) |
| |
{ |
| |
sigsegv_deinstall_handler(); |
| |
} |
| |
# endif |
| |
|
| pthread_mutex_unlock( |
pthread_mutex_unlock( |
| &((*s_etat_processus).mutex)); |
&((*s_etat_processus).mutex)); |
| return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
|
Line 3262 rplinit(int argc, char *argv[], char *en
|
Line 5839 rplinit(int argc, char *argv[], char *en
|
| * le libérer... |
* le libérer... |
| */ |
*/ |
| |
|
| |
liberation_arbre_variables_partagees(s_etat_processus, |
| |
(*(*s_etat_processus).s_arbre_variables_partagees)); |
| liberation_arbre_variables(s_etat_processus, |
liberation_arbre_variables(s_etat_processus, |
| (*s_etat_processus).s_arbre_variables, d_vrai); |
(*s_etat_processus).s_arbre_variables, d_vrai); |
| free((*s_etat_processus).pointeurs_caracteres_variables); |
free((*s_etat_processus).pointeurs_caracteres_variables); |
| |
|
| for(i = 0; i < (*s_etat_processus) |
l_element_statique_courant = (*s_etat_processus) |
| .nombre_variables_statiques; i++) |
.l_liste_variables_statiques; |
| |
|
| |
while(l_element_statique_courant != NULL) |
| { |
{ |
| liberation(s_etat_processus, (*s_etat_processus) |
l_element_statique_suivant = |
| .s_liste_variables_statiques[i].objet); |
(*l_element_statique_courant).suivant; |
| free((*s_etat_processus) |
free(l_element_statique_courant); |
| .s_liste_variables_statiques[i].nom); |
l_element_statique_courant = l_element_statique_suivant; |
| } |
} |
| |
|
| free((*s_etat_processus).s_liste_variables_statiques); |
l_element_partage_courant = (*(*s_etat_processus) |
| |
.l_liste_variables_partagees); |
| |
|
| for(i = 0; i < (*((*s_etat_processus) |
while(l_element_partage_courant != NULL) |
| .s_liste_variables_partagees)).nombre_variables; |
|
| i++) |
|
| { |
{ |
| liberation(s_etat_processus, (*((*s_etat_processus) |
l_element_partage_suivant = |
| .s_liste_variables_partagees)).table[i].objet); |
(*l_element_partage_courant).suivant; |
| free((*((*s_etat_processus) |
free(l_element_partage_courant); |
| .s_liste_variables_partagees)).table[i].nom); |
l_element_partage_courant = l_element_partage_suivant; |
| } |
} |
| |
|
| free((struct_variable_partagee *) |
|
| (*((*s_etat_processus).s_liste_variables_partagees)) |
|
| .table); |
|
| |
|
| /* |
/* |
| * Si resultats est non nul, rplinit a été appelé |
* Si resultats est non nul, rplinit a été appelé |
| * depuis rpl() [librpl] et non main(). |
* depuis rpl() [librpl] et non main(). |
|
Line 3305 rplinit(int argc, char *argv[], char *en
|
Line 5881 rplinit(int argc, char *argv[], char *en
|
| { |
{ |
| free((*resultats)); |
free((*resultats)); |
| |
|
| if (((*resultats) = malloc(((*s_etat_processus) |
if (((*resultats) = malloc(((size_t) |
| .hauteur_pile_operationnelle + 1) |
((*s_etat_processus) |
| |
.hauteur_pile_operationnelle + 1)) |
| * sizeof(unsigned char **))) != NULL) |
* sizeof(unsigned char **))) != NULL) |
| { |
{ |
| (*resultats)[(*s_etat_processus) |
(*resultats)[(*s_etat_processus) |
|
Line 3608 rplinit(int argc, char *argv[], char *en
|
Line 6185 rplinit(int argc, char *argv[], char *en
|
| |
|
| if (traitement_fichier_temporaire == 'Y') |
if (traitement_fichier_temporaire == 'Y') |
| { |
{ |
| if (destruction_fichier(nom_fichier_temporaire) == d_erreur) |
destruction_fichier(nom_fichier_temporaire); |
| { |
|
| return(EXIT_FAILURE); |
|
| } |
|
| |
|
| free(nom_fichier_temporaire); |
free(nom_fichier_temporaire); |
| } |
} |
| |
|
|
Line 3626 rplinit(int argc, char *argv[], char *en
|
Line 6199 rplinit(int argc, char *argv[], char *en
|
| closelog(); |
closelog(); |
| |
|
| pthread_mutex_destroy(&((*s_etat_processus).protection_liste_mutexes)); |
pthread_mutex_destroy(&((*s_etat_processus).protection_liste_mutexes)); |
| pthread_mutex_destroy(&((*((*s_etat_processus).s_liste_variables_partagees)) |
|
| .mutex)); |
|
| |
|
| retrait_thread(s_etat_processus); |
retrait_thread(s_etat_processus); |
| |
|
| pthread_mutex_destroy(&((*s_etat_processus).mutex)); |
pthread_mutex_destroy(&((*s_etat_processus).mutex)); |
| pthread_mutex_destroy(&((*s_etat_processus).mutex_allocation)); |
pthread_mutex_destroy(&((*s_etat_processus).mutex_allocation)); |
| |
pthread_mutex_destroy(&mutex_sections_critiques); |
| |
pthread_mutex_destroy(&mutex_liste_variables_partagees); |
| |
|
| # ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
| sem_post(&((*s_etat_processus).semaphore_fork)); |
sem_post(&((*s_etat_processus).semaphore_fork)); |
|
Line 3645 rplinit(int argc, char *argv[], char *en
|
Line 6218 rplinit(int argc, char *argv[], char *en
|
| |
|
| free((*s_etat_processus).localisation); |
free((*s_etat_processus).localisation); |
| |
|
| pthread_mutex_destroy(&mutex_liste_threads); |
|
| pthread_mutex_destroy(&mutex_gestionnaires_signaux_atomique); |
|
| |
|
| # ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
| sem_post(&semaphore_gestionnaires_signaux); |
sem_post(&semaphore_gestionnaires_signaux); |
| sem_destroy(&semaphore_gestionnaires_signaux); |
sem_destroy(&semaphore_gestionnaires_signaux); |
|
Line 3669 rplinit(int argc, char *argv[], char *en
|
Line 6239 rplinit(int argc, char *argv[], char *en
|
| } |
} |
| |
|
| free(arg_exec); |
free(arg_exec); |
| |
arret_thread_signaux(s_etat_processus); |
| free(s_etat_processus); |
free(s_etat_processus); |
| |
|
| # ifdef DEBUG_MEMOIRE |
# ifdef DEBUG_MEMOIRE |
|
Line 3709 informations(struct_processus *s_etat_pr
|
Line 6280 informations(struct_processus *s_etat_pr
|
| printf(" -l : licence d'utilisation\n"); |
printf(" -l : licence d'utilisation\n"); |
| printf(" -n : ignorance du signal HUP\n"); |
printf(" -n : ignorance du signal HUP\n"); |
| printf(" -p : précompilation du script avant exécution\n"); |
printf(" -p : précompilation du script avant exécution\n"); |
| printf(" -P : profilage\n"); |
printf(" -P : profilage (-P ou -PP)\n"); |
| printf(" -s : empêchement de l'ouverture de l'écran initial\n"); |
printf(" -s : empêchement de l'ouverture de l'écran initial\n"); |
| printf(" -S : exécution du script passé en ligne de commande\n"); |
printf(" -S : exécution du script passé en ligne de commande\n"); |
| printf(" -t : trace\n"); |
printf(" -t : trace\n"); |
|
Line 3730 informations(struct_processus *s_etat_pr
|
Line 6301 informations(struct_processus *s_etat_pr
|
| printf(" -l : prints the user licence of the software\n"); |
printf(" -l : prints the user licence of the software\n"); |
| printf(" -n : ignores HUP signal\n"); |
printf(" -n : ignores HUP signal\n"); |
| printf(" -p : precompiles script\n"); |
printf(" -p : precompiles script\n"); |
| printf(" -P : computes profile data\n"); |
printf(" -P : computes profile data (-P or -PP)\n"); |
| printf(" -s : disables splash screen\n"); |
printf(" -s : disables splash screen\n"); |
| printf(" -S : executes script written in command line\n"); |
printf(" -S : executes script written in command line\n"); |
| printf(" -t : enables tracing mode\n"); |
printf(" -t : enables tracing mode\n"); |
![[BACK]](/cvsweb/icons/back.gif){kind=icon}
Return to rpl.c CVS log ![[TXT]](/cvsweb/icons/text.gif){kind=icon}
![[DIR]](/cvsweb/icons/dir.gif){kind=icon}
Up to [local] / rpl / src