version 1.121, 2013/03/21 11:30:30
|
version 1.130, 2013/05/23 09:20:08
|
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 100 thread_surveillance_signaux(void *argume
|
Line 100 thread_surveillance_signaux(void *argume
|
# endif |
# endif |
{ |
{ |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
sem_post(&(*s_queue_signaux).signalisation); |
if (sem_wait(&(*s_queue_signaux).arret_signalisation) != 0) |
# else |
# else |
sem_post(semaphore_signalisation); |
if (sem_wait(semaphore_arret_signalisation) != 0) |
# endif |
# endif |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
} |
|
|
if ((*s_queue_signaux).requete_arret == d_vrai) |
if ((*s_queue_signaux).requete_arret == d_vrai) |
{ |
{ |
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_post(&(*s_queue_signaux).arret_signalisation); |
|
sem_post(&(*s_queue_signaux).signalisation); |
|
# else |
|
sem_post(semaphore_arret_signalisation); |
|
sem_post(semaphore_signalisation); |
|
# endif |
|
|
break; |
break; |
} |
} |
|
|
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_post(&(*s_queue_signaux).arret_signalisation); |
|
sem_post(&(*s_queue_signaux).signalisation); |
|
# else |
|
sem_post(semaphore_arret_signalisation); |
|
sem_post(semaphore_signalisation); |
|
# endif |
|
|
nombre_signaux_envoyes = 0; |
nombre_signaux_envoyes = 0; |
sched_yield(); |
sched_yield(); |
|
|
Line 145 thread_surveillance_signaux(void *argume
|
Line 164 thread_surveillance_signaux(void *argume
|
// Dans un second temps, on balaye toutes les queues de signaux |
// Dans un second temps, on balaye toutes les queues de signaux |
// des threads du processus courant. |
// des threads du processus courant. |
|
|
|
// Attention : l'ordre de verrouillage des mutexes est important |
|
// pour éviter les conditions bloquantes ! |
|
|
|
pthread_mutex_lock(&mutex_interruptions); |
pthread_mutex_lock(&mutex_liste_threads); |
pthread_mutex_lock(&mutex_liste_threads); |
|
|
l_element_courant = liste_threads; |
l_element_courant = liste_threads; |
|
|
while(l_element_courant != NULL) |
while(l_element_courant != NULL) |
Line 155 thread_surveillance_signaux(void *argume
|
Line 179 thread_surveillance_signaux(void *argume
|
{ |
{ |
if ((*(*((struct_thread *) (*l_element_courant).donnee)) |
if ((*(*((struct_thread *) (*l_element_courant).donnee)) |
.s_etat_processus).pointeur_signal_ecriture != |
.s_etat_processus).pointeur_signal_ecriture != |
(*(*((struct_thread *) (*l_element_courant).donnee)) |
(*(*((struct_thread *) (*l_element_courant) |
.s_etat_processus).pointeur_signal_lecture) |
.donnee)).s_etat_processus) |
|
.pointeur_signal_lecture) |
{ |
{ |
nombre_signaux_envoyes++; |
nombre_signaux_envoyes++; |
pthread_kill((*((struct_thread *) (*l_element_courant) |
pthread_kill((*((struct_thread *) |
.donnee)).tid, SIGALRM); |
(*l_element_courant).donnee)).tid, SIGALRM); |
} |
} |
} |
} |
|
|
Line 168 thread_surveillance_signaux(void *argume
|
Line 193 thread_surveillance_signaux(void *argume
|
} |
} |
|
|
pthread_mutex_unlock(&mutex_liste_threads); |
pthread_mutex_unlock(&mutex_liste_threads); |
|
pthread_mutex_unlock(&mutex_interruptions); |
|
|
// Nanosleep |
// Nanosleep |
|
|
Line 598 liberation_threads(struct_processus *s_e
|
Line 624 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 692 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 1334 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 2409 signal_hup(struct_processus *s_etat_proc
|
Line 2431 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 2976 envoi_signal_thread(pthread_t tid, enum
|
Line 2999 envoi_signal_thread(pthread_t tid, enum
|
return(1); |
return(1); |
} |
} |
|
|
|
s_etat_processus = (*((struct_thread *) (*l_element_courant).donnee)) |
|
.s_etat_processus; |
|
|
if (pthread_mutex_lock(&mutex_interruptions) != 0) |
if (pthread_mutex_lock(&mutex_interruptions) != 0) |
{ |
{ |
pthread_mutex_unlock(&mutex_liste_threads); |
pthread_mutex_unlock(&mutex_liste_threads); |
return(1); |
return(1); |
} |
} |
|
|
s_etat_processus = (*((struct_thread *) (*l_element_courant).donnee)) |
|
.s_etat_processus; |
|
|
|
(*s_etat_processus).signaux_en_queue |
(*s_etat_processus).signaux_en_queue |
[(*s_etat_processus).pointeur_signal_ecriture] = signal; |
[(*s_etat_processus).pointeur_signal_ecriture] = signal; |
(*s_etat_processus).pointeur_signal_ecriture = |
(*s_etat_processus).pointeur_signal_ecriture = |
Line 3113 creation_queue_signaux(struct_processus
|
Line 3136 creation_queue_signaux(struct_processus
|
# ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
|
sem_init(&((*s_queue_signaux).arret_signalisation), 1, 1); |
# else |
# else |
if ((semaphore_queue_signaux = sem_init2(1, getpid(), SEM_QUEUE)) |
if ((semaphore_queue_signaux = sem_init2(1, getpid(), SEM_QUEUE)) |
== SEM_FAILED) |
== SEM_FAILED) |
Line 3121 creation_queue_signaux(struct_processus
|
Line 3145 creation_queue_signaux(struct_processus
|
return; |
return; |
} |
} |
|
|
if ((semaphore_signalisation = sem_init2(1, getpid(), |
if ((semaphore_signalisation = sem_init2(0, getpid(), |
SEM_SIGNALISATION)) == SEM_FAILED) |
SEM_SIGNALISATION)) == SEM_FAILED) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
return; |
return; |
} |
} |
|
|
|
if ((semaphore_arret_signalisation = sem_init2(1, getpid(), |
|
SEM_ARRET_SIGNALISATION)) == SEM_FAILED) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
# endif |
# endif |
|
|
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
|
|
(*s_queue_signaux).requete_arret = d_faux; |
(*s_queue_signaux).requete_arret = d_faux; |
|
|
if (msync(s_queue_signaux, sizeof(struct_queue_signaux), 0)) |
if (msync(s_queue_signaux, sizeof(struct_queue_signaux), 0)) |
Line 3196 creation_queue_signaux(struct_processus
|
Line 3228 creation_queue_signaux(struct_processus
|
|
|
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
|
sem_init(&((*s_queue_signaux).arret_signalisation), 1, 1); |
|
|
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
(*s_queue_signaux).requete_arret = d_faux; |
(*s_queue_signaux).requete_arret = d_faux; |
Line 3219 creation_queue_signaux(struct_processus
|
Line 3253 creation_queue_signaux(struct_processus
|
|
|
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).semaphore), 1, 1); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
sem_init(&((*s_queue_signaux).signalisation), 1, 0); |
|
sem_init(&((*s_queue_signaux).arret_signalisation), 1, 1); |
|
|
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_lecture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
(*s_queue_signaux).pointeur_ecriture = 0; |
(*s_queue_signaux).requete_arret = d_faux; |
(*s_queue_signaux).requete_arret = d_faux; |
Line 3297 creation_queue_signaux(struct_processus
|
Line 3333 creation_queue_signaux(struct_processus
|
void |
void |
liberation_queue_signaux(struct_processus *s_etat_processus) |
liberation_queue_signaux(struct_processus *s_etat_processus) |
{ |
{ |
// Incrémenter le sémaphore pour être sûr de le débloquer. |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_wait(&((*s_queue_signaux).arret_signalisation)); |
|
# else |
|
sem_wait(semaphore_arret_signalisation); |
|
# endif |
|
|
(*s_queue_signaux).requete_arret = d_vrai; |
(*s_queue_signaux).requete_arret = d_vrai; |
|
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_post(&((*s_queue_signaux).arret_signalisation)); |
|
# else |
|
sem_post(semaphore_arret_signalisation); |
|
# endif |
|
|
|
// Incrémenter le sémaphore pour être sûr de le débloquer. |
|
|
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
sem_post(&((*s_queue_signaux).signalisation)); |
sem_post(&((*s_queue_signaux).signalisation)); |
# else |
# else |
sem_post(semaphore_signalisation); |
sem_post(semaphore_signalisation); |
Line 3320 liberation_queue_signaux(struct_processu
|
Line 3368 liberation_queue_signaux(struct_processu
|
# endif |
# endif |
# else // POSIX |
# else // POSIX |
# ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
sem_close(&((*s_queue_signaux).semaphore)); |
// Rien à faire, les sémaphores sont anonymes. |
sem_close(&((*s_queue_signaux).signalisation)); |
|
# else |
# else |
sem_close(semaphore_queue_signaux); |
sem_close(semaphore_queue_signaux); |
sem_close(semaphore_signalisation); |
sem_close(semaphore_signalisation); |
|
sem_close(semaphore_arret_signalisation); |
# endif |
# endif |
|
|
if (munmap(s_queue_signaux, sizeof(struct_queue_signaux)) != 0) |
if (munmap(s_queue_signaux, sizeof(struct_queue_signaux)) != 0) |
Line 3360 destruction_queue_signaux(struct_process
|
Line 3408 destruction_queue_signaux(struct_process
|
unsigned char *nom; |
unsigned char *nom; |
# endif |
# endif |
|
|
// Incrémenter le sémaphore pour être sûr de le débloquer. |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_wait(&((*s_queue_signaux).arret_signalisation)); |
|
# else |
|
sem_wait(semaphore_arret_signalisation); |
|
# endif |
|
|
(*s_queue_signaux).requete_arret = d_vrai; |
(*s_queue_signaux).requete_arret = d_vrai; |
|
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
|
sem_post(&((*s_queue_signaux).arret_signalisation)); |
|
# else |
|
sem_post(semaphore_arret_signalisation); |
|
# endif |
|
|
|
// Incrémenter le sémaphore pour être sûr de le débloquer. |
|
|
|
# if (!defined(SEMAPHORES_NOMMES)) || defined(IPCS_SYSV) |
sem_post(&((*s_queue_signaux).signalisation)); |
sem_post(&((*s_queue_signaux).signalisation)); |
# else |
# else |
sem_post(semaphore_signalisation); |
sem_post(semaphore_signalisation); |
Line 3394 destruction_queue_signaux(struct_process
|
Line 3454 destruction_queue_signaux(struct_process
|
unlink((*s_queue_signaux).signalisation.path); |
unlink((*s_queue_signaux).signalisation.path); |
free((*s_queue_signaux).signalisation.path); |
free((*s_queue_signaux).signalisation.path); |
|
|
|
if (semctl((*s_queue_signaux).arret_signalisation.sem, 0, IPC_RMID) |
|
== -1) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
|
|
unlink((*s_queue_signaux).arret_signalisation.path); |
|
free((*s_queue_signaux).arret_signalisation.path); |
|
|
if (shmdt(s_queue_signaux) == -1) |
if (shmdt(s_queue_signaux) == -1) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
Line 3422 destruction_queue_signaux(struct_process
|
Line 3492 destruction_queue_signaux(struct_process
|
sem_close(&((*s_queue_signaux).signalisation)); |
sem_close(&((*s_queue_signaux).signalisation)); |
sem_destroy(&((*s_queue_signaux).signalisation)); |
sem_destroy(&((*s_queue_signaux).signalisation)); |
|
|
|
sem_close(&((*s_queue_signaux).arret_signalisation)); |
|
sem_destroy(&((*s_queue_signaux).arret_signalisation)); |
|
|
if (DosFreeMem(s_queue_signaux) != 0) |
if (DosFreeMem(s_queue_signaux) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
Line 3430 destruction_queue_signaux(struct_process
|
Line 3503 destruction_queue_signaux(struct_process
|
# endif |
# endif |
# else // POSIX |
# else // POSIX |
# ifndef SEMAPHORES_NOMMES |
# ifndef SEMAPHORES_NOMMES |
sem_close(&((*s_queue_signaux).semaphore)); |
|
sem_destroy(&((*s_queue_signaux).semaphore)); |
sem_destroy(&((*s_queue_signaux).semaphore)); |
|
|
sem_close(&((*s_queue_signaux).signalisation)); |
|
sem_destroy(&((*s_queue_signaux).signalisation)); |
sem_destroy(&((*s_queue_signaux).signalisation)); |
|
sem_destroy(&((*s_queue_signaux).arret_signalisation)); |
# else |
# else |
sem_close(semaphore_queue_signaux); |
sem_close(semaphore_queue_signaux); |
sem_destroy2(semaphore_queue_signaux, getpid(), SEM_QUEUE); |
sem_destroy2(semaphore_queue_signaux, getpid(), SEM_QUEUE); |
|
|
sem_close(semaphore_signalisation); |
sem_close(semaphore_signalisation); |
sem_destroy2(semaphore_signalisation, getpid(), SEM_SIGNALISATION); |
sem_destroy2(semaphore_signalisation, getpid(), SEM_SIGNALISATION); |
|
|
|
sem_close(semaphore_arret_signalisation); |
|
sem_destroy2(semaphore_arret_signalisation, getpid(), |
|
SEM_ARRET_SIGNALISATION); |
# endif |
# endif |
|
|
if (munmap(s_queue_signaux, sizeof(struct_queue_signaux)) != 0) |
if (munmap(s_queue_signaux, sizeof(struct_queue_signaux)) != 0) |