/*************************************************************************** * __________ __ ___. * Open \______ \ ____ ____ | | _\_ |__ _______ ___ * Source | _// _ \_/ ___\| |/ /| __ \ / _ \ \/ / * Jukebox | | ( <_> ) \___| < | \_\ ( <_> > < < * Firmware |____|_ /\____/ \___ >__|_ \|___ /\____/__/\_ \ * \/ \/ \/ \/ \/ * $Id$ * * Copyright (C) 2002 by Linus Nielsen Feltzing, Uwe Freese, Laurent Baum * * 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 "config.h" #include "i2c.h" #include "rtc.h" #include "kernel.h" #include "system.h" #include "pcf50606.h" #include "timefuncs.h" /* Values which each disable one alarm time register */ static const char alarm_disable[] = { 0x7f, 0x7f, 0x3f, 0x07, 0x3f, 0x1f, 0xff }; void rtc_init(void) { rtc_check_alarm_started(false); } int rtc_read_datetime(struct tm *tm) { unsigned int i; int rc, oldlevel; unsigned char buf[7]; oldlevel = disable_irq_save(); rc = pcf50606_read_multiple(0x0a, buf, sizeof(buf)); restore_irq(oldlevel); for (i = 0; i < sizeof(buf); i++) buf[i] = BCD2DEC(buf[i]); tm->tm_sec = buf[0]; tm->tm_min = buf[1]; tm->tm_hour = buf[2]; tm->tm_mday = buf[4]; tm->tm_mon = buf[5] - 1; tm->tm_yday = 0; /* Not implemented for now */ #ifdef IRIVER_H300_SERIES /* Special kludge to coexist with the iriver firmware. The iriver firmware stores the date as 1965+nn, and allows a range of 1980..2064. We use 1964+nn here to make leap years work correctly, so the date will be one year off in the iriver firmware but at least won't be reset anymore. */ tm->tm_year = buf[6] + 64; #else /* Not IRIVER_H300_SERIES */ tm->tm_year = buf[6] + 100; #endif /* IRIVER_H300_SERIES */ set_day_of_week(tm); return rc; } int rtc_write_datetime(const struct tm *tm) { unsigned int i; int rc, oldlevel; unsigned char buf[7]; buf[0] = tm->tm_sec; buf[1] = tm->tm_min; buf[2] = tm->tm_hour; buf[3] = tm->tm_wday; buf[4] = tm->tm_mday; buf[5] = tm->tm_mon + 1; #ifdef IRIVER_H300_SERIES /* Iriver firmware compatibility kludge, see rtc_read_datetime(). */ buf[6] = tm->tm_year - 64; #else /* Not IRIVER_H300_SERIES */ buf[6] = tm->tm_year - 100; #endif /* IRIVER_H300_SERIES */ for (i = 0; i < sizeof(buf); i++) buf[i] = DEC2BCD(buf[i]); oldlevel = disable_irq_save(); rc = pcf50606_write_multiple(0x0a, buf, sizeof(buf)); restore_irq(oldlevel); return rc; } /** * Checks the PCF interrupt 1 register bit 7 to see if an alarm interrupt has * triggered since last we checked. */ bool rtc_check_alarm_flag(void) { int oldlevel = disable_irq_save(); int rc = pcf50606_read(0x02) & 0x80; restore_irq(oldlevel); return rc; } /** * Enables or disables the alarm. * The Ipod bootloader clears all PCF interrupt registers and always enables * the "wake on RTC" bit on OOCC1, so we have to rely on other means to find * out if we just woke from an alarm. * Return value is always false for us. */ void rtc_enable_alarm(bool enable) { int oldlevel = disable_irq_save(); if (enable) { /* Tell the PCF to ignore everything but second, minute and hour, so * that an alarm will trigger the next time the alarm time occurs. */ pcf50606_write_multiple(0x14, alarm_disable + 3, 4); /* Unmask the alarm interrupt (might be unneeded) */ pcf50606_write(0x5, pcf50606_read(0x5) & ~0x80); /* Make sure wake on RTC is set when shutting down */ pcf50606_write(0x8, pcf50606_read(0x8) | 0x10); } else { /* We use this year to indicate a disabled alarm. If you happen to live * around this time and are annoyed by this, feel free to seek out my * grave and do something nasty to it. */ pcf50606_write(0x17, 0x99); /* Make sure we don't wake on RTC after shutting down */ pcf50606_write(0x8, pcf50606_read(0x8) & ~0x10); } restore_irq(oldlevel); return; } /** * Check if alarm caused unit to start. */ bool rtc_check_alarm_started(bool release_alarm) { static bool run_before = false, alarm_state; bool rc; if (run_before) { rc = alarm_state; alarm_state &= ~release_alarm; } else { char rt[3], at[3]; /* The Ipod bootloader seems to read (and thus clear) the PCF interrupt * registers, so we need to find some other way to detect if an alarm * just happened */ int oldlevel = disable_irq_save(); pcf50606_read_multiple(0x0a, rt, 3); pcf50606_read_multiple(0x11, at, 3); restore_irq(oldlevel); /* If alarm time and real time match within 10 seconds of each other, we * assume an alarm just triggered */ rc = alarm_state = rt[1] == at[1] && rt[2] == at[2] && (rt[0] - at[0]) <= 10; run_before = true; } return rc; } /* set alarm time registers to the given time (repeat once per day) */ void rtc_set_alarm(int h, int m) { int oldlevel = disable_irq_save(); /* Set us to wake at the first second of the specified time */ pcf50606_write(0x11, 0); /* Convert to BCD */ pcf50606_write(0x12, ((m/10) << 4) | m%10); pcf50606_write(0x13, ((h/10) << 4) | h%10); restore_irq(oldlevel); } /* read out the current alarm time */ void rtc_get_alarm(int *h, int *m) { char buf[2]; int oldlevel = disable_irq_save(); pcf50606_read_multiple(0x12, buf, 2); restore_irq(oldlevel); /* Convert from BCD */ *m = ((buf[0] >> 4) & 0x7)*10 + (buf[0] & 0x0f); *h = ((buf[1] >> 4) & 0x3)*10 + (buf[1] & 0x0f); }