version 1.167, 2016/03/09 22:12:06
|
version 1.188, 2016/10/11 11:48:09
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.25 |
RPL/2 (R) version 4.1.26 |
Copyright (C) 1989-2016 Dr. BERTRAND Joël |
Copyright (C) 1989-2016 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 65 thread_surveillance_signaux(void *argume
|
Line 65 thread_surveillance_signaux(void *argume
|
{ |
{ |
// Cette fonction est lancée dans un thread créé par processus pour |
// Cette fonction est lancée dans un thread créé par processus pour |
// gérer le cas des appels système qui seraient bloqués lors de l'arrivée du |
// gérer le cas des appels système qui seraient bloqués lors de l'arrivée du |
// signal SIGALRM. Les processus externes n'envoient plus un signal au |
// signal SIGUSR2. Les processus externes n'envoient plus un signal au |
// processus ou au thread à signaler mais positionnent les informations |
// processus ou au thread à signaler mais positionnent les informations |
// nécessaires dans la queue des signaux et incrémentent le sémaphore. |
// nécessaires dans la queue des signaux et incrémentent le sémaphore. |
// Le sémaphore est décrémenté lorsque le signal est effectivement traité. |
// Le sémaphore est décrémenté lorsque le signal est effectivement traité. |
|
|
|
int ios; |
int nombre_signaux_envoyes; |
int nombre_signaux_envoyes; |
|
|
struct_processus *s_etat_processus; |
struct_processus *s_etat_processus; |
Line 92 thread_surveillance_signaux(void *argume
|
Line 93 thread_surveillance_signaux(void *argume
|
|
|
if (sem_wait(semaphore_signalisation) == 0) |
if (sem_wait(semaphore_signalisation) == 0) |
{ |
{ |
if (sem_wait(semaphore_arret_signalisation) != 0) |
while((ios = sem_wait(semaphore_arret_signalisation)) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
if (errno != EINTR) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
} |
} |
} |
|
|
if ((*s_queue_signaux).requete_arret == d_vrai) |
if ((*s_queue_signaux).requete_arret == d_vrai) |
Line 105 thread_surveillance_signaux(void *argume
|
Line 109 thread_surveillance_signaux(void *argume
|
break; |
break; |
} |
} |
|
|
sem_post(semaphore_arret_signalisation); |
|
sem_post(semaphore_signalisation); |
sem_post(semaphore_signalisation); |
|
|
nombre_signaux_envoyes = 0; |
nombre_signaux_envoyes = 0; |
Line 114 thread_surveillance_signaux(void *argume
|
Line 117 thread_surveillance_signaux(void *argume
|
// affectée au processus courant pour vérifier s'il y a quelque |
// affectée au processus courant pour vérifier s'il y a quelque |
// chose à traiter. |
// chose à traiter. |
|
|
sem_wait(semaphore_queue_signaux); |
while((ios = sem_wait(semaphore_queue_signaux)) != 0) |
|
{ |
|
if (errno != EINTR) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
} |
|
} |
|
|
if ((*s_queue_signaux).pointeur_lecture != |
if ((*s_queue_signaux).pointeur_lecture != |
(*s_queue_signaux).pointeur_ecriture) |
(*s_queue_signaux).pointeur_ecriture) |
Line 126 thread_surveillance_signaux(void *argume
|
Line 135 thread_surveillance_signaux(void *argume
|
// appels système lents. |
// appels système lents. |
|
|
nombre_signaux_envoyes++; |
nombre_signaux_envoyes++; |
kill(getpid(), SIGALRM); |
kill(getpid(), SIGUSR2); |
sched_yield(); |
sched_yield(); |
} |
} |
|
|
sem_post(semaphore_queue_signaux); |
sem_post(semaphore_queue_signaux); |
|
sem_post(semaphore_arret_signalisation); |
|
|
// 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. |
Line 154 thread_surveillance_signaux(void *argume
|
Line 164 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) |
(*(*((struct_thread *) (*l_element_courant) |
.donnee)).s_etat_processus) |
.donnee)).s_etat_processus).pointeur_signal_lecture) |
.pointeur_signal_lecture) |
|
{ |
{ |
nombre_signaux_envoyes++; |
nombre_signaux_envoyes++; |
pthread_kill((*((struct_thread *) |
pthread_kill((*((struct_thread *) |
(*l_element_courant).donnee)).tid, SIGALRM); |
(*l_element_courant).donnee)).tid, SIGUSR2); |
sched_yield(); |
sched_yield(); |
} |
} |
|
|
Line 1516 lancement_thread_signaux(struct_processu
|
Line 1525 lancement_thread_signaux(struct_processu
|
{ |
{ |
pthread_attr_t attributs; |
pthread_attr_t attributs; |
|
|
void *argument; |
|
|
|
if (pipe((*s_etat_processus).pipe_signaux) != 0) |
if (pipe((*s_etat_processus).pipe_signaux) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
Line 1538 lancement_thread_signaux(struct_processu
|
Line 1545 lancement_thread_signaux(struct_processu
|
return(d_erreur); |
return(d_erreur); |
} |
} |
|
|
argument = (*s_etat_processus).pipe_signaux; |
|
|
|
if (pthread_create(&((*s_etat_processus).thread_signaux), &attributs, |
if (pthread_create(&((*s_etat_processus).thread_signaux), &attributs, |
thread_signaux, argument) != 0) |
thread_signaux, s_etat_processus) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return(d_erreur); |
|
} |
|
|
|
if (pthread_attr_destroy(&attributs) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
return(d_erreur); |
return(d_erreur); |
Line 1560 arret_thread_signaux(struct_processus *s
|
Line 1571 arret_thread_signaux(struct_processus *s
|
|
|
do |
do |
{ |
{ |
n = write((*s_etat_processus).pipe_signaux[1], &signal, sizeof(signal)); |
n = write_atomic(s_etat_processus, (*s_etat_processus).pipe_signaux[1], |
|
&signal, sizeof(signal)); |
|
|
if (n < 0) |
if (n < 0) |
{ |
{ |
Line 1570 arret_thread_signaux(struct_processus *s
|
Line 1582 arret_thread_signaux(struct_processus *s
|
|
|
pthread_join((*s_etat_processus).thread_signaux, NULL); |
pthread_join((*s_etat_processus).thread_signaux, NULL); |
|
|
close((*s_etat_processus).pipe_signaux[0]); |
|
close((*s_etat_processus).pipe_signaux[1]); |
close((*s_etat_processus).pipe_signaux[1]); |
|
|
return(d_absence_erreur); |
return(d_absence_erreur); |
} |
} |
|
|
Line 1585 thread_signaux(void *argument)
|
Line 1595 thread_signaux(void *argument)
|
|
|
struct pollfd fds; |
struct pollfd fds; |
|
|
|
struct_processus *s_etat_processus; |
|
|
unsigned char signal; |
unsigned char signal; |
|
|
pipe = (int *) argument; |
s_etat_processus = (struct_processus *) argument; |
|
pipe = (*s_etat_processus).pipe_signaux; |
fds.fd = pipe[0]; |
fds.fd = pipe[0]; |
fds.events = POLLIN; |
fds.events = POLLIN; |
fds.revents = 0; |
|
|
|
sigfillset(&masque); |
sigfillset(&masque); |
pthread_sigmask(SIG_BLOCK, &masque, NULL); |
pthread_sigmask(SIG_BLOCK, &masque, NULL); |
|
|
do |
do |
{ |
{ |
if (poll(&fds, 1, -1) == -1) |
fds.revents = 0; |
|
|
|
while(poll(&fds, 1, -1) == -1) |
{ |
{ |
pthread_exit(NULL); |
if (errno != EINTR) |
|
{ |
|
close((*s_etat_processus).pipe_signaux[0]); |
|
pthread_exit(NULL); |
|
} |
} |
} |
|
|
# pragma GCC diagnostic push |
if (read_atomic(s_etat_processus, fds.fd, &signal, 1) != 1) |
# pragma GCC diagnostic ignored "-Wunused-result" |
{ |
|
close((*s_etat_processus).pipe_signaux[0]); |
read(fds.fd, &signal, 1); |
pthread_exit(NULL); |
|
} |
# pragma GCC diagnostic pop |
|
|
|
if (signal != (0xFF & rpl_sigmax)) |
if (signal != (0xFF & rpl_sigmax)) |
{ |
{ |
envoi_signal_processus(getpid(), signal); |
envoi_signal_processus(getpid(), signal, d_faux); |
// Un signal SIGALRM est envoyé par le thread de surveillance |
// Un signal SIGUSR2 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. |
} |
} |
} while(signal != (0xFF & rpl_sigmax)); |
} while(signal != (0xFF & rpl_sigmax)); |
|
|
|
close((*s_etat_processus).pipe_signaux[0]); |
pthread_exit(NULL); |
pthread_exit(NULL); |
} |
} |
|
|
|
|
|
static inline void |
|
_write(int fd, const void *buf, size_t count) |
|
{ |
|
ssize_t ios; |
|
|
|
while((ios = write(fd, buf, count)) == -1) |
|
{ |
|
if (errno != EINTR) |
|
{ |
|
break; |
|
} |
|
} |
|
|
|
return; |
|
} |
|
|
|
|
// Récupération des signaux |
// Récupération des signaux |
// - SIGINT (arrêt au clavier) |
// - SIGINT (arrêt au clavier) |
// - SIGTERM (signal d'arrêt en provenance du système) |
// - SIGTERM (signal d'arrêt en provenance du système) |
Line 1631 interruption1(int signal)
|
Line 1667 interruption1(int signal)
|
|
|
test_signal(signal); |
test_signal(signal); |
|
|
# pragma GCC diagnostic push |
|
# pragma GCC diagnostic ignored "-Wunused-result" |
|
|
|
switch(signal) |
switch(signal) |
{ |
{ |
case SIGINT: |
case SIGINT: |
signal_tronque = (unsigned char) (rpl_sigint & 0xFF); |
signal_tronque = (unsigned char) (rpl_sigint & 0xFF); |
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
break; |
break; |
|
|
case SIGTERM: |
case SIGTERM: |
signal_tronque = (unsigned char) (rpl_sigterm & 0xFF); |
signal_tronque = (unsigned char) (rpl_sigterm & 0xFF); |
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
break; |
break; |
|
|
case SIGUSR1: |
case SIGUSR1: |
signal_tronque = (unsigned char) (rpl_sigalrm & 0xFF); |
signal_tronque = (unsigned char) (rpl_sigalrm & 0xFF); |
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
break; |
break; |
|
|
default: |
default: |
// SIGALRM |
// SIGUSR2 |
break; |
break; |
} |
} |
|
|
# pragma GCC diagnostic pop |
|
|
|
return; |
return; |
} |
} |
|
|
Line 1679 interruption2(int signal)
|
Line 1710 interruption2(int signal)
|
test_signal(signal); |
test_signal(signal); |
|
|
signal_tronque = (unsigned char) (rpl_sigtstp & 0xFF); |
signal_tronque = (unsigned char) (rpl_sigtstp & 0xFF); |
|
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
# pragma GCC diagnostic push |
|
# pragma GCC diagnostic ignored "-Wunused-result" |
|
|
|
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
|
|
|
# pragma GCC diagnostic pop |
|
|
|
return; |
return; |
} |
} |
Line 1737 interruption4(int signal)
|
Line 1762 interruption4(int signal)
|
test_signal(signal); |
test_signal(signal); |
|
|
signal_tronque = (unsigned char) (rpl_sighup & 0xFF); |
signal_tronque = (unsigned char) (rpl_sighup & 0xFF); |
|
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
# pragma GCC diagnostic push |
|
# pragma GCC diagnostic ignored "-Wunused-result" |
|
|
|
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
|
|
|
# pragma GCC diagnostic pop |
|
|
|
return; |
return; |
} |
} |
Line 1766 interruption5(int signal)
|
Line 1785 interruption5(int signal)
|
if (pid_processus_pere == getpid()) |
if (pid_processus_pere == getpid()) |
{ |
{ |
signal_tronque = (unsigned char) (rpl_sigalrm & 0xFF); |
signal_tronque = (unsigned char) (rpl_sigalrm & 0xFF); |
write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
_write(pipe_signaux, &signal_tronque, sizeof(signal_tronque)); |
} |
} |
|
|
write(STDERR_FILENO, message, strlen(message)); |
write(STDERR_FILENO, message, strlen(message)); |
Line 1800 signal_alrm(struct_processus *s_etat_pro
|
Line 1819 signal_alrm(struct_processus *s_etat_pro
|
{ |
{ |
// On n'est pas dans le processus père, on remonte le signal. |
// On n'est pas dans le processus père, on remonte le signal. |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
rpl_sigalrm); |
rpl_sigalrm, d_faux); |
} |
} |
else |
else |
{ |
{ |
Line 1845 signal_term(struct_processus *s_etat_pro
|
Line 1864 signal_term(struct_processus *s_etat_pro
|
if ((*s_etat_processus).pid_processus_pere != getpid()) |
if ((*s_etat_processus).pid_processus_pere != getpid()) |
{ |
{ |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
rpl_sigterm); |
rpl_sigterm, d_faux); |
} |
} |
else |
else |
{ |
{ |
Line 1899 signal_int(struct_processus *s_etat_proc
|
Line 1918 signal_int(struct_processus *s_etat_proc
|
if ((*s_etat_processus).pid_processus_pere != getpid()) |
if ((*s_etat_processus).pid_processus_pere != getpid()) |
{ |
{ |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
rpl_sigint); |
rpl_sigint, d_faux); |
} |
} |
else |
else |
{ |
{ |
Line 1970 signal_tstp(struct_processus *s_etat_pro
|
Line 1989 signal_tstp(struct_processus *s_etat_pro
|
if ((*s_etat_processus).var_volatile_processus_pere == 0) |
if ((*s_etat_processus).var_volatile_processus_pere == 0) |
{ |
{ |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
envoi_signal_processus((*s_etat_processus).pid_processus_pere, |
rpl_sigtstp); |
rpl_sigtstp, d_faux); |
} |
} |
else |
else |
{ |
{ |
Line 2009 sortie_interruption_depassement_pile(voi
|
Line 2028 sortie_interruption_depassement_pile(voi
|
return; |
return; |
} |
} |
|
|
|
#ifndef BROKEN_SIGSEGV |
void |
void |
interruption_depassement_pile(int urgence, stackoverflow_context_t scp) |
interruption_depassement_pile(int urgence, stackoverflow_context_t scp) |
{ |
{ |
Line 2025 interruption_depassement_pile(int urgenc
|
Line 2045 interruption_depassement_pile(int urgenc
|
interruption3(SIGUSR2); |
interruption3(SIGUSR2); |
return; |
return; |
} |
} |
|
#endif |
|
|
int |
int |
interruption_violation_access(void *adresse_fautive, int gravite) |
interruption_violation_access(void *adresse_fautive, int gravite) |
Line 2038 interruption_violation_access(void *adre
|
Line 2059 interruption_violation_access(void *adre
|
{ |
{ |
// Il peut s'agir d'un dépassement de pile. |
// Il peut s'agir d'un dépassement de pile. |
|
|
sigsegv_leave_handler(sortie_interruption_depassement_pile, |
# ifndef BROKEN_SIGSEGV |
(void *) &routine_recursive, NULL, NULL); |
sigsegv_leave_handler(sortie_interruption_depassement_pile, |
|
(void *) &routine_recursive, NULL, NULL); |
|
# else |
|
sortie_interruption_depassement_pile((void *) &routine_recursive); |
|
# endif |
} |
} |
|
|
// On est dans une bonne vieille violation d'accès. On essaie |
// On est dans une bonne vieille violation d'accès. On essaie |
Line 2351 traitement_exceptions_gsl(const char *re
|
Line 2376 traitement_exceptions_gsl(const char *re
|
int line, int gsl_errno) |
int line, int gsl_errno) |
{ |
{ |
code_erreur_gsl = gsl_errno; |
code_erreur_gsl = gsl_errno; |
envoi_signal_processus(getpid(), rpl_sigexcept); |
envoi_signal_processus(getpid(), rpl_sigexcept, d_faux); |
return; |
return; |
} |
} |
|
|
Line 2475 scrutation_interruptions(struct_processu
|
Line 2500 scrutation_interruptions(struct_processu
|
if (msync(s_queue_signaux, sizeof(s_queue_signaux), |
if (msync(s_queue_signaux, sizeof(s_queue_signaux), |
MS_ASYNC | MS_INVALIDATE) != 0) |
MS_ASYNC | MS_INVALIDATE) != 0) |
{ |
{ |
|
sem_post(semaphore_queue_signaux); |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
return; |
return; |
} |
} |
Line 2604 nom_segment(unsigned char *chemin, pid_t
|
Line 2630 nom_segment(unsigned char *chemin, pid_t
|
*/ |
*/ |
|
|
int |
int |
envoi_signal_processus(pid_t pid, enum signaux_rpl signal) |
envoi_signal_processus(pid_t pid, enum signaux_rpl signal, |
|
logical1 test_ouverture) |
{ |
{ |
# ifndef OS2 |
# ifndef OS2 |
int segment; |
int segment; |
Line 2624 envoi_signal_processus(pid_t pid, enum s
|
Line 2651 envoi_signal_processus(pid_t pid, enum s
|
|
|
struct_queue_signaux *queue; |
struct_queue_signaux *queue; |
|
|
|
struct timespec attente; |
|
|
unsigned char *nom; |
unsigned char *nom; |
|
|
// Il s'agit d'ouvrir le segment de mémoire partagée, de le projeter en |
// Il s'agit d'ouvrir le segment de mémoire partagée, de le projeter en |
Line 2685 envoi_signal_processus(pid_t pid, enum s
|
Line 2714 envoi_signal_processus(pid_t pid, enum s
|
} |
} |
|
|
# ifndef OS2 // SysV |
# ifndef OS2 // SysV |
if ((desc = open(nom, O_RDWR)) == -1) |
if (test_ouverture == d_vrai) |
{ |
{ |
sys_free(nom); |
attente.tv_sec = 0; |
return(1); |
attente.tv_nsec = GRANULARITE_us * 1000; |
|
|
|
while((desc = open(nom, O_RDWR)) == -1) |
|
{ |
|
nanosleep(&attente, NULL); |
|
INCR_GRANULARITE(attente.tv_nsec); |
|
} |
|
} |
|
else |
|
{ |
|
if ((desc = open(nom, O_RDWR)) == -1) |
|
{ |
|
sys_free(nom); |
|
return(1); |
|
} |
} |
} |
|
|
close(desc); |
close(desc); |
Line 2709 envoi_signal_processus(pid_t pid, enum s
|
Line 2752 envoi_signal_processus(pid_t pid, enum s
|
|
|
queue = shmat(segment, NULL, 0); |
queue = shmat(segment, NULL, 0); |
# else // OS/2 |
# else // OS/2 |
if (DosGetNamedSharedMem((PVOID) &queue, nom, |
if (test_ouverture == d_vrai) |
PAG_WRITE | PAG_READ) != 0) |
|
{ |
{ |
sys_free(nom); |
attente.tv_sec = 0; |
return(1); |
attente.tv_nsec = GRANULARITE_us * 1000; |
|
|
|
while(DosGetNamedSharedMem((PVOID) &queue, nom, |
|
PAG_WRITE | PAG_READ) != 0) |
|
{ |
|
nanosleep(&attente, NULL); |
|
INCR_GRANULARITE(attente.tv_nsec); |
|
} |
|
} |
|
else |
|
{ |
|
if (DosGetNamedSharedMem((PVOID) &queue, nom, |
|
PAG_WRITE | PAG_READ) != 0) |
|
{ |
|
sys_free(nom); |
|
return(1); |
|
} |
} |
} |
|
|
sys_free(nom); |
sys_free(nom); |
Line 2724 envoi_signal_processus(pid_t pid, enum s
|
Line 2782 envoi_signal_processus(pid_t pid, enum s
|
return(1); |
return(1); |
} |
} |
|
|
if ((segment = shm_open(nom, O_RDWR, 0)) == -1) |
if (test_ouverture == d_vrai) |
{ |
{ |
sys_free(nom); |
attente.tv_sec = 0; |
return(1); |
attente.tv_nsec = GRANULARITE_us * 1000; |
|
|
|
while((segment = shm_open(nom, O_RDWR, 0)) == -1) |
|
{ |
|
nanosleep(&attente, NULL); |
|
INCR_GRANULARITE(attente.tv_nsec); |
|
} |
|
} |
|
else |
|
{ |
|
if ((segment = shm_open(nom, O_RDWR, 0)) == -1) |
|
{ |
|
sys_free(nom); |
|
return(1); |
|
} |
} |
} |
|
|
sys_free(nom); |
sys_free(nom); |
Line 2746 envoi_signal_processus(pid_t pid, enum s
|
Line 2818 envoi_signal_processus(pid_t pid, enum s
|
|
|
if ((semaphore = sem_open2(pid, SEM_QUEUE)) == SEM_FAILED) |
if ((semaphore = sem_open2(pid, SEM_QUEUE)) == SEM_FAILED) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
return(1); |
return(1); |
} |
} |
|
|
if ((signalisation = sem_open2(pid, SEM_SIGNALISATION)) |
if ((signalisation = sem_open2(pid, SEM_SIGNALISATION)) |
== SEM_FAILED) |
== SEM_FAILED) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
sem_close(semaphore); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
sem_close(semaphore); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
sem_close(semaphore); |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
|
sem_close(semaphore); |
return(1); |
return(1); |
} |
} |
|
|
Line 2759 envoi_signal_processus(pid_t pid, enum s
|
Line 2886 envoi_signal_processus(pid_t pid, enum s
|
{ |
{ |
if (errno != EINTR) |
if (errno != EINTR) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) |
|
!= 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
sem_close(semaphore); |
sem_close(semaphore); |
sem_close(signalisation); |
sem_close(signalisation); |
return(1); |
return(1); |
Line 2771 envoi_signal_processus(pid_t pid, enum s
|
Line 2931 envoi_signal_processus(pid_t pid, enum s
|
(*queue).pointeur_ecriture = ((*queue).pointeur_ecriture + 1) |
(*queue).pointeur_ecriture = ((*queue).pointeur_ecriture + 1) |
% LONGUEUR_QUEUE_SIGNAUX; |
% LONGUEUR_QUEUE_SIGNAUX; |
|
|
# ifndef IPCS_SYSV |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
# endif |
|
|
|
if (sem_post(semaphore) != 0) |
if (sem_post(semaphore) != 0) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
sem_close(semaphore); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
sem_close(semaphore); |
sem_close(semaphore); |
sem_close(signalisation); |
sem_close(signalisation); |
return(1); |
return(1); |
Line 2789 envoi_signal_processus(pid_t pid, enum s
|
Line 2972 envoi_signal_processus(pid_t pid, enum s
|
|
|
if (sem_close(semaphore) != 0) |
if (sem_close(semaphore) != 0) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
|
sem_close(signalisation); |
return(1); |
return(1); |
} |
} |
|
|
if (sem_post(signalisation) != 0) |
if (sem_post(signalisation) != 0) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
sem_close(signalisation); |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
sem_close(signalisation); |
sem_close(signalisation); |
return(1); |
return(1); |
} |
} |
|
|
if (sem_close(signalisation) != 0) |
if (sem_close(signalisation) != 0) |
{ |
{ |
|
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
|
{ |
|
close(segment); |
|
return(1); |
|
} |
|
|
|
close(segment); |
|
# else // IPCS_SYSV |
|
# ifndef OS2 // SysV |
|
if (shmdt(queue) != 0) |
|
{ |
|
return(1); |
|
} |
|
# else // OS/2 |
|
// Pendant de DosGetNamedSHaredMem() |
|
# endif |
|
# endif |
|
|
return(1); |
return(1); |
} |
} |
|
|
# ifndef IPCS_SYSV // POSIX |
# ifndef IPCS_SYSV // POSIX |
|
if (msync(queue, sizeof(queue), MS_ASYNC | MS_INVALIDATE) != 0) |
|
{ |
|
munmap(queue, sizeof(struct_queue_signaux)); |
|
close(segment); |
|
return(1); |
|
} |
|
|
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
if (munmap(queue, sizeof(struct_queue_signaux)) != 0) |
{ |
{ |
close(segment); |
close(segment); |
return(1); |
return(1); |
} |
} |
|
|
|
close(segment); |
# else // IPCS_SYSV |
# else // IPCS_SYSV |
# ifndef OS2 // SysV |
# ifndef OS2 // SysV |
if (shmdt(queue) != 0) |
if (shmdt(queue) != 0) |
Line 2934 creation_queue_signaux(struct_processus
|
Line 3211 creation_queue_signaux(struct_processus
|
|
|
unsigned char *nom; |
unsigned char *nom; |
|
|
|
if (lancement_thread_signaux(s_etat_processus) == d_erreur) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
|
racine_segment = (*s_etat_processus).chemin_fichiers_temporaires; |
racine_segment = (*s_etat_processus).chemin_fichiers_temporaires; |
|
|
# ifndef IPCS_SYSV // POSIX |
# ifndef IPCS_SYSV // POSIX |
Line 2947 creation_queue_signaux(struct_processus
|
Line 3230 creation_queue_signaux(struct_processus
|
if ((f_queue_signaux = shm_open(nom, O_RDWR | O_CREAT | O_EXCL, |
if ((f_queue_signaux = shm_open(nom, O_RDWR | O_CREAT | O_EXCL, |
S_IRUSR | S_IWUSR)) == -1) |
S_IRUSR | S_IWUSR)) == -1) |
{ |
{ |
sys_free(nom); |
if (errno != EEXIST) |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
{ |
return; |
sys_free(nom); |
|
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
|
return; |
|
} |
|
|
|
if ((*s_etat_processus).langue == 'F') |
|
{ |
|
printf("+++Attention : Le segment de mémoire %s préexiste !\n", |
|
nom); |
|
} |
|
else |
|
{ |
|
printf("+++Warning: %s memory segment preexists!\n", nom); |
|
} |
|
|
|
if ((f_queue_signaux = shm_open(nom, O_RDWR | O_CREAT | O_TRUNC, |
|
S_IRUSR | S_IWUSR)) == -1) |
|
{ |
|
sys_free(nom); |
|
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
|
return; |
|
} |
} |
} |
|
|
if (ftruncate(f_queue_signaux, sizeof(struct_queue_signaux)) == -1) |
if (ftruncate(f_queue_signaux, sizeof(struct_queue_signaux)) == -1) |
Line 3133 creation_queue_signaux(struct_processus
|
Line 3437 creation_queue_signaux(struct_processus
|
return; |
return; |
} |
} |
|
|
# ifdef SCHED_OTHER |
(*s_queue_signaux).controle = getpid(); |
if (pthread_attr_setschedpolicy(&attributs, SCHED_OTHER) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
# endif |
|
|
|
# ifdef PTHREAD_EXPLICIT_SCHED |
|
if (pthread_attr_setinheritsched(&attributs, PTHREAD_EXPLICIT_SCHED) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
# endif |
|
|
|
# ifdef PTHREAD_SCOPE_SYSTEM |
if (pthread_create(&((*s_queue_signaux).thread_signaux), &attributs, |
if (pthread_attr_setscope(&attributs, PTHREAD_SCOPE_SYSTEM) != 0) |
thread_surveillance_signaux, s_etat_processus) != 0) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
return; |
return; |
} |
} |
# endif |
|
|
|
if (pthread_attr_destroy(&attributs) != 0) |
if (pthread_attr_destroy(&attributs) != 0) |
{ |
{ |
Line 3163 creation_queue_signaux(struct_processus
|
Line 3452 creation_queue_signaux(struct_processus
|
return; |
return; |
} |
} |
|
|
if (pthread_create(&((*s_queue_signaux).thread_signaux), &attributs, |
|
thread_surveillance_signaux, s_etat_processus) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
|
|
(*s_queue_signaux).controle = getpid(); |
|
|
|
# ifndef IPCS_SYSV |
# ifndef IPCS_SYSV |
if (msync(s_queue_signaux, sizeof(s_queue_signaux), |
if (msync(s_queue_signaux, sizeof(s_queue_signaux), |
MS_ASYNC | MS_INVALIDATE) != 0) |
MS_ASYNC | MS_INVALIDATE) != 0) |
Line 3201 creation_queue_signaux(struct_processus
|
Line 3481 creation_queue_signaux(struct_processus
|
void |
void |
liberation_queue_signaux(struct_processus *s_etat_processus) |
liberation_queue_signaux(struct_processus *s_etat_processus) |
{ |
{ |
sem_wait(semaphore_arret_signalisation); |
|
(*s_queue_signaux).requete_arret = d_vrai; |
|
|
|
# ifndef IPCS_SYSV |
|
msync(s_queue_signaux, sizeof(s_queue_signaux), MS_ASYNC | MS_INVALIDATE); |
|
# endif |
|
|
|
sem_post(semaphore_arret_signalisation); |
|
|
|
// Incrémenter le sémaphore pour être sûr de le débloquer. |
|
|
|
sem_post(semaphore_signalisation); |
|
|
|
if (getpid() == (*s_queue_signaux).controle) |
|
{ |
|
pthread_join((*s_queue_signaux).thread_signaux, NULL); |
|
} |
|
|
|
# ifdef IPCS_SYSV // SystemV |
# ifdef IPCS_SYSV // SystemV |
# ifndef OS2 |
# ifndef OS2 |
if (shmdt(s_queue_signaux) == -1) |
if (shmdt(s_queue_signaux) == -1) |
Line 3266 destruction_queue_signaux(struct_process
|
Line 3528 destruction_queue_signaux(struct_process
|
unsigned char *nom; |
unsigned char *nom; |
# endif |
# endif |
|
|
sem_wait(semaphore_arret_signalisation); |
// On dépile les interruptions pour arrêter les SIGUSR2 sur |
|
// le processus courant. |
|
|
|
scrutation_interruptions(s_etat_processus); |
|
|
|
while(sem_wait(semaphore_arret_signalisation) != 0) |
|
{ |
|
if (errno != EINTR) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
} |
|
|
(*s_queue_signaux).requete_arret = d_vrai; |
(*s_queue_signaux).requete_arret = d_vrai; |
|
|
Line 3279 destruction_queue_signaux(struct_process
|
Line 3553 destruction_queue_signaux(struct_process
|
// Incrémenter le sémaphore pour être sûr de le débloquer. |
// Incrémenter le sémaphore pour être sûr de le débloquer. |
|
|
sem_post(semaphore_signalisation); |
sem_post(semaphore_signalisation); |
pthread_join((*s_queue_signaux).thread_signaux, NULL); |
|
|
if ((*s_queue_signaux).controle == getpid()) |
|
{ |
|
pthread_join((*s_queue_signaux).thread_signaux, NULL); |
|
} |
|
else |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
return; |
|
} |
|
|
# ifdef IPCS_SYSV // SystemV |
# ifdef IPCS_SYSV // SystemV |
# ifndef OS2 |
# ifndef OS2 |
Line 3379 destruction_queue_signaux(struct_process
|
Line 3662 destruction_queue_signaux(struct_process
|
sys_free(nom); |
sys_free(nom); |
# endif |
# endif |
|
|
|
arret_thread_signaux(s_etat_processus); |
return; |
return; |
} |
} |
|
|