/*---------------------------------------------------------------------------*
  Project:  TwlIPL
  File:     SYSM_card.c

  Copyright 2007 Nintendo.  All rights reserved.

  These coded instructions, statements, and computer programs contain
  proprietary information of Nintendo of America Inc. and/or Nintendo
  Company Ltd., and are protected by Federal copyright law.  They may
  not be disclosed to third parties or copied or duplicated in any form,
  in whole or in part, without the prior written consent of Nintendo.

  $Date::            $
  $Rev$
  $Author$
 *---------------------------------------------------------------------------*/

#include <sysmenu/sysmenu_lib/ARM9/sysmenu_api.h>
#include "sysmenu_card.h"


typedef enum {
	CARD_NOT_DETECTING = 0,
	CARD_DETECTING
} CARDPullStatus;


typedef struct SYSMCardPullWork
{
    CARDPullStatus  pullStatus;
    u32     		cardCnt;
    u16     		lockID;
	u16				detectPullOut;

} SYSMCardPullWork;


static SYSMCardPullWork  cpw;


// 内部関数
void SYSMi_InitCardPulledOut(void);
BOOL SYSMi_IsDetectableCardPulledOut(void);
void SYSMi_StartReadCardID(void);
void SYSMi_ReadCardPage(void *romp, void *ramp, s32 size);
static void SYSMi_SetCardOp(const u32 *op);


//----------------------------------------------------------------------
//     					カード抜け検出初期化
//----------------------------------------------------------------------

void SYSMi_InitCardPulledOut(void)
{
	cpw.lockID = (u16 )OS_GetLockID();
	cpw.cardCnt = *(vu32 *)MROMCNT_GAME_BUF;
}


//----------------------------------------------------------------------
//     					カード抜け検出
//----------------------------------------------------------------------

BOOL SYSM_IsCardPulledOut(void)
{
	if (SYSMi_IsDetectableCardPulledOut() == FALSE)	return FALSE;

	switch (cpw.pullStatus) {
		case CARD_NOT_DETECTING:
				if (OS_TryLockCard( cpw.lockID ) == OS_LOCK_SUCCESS )
				{
					SYSMi_StartReadCardID();
					cpw.pullStatus = CARD_DETECTING;
				}
				break;

		case CARD_DETECTING:
				if (SYSMi_IsCardDataReady()) {
					u32 cardID = *(vu32 *)REG_CARD_DATA;
					if ( ( cardID != SYSMi_GetWork()->nCardID ) &&
						 SYSM_IsExistCard() )
					{
						cpw.detectPullOut = TRUE;
					}

					(void)OS_UnlockCard( cpw.lockID );
					cpw.pullStatus = CARD_NOT_DETECTING;
				}
				break;
	}

	return  cpw.detectPullOut;
}


//----------------------------------------------------------------------
//     					カード抜け検出終了処理
//----------------------------------------------------------------------

void SYSM_FinalizeCardPulledOut(void)
{
	while (SYSM_IsDetectingCardPulledOut()) {
		(void)SYSM_IsCardPulledOut();
	}
}


//----------------------------------------------------------------------
//     					カード抜け検出処理中か
//----------------------------------------------------------------------

BOOL SYSM_IsDetectingCardPulledOut(void)
{
	return  (cpw.pullStatus == CARD_DETECTING);
}


//----------------------------------------------------------------------
//     				カード抜け検出の準備ができているか
//----------------------------------------------------------------------

BOOL SYSMi_IsDetectableCardPulledOut(void)
{
	return  SYSM_IsExistCard();
}


//----------------------------------------------------------------------
//     					カードID読み込み開始
//----------------------------------------------------------------------

void SYSMi_StartReadCardID(void)
{
	u32 op[2];

	op[0] = 0;													// コマンド設定
	op[1] = MROMOP_G_READ_ID;

	SYSMi_SetCardOp( op );
																// コントロール設定 
	*(vu32 *)REG_CARDCNT = cpw.cardCnt
						| CARD_READ_MODE | CARD_STATUS
						| CARD_START | CARD_RESET_HI;
}


//----------------------------------------------------------------------
//     					カードID読み込み
//----------------------------------------------------------------------

u32 SYSMi_ReadCardID(void)
{
	u32 op[2];

	op[0] = 0;													// コマンド設定
	op[1] = MROMOP_G_READ_ID;

	SYSMi_SetCardOp( op );
																// コントロール設定 
	*(vu32 *)REG_CARDCNT = *(vu32 *)MROMCNT_GAME_BUF
						| CARD_READ_MODE | CARD_STATUS
						| CARD_START | CARD_RESET_HI;

	SYSMi_WaitCardData();

	return  *(vu32 *)REG_CARD_DATA;
}


//----------------------------------------------------------------------
//     					カードデータ同期読み込み
//----------------------------------------------------------------------

void SYSM_ReadCard(void *romp, void *ramp, s32 size)
{
	s32  restSize = size;
	s32  blockSize = MROM_PAGE_SIZE;

	while (restSize > 0) {										// ブロック分割読み込み
		if (restSize >= MROM_PAGE_SIZE) {	size = MROM_PAGE_SIZE;
		} else {							size = restSize;
		}

		SYSMi_ReadCardPage(romp, ramp, size);

		(u8 *)romp += size;
		(u8 *)ramp += size;
		restSize   -= size;
	}
}


//----------------------------------------------------------------------
//     					ページ読み込み
//----------------------------------------------------------------------

void SYSMi_ReadCardPage(void *romp, void *ramp, s32 size)
{
	{	u32 op[2];

		op[0] = (u32 )romp <<24;								// コマンド設定
		op[1] = MROMOP_G_READ_PAGE | (u32 )romp >>8;

		SYSMi_SetCardOp( op );
	}

	// ページリード
	{	void *ramEndp;
		u32 cardCntTmp;

		*(vu32 *)REG_CARDCNT = *(vu32 *)MROMCNT_GAME_BUF		// コントロール設定 
							| CARD_READ_MODE | CARD_1_PAGE
							| CARD_START | CARD_RESET_HI;

		ramEndp = (u8 *)ramp + size;							// 格納終了アドレス算出

		do {													// CPU読み込み
			cardCntTmp = *(vu32 *)REG_CARDCNT;

			if (cardCntTmp & CARD_DATA_READY) {
				u32 dataTmp = *(vu32 *)REG_CARD_DATA;

				if (ramp < ramEndp)	
					*((vu32 *)ramp) = dataTmp;					// 指定サイズまで格納（後続データは読み捨て）
				((vu32 *)ramp)++;
			}
		} while (cardCntTmp & CARD_START);
	}
}


//----------------------------------------------------------------------
//     					コマンド設定
//----------------------------------------------------------------------

static void SYSMi_SetCardOp(const u32 *op)
{
	int  i;

	*(vu8 *)REG_CARD_MASTER_CNT = CARDMST_SEL_ROM					// マスターイネーブル
								| CARDMST_ENABLE;

	for (i=0; i<2; i++) {											// コマンド設定
		u32	opTmp = op[1 - i];
		vu8 *opDestBasep = (vu8 *)(REG_CARD_CMD + i*4);

		opDestBasep[0] = (u8 )(opTmp >>24);
		opDestBasep[1] = (u8 )(opTmp >>16);
		opDestBasep[2] = (u8 )(opTmp >>8);
		opDestBasep[3] = (u8 )(opTmp >>0);
	}
}