/*

* Copyright (c) 2007-2009 Nokia Corporation and/or its subsidiary(-ies).

* All rights reserved.

* This component and the accompanying materials are made available

* under the terms of the License "Eclipse Public License v1.0"

* which accompanies this distribution, and is available

* at the URL "http://www.eclipse.org/legal/epl-v10.html".

*

* Initial Contributors:

* Nokia Corporation - initial contribution.

*

* Contributors:

*

* Description: 

*

*/

/**

 @file

*/

#include <e32std.h>

#include <hash.h>

#include "hashinc.h"

#define EXPANDLOOP

CMD4::CMD4(void)

: CMessageDigest(),iHash(MD4_HASH)

	{

	}

CMD4::CMD4(const CMD4& aMD)

: CMessageDigest(aMD),

  iHash(aMD.iHash),iA(aMD.iA),iB(aMD.iB),iC(aMD.iC),iD(aMD.iD),

  iNl(aMD.iNl),iNh(aMD.iNh)

	{

	(void)Mem::Copy(iData,aMD.iData,sizeof(iData));

	}

EXPORT_C CMD4* CMD4::NewL(void)

	{

	CMD4* self = new (ELeave) CMD4();

	self->Reset();

	return (self);

	}

EXPORT_C CMessageDigest* CMD4::ReplicateL(void)

	{

	 return CMD4::NewL();

	}

EXPORT_C CMD4::~CMD4(void)

	{

	}

EXPORT_C TPtrC8 CMD4::Hash(const TDesC8& aMessage)

	{

	//Adds the aMessage to the internal representation of data to be hashed i.e iData

	DoUpdate(aMessage.Ptr(),aMessage.Size());

	StoreState();

	//Does the padding and does the block operation on the final 512 bit block.

	DoFinal();

	RestoreState();

	return iHash;

	}

EXPORT_C CMessageDigest* CMD4::CopyL(void)

	{

	return new(ELeave) CMD4(*this);

	}

EXPORT_C TInt CMD4::BlockSize(void)

	{

	return sizeof(iData);

	}

EXPORT_C TInt CMD4::HashSize(void)

	{

	return MD4_HASH;

	}

EXPORT_C void CMD4::Reset(void)

	{

	iA=0x67452301;

	iB=0xefcdab89;

	iC=0x98badcfe;

	iD=0x10325476;

	iNh=0;

	iNl=0;

	}

EXPORT_C void CMD4::Update(const TDesC8& aMessage)

	{

	DoUpdate(aMessage.Ptr(),aMessage.Size());

	}

EXPORT_C TPtrC8 CMD4::Final(const TDesC8& aMessage)

	{

	//Adds the aMessage to the internal representation of data to be hashed i.e iData

	DoUpdate(aMessage.Ptr(),aMessage.Size());

	//Does the padding and does the block operation on the final 512 bit block.

	DoFinal();

	//Resets the values of iA, iB, iC and iD, iNh, iNl

	Reset();

	return iHash;

	}

EXPORT_C TPtrC8 CMD4::Final()

	{

	//Does the padding and does the block operation on the final 512 bit block.

	DoFinal();

	//Resets the values of iA, iB, iC and iD, iNh, iNl

	Reset();

	return iHash;

	}

void CMD4::DoUpdate(const TUint8* aData,TUint aLength)

	{

	const TUint8* pend=aData+aLength;	

	for (const TUint8* paData=aData;paData<pend;paData++) 

		{

		const TUint8 byte=*paData;

		switch (iNl&3) 

			{

			case 0:

				iData[iNl>>2]=byte;

				break;

			case 1:

				iData[iNl>>2]|=byte<<8;

				break;

			case 2:

				iData[iNl>>2]|=byte<<16;

				break;

			case 3:

				iData[iNl>>2]|=byte<<24;

				break;

			default:

				break;

			};

		if(++iNl==64) 

			{

			Block();

			iNh+=64;

			iNl=0;

			}

		}

	}

static inline TUint CMD4_F(TUint x,TUint y,TUint z)

	{

	return ((x)&(y)) | ((~x)&(z));

	}

static inline TUint CMD4_G(TUint x,TUint y,TUint z)

	{

	return ((x)&(y)) | ((x)&(z)) | ((y)&(z));

	}

static inline TUint CMD4_H(TUint x,TUint y,TUint z)

	{

	return (x)^(y)^(z);

	}

#ifdef NOREFS

static inline TUint CMD4_FF(TUint a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_F(b,c,d) + x; 

	a=CMD_R(a,s);

	return a;

	}

static inline TUint CMD4_GG(TUint a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_G(b,c,d) + x + (TUint32)0x5a827999; 

	a=CMD_R(a,s);

	return a;

	}

static inline TUint CMD4_HH(TUint a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_H(b,c,d) + x + (TUint32)0x6ed9eba1; 

	a=CMD_R(a,s);

	return a;

	}

void CMD4::Block()

	{

	register TUint tempA=iA;

	register TUint tempB=iB;

	register TUint tempC=iC;

	register TUint tempD=iD;

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 1],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[ 2],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[ 3],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 4],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 5],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[ 6],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[ 7],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 8],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 9],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[10],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[11],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[12],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[13],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[14],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[15],19);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 4],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[ 8],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[12],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 1],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 5],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[ 9],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[13],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 2],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 6],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[10],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[14],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 3],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 7],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[11],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[15],13);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[ 8],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 4],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[12],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 2],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[10],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 6],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[14],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 1],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[ 9],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 5],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[13],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 3],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[11],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 7],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[15],15);

	iA+=tempA;

	iB+=tempB;

	iC+=tempC;

	iD+=tempD;

	}

#else

#ifdef MACRO

#define CMD4_FF(a, b, c, d, x, s) (CMD_R(a += CMD4_F(b,c,d) + x, s))

#define CMD4_GG(a, b, c, d, x, s) (CMD_R(a += CMD4_G(b,c,d) + x + (TUint32)0x5a827999, s))

#define CMD4_HH(a, b, c, d, x, s) (CMD_R(a += CMD4_H(b,c,d) + x + (TUint32)0x6ed9eba1, s))

void CMD4::Block()

	{

	register TUint tempA=iA;

	register TUint tempB=iB;

	register TUint tempC=iC;

	register TUint tempD=iD;

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 1],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[ 2],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[ 3],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 4],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 5],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[ 6],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[ 7],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[ 8],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[ 9],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[10],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[11],19);

	tempA = CMD4_FF(tempA,tempB,tempC,tempD,iData[12],3);

	tempD = CMD4_FF(tempD,tempA,tempB,tempC,iData[13],7);

	tempC = CMD4_FF(tempC,tempD,tempA,tempB,iData[14],11);

	tempB = CMD4_FF(tempB,tempC,tempD,tempA,iData[15],19);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 4],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[ 8],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[12],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 1],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 5],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[ 9],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[13],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 2],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 6],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[10],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[14],13);

	tempA = CMD4_GG(tempA,tempB,tempC,tempD,iData[ 3],3);

	tempD = CMD4_GG(tempD,tempA,tempB,tempC,iData[ 7],5);

	tempC = CMD4_GG(tempC,tempD,tempA,tempB,iData[11],9);

	tempB = CMD4_GG(tempB,tempC,tempD,tempA,iData[15],13);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 0],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[ 8],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 4],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[12],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 2],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[10],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 6],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[14],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 1],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[ 9],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 5],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[13],15);

	tempA = CMD4_HH(tempA,tempB,tempC,tempD,iData[ 3],3);

	tempD = CMD4_HH(tempD,tempA,tempB,tempC,iData[11],9);

	tempC = CMD4_HH(tempC,tempD,tempA,tempB,iData[ 7],11);

	tempB = CMD4_HH(tempB,tempC,tempD,tempA,iData[15],15);

	iA+=tempA;

	iB+=tempB;

	iC+=tempC;

	iD+=tempD;

	}

#else

static inline void CMD4_FF(TUint& a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_F(b,c,d) + x; 

	a=CMD_R(a,s);

	}

static inline void CMD4_GG(TUint& a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_G(b,c,d) + x + (TUint32)0x5a827999; 

	a=CMD_R(a,s);

	}

static inline void CMD4_HH(TUint& a,const TUint b,const TUint c,const TUint d,const TUint x,const TUint s)

	{

	a+=CMD4_H(b,c,d) + x + (TUint32)0x6ed9eba1; 

	a=CMD_R(a,s);

	}

void CMD4::Block()

	{

	register TUint tempA=iA;

	register TUint tempB=iB;

	register TUint tempC=iC;

	register TUint tempD=iD;

	CMD4_FF(tempA,tempB,tempC,tempD,iData[ 0],3);

	CMD4_FF(tempD,tempA,tempB,tempC,iData[ 1],7);

	CMD4_FF(tempC,tempD,tempA,tempB,iData[ 2],11);

	CMD4_FF(tempB,tempC,tempD,tempA,iData[ 3],19);

	CMD4_FF(tempA,tempB,tempC,tempD,iData[ 4],3);

	CMD4_FF(tempD,tempA,tempB,tempC,iData[ 5],7);

	CMD4_FF(tempC,tempD,tempA,tempB,iData[ 6],11);

	CMD4_FF(tempB,tempC,tempD,tempA,iData[ 7],19);

	CMD4_FF(tempA,tempB,tempC,tempD,iData[ 8],3);

	CMD4_FF(tempD,tempA,tempB,tempC,iData[ 9],7);

	CMD4_FF(tempC,tempD,tempA,tempB,iData[10],11);

	CMD4_FF(tempB,tempC,tempD,tempA,iData[11],19);

	CMD4_FF(tempA,tempB,tempC,tempD,iData[12],3);

	CMD4_FF(tempD,tempA,tempB,tempC,iData[13],7);

	CMD4_FF(tempC,tempD,tempA,tempB,iData[14],11);

	CMD4_FF(tempB,tempC,tempD,tempA,iData[15],19);

	CMD4_GG(tempA,tempB,tempC,tempD,iData[ 0],3);

	CMD4_GG(tempD,tempA,tempB,tempC,iData[ 4],5);

	CMD4_GG(tempC,tempD,tempA,tempB,iData[ 8],9);

	CMD4_GG(tempB,tempC,tempD,tempA,iData[12],13);

	CMD4_GG(tempA,tempB,tempC,tempD,iData[ 1],3);

	CMD4_GG(tempD,tempA,tempB,tempC,iData[ 5],5);

	CMD4_GG(tempC,tempD,tempA,tempB,iData[ 9],9);

	CMD4_GG(tempB,tempC,tempD,tempA,iData[13],13);

	CMD4_GG(tempA,tempB,tempC,tempD,iData[ 2],3);

	CMD4_GG(tempD,tempA,tempB,tempC,iData[ 6],5);

	CMD4_GG(tempC,tempD,tempA,tempB,iData[10],9);

	CMD4_GG(tempB,tempC,tempD,tempA,iData[14],13);

	CMD4_GG(tempA,tempB,tempC,tempD,iData[ 3],3);

	CMD4_GG(tempD,tempA,tempB,tempC,iData[ 7],5);

	CMD4_GG(tempC,tempD,tempA,tempB,iData[11],9);

	CMD4_GG(tempB,tempC,tempD,tempA,iData[15],13);

	CMD4_HH(tempA,tempB,tempC,tempD,iData[ 0],3);

	CMD4_HH(tempD,tempA,tempB,tempC,iData[ 8],9);

	CMD4_HH(tempC,tempD,tempA,tempB,iData[ 4],11);

	CMD4_HH(tempB,tempC,tempD,tempA,iData[12],15);

	CMD4_HH(tempA,tempB,tempC,tempD,iData[ 2],3);

	CMD4_HH(tempD,tempA,tempB,tempC,iData[10],9);

	CMD4_HH(tempC,tempD,tempA,tempB,iData[ 6],11);

	CMD4_HH(tempB,tempC,tempD,tempA,iData[14],15);

	CMD4_HH(tempA,tempB,tempC,tempD,iData[ 1],3);

	CMD4_HH(tempD,tempA,tempB,tempC,iData[ 9],9);

	CMD4_HH(tempC,tempD,tempA,tempB,iData[ 5],11);

	CMD4_HH(tempB,tempC,tempD,tempA,iData[13],15);

	CMD4_HH(tempA,tempB,tempC,tempD,iData[ 3],3);

	CMD4_HH(tempD,tempA,tempB,tempC,iData[11],9);

	CMD4_HH(tempC,tempD,tempA,tempB,iData[ 7],11);

	CMD4_HH(tempB,tempC,tempD,tempA,iData[15],15);

	iA+=tempA;

	iB+=tempB;

	iC+=tempC;

	iD+=tempD;

	}

#endif

#endif

void CMD4::DoFinal(void)

	{

	iNh += iNl;

	const TUint ul128=128;

	switch (iNl&3) 

		{

		case 0:

			iData[iNl>>2] = ul128;

			break;

		case 1:

			iData[iNl>>2] += ul128<<8;

			break;

		case 2:

			iData[iNl>>2] += ul128<<16;

			break;

		case 3:

			iData[iNl>>2] += ul128<<24;

			break;

		default:

			break;

		};

	if (iNl>=56) 

		{

		if (iNl<60)

			iData[15]=0;		

		Block();

		Mem::FillZ(iData,14*sizeof(TUint));

		} 

	else

		{

		const TUint offset=(iNl+4)>>2;

		Mem::FillZ(iData+offset,(14-offset)*sizeof(TUint));

		}

	iData[14]=iNh<<3;//number in bits

	// this will fail if the total input length is longer than 2^32 in bits

	//(2^31 in bytes) which is roughly half a gig.

	iData[15]=0;

	Block();

	//

	// Generate hash value into iHash

	//

	TUint tmp=iA;

	iHash[0]=(TUint8)(tmp & 255);

	iHash[1]=(TUint8)((tmp >>= 8) & 255);

	iHash[2]=(TUint8)((tmp >>= 8) & 255);

	iHash[3]=(TUint8)((tmp >>= 8) & 255);

	tmp=iB;

	iHash[4]=(TUint8)(tmp & 255);

	iHash[5]=(TUint8)((tmp >>= 8) & 255);

	iHash[6]=(TUint8)((tmp >>= 8) & 255);

	iHash[7]=(TUint8)((tmp >>= 8) & 255);

	tmp=iC;

	iHash[8]=(TUint8)(tmp & 255);

	iHash[9]=(TUint8)((tmp >>= 8) & 255);

	iHash[10]=(TUint8)((tmp >>= 8) & 255);

	iHash[11]=(TUint8)((tmp >>= 8) & 255);

	tmp=iD;

	iHash[12]=(TUint8)(tmp & 255);

	iHash[13]=(TUint8)((tmp >>= 8) & 255);

	iHash[14]=(TUint8)((tmp >>= 8) & 255);

	iHash[15]=(TUint8)((tmp >>= 8) & 255);

	}

void CMD4::RestoreState()

{

	iA = iACopy;

	iB = iBCopy;

	iC = iCCopy;

	iD = iDCopy;

	iNl = iNlCopy;

	iNh = iNhCopy;	

	Mem::Copy(&iData[0], &iDataCopy[0], MD4_LBLOCK*sizeof(TUint)); 

}

void CMD4::StoreState()

{

	iACopy = iA;

	iBCopy = iB;

	iCCopy = iC;

	iDCopy = iD;

	iNlCopy = iNl;

	iNhCopy = iNh;	

	Mem::Copy(&iDataCopy[0], &iData[0], MD4_LBLOCK*sizeof(TUint));

}