/*********************************************************************************************************
**				                               Small RTOS(51)
**                                   The Real-Time Kernel(For Keil c51)
**
**                                  (c) Copyright 2002-2002, chenmingji
**                                           All Rights Reserved
**
**                                                  V1.11.0
**
**
**--------------文件信息--------------------------------------------------------------------------------
**文   件   名: IIC_Master.c
**創   建   人: 陳明計
**最后修改日期:  2002年12月3日
**描        述: Small RTOS IIC總線主器件驅動程序源文件，也可以在不使用
**              Small RTOS的情況下使用（標準51CPU12MHz時400KHz IIc總線仿真）
**--------------歷史版本信息----------------------------------------------------------------------------
** 創建人: 陳明計
** 版  本: V1.00
** 日　期: 2002年12月4日
** 描　述: 原始版本
**
**------------------------------------------------------------------------------------------------------
** 修改人:
** 版  本:
** 日　期:
** 描　述:
**
**--------------當前版本修訂------------------------------------------------------------------------------
** 修改人: 
** 日　期:
** 描　述:
**
**------------------------------------------------------------------------------------------------------
********************************************************************************************************/
#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;
	    SCL = 0;
	    SDA = 1;
	    return TRUE;
    }
    else
    {
	    return FALSE;
    }
}

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

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

/*********************************************************************************************************
** 函數名稱: IIC_NO_ACK
** 功能描述: 發送IIC無應答信號
** 輸　入: 無
** 輸　出: 無
** 全局變量: 無
** 調用模塊: 無
********************************************************************************************************/
		void IIC_NO_ACK(void)
{
	SDA = 1;
	SCL = 1;
	_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;
		}
		SCL = 0;
	}
	SDA = 1;
	SCL = 1;
	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;
		if (SDA == 1)
		{
		    r++;
		}
		SCL = 0;
	}
	return r;
}