/* 2004.06.05
****************************************
**  Copyright  (C)  W.ch  1999-2004   **
**  Web:  http://www.winchiphead.com  **
****************************************
**  USB Host File Interface for CH375 **
**  TC2.0@PC, KC7.0@MCS51             **
****************************************
*/
/* CH375 主機文件系統(tǒng)接口 */
/* 支持: FAT12/FAT16/FAT32 */

/* MCS-51單片機C語言的U盤文件讀寫示例程序, 適用于89C52或者更大程序空間的單片機 */
/* 本程序用于演示處理文件目錄項,例如:修改文件名,設(shè)置文件的創(chuàng)建日期和時間等 */
/* CH375的INT#引腳采用查詢方式處理, 數(shù)據(jù)復(fù)制方式為"單DPTR復(fù)制", 所以速度較慢, 適用于所有MCS51單片機
   本例適用于V2.4及以上版本的CH375子程序庫 */


/* C51   CH375HFT.C */
/* LX51  CH375HFT.OBJ , CH375HF6.LIB */
/* OHX51 CH375HFT */

#include <reg52.h>
#include <stdio.h>
#include <string.h>

/* 以下定義的詳細(xì)說明請看CH375HF6.H文件 */
#define LIB_CFG_DISK_IO			1		/* 磁盤讀寫的數(shù)據(jù)的復(fù)制方式,1為"單DPTR復(fù)制",2為"雙DPTR復(fù)制",3為"單DPTR和P2+R0復(fù)制" */
#define LIB_CFG_FILE_IO			1		/* 文件讀寫的數(shù)據(jù)的復(fù)制方式,0為"外部子程序",1為"單DPTR復(fù)制",2為"雙DPTR復(fù)制",3為"單DPTR和P2+R0復(fù)制" */
#define LIB_CFG_INT_EN			0		/* CH375的INT#引腳連接方式,0為"查詢方式",1為"中斷方式" */
/*#define LIB_CFG_FILE_IO_DEFAULT	1*/		/* 使用CH375HF6.H提供的默認(rèn)"外部子程序" */
/*#define LIB_CFG_UPD_SIZE		1*/		/* 在添加數(shù)據(jù)后是否自動更新文件長度: 0為"不更新",1為"自動更新" */
/* 默認(rèn)情況下,如果扇區(qū)數(shù)/字節(jié)數(shù)不為0那么CH375FileWrite/CH375ByteWrite只負(fù)責(zé)寫入數(shù)據(jù)而不修改文件長度,
   如果需要每次寫完數(shù)據(jù)后會自動修改/更新文件長度,那么可以使全局變量CH375LibConfig的位4為1,
   如果長時間不寫入數(shù)據(jù)則應(yīng)該更新文件長度,防止突然斷電后前面寫入的數(shù)據(jù)與文件長度不相符,
   如果確定不會突然斷電或者后面很快有數(shù)據(jù)不斷寫入則不必更新文件長度,可以提高速度并減少U盤損耗(U盤內(nèi)部的內(nèi)存壽命有限,不宜頻繁改寫) */

#define CH375_CMD_PORT_ADDR		0xBDF1	/* CH375命令端口的I/O地址 */
#define CH375_DAT_PORT_ADDR		0xBCF0	/* CH375數(shù)據(jù)端口的I/O地址 */
/* 62256提供的32KB的RAM分為兩部分: 0000H-01FFH為磁盤讀寫緩沖區(qū), 0200H-7FFFH為文件數(shù)據(jù)緩沖區(qū) */
#define	DISK_BASE_BUF_ADDR		0x0000	/* 外部RAM的磁盤數(shù)據(jù)緩沖區(qū)的起始地址,從該單元開始的緩沖區(qū)長度為SECTOR_SIZE */
#define DISK_BASE_BUF_LEN		4096	/* 默認(rèn)的磁盤數(shù)據(jù)緩沖區(qū)大小為512字節(jié),建議選擇為2048甚至4096以支持某些大扇區(qū)的U盤,為0則禁止在.H文件中定義緩沖區(qū)并由應(yīng)用程序在pDISK_BASE_BUF中指定 */

#define CH375_INT_WIRE			INT0	/* P3.2, INT0, CH375的中斷線INT#引腳,連接CH375的INT#引腳,用于查詢中斷狀態(tài) */

#define NO_DEFAULT_CH375_F_ENUM		1		/* 未調(diào)用CH375FileEnumer程序故禁止以節(jié)約代碼 */

#include "..\CH375HF6.H"				/* 如果不需要支持FAT32,那么請選用CH375HF4.H */

/* 在P1.4連接一個LED用于監(jiān)控演示程序的進(jìn)度,低電平LED亮,當(dāng)U盤插入后亮 */
sbit P1_4  = P1^4;
#define LED_OUT_INIT( )		{ P1_4 = 1; }	/* P1.4 高電平 */
#define LED_OUT_ACT( )		{ P1_4 = 0; }	/* P1.4 低電平驅(qū)動LED顯示 */
#define LED_OUT_INACT( )	{ P1_4 = 1; }	/* P1.4 低電平驅(qū)動LED顯示 */
sbit P1_5  = P1^5;
/* 在P1.5連接一個LED用于監(jiān)控演示程序的進(jìn)度,低電平LED亮,當(dāng)對U盤操作時亮 */
#define LED_RUN_ACT( )		{ P1_5 = 0; }	/* P1.5 低電平驅(qū)動LED顯示 */
#define LED_RUN_INACT( )	{ P1_5 = 1; }	/* P1.5 低電平驅(qū)動LED顯示 */
sbit P1_6  = P1^6;
/* 在P1.6連接一個LED用于監(jiān)控演示程序的進(jìn)度,低電平LED亮,當(dāng)對U盤寫操作時亮 */
#define LED_WR_ACT( )		{ P1_6 = 0; }	/* P1.6 低電平驅(qū)動LED顯示 */
#define LED_WR_INACT( )		{ P1_6 = 1; }	/* P1.6 低電平驅(qū)動LED顯示 */

/* 以毫秒為單位延時,不精確,適用于24MHz時鐘 */
void	mDelaymS( unsigned char delay )
{
	unsigned char	i, j, c;
	for ( i = delay; i != 0; i -- ) {
		for ( j = 200; j != 0; j -- ) c += 3;  /* 在24MHz時鐘下延時500uS */
		for ( j = 200; j != 0; j -- ) c += 3;  /* 在24MHz時鐘下延時500uS */
	}
}

/* 將程序空間的字符串復(fù)制到內(nèi)部RAM中,返回字符串長度 */
UINT8	mCopyCodeStringToIRAM( UINT8 idata *iDestination, UINT8 code *iSource )
{
	UINT8	i = 0;
	while ( *iDestination = *iSource ) {
		iDestination ++;
		iSource ++;
		i ++;
	}
	return( i );
}

/* 檢查操作狀態(tài),如果錯誤則顯示錯誤代碼并停機,應(yīng)該替換為實際的處理措施 */
void	mStopIfError( UINT8 iError )
{
	if ( iError == ERR_SUCCESS ) return;  /* 操作成功 */
	printf( "Error: %02X\n", (UINT16)iError );  /* 顯示錯誤 */
	while ( 1 ) {
		LED_OUT_ACT( );  /* LED閃爍 */
		mDelaymS( 200 );
		LED_OUT_INACT( );
		mDelaymS( 200 );
	}
}

/* 為printf和getkey輸入輸出初始化串口 */
void	mInitSTDIO( )
{
	SCON = 0x50;
	PCON = 0x80;
	TMOD = 0x21;
	TH1 = 0xf3;  /* 24MHz晶振, 9600bps */
	TR1 = 1;
	TI = 1;
}

/* 修改指定文件的文件名,如果是C文件則修改為TXT文件 */
/* 輸入?yún)?shù):   原始文件名在mCmdParam.Open.mPathName中 */
/* 返回狀態(tài)碼: ERR_SUCCESS = 修改文件名成功,
               其它狀態(tài)碼參考CH375HF?.H */
UINT8	RenameFileName( void )
{
	UINT8			i;
	P_FAT_DIR_INFO	mFileDir;
	i = CH375FileOpen( );  /* 打開文件 */
	if ( i == ERR_SUCCESS ) {
		/* 文件讀寫操作等... */
		i = CH375FileQuery( );  /* 查詢文件屬性,以便將相關(guān)數(shù)據(jù)調(diào)到內(nèi)存中再修改 */
		if ( i == ERR_SUCCESS ) {
			mFileDir = (P_FAT_DIR_INFO)( (PUINT8X)(&DISK_BASE_BUF[0]) + CH375vFdtOffset );  /* 在內(nèi)存中,當(dāng)前FDT的起始地址 */
			if ( mFileDir -> DIR_Name[8] == 'C' && mFileDir -> DIR_Name[9] == ' ' ) {  /* 文件擴展名是C */
				mFileDir -> DIR_Name[8] = 'T';  /* 修改文件擴展名為TXT */
				mFileDir -> DIR_Name[9] = 'X';  /* 同樣方法可以修改文件主名 */
				mFileDir -> DIR_Name[10] = 'T';
			}
/* 以下將修改過的內(nèi)容從內(nèi)存中真正刷新到U盤中 */
			mCmdParam.Modify.mFileAttr = mFileDir -> DIR_Attr;  /* 準(zhǔn)備假修改文件屬性,實際保持原值 */
			mCmdParam.Modify.mFileDate = mCmdParam.Modify.mFileTime = 0xFFFF;  /* 不修改文件日期和時間 */
			mCmdParam.Modify.mFileSize = 0xFFFFFFFF;  /* 不修改文件長度 */
			i = CH375FileModify( );  /* 實際是將內(nèi)存中剛剛修改過的文件名保存 */
			if ( i == ERR_SUCCESS ) {
				/* 文件讀寫操作等... */
				mCmdParam.Close.mUpdateLen = 0;
				i = CH375FileClose( );  /* 關(guān)閉文件 */
			}
		}
	}
	return( i );
}

/* 大端與小端格式的數(shù)據(jù)處理,文件系統(tǒng)本身是小端,而MCS51程序是大端,所以才需要轉(zhuǎn)換 */
UINT16	SwapUINT16( UINT16 d )
{
	return( ( d << 8 ) & 0xFF00 | ( d >> 8 ) & 0xFF );
}

/* 為指定文件設(shè)置創(chuàng)建日期和時間 */
/* 輸入?yún)?shù):   原始文件名在mCmdParam.Open.mPathName中, 新的創(chuàng)建日期和時間: iCreateDate, iCreateTime */
/* 返回狀態(tài)碼: ERR_SUCCESS = 設(shè)置成功,
               其它狀態(tài)碼參考CH375HF?.H */
UINT8	SetFileCreateTime( UINT16 iCreateDate, UINT16 iCreateTime )
{
	UINT8			i;
	P_FAT_DIR_INFO	mFileDir;
	i = CH375FileOpen( );  /* 打開文件 */
	if ( i == ERR_SUCCESS ) {
		/* 文件讀寫操作等... */
		i = CH375FileQuery( );  /* 查詢文件屬性,以便將相關(guān)數(shù)據(jù)調(diào)到內(nèi)存中再修改 */
		if ( i == ERR_SUCCESS ) {
			mFileDir = (P_FAT_DIR_INFO)( (PUINT8X)(&DISK_BASE_BUF[0]) + CH375vFdtOffset );  /* 在內(nèi)存中,當(dāng)前FDT的起始地址 */
//			mFileDir -> DIR_CrtTime = iCreateTime;  /* 文件創(chuàng)建的時間,適用于小端格式 */
			mFileDir -> DIR_CrtTime = SwapUINT16( iCreateTime );  /* MCS51單片機是大端格式 */
//			mFileDir -> DIR_CrtDate = iCreateDate;  /* 文件創(chuàng)建的日期,適用于小端格式 */
			mFileDir -> DIR_CrtDate = SwapUINT16( iCreateDate );  /* MCS51單片機是大端格式 */

//			mFileDir -> DIR_WrtTime = MAKE_FILE_TIME( 時, 分, 秒 );  /* 文件修改時間 */
//			mFileDir -> DIR_LstAccDate = MAKE_FILE_DATE( 年, 月, 日 );  /* 最近一次存取操作的日期 */

/* 以下將修改過的內(nèi)容從內(nèi)存中真正刷新到U盤中 */
			mCmdParam.Modify.mFileAttr = mFileDir -> DIR_Attr;  /* 準(zhǔn)備假修改文件屬性,實際保持原值 */
			mCmdParam.Modify.mFileDate = mCmdParam.Modify.mFileTime = 0xFFFF;  /* 不修改文件日期和時間 */
			mCmdParam.Modify.mFileSize = 0xFFFFFFFF;  /* 不修改文件長度 */
			i = CH375FileModify( );  /* 實際是將內(nèi)存中剛剛修改過的文件名保存 */
			if ( i == ERR_SUCCESS ) {
				/* 文件讀寫操作等... */
				mCmdParam.Close.mUpdateLen = 0;
				i = CH375FileClose( );  /* 關(guān)閉文件 */
			}
		}
	}
	return( i );
}

main( ) {
	UINT8	i;
	LED_OUT_INIT( );
	LED_OUT_ACT( );  /* 開機后LED亮一下以示工作 */
	mDelaymS( 100 );  /* 延時100毫秒 */
	LED_OUT_INACT( );
	mInitSTDIO( );  /* 為了讓計算機通過串口監(jiān)控演示過程 */
	printf( "Start\n" );

#if DISK_BASE_BUF_LEN == 0
	pDISK_BASE_BUF = &my_buffer[0];  /* 不在.H文件中定義CH375的專用緩沖區(qū),而是用緩沖區(qū)指針指向其它應(yīng)用程序的緩沖區(qū)便于合用以節(jié)約RAM */
#endif

	i = CH375LibInit( );  /* 初始化CH375程序庫和CH375芯片,操作成功返回0 */
	mStopIfError( i );
/* 其它電路初始化 */

	while ( 1 ) {
		printf( "Wait Udisk\n" );
		while ( CH375DiskStatus < DISK_CONNECT ) {  /* 查詢CH375中斷并更新中斷狀態(tài),等待U盤插入 */
			CH375DiskConnect( );
			mDelaymS( 100 );
		}
		LED_OUT_ACT( );  /* LED亮 */
		mDelaymS( 200 );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */

/* 檢查U盤是否準(zhǔn)備好,有些U盤不需要這一步,但是某些U盤必須要執(zhí)行這一步才能工作 */
		for ( i = 0; i < 3; i ++ ) {  /* 有的U盤總是返回未準(zhǔn)備好,不過可以被忽略 */
			mDelaymS( 100 );
			printf( "Ready ?\n" );
			if ( CH375DiskReady( ) == ERR_SUCCESS ) break;  /* 查詢磁盤是否準(zhǔn)備好 */
		}
#if DISK_BASE_BUF_LEN
		if ( DISK_BASE_BUF_LEN < CH375vSectorSize ) {  /* 檢查磁盤數(shù)據(jù)緩沖區(qū)是否足夠大,CH375vSectorSize是U盤的實際扇區(qū)大小 */
			printf( "Too large sector size\n" );
			while ( CH375DiskConnect( ) == ERR_SUCCESS ) mDelaymS( 100 );
			continue;
		}
#endif
/* 查詢磁盤物理容量 */
/*		printf( "DiskSize\n" );
		i = CH375DiskSize( );  
		mStopIfError( i );
		printf( "TotalSize = %u MB \n", (unsigned int)( mCmdParam.DiskSize.mDiskSizeSec * (CH375vSectorSize/512) / 2048 ) );  // 顯示為以MB為單位的容量
		// 原計算方法 (unsigned int)( mCmdParam.DiskSize.mDiskSizeSec * CH375vSectorSize / 1000000 ) 有可能前兩個數(shù)據(jù)相乘后導(dǎo)致溢出, 所以修改成上式
*/
		LED_RUN_ACT( );  /* 開始操作U盤 */

		printf( "Open and rename CH375HFT.C to CH375HFT.TXT \n" );
		mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, "/CH375HFT.C" );  /* 原始文件名,該文件在根目錄下 */
		LED_WR_ACT( );  /* 寫操作 */
		i = RenameFileName( );  /* 修改文件名, C文件 => TXT文件 */
		mStopIfError( i );
		printf( "Set file create date & time to 2004.06.08 15:39:20 \n" );
		mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, "/CH375HFT.TXT" );  /* 原始文件名 */
		i = SetFileCreateTime( MAKE_FILE_DATE( 2004, 6, 8 ), MAKE_FILE_TIME( 15, 39, 20 ) );  /* 為指定文件設(shè)置創(chuàng)建日期和時間 */
		mStopIfError( i );
		LED_WR_INACT( );
		LED_RUN_INACT( );
		printf( "Take out\n" );
		while ( CH375DiskStatus >= DISK_CONNECT ) {  /* 查詢CH375中斷并更新中斷狀態(tài),等待U盤拔出 */
			CH375DiskConnect( );
			mDelaymS( 100 );
		}
		LED_OUT_INACT( );  /* LED滅 */
		mDelaymS( 200 );
	}
}