/*************************************************************************** * __________ __ ___. * 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 #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 int wakeup_h; static int wakeup_m; static bool alarm_enabled = false; void rtc_set_alarm(int h, int m) { wakeup_h = h; wakeup_m = m; } void rtc_get_alarm(int *h, int *m) { *h = wakeup_h; *m = wakeup_m; } void rtc_alarm_poweroff(void) { if(!alarm_enabled) return; struct tm tm; rtc_read_datetime(&tm); int hours = wakeup_h - tm.tm_hour; int mins = wakeup_m - 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_irq(); ascodec_write(AS3543_WAKEUP, seconds); seconds >>= 8; ascodec_write(AS3543_WAKEUP, seconds); seconds >>= 8; seconds |= 1<<7; /* enable bit */ ascodec_write(AS3543_WAKEUP, seconds); /* write our desired time of wake up to detect power-up from RTC */ ascodec_write(AS3543_WAKEUP, wakeup_h); ascodec_write(AS3543_WAKEUP, wakeup_m); /* enable hearbeat watchdog */ ascodec_write(AS3514_SYSTEM, (1<<3) | (1<<0)); /* In_Cntr : disable hearbeat 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) { (void) release_alarm; /* 3 first reads give the 23 bits counter and enable bit */ ascodec_read(AS3543_WAKEUP); /* bits 7:0 */ ascodec_read(AS3543_WAKEUP); /* bits 15:8 */ if(!(ascodec_read(AS3543_WAKEUP) & (1<<7))) /* enable bit */ return false; /* subsequent reads give the 16 bytes static SRAM */ wakeup_h = ascodec_read(AS3543_WAKEUP); wakeup_m = ascodec_read(AS3543_WAKEUP); struct tm tm; rtc_read_datetime(&tm); /* were we powered up at the programmed time ? */ return wakeup_h == tm.tm_hour && wakeup_m == 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; }