avr/pcf8583.c

   1 /*
   2  * Date & Time support for Philips PCF8583 RTC
   3  */
   4
   5 #include "common.h"
   6 #include <stdlib.h>
   7 #include "debug.h"
   8 #include "command.h"
   9 #include "rtc.h"
  10 #include "i2c.h"
  11
  12 #define  DEBUG_RTC 0
  13
  14 #define debug_rtc(fmt, args...)                 \
  15         debug_cond(DEBUG_RTC, fmt, ##args)
  16
  17 #define REG_CS          0x00    /* control/status */
  18 #define REG_CSEC        0x01    /* hundredth of a second */
  19 #define REG_SEC         0x02    /* seconds */
  20 #define REG_MIN         0x03    /* minutes */
  21 #define REG_HOUR        0x04    /* hours */
  22 #define REG_YRDATE      0x05    /* year/date */
  23 #define REG_WDMON       0x06    /* weekdays/months */
  24 #define NR_OF_REGS      7
  25
  26
  27 /* ------------------------------------------------------------------------- */
  28
  29 static uint_fast8_t bcd2bin(uint8_t val)
  30 {
  31         return (val >> 4) * 10 + (val & 0x0f);
  32 }
  33
  34 static uint8_t bin2bcd (uint_fast8_t val)
  35 {
  36         div_t d = div(val, 10);
  37
  38         return (d.quot << 4) | d.rem;
  39 }
  40
  41
  42 int rtc_get (struct rtc_time *tmp)
  43 {
  44         int rel = 0;
  45         uint8_t rtcbuf[NR_OF_REGS];
  46         uint16_t year;
  47
  48         i2c_read(CONFIG_SYS_I2C_RTC_ADDR, 0, 1, rtcbuf, NR_OF_REGS);
  49         i2c_read(CONFIG_SYS_I2C_RTC_ADDR, 0x10, 1, (uint8_t *) &year, 2);
  50
  51         debug_rtc("Get RTC year: %u, year/date: %02x, wdays/month: %02x, "
  52                 "hour: %02x, min: %02x, sec: %02x, (stat: %02x)\n", year,
  53                 rtcbuf[6], rtcbuf[5], rtcbuf[4], rtcbuf[3], rtcbuf[2], rtcbuf[0]);
  54
  55         tmp->tm_sec  = bcd2bin (rtcbuf[REG_SEC]    & 0x7F);
  56         tmp->tm_min  = bcd2bin (rtcbuf[REG_MIN]    & 0x7F);
  57         tmp->tm_hour = bcd2bin (rtcbuf[REG_HOUR]   & 0x3F);
  58         tmp->tm_mday = bcd2bin (rtcbuf[REG_YRDATE] & 0x3F);
  59         tmp->tm_mon  = bcd2bin (rtcbuf[REG_WDMON]  & 0x1F);
  60         while (year%4 < (rtcbuf[REG_YRDATE]>>6)) {
  61                 year++;
  62                 /* TODO: update RTC ram */
  63         }
  64         tmp->tm_year  = year;
  65         tmp->tm_wday = rtcbuf[REG_WDMON] >> 5;
  66         tmp->tm_yday = 0;
  67         tmp->tm_isdst= 0;
  68
  69
  70         debug_rtc( "Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
  71                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
  72                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
  73
  74         return rel;
  75 }
  76
  77 int rtc_set (struct rtc_time *tmp)
  78 {
  79         uint8_t rtcbuf[NR_OF_REGS];
  80
  81         debug_rtc("Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
  82                 tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
  83                 tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
  84
  85         rtcbuf[REG_CS] = 0x84;
  86         rtcbuf[REG_CSEC] = 0x00;
  87         rtcbuf[REG_WDMON ] = bin2bcd(tmp->tm_mon) | ((tmp->tm_wday) << 5);
  88         rtcbuf[REG_YRDATE] = ((tmp->tm_year % 4) << 6) | bin2bcd(tmp->tm_mday);
  89         rtcbuf[REG_HOUR  ] = bin2bcd(tmp->tm_hour);
  90         rtcbuf[REG_MIN   ] = bin2bcd(tmp->tm_min);
  91         rtcbuf[REG_SEC   ] = bin2bcd(tmp->tm_sec);
  92
  93         i2c_write(CONFIG_SYS_I2C_RTC_ADDR, 0,    1, rtcbuf, NR_OF_REGS);
  94         i2c_write(CONFIG_SYS_I2C_RTC_ADDR, 0x10, 1, (uint8_t *) &tmp->tm_year, 2);
  95         rtcbuf[REG_CS] = 0x04;
  96         i2c_write(CONFIG_SYS_I2C_RTC_ADDR, 0, 1, rtcbuf, 1);
  97
  98
  99         return 0;
 100 }