/* 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或者更大程序空間的單片機,也適用于ATMEL/PHILIPS/SST等具有1KB內部RAM的單片機 */
/* 本程序用于演示將ADC模數采集的數據保存到U盤文件MY_ADC.TXT中 */
/* CH375的INT#引腳采用查詢方式處理, 數據復制方式為"單DPTR復制",兼容性最好但是速度最慢,
   本例適用于V1.5及以上版本的CH375子程序庫,以字節為單位讀寫U盤文件,讀寫速度較扇區模式慢,
   但是由于字節模式讀寫文件不需要文件數據緩沖區FILE_DATA_BUF,
   所以總共只需要600字節的RAM,適用于單片機硬件資源有限、數據量小并且讀寫速度要求不高的系統 */


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

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

#define	MAX_BYTE_IO				35		/* 以字節為單位單次讀寫文件時的最大長度,默認值是29,值大則占用內存多,值小則超過該長度必須分多次讀寫 */

/* 以下定義的詳細說明請看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地址 */
/* 只使用單片機內置的1KB外部RAM: 0000H-01FFH 為磁盤讀寫緩沖區, 以字節為單位讀寫文件不需要文件數據讀寫緩沖區FILE_DATA_BUF */
#define	DISK_BASE_BUF_ADDR		0x0000	/* 外部RAM的磁盤數據緩沖區的起始地址,從該單元開始的緩沖區長度為SECTOR_SIZE */
#define FILE_DATA_BUF_ADDR		0x0000	/* 外部RAM的文件數據緩沖區的起始地址,緩沖區長度不小于一次讀寫的數據長度,字節模式不用該緩沖區 */
/* 由于單片機內置的外部RAM只有1KB, 有些單片機還要去掉256字節內部RAM, 只剩下768字節的外部RAM, 其中前512字節由CH375子程序用于磁盤數據緩沖 */
// #define FILE_DATA_BUF_LEN		0x0200	/* 外部RAM的文件數據緩沖區,緩沖區長度不小于一次讀寫的數據長度,字節模式不用該緩沖區 */
/* 如果準備使用雙緩沖區交替讀寫,那么不要定義FILE_DATA_BUF_LEN,而是在參數中指定緩沖區起址,用CH375FileReadX代替CH375FileRead,用CH375FileWriteX代替CH375FileWrite */

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

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

#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( UINT8 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( 100 );
		LED_OUT_INACT( );
		mDelaymS( 100 );
	}
}

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

main( ) {
	UINT8	i, month, hour;
	UINT16	date, adc, len;
	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 ) xQueryInterrupt( );  /* 查詢CH375中斷并更新中斷狀態,等待U盤插入 */
		while ( CH375DiskStatus < DISK_CONNECT ) {  /* 查詢CH375中斷并更新中斷狀態,等待U盤插入 */
			if ( CH375DiskConnect( ) == ERR_SUCCESS ) break;  /* 有設備連接則返回成功,CH375DiskConnect同時會更新全局變量CH375DiskStatus */
			mDelaymS( 100 );
		}
		LED_OUT_ACT( );  /* LED亮 */
		mDelaymS( 200 );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */

/* 檢查U盤是否準備好,但是某些U盤必須要執行這一步才能工作 */
		for ( i = 0; i < 10; 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盤 */

/* 如果MY_ADC.TXT文件已經存在則添加數據到尾部,如果不存在則新建文件 */
		printf( "Open\n" );
		mCopyCodeStringToIRAM( mCmdParam.Open.mPathName, "/MY_ADC.TXT" );  /* 文件名,該文件在根目錄下 */
		i = CH375FileOpen( );  /* 打開文件 */
		if ( i == ERR_SUCCESS ) {  /* 文件存在并且已經被打開,移動文件指針到尾部以便添加數據 */
			printf( "File size = %ld\n", CH375vFileSize );  /* V1.5以上子程序庫在成功打開文件后,全局變量CH375vFileSize中是文件當前長度 */
			printf( "Locate tail\n" );
			mCmdParam.ByteLocate.mByteOffset = 0xffffffff;  /* 移到文件的尾部 */
			i = CH375ByteLocate( );
			mStopIfError( i );
		}
		else if ( i == ERR_MISS_FILE ) {  /* 沒有找到文件,必須新建文件 */
			LED_WR_ACT( );  /* 寫操作 */
			printf( "Create\n" );
//			mCopyCodeStringToIRAM( mCmdParam.Create.mPathName, "/MY_ADC.TXT" );  /* 文件名,該文件在根目錄下,剛才已經提供給CH375FileOpen */
			i = CH375FileCreate( );  /* 新建文件并打開,如果文件已經存在則先刪除后再新建 */
			mStopIfError( i );
		}
		else mStopIfError( i );  /* 打開文件時出錯 */
		LED_WR_ACT( );  /* 寫操作 */
		printf( "Write begin\n" );
		i = sprintf( mCmdParam.ByteWrite.mByteBuffer, "此前文件長度= %ld 字節\xd\xa", CH375vFileSize );
		mCmdParam.ByteWrite.mByteCount = i;  /* 指定本次寫入的字節數,單次讀寫的長度不能超過MAX_BYTE_IO */
		i = CH375ByteWrite( );  /* 以字節為單位向文件寫入數據,單次讀寫的長度不能超過MAX_BYTE_IO */
		mStopIfError( i );
		printf( "Write ADC data\n" );
		TR0=1;  /* 用定時器0的計數值代替ADC數據 */
		for ( hour = 8; hour != 20; hour ++  ) {  /* 用循環方式添加12行數據 */
			month = 5;  /* 假定是5月 */
			date = TL1 & 0x1F;  /* 因為測試板上沒有實時時鐘芯片,所以用定時器1的計數代替進行演示 */
/*			adc = get_adc_data( ); */
			adc = ( (UINT16)TH0 << 8 ) | TL0;  /* 因為測試板上沒有ADC,所以用定時器0的計數代替ADC數據演示 */
			len = sprintf( mCmdParam.ByteWrite.mByteBuffer, "%02d.%02d.%02d ADC=%u\xd\xa", (UINT16)month, date, (UINT16)hour, adc );  /* 將二制制數據格式為一行字符串 */
			mCmdParam.ByteWrite.mByteCount = (unsigned char)len;  /* 指定本次寫入的字節數,不能超過MAX_BYTE_IO,否則另用緩沖區分多次寫入 */
			i = CH375ByteWrite( );  /* 以字節為單位向文件寫入數據,單次讀寫的長度不能超過MAX_BYTE_IO */
/* 有些U盤可能會要求在寫數據后等待一會才能繼續操作,所以,如果在某些U盤中發生數據丟失現象,建議在每次寫入數據后稍作延時再繼續 */
			mStopIfError( i );
			printf( "Current offset ( file point ) is %ld\n", CH375vCurrentOffset );
		}
/*		mCmdParam.ByteWrite.mByteCount = 0;  如果全局變量CH375LibConfig的位4為0,可以指定寫入0字節,用于刷新文件的長度,
		CH375ByteWrite( );  以字節為單位向文件寫入數據,因為是0字節寫入,所以只用于更新文件的長度,當階段性寫入數據后,可以用這種辦法更新文件長度
        如果全局變量CH375LibConfig的位4為1,則每次寫完數據后會自動修改/更新文件長度,從而不必象上面這樣寫0字節數據: CH375LibConfig |= 0x10; */
		printf( "Write end\n" );
		i = mCopyCodeStringToIRAM( mCmdParam.ByteWrite.mByteBuffer, "今天的ADC數據到此結束\xd\xa" );
		mCmdParam.ByteWrite.mByteCount = i;  /* 指定本次寫入的字節數,單次讀寫的長度不能超過MAX_BYTE_IO */
		i = CH375ByteWrite( );  /* 以字節為單位向文件寫入數據,單次讀寫的長度不能超過MAX_BYTE_IO */
		mStopIfError( i );
/*		printf( "Modify\n" );  如果實際產品中有實時時鐘,可以根據需要將文件的日期和時間修改為實際值
		mCmdParam.Modify.mFileAttr = 0xff;   輸入參數: 新的文件屬性,為0FFH則不修改
		mCmdParam.Modify.mFileTime = MAKE_FILE_TIME( 16, 32, 09 );   輸入參數: 新的文件時間: 16:32:09
		mCmdParam.Modify.mFileDate = MAKE_FILE_DATE( 2004, 5, 18 );  輸入參數: 新的文件日期: 2004.05.18
		mCmdParam.Modify.mFileSize = 0xffffffff;   輸入參數: 新的文件長度,以字節為單位寫文件應該由程序庫關閉文件時自動更新長度,所以此處不修改
		i = CH375FileModify( );   修改當前文件的信息,修改日期
		mStopIfError( i );
*/
		printf( "Close\n" );
		mCmdParam.Close.mUpdateLen = 1;  /* 自動計算文件長度,以字節為單位寫文件,建議讓程序庫關閉文件以便自動更新文件長度 */
		i = CH375FileClose( );  /* 關閉文件 */
		mStopIfError( i );
		LED_WR_INACT( );
		LED_RUN_INACT( );
		printf( "Take out\n" );
//		while ( CH375DiskStatus != DISK_DISCONNECT ) xQueryInterrupt( );  /* 查詢CH375中斷并更新中斷狀態,等待U盤拔出 */
		while ( CH375DiskStatus >= DISK_CONNECT ) {  /* 查詢CH375中斷并更新中斷狀態,等待U盤拔出 */
			CH375DiskConnect( );
			mDelaymS( 100 );
		}
		LED_OUT_INACT( );  /* LED滅 */
		mDelaymS( 200 );
	}
}