• FatFs
• 上位レイヤI/F
• 下位レイヤI/F
• 結果

FatFs

　ELMさんが 公開されているFATファイルシステム・モジュールをR8C用に移植してみました。 FatFsは非常によくできています。少し修正するだけで様々なプラットフォームに 移植することができます。今回は以下の条件を想定します。 古いバージョンのFatFsなので多少変更がでているかもしれません。

上位レイヤI/F

• FatFs設定

  R8Cはリトルエンディアンなので_MCU_ENDIANは1に設定します。また、 _USE_STRFUNCを0以外に設定して文字列関数を使う場合は、以下の修正が必要です。

• 修正ポイント

  　上位レイヤは基本的に修正しなくても大丈夫なはずですが、 KPIT GNU v0801ではfprintf関数に関して修正が必要でした。 va_argは可変引数リストを扱うためのマクロですが、KPIT GNUでは第2引数にchar、 unsigned char型などを渡すとエラーを吐くみたいです。 可変引数ではcharでもintのサイズとして引数リストに格納するためだとか。 よくはわからないですが、intを渡しておけばOKみたいです。

	if (c == 'c') {				/* Type is character */
		/* どうやら、KPIT_GNUでは va_arg に char を渡すとエラーらしい。
		int に修正 */
		cc = fputc(va_arg(arp, int), fil);
		if (cc != EOF) cc = 1;
		continue;
	}

下位レイヤI/F

　下位レイヤのプログラムはELMさんのFatFsサンプルプログラム(mmc.c)を少し修正しただけです。 基本的には(Platform dependent)の項目を修正するだけです。

Port controls

ポート関連の項目です。CS信号の制御マクロを修正します。 今回、SOCKWPとSOCKINSは使用しないので適当に処理しておきます。

/* Port Controls  (Platform dependent) */
#define	SELECT()	p6_0 = 0		/* MMC CS = L */
#define	DESELECT()	p6_0 = 1		/* MMC CS = H */

#define	SOCKPORT	p6			/* Socket contact port */
#define	SOCKWP		0x00			/* Write protect switch (not use) */
#define	SOCKINS		0x00			/* Card detect switch (not use) */

SPI入出力

UART2モジュールを介してMMCにアクセスします。受信完了フラグRIは、 u2rbレジスタをリードしないとクリアされません。なので、 読み出し開始前にu2rbレジスタを空読みします。 また、u2rbレジスタはワードアクセスが推奨されています。

/*-----------------------------------------------------------------------*/
/* Transmit a byte to MMC via SPI  (Platform dependent)                  */
/*-----------------------------------------------------------------------*/

#define xmit_spi(dat) 	u2tbl=(dat); while( txept_u2c0==0 )

/*-----------------------------------------------------------------------*/
/* Receive a byte from MMC via SPI  (Platform dependent)                 */
/*-----------------------------------------------------------------------*/

static
BYTE rcvr_spi (void)
{
	WORD d = u2rb.word;
	u2tbl = 0xFF;
	while ( ri_u2c1==0 );
	return (BYTE)u2rb.word;
}

/* Alternative macro to receive data fast */
static
void rcvr_spi_m (BYTE* dst)
{
	WORD d = u2rb.word;
	u2tbl = 0xFF;
	while ( ri_u2c1==0 );
	*dst = (BYTE)u2rb.word;
}

Power control

今回、SD/MMCの電源管理はしないので、 UARTモジュールの初期化終了処理のみ記述しておきます。

/*-----------------------------------------------------------------------*/
/* Power Control  (Platform dependent)                                   */
/*-----------------------------------------------------------------------*/
/* When the target system does not support socket power control, there   */
/* is nothing to do in these functions and chk_power always returns 1.   */

static
void power_on (void)
{
	for (Timer1 = 3; Timer1; );	/* Wait for 30ms */
	p6.byte = 0x05;			//P6[0,3]=1
	pd6.byte = 0x6f;		//P6[0-3,5,6]出力ポート
	u2mr.byte = _BV(SMD0);		//クロック同期式シリアルI/O
	u2brg.byte = 0;			//クロック分周なし
	u2c0.byte = _BV(UFORM);		//SPI Mode0 MSB first
	u2c1.byte = _BV(TE) | _BV(RE);	//送受信許可
}

static
void power_off (void)
{
	SELECT();			/* Wait for card ready */
	wait_ready();
	release_spi();

	u2c1.byte = 0;			/* Disable SPI function */
	p6.byte = 0x00;
	Stat |= STA_NOINIT;		/* Set STA_NOINIT */
}

static
int chk_power(void)			/* Socket power state: 0=off, 1=on */
{
	return 1;
}

FatFs用タイマ

今回、ライトプロテクトSWとカード検出SWは使用しないので、該当部を削除します。 また、この関数は割り込み処理から10msおきに呼び出す必要があります。

/*-----------------------------------------------------------------------*/
/* Device Timer Interrupt Procedure                                      */
/*-----------------------------------------------------------------------*/
/* This function must be called in period of 10ms                        */

void disk_timerproc (void)
{
	BYTE n;

	n = Timer1;		// 100Hz decrement timer
	if (n) Timer1 = --n;
	n = Timer2;
	if (n) Timer2 = --n;
}

結果

以下の設定でのコンパイル後のサイズは10351バイトでした。 今回使用したソースファイルを置いておきます。

• r8c_ff.zip