version 1.51, 2011/09/14 17:55:59
|
version 1.68, 2012/10/05 13:12:38
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.3 |
RPL/2 (R) version 4.1.11 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2012 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 73 lancement_thread(void *argument)
|
Line 73 lancement_thread(void *argument)
|
|
|
s_argument_thread = (struct_descripteur_thread *) argument; |
s_argument_thread = (struct_descripteur_thread *) argument; |
s_etat_processus = (*s_argument_thread).s_nouvel_etat_processus; |
s_etat_processus = (*s_argument_thread).s_nouvel_etat_processus; |
(*s_argument_thread).tid = pthread_self(); |
|
(*s_argument_thread).thread_actif = d_vrai; |
|
|
|
if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
|
|
pthread_mutex_lock(&((*s_argument_thread).mutex)); |
|
pthread_mutex_unlock(&((*s_argument_thread).mutex)); |
|
|
|
(*s_argument_thread).thread_actif = d_faux; |
|
|
|
tid_final = -2; |
# ifndef SEMAPHORES_NOMMES |
|
sem_init(&((*s_etat_processus).semaphore_fork), 0, 0); |
while((longueur_ecriture = write_atomic(s_etat_processus, |
# else |
(*s_argument_thread).pipe_nombre_interruptions_attente[1], |
if (((*s_etat_processus).semaphore_fork = sem_init3(0, getpid(), |
&tid_final, sizeof(tid_final))) != sizeof(tid_final)) |
pthread_self(), SEM_FORK)) == SEM_FAILED) |
{ |
{ |
if (longueur_ecriture == -1) |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
{ |
return(NULL); |
break; |
|
} |
|
} |
} |
|
# endif |
|
|
while((longueur_ecriture = write_atomic(s_etat_processus, |
(*s_argument_thread).tid = pthread_self(); |
(*s_argument_thread).pipe_nombre_objets_attente[1], |
(*s_argument_thread).thread_actif = d_vrai; |
&tid_final, sizeof(tid_final))) != sizeof(tid_final)) |
|
{ |
|
if (longueur_ecriture == -1) |
|
{ |
|
break; |
|
} |
|
} |
|
|
|
pthread_exit(NULL); |
|
} |
|
|
|
insertion_thread(s_etat_processus, d_faux); |
insertion_thread(s_etat_processus, d_faux); |
|
|
Line 119 lancement_thread(void *argument)
|
Line 97 lancement_thread(void *argument)
|
(*s_argument_thread).pipe_nombre_objets_attente[1], |
(*s_argument_thread).pipe_nombre_objets_attente[1], |
"-", sizeof(unsigned char)) != sizeof(unsigned char)) |
"-", sizeof(unsigned char)) != sizeof(unsigned char)) |
{ |
{ |
pthread_mutex_unlock(&((*s_etat_processus).mutex)); |
|
(*s_etat_processus).erreur_systeme = d_es_processus; |
(*s_etat_processus).erreur_systeme = d_es_processus; |
|
|
pthread_mutex_lock(&((*s_argument_thread).mutex)); |
pthread_mutex_lock(&((*s_argument_thread).mutex)); |
Line 127 lancement_thread(void *argument)
|
Line 104 lancement_thread(void *argument)
|
|
|
(*s_argument_thread).thread_actif = d_faux; |
(*s_argument_thread).thread_actif = d_faux; |
|
|
tid_final = -2; |
tid_final = (pthread_t) -2; |
|
|
while((longueur_ecriture = write_atomic(s_etat_processus, |
while((longueur_ecriture = write_atomic(s_etat_processus, |
(*s_argument_thread).pipe_nombre_interruptions_attente[1], |
(*s_argument_thread).pipe_nombre_interruptions_attente[1], |
Line 242 lancement_thread(void *argument)
|
Line 219 lancement_thread(void *argument)
|
pthread_cancel((*s_etat_processus).thread_fusible); |
pthread_cancel((*s_etat_processus).thread_fusible); |
} |
} |
|
|
tid_final = -2; |
tid_final = (pthread_t) -2; |
|
|
while((longueur_ecriture = write_atomic(s_etat_processus, |
while((longueur_ecriture = write_atomic(s_etat_processus, |
(*s_argument_thread).pipe_nombre_interruptions_attente[1], |
(*s_argument_thread).pipe_nombre_interruptions_attente[1], |
Line 836 lancement_thread(void *argument)
|
Line 813 lancement_thread(void *argument)
|
liberation_arbre_variables(s_etat_processus, |
liberation_arbre_variables(s_etat_processus, |
(*s_etat_processus).s_arbre_variables, d_faux); |
(*s_etat_processus).s_arbre_variables, d_faux); |
|
|
for(i = 0; i < (*s_etat_processus).nombre_variables_statiques; i++) |
|
{ |
|
liberation(s_etat_processus, |
|
(*s_etat_processus).s_liste_variables_statiques[i].objet); |
|
free((*s_etat_processus).s_liste_variables_statiques[i].nom); |
|
} |
|
|
|
free((*s_etat_processus).s_liste_variables_statiques); |
|
|
|
l_element_courant = (*s_etat_processus).l_base_pile; |
l_element_courant = (*s_etat_processus).l_base_pile; |
while(l_element_courant != NULL) |
while(l_element_courant != NULL) |
{ |
{ |
Line 1018 lancement_thread(void *argument)
|
Line 986 lancement_thread(void *argument)
|
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(&((*s_etat_processus).mutex_fork)); |
|
|
# ifndef SEMAPHORES_NOMMES |
|
sem_destroy(&((*s_etat_processus).semaphore_fork)); |
|
# else |
|
sem_destroy3((*s_etat_processus).semaphore_fork, getpid(), |
|
pthread_self(), SEM_FORK); |
|
# endif |
|
|
liberation_contexte_cas(s_etat_processus); |
liberation_contexte_cas(s_etat_processus); |
free((*s_etat_processus).localisation); |
free((*s_etat_processus).localisation); |