cec1e476e6
This fix disables MCLK before powerdown-for-wakeup. git-svn-id: svn://svn.rockbox.org/rockbox/trunk@28435 a1c6a512-1295-4272-9138-f99709370657
309 lines
7.6 KiB
C
309 lines
7.6 KiB
C
/***************************************************************************
|
|
* __________ __ ___.
|
|
* Open \______ \ ____ ____ | | _\_ |__ _______ ___
|
|
* Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ /
|
|
* Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < <
|
|
* Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \
|
|
* \/ \/ \/ \/ \/
|
|
* $Id$
|
|
*
|
|
* Copyright (C) 2007 by Barry Wardell
|
|
*
|
|
* This program is free software; you can redistribute it and/or
|
|
* modify it under the terms of the GNU General Public License
|
|
* as published by the Free Software Foundation; either version 2
|
|
* of the License, or (at your option) any later version.
|
|
*
|
|
* This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY
|
|
* KIND, either express or implied.
|
|
*
|
|
****************************************************************************/
|
|
#include <stdbool.h>
|
|
#include "config.h"
|
|
#include "rtc.h"
|
|
#include "as3514.h"
|
|
#include "ascodec.h"
|
|
|
|
/* AMS Sansas start counting from Jan 1st 1970 instead of 1980 (not as3525v2) */
|
|
#if (CONFIG_CPU==AS3525)
|
|
#define SECS_ADJUST 315532800 /* seconds between 1970-1-1 and 1980-1-1 */
|
|
#elif (CONFIG_CPU==AS3525v2)
|
|
#define SECS_ADJUST 315532800 - (2*365*24*3600) - 26*(24*3600) + 7*3600 + 25*60
|
|
#else
|
|
#define SECS_ADJUST 0
|
|
#endif
|
|
|
|
#define MINUTE_SECONDS 60
|
|
#define HOUR_SECONDS 3600
|
|
#define DAY_SECONDS 86400
|
|
#define WEEK_SECONDS 604800
|
|
#define YEAR_SECONDS 31536000
|
|
#define LEAP_YEAR_SECONDS 31622400
|
|
|
|
/* Days in each month */
|
|
static unsigned int days_in_month[] = {31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31};
|
|
|
|
static inline bool is_leapyear(int year)
|
|
{
|
|
if( ((year%4)==0) && (((year%100)!=0) || ((year%400)==0)) )
|
|
return true;
|
|
else
|
|
return false;
|
|
}
|
|
|
|
#ifdef HAVE_RTC_ALARM /* as3543 */
|
|
static struct {
|
|
unsigned int seconds; /* total seconds to wakeup */
|
|
int hour; /* wake-up hour */
|
|
int min; /* wake-up minute */
|
|
bool enabled; /* alarm enabled or not */
|
|
unsigned char flag; /* flag used by the OF */
|
|
} alarm;
|
|
|
|
void rtc_set_alarm(int h, int m)
|
|
{
|
|
alarm.hour = h;
|
|
alarm.min = m;
|
|
}
|
|
|
|
void rtc_get_alarm(int *h, int *m)
|
|
{
|
|
*h = alarm.hour;
|
|
*m = alarm.min;
|
|
}
|
|
|
|
/* Reads the AS3543 wakeup register */
|
|
static void alarm_read(void)
|
|
{
|
|
unsigned char buf[6];
|
|
unsigned int i;
|
|
int oldstatus;
|
|
|
|
/* read raw data */
|
|
oldstatus = disable_irq_save();
|
|
ascodec_read(0);
|
|
for (i = 0; i < sizeof(buf); i++) {
|
|
buf[i] = ascodec_read(AS3543_WAKEUP);
|
|
}
|
|
restore_irq(oldstatus);
|
|
|
|
/* decode */
|
|
alarm.seconds = buf[0] | (buf[1] << 8) | ((buf[2] & 0x7F) << 16);
|
|
alarm.enabled = buf[2] & (1 << 7);
|
|
alarm.flag = buf[3];
|
|
alarm.hour = buf[4];
|
|
alarm.min = buf[5];
|
|
}
|
|
|
|
/* Writes the AS3543 wakeup register */
|
|
static void alarm_write(void)
|
|
{
|
|
unsigned char buf[6];
|
|
unsigned int i;
|
|
int oldstatus;
|
|
|
|
/* encode */
|
|
buf[0] = alarm.seconds & 0xFF;
|
|
buf[1] = (alarm.seconds >> 8) & 0xFF;
|
|
buf[2] = ((alarm.seconds >> 16) & 0x7F) | (alarm.enabled ? (1 << 7) : 0);
|
|
buf[3] = alarm.flag;
|
|
buf[4] = alarm.hour;
|
|
buf[5] = alarm.min;
|
|
|
|
/* write raw data */
|
|
oldstatus = disable_irq_save();
|
|
ascodec_read(0);
|
|
for (i = 0; i < sizeof(buf); i++) {
|
|
ascodec_write(AS3543_WAKEUP, buf[i]);
|
|
}
|
|
restore_irq(oldstatus);
|
|
}
|
|
|
|
void rtc_alarm_poweroff(void)
|
|
{
|
|
if(!alarm.enabled)
|
|
return;
|
|
|
|
struct tm tm;
|
|
rtc_read_datetime(&tm);
|
|
int hours = alarm.hour - tm.tm_hour;
|
|
int mins = alarm.min - tm.tm_min;
|
|
if(mins < 0)
|
|
{
|
|
mins += 60;
|
|
hours -= 1;
|
|
}
|
|
if(hours < 0)
|
|
hours += 24;
|
|
|
|
uint32_t seconds = hours*3600 + mins*60;
|
|
if(seconds == 0)
|
|
seconds = 24*3600;
|
|
|
|
seconds -= tm.tm_sec;
|
|
|
|
/* disable MCLK, it is a wakeup source and prevents proper shutdown */
|
|
CGU_AUDIO = (2 << 0) | (1 << 11);
|
|
CGU_PLLBSUP = (1 << 2) | (1 << 3);
|
|
|
|
/* write wakeup register */
|
|
alarm.seconds = seconds;
|
|
alarm.enabled = true;
|
|
alarm_write();
|
|
|
|
/* enable heartbeat watchdog */
|
|
ascodec_write(AS3514_SYSTEM, (1<<3) | (1<<0));
|
|
|
|
/* In_Cntr : disable heartbeat source */
|
|
ascodec_write_pmu(0x1a, 4, ascodec_read_pmu(0x1a, 4) & ~(3<<2));
|
|
|
|
while(1);
|
|
}
|
|
|
|
void rtc_enable_alarm(bool enable)
|
|
{
|
|
alarm.enabled = enable;
|
|
}
|
|
|
|
bool rtc_check_alarm_started(bool release_alarm)
|
|
{
|
|
/* read wakeup register and check if alarm was enabled */
|
|
alarm_read();
|
|
if (!alarm.enabled) {
|
|
return false;
|
|
}
|
|
|
|
alarm.enabled = !release_alarm;
|
|
alarm_write();
|
|
|
|
struct tm tm;
|
|
rtc_read_datetime(&tm);
|
|
|
|
/* were we powered up at the programmed time ? */
|
|
return alarm.hour == tm.tm_hour && alarm.min == tm.tm_min;
|
|
}
|
|
|
|
bool rtc_check_alarm_flag(void)
|
|
{
|
|
/* We don't need to do anything special if it has already fired */
|
|
return false;
|
|
}
|
|
#endif /* HAVE_RTC_ALARM */
|
|
|
|
void rtc_init(void)
|
|
{
|
|
}
|
|
|
|
int rtc_read_datetime(struct tm *tm)
|
|
{
|
|
char tmp[4];
|
|
int i, year, mday, hour, min;
|
|
unsigned int seconds;
|
|
|
|
/* RTC_AS3514's slave address is 0x46*/
|
|
for (i = 0; i < 4; i++){
|
|
tmp[i] = ascodec_read(AS3514_RTC_0 + i);
|
|
}
|
|
seconds = tmp[0] + (tmp[1]<<8) + (tmp[2]<<16) + (tmp[3]<<24);
|
|
seconds -= SECS_ADJUST;
|
|
|
|
/* Convert seconds since Jan-1-1980 to format compatible with
|
|
* get_time() from firmware/common/timefuncs.c */
|
|
|
|
/* weekday */
|
|
tm->tm_wday = ((seconds % WEEK_SECONDS) / DAY_SECONDS + 2) % 7;
|
|
|
|
/* Year */
|
|
year = 1980;
|
|
while (seconds >= LEAP_YEAR_SECONDS)
|
|
{
|
|
if (is_leapyear(year)){
|
|
seconds -= LEAP_YEAR_SECONDS;
|
|
} else {
|
|
seconds -= YEAR_SECONDS;
|
|
}
|
|
|
|
year++;
|
|
}
|
|
|
|
if (is_leapyear(year)) {
|
|
days_in_month[1] = 29;
|
|
} else {
|
|
days_in_month[1] = 28;
|
|
if(seconds>YEAR_SECONDS){
|
|
year++;
|
|
seconds -= YEAR_SECONDS;
|
|
}
|
|
}
|
|
tm->tm_year = year%100 + 100;
|
|
|
|
/* Month */
|
|
for (i = 0; i < 12; i++)
|
|
{
|
|
if (seconds < days_in_month[i]*DAY_SECONDS){
|
|
tm->tm_mon = i;
|
|
break;
|
|
}
|
|
|
|
seconds -= days_in_month[i]*DAY_SECONDS;
|
|
}
|
|
|
|
/* Month Day */
|
|
mday = seconds/DAY_SECONDS;
|
|
seconds -= mday*DAY_SECONDS;
|
|
tm->tm_mday = mday + 1; /* 1 ... 31 */
|
|
|
|
/* Hour */
|
|
hour = seconds/HOUR_SECONDS;
|
|
seconds -= hour*HOUR_SECONDS;
|
|
tm->tm_hour = hour;
|
|
|
|
/* Minute */
|
|
min = seconds/MINUTE_SECONDS;
|
|
seconds -= min*MINUTE_SECONDS;
|
|
tm->tm_min = min;
|
|
|
|
/* Second */
|
|
tm->tm_sec = seconds;
|
|
|
|
return 7;
|
|
}
|
|
|
|
int rtc_write_datetime(const struct tm *tm)
|
|
{
|
|
int i, year;
|
|
unsigned int year_days = 0;
|
|
unsigned int month_days = 0;
|
|
unsigned int seconds = 0;
|
|
|
|
year = 2000 + tm->tm_year - 100;
|
|
|
|
if(is_leapyear(year)) {
|
|
days_in_month[1] = 29;
|
|
} else {
|
|
days_in_month[1] = 28;
|
|
}
|
|
|
|
/* Number of days in months gone by this year*/
|
|
for(i = 0; i < tm->tm_mon; i++){
|
|
month_days += days_in_month[i];
|
|
}
|
|
|
|
/* Number of days in years gone by since 1-Jan-1980 */
|
|
year_days = 365*(tm->tm_year-100+20) + (tm->tm_year-100-1)/4 + 6;
|
|
|
|
/* Convert to seconds since 1-Jan-1980 */
|
|
seconds = tm->tm_sec
|
|
+ tm->tm_min*MINUTE_SECONDS
|
|
+ tm->tm_hour*HOUR_SECONDS
|
|
+ (tm->tm_mday-1)*DAY_SECONDS
|
|
+ month_days*DAY_SECONDS
|
|
+ year_days*DAY_SECONDS;
|
|
seconds += SECS_ADJUST;
|
|
|
|
/* Send data to RTC */
|
|
for (i=0; i<4; i++){
|
|
ascodec_write(AS3514_RTC_0 + i, ((seconds >> (8 * i)) & 0xff));
|
|
}
|
|
return 1;
|
|
}
|