/* 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或者更大程序空間的單片機 */
/* 長文件名操作示例, 包括創建長文件名和從短文件名獲得對應的長文件名
   注意: CH375HF?.H頭文件需做少量修改, 在mCmdParam聯合結構中增加ReadBlock和WriteBlock的參數結構
*/
/* CH375的INT#引腳采用查詢方式處理, 數據復制方式為"單DPTR復制", 所以速度較慢, 適用于所有MCS51單片機 */


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

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

/* 以下定義的詳細說明請看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 CH375_CMD_PORT_ADDR     0xBDF1  /* CH375命令端口的I/O地址 */
#define CH375_DAT_PORT_ADDR     0xBCF0  /* CH375數據端口的I/O地址 */
/* 62256提供的32KB的RAM分為兩部分: 0000H-01FFH為磁盤讀寫緩沖區, 0200H-7FFFH為文件數據緩沖區 */
#define DISK_BASE_BUF_ADDR      0x0000  /* 外部RAM的磁盤數據緩沖區的起始地址,從該單元開始的緩沖區長度為SECTOR_SIZE */
#define DISK_BASE_BUF_LEN       4096    /* 默認的磁盤數據緩沖區大小為512字節,建議選擇為2048甚至4096以支持某些大扇區的U盤,為0則禁止在.H文件中定義緩沖區并由應用程序在pDISK_BASE_BUF中指定 */
#define FILE_DATA_BUF_ADDR      0x1000  /* 外部RAM的文件數據緩沖區的起始地址,緩沖區長度不小于一次讀寫的數據長度 */
/* 由于演示板用的62256只有32K字節,其中CH375子程序用512字節,所以外部RAM剩余長度為32256字節 */
#define FILE_DATA_BUF_LEN       0x6800  /* 外部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顯示 */

/* 延時100毫秒,不精確 */
void    mDelay100mS( )
{
    UINT8   i, j, c;
    for ( i = 200; i != 0; i -- ) for ( j = 200; j != 0; j -- ) c+=3;
}

/* 將程序空間的字符串復制到內部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閃爍 */
        mDelay100mS( );
        LED_OUT_INACT( );
        mDelay100mS( );
    }
}

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

/*====================長文件名新添的宏定義極其全局變量 =======================*/
// 長文件名緩沖區從(0到20)*26
#define     LONG_NAME_BUF_LEN       (20*26)
#define     UNICODE_ENDIAN          1           // 1為UNICDOE大端編碼 0為小端
// 長文件名存放緩沖區(Unicode編碼)
UINT8   xdata LongNameBuf[ LONG_NAME_BUF_LEN ];

#define     TRUE        1
#define     FALSE       0

// 函數返回
#define     ERR_NO_NAME             0X44        // 此短文件名沒有長文件名或錯誤的長文件
#define     ERR_BUF_OVER            0X45        // 長文件緩沖區溢出
#define     ERR_LONG_NAME           0X46        // 錯誤的長文件名
#define     ERR_NAME_EXIST          0X47        // 此短文件名存在
/*============================================================================*/

/*==============================================================================
函數名: CheckNameSum

函數作用: 檢查長文件名的短文件名檢驗和

==============================================================================*/
UINT8 CheckNameSum( UINT8 *p )
{
UINT8 FcbNameLen;
UINT8 Sum;

    Sum = 0;
    for (FcbNameLen=0; FcbNameLen!=11; FcbNameLen++)
        Sum = ((Sum & 1) ? 0x80 : 0) + (Sum >> 1) + *p++;
    return Sum;
}

/*==============================================================================
函數名: AnalyzeLongName

函數作用: 整理長文件名 返回有幾個的26長度

==============================================================================*/
UINT8 AnalyzeLongName( void )
{
UINT8   i, j;
UINT16  index;

    i = FALSE;
    for( index=0; index!=LONG_NAME_BUF_LEN; index = index + 2 )
    {
        if( ( LongNameBuf[index] == 0 ) && ( LongNameBuf[index+1] == 0 ) )
        {
            i = TRUE;
            break;
        }
    }
    if( ( i == FALSE ) || ( index == 0) )
        return 0;                   // 返回0表示錯誤的長文件名

    i = index % 26;
    if( i != 0 )
    {
        index += 2;
        if( index % 26 != 0 )       // 加0剛好結束
        {
            for( j=i+2; j!=26; j++ )// 把剩余數據填為0XFF
                LongNameBuf[index++] = 0xff;
        }
    }
    return  (index / 26);
}

/*==============================================================================
函數名: CH375CreateLongName

函數作用: 創建長文件名,需要輸入短文件名的完整路徑

==============================================================================*/
UINT8 CH375CreateLongName( void )
{
// 分析 保留文件路徑 創建一個空文件 得到FDT偏移和其所在扇區 刪除文件
// 向后偏移扇區 可能失敗 如FAT12/16處在根目錄處 填充完畢后再次創建文件
UINT8   i;
UINT8   len;                                // 存放路徑的長度
UINT16  index;                              // 長文件偏移索引
UINT16  indexBak;                           // 長文件偏移索引備份
UINT32  Secoffset;                          // 扇區偏移

UINT8   Fbit;                               // 第一次進入寫扇區
UINT8   Mult;                               // 長文件名長度26的倍數
UINT8   MultBak;                            // 長文件名長度26的倍數備份

UINT16  Backoffset;                         // 保存文件偏移備份
UINT16  BackoffsetBak;                      // 保存偏移備份的備份
UINT32  BackFdtSector;                      // 保寸偏移上一個扇區
UINT8   sum;                                // 保存長文件名的校驗和

UINT8   xdata BackPathBuf[MAX_PATH_LEN];    // 保存文件路徑

    Mult = AnalyzeLongName( );              // 保存長文件名是26的倍數
    if( Mult == 0 )
        return ERR_LONG_NAME;
    MultBak = Mult;

    i = CH375FileOpen();                    // 短文件名存在則返回錯誤
    if( i == ERR_SUCCESS )
        return ERR_NAME_EXIST;

    i = CH375FileCreate( );
    if( i == ERR_SUCCESS )
    {
        Backoffset = CH375vFdtOffset;
        BackoffsetBak = Backoffset;
        BackFdtSector = CH375vFdtLba;
        sum = CheckNameSum( &DISK_BASE_BUF[Backoffset ] );
        for( i=0; i!=MAX_PATH_LEN; i++ )    // 對文件路徑進行備份
            BackPathBuf[i] = mCmdParam.Open.mPathName[i];
        CH375FileErase( );                  // 刪除此文件

        Secoffset   = 0;                    // 從0開始偏移
        index       = Mult*26;              // 得到長文件名的長度
        indexBak    = index;
        Fbit        = FALSE;                // 默認沒有進入
        // 打開上級 進行數據填充數據
        P_RETRY:
        for(len=0; len!=MAX_PATH_LEN; len++)
        {
            if(mCmdParam.Open.mPathName[len] == 0)
                break;                      // 得到字符串長度
        }

        for(i=len-1; i!=0xff; i--)          // 得到上級目錄位置
        {
            if((mCmdParam.Open.mPathName[i] == '\\') || (mCmdParam.Open.mPathName[i] == '/'))
                break;
        }
        mCmdParam.Open.mPathName[i] = 0x00;

        if( i==0 )                          // 打開一級目錄注意:處在根目錄開始的特殊情況
        {
            mCmdParam.Open.mPathName[0] = '/';
            mCmdParam.Open.mPathName[1] = 0;