version 1.13, 2010/08/26 19:07:35
|
version 1.43, 2013/02/27 17:11:39
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.0.19 |
RPL/2 (R) version 4.1.13 |
Copyright (C) 1989-2010 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 56 controle(struct_processus *s_etat_proces
|
Line 56 controle(struct_processus *s_etat_proces
|
struct stat stat_buf; |
struct stat stat_buf; |
|
|
unsigned char *chaine; |
unsigned char *chaine; |
|
unsigned char *registre; |
unsigned char somme[EVP_MAX_MD_SIZE]; |
unsigned char somme[EVP_MAX_MD_SIZE]; |
unsigned char somme_hexadecimale[2 * EVP_MAX_MD_SIZE]; |
unsigned char somme_hexadecimale[2 * EVP_MAX_MD_SIZE]; |
|
|
unsigned int i; |
unsigned int i; |
unsigned int longueur_somme; |
unsigned int longueur_somme; |
|
|
|
registre = fichier; |
|
|
# ifdef OS2 |
# ifdef OS2 |
unsigned char *tampon; |
unsigned char *tampon; |
|
|
Line 204 controle(struct_processus *s_etat_proces
|
Line 207 controle(struct_processus *s_etat_proces
|
} |
} |
else |
else |
{ |
{ |
|
if ((*s_etat_processus).langue == 'F') |
|
{ |
|
printf("+++Fatal : Somme de contrôle invalide\n"); |
|
printf("Fonction %s(%s)\n", type, registre); |
|
printf("Résultat obtenu : %s\n", somme_hexadecimale); |
|
printf("Résultat attendu : %s\n", somme_candidate); |
|
} |
|
else |
|
{ |
|
printf("+++Fatal : Hash code mismatch\n"); |
|
printf("Function %s(%s)\n", type, registre); |
|
printf("Computed hash code : %s\n", somme_hexadecimale); |
|
printf("Expected hash code : %s\n", somme_candidate); |
|
} |
|
|
drapeau = d_faux; |
drapeau = d_faux; |
} |
} |
|
|