#include "EEPROM.H"          
#include "CTRL.H"
#include "modbus.h"
unsigned short PrintBuf[SECTOR_SIZE];     //写入EEPROM缓冲区
u16 EEHalfWord_Read(u32 EEAddr) 
{                      
    return *(vu16*)EEAddr;
}

void EESector_Erase(u32 EEAddr)  
{    
    EEAddr=EEAddr/(SECTOR_SIZE<<1)*(SECTOR_SIZE<<1);
    FLASH_ErasePage(EEAddr);  
}

                                                     
void EEHalfWord_Write(u32 EEAddr,u16 EEData)   
{                                        
    FLASH_ProgramHalfWord( EEAddr, EEData)  ;  
}

//pBuf  结构体首指针
//cLen  结构体长度
//iAddr 保存地址偏移,相对于保存扇区首地址的偏移
UCHAR EEWriteStruct(void* pBuf,UINT cLen,ULONG iAddr)     
{
    UCHAR result = 0;
    u32 i,j,k,ProtectedPages;
    u32  Addr_Sector_Base = STARTADDR;
    u32  Addr;
    u32  iLen       = cLen>>1;       //双字节个数
    u32  cBufCnt   ;
    u32  iBufStart ;
    //开始保存的地址
    Addr        = STARTADDR+iAddr/(SECTOR_SIZE<<1)*(SECTOR_SIZE<<1);         //起始保存的扇区首地址
    iAddr      %= (SECTOR_SIZE<<1);
    cBufCnt    = (cLen+iAddr)/(SECTOR_SIZE<<1)
                    +(((cLen+iAddr)%(SECTOR_SIZE<<1))>0?1:0);   //不足一个算一个         //要写入几次?
    iBufStart  = (iAddr>>1)%SECTOR_SIZE;         //计算第一个起始保存扇区的第几个short
    
    i = j = k = ProtectedPages = 0;
    
        //全部锁定则退出编程
    Flash_ProtectMode(&ProtectedPages );  //
    if(0==ProtectedPages)
        return result;
    for(j=0;j<cBufCnt;j++){
    //将目标扇区读出
        for(i=0;i<SECTOR_SIZE;i++)
            PrintBuf[i] = EEHalfWord_Read(Addr+(SECTOR_SIZE<<1)*j+(i<<1));
    //将结构体写入目标缓冲                     
        for(i=(j==0?iBufStart:0);i<SECTOR_SIZE;i++,k++) {
            PrintBuf[i] = *((vu16*)pBuf+k);                //
            if(--iLen==0){  
               __nop();
               break;}     
        }    
        //讲缓冲写入扇区
        //擦除Flash区 
        FLASH_Unlock();
        EESector_Erase(Addr+j*(SECTOR_SIZE<<1));                                //擦除扇区
        //写入内容;
        for(i=0;i<SECTOR_SIZE;i++)
        {
             EEHalfWord_Write(Addr+(SECTOR_SIZE<<1)*j+(i<<1),PrintBuf[i]);   
        }           
        FLASH_Lock();
        result = 0xFF;
    }
    return result;
}
 

void  EEReadStruct(void* pBuf,UINT cLen,ULONG Addr)
{
    UINT i;
    
    unsigned short  *pcBuf = pBuf;
     cLen>>=1;
    Addr+=STARTADDR;
    for(i=0;i<cLen;i++)
    {
        pcBuf[i]=EEHalfWord_Read(Addr+(i<<1));
    }
}

/**************************************************************************************
    Save Ied Id    to X5043
    address=0,
    1st    byte=0x55--IedID active,
    2nd    byte=IedId,
    3rd    byte=non
**************************************************************************************/
void SaveIdToEE(UCHAR cID)
{                              
    unsigned short buf[3]={EEPROM_ID_ACTIVE,0,0};
    buf[1] = cID;
    EEWriteStruct(buf,sizeof(buf),EEPROM_ID_ADDR);
    IED.cID=cID;; 
}
/**************************************************************************************
    Read Ied Id    from X5043
    address=0,
    1st    byte=0x55-IedID    active,
    2nd    byte=IedId,
    3rd    byte=non
**************************************************************************************/
void ReadIdFromEE(void)
{ 
    unsigned short  buf[3];
    EEReadStruct(buf,sizeof(buf),EEPROM_ID_ADDR);          
    
    if(buf[0]==EEPROM_ID_ACTIVE)
         IED.cID=buf[1];        
    else
        IED.cID=0xFF;    //0xff    
}

/**************************************************************************************
   读取校准系数
**************************************************************************************/ 
int ReadDACCoffFromEE(void)
{
    int result = 0;
    _DAC_Param   para ;  
    unsigned short ValidCRC ;
    EEReadStruct(&para,sizeof(para),EEPROM_COFF_ADDR); 
    ValidCRC = crc16((uint8_t*)&para,sizeof(para.Ka)+
                           sizeof(para.C)+
                           sizeof(para.Reserve)+ 
                           sizeof(para.Reserve2)); 
    if(ValidCRC==para.ValidCRC) 
    {
        memcpy(&IED.DAC_Param,&para,sizeof(IED.DAC_Param));
        result = ~0L;
    }
    return result;
}
/**************************************************************************************
   写取校准系数
**************************************************************************************/ 
void WrtieADCCoffToEE(void)
{ 
    unsigned short ValidCRC ;
    ValidCRC = crc16((uint8_t*)&IED.DAC_Param,sizeof(IED.DAC_Param.Ka)+
                           sizeof(IED.DAC_Param.C)+
                           sizeof(IED.DAC_Param.Reserve)+ 
                           sizeof(IED.DAC_Param.Reserve2)); 
    IED.DAC_Param.ValidCRC = ValidCRC;
    EEWriteStruct(&IED.DAC_Param,sizeof(IED.DAC_Param),EEPROM_COFF_ADDR);   
}

void SaveEvalCnt(UINT cnt)
{                    
    unsigned short  buf[3]={EEPROM_ID_ACTIVE,0,0};
    ReadIdFromEE();
    ///buf[1] = IED.nId;
    buf[2] = cnt;
    EEWriteStruct(buf,sizeof(buf),EEPROM_ID_ADDR);     
}

UCHAR ReadEvalCnt()
{                    
    unsigned short  buf[3]={EEPROM_ID_ACTIVE,0,0};
    ReadIdFromEE();                                        
    return buf[2];
}

void Flash_ProtectMode(u32 *ProtectedPages)
{
    vu32 WRPR_Value;
      FLASH_ClearFlag(FLASH_FLAG_BSY | FLASH_FLAG_EOP|FLASH_FLAG_PGERR |FLASH_FLAG_WRPRTERR);

      /* Get pages write protection status */
      WRPR_Value = FLASH_GetWriteProtectionOptionByte();
      *ProtectedPages = WRPR_Value & 0x000000C0;

#ifdef WriteProtection_Disable
      if (ProtectedPages == 0x00)
      {// Pages are write protected  

        // Disable the write protection 
        FLASHStatus = FLASH_EraseOptionBytes();

        // Generate System Reset to load the new option byte values  
        NVIC_GenerateSystemReset();
      }
#else
     #ifdef WriteProtection_Enable
  
      if (ProtectedPages != 0x00)
      {    // Pages not write protected  
        #ifdef USE_STM3210B_EVAL
            // Enable the pages write protection  
        FLASHStatus = FLASH_EnableWriteProtection(FLASH_WRProt_Pages24to27 |FLASH_WRProt_Pages28to31);    
        #else   
        // Enable the pages write protection  
        FLASHStatus = FLASH_EnableWriteProtection(FLASH_WRProt_Pages12to13 |FLASH_WRProt_Pages14to15);
        #endif
        // Generate System Reset to load the new option byte values  
        NVIC_GenerateSystemReset();
      }
     #endif
#endif
}