/////////////////////////////////////////////.
#define IN_SPI
#include "config.h"

#ifndef  SPI_MOD
#define SPI_MOD     0
#endif 

static OS_EVENT *SPIReviceMbox;
static OS_EVENT *SPISem;
static uint8 UseSPITaskPro;

/************SPI  prio.***********/
 

/*********************************************************************************************************
** 函數名稱: SPIInit
** 功能描述: 初始化SPI總線為主模式
** 輸　入: Fdiv：用于設定總線頻率（總線頻率=Fpclk/Fdiv)
**
** 輸　出:TRUE  :成功
**        FALSE:失敗
** 全局變量: UseSPITaskPro
** 調用模塊: OSMboxCreate，OSSemCreate
**
** 作　者: 陳明計
** 日　期: 2003年7月4日
**-------------------------------------------------------------------------------------------------------
** 修改人: 陳明計
** 日　期: 2003年7月11日
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 SPIInit(uint8 Fdiv)
{
    PINSEL0 = (PINSEL0 & 0xffff00ff) | 0x5500;  /* 選擇管腳為SPI口 */

    SPI_SPCCR = Fdiv & 0xfe;                    /* 分頻值 */
    SPI_SPCR = 0xa0 | SPI_MOD;                  /* 主機、允許中斷 */

    UseSPITaskPro = OS_PRIO_SELF;               /* 避免任務不按照規范編寫程序而使訪問SPI混亂 */
    SPIReviceMbox = OSMboxCreate(NULL);         /* 用于中斷返回收到的數據 */
    if (SPIReviceMbox == NULL)
    {
        return FALSE;
    }
    SPISem = OSSemCreate(1);                    /* 用于互斥訪問SPI總線 */
    if (SPISem != NULL)
    {
        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

/*********************************************************************************************************
** 函數名稱: GetSPIFlag
** 功能描述: 獲取SPI狀態 
** 輸　入: 無
**
** 輸　出:0  :空閑
**        1 :忙
** 全局變量: 無
** 調用模塊: 無
**
** 作　者: 陳明計
** 日　期: 2003年7月5日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 GetSPIFlag(void)
{
    OS_SEM_DATA SemData;
    
    if (OSSemQuery(SPISem, &SemData) == OS_NO_ERR)
    {
        if (SemData.OSCnt != 0)
        {
            return 0;
        }
    }
    return 1;
}

/*********************************************************************************************************
** 函數名稱: SPIStart
** 功能描述: 開始訪問SPI 
** 輸　入: 無
**
** 輸　出:TRUE  :成功
**        FALSE:失敗
** 全局變量: 無
** 調用模塊: 無
**
** 作　者: 陳明計
** 日　期: 2003年7月5日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 SPIStart(void)
{
    uint8 err;
    
    OSSemPend(SPISem, 0, &err);
    UseSPITaskPro = GetOSPrioCur();
    return TRUE;
}

/*********************************************************************************************************
** 函數名稱: SPIRW
** 功能描述: 讀寫SPI 
** 輸　入: Rt  ：指向返回值存儲位置
**        Data：發送的數據 
** 輸　出:TRUE  :成功
**        FALSE:失敗
** 全局變量: UseSPITaskPro
** 調用模塊: OSMboxPend,GetOSPrioCur
**
** 作　者: 陳明計
** 日　期: 2003年7月5日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 SPIRW(uint8 *Rt, uint8 Data)
{
    uint8 temp, err;
    
    temp = GetOSPrioCur();
    if (temp == UseSPITaskPro)
    {
        SPI_SPDR = Data;
        temp = (unsigned int)OSMboxPend(SPIReviceMbox, 0, &err);
        *Rt = temp;
        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

/*********************************************************************************************************
** 函數名稱: SPIEnd
** 功能描述: 訪問SPI結束
** 輸　入: 無
**        
** 輸　出:TRUE  :成功
**        FALSE:失敗
** 全局變量: UseSPITaskPro
** 調用模塊: OSSemPost,GetOSPrioCur
**
** 作　者: 陳明計
** 日　期: 2003年7月5日
**-------------------------------------------------------------------------------------------------------
** 修改人:
** 日　期:
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        uint8 SPIEnd(void)
{
    uint8 temp;
    
    temp = GetOSPrioCur();
    if (temp == UseSPITaskPro)
    {
        UseSPITaskPro = OS_PRIO_SELF;
        OSSemPost(SPISem);
        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

/*********************************************************************************************************
** 函數名稱: SPI_Exception
** 功能描述: SPI中斷服務程序
** 輸　入: 無
**
** 輸　出: 無
**         
** 全局變量: 無
** 調用模塊: OSMboxPost
**
** 作　者: 陳明計
** 日　期: 2003年7月5日
**-------------------------------------------------------------------------------------------------------
** 修改人: 
** 日　期: 
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
        void SPI_Exception(void)
{
    uint8 temp, temp1;
    
    OS_ENTER_CRITICAL();
    temp = SPI_SPSR;
    if ((temp & 0x80) != 0)
    {
        temp1 = SPI_SPDR;
        OSMboxPost(SPIReviceMbox, (void *)temp1);
    }
    
    if ((temp & 0x10) != 0)
    {
        SPI_SPCR = 0xa0 | SPI_MOD;
    }
    SPI_SPINT = 0x01;    
    VICVectAddr = 0;            // 通知中斷控制器中斷結束
    OS_EXIT_CRITICAL();
}

/*********************************************************************************************************
**                            End Of File
********************************************************************************************************/