/* 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單片機測試 */
/* 本程序用于演示處理文件目錄項,例如:修改文件名,設(shè)置文件的創(chuàng)建日期和時間等 */

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

#define MAX_PATH_LEN			40		/* 最大路徑長度,含所有斜杠分隔符和小數(shù)點間隔符以及路徑結(jié)束符00H,CH375模塊支持的最大值是62,最小值是13 */
/* 為了處理文件目錄項,MAX_PATH_LEN至少為36,sizeof( mCmdParam.FileDirInfo ) */
#include "..\CH375HM.H"

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

CMD_PARAM	idata	mCmdParam;			/* 默認(rèn)情況下該結(jié)構(gòu)將占用60字節(jié)的RAM,可以修改MAX_PATH_LEN常量,當(dāng)修改為32時,只占用32字節(jié)的RAM */

sbit	LED_OUT		=	P1^4;			/* P1.4 低電平驅(qū)動LED顯示,用于監(jiān)控演示程序的進(jì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),如果錯誤則顯示錯誤代碼并停機,應(yīng)該替換為實際的處理措施 */
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;
	}
}

/* 大端與小端格式的數(shù)據(jù)處理 */
unsigned short	SwapUINT16( unsigned short d )
{
	return( ( d << 8 ) & 0xFF00 | ( d >> 8 ) & 0xFF );
}

main( ) {
	unsigned char	i;
	unsigned short	FileCreateDate, FileCreateTime;
	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;

/*	printf( "Start\n" );*/
	while ( 1 ) {  /* 主循環(huán) */
/*		printf( "Wait\n" );*/
		while ( 1 ) {  /* 使用查詢方式看U盤是否連接 */
			i = ExecCommand( CMD_QueryStatus, 0 );  /* 查詢當(dāng)前模塊的狀態(tài) */
			mStopIfError( i );
			if ( mCmdParam.Status.mDiskStatus >= DISK_CONNECT ) break;  /* U盤已經(jīng)連接 */
			mDelaymS( 100 );  /* 可以在打算讀寫U盤時再查詢,沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
		mDelaymS( 200 );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */
		LED_OUT = 0;  /* LED亮 */
/* 檢查U盤是否準(zhǔn)備好,某些U盤必須要執(zhí)行這一步才能工作 */
		for ( i = 0; i < 3; i ++ ) {
			mDelaymS( 100 );
//			printf( "Ready ?\n" );
			if ( ExecCommand( CMD_DiskReady, 0 ) == ERR_SUCCESS ) break;  /* 查詢磁盤是否準(zhǔn)備好 */
		}
/* 將MY_ADC.TXT文件名修改為WY_ADC.C,并設(shè)置創(chuàng)建文件的日期和時間,首先打開原文件 */
		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 ) mStopIfError( i );  /* 文件不存在,當(dāng)然無法修改文件目錄信息 */
		mStopIfError( i );
		/* 文件讀寫操作等... */

/*		printf( "Get file directory information\n" );*/
		mCmdParam.FileDirInfo.mAccessMode = 0;  /* 讀取文件目錄信息 */
		mCmdParam.FileDirInfo.mReserved[0] = mCmdParam.FileDirInfo.mReserved[1] = mCmdParam.FileDirInfo.mReserved[2] = 0;  /* 保留單元 */
		i = ExecCommand( CMD_FileDirInfo, 4 );  /* 存取當(dāng)前已打開文件的目錄信息 */
		mStopIfError( i );

/* 以下修改文件目錄信息中的文件名 */
		mCmdParam.FileDirInfo.mDir.DIR_Name[0] = 'W';  /* 修改文件名首字節(jié)為W */
		mCmdParam.FileDirInfo.mDir.DIR_Name[8] = 'C';  /* 修改文件擴展名為C */
		mCmdParam.FileDirInfo.mDir.DIR_Name[9] = ' ';
		mCmdParam.FileDirInfo.mDir.DIR_Name[10] = ' ';

/* 以下修改文件目錄信息中的文件創(chuàng)建時間,DIR_CrtTime是創(chuàng)建時間,DIR_WrtTime是修改時間 */
		FileCreateTime = MAKE_FILE_TIME( 16, 49, 28 );  /* 設(shè)置文件創(chuàng)建時間是16時49分28秒 */
//		mCmdParam.FileDirInfo.mDir.DIR_CrtTime = FileCreateTime;  /* 文件創(chuàng)建的時間,適用于小端格式 */
		mCmdParam.FileDirInfo.mDir.DIR_CrtTime = SwapUINT16( FileCreateTime );  /* MCS51單片機C語言是大端格式,所以必須轉(zhuǎn)換后輸出 */
		FileCreateDate = MAKE_FILE_DATE( 2004, 12, 8 );  /* 設(shè)置文件創(chuàng)建日期是2004年12月8日 */
//		mCmdParam.FileDirInfo.mDir.DIR_CrtDate = FileCreateDate;  /* 文件創(chuàng)建的日期,適用于小端格式 */
		mCmdParam.FileDirInfo.mDir.DIR_CrtDate = SwapUINT16( FileCreateDate );  /* MCS51單片機C語言是大端格式,所以必須轉(zhuǎn)換后輸出 */

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

/* 以下將修改過的內(nèi)容真正刷新到U盤中 */
/*		printf( "Save new file directory information\n" );*/
		mCmdParam.FileDirInfo.mAccessMode = 0xF0;  /* 寫入/更新文件目錄信息 */
		i = ExecCommand( CMD_FileDirInfo, sizeof( mCmdParam.FileDirInfo ) );  /* 存取當(dāng)前已打開文件的目錄信息 */
		mStopIfError( i );

		/* 文件讀寫操作等... */
/*		printf( "Close\n" );*/
		mCmdParam.Close.mUpdateLen = 0;
		i = ExecCommand( CMD_FileClose, 1 );  /* 關(guān)閉文件 */
		mStopIfError( i );

/* 等待U盤斷開 */
/*		printf( "Take_out\n" );*/
		while ( 1 ) {  /* 使用查詢方式看U盤是否斷開 */
			i = ExecCommand( CMD_QueryStatus, 0 );  /* 查詢當(dāng)前模塊的狀態(tài) */
			mStopIfError( i );
			if ( mCmdParam.Status.mDiskStatus <= DISK_DISCONNECT ) break;  /* U盤已經(jīng)斷開 */
			mDelaymS( 100 );  /* 沒有必要一直連續(xù)不停地查詢,可以讓單片機做其它事,沒事可做就延時等待一會再查詢 */
		}
		LED_OUT = 1;  /* LED滅 */
	}
}