version 1.119, 2013/03/15 11:37:26
|
version 1.125, 2013/05/21 12:10:12
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.13 |
RPL/2 (R) version 4.1.14 |
Copyright (C) 1989-2013 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 555 liberation_threads(struct_processus *s_e
|
Line 555 liberation_threads(struct_processus *s_e
|
struct_liste_variables_statiques *l_element_statique_courant; |
struct_liste_variables_statiques *l_element_statique_courant; |
struct_liste_variables_statiques *l_element_statique_suivant; |
struct_liste_variables_statiques *l_element_statique_suivant; |
|
|
unsigned long i; |
integer8 i; |
|
|
void *element_candidat; |
void *element_candidat; |
void *element_courant; |
void *element_courant; |
Line 598 liberation_threads(struct_processus *s_e
|
Line 598 liberation_threads(struct_processus *s_e
|
close((*s_etat_processus).pipe_injections); |
close((*s_etat_processus).pipe_injections); |
close((*s_etat_processus).pipe_nombre_injections); |
close((*s_etat_processus).pipe_nombre_injections); |
close((*s_etat_processus).pipe_interruptions); |
close((*s_etat_processus).pipe_interruptions); |
close((*s_etat_processus).pipe_nombre_objets_attente); |
close((*s_etat_processus).pipe_nombre_elements_attente); |
close((*s_etat_processus).pipe_nombre_interruptions_attente); |
|
|
|
liberation(s_etat_processus, (*s_etat_processus).at_exit); |
liberation(s_etat_processus, (*s_etat_processus).at_exit); |
|
|
Line 667 liberation_threads(struct_processus *s_e
|
Line 666 liberation_threads(struct_processus *s_e
|
close((*s_argument_thread).pipe_acquittement[1]); |
close((*s_argument_thread).pipe_acquittement[1]); |
close((*s_argument_thread).pipe_injections[1]); |
close((*s_argument_thread).pipe_injections[1]); |
close((*s_argument_thread).pipe_nombre_injections[1]); |
close((*s_argument_thread).pipe_nombre_injections[1]); |
close((*s_argument_thread).pipe_nombre_objets_attente[0]); |
close((*s_argument_thread).pipe_nombre_elements_attente[0]); |
close((*s_argument_thread).pipe_interruptions[0]); |
close((*s_argument_thread).pipe_interruptions[0]); |
close((*s_argument_thread) |
|
.pipe_nombre_interruptions_attente[0]); |
|
|
|
if (pthread_mutex_unlock(&((*s_argument_thread) |
if (pthread_mutex_unlock(&((*s_argument_thread) |
.mutex_nombre_references)) != 0) |
.mutex_nombre_references)) != 0) |
Line 1311 liberation_threads(struct_processus *s_e
|
Line 1308 liberation_threads(struct_processus *s_e
|
close((*s_argument_thread).pipe_acquittement[1]); |
close((*s_argument_thread).pipe_acquittement[1]); |
close((*s_argument_thread).pipe_injections[1]); |
close((*s_argument_thread).pipe_injections[1]); |
close((*s_argument_thread).pipe_nombre_injections[1]); |
close((*s_argument_thread).pipe_nombre_injections[1]); |
close((*s_argument_thread).pipe_nombre_objets_attente[0]); |
close((*s_argument_thread).pipe_nombre_elements_attente[0]); |
close((*s_argument_thread).pipe_interruptions[0]); |
close((*s_argument_thread).pipe_interruptions[0]); |
close((*s_argument_thread).pipe_nombre_interruptions_attente[0]); |
|
|
|
if (pthread_mutex_unlock(&((*s_argument_thread) |
if (pthread_mutex_unlock(&((*s_argument_thread) |
.mutex_nombre_references)) != 0) |
.mutex_nombre_references)) != 0) |
Line 1739 thread_signaux(void *argument)
|
Line 1735 thread_signaux(void *argument)
|
|
|
if (signal != (0xFF & rpl_sigmax)) |
if (signal != (0xFF & rpl_sigmax)) |
{ |
{ |
uprintf("envoi signal %d vers %d\n", signal, getpid()); |
|
envoi_signal_processus(getpid(), signal); |
envoi_signal_processus(getpid(), signal); |
// Un signal SIGALRM est envoyé par le thread de surveillance |
// Un signal SIGALRM est envoyé par le thread de surveillance |
// des signaux jusqu'à ce que les signaux soient tous traités. |
// des signaux jusqu'à ce que les signaux soient tous traités. |
Line 2410 signal_hup(struct_processus *s_etat_proc
|
Line 2405 signal_hup(struct_processus *s_etat_proc
|
return; |
return; |
} |
} |
|
|
snprintf(nom, 8 + 64 + 1, "rpl-out-%lu-%lu", (unsigned long) getpid(), |
snprintf(nom, 8 + 64 + 1, "rpl-out-%llu-%llu", |
(unsigned long) pthread_self()); |
(unsigned long long) getpid(), |
|
(unsigned long long) pthread_self()); |
|
|
if ((fichier = fopen(nom, "w+")) != NULL) |
if ((fichier = fopen(nom, "w+")) != NULL) |
{ |
{ |
Line 2952 envoi_signal_thread(pthread_t tid, enum
|
Line 2948 envoi_signal_thread(pthread_t tid, enum
|
|
|
struct_processus *s_etat_processus; |
struct_processus *s_etat_processus; |
|
|
|
if (pthread_mutex_lock(&mutex_interruptions) != 0) |
|
{ |
|
pthread_mutex_unlock(&mutex_liste_threads); |
|
return(1); |
|
} |
|
|
if (pthread_mutex_lock(&mutex_liste_threads) != 0) |
if (pthread_mutex_lock(&mutex_liste_threads) != 0) |
{ |
{ |
return(1); |
return(1); |
Line 2975 envoi_signal_thread(pthread_t tid, enum
|
Line 2977 envoi_signal_thread(pthread_t tid, enum
|
{ |
{ |
pthread_mutex_unlock(&mutex_liste_threads); |
pthread_mutex_unlock(&mutex_liste_threads); |
return(1); |
return(1); |
} |
|
|
|
if (pthread_mutex_lock(&mutex_interruptions) != 0) |
|
{ |
|
pthread_mutex_unlock(&mutex_liste_threads); |
|
return(1); |
|
} |
} |
|
|
s_etat_processus = (*((struct_thread *) (*l_element_courant).donnee)) |
s_etat_processus = (*((struct_thread *) (*l_element_courant).donnee)) |