// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

// File name    : rtc_drv.c

// Version      : V0.1

// ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

#include "rtc_drv.h"

#include "cpm_reg.h"

#include "uart.h"

#include "pci_drv.h"

#define RTC_WCLK_MAX    10000000//10MHz

UINT32 g_rtc_int_sta = 0;

/*******************************************************************************

* Function Name  : RTC_ISR

* Description    : RTC中断处理

* Input          : None

*

* Output         : None

* Return         : None

******************************************************************************/

//void PMU_RTC_IRQHandler(void)

//{

//	UINT32 prc1r;

//	UINT8  alarm_wakeup_flg = 1;

//	prc1r = RTC->RTC_PRC1R;

//	//printf("\r\nRTC INT[0x%08x]\r\n", prc1r);

//	if (((prc1r&Ala_intf) == Ala_intf) && ((prc1r&Ala_IEN) == Ala_IEN))//alarm interrupt

//	{

//		RTC->RTC_PRC1R |= Ala_intf;

//		g_rtc_int_sta |= Ala_intf;

//		alarm_wakeup_flg = 0;

//		printf("RTC Alarm\r\n");

//	}

//	if(((prc1r&Day_intf) == Day_intf) && ((prc1r&Day_IEN) == Day_IEN))//day interrupt

//	{

//		RTC->RTC_PRC1R |= Day_intf;

//		g_rtc_int_sta |= Day_intf;

//		alarm_wakeup_flg = 0;

//	}

//	if(((prc1r&Hou_intf) == Hou_intf) && ((prc1r&Hou_IEN) == Hou_IEN))//hour interrupt

//	{

//		RTC->RTC_PRC1R |= Hou_intf;

//		g_rtc_int_sta |= Hou_intf;

//		alarm_wakeup_flg = 0;

//	}

//	if(((prc1r&Min_intf) == Min_intf) && ((prc1r&Min_IEN) == Min_IEN))//minute interrupt

//	{

//		RTC->RTC_PRC1R |= Min_intf;

//		g_rtc_int_sta |= Min_intf;

//		alarm_wakeup_flg = 0;

//	}

//	if(((prc1r&Sec_intf) == Sec_intf) && ((prc1r&Sec_IEN) == Sec_IEN))//second interrupt

//	{

//		//tm tim;

//		RTC->RTC_PRC1R |= Sec_intf;

//		g_rtc_int_sta |= Sec_intf;

//		//printf("RTC Second\r\n");

//		//RTC_GetTime(&tim);

//		//printf("RTC Second INT[%d]\r\n", tim.second);

//		alarm_wakeup_flg = 0;

//	}

//	if (alarm_wakeup_flg)

//	{

//		printf("\r\nRTC alarm wakeup from sleep mode\r\n");

//		RTC->RTC_PRKEYR = 0x5aa55aa5;//输入key

//		RTC->RTC_PRC1R &= ~Ala_IEN;

//		RTC->RTC_PRC1R &= ~Dir;//set dir = 0;

//	}

//}

/*******************************************************************************

* Function Name  : RTC_Init

* Description    : RTC初始化

* Input          : None

*

* Output         : None

* Return         : None

******************************************************************************/

void RTC_Init(UINT8 clk_sel)

{

	UINT32 rtc_wclk_div = 0;

	if(clk_sel == INTERNAL_CLK_SEL)

	{

		//write enable key

		PCI->PCI_WRITEEN = 0x40000000;

		PCI->PCI_WRITEEN = 0x80000000;

		PCI->PCI_WRITEEN = 0xC0000000;

		PCI->PCI_WRITEEN = 0xC000003F;//write enable

		PCI->PCI_RTCIER  = 0x00040001;  //RTC Interface Enable

		while((PCI->PCI_RTCIER&0x80000001)!=0x80000001);  //RTC Interface Enable Delay Match

		PCI->PCI_DETPCR |= 0x80770000;	//RTC32K Clock Enable

		PCI->PCI_IRCCR = 0x84;

		RTC->RTC_PRENR = 0x0100;	//disable PMU_RTC 5

		RTC->RTC_PRENR = 0x0300;

	}

	rtc_wclk_div = g_sys_clk/RTC_WCLK_MAX;

	if (rtc_wclk_div >= 1)

		rtc_wclk_div--;

	//Update RTC Counter(function case Dir=0)

	NVIC_Init(3, 3, PMU_RTC_IRQn, 2);//开RTC中断

	RTC->RTC_PRKEYR = 0x5aa55aa5;//输入key

	RTC->RTC_PRC1R &= (~WCLK_DIV_MASK);

	RTC->RTC_PRC1R |= (rtc_wclk_div<<3);//8分频

	RTC->RTC_PRC1R &= ~Dir;//set dir = 0;

}

/*******************************************************************************

* Function Name  : RTC_SetTime

* Description    : 设置RTC初值

* Input          :  - t：tm结构体

*                        t->day:设置RTC的day值

*                        t->hour:设置RTC的hour值

*                        t->minute:设置RTC的minute值

*                        t->second:设置RTC的second值

*

* Output         : None

* Return         : None

******************************************************************************/

void RTC_SetTime(tm t)

{

	RTC->RTC_PRT1R = t.day;

	RTC->RTC_PRT2R = (t.hour<<16)|(t.minute<<8)|t.second;

	RTC->RTC_PRC1R = (RTC->RTC_PRC1R & (~RTC_SEL_MASK)) | (RTC_SEL_MASK & RTC_RISING_EDGE_INT);

	//RTC->RTC_PRC1R |= Sec_IEN;

//	printf("t.day = %d\r\n", t.day);

//	printf("t.hour = %d\r\n", t.hour);

//	printf("t.minute = %d\r\n", t.minute);

//	printf("t.second = %d\r\n", t.second);

}

/*******************************************************************************

* Function Name  : RTC_SetAlarm

* Description    : 设置RTC初值

* Input          :  - t：tm结构体，设置alarm计数器的值

*                   - AlarmMod：alarm的模式

*                               DAY_ALARM：day报警

*                               HOUR_ALARM：hour报警

*                               MINUTE_ALARM：minute报警

*                               SECOND_ALARM：second报警

*                               ALL_ALARM：day、hour、minute、second报警

*

* Output         : None

* Return         : None

******************************************************************************/

void RTC_SetAlarm(tm t, UINT8 AlarmMod)

{

	switch(AlarmMod)

	{

		case DAY_ALARM:

			RTC->RTC_PRA1R = AlaD_en|t.day;

			break;

		case HOUR_ALARM:

			RTC->RTC_PRA2R = AlaH_en|(t.hour<<16);

			break;

		case MINUTE_ALARM:

			RTC->RTC_PRA2R = AlaM_en|(t.minute<<8);

			break;

		case SECOND_ALARM:

			RTC->RTC_PRA2R = AlaS_en|t.second;

			break;

		case ALL_ALARM:

		{

			RTC->RTC_PRA1R = AlaD_en|t.day;

			RTC->RTC_PRA2R = AlaS_en|AlaM_en|AlaH_en|(t.hour<<16)|(t.minute<<8)|t.second;

//			printf("t.day = %d\r\n", t.day);

//			printf("t.hour = %d\r\n", t.hour);

//			printf("t.minute = %d\r\n", t.minute);

//			printf("t.second = %d\r\n", t.second);

			break;

		}

		default:

			break;

	}

	RTC->RTC_PRC1R = (RTC->RTC_PRC1R & (~RTC_SEL_MASK)) | (RTC_SEL_MASK & RTC_FALLING_EDGE_INT);

	//RTC->RTC_PRC1R = (RTC->RTC_PRC1R & (~RTC_SEL_MASK)) | (RTC_SEL_MASK & RTC_LOW_LEVEL_INT);

	RTC->RTC_PRC1R |= Ala_IEN;

//	printf("RTC->RTC_PRC1R = %08x\r\n", RTC->RTC_PRC1R);

}

/*******************************************************************************

* Function Name  : RTC_GetTime

* Description    : 读取RTC计数器值

* Input          : None

*

* Output         : - t：tm结构体指针

*                       t->day:读取的RTC的day值

*                       t->hour:读取的RTC的hour值

*                       t->minute:读取的RTC的minute值

*                       t->second:读取的RTC的second值

* Return         : None

******************************************************************************/

void RTC_GetTime(tm *t)

{

	UINT32 tim;

#if 0

	/*

	tim = RTC->RTC_PRT1R;//RTC_PRTCR

	t->day = (UINT16)(tim&(0x7FFF));

	tim = RTC->RTC_PRT2R;

	t->second = (UINT8)(tim&0xff);

	t->minute = (UINT8)(tim>>8);

	t->hour = (UINT8)(tim>>16);

*/

#else

	tim = RTC->RTC_PRTCR;

	t->day = (UINT16)((tim>>17)&(0x7FFF));

	t->second = (UINT8)((tim)&0x3f);

	t->minute = (UINT8)((tim>>6)&0x3f);

	t->hour = (UINT8)((tim>>12)&0x1f);

#endif

//	printf("t->day = %d\r\n", t->day);

//	printf("t->hour = %d\r\n", t->hour);

//	printf("t->minute = %d\r\n", t->minute);

//	printf("t->second = %d\r\n", t->second);

}