/* 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 主機(jī)文件系統(tǒng)接口 */
/* 支持: FAT12/FAT16 */

/* MCS-51單片機(jī)C語(yǔ)言的U盤(pán)文件讀寫(xiě)示例程序, 適用于89C52或者更大程序空間的單片機(jī) */
/* 該程序?qū)盤(pán)中的/C51/CH375HFT.C文件中的小寫(xiě)字母轉(zhuǎn)成大寫(xiě)字母后, 寫(xiě)到新建的文件NEWFILE.TXT中,
   如果找不到原文件CH375HFT.C, 那么該程序?qū)@示C51子目錄下所有以CH375開(kāi)頭的文件名, 并新建NEWFILE.TXT文件并寫(xiě)入提示信息,
   如果找不到C51子目錄, 那么該程序?qū)@示根目錄下的所有文件名, 并新建NEWFILE.TXT文件并寫(xiě)入提示信息
*/
/* CH375的INT#引腳采用查詢方式處理, 數(shù)據(jù)復(fù)制方式為"單DPTR復(fù)制", 所以速度較慢, 適用于所有MCS51單片機(jī) */


/* C51   CH375HFT.C */
/* LX51  CH375HFT.OBJ , CH375HF4.LIB    如果將CH375HF4換成CH375HF6就可以支持FAT32 */
/* OHX51 CH375HFT */

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

/* 以下定義的詳細(xì)說(shuō)明請(qǐng)看CH375HF4.H文件 */
#define LIB_CFG_DISK_IO			1		/* 磁盤(pán)讀寫(xiě)的數(shù)據(jù)的復(fù)制方式,1為"單DPTR復(fù)制",2為"雙DPTR復(fù)制",3為"單DPTR和P2+R0復(fù)制" */
#define LIB_CFG_FILE_IO			1		/* 文件讀寫(xiě)的數(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 CH375_CMD_PORT_ADDR		0xBDF1	/* CH375命令端口的I/O地址 */
#define CH375_DAT_PORT_ADDR		0xBCF0	/* CH375數(shù)據(jù)端口的I/O地址 */
/* 62256提供的32KB的RAM分為兩部分: 0000H-01FFH為磁盤(pán)讀寫(xiě)緩沖區(qū), 0200H-7FFFH為文件數(shù)據(jù)緩沖區(qū) */
#define	DISK_BASE_BUF_ADDR		0x0000	/* 外部RAM的磁盤(pán)數(shù)據(jù)緩沖區(qū)的起始地址,從該單元開(kāi)始的緩沖區(qū)長(zhǎng)度為SECTOR_SIZE */
#define FILE_DATA_BUF_ADDR		0x0200	/* 外部RAM的文件數(shù)據(jù)緩沖區(qū)的起始地址,緩沖區(qū)長(zhǎng)度不小于一次讀寫(xiě)的數(shù)據(jù)長(zhǎng)度 */
/* 由于演示板用的62256只有32K字節(jié),其中CH375子程序用512字節(jié),所以外部RAM剩余長(zhǎng)度為32256字節(jié) */
#define FILE_DATA_BUF_LEN		0x7E00	/* 外部RAM的文件數(shù)據(jù)緩沖區(qū),緩沖區(qū)長(zhǎng)度不小于一次讀寫(xiě)的數(shù)據(jù)長(zhǎng)度 */
/* 如果準(zhǔn)備使用雙緩沖區(qū)交替讀寫(xiě),那么不要定義FILE_DATA_BUF_LEN,而是在參數(shù)中指定緩沖區(qū)起址,用CH375FileReadX代替CH375FileRead,用CH375FileWriteX代替CH375FileWrite */

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

#include "..\CH375HF6.H"

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

/* 延時(shí)100毫秒,不精確 */
void	mDelay100mS( )
{
	UINT8	i, j, c;
	for ( i = 200; i != 0; i -- ) for ( j = 200; j != 0; j -- ) c+=3;
}

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

/* 檢查操作狀態(tài),如果錯(cuò)誤則顯示錯(cuò)誤代碼并停機(jī) */
void	mStopIfError( UINT8 iError )
{
	if ( iError == ERR_SUCCESS ) return;  /* 操作成功 */
	printf( "Error: %02X\n", (UINT16)iError );  /* 顯示錯(cuò)誤 */
	while ( 1 ) {
		LED_OUT_ACT( );  /* LED閃爍 */
		mDelay100mS( );
		LED_OUT_INACT( );
		mDelay100mS( );
	}
}

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

main( ) {
	UINT8	i, c, SecCount;
	UINT16	NewSize, count;  /* 因?yàn)檠菔景宓腞AM容量只有32KB,所以NewSize限制為16位,實(shí)際上如果文件大于32256字節(jié),應(yīng)該分幾次讀寫(xiě)并且將NewSize改為UINT32以便累計(jì) */
	UINT8	code *pCodeStr;
	LED_OUT_INIT( );
	LED_OUT_ACT( );  /* 開(kāi)機(jī)后LED亮一下以示工作 */
	mDelay100mS( );  /* 延時(shí)100毫秒 */
	LED_OUT_INACT( );
	mInitSTDIO( );  /* 為了讓計(jì)算機(jī)通過(guò)串口監(jiān)控演示過(guò)程 */
	printf( "Start\n" );

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

	while ( 1 ) {
		printf( "Wait Udisk\n" );
		while ( CH375DiskStatus != DISK_CONNECT ) xQueryInterrupt( );  /* 查詢CH375中斷并更新中斷狀態(tài),等待U盤(pán)插入 */
		LED_OUT_ACT( );  /* LED亮 */
		mDelay100mS( );  /* 延時(shí),可選操作,有的USB存儲(chǔ)器需要幾十毫秒的延時(shí) */
		mDelay100mS( );

/* 檢查U盤(pán)是否準(zhǔn)備好,有些U盤(pán)不需要這一步,但是某些U盤(pán)必須要執(zhí)行這一步才能工作 */
		for ( i = 0; i < 5; i ++ ) {  /* 有的U盤(pán)總是返回未準(zhǔn)備好,不過(guò)可以被忽略 */
			mDelay100mS( );
			printf( "Ready ?\n" );
			if ( CH375DiskReady( ) == ERR_SUCCESS ) break;  /* 查詢磁盤(pán)是否準(zhǔn)備好 */
		}
/* 查詢磁盤(pán)物理容量 */
/*		printf( "DiskSize\n" );
		i = CH375DiskSize( );  
		mStopIfError( i );
		printf( "TotalSize = %u MB \n", (unsigned int)( mCmdParam.DiskSize.mDiskSizeSec >> 11 ) );  顯示為以MB為單位的容量
*/
		LED_RUN_ACT( );  /* 開(kāi)始操作U盤(pán) */
/* 讀取原文件 */
		printf( "Open\n" );
		mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, "\\C51\\CH375HFT.C" );  /* 文件名,該文件在C51子目錄下 */
		i = CH375FileOpen( );  /* 打開(kāi)文件 */
		if ( i == ERR_MISS_DIR || i == ERR_MISS_FILE ) {  /* 沒(méi)有找到文件 */
/* 列出文件 */
			if ( i == ERR_MISS_DIR ) pCodeStr = "\\*";  /* C51子目錄不存在則列出根目錄下的文件 */
			else pCodeStr = "\\C51\\CH375*";  /* CH375HFT.C文件不存在則列出\C51子目錄下的以CH375開(kāi)頭的文件 */
			printf( "List file %s\n", pCodeStr );
			for ( c = 0; c < 255; c ++ ) {  /* 最多搜索前255個(gè)文件 */
				i = mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, pCodeStr );  /* 搜索文件名,*為通配符,適用于所有文件或者子目錄 */
				mCmdParam.Open.mPathName[ i ] = c;  /* 根據(jù)字符串長(zhǎng)度將結(jié)束符替換為搜索的序號(hào),從0到255 */
				i = CH375FileOpen( );  /* 打開(kāi)文件,如果文件名中含有通配符*,則為搜索文件而不打開(kāi) */
				if ( i == ERR_MISS_FILE ) break;  /* 再也搜索不到匹配的文件,已經(jīng)沒(méi)有匹配的文件名 */
				if ( i == ERR_FOUND_NAME ) {  /* 搜索到與通配符相匹配的文件名,文件名及其完整路徑在命令緩沖區(qū)中 */
					printf( "  match file %03d#: %s\n", (unsigned int)c, mCmdParam.Open.mPathName );  /* 顯示序號(hào)和搜索到的匹配文件名或者子目錄名 */
					continue;  /* 繼續(xù)搜索下一個(gè)匹配的文件名,下次搜索時(shí)序號(hào)會(huì)加1 */
				}
				else {  /* 出錯(cuò) */
					mStopIfError( i );
					break;
				}
			}
			pCodeStr = "找不到/C51/CH375HFT.C文件\xd\n";
			for ( i = 0; i != 255; i ++ ) {
				if ( ( FILE_DATA_BUF[i] = *pCodeStr ) == 0 ) break;
				pCodeStr++;
			}
			NewSize = i;  /* 新文件的長(zhǎng)度 */
			SecCount = 1;  /* (NewSize+511)/512, 計(jì)算文件的扇區(qū)數(shù),因?yàn)樽x寫(xiě)是以扇區(qū)為單位的 */
		}
		else {  /* 找到文件或者出錯(cuò) */
			mStopIfError( i );
/*			printf( "Query\n" );
			i = CH375FileQuery( );  查詢當(dāng)前文件的信息
			mStopIfError( i );*/
			printf( "Read\n" );
			if ( CH375vFileSize > FILE_DATA_BUF_LEN ) {  /* 由于演示板用的62256只有32K字節(jié),其中CH375子程序用512字節(jié),所以只讀取不超過(guò)63個(gè)扇區(qū),也就是不超過(guò)32256字節(jié) */
				SecCount = FILE_DATA_BUF_LEN / 512;  /* 由于演示板用的62256只有32K字節(jié),其中CH375子程序用512字節(jié),所以只讀取不超過(guò)63個(gè)扇區(qū),也就是不超過(guò)32256字節(jié) */
				NewSize = FILE_DATA_BUF_LEN;  /* 由于RAM有限所以限制長(zhǎng)度 */
			}
			else {  /* 如果原文件較小,那么使用原長(zhǎng)度 */
				SecCount = ( CH375vFileSize + 511 ) >> 9;  /* (CH375vFileSize+511)/512, 計(jì)算文件的扇區(qū)數(shù),因?yàn)樽x寫(xiě)是以扇區(qū)為單位的,先加511是為了讀出文件尾部不足1個(gè)扇區(qū)的部分 */
				NewSize = (UINT16)CH375vFileSize;  /* 原文件的長(zhǎng)度 */
			}
			printf( "Size=%ld, Len=%d, Sec=%d\n", CH375vFileSize, NewSize, (UINT16)SecCount );
			mCmdParam.Read.mSectorCount = SecCount;  /* 讀取全部數(shù)據(jù),如果超過(guò)60個(gè)扇區(qū)則只讀取60個(gè)扇區(qū) */
/*			current_buffer = & FILE_DATA_BUF[0];  如果文件讀寫(xiě)的數(shù)據(jù)的復(fù)制方式為"外部子程序",那么需要設(shè)置存放數(shù)據(jù)的緩沖區(qū)的起始地址 */
			CH375vFileSize += 511;  /* 默認(rèn)情況下,以扇區(qū)方式讀取數(shù)據(jù)時(shí),無(wú)法讀出文件尾部不足1個(gè)扇區(qū)的部分,所以必須臨時(shí)加大文件長(zhǎng)度以讀取尾部零頭 */
			i = CH375FileRead( );  /* 從文件讀取數(shù)據(jù) */
			CH375vFileSize -= 511;  /* 恢復(fù)原文件長(zhǎng)度 */
			mStopIfError( i );
/*
		如果文件比較大,一次讀不完,可以再調(diào)用CH375FileRead繼續(xù)讀取,文件指針自動(dòng)向后移動(dòng)
		while ( 1 ) {
			c = 32;   每次讀取32個(gè)扇區(qū)
			mCmdParam.Read.mSectorCount = c;   指定讀取的扇區(qū)數(shù)
			CH375FileRead();   讀完后文件指針自動(dòng)后移
			處理數(shù)據(jù)
			if ( mCmdParam.Read.mSectorCount < c ) break;   實(shí)際讀出的扇區(qū)數(shù)較小則說(shuō)明文件已經(jīng)結(jié)束
		}

	    如果希望從指定位置開(kāi)始讀寫(xiě),可以移動(dòng)文件指針
		mCmdParam.Locate.mSectorOffset = 3;  跳過(guò)文件的前3個(gè)扇區(qū)開(kāi)始讀寫(xiě)
		i = CH375FileLocate( );
		mCmdParam.Read.mSectorCount = 10;
		CH375FileRead();   直接讀取從文件的第(512*3)個(gè)字節(jié)開(kāi)始的數(shù)據(jù),前3個(gè)扇區(qū)被跳過(guò)

或者自行定義數(shù)據(jù)緩沖區(qū)的起始地址
		mCmdParam.ReadX.mSectorCount = 2;
		mCmdParam.ReadX.mDataBuffer = 0x2000;  將讀出的數(shù)據(jù)放到2000H開(kāi)始的緩沖區(qū)中
		CH375FileReadX();   從文件中讀取2個(gè)扇區(qū)到指定緩沖區(qū)

	    如果希望將新數(shù)據(jù)添加到原文件的尾部,可以移動(dòng)文件指針
		i = CH375FileOpen( );
		mCmdParam.Locate.mSectorOffset = 0xffffffff;  移到文件的尾部,以扇區(qū)為單位,如果原文件是3字節(jié),則從512字節(jié)開(kāi)始添加
		i = CH375FileLocate( );
		mCmdParam.Write.mSectorCount = 10;
		CH375FileWrite();   在原文件的后面添加數(shù)據(jù)

或者自行定義數(shù)據(jù)緩沖區(qū)的起始地址
		mCmdParam.WiiteX.mSectorCount = 2;
		mCmdParam.WriteX.mDataBuffer = 0x4600;  將4600H開(kāi)始的緩沖區(qū)中的數(shù)據(jù)寫(xiě)入
		CH375FileWriteX();   將指定緩沖區(qū)中的數(shù)據(jù)寫(xiě)入2個(gè)扇區(qū)到文件中

*/
			printf( "Close\n" );
			i = CH375FileClose( );  /* 關(guān)閉文件 */
			mStopIfError( i );

			i = FILE_DATA_BUF[100];
			FILE_DATA_BUF[100] = 0;  /* 置字符串結(jié)束標(biāo)志,最多顯示100個(gè)字符 */
			printf( "Line 1: %s\n", FILE_DATA_BUF );
			FILE_DATA_BUF[100] = i;  /* 恢復(fù)原字符 */
			for ( count=0; count < NewSize; count ++ ) {  /* 將文件中的小寫(xiě)字符轉(zhuǎn)換為大寫(xiě) */
				c = FILE_DATA_BUF[ count ];
				if ( c >= 'a' && c <= 'z' ) FILE_DATA_BUF[ count ] = c - ( 'a' - 'A' );
			}
		}

#ifdef EN_DISK_WRITE  /* 子程序庫(kù)支持寫(xiě)操作 */
/* 產(chǎn)生新文件 */
		LED_WR_ACT( );  /* 寫(xiě)操作 */
		printf( "Create\n" );
		mCopyCodeStringToIRAM( mCmdParam.Create.mPathName, "\\NEWFILE.TXT" );  /* 新文件名,在根目錄下 */
		i = CH375FileCreate( );  /* 新建文件并打開(kāi),如果文件已經(jīng)存在則先刪除后再新建 */
		mStopIfError( i );
		printf( "Write\n" );
		mCmdParam.Write.mSectorCount = SecCount;  /* 寫(xiě)入所有扇區(qū)的數(shù)據(jù) */
/*		current_buffer = & FILE_DATA_BUF[0];  如果文件讀寫(xiě)的數(shù)據(jù)的復(fù)制方式為"外部子程序",那么需要設(shè)置存放數(shù)據(jù)的緩沖區(qū)的起始地址 */
		i = CH375FileWrite( );  /* 向文件寫(xiě)入數(shù)據(jù) */
		mStopIfError( i );
		printf( "Modify\n" );
		mCmdParam.Modify.mFileAttr = 0xff;  /* 輸入?yún)?shù): 新的文件屬性,為0FFH則不修改 */
		mCmdParam.Modify.mFileTime = 0xffff;  /* 輸入?yún)?shù): 新的文件時(shí)間,為0FFFFH則不修改,使用新建文件產(chǎn)生的默認(rèn)時(shí)間 */
		mCmdParam.Modify.mFileDate = MAKE_FILE_DATE( 2004, 5, 18 );  /* 輸入?yún)?shù): 新的文件日期: 2004.05.18 */
		mCmdParam.Modify.mFileSize = NewSize;  /* 輸入?yún)?shù): 如果原文件較小,那么新的文件長(zhǎng)度與原文件一樣長(zhǎng),否則被RAM所限,如果文件長(zhǎng)度大于64KB,那么NewSize必須為UINT32 */
		i = CH375FileModify( );  /* 修改當(dāng)前文件的信息,修改日期和長(zhǎng)度 */
		mStopIfError( i );
		printf( "Close\n" );
		mCmdParam.Close.mUpdateLen = 0;  /* 不要自動(dòng)計(jì)算文件長(zhǎng)度,如果自動(dòng)計(jì)算,那么該長(zhǎng)度總是512的倍數(shù) */
		i = CH375FileClose( );
		mStopIfError( i );

/* 刪除某文件 */
/*		printf( "Erase\n" );
		mCopyCodeStringToIRAM( mCmdParam.Create.mPathName, "\\OLD" );  將被刪除的文件名,在根目錄下
		i = CH375FileErase( );  刪除文件并關(guān)閉
		if ( i != ERR_SUCCESS ) printf( "Error: %02X\n", (UINT16)i );  顯示錯(cuò)誤
*/
		LED_WR_INACT( );

/* 查詢磁盤(pán)信息 */
/*		printf( "Disk\n" );
		i = CH375DiskQuery( );
		mStopIfError( i );
		printf( "Fat=%d, Total=%ld, Free=%ld\n", (UINT16)mCmdParam.Query.mDiskFat, mCmdParam.Query.mTotalSector, mCmdParam.Query.mFreeSector );
*/
#endif
		LED_RUN_INACT( );
		printf( "Take out\n" );
		while ( CH375DiskStatus != DISK_DISCONNECT ) xQueryInterrupt( );  /* 查詢CH375中斷并更新中斷狀態(tài),等待U盤(pán)拔出 */
		LED_OUT_INACT( );  /* LED滅 */
		mDelay100mS( );
		mDelay100mS( );
	}
}