drivers/rtc/s3c24x0_rtc.c

   1 /*
   2  * (C) Copyright 2003
   3  * David Müller ELSOFT AG Switzerland. d.mueller@elsoft.ch
   4  *
   5  * See file CREDITS for list of people who contributed to this
   6  * project.
   7  *
   8  * This program is free software; you can redistribute it and/or
   9  * modify it under the terms of the GNU General Public License as
  10  * published by the Free Software Foundation; either version 2 of
  11  * the License, or (at your option) any later version.
  12  *
  13  * This program is distributed in the hope that it will be useful,
  14  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  15  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  16  * GNU General Public License for more details.
  17  *
  18  * You should have received a copy of the GNU General Public License
  19  * along with this program; if not, write to the Free Software
  20  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  21  * MA 02111-1307 USA
  22  */
  23
  24 /*
  25  * Date & Time support for the built-in Samsung S3C24X0 RTC
  26  */
  27
  28 #include <common.h>
  29 #include <command.h>
  30
  31 #if (defined(CONFIG_CMD_DATE))
  32
  33 #if defined(CONFIG_S3C2400)
  34 #include <s3c2400.h>
  35 #elif defined(CONFIG_S3C2410)
  36 #include <s3c2410.h>
  37 #endif
  38
  39 #include <rtc.h>
  40 #include <asm/io.h>
  41
  42 /*#define       DEBUG*/
  43
  44 typedef enum {
  45         RTC_ENABLE,
  46         RTC_DISABLE
  47 } RTC_ACCESS;
  48
  49
  50 static inline void SetRTC_Access(RTC_ACCESS a)
  51 {
  52         struct s3c24x0_rtc *rtc = s3c24x0_get_base_rtc();
  53
  54         switch (a) {
  55         case RTC_ENABLE:
  56                 writeb(readb(&rtc->RTCCON) | 0x01, &rtc->RTCCON);
  57                 break;
  58
  59         case RTC_DISABLE:
  60                 writeb(readb(&rtc->RTCCON) & ~0x01, &rtc->RTCCON);
  61                 break;
  62         }
  63 }
  64
  65 /* ------------------------------------------------------------------------- */
  66
  67 int rtc_get(struct rtc_time *tmp)
  68 {
  69         struct s3c24x0_rtc *rtc = s3c24x0_get_base_rtc();
  70         uchar sec, min, hour, mday, wday, mon, year;
  71         uchar a_sec, a_min, a_hour, a_date, a_mon, a_year, a_armed;
  72
  73         /* enable access to RTC registers */
  74         SetRTC_Access(RTC_ENABLE);
  75
  76         /* read RTC registers */
  77         do {
  78                 sec  = readb(&rtc->BCDSEC);
  79                 min  = readb(&rtc->BCDMIN);
  80                 hour = readb(&rtc->BCDHOUR);
  81                 mday = readb(&rtc->BCDDATE);
  82                 wday = readb(&rtc->BCDDAY);
  83                 mon  = readb(&rtc->BCDMON);
  84                 year = readb(&rtc->BCDYEAR);
  85         } while (sec != readb(&rtc->BCDSEC));
  86
  87         /* read ALARM registers */
  88         a_sec   = readb(&rtc->ALMSEC);
  89         a_min   = readb(&rtc->ALMMIN);
  90         a_hour  = readb(&rtc->ALMHOUR);
  91         a_date  = readb(&rtc->ALMDATE);
  92         a_mon   = readb(&rtc->ALMMON);
  93         a_year  = readb(&rtc->ALMYEAR);
  94         a_armed = readb(&rtc->RTCALM);
  95
  96         /* disable access to RTC registers */
  97         SetRTC_Access(RTC_DISABLE);
  98
  99 #ifdef RTC_DEBUG
 100         printf("Get RTC year: %02x mon/cent: %02x mday: %02x wday: %02x "
 101                "hr: %02x min: %02x sec: %02x\n",
 102                year, mon, mday, wday, hour, min, sec);
 103         printf("Alarms: %02x: year: %02x month: %02x date: %02x hour: "
 104                "%02x min: %02x sec: %02x\n",
 105                a_armed, a_year, a_mon, a_date, a_hour, a_min, a_sec);
 106 #endif
 107
 108         tmp->tm_sec  = bcd2bin(sec & 0x7F);
 109         tmp->tm_min  = bcd2bin(min & 0x7F);
 110         tmp->tm_hour = bcd2bin(hour & 0x3F);
 111         tmp->tm_mday = bcd2bin(mday & 0x3F);
 112         tmp->tm_mon  = bcd2bin(mon & 0x1F);
 113         tmp->tm_year = bcd2bin(year);
 114         tmp->tm_wday = bcd2bin(wday & 0x07);
 115         if (tmp->tm_year < 70)
 116                 tmp->tm_year += 2000;
 117         else
 118                 tmp->tm_year += 1900;
 119         tmp->tm_yday  = 0;
 120         tmp->tm_isdst = 0;
 121 #ifdef RTC_DEBUG
 122         printf("Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 123                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 124                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 125 #endif
 126
 127         return 0;
 128 }
 129
 130 int rtc_set(struct rtc_time *tmp)
 131 {
 132         struct s3c24x0_rtc *rtc = s3c24x0_get_base_rtc();
 133         uchar sec, min, hour, mday, wday, mon, year;
 134
 135 #ifdef RTC_DEBUG
 136         printf("Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 137                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 138                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 139 #endif
 140         year = bin2bcd(tmp->tm_year % 100);
 141         mon  = bin2bcd(tmp->tm_mon);
 142         wday = bin2bcd(tmp->tm_wday);
 143         mday = bin2bcd(tmp->tm_mday);
 144         hour = bin2bcd(tmp->tm_hour);
 145         min  = bin2bcd(tmp->tm_min);
 146         sec  = bin2bcd(tmp->tm_sec);
 147
 148         /* enable access to RTC registers */
 149         SetRTC_Access(RTC_ENABLE);
 150
 151         /* write RTC registers */
 152         writeb(sec, &rtc->BCDSEC);
 153         writeb(min, &rtc->BCDMIN);
 154         writeb(hour, &rtc->BCDHOUR);
 155         writeb(mday, &rtc->BCDDATE);
 156         writeb(wday, &rtc->BCDDAY);
 157         writeb(mon, &rtc->BCDMON);
 158         writeb(year, &rtc->BCDYEAR);
 159
 160         /* disable access to RTC registers */
 161         SetRTC_Access(RTC_DISABLE);
 162
 163         return 0;
 164 }
 165
 166 void rtc_reset(void)
 167 {
 168         struct s3c24x0_rtc *rtc = s3c24x0_get_base_rtc();
 169
 170         writeb((readb(&rtc->RTCCON) & ~0x06) | 0x08, &rtc->RTCCON);
 171         writeb(readb(&rtc->RTCCON) & ~(0x08 | 0x01), &rtc->RTCCON);
 172 }
 173
 174 #endif