version 1.182, 2012/10/07 08:18:36
|
version 1.186, 2012/12/14 14:19:50
|
Line 19
|
Line 19
|
================================================================================ |
================================================================================ |
*/ |
*/ |
|
|
#define DEBUG_ERREURS |
|
#ifndef INCLUSION_RPL |
#ifndef INCLUSION_RPL |
#define INCLUSION_RPL |
#define INCLUSION_RPL |
|
|
Line 1553 typedef struct variable_partage
|
Line 1553 typedef struct variable_partage
|
union_position_variable variable_partagee; |
union_position_variable variable_partagee; |
|
|
struct_objet *objet; |
struct_objet *objet; |
} struct_variable_partagee; |
|
|
|
typedef struct table_variables_partagees |
|
{ |
|
pthread_mutex_t mutex; |
|
|
|
volatile struct_variable_partagee *table; |
|
|
|
volatile unsigned long nombre_variables; |
pthread_mutex_t mutex; |
volatile unsigned long nombre_variables_allouees; |
} struct_variable_partagee; |
|
|
unsigned long position_variable; |
|
} struct_table_variables_partagees; |
|
|
|
#endif |
#endif |
|
|
Line 1748 typedef struct arbre_variables
|
Line 1738 typedef struct arbre_variables
|
|
|
struct liste_variables *feuille; |
struct liste_variables *feuille; |
struct liste_variables_statiques *feuille_statique; |
struct liste_variables_statiques *feuille_statique; |
|
struct liste_variables_partagees **feuille_partagee; |
|
|
|
pthread_mutex_t mutex_feuille_partagee; |
} struct_arbre_variables; |
} struct_arbre_variables; |
|
|
|
#define INITIALISATION_MUTEX(mutex) \ |
|
do { \ |
|
pthread_mutexattr_t attributs_mutex; \ |
|
pthread_mutexattr_init(&attributs_mutex); \ |
|
pthread_mutexattr_settype(&attributs_mutex, PTHREAD_MUTEX_NORMAL); \ |
|
pthread_mutex_init(&(mutex), &attributs_mutex); \ |
|
pthread_mutexattr_destroy(&attributs_mutex); \ |
|
} while(0) |
|
|
typedef struct tableau_variables |
typedef struct tableau_variables |
{ |
{ |
unsigned char origine; |
unsigned char origine; |
Line 1793 typedef struct liste_variables_statiques
|
Line 1795 typedef struct liste_variables_statiques
|
struct_arbre_variables *feuille; |
struct_arbre_variables *feuille; |
struct_variable_statique *variable; |
struct_variable_statique *variable; |
} struct_liste_variables_statiques; |
} struct_liste_variables_statiques; |
|
|
|
typedef struct liste_variables_partagees |
|
{ |
|
struct liste_variables_partagees *suivant; |
|
struct liste_variables_partagees *precedent; |
|
struct liste_variables_partagees *reference; |
|
struct_arbre_variables *feuille; |
|
struct_variable_partagee *variable; |
|
} struct_liste_variables_partagees; |
#endif |
#endif |
|
|
/* |
/* |
Line 1882 typedef struct processus
|
Line 1893 typedef struct processus
|
logical1 presence_fusible; |
logical1 presence_fusible; |
pthread_t thread_fusible; |
pthread_t thread_fusible; |
pthread_t thread_surveille_par_fusible; |
pthread_t thread_surveille_par_fusible; |
|
pthread_t thread_signaux; |
|
int pipe_signaux[2]; |
|
|
volatile int pointeur_signal_ecriture; |
volatile int pointeur_signal_ecriture; |
volatile int pointeur_signal_lecture; |
volatile int pointeur_signal_lecture; |
Line 1910 typedef struct processus
|
Line 1923 typedef struct processus
|
struct_liste_variables *l_liste_variables_par_niveau; |
struct_liste_variables *l_liste_variables_par_niveau; |
struct_liste_variables_statiques |
struct_liste_variables_statiques |
*l_liste_variables_statiques; |
*l_liste_variables_statiques; |
struct_table_variables_partagees |
struct_liste_variables_partagees |
*s_liste_variables_partagees; |
*l_liste_variables_partagees; |
|
|
logical1 niveau_supprime; |
logical1 niveau_supprime; |
|
|
struct_variable *pointeur_variable_courante; |
struct_variable *pointeur_variable_courante; |
struct_liste_variables *pointeur_feuille_courante; |
struct_liste_variables *pointeur_feuille_courante; |
struct_variable_statique *pointeur_variable_statique_courante; |
struct_variable_statique *pointeur_variable_statique_courante; |
|
struct_variable_partagee *pointeur_variable_partagee_courante; |
|
|
int *pointeurs_caracteres_variables; |
int *pointeurs_caracteres_variables; |
int nombre_caracteres_variables; |
int nombre_caracteres_variables; |
Line 2979 void liberation_arbre_instructions(struc
|
Line 2993 void liberation_arbre_instructions(struc
|
struct_instruction *arbre); |
struct_instruction *arbre); |
void liberation_arbre_variables(struct_processus *s_etat_processus, |
void liberation_arbre_variables(struct_processus *s_etat_processus, |
struct_arbre_variables *arbre, logical1 definitions); |
struct_arbre_variables *arbre, logical1 definitions); |
|
void liberation_arbre_variables_partagees(struct_processus *s_etat_processus, |
|
struct_arbre_variables *arbre); |
void liberation_contexte_cas(struct_processus *s_etat_processus); |
void liberation_contexte_cas(struct_processus *s_etat_processus); |
void liberation_generateur_aleatoire(struct_processus *s_etat_processus); |
void liberation_generateur_aleatoire(struct_processus *s_etat_processus); |
void liberation_threads(struct_processus *s_etat_processus); |
void liberation_threads(struct_processus *s_etat_processus); |
Line 3005 void scrutation_interruptions(struct_pro
|
Line 3021 void scrutation_interruptions(struct_pro
|
void sf(struct_processus *s_etat_processus, unsigned char indice_drapeau); |
void sf(struct_processus *s_etat_processus, unsigned char indice_drapeau); |
void *surveillance_processus(void *argument); |
void *surveillance_processus(void *argument); |
void swap(void *variable_1, void *variable_2, unsigned long taille_octets); |
void swap(void *variable_1, void *variable_2, unsigned long taille_octets); |
|
void *thread_signaux(void *argument); |
void trace(struct_processus *s_etat_processus, FILE *flux); |
void trace(struct_processus *s_etat_processus, FILE *flux); |
void traitement_asynchrone_exceptions_gsl(struct_processus *s_etat_processus); |
void traitement_asynchrone_exceptions_gsl(struct_processus *s_etat_processus); |
void traitement_exceptions_gsl(const char *reason, const char *file, |
void traitement_exceptions_gsl(const char *reason, const char *file, |
Line 3174 unsigned char *transliteration(struct_pr
|
Line 3191 unsigned char *transliteration(struct_pr
|
|
|
#ifndef RPLARGS |
#ifndef RPLARGS |
logical1 analyse_syntaxique(struct_processus *s_etat_processus); |
logical1 analyse_syntaxique(struct_processus *s_etat_processus); |
|
logical1 arret_thread_signaux(struct_processus *s_etat_processus); |
logical1 caracteristiques_fichier(struct_processus *s_etat_processus, |
logical1 caracteristiques_fichier(struct_processus *s_etat_processus, |
unsigned char *nom, logical1 *existence, logical1 *ouverture, |
unsigned char *nom, logical1 *existence, logical1 *ouverture, |
unsigned long *unite); |
unsigned long *unite); |
Line 3204 logical1 initialisation_fichier_acces_di
|
Line 3222 logical1 initialisation_fichier_acces_di
|
sqlite3 *sqlite, logical1 binaire); |
sqlite3 *sqlite, logical1 binaire); |
logical1 initialisation_fichier_acces_indexe(struct_processus *s_etat_processus, |
logical1 initialisation_fichier_acces_indexe(struct_processus *s_etat_processus, |
sqlite3 *sqlite, integer8 position_clef, logical1 binaire); |
sqlite3 *sqlite, integer8 position_clef, logical1 binaire); |
|
logical1 lancement_thread_signaux(struct_processus *s_etat_processus); |
logical1 recherche_instruction_suivante(struct_processus *s_etat_processus); |
logical1 recherche_instruction_suivante(struct_processus *s_etat_processus); |
logical1 retrait_variable(struct_processus *s_etat_processus, |
logical1 retrait_variable(struct_processus *s_etat_processus, |
unsigned char *nom_variable, unsigned char type); |
unsigned char *nom_variable, unsigned char type); |
logical1 retrait_variables_par_niveau(struct_processus *s_etat_processus); |
logical1 retrait_variables_par_niveau(struct_processus *s_etat_processus); |
logical1 retrait_variable_partagee(struct_processus *s_etat_processus, |
logical1 retrait_variable_partagee(struct_processus *s_etat_processus, |
unsigned char *nom_variable, union_position_variable position); |
unsigned char *nom_variable, union_position_variable position); |
logical1 retrait_variables_statiques_locales( |
logical1 retrait_variables_partagees_locales( |
struct_processus *s_etat_processus); |
struct_processus *s_etat_processus); |
logical1 retrait_variable_statique(struct_processus *s_etat_processus, |
logical1 retrait_variable_statique(struct_processus *s_etat_processus, |
unsigned char *nom_variable, union_position_variable position); |
unsigned char *nom_variable, union_position_variable position); |
|
logical1 retrait_variables_statiques_locales( |
|
struct_processus *s_etat_processus); |
logical1 sequenceur(struct_processus *s_etat_processus); |
logical1 sequenceur(struct_processus *s_etat_processus); |
logical1 sequenceur_optimise(struct_processus *s_etat_processus); |
logical1 sequenceur_optimise(struct_processus *s_etat_processus); |
#endif |
#endif |