mbed official / mbed-dev

mbed library sources. Supersedes mbed-src.

Dependents:   Nucleo_Hello_Encoder BLE_iBeaconScan AM1805_DEMO DISCO-F429ZI_ExportTemplate1 ... more

targets/TARGET_STM/rtc_api.c@186:707f6e361f3e, 2018-06-22 (annotated)

Committer:
Anna Bridge
Date:
Fri Jun 22 16:45:37 2018 +0100
Revision:
186:707f6e361f3e
Parent:
184:08ed48f1de7f
Child:
187:0387e8f68319
mbed-dev library. Release version 162

Who changed what in which revision?

UserRevisionLine numberNew contents of line
<> 154:37f96f9d4de2 1 /* mbed Microcontroller Library
<> 154:37f96f9d4de2 2 *******************************************************************************
Anna Bridge 186:707f6e361f3e 3 * Copyright (c) 2018, STMicroelectronics
<> 154:37f96f9d4de2 4 * All rights reserved.
<> 154:37f96f9d4de2 5 *
<> 154:37f96f9d4de2 6 * Redistribution and use in source and binary forms, with or without
<> 154:37f96f9d4de2 7 * modification, are permitted provided that the following conditions are met:
<> 154:37f96f9d4de2 8 *
<> 154:37f96f9d4de2 9 * 1. Redistributions of source code must retain the above copyright notice,
<> 154:37f96f9d4de2 10 * this list of conditions and the following disclaimer.
<> 154:37f96f9d4de2 11 * 2. Redistributions in binary form must reproduce the above copyright notice,
<> 154:37f96f9d4de2 12 * this list of conditions and the following disclaimer in the documentation
<> 154:37f96f9d4de2 13 * and/or other materials provided with the distribution.
<> 154:37f96f9d4de2 14 * 3. Neither the name of STMicroelectronics nor the names of its contributors
<> 154:37f96f9d4de2 15 * may be used to endorse or promote products derived from this software
<> 154:37f96f9d4de2 16 * without specific prior written permission.
<> 154:37f96f9d4de2 17 *
<> 154:37f96f9d4de2 18 * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS"
<> 154:37f96f9d4de2 19 * AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
<> 154:37f96f9d4de2 20 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE
<> 154:37f96f9d4de2 21 * DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT HOLDER OR CONTRIBUTORS BE LIABLE
<> 154:37f96f9d4de2 22 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
<> 154:37f96f9d4de2 23 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR
<> 154:37f96f9d4de2 24 * SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER
<> 154:37f96f9d4de2 25 * CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY,
<> 154:37f96f9d4de2 26 * OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE
<> 154:37f96f9d4de2 27 * OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
<> 154:37f96f9d4de2 28 *******************************************************************************
<> 154:37f96f9d4de2 29 */
Anna Bridge 180:96ed750bd169 30
<> 154:37f96f9d4de2 31 #if DEVICE_RTC
<> 154:37f96f9d4de2 32
<> 154:37f96f9d4de2 33 #include "rtc_api_hal.h"
AnnaBridge 167:e84263d55307 34 #include "mbed_mktime.h"
Anna Bridge 186:707f6e361f3e 35 #include "mbed_error.h"
<> 154:37f96f9d4de2 36
<> 154:37f96f9d4de2 37 static RTC_HandleTypeDef RtcHandle;
<> 154:37f96f9d4de2 38
<> 154:37f96f9d4de2 39 void rtc_init(void)
<> 154:37f96f9d4de2 40 {
AnnaBridge 176:447f873cad2f 41 RCC_OscInitTypeDef RCC_OscInitStruct = {0};
AnnaBridge 176:447f873cad2f 42 RCC_PeriphCLKInitTypeDef PeriphClkInitStruct = {0};
<> 154:37f96f9d4de2 43
<> 154:37f96f9d4de2 44 // Enable access to Backup domain
Anna Bridge 180:96ed750bd169 45 __HAL_RCC_PWR_CLK_ENABLE();
<> 154:37f96f9d4de2 46 HAL_PWR_EnableBkUpAccess();
<> 154:37f96f9d4de2 47
Anna Bridge 186:707f6e361f3e 48 #if DEVICE_LPTICKER
Anna Bridge 186:707f6e361f3e 49 if ( (rtc_isenabled()) && ((RTC->PRER & RTC_PRER_PREDIV_S) == PREDIV_S_VALUE) ) {
Anna Bridge 186:707f6e361f3e 50 #else /* DEVICE_LPTICKER */
Anna Bridge 180:96ed750bd169 51 if (rtc_isenabled()) {
Anna Bridge 186:707f6e361f3e 52 #endif /* DEVICE_LPTICKER */
Anna Bridge 180:96ed750bd169 53 return;
Anna Bridge 180:96ed750bd169 54 }
<> 154:37f96f9d4de2 55
Anna Bridge 180:96ed750bd169 56 #if MBED_CONF_TARGET_LSE_AVAILABLE
AnnaBridge 184:08ed48f1de7f 57 RCC_OscInitStruct.OscillatorType = RCC_OSCILLATORTYPE_LSE;
<> 154:37f96f9d4de2 58 RCC_OscInitStruct.PLL.PLLState = RCC_PLL_NONE; // Mandatory, otherwise the PLL is reconfigured!
<> 154:37f96f9d4de2 59 RCC_OscInitStruct.LSEState = RCC_LSE_ON;
<> 154:37f96f9d4de2 60
Anna Bridge 180:96ed750bd169 61 if (HAL_RCC_OscConfig(&RCC_OscInitStruct) != HAL_OK) {
<> 154:37f96f9d4de2 62 error("Cannot initialize RTC with LSE\n");
<> 154:37f96f9d4de2 63 }
<> 154:37f96f9d4de2 64
Anna Bridge 180:96ed750bd169 65 __HAL_RCC_RTC_CLKPRESCALER(RCC_RTCCLKSOURCE_LSE);
Anna Bridge 180:96ed750bd169 66 __HAL_RCC_RTC_CONFIG(RCC_RTCCLKSOURCE_LSE);
Anna Bridge 180:96ed750bd169 67
<> 154:37f96f9d4de2 68 PeriphClkInitStruct.PeriphClockSelection = RCC_PERIPHCLK_RTC;
<> 154:37f96f9d4de2 69 PeriphClkInitStruct.RTCClockSelection = RCC_RTCCLKSOURCE_LSE;
<> 154:37f96f9d4de2 70 if (HAL_RCCEx_PeriphCLKConfig(&PeriphClkInitStruct) != HAL_OK) {
<> 154:37f96f9d4de2 71 error("PeriphClkInitStruct RTC failed with LSE\n");
<> 154:37f96f9d4de2 72 }
Anna Bridge 180:96ed750bd169 73 #else /* MBED_CONF_TARGET_LSE_AVAILABLE */
<> 154:37f96f9d4de2 74 // Reset Backup domain
<> 154:37f96f9d4de2 75 __HAL_RCC_BACKUPRESET_FORCE();
<> 154:37f96f9d4de2 76 __HAL_RCC_BACKUPRESET_RELEASE();
<> 154:37f96f9d4de2 77
<> 154:37f96f9d4de2 78 // Enable LSI clock
AnnaBridge 184:08ed48f1de7f 79 RCC_OscInitStruct.OscillatorType = RCC_OSCILLATORTYPE_LSI;
<> 154:37f96f9d4de2 80 RCC_OscInitStruct.PLL.PLLState = RCC_PLL_NONE; // Mandatory, otherwise the PLL is reconfigured!
<> 154:37f96f9d4de2 81 RCC_OscInitStruct.LSIState = RCC_LSI_ON;
<> 154:37f96f9d4de2 82 if (HAL_RCC_OscConfig(&RCC_OscInitStruct) != HAL_OK) {
<> 154:37f96f9d4de2 83 error("Cannot initialize RTC with LSI\n");
<> 154:37f96f9d4de2 84 }
<> 154:37f96f9d4de2 85
<> 154:37f96f9d4de2 86 __HAL_RCC_RTC_CLKPRESCALER(RCC_RTCCLKSOURCE_LSI);
<> 154:37f96f9d4de2 87 __HAL_RCC_RTC_CONFIG(RCC_RTCCLKSOURCE_LSI);
<> 154:37f96f9d4de2 88
<> 154:37f96f9d4de2 89 PeriphClkInitStruct.PeriphClockSelection = RCC_PERIPHCLK_RTC;
<> 154:37f96f9d4de2 90 PeriphClkInitStruct.RTCClockSelection = RCC_RTCCLKSOURCE_LSI;
<> 154:37f96f9d4de2 91 if (HAL_RCCEx_PeriphCLKConfig(&PeriphClkInitStruct) != HAL_OK) {
<> 154:37f96f9d4de2 92 error("PeriphClkInitStruct RTC failed with LSI\n");
<> 154:37f96f9d4de2 93 }
Anna Bridge 180:96ed750bd169 94 #endif /* MBED_CONF_TARGET_LSE_AVAILABLE */
<> 154:37f96f9d4de2 95
<> 154:37f96f9d4de2 96 // Enable RTC
<> 154:37f96f9d4de2 97 __HAL_RCC_RTC_ENABLE();
<> 154:37f96f9d4de2 98
Anna Bridge 180:96ed750bd169 99 RtcHandle.Instance = RTC;
Anna Bridge 180:96ed750bd169 100 RtcHandle.State = HAL_RTC_STATE_RESET;
Anna Bridge 180:96ed750bd169 101
<> 154:37f96f9d4de2 102 #if TARGET_STM32F1
<> 154:37f96f9d4de2 103 RtcHandle.Init.AsynchPrediv = RTC_AUTO_1_SECOND;
<> 154:37f96f9d4de2 104 #else /* TARGET_STM32F1 */
<> 154:37f96f9d4de2 105 RtcHandle.Init.HourFormat = RTC_HOURFORMAT_24;
Anna Bridge 186:707f6e361f3e 106 RtcHandle.Init.AsynchPrediv = PREDIV_A_VALUE;
Anna Bridge 186:707f6e361f3e 107 RtcHandle.Init.SynchPrediv = PREDIV_S_VALUE;
<> 154:37f96f9d4de2 108 RtcHandle.Init.OutPut = RTC_OUTPUT_DISABLE;
<> 154:37f96f9d4de2 109 RtcHandle.Init.OutPutPolarity = RTC_OUTPUT_POLARITY_HIGH;
<> 154:37f96f9d4de2 110 RtcHandle.Init.OutPutType = RTC_OUTPUT_TYPE_OPENDRAIN;
<> 154:37f96f9d4de2 111 #endif /* TARGET_STM32F1 */
<> 154:37f96f9d4de2 112
<> 154:37f96f9d4de2 113 if (HAL_RTC_Init(&RtcHandle) != HAL_OK) {
Anna Bridge 180:96ed750bd169 114 error("RTC initialization failed");
<> 154:37f96f9d4de2 115 }
<> 154:37f96f9d4de2 116
Anna Bridge 180:96ed750bd169 117 rtc_synchronize(); // Wait for RSF
<> 154:37f96f9d4de2 118
Anna Bridge 180:96ed750bd169 119 if (!rtc_isenabled()) {
<> 154:37f96f9d4de2 120 rtc_write(0);
<> 154:37f96f9d4de2 121 }
<> 154:37f96f9d4de2 122 }
<> 154:37f96f9d4de2 123
<> 154:37f96f9d4de2 124 void rtc_free(void)
<> 154:37f96f9d4de2 125 {
<> 154:37f96f9d4de2 126 // Disable access to Backup domain
<> 154:37f96f9d4de2 127 HAL_PWR_DisableBkUpAccess();
<> 154:37f96f9d4de2 128 }
<> 154:37f96f9d4de2 129
<> 154:37f96f9d4de2 130 /*
<> 160:d5399cc887bb 131 ST RTC_DateTypeDef structure
<> 160:d5399cc887bb 132 WeekDay 1=monday, 2=tuesday, ..., 7=sunday
<> 160:d5399cc887bb 133 Month 0x1=january, 0x2=february, ..., 0x12=december
<> 160:d5399cc887bb 134 Date day of the month 1-31
<> 160:d5399cc887bb 135 Year year 0-99
<> 160:d5399cc887bb 136
<> 160:d5399cc887bb 137 ST RTC_TimeTypeDef structure
<> 160:d5399cc887bb 138 Hours 0-12 if the RTC_HourFormat_12 is selected during init
<> 160:d5399cc887bb 139 0-23 if the RTC_HourFormat_24 is selected during init
<> 160:d5399cc887bb 140 Minutes 0-59
<> 160:d5399cc887bb 141 Seconds 0-59
<> 160:d5399cc887bb 142 TimeFormat RTC_HOURFORMAT12_AM/RTC_HOURFORMAT12_PM
<> 160:d5399cc887bb 143 SubSeconds time unit range between [0-1] Second with [1 Sec / SecondFraction +1] granularity
<> 160:d5399cc887bb 144 SecondFraction range or granularity of Sub Second register content corresponding to Synchronous pre-scaler factor value (PREDIV_S)
<> 160:d5399cc887bb 145 DayLightSaving RTC_DAYLIGHTSAVING_SUB1H/RTC_DAYLIGHTSAVING_ADD1H/RTC_DAYLIGHTSAVING_NONE
<> 160:d5399cc887bb 146 StoreOperation RTC_STOREOPERATION_RESET/RTC_STOREOPERATION_SET
<> 160:d5399cc887bb 147
<> 154:37f96f9d4de2 148 struct tm
<> 154:37f96f9d4de2 149 tm_sec seconds after the minute 0-61
<> 154:37f96f9d4de2 150 tm_min minutes after the hour 0-59
<> 154:37f96f9d4de2 151 tm_hour hours since midnight 0-23
<> 154:37f96f9d4de2 152 tm_mday day of the month 1-31
<> 154:37f96f9d4de2 153 tm_mon months since January 0-11
<> 154:37f96f9d4de2 154 tm_year years since 1900
<> 154:37f96f9d4de2 155 tm_wday days since Sunday 0-6
<> 154:37f96f9d4de2 156 tm_yday days since January 1 0-365
<> 154:37f96f9d4de2 157 tm_isdst Daylight Saving Time flag
<> 154:37f96f9d4de2 158 */
<> 160:d5399cc887bb 159
<> 160:d5399cc887bb 160 /*
<> 160:d5399cc887bb 161 Information about STM32F0, STM32F2, STM32F3, STM32F4, STM32F7, STM32L0, STM32L1, STM32L4:
<> 160:d5399cc887bb 162 BCD format is used to store the date in the RTC. The year is store on 2 * 4 bits.
<> 160:d5399cc887bb 163 Because the first year is reserved to see if the RTC is init, the supposed range is 01-99.
<> 160:d5399cc887bb 164 1st point is to cover the standard range from 1970 to 2038 (limited by the 32 bits of time_t).
<> 160:d5399cc887bb 165 2nd point is to keep the year 1970 and the leap years synchronized.
<> 160:d5399cc887bb 166
<> 160:d5399cc887bb 167 So by moving it 68 years forward from 1970, it become 1969-2067 which include 1970-2038.
<> 160:d5399cc887bb 168 68 is also a multiple of 4 so it let the leap year synchronized.
<> 160:d5399cc887bb 169
<> 160:d5399cc887bb 170 Information about STM32F1:
AnnaBridge 182:a56a73fd2a6f 171 32bit register is used (no BCD format) for the seconds.
AnnaBridge 182:a56a73fd2a6f 172 For date, there is no specific register, only a software structure.
<> 160:d5399cc887bb 173 It is then not a problem to not use shifts.
<> 160:d5399cc887bb 174 */
<> 160:d5399cc887bb 175
<> 154:37f96f9d4de2 176 time_t rtc_read(void)
<> 154:37f96f9d4de2 177 {
AnnaBridge 176:447f873cad2f 178 RTC_DateTypeDef dateStruct = {0};
AnnaBridge 176:447f873cad2f 179 RTC_TimeTypeDef timeStruct = {0};
<> 154:37f96f9d4de2 180 struct tm timeinfo;
<> 154:37f96f9d4de2 181
<> 154:37f96f9d4de2 182 RtcHandle.Instance = RTC;
<> 154:37f96f9d4de2 183
<> 154:37f96f9d4de2 184 // Read actual date and time
<> 154:37f96f9d4de2 185 // Warning: the time must be read first!
<> 160:d5399cc887bb 186 HAL_RTC_GetTime(&RtcHandle, &timeStruct, RTC_FORMAT_BIN);
<> 160:d5399cc887bb 187 HAL_RTC_GetDate(&RtcHandle, &dateStruct, RTC_FORMAT_BIN);
<> 154:37f96f9d4de2 188
AnnaBridge 182:a56a73fd2a6f 189 #if TARGET_STM32F1
AnnaBridge 182:a56a73fd2a6f 190 /* date information is null before first write procedure */
AnnaBridge 182:a56a73fd2a6f 191 /* set 01/01/1970 as default values */
AnnaBridge 182:a56a73fd2a6f 192 if (dateStruct.Year == 0) {
AnnaBridge 182:a56a73fd2a6f 193 dateStruct.Year = 2 ;
AnnaBridge 182:a56a73fd2a6f 194 dateStruct.Month = 1 ;
AnnaBridge 182:a56a73fd2a6f 195 dateStruct.Date = 1 ;
AnnaBridge 182:a56a73fd2a6f 196 }
AnnaBridge 182:a56a73fd2a6f 197 #endif
AnnaBridge 182:a56a73fd2a6f 198
<> 154:37f96f9d4de2 199 // Setup a tm structure based on the RTC
AnnaBridge 182:a56a73fd2a6f 200 /* tm_wday information is ignored by _rtc_maketime */
AnnaBridge 182:a56a73fd2a6f 201 /* tm_isdst information is ignored by _rtc_maketime */
<> 154:37f96f9d4de2 202 timeinfo.tm_mon = dateStruct.Month - 1;
<> 154:37f96f9d4de2 203 timeinfo.tm_mday = dateStruct.Date;
<> 154:37f96f9d4de2 204 timeinfo.tm_year = dateStruct.Year + 68;
<> 154:37f96f9d4de2 205 timeinfo.tm_hour = timeStruct.Hours;
<> 154:37f96f9d4de2 206 timeinfo.tm_min = timeStruct.Minutes;
<> 154:37f96f9d4de2 207 timeinfo.tm_sec = timeStruct.Seconds;
<> 154:37f96f9d4de2 208
<> 154:37f96f9d4de2 209 // Convert to timestamp
AnnaBridge 184:08ed48f1de7f 210 time_t t;
AnnaBridge 184:08ed48f1de7f 211 if (_rtc_maketime(&timeinfo, &t, RTC_4_YEAR_LEAP_YEAR_SUPPORT) == false) {
AnnaBridge 184:08ed48f1de7f 212 return 0;
AnnaBridge 184:08ed48f1de7f 213 }
<> 154:37f96f9d4de2 214
<> 154:37f96f9d4de2 215 return t;
<> 154:37f96f9d4de2 216 }
<> 154:37f96f9d4de2 217
<> 154:37f96f9d4de2 218 void rtc_write(time_t t)
<> 154:37f96f9d4de2 219 {
AnnaBridge 176:447f873cad2f 220 RTC_DateTypeDef dateStruct = {0};
AnnaBridge 176:447f873cad2f 221 RTC_TimeTypeDef timeStruct = {0};
<> 154:37f96f9d4de2 222
<> 154:37f96f9d4de2 223 RtcHandle.Instance = RTC;
<> 154:37f96f9d4de2 224
<> 154:37f96f9d4de2 225 // Convert the time into a tm
AnnaBridge 167:e84263d55307 226 struct tm timeinfo;
AnnaBridge 184:08ed48f1de7f 227 if (_rtc_localtime(t, &timeinfo, RTC_4_YEAR_LEAP_YEAR_SUPPORT) == false) {
AnnaBridge 167:e84263d55307 228 return;
AnnaBridge 167:e84263d55307 229 }
<> 154:37f96f9d4de2 230
<> 154:37f96f9d4de2 231 // Fill RTC structures
AnnaBridge 167:e84263d55307 232 if (timeinfo.tm_wday == 0) {
<> 160:d5399cc887bb 233 dateStruct.WeekDay = 7;
<> 160:d5399cc887bb 234 } else {
AnnaBridge 167:e84263d55307 235 dateStruct.WeekDay = timeinfo.tm_wday;
<> 160:d5399cc887bb 236 }
AnnaBridge 167:e84263d55307 237 dateStruct.Month = timeinfo.tm_mon + 1;
AnnaBridge 167:e84263d55307 238 dateStruct.Date = timeinfo.tm_mday;
AnnaBridge 167:e84263d55307 239 dateStruct.Year = timeinfo.tm_year - 68;
AnnaBridge 167:e84263d55307 240 timeStruct.Hours = timeinfo.tm_hour;
AnnaBridge 167:e84263d55307 241 timeStruct.Minutes = timeinfo.tm_min;
AnnaBridge 167:e84263d55307 242 timeStruct.Seconds = timeinfo.tm_sec;
<> 154:37f96f9d4de2 243
<> 154:37f96f9d4de2 244 #if !(TARGET_STM32F1)
<> 154:37f96f9d4de2 245 timeStruct.TimeFormat = RTC_HOURFORMAT_24;
<> 154:37f96f9d4de2 246 timeStruct.DayLightSaving = RTC_DAYLIGHTSAVING_NONE;
<> 154:37f96f9d4de2 247 timeStruct.StoreOperation = RTC_STOREOPERATION_RESET;
<> 154:37f96f9d4de2 248 #endif /* TARGET_STM32F1 */
<> 154:37f96f9d4de2 249
<> 154:37f96f9d4de2 250 // Change the RTC current date/time
Anna Bridge 180:96ed750bd169 251 if (HAL_RTC_SetDate(&RtcHandle, &dateStruct, RTC_FORMAT_BIN) != HAL_OK) {
Anna Bridge 180:96ed750bd169 252 error("HAL_RTC_SetDate error\n");
Anna Bridge 180:96ed750bd169 253 }
Anna Bridge 180:96ed750bd169 254 if (HAL_RTC_SetTime(&RtcHandle, &timeStruct, RTC_FORMAT_BIN) != HAL_OK) {
Anna Bridge 180:96ed750bd169 255 error("HAL_RTC_SetTime error\n");
Anna Bridge 180:96ed750bd169 256 }
<> 154:37f96f9d4de2 257 }
<> 154:37f96f9d4de2 258
<> 154:37f96f9d4de2 259 int rtc_isenabled(void)
<> 154:37f96f9d4de2 260 {
<> 160:d5399cc887bb 261 #if !(TARGET_STM32F1)
<> 160:d5399cc887bb 262 return ( ((RTC->ISR & RTC_ISR_INITS) == RTC_ISR_INITS) && ((RTC->ISR & RTC_ISR_RSF) == RTC_ISR_RSF) );
<> 160:d5399cc887bb 263 #else /* TARGET_STM32F1 */
<> 160:d5399cc887bb 264 return ((RTC->CRL & RTC_CRL_RSF) == RTC_CRL_RSF);
<> 160:d5399cc887bb 265 #endif /* TARGET_STM32F1 */
<> 154:37f96f9d4de2 266 }
<> 154:37f96f9d4de2 267
Anna Bridge 180:96ed750bd169 268 void rtc_synchronize(void)
Anna Bridge 180:96ed750bd169 269 {
Anna Bridge 180:96ed750bd169 270 RtcHandle.Instance = RTC;
Anna Bridge 180:96ed750bd169 271 if (HAL_RTC_WaitForSynchro(&RtcHandle) != HAL_OK) {
Anna Bridge 180:96ed750bd169 272 error("rtc_synchronize error\n");
Anna Bridge 180:96ed750bd169 273 }
Anna Bridge 180:96ed750bd169 274 }
Anna Bridge 180:96ed750bd169 275
Anna Bridge 186:707f6e361f3e 276 #if DEVICE_LPTICKER && !MBED_CONF_TARGET_LPTICKER_LPTIM
Anna Bridge 186:707f6e361f3e 277
Anna Bridge 186:707f6e361f3e 278 static void RTC_IRQHandler(void);
Anna Bridge 186:707f6e361f3e 279 static void (*irq_handler)(void);
Anna Bridge 186:707f6e361f3e 280
Anna Bridge 186:707f6e361f3e 281 volatile uint8_t lp_Fired = 0;
Anna Bridge 186:707f6e361f3e 282 volatile uint32_t LP_continuous_time = 0;
Anna Bridge 186:707f6e361f3e 283 volatile uint32_t LP_last_RTC_time = 0;
<> 154:37f96f9d4de2 284
<> 154:37f96f9d4de2 285 static void RTC_IRQHandler(void)
<> 154:37f96f9d4de2 286 {
AnnaBridge 176:447f873cad2f 287 /* Update HAL state */
Anna Bridge 180:96ed750bd169 288 RtcHandle.Instance = RTC;
Anna Bridge 186:707f6e361f3e 289 if(__HAL_RTC_WAKEUPTIMER_GET_IT(&RtcHandle, RTC_IT_WUT)) {
Anna Bridge 186:707f6e361f3e 290 /* Get the status of the Interrupt */
Anna Bridge 186:707f6e361f3e 291 if((uint32_t)(RTC->CR & RTC_IT_WUT) != (uint32_t)RESET) {
Anna Bridge 186:707f6e361f3e 292 /* Clear the WAKEUPTIMER interrupt pending bit */
Anna Bridge 186:707f6e361f3e 293 __HAL_RTC_WAKEUPTIMER_CLEAR_FLAG(&RtcHandle, RTC_FLAG_WUTF);
Anna Bridge 186:707f6e361f3e 294
Anna Bridge 186:707f6e361f3e 295 lp_Fired = 0;
Anna Bridge 186:707f6e361f3e 296 if (irq_handler) {
Anna Bridge 186:707f6e361f3e 297 irq_handler();
Anna Bridge 186:707f6e361f3e 298 }
Anna Bridge 186:707f6e361f3e 299 }
<> 154:37f96f9d4de2 300 }
Anna Bridge 186:707f6e361f3e 301
Anna Bridge 186:707f6e361f3e 302 if (lp_Fired) {
Anna Bridge 186:707f6e361f3e 303 lp_Fired = 0;
Anna Bridge 186:707f6e361f3e 304 if (irq_handler) {
Anna Bridge 186:707f6e361f3e 305 irq_handler();
Anna Bridge 186:707f6e361f3e 306 }
Anna Bridge 186:707f6e361f3e 307 }
Anna Bridge 186:707f6e361f3e 308
Anna Bridge 186:707f6e361f3e 309 __HAL_RTC_WAKEUPTIMER_EXTI_CLEAR_FLAG();
<> 154:37f96f9d4de2 310 }
<> 154:37f96f9d4de2 311
Anna Bridge 186:707f6e361f3e 312 uint32_t rtc_read_lp(void)
<> 154:37f96f9d4de2 313 {
AnnaBridge 181:57724642e740 314 RTC_TimeTypeDef timeStruct = {0};
AnnaBridge 181:57724642e740 315 RTC_DateTypeDef dateStruct = {0};
AnnaBridge 181:57724642e740 316
AnnaBridge 181:57724642e740 317 RtcHandle.Instance = RTC;
AnnaBridge 181:57724642e740 318 HAL_RTC_GetTime(&RtcHandle, &timeStruct, RTC_FORMAT_BIN);
AnnaBridge 181:57724642e740 319
AnnaBridge 181:57724642e740 320 /* Reading RTC current time locks the values in calendar shadow registers until Current date is read
AnnaBridge 181:57724642e740 321 to ensure consistency between the time and date values */
AnnaBridge 181:57724642e740 322 HAL_RTC_GetDate(&RtcHandle, &dateStruct, RTC_FORMAT_BIN);
AnnaBridge 181:57724642e740 323
AnnaBridge 181:57724642e740 324 if (timeStruct.SubSeconds > timeStruct.SecondFraction) {
AnnaBridge 181:57724642e740 325 /* SS can be larger than PREDIV_S only after a shift operation. In that case, the correct
AnnaBridge 181:57724642e740 326 time/date is one second less than as indicated by RTC_TR/RTC_DR. */
AnnaBridge 181:57724642e740 327 timeStruct.Seconds -= 1;
AnnaBridge 181:57724642e740 328 }
Anna Bridge 186:707f6e361f3e 329 uint32_t RTC_time_s = timeStruct.Seconds + timeStruct.Minutes * 60 + timeStruct.Hours * 60 * 60; // Max 0x0001-517F => * 8191 + 8191 = 0x2A2E-AE80
AnnaBridge 181:57724642e740 330
Anna Bridge 186:707f6e361f3e 331 if (LP_last_RTC_time <= RTC_time_s) {
Anna Bridge 186:707f6e361f3e 332 LP_continuous_time += (RTC_time_s - LP_last_RTC_time);
Anna Bridge 186:707f6e361f3e 333 } else {
Anna Bridge 186:707f6e361f3e 334 LP_continuous_time += (24 * 60 * 60 + RTC_time_s - LP_last_RTC_time);
Anna Bridge 186:707f6e361f3e 335 }
Anna Bridge 186:707f6e361f3e 336 LP_last_RTC_time = RTC_time_s;
Anna Bridge 186:707f6e361f3e 337
Anna Bridge 186:707f6e361f3e 338 return LP_continuous_time * PREDIV_S_VALUE + timeStruct.SecondFraction - timeStruct.SubSeconds;
<> 154:37f96f9d4de2 339 }
<> 154:37f96f9d4de2 340
Anna Bridge 186:707f6e361f3e 341 void rtc_set_wake_up_timer(timestamp_t timestamp)
<> 154:37f96f9d4de2 342 {
Anna Bridge 186:707f6e361f3e 343 uint32_t WakeUpCounter;
Anna Bridge 186:707f6e361f3e 344 uint32_t current_lp_time;
AnnaBridge 184:08ed48f1de7f 345
Anna Bridge 186:707f6e361f3e 346 current_lp_time = rtc_read_lp();
AnnaBridge 184:08ed48f1de7f 347
Anna Bridge 186:707f6e361f3e 348 if (timestamp < current_lp_time) {
Anna Bridge 186:707f6e361f3e 349 WakeUpCounter = 0xFFFFFFFF - current_lp_time + timestamp;
AnnaBridge 184:08ed48f1de7f 350 } else {
Anna Bridge 186:707f6e361f3e 351 WakeUpCounter = timestamp - current_lp_time;
Anna Bridge 186:707f6e361f3e 352 }
Anna Bridge 186:707f6e361f3e 353
Anna Bridge 186:707f6e361f3e 354 if (WakeUpCounter > 0xFFFF) {
Anna Bridge 186:707f6e361f3e 355 WakeUpCounter = 0xFFFF;
Anna Bridge 180:96ed750bd169 356 }
Anna Bridge 180:96ed750bd169 357
Anna Bridge 180:96ed750bd169 358 RtcHandle.Instance = RTC;
Anna Bridge 186:707f6e361f3e 359 if (HAL_RTCEx_SetWakeUpTimer_IT(&RtcHandle, WakeUpCounter, RTC_WAKEUPCLOCK_RTCCLK_DIV4) != HAL_OK) {
AnnaBridge 184:08ed48f1de7f 360 error("rtc_set_wake_up_timer init error\n");
<> 154:37f96f9d4de2 361 }
Anna Bridge 186:707f6e361f3e 362
Anna Bridge 186:707f6e361f3e 363 NVIC_SetVector(RTC_WKUP_IRQn, (uint32_t)RTC_IRQHandler);
Anna Bridge 186:707f6e361f3e 364 irq_handler = (void (*)(void))lp_ticker_irq_handler;
Anna Bridge 186:707f6e361f3e 365 NVIC_EnableIRQ(RTC_WKUP_IRQn);
Anna Bridge 186:707f6e361f3e 366 }
Anna Bridge 186:707f6e361f3e 367
Anna Bridge 186:707f6e361f3e 368 void rtc_fire_interrupt(void)
Anna Bridge 186:707f6e361f3e 369 {
Anna Bridge 186:707f6e361f3e 370 lp_Fired = 1;
Anna Bridge 186:707f6e361f3e 371 NVIC_SetVector(RTC_WKUP_IRQn, (uint32_t)RTC_IRQHandler);
Anna Bridge 186:707f6e361f3e 372 irq_handler = (void (*)(void))lp_ticker_irq_handler;
Anna Bridge 186:707f6e361f3e 373 NVIC_SetPendingIRQ(RTC_WKUP_IRQn);
Anna Bridge 186:707f6e361f3e 374 NVIC_EnableIRQ(RTC_WKUP_IRQn);
<> 154:37f96f9d4de2 375 }
<> 154:37f96f9d4de2 376
<> 154:37f96f9d4de2 377 void rtc_deactivate_wake_up_timer(void)
<> 154:37f96f9d4de2 378 {
Anna Bridge 180:96ed750bd169 379 RtcHandle.Instance = RTC;
<> 154:37f96f9d4de2 380 HAL_RTCEx_DeactivateWakeUpTimer(&RtcHandle);
<> 154:37f96f9d4de2 381 }
<> 154:37f96f9d4de2 382
Anna Bridge 186:707f6e361f3e 383 #endif /* DEVICE_LPTICKER && !MBED_CONF_TARGET_LPTICKER_LPTIM */
<> 154:37f96f9d4de2 384
<> 154:37f96f9d4de2 385 #endif /* DEVICE_RTC */