/* 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 主機文件系統接口 */
/* 支持: FAT12/FAT16/FAT32 */

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


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

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

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

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

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

#define NO_DEFAULT_CH375_F_ENUM		1		/* 未調用CH375FileEnumer程序故禁止以節約代碼 */

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

/* 在P1.4連接一個LED用于監控演示程序的進度,低電平LED亮,當U盤插入后亮 */
sbit P1_4  = P1^4;
#define LED_OUT_INIT( )		{ P1_4 = 1; }	/* P1.4 高電平 */
#define LED_OUT_ACT( )		{ P1_4 = 0; }	/* P1.4 低電平驅動LED顯示 */
#define LED_OUT_INACT( )	{ P1_4 = 1; }	/* P1.4 低電平驅動LED顯示 */
sbit P1_5  = P1^5;
/* 在P1.5連接一個LED用于監控演示程序的進度,低電平LED亮,當對U盤操作時亮 */
#define LED_RUN_ACT( )		{ P1_5 = 0; }	/* P1.5 低電平驅動LED顯示 */
#define LED_RUN_INACT( )	{ P1_5 = 1; }	/* P1.5 低電平驅動LED顯示 */
sbit P1_6  = P1^6;
/* 在P1.6連接一個LED用于監控演示程序的進度,低電平LED亮,當對U盤寫操作時亮 */
#define LED_WR_ACT( )		{ P1_6 = 0; }	/* P1.6 低電平驅動LED顯示 */
#define LED_WR_INACT( )		{ P1_6 = 1; }	/* P1.6 低電平驅動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 */
	}
}

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

/* 檢查操作狀態,如果錯誤則顯示錯誤代碼并停機,應該替換為實際的處理措施 */
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文件 */
/* 輸入參數:   原始文件名在mCmdParam.Open.mPathName中 */
/* 返回狀態碼: ERR_SUCCESS = 修改文件名成功,
               其它狀態碼參考CH375HF?.H */
UINT8	RenameFileName( void )
{
	UINT8			i;
	P_FAT_DIR_INFO	mFileDir;
	i = CH375FileOpen( );  /* 打開文件 */
	if ( i == ERR_SUCCESS ) {
		/* 文件讀寫操作等... */
		i = CH375FileQuery( );  /* 查詢文件屬性,以便將相關數據調到內存中再修改 */
		if ( i == ERR_SUCCESS ) {
			mFileDir = (P_FAT_DIR_INFO)( (PUINT8X)(&DISK_BASE_BUF[0]) + CH375vFdtOffset );  /* 在內存中,當前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';
			}
/* 以下將修改過的內容從內存中真正刷新到U盤中 */
			mCmdParam.Modify.mFileAttr = mFileDir -> DIR_Attr;  /* 準備假修改文件屬性,實際保持原值 */
			mCmdParam.Modify.mFileDate = mCmdParam.Modify.mFileTime = 0xFFFF;  /* 不修改文件日期和時間 */
			mCmdParam.Modify.mFileSize = 0xFFFFFFFF;  /* 不修改文件長度 */
			i = CH375FileModify( );  /* 實際是將內存中剛剛修改過的文件名保存 */
			if ( i == ERR_SUCCESS ) {
				/* 文件讀寫操作等... */
				mCmdParam.Close.mUpdateLen = 0;
				i = CH375FileClose( );  /* 關閉文件 */
			}
		}
	}
	return( i );
}

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

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

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

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

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

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

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

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

/* 檢查U盤是否準備好,有些U盤不需要這一步,但是某些U盤必須要執行這一步才能工作 */
		for ( i = 0; i < 3; i ++ ) {  /* 有的U盤總是返回未準備好,不過可以被忽略 */
			mDelaymS( 100 );
			printf( "Ready ?\n" );
			if ( CH375DiskReady( ) == ERR_SUCCESS ) break;  /* 查詢磁盤是否準備好 */
		}
#if DISK_BASE_BUF_LEN
		if ( DISK_BASE_BUF_LEN < CH375vSectorSize ) {  /* 檢查磁盤數據緩沖區是否足夠大,CH375vSectorSize是U盤的實際扇區大小 */
			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 ) 有可能前兩個數據相乘后導致溢出, 所以修改成上式
*/
		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 ) );  /* 為指定文件設置創建日期和時間 */
		mStopIfError( i );
		LED_WR_INACT( );
		LED_RUN_INACT( );
		printf( "Take out\n" );
		while ( CH375DiskStatus >= DISK_CONNECT ) {  /* 查詢CH375中斷并更新中斷狀態,等待U盤拔出 */
			CH375DiskConnect( );
			mDelaymS( 100 );
		}
		LED_OUT_INACT( );  /* LED滅 */
		mDelaymS( 200 );
	}
}