version 1.195, 2017/07/04 10:28:08
|
version 1.197, 2017/07/30 21:59:41
|
Line 129 rplinit(int argc, char *argv[], char *en
|
Line 129 rplinit(int argc, char *argv[], char *en
|
routine_recursive = 0; |
routine_recursive = 0; |
nombre_thread_surveillance_processus = 0; |
nombre_thread_surveillance_processus = 0; |
pid_processus_pere = getpid(); |
pid_processus_pere = getpid(); |
affichage_rplso = d_vrai; |
|
|
|
# ifdef DEBUG_PROC |
# ifdef DEBUG_PROC |
__proc = 0; |
__proc = 0; |
Line 4134 rplinit(int argc, char *argv[], char *en
|
Line 4133 rplinit(int argc, char *argv[], char *en
|
return(EXIT_FAILURE); |
return(EXIT_FAILURE); |
} |
} |
|
|
affichage_rplso = d_faux; |
|
instruction_use(s_etat_processus); |
instruction_use(s_etat_processus); |
affichage_rplso = d_vrai; |
|
|
|
if (depilement(s_etat_processus, &((*s_etat_processus) |
if (depilement(s_etat_processus, &((*s_etat_processus) |
.l_base_pile), &((*l_bibliotheque_courante) |
.l_base_pile), &((*l_bibliotheque_courante) |
Line 5085 rplinit(int argc, char *argv[], char *en
|
Line 5082 rplinit(int argc, char *argv[], char *en
|
{ |
{ |
if (setjmp(contexte_initial) == 0) |
if (setjmp(contexte_initial) == 0) |
{ |
{ |
// Libération des bibliothèques |
|
|
|
l_bibliotheque_courante = l_bibliotheques; |
|
|
|
while(l_bibliotheque_courante != NULL) |
|
{ |
|
if (empilement(s_etat_processus, |
|
&((*s_etat_processus).l_base_pile), |
|
(*l_bibliotheque_courante).donnee) |
|
== d_erreur) |
|
{ |
|
# ifndef SEMAPHORES_NOMMES |
|
sem_post(&((*s_etat_processus) |
|
.semaphore_fork)); |
|
sem_destroy(&((*s_etat_processus) |
|
.semaphore_fork)); |
|
# else |
|
sem_post((*s_etat_processus) |
|
.semaphore_fork); |
|
sem_destroy3((*s_etat_processus) |
|
.semaphore_fork, getpid(), |
|
pthread_self(), SEM_FORK); |
|
# endif |
|
|
|
liberation_contexte_cas( |
|
s_etat_processus); |
|
destruction_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; |
|
|
|
if ((*s_etat_processus).langue == 'F') |
|
{ |
|
printf("+++Système : Mémoire " |
|
"insuffisante\n"); |
|
} |
|
else |
|
{ |
|
printf("+++System : Not enough " |
|
"memory\n"); |
|
} |
|
|
|
return(EXIT_FAILURE); |
|
} |
|
|
|
affichage_rplso = d_faux; |
|
instruction_remove(s_etat_processus); |
|
affichage_rplso = d_vrai; |
|
|
|
l_nouvelle_bibliotheque = |
|
(*l_bibliotheque_courante).suivant; |
|
free(l_bibliotheque_courante); |
|
l_bibliotheque_courante = |
|
l_nouvelle_bibliotheque; |
|
} |
|
|
|
erreur = sequenceur(s_etat_processus); |
erreur = sequenceur(s_etat_processus); |
|
|
if (erreur == d_absence_erreur) |
if (erreur == d_absence_erreur) |
Line 5970 rplinit(int argc, char *argv[], char *en
|
Line 5900 rplinit(int argc, char *argv[], char *en
|
l_element_courant = l_element_suivant; |
l_element_courant = l_element_suivant; |
} |
} |
|
|
for(i = 0; i < (*s_etat_processus) |
|
.nombre_instructions_externes; i++) |
|
{ |
|
free((*s_etat_processus).s_instructions_externes[i] |
|
.nom); |
|
free((*s_etat_processus).s_instructions_externes[i] |
|
.nom_bibliotheque); |
|
} |
|
|
|
if ((*s_etat_processus).nombre_instructions_externes != 0) |
|
{ |
|
free((*s_etat_processus).s_instructions_externes); |
|
} |
|
|
|
l_element_courant = (void *) (*s_etat_processus) |
|
.s_bibliotheques; |
|
|
|
while(l_element_courant != NULL) |
|
{ |
|
l_element_suivant = (*((struct_liste_chainee *) |
|
l_element_courant)).suivant; |
|
|
|
free((*((struct_bibliotheque *) |
|
(*((struct_liste_chainee *) |
|
l_element_courant)).donnee)).nom); |
|
dlclose((*((struct_bibliotheque *) |
|
(*((struct_liste_chainee *) |
|
l_element_courant)).donnee)).descripteur); |
|
free((*((struct_liste_chainee *) l_element_courant)) |
|
.donnee); |
|
free(l_element_courant); |
|
|
|
l_element_courant = l_element_suivant; |
|
} |
|
|
|
l_element_courant = (void *) (*s_etat_processus) |
l_element_courant = (void *) (*s_etat_processus) |
.l_base_pile_last; |
.l_base_pile_last; |
while(l_element_courant != NULL) |
while(l_element_courant != NULL) |
Line 6020 rplinit(int argc, char *argv[], char *en
|
Line 5915 rplinit(int argc, char *argv[], char *en
|
l_element_courant = l_element_suivant; |
l_element_courant = l_element_suivant; |
} |
} |
|
|
|
while((*s_etat_processus).s_bibliotheques != NULL) |
|
{ |
|
retrait_bibliotheque(s_etat_processus, |
|
(struct_bibliotheque *) |
|
(*((struct_liste_chainee *) |
|
(*s_etat_processus).s_bibliotheques)).donnee); |
|
} |
|
|
l_element_courant = (void *) (*s_etat_processus) |
l_element_courant = (void *) (*s_etat_processus) |
.l_base_pile_systeme; |
.l_base_pile_systeme; |
while(l_element_courant != NULL) |
while(l_element_courant != NULL) |