[SPARC64]: Add support for bq4802 TOD chip, as found on ultra45.

Signed-off-by: David S. Miller <davem@davemloft.net>

diff --git a/arch/sparc64/kernel/time.c b/arch/sparc64/kernel/time.c
index 259063f..6b9a06e 100644 (file)
--- a/arch/sparc64/kernel/time.c
+++ b/arch/sparc64/kernel/time.c
@@ -55,6 +55,7 @@ DEFINE_SPINLOCK(rtc_lock);
 void __iomem *mstk48t02_regs = NULL;
 #ifdef CONFIG_PCI
 unsigned long ds1287_regs = 0UL;
+static void __iomem *bq4802_regs;
 #endif
 
 static void __iomem *mstk48t08_regs;
@@ -565,12 +566,14 @@ static void __init set_system_time(void)
        void __iomem *mregs = mstk48t02_regs;
 #ifdef CONFIG_PCI
        unsigned long dregs = ds1287_regs;
+       void __iomem *bregs = bq4802_regs;
 #else
        unsigned long dregs = 0UL;
+       void __iomem *bregs = 0UL;
 #endif
        u8 tmp;
 
-       if (!mregs && !dregs) {
+       if (!mregs && !dregs && !bregs) {
                prom_printf("Something wrong, clock regs not mapped yet.\n");
                prom_halt();
        }               
@@ -589,6 +592,33 @@ static void __init set_system_time(void)
                day = MSTK_REG_DOM(mregs);
                mon = MSTK_REG_MONTH(mregs);
                year = MSTK_CVT_YEAR( MSTK_REG_YEAR(mregs) );
+       } else if (bregs) {
+               unsigned char val = readb(bregs + 0x0e);
+               unsigned int century;
+
+               /* BQ4802 RTC chip. */
+
+               writeb(val | 0x08, bregs + 0x0e);
+
+               sec  = readb(bregs + 0x00);
+               min  = readb(bregs + 0x02);
+               hour = readb(bregs + 0x04);
+               day  = readb(bregs + 0x06);
+               mon  = readb(bregs + 0x09);
+               year = readb(bregs + 0x0a);
+               century = readb(bregs + 0x0f);
+
+               writeb(val, bregs + 0x0e);
+
+               BCD_TO_BIN(sec);
+               BCD_TO_BIN(min);
+               BCD_TO_BIN(hour);
+               BCD_TO_BIN(day);
+               BCD_TO_BIN(mon);
+               BCD_TO_BIN(year);
+               BCD_TO_BIN(century);
+
+               year += (century * 100);
        } else {
                /* Dallas 12887 RTC chip. */
 
@@ -712,7 +742,8 @@ static int __init clock_model_matches(const char *model)
            strcmp(model, "m5819") &&
            strcmp(model, "m5819p") &&
            strcmp(model, "m5823") &&
-           strcmp(model, "ds1287"))
+           strcmp(model, "ds1287") &&
+           strcmp(model, "bq4802"))
                return 0;
 
        return 1;
@@ -722,9 +753,13 @@ static int __devinit clock_probe(struct of_device *op, const struct of_device_id
 {
        struct device_node *dp = op->node;
        const char *model = of_get_property(dp, "model", NULL);
+       const char *compat = of_get_property(dp, "compatible", NULL);
        unsigned long size, flags;
        void __iomem *regs;
 
+       if (!model)
+               model = compat;
+
        if (!model || !clock_model_matches(model))
                return -ENODEV;
 
@@ -746,6 +781,8 @@ static int __devinit clock_probe(struct of_device *op, const struct of_device_id
            !strcmp(model, "m5819p") ||
            !strcmp(model, "m5823")) {
                ds1287_regs = (unsigned long) regs;
+       } else if (!strcmp(model, "bq4802")) {
+               bq4802_regs = regs;
        } else
 #endif
        if (model[5] == '0' && model[6] == '2') {
@@ -1070,8 +1107,10 @@ static int set_rtc_mmss(unsigned long nowtime)
        void __iomem *mregs = mstk48t02_regs;
 #ifdef CONFIG_PCI
        unsigned long dregs = ds1287_regs;
+       void __iomem *bregs = bq4802_regs;
 #else
        unsigned long dregs = 0UL;
+       void __iomem *bregs = 0UL;
 #endif
        unsigned long flags;
        u8 tmp;
@@ -1080,7 +1119,7 @@ static int set_rtc_mmss(unsigned long nowtime)
         * Not having a register set can lead to trouble.
         * Also starfire doesn't have a tod clock.
         */
-       if (!mregs && !dregs) 
+       if (!mregs && !dregs & !bregs)
                return -1;
 
        if (mregs) {
@@ -1129,6 +1168,37 @@ static int set_rtc_mmss(unsigned long nowtime)
 
                        return -1;
                }
+       } else if (bregs) {
+               int retval = 0;
+               unsigned char val = readb(bregs + 0x0e);
+
+               /* BQ4802 RTC chip. */
+
+               writeb(val | 0x08, bregs + 0x0e);
+
+               chip_minutes = readb(bregs + 0x02);
+               BCD_TO_BIN(chip_minutes);
+               real_seconds = nowtime % 60;
+               real_minutes = nowtime / 60;
+               if (((abs(real_minutes - chip_minutes) + 15)/30) & 1)
+                       real_minutes += 30;
+               real_minutes %= 60;
+
+               if (abs(real_minutes - chip_minutes) < 30) {
+                       BIN_TO_BCD(real_seconds);
+                       BIN_TO_BCD(real_minutes);
+                       writeb(real_seconds, bregs + 0x00);
+                       writeb(real_minutes, bregs + 0x02);
+               } else {
+                       printk(KERN_WARNING
+                              "set_rtc_mmss: can't update from %d to %d\n",
+                              chip_minutes, real_minutes);
+                       retval = -1;
+               }
+
+               writeb(val, bregs + 0x0e);
+
+               return retval;
        } else {
                int retval = 0;
                unsigned char save_control, save_freq_select;
@@ -1259,38 +1329,152 @@ static void to_tm(int tim, struct rtc_time *tm)
 /* Both Starfire and SUN4V give us seconds since Jan 1st, 1970,
  * aka Unix time.  So we have to convert to/from rtc_time.
  */
-static inline void mini_get_rtc_time(struct rtc_time *time)
+static void starfire_get_rtc_time(struct rtc_time *time)
 {
-       unsigned long flags;
-       u32 seconds;
+       u32 seconds = starfire_get_time();
 
-       spin_lock_irqsave(&rtc_lock, flags);
-       seconds = 0;
-       if (this_is_starfire)
-               seconds = starfire_get_time();
-       else if (tlb_type == hypervisor)
-               seconds = hypervisor_get_time();
-       spin_unlock_irqrestore(&rtc_lock, flags);
+       to_tm(seconds, time);
+       time->tm_year -= 1900;
+       time->tm_mon -= 1;
+}
+
+static int starfire_set_rtc_time(struct rtc_time *time)
+{
+       u32 seconds = mktime(time->tm_year + 1900, time->tm_mon + 1,
+                            time->tm_mday, time->tm_hour,
+                            time->tm_min, time->tm_sec);
+
+       return starfire_set_time(seconds);
+}
+
+static void hypervisor_get_rtc_time(struct rtc_time *time)
+{
+       u32 seconds = hypervisor_get_time();
 
        to_tm(seconds, time);
        time->tm_year -= 1900;
        time->tm_mon -= 1;
 }
 
-static inline int mini_set_rtc_time(struct rtc_time *time)
+static int hypervisor_set_rtc_time(struct rtc_time *time)
 {
        u32 seconds = mktime(time->tm_year + 1900, time->tm_mon + 1,
                             time->tm_mday, time->tm_hour,
                             time->tm_min, time->tm_sec);
+
+       return hypervisor_set_time(seconds);
+}
+
+static void bq4802_get_rtc_time(struct rtc_time *time)
+{
+       unsigned char val = readb(bq4802_regs + 0x0e);
+       unsigned int century;
+
+       writeb(val | 0x08, bq4802_regs + 0x0e);
+
+       time->tm_sec = readb(bq4802_regs + 0x00);
+       time->tm_min = readb(bq4802_regs + 0x02);
+       time->tm_hour = readb(bq4802_regs + 0x04);
+       time->tm_mday = readb(bq4802_regs + 0x06);
+       time->tm_mon = readb(bq4802_regs + 0x09);
+       time->tm_year = readb(bq4802_regs + 0x0a);
+       time->tm_wday = readb(bq4802_regs + 0x08);
+       century = readb(bq4802_regs + 0x0f);
+
+       writeb(val, bq4802_regs + 0x0e);
+
+       BCD_TO_BIN(time->tm_sec);
+       BCD_TO_BIN(time->tm_min);
+       BCD_TO_BIN(time->tm_hour);
+       BCD_TO_BIN(time->tm_mday);
+       BCD_TO_BIN(time->tm_mon);
+       BCD_TO_BIN(time->tm_year);
+       BCD_TO_BIN(time->tm_wday);
+       BCD_TO_BIN(century);
+
+       time->tm_year += (century * 100);
+       time->tm_year -= 1900;
+
+       time->tm_mon--;
+}
+
+static int bq4802_set_rtc_time(struct rtc_time *time)
+{
+       unsigned char val = readb(bq4802_regs + 0x0e);
+       unsigned char sec, min, hrs, day, mon, yrs, century;
+       unsigned int year;
+
+       year = time->tm_year + 1900;
+       century = year / 100;
+       yrs = year % 100;
+
+       mon = time->tm_mon + 1;   /* tm_mon starts at zero */
+       day = time->tm_mday;
+       hrs = time->tm_hour;
+       min = time->tm_min;
+       sec = time->tm_sec;
+
+       BIN_TO_BCD(sec);
+       BIN_TO_BCD(min);
+       BIN_TO_BCD(hrs);
+       BIN_TO_BCD(day);
+       BIN_TO_BCD(mon);
+       BIN_TO_BCD(yrs);
+       BIN_TO_BCD(century);
+
+       writeb(val | 0x08, bq4802_regs + 0x0e);
+
+       writeb(sec, bq4802_regs + 0x00);
+       writeb(min, bq4802_regs + 0x02);
+       writeb(hrs, bq4802_regs + 0x04);
+       writeb(day, bq4802_regs + 0x06);
+       writeb(mon, bq4802_regs + 0x09);
+       writeb(yrs, bq4802_regs + 0x0a);
+       writeb(century, bq4802_regs + 0x0f);
+
+       writeb(val, bq4802_regs + 0x0e);
+
+       return 0;
+}
+
+struct mini_rtc_ops {
+       void (*get_rtc_time)(struct rtc_time *);
+       int (*set_rtc_time)(struct rtc_time *);
+};
+
+static struct mini_rtc_ops starfire_rtc_ops = {
+       .get_rtc_time = starfire_get_rtc_time,
+       .set_rtc_time = starfire_set_rtc_time,
+};
+
+static struct mini_rtc_ops hypervisor_rtc_ops = {
+       .get_rtc_time = hypervisor_get_rtc_time,
+       .set_rtc_time = hypervisor_set_rtc_time,
+};
+
+static struct mini_rtc_ops bq4802_rtc_ops = {
+       .get_rtc_time = bq4802_get_rtc_time,
+       .set_rtc_time = bq4802_set_rtc_time,
+};
+
+static struct mini_rtc_ops *mini_rtc_ops;
+
+static inline void mini_get_rtc_time(struct rtc_time *time)
+{
+       unsigned long flags;
+
+       spin_lock_irqsave(&rtc_lock, flags);
+       mini_rtc_ops->get_rtc_time(time);
+       spin_unlock_irqrestore(&rtc_lock, flags);
+}
+
+static inline int mini_set_rtc_time(struct rtc_time *time)
+{
        unsigned long flags;
        int err;
 
        spin_lock_irqsave(&rtc_lock, flags);
-       err = -ENODEV;
-       if (this_is_starfire)
-               err = starfire_set_time(seconds);
-       else  if (tlb_type == hypervisor)
-               err = hypervisor_set_time(seconds);
+       err = mini_rtc_ops->set_rtc_time(time);
        spin_unlock_irqrestore(&rtc_lock, flags);
 
        return err;
@@ -1391,7 +1575,13 @@ static int __init rtc_mini_init(void)
 {
        int retval;
 
-       if (tlb_type != hypervisor && !this_is_starfire)
+       if (tlb_type == hypervisor)
+               mini_rtc_ops = &hypervisor_rtc_ops;
+       else if (this_is_starfire)
+               mini_rtc_ops = &starfire_rtc_ops;
+       else if (bq4802_regs)
+               mini_rtc_ops = &bq4802_rtc_ops;
+       else
                return -ENODEV;
 
        printk(KERN_INFO "Mini RTC Driver\n");