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

/* 8086/X86單片機C語言的U盤文件讀寫示例程序 */
/* 該程序將U盤中的/C51/CH375HFT.C文件中的前600個字符顯示出來,
   如果找不到原文件CH375HFT.C, 那么該程序將顯示C51子目錄下所有以CH375開頭的文件名,
   如果找不到C51子目錄, 那么該程序將顯示根目錄下的所有文件名,
   最后將程序中的一個字符串寫入寫入新建的文件"NEWFILE.TXT"中
*/
/* CH375的INT#引腳采用查詢方式處理, 數據復制方式為"內部復制", 本程序適用于8086兼容的X86單片機, 文本顯示輸出監控信息 */

/* 本例以字節為單位讀寫U盤文件,讀寫速度較扇區模式慢,但是由于字節模式讀寫文件不需要文件數據緩沖區FILE_DATA_BUF,
   所以總共只需要600字節的RAM,適用于單片機硬件資源有限、數據量小并且讀寫速度要求不高的系統 */


/* TCC -ms -IC:\TC\INCLUDE -O -r -Z -c CH375HFT.C */
/* TLINK CH375HFT.OBJ C:\TC\LIB\C0S.OBJ, CH375HFT.EXE, , ..\CH375HF7.LIB C:\TC\LIB\CS.LIB */

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


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

/* 單片機的RAM有限,其中CH375子程序用512字節,剩余RAM部分可以用于文件讀寫緩沖 */
#define DISK_BASE_BUF_LEN		4096	/* 默認的磁盤數據緩沖區大小為512字節,建議選擇為2048甚至4096以支持某些大扇區的U盤,為0則禁止在.H文件中定義緩沖區并由應用程序在pDISK_BASE_BUF中指定 */
/* #define FILE_DATA_BUF_LEN		0x0200	/* 外部RAM的文件數據緩沖區,緩沖區長度不小于一次讀寫的數據長度 */
/* 如果準備使用雙緩沖區交替讀寫,那么不要定義FILE_DATA_BUF_LEN,而是在參數中指定緩沖區起址,用CH375FileReadX代替CH375FileRead,用CH375FileWriteX代替CH375FileWrite */

unsigned short	mPortBaseAddr;			/* CH375EDM電子盤模塊的I/O基址 */

#define CH375EDM_DATA_PORT		( mPortBaseAddr + 0 )	/* CH375EDM的數據端口的I/O地址 */
#define CH375EDM_COMMAND_PORT	( mPortBaseAddr + 1 )	/* CH375EDM的命令端口的I/O地址 */
#define CH375EDM_STATUS_PORT	( mPortBaseAddr + 2 )	/* CH375EDM的狀態端口的I/O地址 */

#define CH375_INT_WIRE			( inportb( CH375EDM_STATUS_PORT ) & 0x01 )	/* CH375EDM的中斷線INT#引腳,用于查詢中斷狀態 */

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

#include "..\CH375HF7.H"

/* 本例將CH375EDM電子盤模塊連接到PC機的ISA或者PCI總線 */
/* 在ISA總線中, I/O基址假定為250H */
/* 在PCI總線中, I/O基址由BIOS自動分配, 也可以由CH365本地定址功能保持為原ISA地址 */

#ifndef CH365_PCI_CARD
#define CH375EDM_ISA_IO_ADDR	0x0250
#endif

void mDelay1_2uS( )  /* 至少延時1.2uS,根據單片機主頻調整 */
{
	UINT16	i;
	for ( i = 3; i != 0; i -- ) inportb( CH375EDM_STATUS_PORT );
}

void CH375_PORT_INIT( )  /* 由于使用通用I/O模塊并口讀寫時序,所以進行初始化 */
{
#ifdef CH365_PCI_CARD
	union	REGS	mReg;
	mReg.x.ax = 0xb102;
	mReg.x.cx = 0x5049;  /* 設備ID */
	mReg.x.dx = 0x4348;  /* 廠商ID */
	mReg.x.si = 0;  /* 搜索第一個 */
	int86 ( 0x1a, &mReg, &mReg );  /* 調用PCI的BIOS */
	if ( mReg.h.ah == 0 ) {  /* 調用成功 */
		mReg.x.ax = 0xb109;
		mReg.x.di = 0x0010;
		int86 ( 0x1a, &mReg, &mReg );  /* 調用PCI的BIOS */
		mPortBaseAddr = mReg.x.cx & 0xfffe;  /* PCI設備的I/O基址 */
	}
	else {  /* 沒有檢測到CH365 */
		printf( "CH365 PCI card not found\n" );
		exit( 1 );  /* 強制程序終止 */
		while( 1 );
	}
#else
	mPortBaseAddr = CH375EDM_ISA_IO_ADDR;  /* CH375電子盤模塊的ISA基址 */
#endif
}

void xWriteCH375Cmd( UINT8 mCmd )		/* 外部定義的被CH375程序庫調用的子程序,向CH375寫命令 */
{
	mDelay1_2uS( ); mDelay1_2uS( );  /* 至少延時2uS */
	outportb( CH375EDM_COMMAND_PORT, mCmd );  /* 向CH375EDM輸出數據 */
	mDelay1_2uS( ); mDelay1_2uS( );  /* 至少延時2uS */
}

void xWriteCH375Data( UINT8 mData )		/* 外部定義的被CH375程序庫調用的子程序,向CH375寫數據 */
{
	outportb( CH375EDM_DATA_PORT, mData );  /* 向CH375EDM輸出數據 */
	mDelay1_2uS( );  /* 至少延時1.2uS */
}

UINT8 xReadCH375Data( void )			/* 外部定義的被CH375程序庫調用的子程序,從CH375讀數據 */
{
	mDelay1_2uS( );  /* 至少延時1.2uS */
	return( inportb( CH375EDM_DATA_PORT ) );  /* 從CH375EDM輸入數據 */
}

/* 以文本提示代替LED用于監控演示程序的進度 */
#define LED_OUT_INIT( )		{ putchar(7); }	/* 初始化 */
#define LED_OUT_ACT( )		{ printf("LED action\n"); }	/* 低電平驅動LED顯示 */
#define LED_OUT_INACT( )	{ printf("LED inaction\n"); }	/* 低電平驅動LED顯示 */

/* 延時指定毫秒時間,根據單片機主頻調整,不精確 */
void	mDelaymS( UINT16 ms )
{
	UINT32	i;
	while ( ms -- ) for ( i = 800; i != 0; i -- ) mDelay1_2uS( );
}

/* 檢查操作狀態,如果錯誤則顯示錯誤代碼并停機 */
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 );
	}
}

int		main( ) {
	UINT8	i, c;
	UINT16	TotalCount;
	UINT8	*pCodeStr;
	CH375_PORT_INIT( );
	LED_OUT_INIT( );
	LED_OUT_ACT( );  /* 開機后LED亮一下以示工作 */
	mDelaymS( 100 );  /* 延時100毫秒 */
	LED_OUT_INACT( );
	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盤插入 */
		LED_OUT_ACT( );  /* LED亮 */
		mDelaymS( 200 );  /* 延時,可選操作,有的USB存儲器需要幾十毫秒的延時 */

/* 檢查U盤是否準備好,有些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 ) 有可能前兩個數據相乘后導致溢出, 所以修改成上式
*/
/* 讀取原文件 */
		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 const *)mCmdParam.Open.mPathName );  /* 計算文件名長度,以處理文件名結束符 */
				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;
				}
			}
		}
		else {  /* 找到文件或者出錯 */
			mStopIfError( i );
			TotalCount = 600;  /* 準備讀取總長度 */
			printf( "從文件中讀出的前%d個字符是:\n",TotalCount );
			while ( TotalCount ) {  /* 如果文件比較大,一次讀不完,可以再調用CH375ByteRead繼續讀取,文件指針自動向后移動 */
				if ( TotalCount > MAX_BYTE_IO ) c = MAX_BYTE_IO;  /* 剩余數據較多,限制單次讀寫的長度不能超過 sizeof( mCmdParam.ByteRead.mByteBuffer ) */
				else c = TotalCount;  /* 最后剩余的字節數 */
				mCmdParam.ByteRead.mByteCount = c;  /* 請求讀出幾十字節數據 */
				i = CH375ByteRead( );  /* 以字節為單位讀取數據塊,單次讀寫的長度不能超過MAX_BYTE_IO,第二次調用時接著剛才的向后讀 */
				mStopIfError( i );
				TotalCount -= mCmdParam.ByteRead.mByteCount;  /* 計數,減去當前實際已經讀出的字符數 */
				for ( i=0; i!=mCmdParam.ByteRead.mByteCount; i++ ) printf( "%c", mCmdParam.ByteRead.mByteBuffer[i] );  /* 顯示讀出的字符 */
				if ( mCmdParam.ByteRead.mByteCount < c ) {  /* 實際讀出的字符數少于要求讀出的字符數,說明已經到文件的結尾 */
					printf( "\n" );
					printf( "文件已經結束\n" );
					break;
				}
			}
/*	    如果希望從指定位置開始讀寫,可以移動文件指針
		mCmdParam.ByteLocate.mByteOffset = 608;  跳過文件的前608個字節開始讀寫
		CH375ByteLocate( );
		mCmdParam.ByteRead.mByteCount = 5;  讀取5個字節
		CH375ByteRead( );   直接讀取文件的第608個字節到612個字節數據,前608個字節被跳過

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

#ifdef EN_DISK_WRITE  /* 子程序庫支持寫操作 */
/* 產生新文件 */
		printf( "Create\n" );
		strcpy( (char *)mCmdParam.Create.mPathName, "/NEWFILE.TXT" );  /* 新文件名,在根目錄下,中文文件名 */
		i = CH375FileCreate( );  /* 新建文件并打開,如果文件已經存在則先刪除后再新建 */
		mStopIfError( i );
		printf( "Write\n" );
		pCodeStr = (UINT8 *)"Note: \xd\xa這個程序是以字節為單位進行U盤文件讀寫,單片機只需要有600字節的RAM\xd\xa";
		while( 1 ) {  /* 分多次寫入文件數據 */
			for ( i=0; i<MAX_BYTE_IO; i++ ) {
				c = *pCodeStr;
				mCmdParam.ByteWrite.mByteBuffer[i] = c;
				if ( c == 0 ) break;  /* 源字符串結束 */
				pCodeStr++;
			}
			if ( i == 0 ) break;  /* 源字符串結束,完成寫文件 */
			mCmdParam.ByteWrite.mByteCount = i;  /* 寫入數據的字符數,單次讀寫的長度不能超過MAX_BYTE_IO,第二次調用時接著剛才的向后寫 */
			i = CH375ByteWrite( );  /* 向文件寫入數據 */
			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 = 0xffffffff;   輸入參數: 新的文件長度,以字節為單位寫文件應該由程序庫關閉文件時自動更新長度,所以此處不修改
		i = CH375FileModify( );   修改當前文件的信息,修改日期
		mStopIfError( i );
*/
		printf( "Close\n" );
		mCmdParam.Close.mUpdateLen = 1;  /* 自動計算文件長度,以字節為單位寫文件,建議讓程序庫關閉文件以便自動更新文件長度 */
		i = CH375FileClose( );
		mStopIfError( i );

/* 刪除某文件 */
/*		printf( "Erase\n" );
		strcpy( (char *)mCmdParam.Create.mPathName, "/OLD" );  將被刪除的文件名,在根目錄下
		i = CH375FileErase( );  刪除文件并關閉
		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中斷并更新中斷狀態,等待U盤拔出 */
		LED_OUT_INACT( );  /* LED滅 */
		mDelaymS( 200 );
/*		i = FILE_DATA_BUF[0];*/  /* 因為是以字節為單位讀寫文件,未用到文件數據緩沖區,為了防止編譯器優化掉該緩沖區而用一下緩沖區 */
	}
}