rtc/ds1306.c

   1 /*
   2  * (C) Copyright 2002 SIXNET, dge@sixnetio.com.
   3  *
   4  * (C) Copyright 2004, Li-Pro.Net <www.li-pro.net>
   5  * Stephan Linz <linz@li-pro.net>
   6  *
   7  * See file CREDITS for list of people who contributed to this
   8  * project.
   9  *
  10  * This program is free software; you can redistribute it and/or
  11  * modify it under the terms of the GNU General Public License as
  12  * published by the Free Software Foundation; either version 2 of
  13  * the License, or (at your option) any later version.
  14  *
  15  * This program is distributed in the hope that it will be useful,
  16  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  17  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  18  * GNU General Public License for more details.
  19  *
  20  * You should have received a copy of the GNU General Public License
  21  * along with this program; if not, write to the Free Software
  22  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  23  * MA 02111-1307 USA
  24  */
  25
  26 /*
  27  * Date & Time support for DS1306 RTC using SPI:
  28  *
  29  *    - SXNI855T:    it uses its own soft SPI here in this file
  30  *    - all other:   use the external spi_xfer() function
  31  *                   (see include/spi.h)
  32  */
  33
  34 #include <common.h>
  35 #include <command.h>
  36 #include <rtc.h>
  37 #include <spi.h>
  38
  39 #if defined(CONFIG_RTC_DS1306) && (CONFIG_COMMANDS & CFG_CMD_DATE)
  40
  41 #define RTC_SECONDS             0x00
  42 #define RTC_MINUTES             0x01
  43 #define RTC_HOURS               0x02
  44 #define RTC_DAY_OF_WEEK         0x03
  45 #define RTC_DATE_OF_MONTH       0x04
  46 #define RTC_MONTH               0x05
  47 #define RTC_YEAR                0x06
  48
  49 #define RTC_SECONDS_ALARM0      0x07
  50 #define RTC_MINUTES_ALARM0      0x08
  51 #define RTC_HOURS_ALARM0        0x09
  52 #define RTC_DAY_OF_WEEK_ALARM0  0x0a
  53
  54 #define RTC_SECONDS_ALARM1      0x0b
  55 #define RTC_MINUTES_ALARM1      0x0c
  56 #define RTC_HOURS_ALARM1        0x0d
  57 #define RTC_DAY_OF_WEEK_ALARM1  0x0e
  58
  59 #define RTC_CONTROL             0x0f
  60 #define RTC_STATUS              0x10
  61 #define RTC_TRICKLE_CHARGER     0x11
  62
  63 #define RTC_USER_RAM_BASE       0x20
  64
  65 /*
  66  * External table of chip select functions (see the appropriate board
  67  * support for the actual definition of the table).
  68  */
  69 extern spi_chipsel_type spi_chipsel[];
  70 extern int spi_chipsel_cnt;
  71
  72 static unsigned int bin2bcd (unsigned int n);
  73 static unsigned char bcd2bin (unsigned char c);
  74
  75 /* ************************************************************************* */
  76 #ifdef CONFIG_SXNI855T          /* !!! SHOULD BE CHANGED TO NEW CODE !!! */
  77
  78 static unsigned char rtc_read (unsigned char reg);
  79 static void rtc_write (unsigned char reg, unsigned char val);
  80 static void soft_spi_send (unsigned char n);
  81 static unsigned char soft_spi_read (void);
  82 static void init_spi (void);
  83
  84 /*-----------------------------------------------------------------------
  85  * Definitions
  86  */
  87
  88 #define PB_SPISCK       0x00000002      /* PB 30 */
  89 #define PB_SPIMOSI      0x00000004      /* PB 29 */
  90 #define PB_SPIMISO      0x00000008      /* PB 28 */
  91 #define PB_SPI_CE       0x00010000      /* PB 15 */
  92
  93 /* ------------------------------------------------------------------------- */
  94
  95 /* read clock time from DS1306 and return it in *tmp */
  96 void rtc_get (struct rtc_time *tmp)
  97 {
  98         volatile immap_t *immap = (immap_t *) CFG_IMMR;
  99         unsigned char spi_byte; /* Data Byte */
 100
 101         init_spi ();            /* set port B for software SPI */
 102
 103         /* Now we can enable the DS1306 RTC */
 104         immap->im_cpm.cp_pbdat |= PB_SPI_CE;
 105         udelay (10);
 106
 107         /* Shift out the address (0) of the time in the Clock Chip */
 108         soft_spi_send (0);
 109
 110         /* Put the clock readings into the rtc_time structure */
 111         tmp->tm_sec = bcd2bin (soft_spi_read ());       /* Read seconds */
 112         tmp->tm_min = bcd2bin (soft_spi_read ());       /* Read minutes */
 113
 114         /* Hours are trickier */
 115         spi_byte = soft_spi_read ();    /* Read Hours into temporary value */
 116         if (spi_byte & 0x40) {
 117                 /* 12 hour mode bit is set (time is in 1-12 format) */
 118                 if (spi_byte & 0x20) {
 119                         /* since PM we add 11 to get 0-23 for hours */
 120                         tmp->tm_hour = (bcd2bin (spi_byte & 0x1F)) + 11;
 121                 } else {
 122                         /* since AM we subtract 1 to get 0-23 for hours */
 123                         tmp->tm_hour = (bcd2bin (spi_byte & 0x1F)) - 1;
 124                 }
 125         } else {
 126                 /* Otherwise, 0-23 hour format */
 127                 tmp->tm_hour = (bcd2bin (spi_byte & 0x3F));
 128         }
 129
 130         soft_spi_read ();       /* Read and discard Day of week */
 131         tmp->tm_mday = bcd2bin (soft_spi_read ());      /* Read Day of the Month */
 132         tmp->tm_mon = bcd2bin (soft_spi_read ());       /* Read Month */
 133
 134         /* Read Year and convert to this century */
 135         tmp->tm_year = bcd2bin (soft_spi_read ()) + 2000;
 136
 137         /* Now we can disable the DS1306 RTC */
 138         immap->im_cpm.cp_pbdat &= ~PB_SPI_CE;   /* Disable DS1306 Chip */
 139         udelay (10);
 140
 141         GregorianDay (tmp);     /* Determine the day of week */
 142
 143         debug ("Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 144                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 145                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 146 }
 147
 148 /* ------------------------------------------------------------------------- */
 149
 150 /* set clock time in DS1306 RTC and in MPC8xx RTC */
 151 void rtc_set (struct rtc_time *tmp)
 152 {
 153         volatile immap_t *immap = (immap_t *) CFG_IMMR;
 154
 155         init_spi ();            /* set port B for software SPI */
 156
 157         /* Now we can enable the DS1306 RTC */
 158         immap->im_cpm.cp_pbdat |= PB_SPI_CE;    /* Enable DS1306 Chip */
 159         udelay (10);
 160
 161         /* First disable write protect in the clock chip control register */
 162         soft_spi_send (0x8F);   /* send address of the control register */
 163         soft_spi_send (0x00);   /* send control register contents */
 164
 165         /* Now disable the DS1306 to terminate the write */
 166         immap->im_cpm.cp_pbdat &= ~PB_SPI_CE;
 167         udelay (10);
 168
 169         /* Now enable the DS1306 to initiate a new write */
 170         immap->im_cpm.cp_pbdat |= PB_SPI_CE;
 171         udelay (10);
 172
 173         /* Next, send the address of the clock time write registers */
 174         soft_spi_send (0x80);   /* send address of the first time register */
 175
 176         /* Use Burst Mode to send all of the time data to the clock */
 177         bin2bcd (tmp->tm_sec);
 178         soft_spi_send (bin2bcd (tmp->tm_sec));  /* Send Seconds */
 179         soft_spi_send (bin2bcd (tmp->tm_min));  /* Send Minutes */
 180         soft_spi_send (bin2bcd (tmp->tm_hour)); /* Send Hour */
 181         soft_spi_send (bin2bcd (tmp->tm_wday)); /* Send Day of the Week */
 182         soft_spi_send (bin2bcd (tmp->tm_mday)); /* Send Day of Month */
 183         soft_spi_send (bin2bcd (tmp->tm_mon));  /* Send Month */
 184         soft_spi_send (bin2bcd (tmp->tm_year - 2000));  /* Send Year */
 185
 186         /* Now we can disable the Clock chip to terminate the burst write */
 187         immap->im_cpm.cp_pbdat &= ~PB_SPI_CE;   /* Disable DS1306 Chip */
 188         udelay (10);
 189
 190         /* Now we can enable the Clock chip to initiate a new write */
 191         immap->im_cpm.cp_pbdat |= PB_SPI_CE;    /* Enable DS1306 Chip */
 192         udelay (10);
 193
 194         /* First we Enable write protect in the clock chip control register */
 195         soft_spi_send (0x8F);   /* send address of the control register */
 196         soft_spi_send (0x40);   /* send out Control Register contents */
 197
 198         /* Now disable the DS1306 */
 199         immap->im_cpm.cp_pbdat &= ~PB_SPI_CE;   /*  Disable DS1306 Chip */
 200         udelay (10);
 201
 202         /* Set standard MPC8xx clock to the same time so Linux will
 203          * see the time even if it doesn't have a DS1306 clock driver.
 204          * This helps with experimenting with standard kernels.
 205          */
 206         {
 207                 ulong tim;
 208
 209                 tim = mktime (tmp->tm_year, tmp->tm_mon, tmp->tm_mday,
 210                               tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 211
 212                 immap->im_sitk.sitk_rtck = KAPWR_KEY;
 213                 immap->im_sit.sit_rtc = tim;
 214         }
 215
 216         debug ("Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 217                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 218                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 219 }
 220
 221 /* ------------------------------------------------------------------------- */
 222
 223 /* Initialize Port B for software SPI */
 224 static void init_spi (void)
 225 {
 226         volatile immap_t *immap = (immap_t *) CFG_IMMR;
 227
 228         /* Force output pins to begin at logic 0 */
 229         immap->im_cpm.cp_pbdat &= ~(PB_SPI_CE | PB_SPIMOSI | PB_SPISCK);
 230
 231         /* Set these 3 signals as outputs */
 232         immap->im_cpm.cp_pbdir |= (PB_SPIMOSI | PB_SPI_CE | PB_SPISCK);
 233
 234         immap->im_cpm.cp_pbdir &= ~PB_SPIMISO;  /* Make MISO pin an input */
 235         udelay (10);
 236 }
 237
 238 /* ------------------------------------------------------------------------- */
 239
 240 /* NOTE: soft_spi_send() assumes that the I/O lines are configured already */
 241 static void soft_spi_send (unsigned char n)
 242 {
 243         volatile immap_t *immap = (immap_t *) CFG_IMMR;
 244         unsigned char bitpos;   /* bit position to receive */
 245         unsigned char i;        /* Loop Control */
 246
 247         /* bit position to send, start with most significant bit */
 248         bitpos = 0x80;
 249
 250         /* Send 8 bits to software SPI */
 251         for (i = 0; i < 8; i++) {       /* Loop for 8 bits */
 252                 immap->im_cpm.cp_pbdat |= PB_SPISCK;    /* Raise SCK */
 253
 254                 if (n & bitpos)
 255                         immap->im_cpm.cp_pbdat |= PB_SPIMOSI;   /* Set MOSI to 1 */
 256                 else
 257                         immap->im_cpm.cp_pbdat &= ~PB_SPIMOSI;  /* Set MOSI to 0 */
 258                 udelay (10);
 259
 260                 immap->im_cpm.cp_pbdat &= ~PB_SPISCK;   /* Lower SCK */
 261                 udelay (10);
 262
 263                 bitpos >>= 1;   /* Shift for next bit position */
 264         }
 265 }
 266
 267 /* ------------------------------------------------------------------------- */
 268
 269 /* NOTE: soft_spi_read() assumes that the I/O lines are configured already */
 270 static unsigned char soft_spi_read (void)
 271 {
 272         volatile immap_t *immap = (immap_t *) CFG_IMMR;
 273
 274         unsigned char spi_byte = 0;     /* Return value, assume success */
 275         unsigned char bitpos;   /* bit position to receive */
 276         unsigned char i;        /* Loop Control */
 277
 278         /* bit position to receive, start with most significant bit */
 279         bitpos = 0x80;
 280
 281         /* Read 8 bits here */
 282         for (i = 0; i < 8; i++) {       /* Do 8 bits in loop */
 283                 immap->im_cpm.cp_pbdat |= PB_SPISCK;    /* Raise SCK */
 284                 udelay (10);
 285                 if (immap->im_cpm.cp_pbdat & PB_SPIMISO)        /* Get a bit of data */
 286                         spi_byte |= bitpos;     /* Set data accordingly */
 287                 immap->im_cpm.cp_pbdat &= ~PB_SPISCK;   /* Lower SCK */
 288                 udelay (10);
 289                 bitpos >>= 1;   /* Shift for next bit position */
 290         }
 291
 292         return spi_byte;        /* Return the byte read */
 293 }
 294
 295 /* ------------------------------------------------------------------------- */
 296
 297 void rtc_reset (void)
 298 {
 299         return;                 /* nothing to do */
 300 }
 301
 302 #else  /* not CONFIG_SXNI855T */
 303 /* ************************************************************************* */
 304
 305 /* read clock time from DS1306 and return it in *tmp */
 306 void rtc_get (struct rtc_time *tmp)
 307 {
 308         unsigned char sec, min, hour, mday, wday, mon, year;
 309
 310         sec = rtc_read (RTC_SECONDS);
 311         min = rtc_read (RTC_MINUTES);
 312         hour = rtc_read (RTC_HOURS);
 313         mday = rtc_read (RTC_DATE_OF_MONTH);
 314         wday = rtc_read (RTC_DAY_OF_WEEK);
 315         mon = rtc_read (RTC_MONTH);
 316         year = rtc_read (RTC_YEAR);
 317
 318         debug ("Get RTC year: %02x mon: %02x mday: %02x wday: %02x "
 319                "hr: %02x min: %02x sec: %02x\n",
 320                year, mon, mday, wday, hour, min, sec);
 321         debug ("Alarms[0]: wday: %02x hour: %02x min: %02x sec: %02x\n",
 322                rtc_read (RTC_DAY_OF_WEEK_ALARM0),
 323                rtc_read (RTC_HOURS_ALARM0),
 324                rtc_read (RTC_MINUTES_ALARM0), rtc_read (RTC_SECONDS_ALARM0));
 325         debug ("Alarms[1]: wday: %02x hour: %02x min: %02x sec: %02x\n",
 326                rtc_read (RTC_DAY_OF_WEEK_ALARM1),
 327                rtc_read (RTC_HOURS_ALARM1),
 328                rtc_read (RTC_MINUTES_ALARM1), rtc_read (RTC_SECONDS_ALARM1));
 329
 330         tmp->tm_sec = bcd2bin (sec & 0x7F);     /* convert Seconds */
 331         tmp->tm_min = bcd2bin (min & 0x7F);     /* convert Minutes */
 332
 333         /* convert Hours */
 334         tmp->tm_hour = (hour & 0x40)
 335                 ? ((hour & 0x20)        /* 12 hour mode */
 336                    ? bcd2bin (hour & 0x1F) + 11 /* PM */
 337                    : bcd2bin (hour & 0x1F) - 1  /* AM */
 338                 )
 339                 : bcd2bin (hour & 0x3F);        /* 24 hour mode */
 340
 341         tmp->tm_mday = bcd2bin (mday & 0x3F);   /* convert Day of the Month */
 342         tmp->tm_mon = bcd2bin (mon & 0x1F);     /* convert Month */
 343         tmp->tm_year = bcd2bin (year) + 2000;   /* convert Year */
 344         tmp->tm_wday = bcd2bin (wday & 0x07) - 1;       /* convert Day of the Week */
 345         tmp->tm_yday = 0;
 346         tmp->tm_isdst = 0;
 347
 348         debug ("Get DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 349                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 350                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 351 }
 352
 353 /* ------------------------------------------------------------------------- */
 354
 355 /* set clock time from *tmp in DS1306 RTC */
 356 void rtc_set (struct rtc_time *tmp)
 357 {
 358         debug ("Set DATE: %4d-%02d-%02d (wday=%d)  TIME: %2d:%02d:%02d\n",
 359                tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
 360                tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
 361
 362         rtc_write (RTC_YEAR, bin2bcd (tmp->tm_year - 2000));
 363         rtc_write (RTC_MONTH, bin2bcd (tmp->tm_mon));
 364         rtc_write (RTC_DATE_OF_MONTH, bin2bcd (tmp->tm_mday));
 365         rtc_write (RTC_DAY_OF_WEEK, bin2bcd (tmp->tm_wday + 1));
 366         rtc_write (RTC_HOURS, bin2bcd (tmp->tm_hour));
 367         rtc_write (RTC_MINUTES, bin2bcd (tmp->tm_min));
 368         rtc_write (RTC_SECONDS, bin2bcd (tmp->tm_sec));
 369 }
 370
 371 /* ------------------------------------------------------------------------- */
 372
 373 /* reset the DS1306 */
 374 void rtc_reset (void)
 375 {
 376         /* clear the control register */
 377         rtc_write (RTC_CONTROL, 0x00);  /* 1st step: reset WP */
 378         rtc_write (RTC_CONTROL, 0x00);  /* 2nd step: reset 1Hz, AIE1, AIE0 */
 379
 380         /* reset all alarms */
 381         rtc_write (RTC_SECONDS_ALARM0, 0x00);
 382         rtc_write (RTC_SECONDS_ALARM1, 0x00);
 383         rtc_write (RTC_MINUTES_ALARM0, 0x00);
 384         rtc_write (RTC_MINUTES_ALARM1, 0x00);
 385         rtc_write (RTC_HOURS_ALARM0, 0x00);
 386         rtc_write (RTC_HOURS_ALARM1, 0x00);
 387         rtc_write (RTC_DAY_OF_WEEK_ALARM0, 0x00);
 388         rtc_write (RTC_DAY_OF_WEEK_ALARM1, 0x00);
 389 }
 390
 391 /* ------------------------------------------------------------------------- */
 392
 393 static unsigned char rtc_read (unsigned char reg)
 394 {
 395         unsigned char dout[2];  /* SPI Output Data Bytes */
 396         unsigned char din[2];   /* SPI Input Data Bytes */
 397
 398         dout[0] = reg;
 399
 400         if (spi_xfer (spi_chipsel[CFG_SPI_RTC_DEVID], 16, dout, din) != 0) {
 401                 return 0;
 402         } else {
 403                 return din[1];
 404         }
 405 }
 406
 407 /* ------------------------------------------------------------------------- */
 408
 409 static void rtc_write (unsigned char reg, unsigned char val)
 410 {
 411         unsigned char dout[2];  /* SPI Output Data Bytes */
 412         unsigned char din[2];   /* SPI Input Data Bytes */
 413
 414         dout[0] = 0x80 | reg;
 415         dout[1] = val;
 416
 417         spi_xfer (spi_chipsel[CFG_SPI_RTC_DEVID], 16, dout, din);
 418 }
 419
 420 #endif /* end of code exclusion (see #ifdef CONFIG_SXNI855T above) */
 421
 422 /* ------------------------------------------------------------------------- */
 423
 424 static unsigned char bcd2bin (unsigned char n)
 425 {
 426         return ((((n >> 4) & 0x0F) * 10) + (n & 0x0F));
 427 }
 428
 429 /* ------------------------------------------------------------------------- */
 430
 431 static unsigned int bin2bcd (unsigned int n)
 432 {
 433         return (((n / 10) << 4) | (n % 10));
 434 }
 435 /* ------------------------------------------------------------------------- */
 436
 437 #endif