version 1.15, 2014/07/17 08:07:20
|
version 1.19, 2015/02/19 11:01:22
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.19 |
RPL/2 (R) version 4.1.21 |
Copyright (C) 1989-2014 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 350 instruction_cipher(struct_processus *s_e
|
Line 350 instruction_cipher(struct_processus *s_e
|
return; |
return; |
} |
} |
|
|
if ((instruction = conversion_majuscule((unsigned char *) |
if ((instruction = conversion_majuscule(s_etat_processus, |
(*(*l_element_courant).donnee).objet)) == NULL) |
(unsigned char *) (*(*l_element_courant).donnee).objet)) |
|
== NULL) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |
Line 414 instruction_cipher(struct_processus *s_e
|
Line 415 instruction_cipher(struct_processus *s_e
|
|
|
// Test de la validité de la somme de contrôle. |
// Test de la validité de la somme de contrôle. |
|
|
if ((fonction = conversion_majuscule(controle)) == NULL) |
if ((fonction = conversion_majuscule(s_etat_processus, controle)) |
|
== NULL) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |
Line 1103 instruction_cipher(struct_processus *s_e
|
Line 1105 instruction_cipher(struct_processus *s_e
|
return; |
return; |
} |
} |
|
|
if ((tampon = conversion_majuscule(algorithme_chiffrement)) == NULL) |
if ((tampon = conversion_majuscule(s_etat_processus, |
|
algorithme_chiffrement)) == NULL) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |
Line 1669 instruction_cipher(struct_processus *s_e
|
Line 1672 instruction_cipher(struct_processus *s_e
|
return; |
return; |
} |
} |
|
|
if ((message_chiffre = chiffrement(EVP_chiffrement, encodage, message, |
if ((message_chiffre = chiffrement(s_etat_processus, |
|
EVP_chiffrement, encodage, message, |
longueur_message, clef_binaire, longueur_clef_binaire, |
longueur_message, clef_binaire, longueur_clef_binaire, |
iv_binaire, &longueur_message_chiffre)) == NULL) |
iv_binaire, &longueur_message_chiffre)) == NULL) |
{ |
{ |
Line 1754 instruction_cipher(struct_processus *s_e
|
Line 1758 instruction_cipher(struct_processus *s_e
|
} |
} |
|
|
if (((*(*l_element_courant).donnee).objet = |
if (((*(*l_element_courant).donnee).objet = |
conversion_majuscule(algorithme_chiffrement)) == NULL) |
conversion_majuscule(s_etat_processus, algorithme_chiffrement)) |
|
== NULL) |
{ |
{ |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
return; |
return; |