ds1556.c 4.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179
  1. // SPDX-License-Identifier: GPL-2.0+
  2. /*
  3. * (C) Copyright 2002
  4. * ARIO Data Networks, Inc. dchiu@ariodata.com
  5. *
  6. * modified for DS1556:
  7. * Frank Panno <fpanno@delphintech.com>, Delphin Technology AG
  8. *
  9. * Based on MontaVista DS1743 code and U-Boot mc146818 code
  10. */
  11. /*
  12. * Date & Time support for the DS1556 RTC
  13. */
  14. /*#define RTC_DEBUG */
  15. #include <common.h>
  16. #include <command.h>
  17. #include <rtc.h>
  18. #if defined(CONFIG_CMD_DATE)
  19. static uchar rtc_read( unsigned int addr );
  20. static void rtc_write( unsigned int addr, uchar val);
  21. #define RTC_BASE ( CONFIG_SYS_NVRAM_SIZE + CONFIG_SYS_NVRAM_BASE_ADDR )
  22. #define RTC_YEAR ( RTC_BASE + 0xf )
  23. #define RTC_MONTH ( RTC_BASE + 0xe )
  24. #define RTC_DAY_OF_MONTH ( RTC_BASE + 0xd )
  25. #define RTC_DAY_OF_WEEK ( RTC_BASE + 0xc )
  26. #define RTC_HOURS ( RTC_BASE + 0xb )
  27. #define RTC_MINUTES ( RTC_BASE + 0xa )
  28. #define RTC_SECONDS ( RTC_BASE + 0x9 )
  29. #define RTC_CENTURY ( RTC_BASE + 0x8 )
  30. #define RTC_CONTROLA RTC_CENTURY
  31. #define RTC_CONTROLB RTC_SECONDS
  32. #define RTC_CONTROLC RTC_BASE
  33. #define RTC_CA_WRITE 0x80
  34. #define RTC_CA_READ 0x40
  35. #define RTC_CB_OSC_DISABLE 0x80
  36. #define RTC_CC_BATTERY_FLAG 0x10
  37. #define RTC_CC_FREQ_TEST 0x40
  38. /* ------------------------------------------------------------------------- */
  39. int rtc_get( struct rtc_time *tmp )
  40. {
  41. uchar sec, min, hour;
  42. uchar mday, wday, mon, year;
  43. int century;
  44. uchar reg_a;
  45. reg_a = rtc_read( RTC_CONTROLA );
  46. /* lock clock registers for read */
  47. rtc_write( RTC_CONTROLA, ( reg_a | RTC_CA_READ ));
  48. sec = rtc_read( RTC_SECONDS );
  49. min = rtc_read( RTC_MINUTES );
  50. hour = rtc_read( RTC_HOURS );
  51. mday = rtc_read( RTC_DAY_OF_MONTH );
  52. wday = rtc_read( RTC_DAY_OF_WEEK );
  53. mon = rtc_read( RTC_MONTH );
  54. year = rtc_read( RTC_YEAR );
  55. century = rtc_read( RTC_CENTURY );
  56. /* unlock clock registers after read */
  57. rtc_write( RTC_CONTROLA, ( reg_a & ~RTC_CA_READ ));
  58. #ifdef RTC_DEBUG
  59. printf( "Get RTC year: %02x mon/cent: %02x mon: %02x mday: %02x wday: %02x "
  60. "hr: %02x min: %02x sec: %02x\n",
  61. year, century, mon, mday, wday,
  62. hour, min, sec );
  63. #endif
  64. tmp->tm_sec = bcd2bin( sec & 0x7F );
  65. tmp->tm_min = bcd2bin( min & 0x7F );
  66. tmp->tm_hour = bcd2bin( hour & 0x3F );
  67. tmp->tm_mday = bcd2bin( mday & 0x3F );
  68. tmp->tm_mon = bcd2bin( mon & 0x1F );
  69. tmp->tm_wday = bcd2bin( wday & 0x07 );
  70. /* glue year from century and year in century */
  71. tmp->tm_year = bcd2bin( year ) +
  72. ( bcd2bin( century & 0x3F ) * 100 );
  73. tmp->tm_yday = 0;
  74. tmp->tm_isdst= 0;
  75. #ifdef RTC_DEBUG
  76. printf( "Get DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
  77. tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
  78. tmp->tm_hour, tmp->tm_min, tmp->tm_sec );
  79. #endif
  80. return 0;
  81. }
  82. int rtc_set( struct rtc_time *tmp )
  83. {
  84. uchar reg_a;
  85. #ifdef RTC_DEBUG
  86. printf( "Set DATE: %4d-%02d-%02d (wday=%d) TIME: %2d:%02d:%02d\n",
  87. tmp->tm_year, tmp->tm_mon, tmp->tm_mday, tmp->tm_wday,
  88. tmp->tm_hour, tmp->tm_min, tmp->tm_sec);
  89. #endif
  90. /* lock clock registers for write */
  91. reg_a = rtc_read( RTC_CONTROLA );
  92. rtc_write( RTC_CONTROLA, ( reg_a | RTC_CA_WRITE ));
  93. rtc_write( RTC_MONTH, bin2bcd( tmp->tm_mon ));
  94. rtc_write( RTC_DAY_OF_WEEK, bin2bcd( tmp->tm_wday ));
  95. rtc_write( RTC_DAY_OF_MONTH, bin2bcd( tmp->tm_mday ));
  96. rtc_write( RTC_HOURS, bin2bcd( tmp->tm_hour ));
  97. rtc_write( RTC_MINUTES, bin2bcd( tmp->tm_min ));
  98. rtc_write( RTC_SECONDS, bin2bcd( tmp->tm_sec ));
  99. /* break year up into century and year in century */
  100. rtc_write( RTC_YEAR, bin2bcd( tmp->tm_year % 100 ));
  101. rtc_write( RTC_CENTURY, bin2bcd( tmp->tm_year / 100 ));
  102. /* unlock clock registers after read */
  103. rtc_write( RTC_CONTROLA, ( reg_a & ~RTC_CA_WRITE ));
  104. return 0;
  105. }
  106. void rtc_reset (void)
  107. {
  108. uchar reg_a, reg_b, reg_c;
  109. reg_a = rtc_read( RTC_CONTROLA );
  110. reg_b = rtc_read( RTC_CONTROLB );
  111. if ( reg_b & RTC_CB_OSC_DISABLE )
  112. {
  113. printf( "real-time-clock was stopped. Now starting...\n" );
  114. reg_a |= RTC_CA_WRITE;
  115. reg_b &= ~RTC_CB_OSC_DISABLE;
  116. rtc_write( RTC_CONTROLA, reg_a );
  117. rtc_write( RTC_CONTROLB, reg_b );
  118. }
  119. /* make sure read/write clock register bits are cleared */
  120. reg_a &= ~( RTC_CA_WRITE | RTC_CA_READ );
  121. rtc_write( RTC_CONTROLA, reg_a );
  122. reg_c = rtc_read( RTC_CONTROLC );
  123. if (( reg_c & RTC_CC_BATTERY_FLAG ) == 0 )
  124. printf( "RTC battery low. Clock setting may not be reliable.\n" );
  125. }
  126. /* ------------------------------------------------------------------------- */
  127. static uchar rtc_read( unsigned int addr )
  128. {
  129. uchar val = *(volatile unsigned char*)(addr);
  130. #ifdef RTC_DEBUG
  131. printf( "rtc_read: %x:%x\n", addr, val );
  132. #endif
  133. return( val );
  134. }
  135. static void rtc_write( unsigned int addr, uchar val )
  136. {
  137. #ifdef RTC_DEBUG
  138. printf( "rtc_write: %x:%x\n", addr, val );
  139. #endif
  140. *(volatile unsigned char*)(addr) = val;
  141. }
  142. #endif