/*
 * FILE: i2c.c
 * 用于主机发送/接收
 */
#include <stdio.h>
#include "s3c24xx.h"
#include "i2c.h"

void Delay(int time);

#define WRDATA      (1)
#define RDDATA      (2)

typedef struct tI2C {
    unsigned char *pData;   /* 数据缓冲区 */
    volatile int DataCount; /* 等待传输的数据长度 */
    volatile int Status;    /* 状态 */
    volatile int Mode;      /* 模式：读/写 */
    volatile int Pt;        /* pData中待传输数据的位置 */
}tS3C24xx_I2C, *ptS3C24xx_I2C;

static tS3C24xx_I2C g_tS3C24xx_I2C;

/*
 * I2C初始化
 */
void i2c_init(void)
{
    GPEUP  |= 0xc000;       // 禁止内部上拉
    GPECON |= 0xa0000000;   // 选择引脚功能：GPE15:IICSDA, GPE14:IICSCL

    INTMSK &= ~(BIT_IIC);	//打开i2c中断

    /* bit[7] = 1, 使能ACK
     * bit[6] = 0, IICCLK = PCLK/16
     * bit[5] = 1, 使能中断
     * bit[3:0] = 0xf, Tx clock = IICCLK/16
     * PCLK = 50MHz, IICCLK = 3.125MHz, Tx Clock = 0.195MHz
     */
    IICCON = (1<<7) | (0<<6) | (1<<5) | (0xf);  // 0xaf

    IICADD  = 0x3C;     // S3C24xx slave address = [7:1] 	0x78 << 1 = 0x3C
    IICSTAT = 0x10;     // I2C串行输出使能(Rx/Tx)
}

/*
 * 主机发送
 * slvAddr : 从机地址，buf : 数据存放的缓冲区，len : 数据长度 
 */
void i2c_write(unsigned int slvAddr, unsigned char *buf, int len)
{
    g_tS3C24xx_I2C.Pt   = 0;        // 索引值初始为0
    g_tS3C24xx_I2C.pData = buf;     // 保存缓冲区地址
    g_tS3C24xx_I2C.DataCount = len; // 传输长度
    
    IICDS   = slvAddr;
    IICSTAT = 0xf0;         // 主机发送，启动
    
    /* 等待直至数据传输完毕 */    
    while (g_tS3C24xx_I2C.DataCount != -1);
}
        
/*
 * I2C中断服务程序
 * 根据剩余的数据长度选择继续传输或者结束
 */
void i2c_int_handle(void)
{
    unsigned int i2c_stat,i;

    // 清中断
    SRCPND = BIT_IIC;
    INTPND = BIT_IIC;
    
    i2c_stat  = IICSTAT; 

	if(i2c_stat & 0x8){ 
		printf("Bus arbitration failed\n"); 
	}

	if((g_tS3C24xx_I2C.DataCount--) == 0)
	{
		// 下面两行用来恢复I2C操作，发出P信号
		IICSTAT = 0xd0;
		IICCON  = 0xaf;
		Delay(10000);  // 等待一段时间以便P信号已经发出
	}

	IICDS = g_tS3C24xx_I2C.pData[g_tS3C24xx_I2C.Pt++];

	// 将数据写入IICDS后，需要一段时间才能出现在SDA线上
	Delay(10);  

	IICCON = 0xaf;      // 恢复I2C传输
}

/*
 * 延时函数
 */
void Delay(int time)
{
    for (; time > 0; time--);
}