dsp28_clock.c

时钟芯片 DS1302 在DSP(2812)环境下的驱动程序

#include "DSP28_Device.h"

/*********************************************************************/
/* 实时时钟模块 时钟芯片型号：DS1302 */
/*********************************************************************/
#define DsIODIR GpioMuxRegs.GPFDIR.bit.GPIOF8
#define DsIO    GpioDataRegs.GPFDAT.bit.GPIOF8
#define DsCLK   GpioDataRegs.GPFDAT.bit.GPIOF10
#define DsRST   GpioDataRegs.GPFDAT.bit.GPIOF11
#define io_out  1
#define io_in   0

/******************************************************************** 
*
* 名称: v_RTInputByte
* 说明: 
* 功能: 往DS1302写入1Byte数据
* 调用:
* 输入: ucDa 写入的数据 
* 返回值: 无
***********************************************************************/
void v_RTInputByte(unsigned char ucDa) 
{ 
 unsigned char i,i2;
 unsigned char wr_reg, wr_reg0;
 EALLOW;	
 DsIODIR=io_out;
 EDIS;
 wr_reg = ucDa;
 for(i=8; i>0; i--)
 {
  wr_reg0= wr_reg&0x01;
  DsIO   = wr_reg0; /*相当于汇编中的 RRC */
  for(i2=0;i2<2;i2++){NOP;}  //tdc>200ns
  DsCLK  = 1;
  for(i2=0;i2<10;i2++){NOP;} //tclk>4us
  DsCLK  = 0;
  for(i2=0;i2<10;i2++){NOP;} //tclk>4us
  wr_reg = wr_reg >> 1; 
 } 
 DsIODIR=io_in;
}
/******************************************************************** 
*
* 名称: unsigned char uc_RTOutputByte
* 说明: 
* 功能: 从DS1302读取1Byte数据
* 调用: 
* 输入: 
* 返回值: ACC
***********************************************************************/
unsigned char uc_RTOutputByte(void) 
{ 
 unsigned char i2;
 unsigned char i;
 unsigned char rd_reg=0;
 unsigned char rd_reg0=0;
 EALLOW;	
 DsIODIR=io_in;
 EDIS;
 for(i=0; i<8; i++)
 {
  rd_reg0 = DsIO;
  rd_reg += rd_reg0*(1<<i); /*相当于汇编中的 RRC */
  for(i2=0;i2<2;i2++){NOP;}//tdc>200ns
  DsCLK = 1;
  for(i2=0;i2<10;i2++){NOP;}//tclk>4us
  DsCLK = 0;
  for(i2=0;i2<10;i2++){NOP;}//tclk>4us
 } 
 return(rd_reg); 
}
/******************************************************************** 
*
* 名称: v_W1302
* 说明: 先写地址，后写命令/数据
* 功能: 往DS1302写入数据
* 调用: v_RTInputByte() 
* 输入: ucAddr: DS1302地址, ucDa: 要写的数据
* 返回值: 无
***********************************************************************/
void v_W1302(unsigned char ucAddr, unsigned char ucDa)
{
 unsigned char i2;
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(ucAddr); /* 地址，命令 */
 //for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(ucDa); /* 写1Byte数据*/
 DsCLK = 1;
 DsRST =0;
} 
/******************************************************************** 
*
* 名称: uc_R1302
* 说明: 先写地址，后读命令/数据
* 功能: 读取DS1302某地址的数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: ucAddr: DS1302地址
* 返回值: ucDa :读取的数据
***********************************************************************/
unsigned char uc_R1302(unsigned char ucAddr)
{
 unsigned char i2;
 unsigned char ucDa;
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(ucAddr); /* 地址，命令 */
 //for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 ucDa = uc_RTOutputByte(); /* 读1Byte数据 */
 DsCLK = 1;
 DsRST =0;
 return(ucDa);
}

/******************************************************************** 
*
* 名称: v_StartClock
* 说明: 时钟开始运行
* 功能: 打开晶震,打开充电功能
* 调用: v_W1302().  uc_R1302()
* 输入:   无
* 返回值: 无
***********************************************************************/
void v_StartClock(void)
{
  unsigned char val;
  val = uc_R1302(0x81);//读秒数据
  val &= 0x7f;         //打开晶振
  v_W1302(0x8e,0x00);  //开放DS1302写保护
  v_W1302(0x80,val);   //打开晶振
  v_W1302(0x90,0xa5);  //打开充电二极管
  v_W1302(0x8e,0x80);  //使能DS1302写保护
}


/******************************************************************** 
*
* 名称: uc_BcdToDec
* 说明: BCD码转十进制数
* 功能: BCD码转十进制数
* 调用:  
* 输入: BCD码
* 返回值: 十进制数
***********************************************************************/
unsigned char uc_BcdToDec(unsigned char val)
{
 val=(val>>4)*10+(val&0x0f);
 return(val);
}


/******************************************************************** 
*
* 名称: uc_DecToBcd
* 说明: 十进制数转BCD码
* 功能: 十进制数转BCD码
* 调用:  
* 输入: 十进制数
* 返回值: BCD码
***********************************************************************/
unsigned char uc_DecToBcd(unsigned char val)
{
 val=(val/10)*16+val%10;
 return(val);
}


/******************************************************************** 
*
* 名称: v_BurstW1302T
* 说明: 先写地址，后写数据(时钟多字节方式)
* 功能: 往DS1302写入时钟数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 控制
* 8Byte (十进制) 1B 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_BurstW1302T(unsigned char *pSecDa)
{
 unsigned char i,i2;
 v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(0xbe); /* 0xbe:时钟多字节写命令 */
 for (i=8;i>0;i--) /*8Byte = 7Byte 时钟数据 + 1Byte 控制*/
 {
  v_RTInputByte(uc_DecToBcd(*pSecDa));/* 写1Byte数据*/
  pSecDa++;
 }
 DsCLK = 1;
 DsRST =0;
} 
/******************************************************************** 
*
* 名称: v_BurstR1302T
* 说明: 先写地址，后读命令/数据(时钟多字节方式)
* 功能: 读取DS1302时钟数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pSecDa: 时钟数据地址 格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: ucDa :读取的数据
***********************************************************************/
void v_BurstR1302T(unsigned char *pSecDa)
{
 unsigned char i,i2;
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(0xbf); /* 0xbf:时钟多字节读命令 */
 for (i=8; i>0; i--) 
 {
  *pSecDa =uc_BcdToDec(uc_RTOutputByte()); /* 读1Byte数据 */
  pSecDa++;
 }
 DsCLK = 1;
 DsRST =0;
}
/******************************************************************** 
*
* 名称: v_BurstW1302R
* 说明: 先写地址，后写数据(寄存器多字节方式)
* 功能: 往DS1302寄存器数写入数据(多字节方式)
* 调用: v_RTInputByte() 
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstW1302R(unsigned char *pReDa)
{
 unsigned char i,i2;
 v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(0xfe); /* 0xbe:时钟多字节写命令 */
 for (i=31;i>0;i--) /*31Byte 寄存器数据 */
 {
  v_RTInputByte(*pReDa); /* 写1Byte数据*/
  pReDa++;
 }
 DsCLK = 1;
 DsRST =0;
} 
/******************************************************************** 
*
* 名称: uc_BurstR1302R
* 说明: 先写地址，后读命令/数据(寄存器多字节方式)
* 功能: 读取DS1302寄存器数据
* 调用: v_RTInputByte() , uc_RTOutputByte()
* 输入: pReDa: 寄存器数据地址
* 返回值: 无
***********************************************************************/
void v_BurstR1302R(unsigned char *pReDa)
{
 unsigned char i,i2;
 DsRST = 0;
 DsCLK = 0;
 DsRST = 1;
 for(i2=0;i2<10;i2++){NOP;}  //tcc,最小4US
 v_RTInputByte(0xff); /* 0xbf:时钟多字节读命令 */
 for (i=31; i>0; i--) /*31Byte 寄存器数据 */
 {
  *pReDa = uc_RTOutputByte(); /* 读1Byte数据 */
  pReDa++;
 }
 DsCLK = 1;
 DsRST =0;
}
/******************************************************************** 
*
* 名称: v_Set1302
* 说明: 
* 功能: 设置初始时间
* 调用: v_W1302() 
* 输入: pSecDa: 初始时间地址。初始时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_Set1302(unsigned char *pSecDa) 
{
 unsigned char i;
 unsigned char ucAddr = 0x80; 
 v_W1302(0x8e,0x00); /* 控制命令,WP=0,写操作?*/
 for(i =7;i>0;i--)
 { 
  v_W1302(ucAddr,*pSecDa); /* 秒 分 时 日 月 星期 年 */
  pSecDa++;
  ucAddr +=2;
 }
 v_W1302(0x8e,0x80); /* 控制命令,WP=1,写保护?*/
}
/******************************************************************** 
*
* 名称: v_Get1302
* 说明: 
* 功能: 读取DS1302当前时间
* 调用: uc_R1302() 
* 输入: ucCurtime: 保存当前时间地址。当前时间格式为: 秒 分 时 日 月 星期 年 
* 7Byte (BCD码) 1B 1B 1B 1B 1B 1B 1B
* 返回值: 无
***********************************************************************/
void v_Get1302(unsigned char ucCurtime[]) 
{
 unsigned char i;
 unsigned char ucAddr = 0x81;
 for (i=0;i<7;i++)
 {
  ucCurtime[i] = uc_R1302(ucAddr);/*格式为: 秒 分 时 日 月 
  星期 年 */
  ucAddr += 2;
 }
}