// Copyright (c) 1999-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:

//

#include <drivers/sdcard.h>

// ======== TSDCard ========

TSDCard::TSDCard()

:	iProtectedAreaSize(0), iPARootDirEnd(KPARootDirEndUnknown)

	{

	// empty

	}

TInt64 TSDCard::DeviceSize64() const

//

// returns the SD device size

//

	{

	if(iFlags & KSDCardIsSDCard)

		{	

		return (IsHighCapacity()) ? 512 * 1024 * (TInt64)(1 + CSD().CSDField(69, 48)) : TMMCard::DeviceSize64();

		}

	return(TMMCard::DeviceSize64());

	}

TUint32 TSDCard::PreferredWriteGroupLength() const

//

// return SD erase sector size, (SECTOR_SIZE + 1) * 2 ** WRITE_BLK_LEN

//

	{

	if(iFlags & KSDCardIsSDCard)

		{	

		TSDCSD sdcsd(CSD());

		return (sdcsd.SDSectorSize() + 1) * (1 << sdcsd.WriteBlLen());

		}

	return(TMMCard::PreferredWriteGroupLength());

	}

TInt TSDCard::GetFormatInfo(TLDFormatInfo& /*aFormatInfo*/) const

	{

	return KErrNotSupported;

	}

TUint32 TSDCard::MinEraseSectorSize() const

	{

	if(iFlags&KSDCardIsSDCard)

		{	

		TSDCSD sdcsd(CSD());

		if (sdcsd.SDEraseBlkEn())

			return sdcsd.WriteBlockLength();		// raised logarithm

		else

			return (sdcsd.SDSectorSize() + 1) * sdcsd.WriteBlockLength();

		}

	return TMMCard::MinEraseSectorSize();

	}

const TUint32 KEraseSectorSizeShift = 8;	// KEraseSectorSizeShift determines the multiple of the sector size 

											// that can be erased in one operation

TUint32 TSDCard::EraseSectorSize() const

	{

	if(iFlags&KSDCardIsSDCard)

		{	

		TSDCSD sdcsd(CSD());

		return ((sdcsd.SDSectorSize() + 1) * sdcsd.WriteBlockLength()) << KEraseSectorSizeShift;

		}

	return TMMCard::EraseSectorSize();

	}

const TInt KDefaultBlockLen		   = 9;							// 2^9 = 512 bytes

const TInt KDefaultBlockLenInBytes = 1 << KDefaultBlockLen;		// 2^9 = 512 bytes

const TInt KTwoGbyteSDBlockLen	   = 10;						// 2^10 = 1024 bytes

const TInt KFourGbyteSDBlockLen	   = 11;						// 2^11 = 2048 bytes

TInt TSDCard::GetEraseInfo(TMMCEraseInfo& aEraseInfo) const

//

// Return info. on erase services for this card

//

	{

	// SD Controllers support MMC cards too. Check if we are really dealing with an SD card

	if(!(iFlags&KSDCardIsSDCard))

		return(TMMCard::GetEraseInfo(aEraseInfo));

	if (CSD().CCC() & KMMCCmdClassErase)

		{

		// This card supports erase cmds. However, SD cards don't support Erase Group commands (i.e. CMD35, CMD36).

		aEraseInfo.iEraseFlags=KMMCEraseClassCmdsSupported; 

		// Return the preferred size to be used as the unit for erase operations.

		TSDCSD sdcsd(CSD());

		TUint32 prefSize=((sdcsd.SDSectorSize() + 1) * sdcsd.WriteBlockLength());

		prefSize<<=KEraseSectorSizeShift;		// Use multiples of the sector size for each erase operation

		aEraseInfo.iPreferredEraseUnitSize=prefSize;

		// Return the smallest size that can be used as the unit for erase operations

		if (sdcsd.SDEraseBlkEn())

			{

			aEraseInfo.iMinEraseSectorSize = KDefaultBlockLenInBytes;

			}

		else

			{

			aEraseInfo.iMinEraseSectorSize=(sdcsd.SDSectorSize() + 1) * sdcsd.WriteBlockLength();

			}

		}

	else		

		aEraseInfo.iEraseFlags=0;

	return(KErrNone);	

	}

TInt TSDCard::MaxReadBlLen() const

/**

 * Returns the maximum read block length supported by the card encoded as a logarithm

 * Normally this is the same as the READ_BL_LEN field in the CSD register,

 * but for high capacity cards (> 2GB) this is set to a maximum of 512 bytes,

 * if possible, to try to avoid compatibility issues.

 */

	{

	if (IsSDCard())

		{

		TInt blkLenLog2 = CSD().ReadBlLen();

		if (blkLenLog2 == KTwoGbyteSDBlockLen || blkLenLog2 == KFourGbyteSDBlockLen)

			{

			// The SD card spec. makes a special case for 2GByte cards,

			// ...and some manufacturers apply the same method to support 4G cards

			__KTRACE_OPT(KPBUS1, Kern::Printf("=mmc:mrbl > 2GB SD"));

			blkLenLog2 = KDefaultBlockLen;

			}

		return blkLenLog2;

		}

	else		// MMC card

		{

		return (TMMCard::MaxReadBlLen());

		}

	}

TInt TSDCard::MaxWriteBlLen() const

/**

 * Returns the maximum write block length supported by the card encoded as a logarithm

 * Normally this is the same as the WRITE_BL_LEN field in the CSD register,

 * but for high capacity cards (> 2GB) this is set to a maximum of 512 bytes,

 * if possible, to try to avoid compatibility issues.

 */

	{

	if (IsSDCard())

		{

		TInt blkLenLog2 = CSD().WriteBlLen();

		if (blkLenLog2 == KTwoGbyteSDBlockLen || blkLenLog2 == KFourGbyteSDBlockLen)

			{

			// The SD card spec. makes a special case for 2GByte cards,

			// ...and some manufacturers apply the same method to support 4G cards

			__KTRACE_OPT(KPBUS1, Kern::Printf("=mmc:mwbl > 2GB SD"));

			blkLenLog2 = KDefaultBlockLen;

			}

		return blkLenLog2;

		}

	else		// MMC card

		{

		return (TMMCard::MaxWriteBlLen());

		}

	}

TUint TSDCard::MaxTranSpeedInKilohertz() const

/**

 * Returns the maximum supported clock rate for the card, in Kilohertz.

 * @return Speed, in Kilohertz

 */

	{

	TUint maxClk = TMMCard::MaxTranSpeedInKilohertz();

	if (IsSDCard())

		{

		__KTRACE_OPT(KPBUS1, Kern::Printf("\t >TSDCard(%d): MaxTranSpeedInKilohertz: %d",(iIndex-1),maxClk));

#ifdef _DEBUG

		//MaxClk for SD should only be either 25000KHz or 50000KHz

		if ( (maxClk != KSDDTClk25MHz) && (maxClk != KSDDTClk50MHz) )

			{

			__KTRACE_OPT(KPBUS1, Kern::Printf("\t >DSDStack: Non-Compliant DT Clock"));

			}

#endif

		if (maxClk > KSDDTClk50MHz)

			{

			//Clock rate exceeds SD possible max clock rate

			__KTRACE_OPT(KPBUS1, Kern::Printf("\t >DSDStack: Tuning DT Clock down to 50MHz"));

			maxClk = KSDDTClk50MHz;

			}

		}

	return maxClk;

	}

// ======== TSDCardArray ========

EXPORT_C TInt TSDCardArray::AllocCards()

// 

// allocate TSDCard objects for iCards and iNewCardsArray.  This function

// is called at bootup as part of stack allocation so there is no cleanup

// if it fails.

//

	{

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

		{

		// zeroing the card data used to be implicit because embedded in

		// CBase-derived DMMCStack.

		if ((iCards[i] = new TSDCard) == 0)

			return KErrNoMemory;

		iCards[i]->iUsingSessionP = 0;

		if ((iNewCards[i] = new TSDCard) == 0)

			return KErrNoMemory;

		}

	return KErrNone;

	}

void TSDCardArray::AddCardSDMode(TUint aCardNumber,const TUint8* aCID,TRCA* aNewRCA)

//

// Add an MMC card straight to the main card array in slot 'aCardNumber'. Save

// the CID value in the slot. Return a RCA for the card.

//

	{

	TRCA rca=0;

	// First, lets check if the same card was here before. If it was, keep the same RCA

	if (Card(aCardNumber).IsPresent() && Card(aCardNumber).iCID==aCID)

		rca=Card(aCardNumber).iRCA;

	else

		{

		// Allocate and new RCA and store the CID in the slot selected

		__ASSERT_ALWAYS( (rca=iOwningStack->iRCAPool.GetFreeRCA())!=0,DMMCSocket::Panic(DMMCSocket::EMMCNoFreeRCA) );

		Card(aCardNumber).iCID=aCID;

		if ( Card(aCardNumber).iRCA != 0 )

			iOwningStack->iRCAPool.UnlockRCA(Card(aCardNumber).iRCA);

		Card(aCardNumber).iRCA=rca;

		iOwningStack->iRCAPool.LockRCA(Card(aCardNumber).iRCA);

		}

	Card(aCardNumber).iIndex=(aCardNumber+1); // Mark card as being present

	*aNewRCA=rca;

	}

TInt TSDCardArray::StoreRCAIfUnique(TUint aCardNumber,TRCA& anRCA)

//

// Check that no other array element has the same RCA value 'anRCA'. If no

// no duplication then store in slot 'aCardNumber'.

//

	{

	if (anRCA==0)

		return(KErrGeneral);

	Card(aCardNumber).iRCA=0;

	// Now let's look if we've seen this card before

	for ( TUint i=0 ; i<iOwningStack->iMaxCardsInStack ; i++ )

		{

		if ( Card(i).IsPresent() && Card(i).iRCA==anRCA )

			return(KErrInUse);

		}

	Card(aCardNumber).iRCA=anRCA;

	Card(aCardNumber).iIndex=(aCardNumber+1); // Mark card as being present

	return(KErrNone);

	}

EXPORT_C void TSDCardArray::DeclareCardAsGone(TUint aCardNumber)

//

// reset SD specific fields to initial values and then reset generic MultiMediaCard

//

	{

	Card(aCardNumber).SetBusWidth(1);

	TMMCardArray::DeclareCardAsGone(aCardNumber);

	}

// ======== DSDSession ========

void DSDSession::FillAppCommandDesc(TMMCCommandDesc& aDesc, TSDAppCmd aCmd)

	{

	aDesc.iCommand = (TMMCCommandEnum) aCmd;

	aDesc.iArgument = 0;						// set stuff bits to zero

	FillAppCommandDesc(aDesc);

	}

void DSDSession::FillAppCommandDesc(TMMCCommandDesc& aDesc, TSDAppCmd aCmd, TMMCArgument aArg)

	{

	aDesc.iCommand = (TMMCCommandEnum) aCmd;

	aDesc.iArgument = aArg;

	FillAppCommandDesc(aDesc);

	}

const TUint32 CCA = KMMCCmdClassApplication;

const TMMCIdxCommandSpec AppCmdSpecTable[] =

	{						//	Class	Type		Dir			MBlk	StopT	Rsp Type		Len

	{ESDACmdSetBusWidth,		{CCA,ECmdTypeACS,	EDirNone,	EFalse, EFalse, ERespTypeR1,	4}}, //ACMD6

	{ESDACmdSDStatus,			{CCA,ECmdTypeADTCS,	EDirRead,	EFalse, EFalse, ERespTypeR1,	4}}, //ACMD13

	{ESDACmdSendNumWrBlocks,	{CCA,ECmdTypeADTCS,	EDirRead,	EFalse, EFalse, ERespTypeR1,	4}}, //ACMD22

	{ESDACmdSetWrBlkEraseCount,	{CCA,ECmdTypeACS,	EDirNone,	EFalse, EFalse, ERespTypeR1,	4}}, //ACMD23

	{ESDACmdSDAppOpCond,		{CCA,ECmdTypeBCR,	EDirNone,	EFalse, EFalse, ERespTypeR3,	4}}, //ACMD41

	{ESDACmdSetClrCardDetect,	{CCA,ECmdTypeAC,	EDirNone,	EFalse, EFalse, ERespTypeR1,	4}}, //ACMD42

	{ESDACmdSendSCR,			{CCA,ECmdTypeADTCS,	EDirRead,	EFalse, EFalse, ERespTypeR1,	4}}  //ACMD51

};

void DSDSession::FillAppCommandDesc(TMMCCommandDesc& aDesc)

	{

	aDesc.iSpec = FindCommandSpec(AppCmdSpecTable, aDesc.iCommand);

	aDesc.iFlags = 0;

	aDesc.iBytesDone = 0;

	}

const TMMCIdxCommandSpec SdSpecificCmdSpecTable[] =

/**

 * SD Specific Command Table

 *

 *  - Some commands defined in the SD specification overload those defined in the MMC specification.

 *    This table contains the SD specific versions of those commands.

 */

	{

							//   Class				Type			Dir			MBlk	StopT	Rsp Type		Len

	{ESDCmdSendRelativeAddress,	{KMMCCmdClassBasic,	ECmdTypeBCR,	EDirNone,	EFalse,	EFalse,	ERespTypeR6,	4}},	// CMD3 : SEND_RELATIVE_ADDRESS

	{ESDCmdSwitchFunction,		{KMMCCmdClassSwitch,ECmdTypeADTCS,	EDirRead,	EFalse,	EFalse,	ERespTypeR1,	4}},	// CMD6 : SWITCH_FUNCTION

	{ESDCmdSendIfCond,			{KMMCCmdClassBasic,	ECmdTypeBCR,	EDirNone,	EFalse,	EFalse,	ERespTypeR7,	4}}		// CMD8 : SEND_IF_COND

	};

void DSDSession::FillSdSpecificCommandDesc(TMMCCommandDesc& aDesc, TSDSpecificCmd aCmd, TMMCArgument aArg)

	{

	aDesc.iCommand = (TMMCCommandEnum) aCmd;

	aDesc.iArgument = aArg;

	FillSdSpecificCommandDesc(aDesc);

	}

void DSDSession::FillSdSpecificCommandDesc(TMMCCommandDesc& aDesc, TSDSpecificCmd aCmd)

	{

	aDesc.iCommand = (TMMCCommandEnum) aCmd;

	aDesc.iArgument = 0;						// set stuff bits to zero

	FillSdSpecificCommandDesc(aDesc);

	}

void DSDSession::FillSdSpecificCommandDesc(TMMCCommandDesc& aDesc)

	{

	aDesc.iSpec = FindCommandSpec(SdSpecificCmdSpecTable, aDesc.iCommand);

	aDesc.iFlags = 0;

	aDesc.iBytesDone = 0;

	}

// ======== DSDStack ========

EXPORT_C TInt DSDStack::Init()

	{

	return DMMCStack::Init();

	}

const TInt KMaxRCASendLoops=3;

const TUint KSDMaxPollAttempts=25;

EXPORT_C TMMCErr DSDStack::AcquireStackSM()

//

// This macro acquires new cards in an SD Card - star topology stack.

// This means each card has its own CMD and DAT lines and can be addressed

// individually by the Controller in turn. Commands can also be broadcast 

// simultaneously to the entire stack. 

// It starts with the Controller reading the operating conditions of each 

// card in the stack (SEND_OP_COND - ACMD41). Then, the following

// initialisation sequence is performed to each card in turn:-

// New cards in the stack are identified (ALL_SEND_CID - CMD2) and each one

// is requested to publish a relative card address (SEND_RCA - CMD3). Finally,

// the card specific data (SEND_CSD - CMD9) is read from each card.

// Note that the initialization of MMC cards are supported by this function

// if they are encountered. These require a slightly different init. procdure.

//

	{

		enum states

			{

			EStBegin=0,

			EStNextFullRange,

			EStSendCIDIssued,

			EStIssueSendRCA,

			EStSendRCACheck,

			EStRCADone,

			EStMoreCardsCheck,

			EStEnd

			};

		DMMCSession& s=Session();

	SMF_BEGIN

        __KTRACE_OPT(KPBUS1, Kern::Printf(">DSDStack::AcquireStackSM()"));

		iRCAPool.ReleaseUnlocked();

		iCxCardCount=0; 		// Reset current card number

	SMF_STATE(EStNextFullRange)

		iCxCardType = ESDCardTypeUnknown;

		AddressCard(iCxCardCount); 	// Address the next card

		// Before issueing commands, see if there's actually a card present

		if (!CardDetect(iCxCardCount))

			SMF_GOTOS(EStMoreCardsCheck)

		m.SetTraps(KMMCErrResponseTimeOut);

		SMF_INVOKES(InitialiseMemoryCardSMST, EStSendCIDIssued)

	SMF_STATE(EStSendCIDIssued)

		if( !err )

			{

			// The card responded with a CID. We need to initialise the

			// appropriate entry in the card array with the CID. 

			if (iCxCardType==ESDCardTypeIsSD)

				{

				// Now prepare to recieve an RCA from to the card

				CardArray().CardP(iCxCardCount)->iCID=s.ResponseP();

				DSDSession::FillSdSpecificCommandDesc(Command(), ESDCmdSendRelativeAddress,0); // SEND_RCA with argument just stuff bits

				m.ResetTraps();

				iCxPollRetryCount=0; // Init count of send RCA attempts 

				SMF_GOTOS(EStIssueSendRCA)

				}

			else

				{

				// The card array allocates an RCA, either the old RCA

				// if we have seen this card before, or a new one.

				TRCA rca;

				CardArray().AddCardSDMode(iCxCardCount,s.ResponseP(),&rca);

				// Now assign the new RCA to the card

				s.FillCommandDesc(ECmdSetRelativeAddr,TMMCArgument(rca));

				m.ResetTraps();							

				SMF_INVOKES(ExecCommandSMST,EStRCADone)

				}

			}

		else

			{

			m.ResetTraps();

			SMF_GOTOS(EStMoreCardsCheck) // Timed out, try the next card slot

			}

	SMF_STATE(EStIssueSendRCA)

		SMF_INVOKES(ExecCommandSMST,EStSendRCACheck)

	SMF_STATE(EStSendRCACheck)

		// We need to check that the RCA recieved from the card doesn't clash

		// with any others in this stack. RCA is first 2 bytes of response buffer (in big endian)

		TRCA rca=(TUint16)((s.ResponseP()[0]<<8) | s.ResponseP()[1]);

		if (CardArray().StoreRCAIfUnique(iCxCardCount,rca)!=KErrNone)

			SMF_GOTOS( ((++iCxPollRetryCount<KMaxRCASendLoops)?EStIssueSendRCA:EStMoreCardsCheck) )

	SMF_STATE(EStRCADone)

		SMF_INVOKES(ConfigureMemoryCardSMST, EStMoreCardsCheck)

	SMF_STATE(EStMoreCardsCheck)

		if (++iCxCardCount < (TInt)iMaxCardsInStack)

		    {

		    __KTRACE_OPT(KPBUS1, Kern::Printf(">DSDStack::AcquireStackSM(): More Cards to check: %d",iCxCardCount));

			SMF_GOTOS(EStNextFullRange)

		    }

		else

		    {		   

			AddressCard(KBroadcastToAllCards); // Set back to broadcast mode

			__KTRACE_OPT(KPBUS1, Kern::Printf("<DSDStack::AcquireStackSM()"));

		    }

	SMF_END

	}

TMMCErr DSDStack::InitialiseMemoryCardSMST(TAny* aStackP)

	{ return static_cast<DSDStack*>(aStackP)->InitialiseMemoryCardSM(); }

TMMCErr DSDStack::InitialiseMemoryCardSM()

/**

*/

	{

		enum states

			{

			EStBegin=0,

			EStSendInterfaceCondition,

			EStSentInterfaceCondition,

			EStSetFullRangeCmd,

			EStCheckForFullRangeCmd41Timeout,

			EStSentAppCommandBeforeCheckVoltage,

			EStCheckVoltage,

			EStFullRangeDone,

			EStSetRangeCmd,

			EStCheckForRangeCmd41Timeout,

			EStSetRangeBusyCheck,

			EStCIDCmd,

			EStSendCIDIssued,

			EStEnd

			};

		DMMCSession& s=Session();

		DMMCPsu* psu=(DMMCPsu*)MMCSocket()->iVcc;

		static const TUint32 KCmd8Param		= 0x0100 | 0x00AA;	// Voltage supplied : 2.7-3.6V, Check Pattern 10101010b

		static const TUint32 KCmd8CheckMask = 0x00000FFF;

	SMF_BEGIN

		iCxCardType = ESDCardTypeUnknown;

		s.iCardP = NULL;	// This stops ExecCommandSM() from setting old RCA when sending CMD55

		// Send CMD0 to initialise memory