Diff for /rpl/src/rpl.h between versions 1.124 and 1.136

version 1.124, 2011/09/16 14:42:03 version 1.136, 2011/10/10 10:58:12
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.3    RPL/2 (R) version 4.1.4
   Copyright (C) 1989-2011 Dr. BERTRAND Joël    Copyright (C) 1989-2011 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 43 Line 43
 #ifdef OS2  #ifdef OS2
 #   ifndef __RPLCAS  #   ifndef __RPLCAS
 #       define _BSD_SOURCE  #       define _BSD_SOURCE
 #       define _XOPEN_SOURCE    600  
 #   endif  #   endif
   
 #   include <types.h>  #   include <types.h>
Line 99 Line 98
 #   endif  #   endif
   
 #   include <pwd.h>  #   include <pwd.h>
 #   include <sys/shm.h>  #   ifdef SHARED_MEMORY
   #       include <sys/shm.h>
   #   endif
   
 #   ifndef IPCS_SYSV  #   ifndef IPCS_SYSV
 #       include <semaphore.h>  #       include <semaphore.h>
Line 122 Line 123
                 ULONG   *nopened;                  ULONG   *nopened;
                 ULONG   allocated;                  ULONG   allocated;
             } sem_t;              } sem_t;
 #       else  #       else // IPCS_SYSV
             typedef struct              typedef struct
             {              {
                 int             sem;                  int             sem;
                   int             alloue;
                 unsigned char   *path;                  unsigned char   *path;
                 pid_t           pid;                  pid_t           pid;
                   pthread_t       tid;
             } sem_t;              } sem_t;
 #       endif  #       endif
   
 #       define SEM_FAILED   NULL  #       ifndef SEM_FAILED
   #           define SEM_FAILED   NULL
   #       endif
   
         sem_t *sem_open_SysV(const char *nom, int oflag, ...);          sem_t *sem_open_SysV(const char *nom, int oflag, ...);
         int sem_init_SysV(sem_t *sem, int shared, unsigned int value);          int sem_init_SysV(sem_t *sem, int shared, unsigned int value);
Line 158 Line 163
   
 #   include "openssl/evp.h"  #   include "openssl/evp.h"
 #   include "sqlite3.h"  #   include "sqlite3.h"
   #   include "sigsegv.h"
   #   ifdef OS2
           // Bug de libsigsegv
   #       undef HAVE_STACK_OVERFLOW_RECOVERY
   #   endif
   
 #   define HAVE_INLINE  #   define HAVE_INLINE
 #   define GSL_RANGE_CHECK_OFF  #   define GSL_RANGE_CHECK_OFF
Line 237  enum signaux_rpl Line 247  enum signaux_rpl
 // Elle est projetée dans un segment de mémoire partagée pour qu'elle soit  // Elle est projetée dans un segment de mémoire partagée pour qu'elle soit
 // accessible à la fois du père et des fils.  // accessible à la fois du père et des fils.
   
   #ifndef RPLARGS
 typedef struct queue_signaux  typedef struct queue_signaux
 {  {
     sem_t  #   ifndef IPCS_SYSV
 #   ifdef SEMAPHORES_NOMMES  #       ifndef SEMAPHORES_NOMMES
         *              sem_t               semaphore;
   #       endif
   #   else
           sem_t                   semaphore;
 #   endif  #   endif
                                 semaphore;  
   
     volatile int                pointeur_lecture;      volatile int                pointeur_lecture;
     volatile int                pointeur_ecriture;      volatile int                pointeur_ecriture;
Line 255  typedef struct queue_signaux Line 268  typedef struct queue_signaux
     }                           queue[LONGUEUR_QUEUE_SIGNAUX];      }                           queue[LONGUEUR_QUEUE_SIGNAUX];
 } struct_queue_signaux;  } struct_queue_signaux;
   
 #ifndef RPLARGS  
 #   ifndef MAIN_RPL  #   ifndef MAIN_RPL
         extern struct_queue_signaux         *s_queue_signaux;          extern struct_queue_signaux         *s_queue_signaux;
         extern int                          f_queue_signaux;          extern int                          f_queue_signaux;
   #       ifdef SEMAPHORES_NOMMES
               extern sem_t                    *semaphore_queue_signaux;
   #       endif
 #   else  #   else
         struct_queue_signaux                *s_queue_signaux;          struct_queue_signaux                *s_queue_signaux;
         int                                 f_queue_signaux;          int                                 f_queue_signaux;
   #       ifdef SEMAPHORES_NOMMES
               sem_t                           *semaphore_queue_signaux;
   #       endif
 #   endif  #   endif
 #endif  #endif
   
Line 287  union semun Line 305  union semun
 };  };
 #endif  #endif
   
   #ifndef RTLD_LOCAL
   #   define RTLD_LOCAL       0
   #endif
   
   #ifndef SIGSTKSZ
   #   define SIGSTKSZ         65536
   #endif
   
 /*  /*
 ================================================================================  ================================================================================
Line 391  typedef unsigned char   t_8_bits; Line 416  typedef unsigned char   t_8_bits;
 #   endif  #   endif
   
 #   ifndef MAIN_RPL  #   ifndef MAIN_RPL
         extern jmp_buf              contexte;          extern jmp_buf              contexte_ecriture;
           extern jmp_buf              contexte_impression;
         extern jmp_buf              contexte_initial;          extern jmp_buf              contexte_initial;
         extern jmp_buf              contexte_processus;          extern jmp_buf              contexte_processus;
         extern jmp_buf              contexte_thread;          extern jmp_buf              contexte_thread;
Line 412  typedef unsigned char   t_8_bits; Line 438  typedef unsigned char   t_8_bits;
             *              *
 #       endif  #       endif
                                     semaphore_gestionnaires_signaux;                                      semaphore_gestionnaires_signaux;
   
           extern volatile int         routine_recursive;
 #   else  #   else
         jmp_buf                     contexte;          jmp_buf                     contexte_ecriture;
           jmp_buf                     contexte_impression;
         jmp_buf                     contexte_initial;          jmp_buf                     contexte_initial;
         jmp_buf                     contexte_processus;          jmp_buf                     contexte_processus;
         jmp_buf                     contexte_thread;          jmp_buf                     contexte_thread;
Line 428  typedef unsigned char   t_8_bits; Line 457  typedef unsigned char   t_8_bits;
   
         pthread_mutex_t             mutex_liste_threads =          pthread_mutex_t             mutex_liste_threads =
                                             PTHREAD_MUTEX_INITIALIZER;                                              PTHREAD_MUTEX_INITIALIZER;
         pthread_mutex_t             mutex_gestiionnaires_signaux =          pthread_mutex_t             mutex_gestionnaires_signaux =
                                             PTHREAD_MUTEX_INITIALIZER;                                              PTHREAD_MUTEX_INITIALIZER;
         pthread_mutex_t             mutex_gestionnaires_signaux_atomique =          pthread_mutex_t             mutex_gestionnaires_signaux_atomique =
                                             PTHREAD_MUTEX_INITIALIZER;                                              PTHREAD_MUTEX_INITIALIZER;
Line 437  typedef unsigned char   t_8_bits; Line 466  typedef unsigned char   t_8_bits;
             *              *
 #       endif  #       endif
                                     semaphore_gestionnaires_signaux;                                      semaphore_gestionnaires_signaux;
   
           volatile int                routine_recursive;
 #   endif  #   endif
 #endif  #endif
   
 #ifdef SEMAPHORES_NOMMES  #ifdef SEMAPHORES_NOMMES
 enum t_semaphore    { sem_liste_threads = 0,  #define SEM_FORK            0
         sem_gestionnaires_signaux = 1,  #define SEM_QUEUE           1
         sem_gestionnaires_signaux_atomique = 2,  #define SEM_SIGNAUX         2
         sem_fork = 3 };  sem_t *sem_init2(unsigned int valeur, pid_t pid, int ordre);
   sem_t *sem_init3(unsigned int valeur, pid_t pid, pthread_t tid, int ordre);
 sem_t *sem_init2(unsigned int valeur, enum t_semaphore semaphore);  int sem_destroy2(sem_t *semaphore_p, pid_t pid, int ordre);
 int sem_destroy2(sem_t *semaphore_p, enum t_semaphore semaphore);  int sem_destroy3(sem_t *semaphore_p, pid_t pid, pthread_t tid, int ordre);
 int sem_getvalue2(sem_t *semaphore, int *valeur);  int sem_getvalue2(sem_t *semaphore, int *valeur);
   sem_t *sem_open2(pid_t pid, int ordre);
   
   // Le mutex est là uniquement pour pouvoir émuler le comportement
   // de sem_getvalue() sur un système comme MacOS X qui ne possède pas
   // cette fonction.
   
 #define sem_getvalue(semaphore, value) sem_getvalue2(semaphore, value)  #define sem_getvalue(semaphore, value) sem_getvalue2(semaphore, value)
 #define sem_post(semaphore) \  #define sem_post(semaphore) \
Line 1803  typedef struct processus Line 1839  typedef struct processus
     pthread_t                   thread_fusible;      pthread_t                   thread_fusible;
     pthread_t                   thread_surveille_par_fusible;      pthread_t                   thread_surveille_par_fusible;
   
 #   if !defined(Cygwin)  
 #       if !(OpenBSD)  
             stack_t             pile_signal;  
 #       else  
 #           ifdef SA_ONSTACK  
 #               undef SA_ONSTACK  
 #           endif  
 #           define SA_ONSTACK   0  
 #       endif  
 #   else  
 #       define SA_ONSTACK       0  
 #       define RTLD_LOCAL       0  
 #   endif  
   
     volatile int                pointeur_signal_ecriture;      volatile int                pointeur_signal_ecriture;
     volatile int                pointeur_signal_lecture;      volatile int                pointeur_signal_lecture;
     volatile enum signaux_rpl   signaux_en_queue[LONGUEUR_QUEUE_SIGNAUX];      volatile enum signaux_rpl   signaux_en_queue[LONGUEUR_QUEUE_SIGNAUX];
Line 2037  typedef struct processus Line 2059  typedef struct processus
   
 /* Traitement des erreurs                               */  /* Traitement des erreurs                               */
   
     unsigned int                compteur_violation_d_acces;  
     unsigned int                erreur_compilation;      unsigned int                erreur_compilation;
     unsigned int                erreur_execution;      unsigned int                erreur_execution;
     unsigned int                erreur_systeme;      unsigned int                erreur_systeme;
Line 2165  typedef struct processus Line 2186  typedef struct processus
     pthread_mutex_t             mutex_allocation;      pthread_mutex_t             mutex_allocation;
   
     // Mutex autorisant les fork()      // Mutex autorisant les fork()
     pthread_mutex_t             mutex_fork;      sem_t
   #   ifdef SEMAPHORES_NOMMES
           *
   #   endif
                                   semaphore_fork;
   
 /* Mutexes                                          */  /* Mutexes                                          */
   
Line 2885  void interruption2(int signal); Line 2910  void interruption2(int signal);
 void interruption3(int signal);  void interruption3(int signal);
 void interruption4(int signal);  void interruption4(int signal);
 void interruption5(int signal);  void interruption5(int signal);
   void interruption_depassement_pile(int urgence, stackoverflow_context_t scp);
 void inversion_matrice(struct_processus *s_etat_processus,  void inversion_matrice(struct_processus *s_etat_processus,
         struct_matrice *s_matrice);          struct_matrice *s_matrice);
 void lancement_daemon(struct_processus *s_etat_processus);  void lancement_daemon(struct_processus *s_etat_processus);
Line 2918  void retrait_thread(struct_processus *s_ Line 2944  void retrait_thread(struct_processus *s_
 void retrait_thread_surveillance(struct_processus *s_etat_processus,  void retrait_thread_surveillance(struct_processus *s_etat_processus,
         struct_descripteur_thread *s_argument_thread);          struct_descripteur_thread *s_argument_thread);
 void rplcore(struct_processus *s_etat_processus);  void rplcore(struct_processus *s_etat_processus);
   #endif
   
 void scrutation_injection(struct_processus *s_etat_processus);  void scrutation_injection(struct_processus *s_etat_processus);
   
   #ifndef RPLARGS
 void scrutation_interruptions(struct_processus *s_etat_processus);  void scrutation_interruptions(struct_processus *s_etat_processus);
 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);
Line 3045  unsigned char *compactage(unsigned char Line 3075  unsigned char *compactage(unsigned char
 unsigned char *conversion_majuscule(unsigned char *chaine);  unsigned char *conversion_majuscule(unsigned char *chaine);
 unsigned char *creation_nom_fichier(struct_processus *s_etat_processus,  unsigned char *creation_nom_fichier(struct_processus *s_etat_processus,
         unsigned char *chemin);          unsigned char *chemin);
   unsigned char *date_compilation();
 unsigned char *extraction_chaine(unsigned char *chaine, unsigned long i,  unsigned char *extraction_chaine(unsigned char *chaine, unsigned long i,
         unsigned long j);          unsigned long j);
 unsigned char *formateur(struct_processus *s_etat_processus, long offset,  unsigned char *formateur(struct_processus *s_etat_processus, long offset,
Line 3173  ssize_t write_atomic(struct_processus *s Line 3204  ssize_t write_atomic(struct_processus *s
 */  */
   
 int alsprintf(unsigned char **strp, const char *fmt, ...);  int alsprintf(unsigned char **strp, const char *fmt, ...);
   int interruption_violation_access(void *adresse_fautive, int gravite);
   #ifndef RPLARGS
 int liste_variables(struct_processus *s_etat_processus,  int liste_variables(struct_processus *s_etat_processus,
         struct_tableau_variables *tableau, int position,          struct_tableau_variables *tableau, int position,
         struct_arbre_variables *l_element_courant);          struct_arbre_variables *l_element_courant);
 int nombre_variables(struct_processus *s_etat_processus,  int nombre_variables(struct_processus *s_etat_processus,
         struct_arbre_variables *l_element_courant);          struct_arbre_variables *l_element_courant);
   #endif
 int tex_fprintf(struct_processus *s_etat_processus,  int tex_fprintf(struct_processus *s_etat_processus,
         file *flux, const char *format, ...);          file *flux, const char *format, ...);
 int transliterated_fprintf(struct_processus *s_etat_processus, file *flux,  int transliterated_fprintf(struct_processus *s_etat_processus, file *flux,
Line 3259  struct_descripteur_fichier *descripteur_ Line 3293  struct_descripteur_fichier *descripteur_
 struct_objet *copie_objet(struct_processus *s_etat_processus,  struct_objet *copie_objet(struct_processus *s_etat_processus,
         struct_objet *s_objet, unsigned char type);          struct_objet *s_objet, unsigned char type);
   
 #ifndef RPLARGS  
 struct_objet *allocation(struct_processus *s_etat_processus, enum t_type type);  struct_objet *allocation(struct_processus *s_etat_processus, enum t_type type);
   #ifndef RPLARGS
 struct_objet *formateur_date(struct_processus *s_etat_processus,  struct_objet *formateur_date(struct_processus *s_etat_processus,
         struct timeval *temps);          struct timeval *temps);
 struct_objet *lecture_pipe(struct_processus *s_etat_processus, int pipe);  struct_objet *lecture_pipe(struct_processus *s_etat_processus, int pipe);

Removed from v.1.124  
changed lines
  Added in v.1.136


CVSweb interface <joel.bertrand@systella.fr>