/*

* 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: 

* software md4 implementation

* software md4 implementation

*

*/

/**

 @file

*/

#include "md4impl.h"

#include <cryptospi/hashplugin.h>

#include "pluginconfig.h"

using namespace SoftwareCrypto;

CMD4Impl* CMD4Impl::NewL()

	{

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

	self->Reset();

	return self;						

	}

CMD4Impl* CMD4Impl::NewLC()

	{

	CMD4Impl* self=NewL();

	CleanupStack::PushL(self);

	return self;						

	}

CMD4Impl::CMD4Impl() : iHash(KMD4HashSize)

	{		

	}

CMD4Impl::CMD4Impl(const CMD4Impl& aCMD4Impl)

: iHash(aCMD4Impl.iHash),iA(aCMD4Impl.iA),iB(aCMD4Impl.iB),iC(aCMD4Impl.iC),iD(aCMD4Impl.iD),

  iNl(aCMD4Impl.iNl),iNh(aCMD4Impl.iNh)

	{

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

	}

CMD4Impl::~CMD4Impl()

	{	

	}

void CMD4Impl::Reset()

	{

	iA=0x67452301;

	iB=0xefcdab89;

	iC=0x98badcfe;

	iD=0x10325476;

	iNh=0;

	iNl=0;

	}

void CMD4Impl::Close()

	{

	delete this;	

	}

void CMD4Impl::GetCharacteristicsL(const TCharacteristics*& aPluginCharacteristics)

	{

	aPluginCharacteristics=NULL;

	TInt hashNum=sizeof(KHashCharacteristics)/sizeof(THashCharacteristics*);

	for (TInt i=0;i<hashNum;i++)

		{

		if (KHashCharacteristics[i]->cmn.iImplementationUID == ImplementationUid().iUid)

			{

			aPluginCharacteristics = KHashCharacteristics[i];

			break;

			}

		}	

	}

CExtendedCharacteristics* CMD4Impl::CreateExtendedCharacteristicsL()

	{

	// All Symbian software plug-ins have unlimited concurrency, cannot be reserved

	// for exclusive use and are not CERTIFIED to be standards compliant.

	return CExtendedCharacteristics::NewL(KMaxTInt, EFalse);

	}

const CExtendedCharacteristics* CMD4Impl::GetExtendedCharacteristicsL()

	{

	return CMD4Impl::CreateExtendedCharacteristicsL();

	}

TPtrC8 CMD4Impl::Hash(const TDesC8& aMessage)

	{

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

	StoreState();

	DoFinal();

	RestoreState();

	return iHash;

	}		

void CMD4Impl::Update(const TDesC8& aMessage)

	{

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

	}

TPtrC8 CMD4Impl::Final(const TDesC8& aMessage)

	{

	if (aMessage!=KNullDesC8())

		{

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

		}

	DoFinal();

	Reset();

	return iHash;

	}

MHash* CMD4Impl::ReplicateL()

	{	 

	return CMD4Impl::NewL();

	}

MHash* CMD4Impl::CopyL()

	{

	return new(ELeave) CMD4Impl(*this);	

	}

TUid CMD4Impl::ImplementationUid()

	{

	return KCryptoPluginMd4Uid;

	}

void CMD4Impl::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 CMD4Impl::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 CMD4Impl::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 CMD4Impl::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 CMD4Impl::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 CMD4Impl::RestoreState()

	{

	iA = iACopy;

	iB = iBCopy;

	iC = iCCopy;

	iD = iDCopy;

	iNl = iNlCopy;

	iNh = iNhCopy;	

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

	}

void CMD4Impl::StoreState()

	{

	iACopy = iA;

	iBCopy = iB;

	iCCopy = iC;

	iDCopy = iD;

	iNlCopy = iNl;

	iNhCopy = iNh;	

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

	}

// Implemented in hmacimpl.cpp or softwarehashbase.cpp

// but required as derived from MHash. No coverage here.

#ifdef _BullseyeCoverage

#pragma suppress_warnings on

#pragma BullseyeCoverage off

#pragma suppress_warnings off

#endif

TAny* CMD4Impl::GetExtension(TUid /*aExtensionId*/)

	{

	return NULL;	

	}

void CMD4Impl::SetOperationModeL(TUid /*aOperationMode*/)

	{

	User::Leave(KErrNotSupported);

	}