/* 2004.06.05
****************************************
**  Copyright  (C)  W.ch  1999-2004   **
**  Web:  http://www.winchiphead.com  **
****************************************
**  USB Host File Module      @CH375  **
**  TC2.0@PC, KC7.0@MCS51             **
****************************************
*/
/* U盤文件讀寫模塊, 連接方式: 3線制串口+查詢+事件中斷通知 */
/* MCS-51單片機C語言示例程序 */
/* 因為使用U盤文件讀寫模塊而不是使用U盤文件級子程序庫,所以占用較少的單片機資源,可以使用89C51單片機測試 */
/* 以字節(jié)為單位進行U盤文件讀寫,單片機的RAM只需要幾十個字節(jié),不需要外部RAM */
/* 本程序用于演示將ADC模數(shù)采集的數(shù)據(jù)保存到U盤文件MY_ADC.TXT中 */

#include <reg51.h>
#include <absacc.h>
#include <string.h>
#include <stdio.h>

#define MAX_PATH_LEN			32		/* 最大路徑長度,含所有斜杠分隔符和小數(shù)點間隔符以及路徑結(jié)束符00H,CH375模塊支持的最大值是62,最小值是13 */
#include "..\CH375HM.H"

//#define ENABLE_AUTO_NOTICE		1		/* 允許模塊在檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
#define U16						unsigned short

/* 電路連接方式,只需要連接3根線,使用串口同步碼啟動操作
   單片機    模塊
    TXD   =  SIN
    RXD   =  SOUT
             STA# 懸空或接高電平
             INT# 接地或接低電平
    GND   =  GND
*/
sbit	P15					=	P1^5;

CMD_PARAM	idata	mCmdParam;			/* 默認情況下該結(jié)構(gòu)將占用60字節(jié)的RAM,可以修改MAX_PATH_LEN常量,當修改為32時,只占用32字節(jié)的RAM */
unsigned char		TempLength;			/* 臨時緩沖區(qū)中的數(shù)據(jù)長度,從原文件中第二次讀出的字節(jié)數(shù) */
unsigned char idata	TempBuffer[20];		/* 臨時緩沖區(qū),存放從原文件中讀出的內(nèi)容 */

sbit	LED_OUT		=	P1^4;			/* P1.4 低電平驅(qū)動LED顯示,用于監(jiān)控演示程序的進度 */

/* 以毫秒為單位延時,適用于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ā)送一個字節(jié)數(shù)據(jù)給CH375模塊 */
void	mSendByte( unsigned char c )
{
	TI = 0;
	SBUF = c;
	while ( TI == 0 );
}

/* 從CH375模塊接收一個字節(jié)數(shù)據(jù) */
unsigned char	mRecvByte( )
{
	unsigned char	c;
	while ( RI == 0 );
	c = SBUF;
	RI = 0;
	return( c );
}

/* 執(zhí)行命令 */
unsigned char	ExecCommand( unsigned char cmd, unsigned char len )
/* 輸入命令碼和輸入?yún)?shù)長度,返回操作狀態(tài)碼,輸入?yún)?shù)和返回參數(shù)都在CMD_PARAM結(jié)構(gòu)中 */
{
	unsigned char		i, j, status;
	mSendByte( SER_SYNC_CODE1 );  /* 發(fā)送串口同步碼通知模塊,說明命令碼開始發(fā)送,請求開始執(zhí)行命令 */
	mSendByte( SER_SYNC_CODE2 );  /* 用兩個串口同步碼代替STA#的下降沿 */
/* 上面兩個串口同步碼應(yīng)該連續(xù)發(fā)送,如果不連續(xù),那么間隔時間不能超過20mS,否則命令無效 */
	RI = 0;
	mSendByte( cmd );  /* 寫入命令碼 */
	mSendByte( len );  /* 寫入后續(xù)參數(shù)的長度 */
	if ( len ) {  /* 有參數(shù) */
		for ( i = 0; i != len; i ++ ) mSendByte( mCmdParam.Other.mBuffer[ i ] );  /* 依次寫入?yún)?shù) */
	}
	while ( 1 ) {  /* 處理數(shù)據(jù)傳輸,直到操作完成才退出 */
		status = mRecvByte( );  /* 等待模塊完成操作并返回操作狀態(tài) */
		if ( status == ERR_SUCCESS ) {  /* 操作成功 */
			i = mRecvByte( );  /* 返回結(jié)果數(shù)據(jù)的長度 */
			if ( i ) {  /* 有結(jié)果數(shù)據(jù) */
				j = 0;
				do {  /* 使用do+while結(jié)構(gòu)是因為其效率高于for */
					mCmdParam.Other.mBuffer[ j ] = mRecvByte( );  /* 接收結(jié)果數(shù)據(jù)并保存到參數(shù)結(jié)構(gòu)中 */
					j ++;
				} while ( -- i );
			}
			break;  /* 操作成功返回 */
		}
		else if ( status == USB_INT_DISK_READ || status == USB_INT_DISK_WRITE || status == USB_INT_DISK_RETRY ) {  /* 正在從U盤讀數(shù)據(jù)塊,請求數(shù)據(jù)讀出,正在向U盤寫數(shù)據(jù)塊,請求數(shù)據(jù)寫入,讀寫數(shù)據(jù)塊失敗重試 */
			break;  /* 本程序只使用以字節(jié)為單位的文件讀寫子程序,所以正常情況下不會收到該狀態(tài)碼,操作失敗返回 */
		}
		else {  /* 操作失敗 */
			if ( status == ERR_DISK_DISCON || status == ERR_USB_CONNECT ) mDelaymS( 100 );  /* U盤剛剛連接或者斷開,應(yīng)該延時幾十毫秒再操作 */
			break;  /* 操作失敗返回 */
		}
	}
	return( status );
}

/* 檢查操作狀態(tài),如果錯誤則顯示錯誤代碼并停機 */
void	mStopIfError( unsigned char iError )
{
	unsigned char	led;
	if ( iError == ERR_SUCCESS ) return;  /* 操作成功 */
/*	printf( "Error: %02X\n", (unsigned short)iError );*/  /* 顯示錯誤 */
	led=0;
	while ( 1 ) {
		LED_OUT = led&1;  /* LED閃爍 */
		mDelaymS( 100 );
		led^=1;
	}
}

main( ) {
	unsigned char	i, month, hour;
	unsigned short	year, date, adc, len;
	unsigned char	*name;
	LED_OUT = 0;  /* 開機后LED亮一下以示工作 */
	mDelaymS( 100 );  /* 延時100毫秒,CH375模塊上電后需要100毫秒左右的復(fù)位時間 */
	mDelaymS( 100 );
	LED_OUT = 1;
/* 設(shè)置與CH375模塊通訊的串口 */
	SCON = 0x50;
	PCON = 0x80;
	TMOD = 0x20;
	TH1 = 0xE6;  /* 24MHz晶振, 4800bps */
	TR1 = 1;
/* 由于4800bps較慢,所以下面用命令將其修改為9600bps */
	mCmdParam.BaudRate.mDivisor = 18432000/32/9600;  /* 輸入?yún)?shù): 通訊波特率除數(shù),假定模塊的晶體X2的頻率為18.432MHz */
	i = ExecCommand( CMD_BaudRate, 1 );  /* 設(shè)置串口通訊波特率 */
	mStopIfError( i );
	TH1 = 0xF3;  /* 24MHz晶振, 將自身串口的通訊波特率調(diào)整到9600bps */
	mDelaymS( 5 );  /* 延時5毫秒,確保CH375模塊切換到新設(shè)定的通訊波特率 */

#ifdef ENABLE_AUTO_NOTICE  /* 要求模塊在檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
	mCmdParam.Setup.mSetup = 0x01;  /* 輸入?yún)?shù): 模塊配置值,位0為1則空閑時查詢U盤連接狀態(tài)并自動中斷通知 */
	i = ExecCommand( CMD_SetupModule, 1 );  /* 設(shè)置模塊配置 */
	mStopIfError( i );
#endif

/*	printf( "Start\n" );*/
	while ( 1 ) {  /* 主循環(huán) */
/*		printf( "Wait\n" );*/

#ifdef ENABLE_AUTO_NOTICE  /* 允許模塊在檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
		while ( 1 ) {  /* 等待模塊的事件通知 */
			if ( RI == 1 ) {  /* 查詢是否收到模塊的事件通知,也可以用串口接收中斷處理 */
				i = mRecvByte( );  /* 檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
				if ( i == ERR_USB_CONNECT ) {  /* 事件通知是U盤已經(jīng)連接 */
/*					printf( "Disk Connected\n" );*/
					break;
				}
				else if ( i == ERR_DISK_DISCON ) {  /* 事件通知是U盤已經(jīng)斷開 */
/*					printf( "Disk Disconnected\n" );*/
				}
			}
			mDelaymS( 100 );  /* 可以在打算讀寫U盤時再查詢,沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
#else
		while ( 1 ) {  /* 使用查詢方式看U盤是否連接 */
			i = ExecCommand( CMD_QueryStatus, 0 );  /* 查詢當前模塊的狀態(tài) */
			mStopIfError( i );
			if ( mCmdParam.Status.mDiskStatus >= DISK_CONNECT ) break;  /* U盤已經(jīng)連接 */
			mDelaymS( 100 );  /* 可以在打算讀寫U盤時再查詢,沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
#endif

		mDelaymS( 200 );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */
		LED_OUT = 0;  /* LED亮 */
/* 檢查U盤是否準備好,大多數(shù)U盤不需要這一步,但是某些U盤必須要執(zhí)行這一步才能工作 */
		for ( i = 0; i < 5; i ++ ) {
			mDelaymS( 100 );
//			printf( "Ready ?\n" );
			if ( ExecCommand( CMD_DiskReady, 0 ) == ERR_SUCCESS ) break;  /* 查詢磁盤是否準備好 */
		}
/* 從ADC取得數(shù)據(jù)保存到文件中,首先打開已有文件,如果文件不存在,則新建一個 */
		name = "/MY_ADC.TXT";  /* 文件名,斜杠說明是從根目錄開始 */
/*		printf( "Open\n" );*/
		strcpy( mCmdParam.Open.mPathName, name );  /* 原文件名 */
		i = ExecCommand( CMD_FileOpen, MAX_PATH_LEN );  /* 打開文件,輸入?yún)?shù)置為最大值,省得再計算參數(shù)長度 */
		if ( i == ERR_MISS_FILE ) {  /* ERR_MISS_FILE說明沒有找到文件,所以新建一個 */
/*			printf( "Create\n" );*/
			strcpy( mCmdParam.Create.mPathName, name );  /* 新文件名,在根目錄下 */
			i = ExecCommand( CMD_FileCreate, MAX_PATH_LEN );  /* 新建文件并打開,如果文件已經(jīng)存在則先刪除后再新建 */
			mStopIfError( i );
		}
		else {  /* 找到文件,說明文件已存在,因為不打算覆蓋原數(shù)據(jù),所以移動文件指針到末尾,以便追加數(shù)據(jù) */
			mStopIfError( i );
			mCmdParam.ByteLocate.mByteOffset = 0xFFFFFFFF;  /* 移動到文件尾,用于在CMD_FileOpen打開文件后,繼續(xù)追加數(shù)據(jù)到已打開文件的末尾 */
			i = ExecCommand( CMD_ByteLocate, 4 );  /* 以字節(jié)為單位移動文件指針 */
			mStopIfError( i );
		}
/*		printf( "Write or append data\n" );*/
		for ( hour = 8; hour != 18; hour ++  ) {  /* 用循環(huán)方式添加10行數(shù)據(jù) */
			TR0=1;  /* 用定時器0的計數(shù)值代替ADC數(shù)據(jù) */
			year = 2004; month = 5;  /* 假定是2004年5月 */
			date = TL1 & 0x1F;  /* 因為測試板上沒有實時時鐘芯片,所以用定時器1的計數(shù)代替進行演示 */
/*			adc = get_adc_data( ); */
			adc = ( (U16)TH0 << 8 ) | TL0;  /* 因為測試板上沒有ADC,所以用定時器0的計數(shù)代替ADC數(shù)據(jù)演示 */
			len = sprintf( mCmdParam.ByteWrite.mByteBuffer, "%04d.%02d.%02d.%02d ADC=%u\xd\xa", year, (U16)month, date, (U16)hour, adc );  /* 將二制制數(shù)據(jù)格式為一行字符串 */
			mCmdParam.ByteWrite.mByteCount = (unsigned char)len;  /* 指定本次寫入的字節(jié)數(shù),不能超過MAX_BYTE_IO,否則另用緩沖區(qū)分多次寫入 */
			i = ExecCommand( CMD_ByteWrite, (unsigned char)(len+1) );  /* 以字節(jié)為單位向文件寫入數(shù)據(jù) */
			mStopIfError( i );
		}
//		i = ExecCommand( CMD_QueryStatus, 0 );  /* 查詢當前模塊的狀態(tài) */
//		mStopIfError( i );
//		FileSize = mCmdParam.Status.mFileSize;  /* 返回: 當前文件的長度 */
//		CurrentFilePoint = mCmdParam.Status.mCurrentOffset;  /* 返回: 當前文件指針,當前讀寫位置的字節(jié)偏移 */
//
//		mCmdParam.ByteWrite.mByteCount = 0;  /* 指定寫入0字節(jié),用于刷新文件的長度,注意如果字節(jié)數(shù)不為0那么CMD_ByteWrite只負責(zé)寫入數(shù)據(jù)而不修改文件長度 */
//		ExecCommand( CMD_ByteWrite, 1 );  /* 以字節(jié)為單位向文件寫入數(shù)據(jù),因為是0字節(jié)寫入,所以只用于更新文件的長度,當階段性寫入數(shù)據(jù)后,可以用這種辦法更新文件長度 */
		strcpy( mCmdParam.ByteWrite.mByteBuffer, "今天的ADC數(shù)據(jù)到此結(jié)束\xd\xa" );
		len = strlen( mCmdParam.ByteWrite.mByteBuffer );  /* 計算字符串長度 */
		mCmdParam.ByteWrite.mByteCount = len;  /* 將原文件中的20個字節(jié)的數(shù)據(jù)添加到新文件的末尾 */
		i = ExecCommand( CMD_ByteWrite, len+1 );  /* 以字節(jié)為單位向文件寫入數(shù)據(jù) */
		mStopIfError( i );
/*		printf( "Close\n" );*/
		mCmdParam.Close.mUpdateLen = 1;  /* 自動計算文件長度,當以字節(jié)為單位向文件寫入數(shù)據(jù)后,如果沒有用0長度的CMD_ByteWrite更新文件長度,那么可以在關(guān)閉文件時讓模塊自動更新文件長度 */
		i = ExecCommand( CMD_FileClose, 1 );  /* 關(guān)閉文件,當以字節(jié)為單位向文件寫入(追加)數(shù)據(jù)后,必須在用完文件后關(guān)閉文件 */
		mStopIfError( i );

/* 等待U盤斷開 */
/*		printf( "Take_out\n" );*/
#ifdef ENABLE_AUTO_NOTICE  /* 允許模塊在檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
		while ( 1 ) {  /* 等待模塊的事件通知 */
			if ( RI == 1 ) {  /* 查詢是否收到模塊的事件通知,也可以用串口接收中斷處理 */
				i = mRecvByte( );  /* 檢測到U盤連接或者斷開后,自動發(fā)送狀態(tài)碼通知本單片機 */
				if ( i == ERR_USB_CONNECT ) {  /* 事件通知是U盤已經(jīng)連接 */
/*					printf( "Disk Connected\n" );*/
				}
				else if ( i == ERR_DISK_DISCON ) {  /* 事件通知是U盤已經(jīng)斷開 */
/*					printf( "Disk Disconnected\n" );*/
					break;
				}
			}
			mDelaymS( 100 );  /* 可以在打算讀寫U盤時再查詢,沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
#else
		while ( 1 ) {  /* 使用查詢方式看U盤是否斷開 */
			i = ExecCommand( CMD_QueryStatus, 0 );  /* 查詢當前模塊的狀態(tài) */
			mStopIfError( i );
			if ( mCmdParam.Status.mDiskStatus <= DISK_DISCONNECT ) break;  /* U盤已經(jīng)斷開 */
			mDelaymS( 100 );  /* 沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
#endif
		LED_OUT = 1;  /* LED滅 */
	}
}