e2prom.c

lpc2136芯片的硬件全部功能示例程序

/*************************************************************
		WPD800 Cat1161驱动 E2PROM
		修改历史    2007-10-11  zaken create version 1.0


*************************************************************/
#include "main.h"
#include "sample.h"
#include "E2PROM.h"

volatile uint8 	I2C_sla;			/* I2C器件从地址 					*/
volatile uint32	I2C_suba;			/* I2C器件内部子地址 				*/
volatile uint8 	I2C_suba_num;		/* I2C子地址字节数					*/
volatile uint8 	*I2C_buf;        	/* 数据缓冲区指针  					*/
volatile uint32 I2C_num;			/* 要读取/写入的数据个数 			*/
volatile uint8 	I2C_end;			/* I2C总线结束标志：结束总线是置1 	*/
volatile uint8 	I2C_suba_en;		/* 	子地址控制。
										0--子地址已经处理或者不需要子地址
										1--读取操作
										2--写操作
									*/
void I2C_Process(void);
bool Eeprom_Init(DWORD speed)
{
	static int status;
	int i;
	BYTE testbuf[10];
	//初始化I2C接口
	if (speed > 400000)
		speed = 400000;
	PINSEL0 = (PINSEL0 & (~0xF0)) | 0x50; 	// 不影响其它管脚连接
	I2SCLH = (Fpclk/speed + 1) / 2;						/* 设定I2C时钟 						*/
	I2SCLL = (Fpclk/speed)/2;
	I2CONCLR = 0x2C;
	I2CONSET = 0x40;
	for(i=0;i<10;i++)
		testbuf[i]=0x10+i;
	status=Eeprom_Write(testbuf,0,10);
	for(i=0;i<10;i++)
		testbuf[i]=0;	
	status=Eeprom_Read(testbuf,0,10);
									/* 使能主I2C 						*/
	return TRUE;	
}
//E2PROM写入处理
bool Eeprom_Write(BYTE *pSrc,WORD addr,WORD size)
{
	DWORD timer;//计算执行时间
	I2C_sla=EEPROM_ADDR;
	if(addr>255)
		I2C_suba_num=2;
	else
		I2C_suba_num=1;
	I2C_suba   	 	= addr;
	I2C_buf     = pSrc;										/* 数据 				*/
	I2C_num     = size;										/* 数据个数 			*/
	I2C_suba_en = 2;										/* 有子地址，写操作 	*/
	I2C_end     = 0;
	timer_start();//计算执行时间
	I2C_Process();
	timer=get_timer();//clk
	timer=clk_to_time(timer);//ms
	return (I2C_end==1);
}
//E2PROM读取处理
//流程：
// 先假写
//
//
//
//
//
//
//
//
bool Eeprom_Read(BYTE *pSrc,WORD addr,WORD size)
{
	DWORD timer;//计算执行时间
	I2C_sla=EEPROM_ADDR|0x01;
	if(addr>255)
		I2C_suba_num=2;
	else
		I2C_suba_num=1;
	I2C_suba   	 	= addr;
	I2C_buf     = pSrc;										/* 数据 				*/
	I2C_num     = size;										/* 数据个数 			*/
	I2C_suba_en = 1;										/* 有子地址，写操作 	*/
	I2C_end     = 0;
	timer_start();//计算执行时间
	I2C_Process();
	timer=get_timer();//clk
	timer=clk_to_time(timer);//ms
	return (I2C_end==1);
}
void I2C_Process(void)
{
		/* 清除STA,SI,AA标志位 */
		I2CONCLR = 	(1 << 2)|	/* AA 	*/
					(1 << 3)|	/* SI 	*/
					(1 << 5);	/* STA 	*/
		
		/* 置位STA,启动I2C总线 */
		I2CONSET = 	(1 << 5)|	/* STA 	*/
					(1 << 6);	/* I2CEN*/
	while(I2C_end==0)
	{	
	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;
	}
	}
}