eeprom.c

2440 开发板的测试程序。包括uart,iic,lcd

/*
 create by hzh, to support wr/rd parameters to/from eeprom
*/
#include "def.h"
#include "2440addr.h"
#include "2440lib.h"

#define	SLV_ADDR_24C02	0xa0

void Delay( int ms );

static volatile int iic_ints;
static void __irq IicInt( void )
{
	ClearPending( BIT_IIC );
	iic_ints++;
}

static int iic_wr( U8 data , U8 cnt )
{
	int i, c;

	rIICCON &= ~0x10;		//Resume IIC operation to send

	if ( cnt )
		rIICDS = data;

	i = 3;	//3ms
	//while(!(rIICCON&0x10)&&i--) Delay(1);
	c = iic_ints;
	while ( iic_ints == c && i-- )
		Delay( 1 );
	//rIICCON &= ~0x10;

	if ( !i )
		return -1;

	return ( rIICSTAT & 1 ) ? -1 : 0;
}

static int iic_rd( U8* pBuf )
{
	int i, c;

	rIICCON &= ~0x10;		//Resumes IIC operation to receive
	i = 3;	//3ms
	//while(!(rIICCON&0x10)&&i--) Delay(1);
	c = iic_ints;
	while ( iic_ints == c & i-- )
		Delay( 1 );

	if ( i )
	{
		*pBuf = rIICDS;
		return 0;
	}

	return -1;
}

static int seek_iic_device( U8 slvAddr )
{
	int i;

	i = 40;	//400ms
	while ( i-- )
	{
		rIICDS = slvAddr;
		rIICSTAT = 0xf0;	//MasTx,Start
		if ( !iic_wr( 0 , 0 ) )
			break;
		Delay( 10 );
	}
	rIICSTAT = 0xd0;		//Stop MasTx condition
	return i < 40;
}

//8 bits register address only
static int write_eeprom( U8 slvAddr , U8 addr , U8 data )
{
	int i;
	U8 ch[3];

	ch[1] = addr;
	ch[2] = data;

	rIICDS = slvAddr;
	rIICSTAT = 0xf0;		//MasTx,Start
	for ( i = 0; i < 3; i++ )
		if ( iic_wr( ch[i] , i ) )
			break;
	rIICSTAT = 0xd0;		//Stop MasTx condition
	if ( i < 3 )
		return -1;

	i = 200;	//200ms
	while ( i-- )
	{
		Delay( 1 );
		rIICDS = slvAddr;
		rIICSTAT = 0xf0;
		if ( !iic_wr( 0 , 0 ) )
			break;
	}
	rIICSTAT = 0xd0;

	return i ? 0 : -1;
}

//8 bits register address only
static int read_eeprom( U8 slvAddr , U8 addr , U8* pBuf )
{
	int i;
	U8 ch[2];

	ch[1] = addr;

	rIICDS = slvAddr;
	rIICSTAT = 0xf0;		//MasTx,Start
	for ( i = 0; i < 2; i++ )
		if ( iic_wr( ch[i] , i ) )
			break;
	if ( i < 2 )
	{
		rIICSTAT = 0xd0;	//Stop MasTx condition
		return -1;
	}

	rIICDS = slvAddr;
	rIICSTAT = 0xb0;		//Master Rx,Start
	if ( !iic_wr( 0 , 0 ) )		//wait ack
		i = iic_rd( pBuf );	
	rIICSTAT = 0x90;		//Stop MaxRx condition

	return i;
}

static void init_iic_op( void )
{
	rCLKCON |= 1 << 16;

	rGPEUP |= 0xc000;   			   //Pull-up disable
	rGPECON &= ~0xf0000000;
	rGPECON |= 0xa0000000;  			//GPE15:IICSDA , GPE14:IICSCL 

	//Enable ACK, Prescaler IICCLK=PCLK/16, Enable interrupt, Transmit clock value Tx clock=IICCLK/16
	// If PCLK 50.7MHz, IICCLK = 3.17MHz, Tx Clock = 0.198MHz
	//rIICCON = (1<<7) | (1<<6) | (1<<5) | (0);	//IICCLK=PCLK/512=97K
	//just read one byte, don't enable ack!
	rIICCON = ( 0 << 7 ) | ( 1 << 6 ) | ( 1 << 5 ) | ( 0 );	//IICCLK=PCLK/512=97K

	rIICSTAT = 0x10;					//IIC bus data output enable(Rx/Tx)
	rIICADD = 0x10; 				   //2410 slave address = [7:1]

	pISR_IIC = ( unsigned ) IicInt;
	EnableIrq( BIT_IIC );
}

static void end_iic_op( void )
{
	rCLKCON &= ~( 1 << 16 );
	DisableIrq( BIT_IIC );
}

int write_24c02( U8* pBuf )
{
	int i;

	U8 dat[256];

	for ( i = 0; i < 256; i++ )
		dat[i] = 255 - i;

	init_iic_op();

	for ( i = 0; i < 256; i++ )
	{
		//if(seek_iic_device(SLV_ADDR_24C02))
		//	break;
		//if(write_eeprom(SLV_ADDR_24C02, i, pBuf[i]))
		if ( write_eeprom( SLV_ADDR_24C02 , i , dat[i] ) )
			break;
	}

	end_iic_op();

	Uart_Printf( "Write EEPROM %s!\n" , ( i < 256 ) ? "Fail" : "Success" );

	return i < 256;
}

int read_24c02( U8* pBuf )
{
	int i;

	init_iic_op();

	for ( i = 0; i < 256; i++ )
	{
		if ( read_eeprom( SLV_ADDR_24C02 , i , pBuf + i ) )
			break;
	}

	end_iic_op();

	//Uart_Printf("Read EEPROM %s!\n", (i<256)?"Fail":"Success");

	return i < 128;
}