rpl/src/chiffrement.c - diff

Return to chiffrement.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/chiffrement.c between versions 1.7 and 1.32

version 1.7, 2013/02/27 15:29:35	version 1.32, 2019/01/01 09:02:46
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.12	RPL/2 (R) version 4.1.30
Copyright (C) 1989-2013 Dr. BERTRAND Joël	Copyright (C) 1989-2019 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 36	Line 36
*/	*/

unsigned char *	unsigned char *
chiffrement(const EVP_CIPHER *type_chiffrement, logical1 encodage,	chiffrement(struct_processus *s_etat_processus,
unsigned char *message, unsigned int longueur_message,	const EVP_CIPHER *type_chiffrement, logical1 encodage,
unsigned char *clef, unsigned int longueur_clef,	unsigned char *message, integer8 longueur_message,
	unsigned char *clef, integer8 longueur_clef,
unsigned char *vecteur_initialisation,	unsigned char *vecteur_initialisation,
unsigned int *longueur_message_chiffre)	integer8 *longueur_message_chiffre)
{	{
int i;	int i;
int longueur_bloc_de_chiffrement;	int longueur_bloc_de_chiffrement;
Line 49 chiffrement(const EVP_CIPHER *type_chiff	Line 50 chiffrement(const EVP_CIPHER *type_chiff

unsigned char *message_chiffre;	unsigned char *message_chiffre;

EVP_CIPHER_CTX contexte;	EVP_CIPHER_CTX *contexte;

EVP_CIPHER_CTX_init(&contexte);	if ((contexte = EVP_CIPHER_CTX_new()) == NULL)
	{
	return(NULL);
	}

	EVP_CIPHER_CTX_reset(contexte);

longueur_bloc_de_chiffrement = EVP_CIPHER_block_size(type_chiffrement);	longueur_bloc_de_chiffrement = EVP_CIPHER_block_size(type_chiffrement);

if (EVP_CipherInit_ex(&contexte, type_chiffrement, NULL, clef,	if (EVP_CipherInit_ex(contexte, type_chiffrement, NULL, clef,
vecteur_initialisation, (encodage == d_vrai) ? 1 : 0) != 1)	vecteur_initialisation, (encodage == d_vrai) ? 1 : 0) != 1)
{	{
EVP_CIPHER_CTX_cleanup(&contexte);	EVP_CIPHER_CTX_free(contexte);
return(NULL);	return(NULL);
}	}

(*longueur_message_chiffre) = ((longueur_message /	(*longueur_message_chiffre) = ((longueur_message /
longueur_bloc_de_chiffrement) + 1) * longueur_bloc_de_chiffrement;	longueur_bloc_de_chiffrement) + 1) * longueur_bloc_de_chiffrement;

if ((message_chiffre = malloc((longueur_message_chiffre)	if ((message_chiffre = malloc(((size_t) (longueur_message_chiffre))
sizeof(unsigned char))) == NULL)	sizeof(unsigned char))) == NULL)
{	{
	EVP_CIPHER_CTX_free(contexte);
return(NULL);	return(NULL);
}	}

if (EVP_CipherUpdate(&contexte, message_chiffre, &longueur_message_1,	if (EVP_CipherUpdate(contexte, message_chiffre, &longueur_message_1,
message, longueur_message) != 1)	message, (int) longueur_message) != 1)
{	{
free(message_chiffre);	free(message_chiffre);
EVP_CIPHER_CTX_cleanup(&contexte);	EVP_CIPHER_CTX_free(contexte);
return(NULL);	return(NULL);
}	}

if (EVP_CipherFinal_ex(&contexte, message_chiffre + longueur_message_1,	if (EVP_CipherFinal_ex(contexte, message_chiffre + longueur_message_1,
&longueur_message_2) != 1)	&longueur_message_2) != 1)
{	{
free(message_chiffre);	free(message_chiffre);
EVP_CIPHER_CTX_cleanup(&contexte);	EVP_CIPHER_CTX_free(contexte);
return(NULL);	return(NULL);
}	}

Line 93 chiffrement(const EVP_CIPHER *type_chiff	Line 100 chiffrement(const EVP_CIPHER *type_chiff

for(i = 0; i < EVP_CIPHER_iv_length(type_chiffrement); i++)	for(i = 0; i < EVP_CIPHER_iv_length(type_chiffrement); i++)
{	{
vecteur_initialisation[i] = contexte.iv[i];	vecteur_initialisation[i] = EVP_CIPHER_CTX_iv(contexte)[i];
}	}

EVP_CIPHER_CTX_cleanup(&contexte);	EVP_CIPHER_CTX_free(contexte);

return(message_chiffre);	return(message_chiffre);
}	}

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.7
changed lines
	Added in v.1.32