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

Diff for /rpl/src/controle.c between versions 1.1 and 1.2

version 1.1, 2010/03/04 17:42:46 version 1.2, 2010/03/05 11:20:08
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.12    RPL/2 (R) version 4.0.12
   Copyright (C) 1989-2010 Dr. BERTRAND Joël    Copyright (C) 1989-2010 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
   
Line 25 Line 25
   
 /*  /*
 ================================================================================  ================================================================================
   Calcul des sommes de contrôle avant le lancement d'un exécutable    Calcul des sommes de contrôle avant le lancement d'un exécutable
   de la famille RPL/2 (rpliconv, rplconvert, rplfile et rplpp).    de la famille RPL/2 (rpliconv, rplconvert, rplfile et rplpp).
 ================================================================================  ================================================================================
   Entrée :    Entrée :
     - chaîne de caractères sur le fichier à contrôler      - chaîne de caractères sur le fichier à contrôler
     - chaîne de caractères contenant la somme à contrôler      - chaîne de caractères contenant la somme à contrôler
     - type de somme de contrôle      - type de somme de contrôle
 --------------------------------------------------------------------------------  --------------------------------------------------------------------------------
   Sortie : drapeau    Sortie : drapeau
 --------------------------------------------------------------------------------  --------------------------------------------------------------------------------
   Effets de bord : néant    Effets de bord : néant
 ================================================================================  ================================================================================
 */  */
   
   
 logical1  logical1
 controle(struct_processus *s_etat_processus, unsigned char *fichier,  controle(struct_processus *s_etat_processus, unsigned char *fichier,
         unsigned char *type, unsigned char *somme_candidate)          unsigned char *type, unsigned char *somme_candidate)
 {  {
     EVP_MD_CTX          contexte;      EVP_MD_CTX          contexte;
   
     int                 i_rval = 0;      int                 in_fd;
     int                 in_fd = -1;  
   
     logical1            drapeau;      logical1            drapeau;
   
Line 64  controle(struct_processus *s_etat_proces Line 62  controle(struct_processus *s_etat_proces
     unsigned int        i;      unsigned int        i;
     unsigned int        longueur_somme;      unsigned int        longueur_somme;
   
     i_rval = stat(fichier, &stat_buf);      if (stat(fichier, &stat_buf) != 0)
       {
           (*s_etat_processus).erreur_systeme = d_es_erreur_fichier;
           return(d_faux);
       }
   
     taille_fichier = stat_buf.st_size;      taille_fichier = stat_buf.st_size;
   
     if ((chaine = malloc(taille_fichier)) == NULL)      if ((chaine = malloc(taille_fichier)) == NULL)
Line 150  controle(struct_processus *s_etat_proces Line 153  controle(struct_processus *s_etat_proces
             return(d_faux);              return(d_faux);
         }          }
     }      }
       else
       {
           return(d_faux);
       }
   
     EVP_MD_CTX_cleanup(&contexte);      EVP_MD_CTX_cleanup(&contexte);
     free(chaine);      free(chaine);
Removed from v.1.1  
changed lines
  Added in v.1.2

CVSweb interface <joel.bertrand@systella.fr>