git-svn-id: svn://svn.code.sf.net/p/chibios/svn/branches/kernel_3_dev@6643 35acf78f-673a-0410-8e92-d51de3d6d3f4

2 files changed, 515 insertions, 0 deletions

diff --git a/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.c b/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.c
new file mode 100644
index 000000000..094b569d8
--- /dev/null
+++ b/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.c
@@ -0,0 +1,328 @@
+/*

+    ChibiOS/RT - Copyright (C) 2006-2013 Giovanni Di Sirio

+

+    Licensed under the Apache License, Version 2.0 (the "License");

+    you may not use this file except in compliance with the License.

+    You may obtain a copy of the License at

+

+        http://www.apache.org/licenses/LICENSE-2.0

+

+    Unless required by applicable law or agreed to in writing, software

+    distributed under the License is distributed on an "AS IS" BASIS,

+    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

+    See the License for the specific language governing permissions and

+    limitations under the License.

+*/

+/*

+   Concepts and parts of this file have been contributed by Uladzimir Pylinsky

+   aka barthess.

+ */

+

+/**

+ * @file    STM32/RTCv1/rtc_lld.c

+ * @brief   STM32 RTC subsystem low level driver header.

+ *

+ * @addtogroup RTC

+ * @{

+ */

+

+#include "hal.h"

+

+#if HAL_USE_RTC || defined(__DOXYGEN__)

+

+/*===========================================================================*/

+/* Driver local definitions.                                                 */

+/*===========================================================================*/

+

+/*===========================================================================*/

+/* Driver exported variables.                                                */

+/*===========================================================================*/

+

+/**

+ * @brief RTC driver identifier.

+ */

+RTCDriver RTCD1;

+

+/*===========================================================================*/

+/* Driver local variables and types.                                         */

+/*===========================================================================*/

+

+/*===========================================================================*/

+/* Driver local functions.                                                   */

+/*===========================================================================*/

+

+/**

+ * @brief   Wait for synchronization of RTC registers with APB1 bus.

+ * @details This function must be invoked before trying to read RTC registers

+ *          in the backup domain: DIV, CNT, ALR. CR registers can always

+ *          be read.

+ *

+ * @notapi

+ */

+#define rtc_lld_apb1_sync() {while ((RTC->CRL & RTC_CRL_RSF) == 0);}

+

+/**

+ * @brief   Wait for for previous write operation complete.

+ * @details This function must be invoked before writing to any RTC registers

+ *

+ * @notapi

+ */

+#define rtc_lld_wait_write() {while ((RTC->CRL & RTC_CRL_RTOFF) == 0);}

+

+/**

+ * @brief   Acquires write access to RTC registers.

+ * @details Before writing to the backup domain RTC registers the previous

+ *          write operation must be completed. Use this function before

+ *          writing to PRL, CNT, ALR registers.

+ *

+ * @notapi

+ */

+#define rtc_lld_acquire() {rtc_lld_wait_write(); RTC->CRL |= RTC_CRL_CNF;}

+

+/**

+ * @brief   Releases write access to RTC registers.

+ *

+ * @notapi

+ */

+#define rtc_lld_release() {RTC->CRL &= ~RTC_CRL_CNF;}

+

+/*===========================================================================*/

+/* Driver interrupt handlers.                                                */

+/*===========================================================================*/

+

+/**

+ * @brief   RTC interrupt handler.

+ *

+ * @isr

+ */

+CH_IRQ_HANDLER(RTC_IRQHandler) {

+  uint16_t flags;

+

+  CH_IRQ_PROLOGUE();

+

+  /* This wait works only when AHB1 bus was previously powered off by any

+     reason (standby, reset, etc). In other cases it does nothing.*/

+  rtc_lld_apb1_sync();

+

+  /* Mask of all enabled and pending sources.*/

+  flags = RTC->CRH & RTC->CRL;

+  RTC->CRL &= ~(RTC_CRL_SECF | RTC_CRL_ALRF | RTC_CRL_OWF);

+

+  if (flags & RTC_CRL_SECF)

+    RTCD1.callback(&RTCD1, RTC_EVENT_SECOND);

+

+  if (flags & RTC_CRL_ALRF)

+    RTCD1.callback(&RTCD1, RTC_EVENT_ALARM);

+

+  if (flags & RTC_CRL_OWF)

+    RTCD1.callback(&RTCD1, RTC_EVENT_OVERFLOW);

+

+  CH_IRQ_EPILOGUE();

+}

+

+/*===========================================================================*/

+/* Driver exported functions.                                                */

+/*===========================================================================*/

+

+/**

+ * @brief   Load value of RTCCLK to prescaler registers.

+ * @note    The pre-scaler must not be set on every reset as RTC clock

+ *          counts are lost when it is set.

+ * @note    This function designed to be called from

+ *          hal_lld_backup_domain_init(). Because there is only place

+ *          where possible to detect BKP domain reset event reliably.

+ *

+ * @notapi

+ */

+void rtc_lld_set_prescaler(void){

+  rtc_lld_acquire();

+  RTC->PRLH = (uint16_t)((STM32_RTCCLK - 1) >> 16) & 0x000F;

+  RTC->PRLL = (uint16_t)(((STM32_RTCCLK - 1))      & 0xFFFF);

+  rtc_lld_release();

+}

+

+/**

+ * @brief   Initialize RTC.

+ *

+ * @notapi

+ */

+void rtc_lld_init(void){

+

+  /* RSF bit must be cleared by software after an APB1 reset or an APB1 clock

+     stop. Otherwise its value will not be actual. */

+  RTC->CRL &= ~RTC_CRL_RSF;

+

+  /* Required because access to PRL.*/

+  rtc_lld_apb1_sync();

+

+  /* All interrupts initially disabled.*/

+  rtc_lld_wait_write();

+  RTC->CRH = 0;

+

+  /* Callback initially disabled.*/

+  RTCD1.callback = NULL;

+

+  /* IRQ vector permanently assigned to this driver.*/

+  nvicEnableVector(RTC_IRQn, CORTEX_PRIORITY_MASK(STM32_RTC_IRQ_PRIORITY));

+}

+

+/**

+ * @brief   Set current time.

+ * @note    Fractional part will be silently ignored. There is no possibility

+ *          to change it on STM32F1xx platform.

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @param[in] timespec  pointer to a @p RTCTime structure

+ *

+ * @notapi

+ */

+void rtc_lld_set_time(RTCDriver *rtcp, const RTCTime *timespec) {

+

+  (void)rtcp;

+

+  rtc_lld_acquire();

+  RTC->CNTH = (uint16_t)(timespec->tv_sec >> 16);

+  RTC->CNTL = (uint16_t)(timespec->tv_sec & 0xFFFF);

+  rtc_lld_release();

+}

+

+/**

+ * @brief   Get current time.

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @param[in] timespec  pointer to a @p RTCTime structure

+ *

+ * @notapi

+ */

+void rtc_lld_get_time(RTCDriver *rtcp, RTCTime *timespec) {

+  (void)rtcp;

+

+  uint32_t time_frac;

+

+  /* Required because access to CNT and DIV.*/

+  rtc_lld_apb1_sync();

+

+  /* Loops until two consecutive read returning the same value.*/

+  do {

+    timespec->tv_sec = ((uint32_t)(RTC->CNTH) << 16) + RTC->CNTL;

+    time_frac = (((uint32_t)RTC->DIVH) << 16) + (uint32_t)RTC->DIVL;

+  } while ((timespec->tv_sec) != (((uint32_t)(RTC->CNTH) << 16) + RTC->CNTL));

+

+  timespec->tv_msec = (uint16_t)(((STM32_RTCCLK - 1 - time_frac) * 1000) /

+                                 STM32_RTCCLK);

+}

+

+/**

+ * @brief   Set alarm time.

+ *

+ * @note      Default value after BKP domain reset is 0xFFFFFFFF

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @param[in] alarm     alarm identifier

+ * @param[in] alarmspec pointer to a @p RTCAlarm structure

+ *

+ * @notapi

+ */

+void rtc_lld_set_alarm(RTCDriver *rtcp,

+                       rtcalarm_t alarm,

+                       const RTCAlarm *alarmspec) {

+

+  (void)rtcp;

+  (void)alarm;

+

+  rtc_lld_acquire();

+  if (alarmspec != NULL) {

+    RTC->ALRH = (uint16_t)(alarmspec->tv_sec >> 16);

+    RTC->ALRL = (uint16_t)(alarmspec->tv_sec & 0xFFFF);

+  }

+  else {

+    RTC->ALRH = 0;

+    RTC->ALRL = 0;

+  }

+  rtc_lld_release();

+}

+

+/**

+ * @brief   Get current alarm.

+ * @note    If an alarm has not been set then the returned alarm specification

+ *          is not meaningful.

+ *

+ * @note    Default value after BKP domain reset is 0xFFFFFFFF.

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @param[in] alarm     alarm identifier

+ * @param[out] alarmspec pointer to a @p RTCAlarm structure

+ *

+ * @notapi

+ */

+void rtc_lld_get_alarm(RTCDriver *rtcp,

+                       rtcalarm_t alarm,

+                       RTCAlarm *alarmspec) {

+

+  (void)rtcp;

+  (void)alarm;

+

+  /* Required because access to ALR.*/

+  rtc_lld_apb1_sync();

+

+  alarmspec->tv_sec = ((RTC->ALRH << 16) + RTC->ALRL);

+}

+

+/**

+ * @brief   Enables or disables RTC callbacks.

+ * @details This function enables or disables callbacks, use a @p NULL pointer

+ *          in order to disable a callback.

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @param[in] callback  callback function pointer or @p NULL

+ *

+ * @notapi

+ */

+void rtc_lld_set_callback(RTCDriver *rtcp, rtccb_t callback) {

+

+  if (callback != NULL) {

+

+    /* IRQ sources enabled only after setting up the callback.*/

+    rtcp->callback = callback;

+

+    rtc_lld_wait_write();

+    RTC->CRL &= ~(RTC_CRL_OWF | RTC_CRL_ALRF | RTC_CRL_SECF);

+    RTC->CRH = RTC_CRH_OWIE | RTC_CRH_ALRIE | RTC_CRH_SECIE;

+  }

+  else {

+    rtc_lld_wait_write();

+    RTC->CRH = 0;

+

+    /* Callback set to NULL only after disabling the IRQ sources.*/

+    rtcp->callback = NULL;

+  }

+}

+

+#include "chrtclib.h"

+

+/**

+ * @brief   Get current time in format suitable for usage in FatFS.

+ *

+ * @param[in] rtcp      pointer to RTC driver structure

+ * @return              FAT time value.

+ *

+ * @api

+ */

+uint32_t rtc_lld_get_time_fat(RTCDriver *rtcp) {

+  uint32_t fattime;

+  struct tm timp;

+

+  rtcGetTimeTm(rtcp, &timp);

+

+  fattime  = (timp.tm_sec)       >> 1;

+  fattime |= (timp.tm_min)       << 5;

+  fattime |= (timp.tm_hour)      << 11;

+  fattime |= (timp.tm_mday)      << 16;

+  fattime |= (timp.tm_mon + 1)   << 21;

+  fattime |= (timp.tm_year - 80) << 25;

+

+  return fattime;

+}

+#endif /* HAL_USE_RTC */

+

+/** @} */

diff --git a/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.h b/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.h
new file mode 100644
index 000000000..62b74cc46
--- /dev/null
+++ b/os/hal/ports/STM32/LLD/RTCv1/rtc_lld.h
@@ -0,0 +1,187 @@
+/*

+    ChibiOS/RT - Copyright (C) 2006-2013 Giovanni Di Sirio

+

+    Licensed under the Apache License, Version 2.0 (the "License");

+    you may not use this file except in compliance with the License.

+    You may obtain a copy of the License at

+

+        http://www.apache.org/licenses/LICENSE-2.0

+

+    Unless required by applicable law or agreed to in writing, software

+    distributed under the License is distributed on an "AS IS" BASIS,

+    WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.

+    See the License for the specific language governing permissions and

+    limitations under the License.

+*/

+/*

+   Concepts and parts of this file have been contributed by Uladzimir Pylinsky

+   aka barthess.

+ */

+

+/**

+ * @file    STM32/RTCv1/rtc_lld.h

+ * @brief   STM32F1xx RTC subsystem low level driver header.

+ *

+ * @addtogroup RTC

+ * @{

+ */

+

+#ifndef _RTC_LLD_H_

+#define _RTC_LLD_H_

+

+#if HAL_USE_RTC || defined(__DOXYGEN__)

+

+/*===========================================================================*/

+/* Driver constants.                                                         */

+/*===========================================================================*/

+

+/**

+ * @brief   This RTC implementation supports callbacks.

+ */

+#define RTC_SUPPORTS_CALLBACKS      TRUE

+

+/**

+ * @brief   One alarm comparator available.

+ */

+#define RTC_ALARMS                  1

+

+/*===========================================================================*/

+/* Driver pre-compile time settings.                                         */

+/*===========================================================================*/

+

+/**

+ * @name    Configuration options

+ * @{

+ */

+/*

+ * RTC driver system settings.

+ */

+#define STM32_RTC_IRQ_PRIORITY      15

+/** @} */

+

+/*===========================================================================*/

+/* Derived constants and error checks.                                       */

+/*===========================================================================*/

+

+#if HAL_USE_RTC && !STM32_HAS_RTC

+#error "RTC not present in the selected device"

+#endif

+

+#if STM32_RTCCLK == 0

+#error "RTC clock not enabled"

+#endif

+

+/*===========================================================================*/

+/* Driver data structures and types.                                         */

+/*===========================================================================*/

+

+/**

+ * @brief   Type of a structure representing an RTC alarm time stamp.

+ */

+typedef struct RTCAlarm RTCAlarm;

+

+/**

+ * @brief   Type of a structure representing an RTC callbacks config.

+ */

+typedef struct RTCCallbackConfig RTCCallbackConfig;

+

+/**

+ * @brief   Type of an RTC alarm.

+ * @details Meaningful on platforms with more than 1 alarm comparator.

+ */

+typedef uint32_t rtcalarm_t;

+

+/**

+ * @brief   Type of an RTC event.

+ */

+typedef enum {

+  RTC_EVENT_SECOND = 0,                 /** Triggered every second.         */

+  RTC_EVENT_ALARM = 1,                  /** Triggered on alarm.             */

+  RTC_EVENT_OVERFLOW = 2                /** Triggered on counter overflow.  */

+} rtcevent_t;

+

+/**

+ * @brief   Type of a generic RTC callback.

+ */

+typedef void (*rtccb_t)(RTCDriver *rtcp, rtcevent_t event);

+

+/**

+ * @brief   Structure representing an RTC callbacks config.

+ */

+struct RTCCallbackConfig{

+  /**

+   * @brief Generic RTC callback pointer.

+   */

+  rtccb_t           callback;

+};

+

+/**

+ * @brief   Structure representing an RTC time stamp.

+ */

+struct RTCTime {

+  /**

+   * @brief Seconds since UNIX epoch.

+   */

+  uint32_t tv_sec;

+  /**

+   * @brief Fractional part.

+   */

+  uint32_t tv_msec;

+};

+

+/**

+ * @brief   Structure representing an RTC alarm time stamp.

+ */

+struct RTCAlarm {

+  /**

+   * @brief Seconds since UNIX epoch.

+   */

+  uint32_t          tv_sec;

+};

+

+/**

+ * @brief   Structure representing an RTC driver.

+ */

+struct RTCDriver{

+  /**

+   * @brief Callback pointer.

+   */

+  rtccb_t           callback;

+};

+

+/*===========================================================================*/

+/* Driver macros.                                                            */

+/*===========================================================================*/

+

+/*===========================================================================*/

+/* External declarations.                                                    */

+/*===========================================================================*/

+

+#if !defined(__DOXYGEN__)

+extern RTCDriver RTCD1;

+#endif

+

+#ifdef __cplusplus

+extern "C" {

+#endif

+  void rtc_lld_set_prescaler(void);

+  void rtc_lld_init(void);

+  void rtc_lld_set_time(RTCDriver *rtcp, const RTCTime *timespec);

+  void rtc_lld_get_time(RTCDriver *rtcp, RTCTime *timespec);

+  void rtc_lld_set_alarm(RTCDriver *rtcp,

+                         rtcalarm_t alarm,

+                         const RTCAlarm *alarmspec);

+  void rtc_lld_get_alarm(RTCDriver *rtcp,

+                         rtcalarm_t alarm,

+                         RTCAlarm *alarmspec);

+  void rtc_lld_set_callback(RTCDriver *rtcp, rtccb_t callback);

+  uint32_t rtc_lld_get_time_fat(RTCDriver *rtcp);

+#ifdef __cplusplus

+}

+#endif

+

+#endif /* HAL_USE_RTC */

+

+#endif /* _RTC_LLD_H_ */

+

+/** @} */