[BACK]Return to instructions_w1.c CVS log [TXT] [DIR] Up to [local] / rpl / src

Diff for /rpl/src/instructions_w1.c between versions 1.83 and 1.92

version 1.83, 2013/05/23 12:45:08 version 1.92, 2015/01/05 13:12:40
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.14    RPL/2 (R) version 4.1.19
   Copyright (C) 1989-2013 Dr. BERTRAND Joël    Copyright (C) 1989-2015 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 289  instruction_wait(struct_processus *s_eta Line 289  instruction_wait(struct_processus *s_eta
   
             scrutation_injection(s_etat_processus);              scrutation_injection(s_etat_processus);
   
             if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)              if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions)
                       != 0)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_processus;                  (*s_etat_processus).erreur_systeme = d_es_processus;
                 return;                  return;
Line 300  instruction_wait(struct_processus *s_eta Line 301  instruction_wait(struct_processus *s_eta
                 affectation_interruptions_logicielles(s_etat_processus);                  affectation_interruptions_logicielles(s_etat_processus);
             }              }
   
             if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)              if (pthread_mutex_unlock(&(*s_etat_processus).mutex_interruptions)
                       != 0)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_processus;                  (*s_etat_processus).erreur_systeme = d_es_processus;
                 return;                  return;
Line 2291  instruction_wflock(struct_processus *s_e Line 2293  instruction_wflock(struct_processus *s_e
             }              }
             else              else
             {              {
                 if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)                  if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions)
                           != 0)
                 {                  {
                     (*s_etat_processus).erreur_systeme = d_es_processus;                      (*s_etat_processus).erreur_systeme = d_es_processus;
                     return;                      return;
Line 2302  instruction_wflock(struct_processus *s_e Line 2305  instruction_wflock(struct_processus *s_e
                     affectation_interruptions_logicielles(s_etat_processus);                      affectation_interruptions_logicielles(s_etat_processus);
                 }                  }
   
                 if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)                  if (pthread_mutex_unlock(&(*s_etat_processus)
                           .mutex_interruptions) != 0)
                 {                  {
                     (*s_etat_processus).erreur_systeme = d_es_processus;                      (*s_etat_processus).erreur_systeme = d_es_processus;
                     return;                      return;
Line 2422  instruction_wfproc(struct_processus *s_e Line 2426  instruction_wfproc(struct_processus *s_e
             }              }
         }          }
   
         if (pthread_mutex_lock(&((*s_etat_processus).mutex)) != 0)          if (pthread_mutex_lock(&((*s_etat_processus).mutex_pile_processus))
                   != 0)
         {          {
             if ((*s_etat_processus).profilage == d_vrai)              if ((*s_etat_processus).profilage == d_vrai)
             {              {
Line 2487  instruction_wfproc(struct_processus *s_e Line 2492  instruction_wfproc(struct_processus *s_e
                     profilage(s_etat_processus, NULL);                      profilage(s_etat_processus, NULL);
                 }                  }
   
                 if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)                  if (pthread_mutex_unlock(&((*s_etat_processus)
                           .mutex_pile_processus)) != 0)
                 {                  {
                     (*s_etat_processus).erreur_systeme = d_es_processus;                      (*s_etat_processus).erreur_systeme = d_es_processus;
                     return;                      return;
Line 2567  instruction_wfproc(struct_processus *s_e Line 2573  instruction_wfproc(struct_processus *s_e
                      * Le processus n'est pas terminé                       * Le processus n'est pas terminé
                      */                       */
   
                       if (pthread_mutex_lock(&((*s_etat_processus)
                               .mutex_interruptions)) != 0)
                       {
                           pthread_mutex_unlock(&((*s_etat_processus)
                                   .mutex_pile_processus));
   
                           if ((*s_etat_processus).profilage == d_vrai)
                           {
                               profilage(s_etat_processus, NULL);
                           }
   
                           (*s_etat_processus).erreur_systeme =
                                   d_es_processus;
                           return;
                       }
   
                     if ((*s_etat_processus).nombre_interruptions_non_affectees                      if ((*s_etat_processus).nombre_interruptions_non_affectees
                             != 0)                              != 0)
                     {                      {
                         affectation_interruptions_logicielles(s_etat_processus);                          affectation_interruptions_logicielles(s_etat_processus);
                     }                      }
   
                     if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)                      if (pthread_mutex_unlock(&((*s_etat_processus)
                               .mutex_interruptions)) != 0)
                       {
                           pthread_mutex_unlock(&((*s_etat_processus)
                                   .mutex_pile_processus));
   
                           if ((*s_etat_processus).profilage == d_vrai)
                           {
                               profilage(s_etat_processus, NULL);
                           }
   
                           (*s_etat_processus).erreur_systeme =
                                   d_es_processus;
                           return;
                       }
   
                       if (pthread_mutex_unlock(&((*s_etat_processus)
                               .mutex_pile_processus)) != 0)
                     {                      {
                         if ((*s_etat_processus).profilage == d_vrai)                          if ((*s_etat_processus).profilage == d_vrai)
                         {                          {
Line 2624  instruction_wfproc(struct_processus *s_e Line 2663  instruction_wfproc(struct_processus *s_e
   
                     scrutation_injection(s_etat_processus);                      scrutation_injection(s_etat_processus);
   
                     if (pthread_mutex_lock(&((*s_etat_processus).mutex)) != 0)                      if (pthread_mutex_lock(&((*s_etat_processus)
                               .mutex_pile_processus)) != 0)
                     {                      {
                         if ((*s_etat_processus).profilage == d_vrai)                          if ((*s_etat_processus).profilage == d_vrai)
                         {                          {
Line 2646  instruction_wfproc(struct_processus *s_e Line 2686  instruction_wfproc(struct_processus *s_e
             profilage(s_etat_processus, NULL);              profilage(s_etat_processus, NULL);
         }          }
   
         if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)          if (pthread_mutex_unlock(&((*s_etat_processus).mutex_pile_processus))
                   != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Line 2749  instruction_wfdata(struct_processus *s_e Line 2790  instruction_wfdata(struct_processus *s_e
             }              }
         }          }
   
         if (pthread_mutex_lock(&((*s_etat_processus).mutex)) != 0)          if (pthread_mutex_lock(&((*s_etat_processus).mutex_pile_processus))
                   != 0)
         {          {
             if ((*s_etat_processus).profilage == d_vrai)              if ((*s_etat_processus).profilage == d_vrai)
             {              {
Line 2809  instruction_wfdata(struct_processus *s_e Line 2851  instruction_wfdata(struct_processus *s_e
                     profilage(s_etat_processus, NULL);                      profilage(s_etat_processus, NULL);
                 }                  }
   
                 if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)                  if (pthread_mutex_unlock(&((*s_etat_processus)
                           .mutex_pile_processus)) != 0)
                 {                  {
                     (*s_etat_processus).erreur_systeme = d_es_processus;                      (*s_etat_processus).erreur_systeme = d_es_processus;
                     return;                      return;
Line 2852  instruction_wfdata(struct_processus *s_e Line 2895  instruction_wfdata(struct_processus *s_e
                         return;                          return;
                     }                      }
   
                     if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)                      if (pthread_mutex_unlock(&((*s_etat_processus)
                               .mutex_pile_processus)) != 0)
                     {                      {
                         if ((*s_etat_processus).profilage == d_vrai)                          if ((*s_etat_processus).profilage == d_vrai)
                         {                          {
Line 2893  instruction_wfdata(struct_processus *s_e Line 2937  instruction_wfdata(struct_processus *s_e
   
                     scrutation_injection(s_etat_processus);                      scrutation_injection(s_etat_processus);
   
                     if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)                      if (pthread_mutex_lock(&(*s_etat_processus)
                               .mutex_interruptions) != 0)
                     {                      {
                         (*s_etat_processus).erreur_systeme = d_es_processus;                          (*s_etat_processus).erreur_systeme = d_es_processus;
                         return;                          return;
Line 2905  instruction_wfdata(struct_processus *s_e Line 2950  instruction_wfdata(struct_processus *s_e
                         affectation_interruptions_logicielles(s_etat_processus);                          affectation_interruptions_logicielles(s_etat_processus);
                     }                      }
   
                     if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)                      if (pthread_mutex_unlock(&(*s_etat_processus)
                               .mutex_interruptions) != 0)
                     {                      {
                         (*s_etat_processus).erreur_systeme = d_es_processus;                          (*s_etat_processus).erreur_systeme = d_es_processus;
                         return;                          return;
Line 2930  instruction_wfdata(struct_processus *s_e Line 2976  instruction_wfdata(struct_processus *s_e
                         return;                          return;
                     }                      }
   
                     if (pthread_mutex_lock(&((*s_etat_processus).mutex)) != 0)                      if (pthread_mutex_lock(&((*s_etat_processus)
                               .mutex_pile_processus)) != 0)
                     {                      {
                         if ((*s_etat_processus).profilage == d_vrai)                          if ((*s_etat_processus).profilage == d_vrai)
                         {                          {
Line 2957  instruction_wfdata(struct_processus *s_e Line 3004  instruction_wfdata(struct_processus *s_e
             profilage(s_etat_processus, NULL);              profilage(s_etat_processus, NULL);
         }          }
   
         if (pthread_mutex_unlock(&((*s_etat_processus).mutex)) != 0)          if (pthread_mutex_unlock(&((*s_etat_processus).mutex_pile_processus))
                   != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Line 3641  instruction_wfswi(struct_processus *s_et Line 3689  instruction_wfswi(struct_processus *s_et
                 return;                  return;
             }              }
   
             if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)              if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions)
                       != 0)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_processus;                  (*s_etat_processus).erreur_systeme = d_es_processus;
                 return;                  return;
Line 3652  instruction_wfswi(struct_processus *s_et Line 3701  instruction_wfswi(struct_processus *s_et
                 affectation_interruptions_logicielles(s_etat_processus);                  affectation_interruptions_logicielles(s_etat_processus);
             }              }
   
             if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)              if (pthread_mutex_unlock(&(*s_etat_processus).mutex_interruptions)
                       != 0)
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_processus;                  (*s_etat_processus).erreur_systeme = d_es_processus;
                 return;                  return;
Line 3790  instruction_wfpoke(struct_processus *s_e Line 3840  instruction_wfpoke(struct_processus *s_e
   
         scrutation_injection(s_etat_processus);          scrutation_injection(s_etat_processus);
   
         if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)          if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions) != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Line 3801  instruction_wfpoke(struct_processus *s_e Line 3851  instruction_wfpoke(struct_processus *s_e
             affectation_interruptions_logicielles(s_etat_processus);              affectation_interruptions_logicielles(s_etat_processus);
         }          }
   
         if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)          if (pthread_mutex_unlock(&(*s_etat_processus).mutex_interruptions) != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Line 3909  instruction_wfack(struct_processus *s_et Line 3959  instruction_wfack(struct_processus *s_et
     {      {
         scrutation_injection(s_etat_processus);          scrutation_injection(s_etat_processus);
   
         if (pthread_mutex_lock(&(*s_etat_processus).mutex) != 0)          if (pthread_mutex_lock(&(*s_etat_processus).mutex_interruptions) != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Line 3920  instruction_wfack(struct_processus *s_et Line 3970  instruction_wfack(struct_processus *s_et
             affectation_interruptions_logicielles(s_etat_processus);              affectation_interruptions_logicielles(s_etat_processus);
         }          }
   
         if (pthread_mutex_unlock(&(*s_etat_processus).mutex) != 0)          if (pthread_mutex_unlock(&(*s_etat_processus).mutex_interruptions) != 0)
         {          {
             (*s_etat_processus).erreur_systeme = d_es_processus;              (*s_etat_processus).erreur_systeme = d_es_processus;
             return;              return;
Removed from v.1.83  
changed lines
  Added in v.1.92

CVSweb interface <joel.bertrand@systella.fr>