/* 2004.06.05
****************************************
**  Copyright  (C)  W.ch  1999-2004   **
**  Web:  http://www.winchiphead.com  **
****************************************
**  USB Host File Interface for CH375 **
**  TC2.0@PC, ICCAVR_6.31@AVR         **
****************************************
*/
/* CH375 主機文件系統(tǒng)接口 */
/* 支持: FAT12/FAT16/FAT32 */

/* AVR單片機C語言的U盤文件讀寫示例程序 */
/* 該程序?qū)盤中的/C51/CH375HFT.C文件中的前600個字符顯示出來,
   如果找不到原文件CH375HFT.C, 那么該程序?qū)@示C51子目錄下所有以CH375開頭的文件名,
   如果找不到C51子目錄, 那么該程序?qū)@示根目錄下的所有文件名,
   最后將程序ROM中的一個字符串寫入寫入新建的文件"NEWFILE.TXT"中
*/
/* CH375的INT#引腳采用查詢方式處理, 數(shù)據(jù)復制方式為"內(nèi)部復制", 本程序適用于ATmega128單片機, 串口0輸出監(jiān)控信息,9600bps */
/* 本例以字節(jié)為單位讀寫U盤文件,讀寫速度較扇區(qū)模式慢,但是由于字節(jié)模式讀寫文件不需要文件數(shù)據(jù)緩沖區(qū)FILE_DATA_BUF,
   所以總共只需要600字節(jié)的RAM,適用于單片機硬件資源有限、數(shù)據(jù)量小并且讀寫速度要求不高的系統(tǒng) */

/* ICCAVR -v -Wp -I\ICC\INCLUDE -Wf -Mavr_mega -Wl -L\ICC\LIB -m -bfunc_lit:0x8C.0x20000 -bdata:0x0100.0x0FFF -dram_end:0x0FFF -dhwstk_size:40 -ucrtatmega.o CH375HFB.C CH375HFB.A */

#include <iom128v.h>
#include <string.h>
#include <stdio.h>

/* 以下定義的詳細說明請看CH375HF9.H文件 */
#define LIB_CFG_FILE_IO			1		/* 文件讀寫的數(shù)據(jù)的復制方式,0為"外部子程序",1為"內(nèi)部復制" */
#define LIB_CFG_INT_EN			0		/* CH375的INT#引腳連接方式,0為"查詢方式",1為"中斷方式" */

/* 單片機的RAM有限,其中CH375子程序用512字節(jié),剩余RAM部分可以用于文件讀寫緩沖 */
#define FILE_DATA_BUF_LEN		0x0200	/* 外部RAM的文件數(shù)據(jù)緩沖區(qū),緩沖區(qū)長度不小于一次讀寫的數(shù)據(jù)長度 */

#define CH375_INT_WIRE			( PINB & 0x10 )	/* PINB.4, CH375的中斷線INT#引腳,連接CH375的INT#引腳,用于查詢中斷狀態(tài) */

#include "..\CH375HFB.H"

/* 有些AVR單片機提供開放系統(tǒng)總線,那么直接將CH375掛在其系統(tǒng)總線上,以8位I/O方式進行讀寫 */
/* 雖然Atmega128提供系統(tǒng)總線,不過本例假定不開放系統(tǒng)總線,所以用I/O引腳模擬產(chǎn)生CH375的并口讀寫時序 */
/* 本例中的硬件連接方式如下(實際應(yīng)用電路可以參照修改下述3個并口讀寫子程序) */
/*    單片機的引腳     CH375芯片的引腳
       PINB.4                INT#
       PORTB.3               A0
       PORTB.2               CS#
       PORTB.1               WR#
       PORTB.0               RD#
      PORTA(8位端口)        D7-D0       */

void mDelay1uS( )  /* 至少延時1uS,根據(jù)單片機主頻調(diào)整 */
{
	UINT8	i;
	for ( i = 5; i != 0; i -- );
}

void CH375_PORT_INIT( )  /* 由于使用通用I/O模塊并口讀寫時序,所以進行初始化 */
{
	DDRA = 0x00;  /* 設(shè)置8位并口為輸入 */
	PORTB = 0x07;  /* 設(shè)置CS,WR,RD默認為高電平 */
	DDRB = 0x0F;  /* 設(shè)置CS,WR,RD,A0為輸出,設(shè)置INT#為輸入 */
}

void xWriteCH375Cmd( UINT8 mCmd )		/* 外部定義的被CH375程序庫調(diào)用的子程序,向CH375寫命令 */
{
	mDelay1uS( ); mDelay1uS( );  /* 至少延時1uS */
/*	*(volatile unsigned char *)CH375_CMD_PORT_ADDR = mCmd;  通過并口直接讀寫CH375而非普通I/O模擬 */
	PORTB |= 0x08;  /* 輸出A0=1 */
	PORTA = mCmd;  /* 向CH375的并口輸出數(shù)據(jù) */
	DDRA = 0xFF;  /* 并口D0-D7輸出 */
	PORTB &= 0xF9;  /* 輸出有效寫控制信號, 寫CH375芯片的命令端口, A0=1; CS=0; WR=0; RD=1; */
	DDRA = 0xFF;  /* 該操作無意義,僅作延時,CH375要求讀寫脈沖寬度大于100nS */
	PORTB |= 0x07;  /* 輸出無效的控制信號, 完成操作CH375芯片, A0=1; CS=1; WR=1; RD=1; */
	DDRA = 0x00;  /* 禁止數(shù)據(jù)輸出 */
	PORTB &= 0xF7;  /* 輸出A0=0; 可選操作 */
	mDelay1uS( ); mDelay1uS( );  /* 至少延時2uS */
}

void xWriteCH375Data( UINT8 mData )		/* 外部定義的被CH375程序庫調(diào)用的子程序,向CH375寫數(shù)據(jù) */
{
/*	*(volatile unsigned char *)CH375_DAT_PORT_ADDR = mData;  通過并口直接讀寫CH375而非普通I/O模擬 */
	PORTA = mData;  /* 向CH375的并口輸出數(shù)據(jù) */
	DDRA = 0xFF;  /* 并口D0-D7輸出 */
	PORTB &= 0xF1;  /* 輸出有效寫控制信號, 寫CH375芯片的數(shù)據(jù)端口, A0=0; CS=0; WR=0; RD=1; */
	DDRA = 0xFF;  /* 該操作無意義,僅作延時,CH375要求讀寫脈沖寬度大于100nS */
	PORTB |= 0x07;  /* 輸出無效的控制信號, 完成操作CH375芯片, A0=0; CS=1; WR=1; RD=1; */
	DDRA = 0x00;  /* 禁止數(shù)據(jù)輸出 */
	mDelay1uS( );  /* 至少延時1.2uS */
}

UINT8 xReadCH375Data( void )			/* 外部定義的被CH375程序庫調(diào)用的子程序,從CH375讀數(shù)據(jù) */
{
	UINT8	mData;
/*	mData = *(volatile unsigned char *)CH375_DAT_PORT_ADDR;  通過并口直接讀寫CH375而非普通I/O模擬 */
	mDelay1uS( );  /* 至少延時1.2uS */
	DDRA = 0x00;  /* 數(shù)據(jù)輸入 */
	PORTB &= 0xF2;  /* 輸出有效讀控制信號, 讀CH375芯片的數(shù)據(jù)端口, A0=0; CS=0; WR=1; RD=0; */
	DDRA = 0x00;  /* 該操作無意義,僅作延時,CH375要求讀寫脈沖寬度大于100nS */
	mData = PINA;  /* 從CH375的并口PA輸入數(shù)據(jù) */
	PORTB |= 0x07;  /* 輸出無效的控制信號, 完成操作CH375芯片, A0=0; CS=1; WR=1; RD=1; */
	return( mData );
}

/* 在P0.2連接一個LED用于監(jiān)控演示程序的進度,低電平LED亮 */
#define LED_OUT_INIT( )		{ PORTB |= 0x80; DDRB |= 0x80; }	/* PORTB.7 高電平為輸出方向 */
#define LED_OUT_ACT( )		{ PORTB &= 0x7F; }	/* PORTB.7 低電平驅(qū)動LED顯示 */
#define LED_OUT_INACT( )	{ PORTB |= 0x80; }	/* PORTB.7 低電平驅(qū)動LED顯示 */

/* 延時指定毫秒時間,根據(jù)單片機主頻調(diào)整,不精確 */
void	mDelaymS( UINT8 ms )
{
	UINT16	i;
	while ( ms -- ) for ( i = 2600; i != 0; i -- );
}

/* 檢查操作狀態(tà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輸入輸出初始化串口 */
extern int _textmode;
void	mInitSTDIO( )
{
	UBRR0H = 0;
	UBRR0L = 103;  /* 9600bps@16MHz */
	UCSR0B = 0x18; /* BIT(RXEN) | BIT(TXEN); */
	UCSR0C = 0x06; /* BIT(UCSZ1) | BIT(UCSZ0); */
	_textmode = 1;
}

void	main( ) {
	UINT8	i, c;
	UINT16	TotalCount;
	UINT8	*pCodeStr;
	CH375_PORT_INIT( );
	LED_OUT_INIT( );
	LED_OUT_ACT( );  /* 開機后LED亮一下以示工作 */
	mDelaymS( 100 );  /* 延時100毫秒 */
	LED_OUT_INACT( );
	mInitSTDIO( );  /* 為了讓計算機通過串口監(jiān)控演示過程 */
	printf( "Start\n" );

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

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

/* 檢查U盤是否準備好,有些U盤不需要這一步,但是某些U盤必須要執(zhí)行這一步才能工作 */
		for ( i = 0; i < 10; i ++ ) {  /* 有的U盤總是返回未準備好,不過可以被忽略 */
			mDelaymS( 100 );
			printf( "Ready ?\n" );
			if ( CH375DiskReady( ) == ERR_SUCCESS ) break;  /* 查詢磁盤是否準備好 */
		}
/* 查詢磁盤物理容量 */
/*		printf( "DiskSize\n" );
		i = CH375DiskSize( );  
		mStopIfError( i );
		printf( "TotalSize = %d MB \n", (unsigned int)( mCmdParam.DiskSize.mDiskSizeSec >> 11 ) );  顯示為以MB為單位的容量
*/

/* 讀取原文件 */
		printf( "Open\n" );
		strcpy( (char *)mCmdParam.Open.mPathName, "/C51/CH375HFT.C" );  /* 文件名,該文件在C51子目錄下 */
		i = CH375FileOpen( );  /* 打開文件 */
		if ( i == ERR_MISS_DIR || i == ERR_MISS_FILE ) {  /* 沒有找到文件 */
/* 列出文件 */
			if ( i == ERR_MISS_DIR ) pCodeStr = (UINT8 *)"/*";  /* C51子目錄不存在則列出根目錄下的文件 */
			else pCodeStr = (UINT8 *)"/C51/CH375*";  /* CH375HFT.C文件不存在則列出\C51子目錄下的以CH375開頭的文件 */
			printf( "List file %s\n", pCodeStr );
			for ( c = 0; c < 255; c ++ ) {  /* 最多搜索前255個文件 */
				strcpy( (char *)mCmdParam.Open.mPathName, (char *)pCodeStr );  /* 搜索文件名,*為通配符,適用于所有文件或者子目錄 */
				i = strlen( (char *)mCmdParam.Open.mPathName );  /* 計算文件名長度,以處理文件名結(jié)束符 */
				mCmdParam.Open.mPathName[ i ] = c;  /* 根據(jù)字符串長度將結(jié)束符替換為搜索的序號,從0到255 */
				i = CH375FileOpen( );  /* 打開文件,如果文件名中含有通配符*,則為搜索文件而不打開 */
				if ( i == ERR_MISS_FILE ) break;  /* 再也搜索不到匹配的文件,已經(jīng)沒有匹配的文件名 */
				if ( i == ERR_FOUND_NAME ) {  /* 搜索到與通配符相匹配的文件名,文件名及其完整路徑在命令緩沖區(qū)中 */
					printf( "  match file %03d#: %s\n", (unsigned int)c, mCmdParam.Open.mPathName );  /* 顯示序號和搜索到的匹配文件名或者子目錄名 */
					continue;  /* 繼續(xù)搜索下一個匹配的文件名,下次搜索時序號會加1 */
				}
				else {  /* 出錯 */
					mStopIfError( i );
					break;
				}
			}
		}
		else {  /* 找到文件或者出錯 */
			mStopIfError( i );
			TotalCount = 600;  /* 準備讀取總長度 */
			printf( "從文件中讀出的前%d個字符是:\n",TotalCount );
			while ( TotalCount ) {  /* 如果文件比較大,一次讀不完,可以再調(diào)用CH375ByteRead繼續(xù)讀取,文件指針自動向后移動 */
				if ( TotalCount > MAX_BYTE_IO ) c = MAX_BYTE_IO;  /* 剩余數(shù)據(jù)較多,限制單次讀寫的長度不能超過 sizeof( mCmdParam.ByteRead.mByteBuffer ) */
				else c = TotalCount;  /* 最后剩余的字節(jié)數(shù) */
				mCmdParam.ByteRead.mByteCount = c;  /* 請求讀出幾十字節(jié)數(shù)據(jù) */
				i = CH375ByteRead( );  /* 以字節(jié)為單位讀取數(shù)據(jù)塊,單次讀寫的長度不能超過MAX_BYTE_IO,第二次調(diào)用時接著剛才的向后讀 */
				mStopIfError( i );
				TotalCount -= mCmdParam.ByteRead.mByteCount;  /* 計數(shù),減去當前實際已經(jīng)讀出的字符數(shù) */
				for ( i=0; i!=mCmdParam.ByteRead.mByteCount; i++ ) printf( "%c", mCmdParam.ByteRead.mByteBuffer[i] );  /* 顯示讀出的字符 */
				if ( mCmdParam.ByteRead.mByteCount < c ) {  /* 實際讀出的字符數(shù)少于要求讀出的字符數(shù),說明已經(jīng)到文件的結(jié)尾 */
					printf( "\n" );
					printf( "文件已經(jīng)結(jié)束\n" );
					break;
				}
			}
/*	    如果希望從指定位置開始讀寫,可以移動文件指針
		mCmdParam.ByteLocate.mByteOffset = 608;  跳過文件的前608個字節(jié)開始讀寫
		CH375ByteLocate( );
		mCmdParam.ByteRead.mByteCount = 5;  讀取5個字節(jié)
		CH375ByteRead( );   直接讀取文件的第608個字節(jié)到612個字節(jié)數(shù)據(jù),前608個字節(jié)被跳過

	    如果希望將新數(shù)據(jù)添加到原文件的尾部,可以移動文件指針
		CH375FileOpen( );
		mCmdParam.ByteLocate.mByteOffset = 0xffffffff;  移到文件的尾部
		CH375ByteLocate( );
		mCmdParam.ByteWrite.mByteCount = 13;  寫入13個字節(jié)的數(shù)據(jù)
		CH375ByteWrite( );   在原文件的后面添加數(shù)據(jù),新加的13個字節(jié)接著原文件的尾部放置
		mCmdParam.ByteWrite.mByteCount = 2;  寫入2個字節(jié)的數(shù)據(jù)
		CH375ByteWrite( );   繼續(xù)在原文件的后面添加數(shù)據(jù)
		mCmdParam.ByteWrite.mByteCount = 0;  寫入0個字節(jié)的數(shù)據(jù),實際上該操作用于通知程序庫更新文件長度
		CH375ByteWrite( );   寫入0字節(jié)的數(shù)據(jù),用于自動更新文件的長度,所以文件長度增加15,如果不這樣做,那么執(zhí)行CH375FileClose時也會自動更新文件長度
*/
			printf( "Close\n" );
			i = CH375FileClose( );  /* 關(guān)閉文件 */
			mStopIfError( i );
		}

#ifdef EN_DISK_WRITE  /* 子程序庫支持寫操作 */
/* 產(chǎn)生新文件 */
		printf( "Create\n" );
		strcpy( (char *)mCmdParam.Create.mPathName, "/NEWFILE.TXT" );  /* 新文件名,在根目錄下,中文文件名 */
		i = CH375FileCreate( );  /* 新建文件并打開,如果文件已經(jīng)存在則先刪除后再新建 */
		mStopIfError( i );
		printf( "Write\n" );
		pCodeStr = (UINT8 *)"Note: \xd\xa這個程序是以字節(jié)為單位進行U盤文件讀寫,單片機只需要有600字節(jié)的RAM\xd\xa";
		while( 1 ) {  /* 分多次寫入文件數(shù)據(jù) */
			for ( i=0; i<MAX_BYTE_IO; i++ ) {
				c = *pCodeStr;
				mCmdParam.ByteWrite.mByteBuffer[i] = c;
				if ( c == 0 ) break;  /* 源字符串結(jié)束 */
				pCodeStr++;
			}
			if ( i == 0 ) break;  /* 源字符串結(jié)束,完成寫文件 */
			mCmdParam.ByteWrite.mByteCount = i;  /* 寫入數(shù)據(jù)的字符數(shù),單次讀寫的長度不能超過MAX_BYTE_IO,第二次調(diào)用時接著剛才的向后寫 */
			i = CH375ByteWrite( );  /* 向文件寫入數(shù)據(jù) */
			mStopIfError( i );
		}
/*		printf( "Modify\n" );
		mCmdParam.Modify.mFileAttr = 0xff;   輸入?yún)?shù): 新的文件屬性,為0FFH則不修改
		mCmdParam.Modify.mFileTime = 0xffff;   輸入?yún)?shù): 新的文件時間,為0FFFFH則不修改,使用新建文件產(chǎn)生的默認時間
		mCmdParam.Modify.mFileDate = MAKE_FILE_DATE( 2004, 5, 18 );  輸入?yún)?shù): 新的文件日期: 2004.05.18
		mCmdParam.Modify.mFileSize = 0xffffffff;   輸入?yún)?shù): 新的文件長度,以字節(jié)為單位寫文件應(yīng)該由程序庫關(guān)閉文件時自動更新長度,所以此處不修改
		i = CH375FileModify( );   修改當前文件的信息,修改日期
		mStopIfError( i );
*/
		printf( "Close\n" );
		mCmdParam.Close.mUpdateLen = 1;  /* 自動計算文件長度,以字節(jié)為單位寫文件,建議讓程序庫關(guān)閉文件以便自動更新文件長度 */
		i = CH375FileClose( );
		mStopIfError( i );

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

/* 查詢磁盤信息 */
/*		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
		printf( "Take out\n" );
		while ( CH375DiskStatus != DISK_DISCONNECT ) xQueryInterrupt( );  /* 查詢CH375中斷并更新中斷狀態(tài),等待U盤拔出 */
		LED_OUT_INACT( );  /* LED滅 */
		mDelaymS( 200 );
/*		i = FILE_DATA_BUF[0];  因為是以字節(jié)為單位讀寫文件,未用到文件數(shù)據(jù)緩沖區(qū),為了防止編譯器優(yōu)化掉該緩沖區(qū)而用一下緩沖區(qū) */
	}
}