Diff for /rpl/src/instructions_r3.c between versions 1.30 and 1.45

version 1.30, 2011/06/22 13:27:02 version 1.45, 2012/10/01 11:05:06
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.0.prerelease.3    RPL/2 (R) version 4.1.11
   Copyright (C) 1989-2011 Dr. BERTRAND Joël    Copyright (C) 1989-2012 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 1063  instruction_recall(struct_processus *s_e Line 1063  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rpliconv_md5) != d_vrai)                      "rpliconv") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rpliconv_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1086  instruction_recall(struct_processus *s_e Line 1079  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplfile_md5) != d_vrai)                      "rplfile") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplfile_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1109  instruction_recall(struct_processus *s_e Line 1095  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplpp_md5) != d_vrai)                      "rplpp") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplpp_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1132  instruction_recall(struct_processus *s_e Line 1111  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplawk_md5) != d_vrai)                      "rplawk") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplawk_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1175  instruction_recall(struct_processus *s_e Line 1147  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rpliconv_md5) != d_vrai)                      "rpliconv") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rpliconv_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1198  instruction_recall(struct_processus *s_e Line 1163  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplfile_md5) != d_vrai)                      "rplfile") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplfile_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1221  instruction_recall(struct_processus *s_e Line 1179  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplpp_md5) != d_vrai)                      "rplpp") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplpp_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;
Line 1244  instruction_recall(struct_processus *s_e Line 1195  instruction_recall(struct_processus *s_e
                 return;                  return;
             }              }
   
             if (controle(s_etat_processus, executable_candidat, "md5",              if (controle_integrite(s_etat_processus, executable_candidat,
                     rplawk_md5) != d_vrai)                      "rplawk") != d_vrai)
             {  
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;  
                 return;  
             }  
   
             if (controle(s_etat_processus, executable_candidat, "sha1",  
                     rplawk_sha1) != d_vrai)  
             {              {
                 (*s_etat_processus).erreur_systeme = d_es_somme_controle;                  (*s_etat_processus).erreur_systeme = d_es_somme_controle;
                 return;                  return;

Removed from v.1.30  
changed lines
  Added in v.1.45


CVSweb interface <joel.bertrand@systella.fr>