Diff for /rpl/src/gestion_processus.c between versions 1.81 and 1.93

version 1.81, 2015/11/26 11:44:32 version 1.93, 2018/12/24 15:55:09
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.24    RPL/2 (R) version 4.1.30
   Copyright (C) 1989-2015 Dr. BERTRAND Joël    Copyright (C) 1989-2018 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 83  surveillance_processus(void *argument) Line 83  surveillance_processus(void *argument)
         BUG(1, uprintf("General mutex error!\n"));          BUG(1, uprintf("General mutex error!\n"));
     }      }
   
       nombre_thread_surveillance_processus++;
     insertion_thread_surveillance(s_etat_processus, s_argument_thread);      insertion_thread_surveillance(s_etat_processus, s_argument_thread);
   
     if (pthread_mutex_unlock(&((*s_etat_processus).mutex_pile_processus)) != 0)      if (pthread_mutex_unlock(&((*s_etat_processus).mutex_pile_processus)) != 0)
Line 389  surveillance_processus(void *argument) Line 390  surveillance_processus(void *argument)
             }              }
             else              else
             {              {
                 perror("read");  
                 (*s_etat_processus).erreur_systeme = d_es_processus;                  (*s_etat_processus).erreur_systeme = d_es_processus;
             }              }
   
Line 1427  surveillance_processus(void *argument) Line 1427  surveillance_processus(void *argument)
         }          }
   
         retrait_thread_surveillance(s_etat_processus, s_argument_thread);          retrait_thread_surveillance(s_etat_processus, s_argument_thread);
           nombre_thread_surveillance_processus--;
   
         if (pthread_mutex_unlock(&((*s_etat_processus)          if (pthread_mutex_unlock(&((*s_etat_processus)
                 .mutex_pile_processus)) != 0)                  .mutex_pile_processus)) != 0)
Line 1436  surveillance_processus(void *argument) Line 1437  surveillance_processus(void *argument)
     }      }
   
     pthread_exit(NULL);      pthread_exit(NULL);
     return(NULL);  
 }  }
   
   
Line 2997  lecture_pipe(struct_processus *s_etat_pr Line 2997  lecture_pipe(struct_processus *s_etat_pr
 void  void
 scrutation_injection(struct_processus *s_etat_processus)  scrutation_injection(struct_processus *s_etat_processus)
 {  {
     fd_set                          ensemble_descripteurs;  
   
     logical1                        drapeau_erreur;      logical1                        drapeau_erreur;
     logical1                        registre_arret_si_exception;      logical1                        registre_arret_si_exception;
   
 #   ifdef PSELECT      struct pollfd                   fds;
         struct timespec             timeout;  
 #   else  
         struct timeval              timeout;  
 #   endif  
   
     unsigned char                   tampon;      unsigned char                   tampon;
     unsigned char                   tampon_profilage[20];      unsigned char                   tampon_profilage[20];
   
     // Si on est dans le processus père, il n'y a rien à surveiller.  
   
     scrutation_interruptions(s_etat_processus);      scrutation_interruptions(s_etat_processus);
   
       // Si on est dans le processus père, il n'y a rien à surveiller.
   
     if ((*s_etat_processus).var_volatile_processus_racine == 0)      if ((*s_etat_processus).var_volatile_processus_racine == 0)
     {      {
         FD_ZERO(&ensemble_descripteurs);          fds.fd = (*s_etat_processus).pipe_nombre_injections;
         FD_SET((*s_etat_processus).pipe_nombre_injections,          fds.events = POLLIN;
                 &ensemble_descripteurs);          fds.revents = 0;
   
 #       ifdef PSELECT          if (poll(&fds, 1, 0) > 0)
         timeout.tv_sec = 0;  
         timeout.tv_nsec = 0;  
   
         if (pselect((*s_etat_processus).pipe_nombre_injections + 1,  
                 &ensemble_descripteurs, NULL, NULL, &timeout, NULL) > 0)  
 #       else  
         timeout.tv_sec = 0;  
         timeout.tv_usec = 0;  
   
         if (select((*s_etat_processus).pipe_nombre_injections + 1,  
                 &ensemble_descripteurs, NULL, NULL, &timeout) > 0)  
 #       endif  
         {          {
             if (read_atomic(s_etat_processus,              if (read_atomic(s_etat_processus,
                     (*s_etat_processus).pipe_nombre_injections,                      (*s_etat_processus).pipe_nombre_injections,
Line 3190  scrutation_injection(struct_processus *s Line 3172  scrutation_injection(struct_processus *s
                 }                  }
             }              }
         }          }
   
     }      }
   
     return;      return;

Removed from v.1.81  
changed lines
  Added in v.1.93


CVSweb interface <joel.bertrand@systella.fr>