/* 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 */

/* MCS-51單片機C語言的U盤文件讀寫示例程序, 適用于89C52或者更大程序空間的單片機 */
/* 該程序將U盤中的/C51/CH375HFT.C文件中的小寫字母轉成大寫字母后, 寫到新建的文件NEWFILE.TXT中,
   如果找不到原文件CH375HFT.C, 那么該程序將顯示C51子目錄下所有以CH375開頭的文件名, 并新建NEWFILE.TXT文件并寫入提示信息,
   如果找不到C51子目錄, 那么該程序將顯示根目錄下的所有文件名, 并新建NEWFILE.TXT文件并寫入提示信息
*/
/* CH375的INT#引腳采用中斷方式處理, 數據復制方式為"單DPTR和P2+R0復制", 所以速度最快, 適用于標準MCS51單片機, 不使用內置的外部RAM */


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

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

/* 以下定義的詳細說明請看CH375HF4.H文件 */
#define LIB_CFG_DISK_IO			3		/* 磁盤讀寫的數據的復制方式,1為"單DPTR復制",2為"雙DPTR復制",3為"單DPTR和P2+R0復制" */
#define LIB_CFG_FILE_IO			3		/* 文件讀寫的數據的復制方式,0為"外部子程序",1為"單DPTR復制",2為"雙DPTR復制",3為"單DPTR和P2+R0復制" */
#define LIB_CFG_INT_EN			1		/* CH375的INT#引腳連接方式,0為"查詢方式",1為"中斷方式" */

#define CH375_CMD_PORT_ADDR		0xBDF1	/* CH375命令端口的I/O地址 */
#define CH375_DAT_PORT_ADDR		0xBCF0	/* CH375數據端口的I/O地址 */
/* 62256提供的32KB的RAM分為兩部分: 0000H-7DFFH為文件讀寫緩沖區, 7E00H-7FFFH為磁盤數據緩沖區 */
#define	DISK_BASE_BUF_ADDR		0x7E00	/* 外部RAM的磁盤數據緩沖區的起始地址,從該單元開始的緩沖區長度為SECTOR_SIZE */
#define FILE_DATA_BUF_ADDR		0x0000	/* 外部RAM的文件數據緩沖區的起始地址,緩沖區長度不小于一次讀寫的數據長度 */
/* 由于演示板用的62256只有32K字節,其中CH375子程序用512字節,所以外部RAM剩余長度為32256字節 */
#define FILE_DATA_BUF_LEN		0x7E00	/* 外部RAM的文件數據緩沖區,緩沖區長度不小于一次讀寫的數據長度 */

#define CH375_INT_NO			0		/* CH375中斷號, CH375的中斷線INT#引腳連接單片機的INT0引腳 */
#define CH375_INT_FLAG			IE0		/* IE0,CH375中斷標志 */
#define CH375_INT_EN			EX0		/* EX0,CH375中斷允許 */

#include "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顯示 */

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

/* 將程序空間的字符串復制到內部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閃爍 */
		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;
	UINT32	OldSize;
	UINT16	NewSize, count;  /* 因為演示板的RAM容量只有32KB,所以NewSize限制為16位,實際上如果文件大于32256字節,應該分幾次讀寫并且將NewSize改為UINT32以便累計 */
	UINT8	code *pCodeStr;
	LED_OUT_INIT( );
	LED_OUT_ACT( );  /* 開機后LED亮一下以示工作 */
	mDelay100mS( );  /* 延時100毫秒 */
	LED_OUT_INACT( );
	mInitSTDIO( );  /* 為了讓計算機通過串口監控演示過程 */
	printf( "Start\n" );

	CH375_INT_FLAG = 0;  /* 清中斷標志 */
	i = CH375LibInit( );  /* 初始化CH375程序庫和CH375芯片,操作成功返回0 */
	mStopIfError( i );
	CH375_INT_EN = 1;  /* 允許CH375中斷 */
/* 其它電路初始化 */
	EA = 1;  /* 初始化完成,開中斷 */

	while ( 1 ) {
		printf( "Wait Udisk\n" );
		while ( CH375DiskStatus != DISK_CONNECT );  /* 等待U盤插入,單片機可以做其它事情 */
		LED_OUT_ACT( );  /* LED亮 */
		mDelay100mS( );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */
		mDelay100mS( );

/* 檢查U盤是否準備好,大多數U盤不需要這一步,但是某些U盤必須要執行這一步才能工作 */
		do {
			mDelay100mS( );
			printf( "Ready ?\n" );
			i = CH375DiskReady( );  /* 查詢磁盤是否準備好,如果省掉這個子程序可以節約將近1KB的程序代碼 */
		} while ( i != ERR_SUCCESS );
/* 查詢磁盤物理容量 */
/*		printf( "DiskSize\n" );
		i = CH375DiskSize( );  
		mStopIfError( i );
		printf( "TotalSize = %ld MB \n", mCmdParam.DiskSize.mDiskSizeSec >> 11 );  顯示為以MB為單位的容量
*/

		LED_RUN_ACT( );  /* 開始操作U盤 */
/* 讀取原文件 */
		printf( "Open\n" );
		mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, "\\C51\\CH375HFT.C" );  /* 文件名,該文件在C51子目錄下 */
		i = CH375FileOpen( );  /* 打開文件 */
		if ( i == ERR_MISS_DIR || i == ERR_MISS_FILE ) {  /* 沒有找到文件 */
/* 列出文件 */
			if ( i == ERR_MISS_DIR ) pCodeStr = "\\*";  /* C51子目錄不存在則列出根目錄下的文件 */
			else pCodeStr = "\\C51\\CH375*";  /* CH375HFT.C文件不存在則列出\C51子目錄下的以CH375開頭的文件 */
			printf( "List file %s\n", pCodeStr );
			for ( c = 0; c < 255; c ++ ) {  /* 最多搜索前255個文件 */
				i = mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, pCodeStr );  /* 搜索文件名,*為通配符,適用于所有文件或者子目錄 */
				mCmdParam.Open.mPathName[ i ] = c;  /* 根據字符串長度將結束符替換為搜索的序號,從0到255 */
				i = CH375FileOpen( );  /* 打開文件,如果文件名中含有通配符*,則為搜索文件而不打開 */
				if ( i == ERR_MISS_FILE ) break;  /* 再也搜索不到匹配的文件,已經沒有匹配的文件名 */
				if ( i == ERR_FOUND_NAME ) {  /* 搜索到與通配符相匹配的文件名,文件名及其完整路徑在命令緩沖區中 */
					printf( "  match file %03d#: %s\n", (unsigned int)c, mCmdParam.Open.mPathName );  /* 顯示序號和搜索到的匹配文件名或者子目錄名 */
					continue;  /* 繼續搜索下一個匹配的文件名,下次搜索時序號會加1 */
				}
				else {  /* 出錯 */
					mStopIfError( i );
					break;
				}
			}
			pCodeStr = "找不到/C51/CH375HFT.C文件\xd\n";
			for ( i = 0; i != 255; i ++ ) {
				if ( ( FILE_DATA_BUF[i] = *pCodeStr ) == 0 ) break;
				pCodeStr++;
			}
			OldSize = 0;
			NewSize = i;  /* 新文件的長度 */
			SecCount = 1;  /* (NewSize+511)/512, 計算文件的扇區數,因為讀寫是以扇區為單位的 */
		}
		else {  /* 找到文件或者出錯 */
			mStopIfError( i );
			printf( "Query\n" );
			i = CH375FileQuery( );  /* 查詢當前文件的信息 */
			mStopIfError( i );
			printf( "Read\n" );
			OldSize = mCmdParam.Modify.mFileSize;  /* 原文件的長度 */
			if ( OldSize > FILE_DATA_BUF_LEN ) {  /* 由于演示板用的62256只有32K字節,其中CH375子程序用512字節,所以只讀取不超過63個扇區,也就是不超過32256字節 */
				SecCount = FILE_DATA_BUF_LEN/512;  /* 由于演示板用的62256只有32K字節,其中CH375子程序用512字節,所以只讀取不超過63個扇區,也就是不超過32256字節 */
				NewSize = FILE_DATA_BUF_LEN;  /* 由于RAM有限所以限制長度 */
			}
			else {  /* 如果原文件較小,那么使用原長度 */
				SecCount = ( OldSize + 511 ) >> 9;  /* (OldSize+511)/512, 計算文件的扇區數,因為讀寫是以扇區為單位的 */
				NewSize = (UINT16)OldSize;  /* 原長度 */
			}
			printf( "Size=%ld, Len=%d, Sec=%d\n", OldSize, NewSize, (UINT16)SecCount );
			mCmdParam.Read.mSectorCount = SecCount;  /* 讀取全部數據,如果超過60個扇區則只讀取60個扇區 */
/*			current_buffer = & FILE_DATA_BUF[0];  如果文件讀寫的數據的復制方式為"外部子程序",那么需要設置存放數據的緩沖區的起始地址 */
			i = CH375FileRead( );  /* 從文件讀取數據 */
			mStopIfError( i );
/*
		如果文件比較大,一次讀不完,可以再調用CH375FileRead繼續讀取,文件指針自動向后移動
		while ( 剩余未讀完 ) {
			mCmdParam.Read.mSectorCount = 32;
			CH375FileRead();   讀完后文件指針自動后移
			TotalLength += 32*512;  累計文件總長度
		}

	    如果希望從指定位置開始讀寫,可以移動文件指針
		mCmdParam.Locate.mSectorOffset = 3;  跳過文件的前3個扇區開始讀寫
		i = CH375FileLocate( );
		mCmdParam.Read.mSectorCount = 10;
		CH375FileRead();   直接讀取從文件的第(512*3)個字節開始的數據,前3個扇區被跳過

	    如果希望將新數據添加到原文件的尾部,可以移動文件指針
		i = CH375FileOpen( );
		mCmdParam.Locate.mSectorOffset = 0xffffffff;  移到文件的尾部,以扇區為單位,如果原文件是3字節,則從512字節開始添加
		i = CH375FileLocate( );
		mCmdParam.Write.mSectorCount = 10;
		CH375FileWrite();   在原文件的后面添加數據
*/
			printf( "Close\n" );
			i = CH375FileClose( );  /* 關閉文件 */
			mStopIfError( i );

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

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

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

/* 查詢磁盤信息 */
/*		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 );  /* 等待U盤拔出,單片機可以做其它事情 */
		LED_OUT_INACT( );  /* LED滅 */
		mDelay100mS( );
		mDelay100mS( );
	}
}