/*******************************************************************************
*File: Main.C
*功能: 使用硬件I2C對EEPROM進行操作,利用中斷方式操作

*******************************************************************************/
#include   "config.h"
#define CAT24WC02 	0xA0         	/*	定義器件地址 */
#define LED1CON 	1<<22     		/*	P0.22引腳控制LED1,低電平點亮 */
/*以下為I2C操作時所需要的變量,在調用I2C子程序前要設置好這些變量 */
volatile uint8 I2C_sla;        //從機地址
volatile uint8 I2C_suba;       //子地址
volatile uint8 *I2C_buf;       //數據緩沖區指針(讀操作時會被更改)
volatile uint8 I2C_num;        //操作數據個數
volatile uint8 I2C_end;        //操作結束標志,為1時表示操作結束,0xFF表示操作失敗
volatile uint8 I2C_suba_en;    //子地址使能控制,讀操作設置為1,寫操作設置為2

void IRQ_I2C(void) __attribute__ ((interrupt));    // Generate Interrupt 

/*******************************************************************************
*名稱: IRQ_I2C()
*功能: I2C中斷,通過判斷I2C狀態字進行相應的操作
*******************************************************************************/
void  IRQ_I2C(void)
{ uint8 sta;
  sta=I2STAT;         //讀出I2C狀態字
  switch(sta)
  { case 0x08:     //已發送起始條件
    if(1==I2C_suba_en)I2DAT=I2C_sla&0xFE; //指定子地址讀時,先寫入地址
    else I2DAT=I2C_sla;   //否則直接發送從機地址
    I2CONCLR=0x28;        //SI=0
    break;
    
    case 0x10:
    I2DAT=I2C_sla;        //重新啟動總線后,發送從機地址
    I2CONCLR=0x28;      //SI=0
    break;
    case 0x18:          //已發送SLA+W,并已接收應答
    if(0==I2C_suba_en)  // 無子地址,則直接發送數據
    { if(I2C_num>0)
    { I2DAT=*I2C_buf++;
      I2CONCLR=0x28;
      I2C_num--;
    }
    else
    { I2CONSET=0x10;  //無數據發送,結束總線
      I2CONCLR=0x28;
      I2C_end=1;       //設置總線操作結束標志
    }
    break;
    }
    if(1==I2C_suba_en)   //發送子地址
    { I2DAT=I2C_suba;
      I2CONCLR=0x28;
    }
    if(2==I2C_suba_en)   //發送子地址
    { I2DAT=I2C_suba;
      I2CONCLR=0x28;
      I2C_suba_en=0;    //子地址已處理
    }
    break;
  case 0x28:              //已發送I2C數據,并接收到應答
    if(0==I2C_suba_en)    //無子地址,則直接發送數據
    { if(I2C_num>0)
    { I2DAT=*I2C_buf++;
    I2CONCLR=0x28;
    I2C_num--;
    }
    else
    { I2CONSET=0x10;   //無數據發送,結束總線
      I2CONCLR=0x28;
      I2C_end=1;
     }
    break;
    }
    if(1==I2C_suba_en)   //若是指定地址讀,則重新啟動總線
    { I2CONSET=0x20;
      I2CONCLR=0x18;
      I2C_suba_en=0;    //子地址已處理
    }
    break; 
case 0x20:
case 0x30:
case 0x38:
  I2CONCLR=0x28;         //總線進入不可尋址從模式
  I2C_end=0xFF;          //總線出錯,設置標志
  break;
case 0x40:               //已發送SLA+R,并已接收到應答
  if(1==I2C_num)         //最后一字節,接收數據后發送非應答信號
  { I2CONCLR=0x2C;        //AA=0,接收到數據后產生非應答
  }
  else                   //接收數據并發送應答信號
  { I2CONSET=0x04;       //AA=1,接收到數據后產生應答
    I2CONCLR=0x28;
  }
  break;
case 0x50:
  *I2C_buf++=I2DAT;  //讀取數據
  I2C_num--;
  if(1==I2C_num)
  { I2CONCLR=0x2C;  
  }
  else
  {I2CONSET=0x04;
   I2CONCLR=0x28;
  }
  break;
case 0x58:
  *I2C_buf++=I2DAT;     //讀取最后一字節數據
  I2CONSET=0x10;        //結束總線
  I2CONCLR=0x28;
  I2C_end=1;
  break;
case 0x48:
  I2CONCLR=0x28;        //總線進入不可尋址從模式
  I2C_end=0xFF;
  break;
}
VICVectAddr=0x00;        //中斷處理結束
}   

/*******************************************************************************
*名稱: ISendStr()
*功能: 使用硬件I2C發送數據
*******************************************************************************/
uint8 ISendStr(void)
{ I2C_end=0;

  I2CONCLR=0x2C;
  I2CONSET=0x40;              //使能I2C
  I2CONSET=0x64;              //設置為主機,并啟動總線
  
  while(0==I2C_end);
  if(1==I2C_end)return(1);
  else return(0);
}
/*******************************************************************************
*名稱: IRcvStr()
*功能: 使用硬件I2C讀取數據
*******************************************************************************/
uint8 IRcvStr(void)
{ if(0==I2C_num)return(0);
  I2C_end=0;
  I2CONCLR=0x2C;
  I2CONSET=0x40; //使能I2C
  I2CONSET=0x64;   //設置為主機,并啟動總線
  while(0==I2C_end);
  if(1==I2C_end)return(1);
  else return(0);
}
/*******************************************************************************
*名稱:I2C_Init()
*功能:I2C初始化,包括初始化其中斷為向量IRQ中斷
*******************************************************************************/
void I2C_Init(void)
{ /*設置I2C時鐘為100kHz*/
  I2SCLH=I2SCLL=14;          //晶振為11.0592MHz,Fpclk=2.7648MHz
  /*設置I2C中斷允許*/
  VICIntSelect=0x00000000;     //設置所有通道為IRQ中斷
  VICVectCntl0=0x29;          //I2C通道分配到IRQ Slot0,即優先級最高
  VICVectAddr0=(int)IRQ_I2C;  //設置I2C中斷向量地址
  VICIntEnable=0x0200;            //使能I2C中斷
}
/*******************************************************************************
*名稱: DelayNS()
*功能: 長軟件延時
*******************************************************************************/
void DelayNS(uint32 dly)
{ uint32 i;
  for(;dly>0;dly--)
    for(i=0;i<50000;i++);
}
/*******************************************************************************
*名稱: WrEepromErr()
*功能: 讀寫E2PROM出錯報警,即閃動LED1
*******************************************************************************/
void WrEepromErr(void)
{ while(1)
{ IOSET=LED1CON;
  DelayNS(10);
  IOCLR=LED1CON;
  DelayNS(10);
}
}
/*******************************************************************************
*名稱: main()
*功能: 向E2PROM寫入10字節數據,然后讀出判斷是否正確寫入
*******************************************************************************/
int main(void)
{  uint8  i;
   uint8  data_buf[30];
   PINSEL0=0x00000050;              //設置I/O口工作模式,使用I2C
   PINSEL1=0x00000000;
   IODIR=LED1CON;                  //設置LED1控制口為輸出,其它I/O為輸入
   I2C_Init();                    //I2C初始化
   for (i=0;i<10;i++)data_buf[i]=i+'0';
   I2C_sla=CAT24WC02;
   I2C_suba=0x00;
   I2C_suba_en=2;
   I2C_buf=data_buf;
   I2C_num=10;
   ISendStr();             //在0x00地址處寫入10字節數據
   DelayNS(1);             //等待寫周期結束
   for(i=0;i<10;i++)data_buf[i]=0;
   I2C_sla=CAT24WC02+1;
   I2C_suba=0x00;
   I2C_suba_en=1;
   I2C_buf=data_buf;
   I2C_num=10;
   IRcvStr();             //在0x00地址處讀出10字節數據
   /*校驗讀出的數據,若不正確則閃爍LED報警*/
   for(i=0;i<10;i++)
   { if(data_buf[i]!=(i+'0'))WrEepromErr();
   }
   IOCLR=LED1CON;    //點亮LED1
   while(1);
   //return(0);
}