/*********************************************************************************************************
**                                             Small RTOS(51)
**                                   The Real-Time Kernel(For Keil c51)
**
**                                  (c) Copyright 2002-2003, chenmingji
**                                           All Rights Reserved
**
**                                                  V1.12.1
**
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: IIC_Master.c
**創   建   人: 陳明計
**最后修改日期:  2002年12月3日
**描        述: Small RTOS IIC總線主器件驅動程序源文件，也可以在不使用
**              Small RTOS的情況下使用（標準51CPU12MHz時100KHz IIc總線
**              仿真）
**--------------歷史版本信息----------------------------------------------------------------------------
** 創建人: 陳明計
** 版  本: V1.00
** 日　期: 2003年2月28日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人:
** 版  本:
** 日　期:
** 描　述:
**
**--------------當前版本修訂------------------------------------------------------------------------------
** 修改人: 
** 日　期:
** 描　述:
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
#include "config.h"


/*********************************************************************************************************
** 函數名稱: IICRead
** 功能描述: 從IIC總線讀取數據
** 輸　入: Ret:存儲讀取的數據
**         Addr:IIC從器件地址
**         Nbyte:讀取的字節數目
** 輸　出: TRUE:成功
**         FALSE:失敗
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        uint8 IICRead(uint8 OS_SEM_MEM_SEL *Ret,uint8 Addr,uint8 NByte)
{
    uint8 i;
    
    Addr = Addr | 0x01;
    if (IICStart() == FALSE)
    {
        return FALSE;
    }

    if(IICSend(Addr) == FALSE)
    {
        return FALSE;
    }
    i = NByte - 1;
    if (i != 0)
    {
        do
        {
            *Ret++ = IICReceive();
            IIC_ACK();
        } while (--i != 0);
    }
    *Ret = IICReceive();
    IIC_NO_ACK();
    IICStop();
    return TRUE;    
}

/*********************************************************************************************************
** 函數名稱: IICWrite
** 功能描述: 往IIC總線寫數據
** 輸　入: Addr:IIC從器件地址
**         Data:存儲將要寫的數據
**         Nbyte:寫的字節數目
** 輸　出: TRUE:成功
**         FALSE:失敗
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        uint8 IICWrite(uint8 Addr,uint8 OS_SEM_MEM_SEL *Data,uint8 NByte)
{
    uint8 i;

    Addr = Addr & 0xfe;
    if (IICStart() == FALSE)
    {
        return FALSE;
    }
    if (IICSend(Addr) == FALSE)
    {
        return FALSE;
    }
    i = NByte;
    do
    {
        if (IICSend(*Data++) == FALSE)
        {
            return FALSE;
        }
    } while (--i !=0 );
    IICStop();
    return TRUE;
}

/*********************************************************************************************************
** 函數名稱: IICInit
** 功能描述: IIC總線初始化
** 輸　入: 無
** 輸　出: 無
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        void IICInit(void)
{
    SCL = 0;
    IICStop();
}
 
/*********************************************************************************************************
** 函數名稱: IICStart
** 功能描述: 發送IIC啟動信號
** 輸　入: 無
** 輸　出: TRUE:成功
**         FALSE:失敗
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        uint8 IICStart(void)
{
    SDA = 1;
    SCL = 1;
    if (SDA == 1)
    {
        SDA = 0;
        _nop_();
        SCL = 0;
        SDA = 1;
        return TRUE;
    }
    else
    {
        return FALSE;
    }
}

/*********************************************************************************************************
** 函數名稱: IICStop
** 功能描述: 發送IIC結束信號
** 輸　入: 無
** 輸　出: 無
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        void IICStop(void)
{
    SDA = 0;
    _nop_();
    _nop_();
    SCL = 1;
    SDA = 1;
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
}

/*********************************************************************************************************
** 函數名稱: IIC_ACK
** 功能描述: 發送IIC應答信號
** 輸　入: 無
** 輸　出: 無
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        void IIC_ACK(void)
{
    SDA = 0;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
}

/*********************************************************************************************************
** 函數名稱: IIC_NO_ACK
** 功能描述: 發送IIC無應答信號
** 輸　入: 無
** 輸　出: 無
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        void IIC_NO_ACK(void)
{
    SDA = 1;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    _nop_();
    _nop_();
    SCL = 0;
    return;
}

/*********************************************************************************************************
** 函數名稱: IICSend
** 功能描述: 發送一個字節
** 輸　入: IIC_data:數據
** 輸　出: TRUE:成功
**         FALSE:失敗
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        uint8 IICSend(uint8 IIC_data)
{
    uint8 i;
    
    for (i = 0; i < 8; i++)
    {
        IIC_data = IIC_data << 1;
        F0 = SDA = CY;
        SCL = 1;
        if (F0 != SDA)
        {
            SCL = 0;
            return FALSE;
        }
        _nop_();
        _nop_();
        SCL = 0;
    }
    SDA = 1;
    _nop_();
    _nop_();
    SCL = 1;
    _nop_();
    _nop_();
    if (SDA == 1)
    {
        SCL = 0;
        return FALSE;
    }
    else
    {
        SCL = 0;
        return TRUE;
    }
}

/*********************************************************************************************************
** 函數名稱: IICReceive
** 功能描述: 讀取一個字節
** 輸　入: 無
** 輸　出: 讀取的字節
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
        uint8 IICReceive(void)
{
    uint8 i,r;
    
    r = 0;
    SDA = 1;
    for (i = 0; i < 8; i++)
    {
        r = r * 2;
        SCL = 1;
        _nop_();
        _nop_();
        if (SDA == 1)
        {
            r++;
        }
        SCL = 0;
    }
    return r;
}

/*********************************************************************************************/
/*                                 End of File                                               */
/*********************************************************************************************/