Diff for /rpl/src/instructions_d5.c between versions 1.32 and 1.38

version 1.32, 2010/07/31 10:34:17 version 1.38, 2010/08/22 16:38:36
Line 20 Line 20
 */  */
   
   
 #include "rpl.conv.h"  #include "rpl-conv.h"
   
   
 /*  /*
Line 1159  instruction_detach(struct_processus *s_e Line 1159  instruction_detach(struct_processus *s_e
   
     verrouillage_threads_concurrents(s_etat_processus);      verrouillage_threads_concurrents(s_etat_processus);
     (*s_argument_thread).pid = fork();      (*s_argument_thread).pid = fork();
   
   #   ifdef OS2
       if ((*s_argument_thread).pid == 0)
       {
           sem_init(&semaphore_liste_threads, 0, 1);
           sem_init(&semaphore_gestionnaires_signaux, 0, 0);
           sem_init(&semaphore_gestionnaires_signaux_atomique, 0, 1);
           sem_init(&((*s_etat_processus).semaphore_fork), 0, 0);
       }
   #   endif
   
     deverrouillage_threads_concurrents(s_etat_processus);      deverrouillage_threads_concurrents(s_etat_processus);
   
     pthread_sigmask(SIG_SETMASK, &oldset2, NULL);      pthread_sigmask(SIG_SETMASK, &oldset2, NULL);
Line 1275  instruction_detach(struct_processus *s_e Line 1286  instruction_detach(struct_processus *s_e
             return;              return;
         }          }
   
   #       ifndef OS2
         if (pthread_attr_setschedpolicy(&attributs, SCHED_OTHER) != 0)          if (pthread_attr_setschedpolicy(&attributs, SCHED_OTHER) != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
Line 1293  instruction_detach(struct_processus *s_e Line 1305  instruction_detach(struct_processus *s_e
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
         }          }
   #       endif
   
         (*s_argument_thread).s_etat_processus = s_etat_processus;          (*s_argument_thread).s_etat_processus = s_etat_processus;
   
Line 1315  instruction_detach(struct_processus *s_e Line 1328  instruction_detach(struct_processus *s_e
          * Processus fils           * Processus fils
          */           */
   
   #       ifdef _BROKEN_SIGINFO
           liberation_fifos_signaux(s_etat_processus);
           creation_fifos_signaux(s_etat_processus);
   #       endif
   
         if ((*s_etat_processus).debug == d_vrai)          if ((*s_etat_processus).debug == d_vrai)
             if (((*s_etat_processus).type_debug &              if (((*s_etat_processus).type_debug &
                     d_debug_processus) != 0)                      d_debug_processus) != 0)
Line 1504  instruction_detach(struct_processus *s_e Line 1522  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1534  instruction_detach(struct_processus *s_e Line 1556  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1567  instruction_detach(struct_processus *s_e Line 1593  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1715  instruction_detach(struct_processus *s_e Line 1745  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1731  instruction_detach(struct_processus *s_e Line 1765  instruction_detach(struct_processus *s_e
             (*s_argument_thread2).nombre_references--;              (*s_argument_thread2).nombre_references--;
   
             BUG((*s_argument_thread2).nombre_references < 0,              BUG((*s_argument_thread2).nombre_references < 0,
   #                   ifdef _BROKEN_SIGINFO
                       destruction_fifos_signaux(s_etat_processus),
   #                   endif
                     printf("(*s_argument_thread2).nombre_references = %d\n",                      printf("(*s_argument_thread2).nombre_references = %d\n",
                     (int) (*s_argument_thread2).nombre_references));                      (int) (*s_argument_thread2).nombre_references));
   
Line 1794  instruction_detach(struct_processus *s_e Line 1831  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1858  instruction_detach(struct_processus *s_e Line 1899  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 1910  instruction_detach(struct_processus *s_e Line 1955  instruction_detach(struct_processus *s_e
                 }                  }
             }              }
   
   #           ifdef _BROKEN_SIGINFO
               destruction_fifos_signaux(s_etat_processus);
   #           endif
   
             BUG(1, uprintf("Process management error line %d\n", __LINE__));              BUG(1, uprintf("Process management error line %d\n", __LINE__));
             exit(EXIT_FAILURE);              exit(EXIT_FAILURE);
         }          }
Line 2458  instruction_detach(struct_processus *s_e Line 2507  instruction_detach(struct_processus *s_e
                                     registre_stop;                                      registre_stop;
                         }                          }
   
   #                       ifdef _BROKEN_SIGINFO
                           destruction_fifos_signaux(s_etat_processus);
   #                       endif
   
                         (*s_etat_processus).erreur_systeme = d_es_signal;                          (*s_etat_processus).erreur_systeme = d_es_signal;
                         exit(EXIT_FAILURE);                          exit(EXIT_FAILURE);
                     }                      }
Line 2492  instruction_detach(struct_processus *s_e Line 2545  instruction_detach(struct_processus *s_e
   
                     if (sigaction(SIGPIPE, &registre, NULL) != 0)                      if (sigaction(SIGPIPE, &registre, NULL) != 0)
                     {                      {
   #                       ifdef _BROKEN_SIGINFO
                           destruction_fifos_signaux(s_etat_processus);
   #                       endif
   
                         pthread_mutex_unlock(&((*s_etat_processus).mutex));                          pthread_mutex_unlock(&((*s_etat_processus).mutex));
   
                         (*s_etat_processus).erreur_systeme = d_es_signal;                          (*s_etat_processus).erreur_systeme = d_es_signal;
Line 2808  instruction_detach(struct_processus *s_e Line 2865  instruction_detach(struct_processus *s_e
   
         liberation(s_etat_processus, s_objet);          liberation(s_etat_processus, s_objet);
   
 #       ifndef Cygwin  #       if !defined(Cygwin) && !defined(OpenBSD)
         (*s_etat_processus).pile_signal.ss_flags = SS_DISABLE;          (*s_etat_processus).pile_signal.ss_flags = SS_DISABLE;
         sigaltstack(&((*s_etat_processus).pile_signal), NULL);          sigaltstack(&((*s_etat_processus).pile_signal), NULL);
         free((*s_etat_processus).pile_signal.ss_sp);          free((*s_etat_processus).pile_signal.ss_sp);
Line 2885  instruction_detach(struct_processus *s_e Line 2942  instruction_detach(struct_processus *s_e
   
         clear_history();          clear_history();
   
   #       ifdef _BROKEN_SIGINFO
           destruction_fifos_signaux(s_etat_processus);
   #       endif
   
         free(s_etat_processus);          free(s_etat_processus);
   
 #       ifdef DEBUG_MEMOIRE  #       ifdef DEBUG_MEMOIRE

Removed from v.1.32  
changed lines
  Added in v.1.38


CVSweb interface <joel.bertrand@systella.fr>