stm32 RTC时间

#include "stm32f10x_rtc.h"
#include "stm32f10x_bkp.h"
#include "stm32f10x_pwr.h"

void RTC_Init(void)
{ 
 //启用PWR和BKP的时钟（from APB1）          
 RCC_APB1PeriphClockCmd(RCC_APB1Periph_PWR | RCC_APB1Periph_BKP, ENABLE);           
 //后备域解锁          
 PWR_BackupAccessCmd(ENABLE);           
 //备份寄存器模块复位         
 BKP_DeInit();           
 //外部32.768K其哟偶那个         
 RCC_LSEConfig(RCC_LSE_ON);         
 //等待稳定          
 while (RCC_GetFlagStatus(RCC_FLAG_LSERDY) == RESET);
 //RTC时钟源配置成LSE（外部32.768K）         
 RCC_RTCCLKConfig(RCC_RTCCLKSource_LSE);           
 //RTC开启          
 RCC_RTCCLKCmd(ENABLE);           
 //开启后需要等待APB1时钟与RTC时钟同步，才能读写寄存器         
 RTC_WaitForSynchro();           
 //读写寄存器前，要确定上一个操作已经结束         
 RTC_WaitForLastTask();           
 //设置RTC分频器，使RTC时钟为1Hz          
 //RTC period = RTCCLK/RTC_PR = (32.768 KHz)/(32767+1)         
 RTC_SetPrescaler(32767);            
 //等待寄存器写入完成         
 RTC_WaitForLastTask();           
 //使能秒中断
 RTC_ITConfig(RTC_IT_SEC, ENABLE);               
 //等待写入完成          
 RTC_WaitForLastTask();
}

//初始化函数，开机调用

void RTC_Config(void) 
{          
 //我们在BKP的后备寄存器1中，存了一个特殊字符0x1234
    //第一次上电或后备电源掉电后，该寄存器数据丢失，
    //表明RTC数据丢失，需要重新配置
 if (BKP_ReadBackupRegister(BKP_DR1) != 0x1234)
 {
  //重新配置RTC
  RTC_Init();
  //配置完成后，向后备寄存器中写特殊字符0x1234
  BKP_WriteBackupRegister(BKP_DR1, 0x1234);
 }
 else
 {
  //若后备寄存器没有掉电，则无需重新配置RTC
  //这里我们可以利用RCC_GetFlagStatus()函数查看本次复位类型
  if (RCC_GetFlagStatus(RCC_FLAG_PORRST) != RESET)
  {
    //这是上电复位
  }
  else if (RCC_GetFlagStatus(RCC_FLAG_PINRST) != RESET)
  {
    //这是外部RST管脚复位
  }
  //清除RCC中复位标志
  RCC_ClearFlag();
  //使能秒中断
  RTC_ITConfig(RTC_IT_SEC, ENABLE);
  //等待操作完成
  RTC_WaitForLastTask();
 }
 //如果程序要修改RTC时钟，必须打开PWR模块和BKP模块的时钟，并解除BKP模块的写保护！！
 // Enable PWR and BKP clocks
 RCC_APB1PeriphClockCmd(RCC_APB1Periph_PWR | RCC_APB1Periph_BKP, ENABLE);
 // Allow access to BKP Domain
 PWR_BackupAccessCmd(ENABLE);
#ifdef RTCClockOutput_Enable
 // Disable the Tamper Pin
 BKP_TamperPinCmd(DISABLE);
 // Enable RTC Clock Output on Tamper Pin
 BKP_RTCOutputConfig(BKP_RTCOutputSource_CalibClock);
#endif
        return;
}

 

//下面是使用rtc读取和设置时间，以2000年1月1日0时0分0秒为基点，计算要设置和读取的对比时间，所以可设置年份为2000到2135年。

//年份输入和获得都是减去2000的，月份从1到12，日期也是从1开始

void RTC_SetTime(uchar year, uchar month, uchar day, uchar hour, uchar min, uchar sec)
{
 uchar c1 ;
 ulong days = 0 ;
 for(c1=0; c1<year && year < 100; ++c1)
 {
  days += 365 ;
  ulong y = c1 + 2000 ; //从两千年算起
  if(y%4==0 || (y%400!=0 && y%100==0)) //闰年
   days += 1 ;
 }
 
 if(month > 0)
  -- month ;
 uchar daycnt[] = {31,28,31,30,31,30,31,31,30,31,30,31} ;
 ulong y = year + 2000 ;
 if(y%4==0 || (y%400!=0 && y%100==0)) //闰年
  daycnt[1] = 29 ;
 for(c1=0; c1<month && c1<12; ++c1)
  days += daycnt[c1] ;
 
 if(day > 0)
  days += day - 1 ;
 
 ulong cnt = days * 24 * 60 * 60 + hour * 60 * 60 + min * 60 + sec ;
 
 RTC_SetCounter(cnt) ;
}

void RTC_GetTime(uchar *date)
{
 uchar c1 ;
 ulong l1 = RTC_GetCounter() ;
 ulong days = l1 / (24 * 60 * 60) ;
 l1 %= (24 * 60 * 60) ;
 
 for(c1=0; ; ++c1)
 {
  ulong temp = 365 ;
  ulong y = c1 + 2000 ;     //从两千年算起
  if(y%4==0 || (y%400!=0 && y%100==0)) //闰年
   temp += 1 ;
  
  if(days >= temp) days -= temp ;
  else break ;
 }
 date[0] = c1 ;//年
 
 uchar daycnt[] = {31,28,31,30,31,30,31,31,30,31,30,31} ;
 ulong y = date[0] + 2000 ;
 if(y%4==0 || (y%400!=0 && y%100==0)) //闰年
  daycnt[1] = 29 ;
 
 for(c1=0; c1<12; ++c1)
 {
  if(days >= daycnt[c1])
   days -= daycnt[c1] ;
  else
   break ;
 }
 date[1] = c1 + 1 ;//月
 
 date[2] = days + 1 ;//日
 
 date[3] = l1 / (60 * 60) ;//时
 l1 %= (60 * 60) ;
 
 date[4] = l1 / 60 ;//分
 l1 %= 60 ;
 
 date[5] = l1 ;//秒
 
 ulong m = date[1], d = date[2] ;//计算星期几，0是星期天，1星期一，其它类推
 if(m <= 2) { m += 12 ; --y ; }
 date[6] = (d+2*m+3*(m+1)/5+y+y/4-y/100+y/400)%7+1 ;//星期
}

 

需要注意的是，硬件晶振不起作用的时候，就会卡在等待稳定

 while (RCC_GetFlagStatus(RCC_FLAG_LSERDY) == RESET);