Diff: DS1307.cpp

Revision:

10:8c0c306cee03

Parent:

9:5627b407e097

--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/DS1307.cpp	Wed Jan 31 11:50:07 2018 +0000
@@ -0,0 +1,278 @@
+#include "mbed.h"
+#include "DS1307.h"
+
+#ifndef DEBUG
+//#define DEBUG
+#endif
+//#include "debug.h"
+
+const char *DS1307::m_weekDays[] = { "Saturday", "Sunday", "Monday", "Tuesday", "Wednesday", "Thursday", "Friday" };
+
+
+DS1307::DS1307(I2C * i2c)
+{
+    //  Create a new I2C object
+    m_rtc = i2c;
+    if (m_rtc == NULL)
+        error("Rtc_Ds1307");
+
+    // Set the frequency to standard 100kHz
+    m_rtc->frequency(100000);
+}
+
+DS1307::~DS1307()
+{
+//    if (m_rtc != NULL)
+//        delete m_rtc;
+}
+
+bool DS1307::setTime(Time_rtc& time, bool start, bool thm)
+{
+    char buffer[7];
+//    INFO("reading clock registers to write the new time : %d:%d:%d\n", time.hour, time.min, time.sec);
+    if (!read(0,buffer,7)) {
+//        ERR("Failed to read from RTC\n");
+        return false;
+    }
+    //  Now update only the time part (saving the existing flags)
+    if (start) {
+        buffer[0] &= 0x7F;
+    } else {
+        buffer[0] |= 0x80;
+    }
+    buffer[0] = (buffer[0]&0x80) | (decimalToBcd(time.sec)& 0x7f);
+    buffer[1] = decimalToBcd(time.min);
+    if (thm) {
+        //  AM PM format
+        buffer[2] = (buffer[2]& 196) | (time.hour>12 ? (0x20 | ((decimalToBcd(time.hour-12)))) : decimalToBcd(time.hour));
+    } else {
+        // 24 hours format
+        buffer[2] = (buffer[2]& 196) | (decimalToBcd(time.hour) & 0x3F);
+    }
+    buffer[3] = time.wday;
+    buffer[4] = decimalToBcd(time.date);
+    buffer[5] = decimalToBcd(time.mon);
+    buffer[6] = decimalToBcd(time.year-2000);
+//    INFO("Writing new time and date data to RTC\n");
+    if (!write(0, buffer, 7) ) {
+//        ERR("Failed to write the data to RTC!\n");
+        return false;
+    }
+    return true;
+}
+
+bool DS1307::getTime(Time_rtc& time)
+{
+    char buffer[7];
+    bool thm = false;
+
+//    INFO("Getting time from RTC\n");
+    if (!read(0, buffer, 7) ) {
+        //  Failed to read
+//        ERR("Failed to read from RTC\n");
+        return false;
+    }
+    thm = ((buffer[2] & 64) == 64);
+    time.sec = bcdToDecimal(buffer[0]&0x7F);
+    time.min = bcdToDecimal(buffer[1]);
+    if (thm) {
+        // in 12-hour-mode, we need to add 12 hours if PM bit is set
+        time.hour = DS1307::bcdToDecimal( buffer[2] & 31 );
+        if ((buffer[2] & 32) == 32)
+            time.hour += 12;
+    } else {
+        time.hour = DS1307::bcdToDecimal( buffer[2] & 63 );
+    }
+    time.wday = buffer[3];
+    time.date = DS1307::bcdToDecimal( buffer[4]);
+    time.mon = DS1307::bcdToDecimal( buffer[5]);
+    time.year = DS1307::bcdToDecimal(buffer[6]) + 2000;   //  plus hundret is because RTC is giving the years since 2000, but std c struct tm needs years since 1900
+
+    return true;
+}
+
+
+bool DS1307::startClock()
+{
+    char strtStop;
+
+//    INFO ("Reading clock start/stop register value\n");
+    if (!read(0, &strtStop, 1)) {
+//        ERR("Failed to read clock start stop register !\n");
+        return false;
+    }
+
+    strtStop &= 0x7F;
+
+//    INFO("Writing back start/stop register value\n");
+    if (!write(0, &strtStop, 1)) {
+//        ERR("Failed to write the start stop register !\n");
+        return false;
+    }
+
+//    INFO("Start/stop register value successfully written\n");
+    return true;
+}
+
+bool DS1307::stopClock()
+{
+    char strtStop;
+
+//    INFO ("Reading clock start/stop register value\n");
+    if (!read(0, &strtStop, 1)) {
+//        ERR("Failed to read clock start stop register !\n");
+        return false;
+    }
+
+    strtStop |= 0x80;
+
+//    INFO("Writing back start/stop register value\n");
+    if (!write(0, &strtStop, 1)) {
+//        ERR("Failed to write the start stop register !\n");
+        return false;
+    }
+
+//    INFO("Start/stop register value successfully written\n");
+    return true;
+}
+
+bool DS1307::setSquareWaveOutput(bool ena, SqwRateSelect_t rs)
+{
+    char reg;
+//    INFO("Reading register value first\n");
+
+    if (!read(7,&reg, 1)) {
+//        ERR("Failed to read register value !\n");
+        return false;
+    }
+//    INFO("[Reg:0x07] = %02x\n", reg);
+
+    //  preserve the OUT control bit while writing the frequency and enable bits
+    reg = (reg & 0x80) | (ena ? 0x10 : 0) | ((char)rs & 0x03);
+
+//    INFO("Writing back register value\n");
+//    INFO("[Reg:0x07] = %02x\n", reg);
+
+    if (!write(7, &reg, 1)) {
+//        ERR("Failed to write register value !\n");
+        return false;
+    }
+
+//    INFO("Successfully changed the square wave output.\n");
+    return true;
+}
+
+void DS1307::setLocalTime()
+{
+    Time_rtc t;   //  query time from device
+    getTime(t);   //  sync the time with MBED RTC
+    struct tm now = {t.sec, t.min, t.hour, t.date, t.mon-1, t.year-1900};
+    time_t epoch = mktime(&now);
+    set_time(epoch);
+}
+
+bool DS1307::read(int address, char *buffer, int len)
+{
+    char buffer2[2] = {(char)address, 0};
+
+//    m_rtc->start();
+    if (m_rtc->write(0xd0, buffer2, 1) != 0) {
+//        ERR("Failed to write register address on rtv!\n");
+        m_rtc->stop();
+        return false;
+    }
+    if (m_rtc->read(0xd0, buffer, len) != 0) {
+//        ERR("Failed to read register !\n");
+        return false;
+    }
+    m_rtc->stop();
+
+//    INFO("Successfully read %d registers from RTC\n", len);
+    return true;
+}
+
+bool DS1307::write(int address, char *buffer, int len)
+{
+    char buffer2[10];
+    buffer2[0] = address&0xFF;
+    for (int i = 0 ; i < len ; i++)
+        buffer2[i+1] = buffer[i];
+
+//    m_rtc->start();
+    if (m_rtc->write(0xd0, buffer2, len+1) != 0) {
+//        ERR("Failed to write data to rtc\n");
+        m_rtc->stop();
+        return false;
+    }
+    m_rtc->stop();
+    return true;
+}
+
+
+
+
+RtcCls::RtcCls(I2C * i2c, PinName sqw, bool bUseSqw)
+    : DS1307(i2c), m_sqw(sqw), m_bUseSqw(bUseSqw), m_bAlarmEnabled(false), m_alarmfunc(NULL)
+{
+    Time_rtc t;
+    //  query time from device
+    getTime(t);
+    //  sync the time with MBED RTC
+    struct tm now = {t.sec, t.min, t.hour, t.date, t.mon-1, t.year-1900};
+    m_time = mktime(&now);
+    set_time(m_time);
+
+    //  Only register the callback and start the SQW if requested to do so. Otherwise the system
+    //  will use the MBED built-in RTC.
+    if (m_bUseSqw) {
+        //  start the wave
+        setSquareWaveOutput(true, RS1Hz);
+        //  register callback from now on the time will be maintained by the square wave input
+        m_sqw.rise(this, &RtcCls::_callback);
+    }
+}
+
+void RtcCls::_callback(void)
+{
+//    INFO("Tick!");
+    //  Simply increase the number of seconds
+    m_time++;
+//    if (m_bAlarmEnabled && (m_time == m_alarmTime)) {
+//        if (m_alarmfunc != NULL)
+//            m_alarmfunc();
+//        m_bAlarmEnabled = false;
+//    }
+}
+
+time_t RtcCls::getTime()
+{
+    //  when not using the HW support, we have to query the RTC chip. Other wise we can just return out stored value
+    if (!m_bUseSqw) {
+        Time_rtc t;
+        getTime(t);
+        struct tm now = {t.sec, t.min, t.hour, t.date, t.mon-1, t.year-1900};
+        m_time = mktime(&now);
+//        INFO("getting time %02d.%02d.%04d %02d:%02d:%02d Ticks=%08lx", t.date, t.mon, t.year, t.hour, t.min, t.sec, m_time);
+    } else {
+//        INFO("getting time Ticks=%08lx", m_time);
+    }
+    return m_time;
+}
+
+void RtcCls::setTime(time_t t)
+{
+    Time_rtc tim;
+    struct tm *now;
+    now = localtime(&t);
+
+    tim.sec = now->tm_sec;
+    tim.min = now->tm_min;
+    tim.hour = now->tm_hour;
+    tim.date = now->tm_mday;
+    tim.mon = now->tm_mon+1;
+    tim.year = now->tm_year + 1900;
+    tim.wday = now->tm_wday +1;
+
+    setTime( tim, true, true);
+    set_time(t);
+}