www.pudn.com > uCOS_I2C.rar > I2C.c


 
/****************************************Copyright (c)************************************************** 
**                              四川唐门高新技术开发有限公司 
**                                     研    发    部 
**                                独门暗器之孔雀翎研究室  
** 
**                                http://www.蜀中唐门.com 
** 
**                                   维护健康 信守诚诺 
** 
**--------------文件信息-------------------------------------------------------------------------------- 
**文   件   名: I2c.c 
**创   建   人: 赖皮  
**最后修改日期: 2006年12月21日 
**描        述: μCOS-II下LPC213x的I2c主模式底层驱动  
**               
**--------------历史版本信息---------------------------------------------------------------------------- 
** 创建人: 赖皮  
** 版  本: v1.0 
** 日 期: 2006年12月8日 
** 描 述: 结合ZLG中断方式和uC中间件创建原始版本 
** 
**------------------------------------------------------------------------------------------------------ 
** 修改人: 赖皮  
** 版  本: v1.1 
** 日 期: 2006年12月21日 
** 描 述: 采用信号量满足互斥操作 
** 
**--------------当前版本修订------------------------------------------------------------------------------ 
** 修改人: 赖皮 
** 版  本: v2.0 
** 日 期: 2007年01月26日 
** 描 述: 结合中断方式   根据ATPCS优化原则  减少读写参数 4 
**         原来由邮箱传递更改为查询方式  增加配置文件I2Ccfg.h便于移植 
**------------------------------------------------------------------------------------------------------ 
******************************************************************************************************** 
**--------------当前版本修订------------------------------------------------------------------------------ 
** 修改人:  
** 版  本:  
** 日 期:  
** 描 述:   
**    
**          LAI2005PI@126.com       
**------------------------------------------------------------------------------------------------------ 
********************************************************************************************************/ 
 
#include  "config.h"  
/* 定义用于和I2C中断传递信息的全局变量 */ 
volatile static uint16	I2C_suba;			/* I2C器件内部子地址 				*/ 
volatile static uint8 	I2C_sla;			/* I2C器件从地址 					*/ 
volatile static uint8 	I2C_suba_num;		/* I2C子地址字节数					*/ 
volatile static uint8 	*I2C_buf;        	/* 数据缓冲区指针  					*/ 
volatile static uint8   I2C_num;			/* 要读取/写入的数据个数 			*/ 
volatile static uint8 	I2C_end;			/* I2C总线结束标志:结束总线是置1 	*/ 
volatile static uint8 	I2C_suba_en;		/* 	子地址控制。 
										0--子地址已经处理或者不需要子地址 
										1--读取操作 
										2--写操作 
									*/ 
static OS_EVENT *I2cSem; 
 
/* 
********************************************************************************************************* 
** 函数名称 :I2cInit() 
** 函数功能 :I2C初始化 
** 入口参数 :Fi2c	I2C总线频率(最大400K) 
** 出口参数 :无 
********************************************************************************************************* 
*/  
void I2cInit(uint32 Fi2c) 
{ 
	if (Fi2c > 400000) 
		Fi2c = 400000; 
		 
   	PINSEL0 = (PINSEL0 & 0xffffff0f) | 0x50;    		// 选择管脚为I2c  
   	 
	I2SCLH = (Fpclk/Fi2c + 1) / 2;						// 设定I2C时钟 						 
	I2SCLL = (Fpclk/Fi2c)/2; 
	I2CONCLR = 0x2C; 
	I2CONSET = 0x40;									// 使能主I2C 	 
	 
	I2cSem = OSSemCreate(1);                            // 信号量用于互斥操作总线 					 
} 
 
/* 
********************************************************************************************************** 
** 函数名称:ISendByte() 
** 函数功能:向无子地址器件发送1字节数据。 
** 入口参数:sla		器件地址 
**           dat		要发送的数据 
** 出口参数:返回值为0时表示出错,为1时表示操作正确。 
** 说明:	使用前要初始化好I2C引脚功能和I2C中断,并已使能I2C主模式 
********************************************************************************************************* 
*/ 
uint8  ISendByte(uint8 sla, uint8 dat) 
{  /* 参数设置 */ 
   I2C_sla     = sla;		// 写操作的器件地址 
   I2C_buf     = &dat;		// 待发送的数据 
   I2C_num     = 1;			// 发送1字节数据 
   I2C_suba_en = 0;		 	// 无子地址 
   I2C_end     = 0; 
    
   I2CONCLR = 0x2C; 
   I2CONSET = 0x60;             // 设置为主机,并启动总线 
    
   while(0==I2C_end); 
   if(1==I2C_end) return(1); 
     else return(0); 
} 
 
/* 
********************************************************************************************************* 
** 函数名称:IRcvByte() 
** 函数功能:向无子地址器件读取1字节数据。 
** 入口参数:sla		器件地址 
**           dat		接收数据的变量指针 
** 出口参数:返回值为0时表示操作出错,为1时表示操作正确。 
** 说明:使用前要初始化好I2C引脚功能和I2C中断,并已使能I2C主模式 
********************************************************************************************************* 
*/ 
uint8  IRcvByte(uint8 sla, uint8 *dat) 
{  /* 参数设置 */ 
   I2C_sla     = sla+1;		// 读操作的器件地址 
   I2C_buf     = dat; 
   I2C_num     = 1; 
   I2C_suba_en = 0;			// 无子地址 
   I2C_end     = 0; 
    
   I2CONCLR = 0x2C; 
   I2CONSET = 0x60;         // 设置为主机,并启动总线 
    
   while(0==I2C_end); 
   if(1==I2C_end) return(1); 
     else return(0); 
} 
 
 
/* 
********************************************************************************************************* 
** 函数名称 :I2C_ReadNByte() 
** 函数功能 :从有子地址器件任意地址开始读取N字节数据 
** 入口参数 :	sla			器件从地址 
**				suba_type	子地址结构	1-单字节地址	2-8+X结构	2-双字节地址 
**				suba		器件子地址 
**				s			数据接收缓冲区指针 
**				num			读取的个数 
** 出口参数 :	TRUE		操作成功 
**				FALSE		操作失败 
********************************************************************************************************* 
*/ 
uint8 I2C_ReadNByte (uint8 sla,uint32 suba, uint8 *s, uint32 num) 
{ 
	//uint8 sla=I2Csla; 
	uint8 suba_type=I2Csuba; 
	uint8 err; 
	 
	OSSemPend(I2cSem, 0, &err);		//  等待信号量	I2C可用; 
     
	if (num > 0)	/* 判断num个数的合法性 */ 
	{	/* 参数设置 */ 
		if (suba_type == 1) 
		{	/* 子地址为单字节 */ 
			I2C_sla     	= sla + 1;							/* 读器件的从地址,R=1 	*/ 
			I2C_suba    	= suba;								/* 器件子地址 			*/ 
			I2C_suba_num	= 1;								/* 器件子地址为1字节 	*/ 
		} 
		if (suba_type == 2) 
		{	/* 子地址为2字节 */ 
			I2C_sla     	= sla + 1;							/* 读器件的从地址,R=1 	*/ 
			I2C_suba   	 	= suba;								/* 器件子地址 			*/ 
			I2C_suba_num	= 2;								/* 器件子地址为2字节 	*/ 
		} 
		if (suba_type == 3) 
		{	/* 子地址结构为8+X*/ 
			I2C_sla			= sla + ((suba >> 7 )& 0x0e) + 1;	/* 读器件的从地址,R=1	*/ 
			I2C_suba		= suba & 0x0ff;						/* 器件子地址	 		*/ 
			I2C_suba_num	= 1;								/* 器件子地址为8+x	 	*/ 
		} 
		I2C_buf     = s;										/* 数据接收缓冲区指针 	*/ 
		I2C_num     = num;										/* 要读取的个数 		*/ 
		I2C_suba_en = 1;										/* 有子地址读 			*/ 
		I2C_end     = 0; 
		 
		/* 清除STA,SI,AA标志位 */ 
		I2CONCLR = 	(1 << 2)|	/* AA 		*/ 
					(1 << 3)|	/* SI 		*/ 
					(1 << 5);	/* STA 		*/ 
		 
		/* 置位STA,启动I2C总线 */ 
		I2CONSET = 	(1 << 5)|	/* STA 		*/ 
					(1 << 6);	/* I2CEN 	*/ 
		 
		/* 等待I2C操作完成 */ 
		while (I2C_end == 0); 
				 
	} 
	OSSemPost(I2cSem);				//  发送信号量 
	if (I2C_end == 1) 
		return (TRUE); 
	else 
		return (FALSE);	 
} 
 
/* 
********************************************************************************************************* 
** 函数名称 :I2C_WriteNByte() 
** 函数功能 :向有子地址器件写入N字节数据 
** 入口参数 :	sla			器件从地址 
**				suba_type	子地址结构	1-单字节地址	3-8+X结构	2-双字节地址 
**			  	suba		器件内部物理地址 
**			  	*s			将要写入的数据的指针 
**			  	num			将要写入的数据的个数 
** 出口参数 :	TRUE		操作成功 
**			  	FALSE		操作失败 
********************************************************************************************************* 
*/ 
uint8 I2C_WriteNByte(uint8 sla,uint32 suba, uint8 *s, uint32 num) 
{ 
	//uint8 sla=I2Csla; 
	uint8 suba_type=I2Csuba; 
	uint8 err; 
	 
	OSSemPend(I2cSem, 0, &err);		//  等待信号量	I2C可用; 
	disI2C_WP(); 
     
	if (num > 0)/* 如果读取的个数为0,则返回错误 */ 
	{	/* 设置参数 */	 
		if (suba_type == 1) 
		{	/* 子地址为单字节 */ 
			I2C_sla     	= sla;								/* 读器件的从地址	 	*/ 
			I2C_suba    	= suba;								/* 器件子地址 			*/ 
			I2C_suba_num	= 1;								/* 器件子地址为1字节 	*/ 
		} 
		if (suba_type == 2) 
		{	/* 子地址为2字节 */ 
			I2C_sla     	= sla;								/* 读器件的从地址 		*/ 
			I2C_suba   	 	= suba;								/* 器件子地址 			*/ 
			I2C_suba_num	= 2;								/* 器件子地址为2字节 	*/ 
		} 
		if (suba_type == 3) 
		{	/* 子地址结构为8+X */ 
			I2C_sla			= sla + ((suba >> 7 )& 0x0e);		/* 读器件的从地址		*/ 
			I2C_suba		= suba & 0x0ff;						/* 器件子地址			*/ 
			I2C_suba_num	= 1;								/* 器件子地址为8+X	 	*/ 
		} 
 
		I2C_buf     = s;										/* 数据 				*/ 
		I2C_num     = num;										/* 数据个数 			*/ 
		I2C_suba_en = 2;										/* 有子地址,写操作 	*/ 
		I2C_end     = 0; 
		 
		/* 清除STA,SI,AA标志位 */ 
		I2CONCLR = 	(1 << 2)|	/* AA 	*/ 
					(1 << 3)|	/* SI 	*/ 
					(1 << 5);	/* STA 	*/ 
		 
		/* 置位STA,启动I2C总线 */ 
		I2CONSET = 	(1 << 5)|	/* STA 	*/ 
					(1 << 6);	/* I2CEN*/ 
		 
		/* 等待I2C操作完成 */  
		while (I2C_end == 0); 		 
	} 
	enI2C_WP();	 
	OSSemPost(I2cSem);				//  发送信号量 
	 
	OSTimeDly(OS_TICKS_PER_SEC/100);//	延时10ms等带I2C写完毕 
	 
	if (I2C_end == 1) 
		return (TRUE); 
	else 
		return (FALSE);	 
} 
 
/* 
********************************************************************************************************* 
** 函数名称 :I2C_Exception() 
** 函数名次 :硬件I2C中断服务程序。  
** 入口参数 :无 
** 出口参数 :无 
** 说明     :注意处理子地址为2字节的情况。  
********************************************************************************************************* 
*/ 
void I2C_Exception(void) 
{	/* 读取I2C状态寄存器I2DAT */ 
	/* 按照全局变量的设置进行操作及设置软件标志 */ 
	/* 清除中断逻辑,中断返回 */ 
	 
	switch (I2STAT & 0xF8) 
	{	/* 根据状态码进行相应的处理 */ 
		case 0x08:	/* 已发送起始条件 */				/* 主发送和主接收都有 		*/ 
			/* 装入SLA+W或者SLA+R */ 
		 	if(I2C_suba_en == 1)/* SLA+R */				/* 指定子地址读 			*/ 
		 	{	I2DAT = I2C_sla & 0xFE; 				/* 先写入地址 				*/ 
		 	} 
            else	/* SLA+W */ 
            {  	I2DAT = I2C_sla;        				/* 否则直接发送从机地址 	*/ 
            } 
            /* 清零SI位 */ 
            I2CONCLR =	(1 << 3)|						/* SI 						*/ 
            			(1 << 5);						/* STA 						*/ 
            break; 
             
       	case 0x10:	/*已发送重复起始条件 */ 			/* 主发送和主接收都有 		*/ 
       		/* 装入SLA+W或者SLA+R */ 
       		I2DAT = I2C_sla;							/* 重起总线后,重发从地址 	*/ 
       		I2CONCLR = 0x28;							/* 清零SI,STA */ 
       		break; 
 
		case 0x18: 
       	case 0x28:	/* 已发送I2DAT中的数据,已接收ACK */ 
       		if (I2C_suba_en == 0) 
       		{ 
	       		if (I2C_num > 0) 
	       		{	I2DAT = *I2C_buf++; 
	       			I2CONCLR = 0x28;					/* 清零SI,STA 				*/ 
	       			I2C_num--; 
	       		} 
	       		else	/* 没有数据发送了 */ 
	       		{		/* 停止总线 */ 
	       		  	I2CONSET = (1 << 4);				/* STO 						*/ 
	       			I2CONCLR = 0x28;					/* 清零SI,STA 				*/ 
	       		  	I2C_end = 1;						/* 总线已经停止 			*/ 
	       		} 
       		} 
       		 
            if(I2C_suba_en == 1)	/* 若是指定地址读,则重新启动总线 				*/ 
            {  
            	if (I2C_suba_num == 2) 
            	{	I2DAT = ((I2C_suba >> 8) & 0xff); 
	       			I2CONCLR = 0x28;					/* 清零SI,STA 				*/ 
	       			I2C_suba_num--; 
	       			break;	 
	       		}  
	       		 
	       		if(I2C_suba_num == 1) 
	       		{	I2DAT = (I2C_suba & 0xff); 
	       			I2CONCLR = 0x28;					/* 清零SI,STA 				*/ 
	       			I2C_suba_num--; 
	       			break;	 
	       		} 
	       		 
            	if (I2C_suba_num == 0) 
            	{	I2CONSET = 0x20; 
               		I2CONCLR = 0x08; 
               		I2C_suba_en = 0;     				/* 子地址己处理 			*/ 
               		break; 
               	} 
            } 
             
            if (I2C_suba_en == 2)/* 指定子地址写,子地址尚未指定,则发送子地址 		*/ 
       		{ 
       		 	if (I2C_suba_num > 0) 
            	{	if (I2C_suba_num == 2) 
            		{	I2DAT = ((I2C_suba >> 8) & 0xff); 
            			I2CONCLR = 0x28; 
            			I2C_suba_num--; 
            			break; 
            		} 
            		if (I2C_suba_num == 1) 
            		{	I2DAT    = (I2C_suba & 0xff); 
               			I2CONCLR = 0x28; 
               			I2C_suba_num--; 
               			I2C_suba_en  = 0; 
               			break; 
               		} 
               	} 
             } 
       		break; 
       		   
       case 0x40:	/* 已发送SLA+R,已接收ACK */ 
       		if (I2C_num <= 1)	/* 如果是最后一个字节 */			 
       		{	I2CONCLR = 1 << 2;      				/* 下次发送非应答信号 		*/ 
       		} 
       		else 
       		{ 	I2CONSET = 1 << 2;						/* 下次发送应答信号 		*/ 
       		} 
       		I2CONCLR = 0x28;							/* 清零SI,STA 				*/ 
       		break; 
 
       	case 0x20:	/* 已发送SLA+W,已接收非应答              */ 
       	case 0x30:	/* 已发送I2DAT中的数据,已接收非应答     */ 
       	case 0x38:	/* 在SLA+R/W或数据字节中丢失仲裁         */ 
   		case 0x48:	/* 已发送SLA+R,已接收非应答              */ 
         	I2CONCLR = 0x28; 
            I2C_end = 0xFF;  
       		break;   				 
	 
		case 0x50:	/* 已接收数据字节,已返回ACK */ 
			*I2C_buf++ = I2DAT; 
			I2C_num--; 
			if (I2C_num == 1)/* 接收最后一个字节 */ 
			{  	I2CONCLR = 0x2C;						/* STA,SI,AA = 0 			*/ 
			} 
			else 
			{  	I2CONSET = 0x04;						/* AA=1 					*/ 
			  	I2CONCLR = 0x28; 
			} 
			break; 
		 
		case 0x58:	/* 已接收数据字节,已返回非应答 */ 
			*I2C_buf++ = I2DAT;     					/* 读取最后一字节数据 		*/ 
            I2CONSET = 0x10;        					/* 结束总线 				*/ 
            I2CONCLR = 0x28; 
            I2C_end = 1;  
            break; 
             
      	default: 
      		break; 
	} 
    VICVectAddr = 0x00;              					/* 中断处理结束 			*/ 
}