1 | /* mbed Microcontroller Library
|
---|
2 | * Copyright (c) 2006-2015 ARM Limited
|
---|
3 | *
|
---|
4 | * Licensed under the Apache License, Version 2.0 (the "License");
|
---|
5 | * you may not use this file except in compliance with the License.
|
---|
6 | * You may obtain a copy of the License at
|
---|
7 | *
|
---|
8 | * http://www.apache.org/licenses/LICENSE-2.0
|
---|
9 | *
|
---|
10 | * Unless required by applicable law or agreed to in writing, software
|
---|
11 | * distributed under the License is distributed on an "AS IS" BASIS,
|
---|
12 | * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
|
---|
13 | * See the License for the specific language governing permissions and
|
---|
14 | * limitations under the License.
|
---|
15 | */
|
---|
16 |
|
---|
17 | #include "mbed_assert.h"
|
---|
18 | #include "device.h"
|
---|
19 |
|
---|
20 | #if DEVICE_RTC
|
---|
21 |
|
---|
22 | #include "rtc_api.h"
|
---|
23 | #include "rtc_iodefine.h"
|
---|
24 |
|
---|
25 |
|
---|
26 | #define RCR1_VAL_ON (0x08u) // AIE = 1
|
---|
27 | #define RCR1_VAL_OFF (0x00u)
|
---|
28 | #define RCR2_VAL_ALLSTOP (0x00u)
|
---|
29 | #define RCR2_VAL_START (0x01u) // START = 1
|
---|
30 | #define RCR2_VAL_RESET (0x02u) // RESET = 1
|
---|
31 | #define RCR3_VAL (0x00u)
|
---|
32 | #define RCR5_VAL_EXTAL (0x01u) // RCKSEL = connect EXTAL
|
---|
33 | #define RCR5_VAL_RTCX1 (0x00u) // RCKSEL = disconnect EXTAL
|
---|
34 | #define RFRH_VAL_13333 (0x8003u) // 13.3333MHz (= 64Hz * 0x32DCD)
|
---|
35 | #define RFRL_VAL_13333 (0x2DCDu) //
|
---|
36 | #define RFRH_VAL_MAX (0x0007u) // MAX value (= 128Hz * 0x7FFFF)
|
---|
37 | #define RFRL_VAL_MAX (0xFFFFu) //
|
---|
38 |
|
---|
39 | #define MASK_00_03_POS (0x000Fu)
|
---|
40 | #define MASK_04_07_POS (0x00F0u)
|
---|
41 | #define MASK_08_11_POS (0x0F00u)
|
---|
42 | #define MASK_12_15_POS (0xF000u)
|
---|
43 | #define MASK_16_20_POS (0x000F0000u)
|
---|
44 | #define SHIFT_1_HBYTE (4u)
|
---|
45 | #define SHIFT_2_HBYTE (8u)
|
---|
46 | #define SHIFT_3_HBYTE (12u)
|
---|
47 | #define SHIFT_1BYTE (8u)
|
---|
48 | #define SHIFT_2BYTE (16u)
|
---|
49 |
|
---|
50 | #define TIME_ERROR_VAL (0xFFFFFFFFu)
|
---|
51 |
|
---|
52 | static int rtc_dec8_to_hex(uint8_t dec_val, uint8_t offset, int *hex_val);
|
---|
53 | static int rtc_dec16_to_hex(uint16_t dec_val, uint16_t offset, int *hex_val);
|
---|
54 | static uint8_t rtc_hex8_to_dec(uint8_t hex_val);
|
---|
55 | static uint16_t rtc_hex16_to_dec(uint16_t hex_val);
|
---|
56 |
|
---|
57 |
|
---|
58 | /*
|
---|
59 | * Setup the RTC based on a time structure.
|
---|
60 | * The rtc_init function should be executed first.
|
---|
61 | * [in]
|
---|
62 | * None.
|
---|
63 | * [out]
|
---|
64 | * None.
|
---|
65 | */
|
---|
66 | void rtc_init(void) {
|
---|
67 | volatile uint8_t dummy_read;
|
---|
68 |
|
---|
69 | // Set control register
|
---|
70 | RTC.RCR2 = RCR2_VAL_ALLSTOP;
|
---|
71 | RTC.RCR1 = RCR1_VAL_ON;
|
---|
72 | RTC.RCR3 = RCR3_VAL;
|
---|
73 | RTC.RCR5 = RCR5_VAL_EXTAL;
|
---|
74 | RTC.RFRH = RFRH_VAL_13333;
|
---|
75 | RTC.RFRL = RFRL_VAL_13333;
|
---|
76 |
|
---|
77 | // Dummy read
|
---|
78 | dummy_read = RTC.RCR2;
|
---|
79 | dummy_read = RTC.RCR2;
|
---|
80 |
|
---|
81 | RTC.RCR2 = RCR2_VAL_RESET; // RESET = 1
|
---|
82 |
|
---|
83 | // Dummy read
|
---|
84 | dummy_read = RTC.RCR2;
|
---|
85 | dummy_read = RTC.RCR2;
|
---|
86 |
|
---|
87 | // Set timer and alarm. Default value :01-01-1970 00:00:00
|
---|
88 | RTC.RSECCNT = 0;
|
---|
89 | RTC.RMINCNT = 0;
|
---|
90 | RTC.RHRCNT = 0;
|
---|
91 | RTC.RWKCNT = 0;
|
---|
92 | RTC.RDAYCNT = 1;
|
---|
93 | RTC.RMONCNT = 1;
|
---|
94 | RTC.RYRCNT = 0x1970;
|
---|
95 | RTC.RSECAR = 0;
|
---|
96 | RTC.RMINAR = 0;
|
---|
97 | RTC.RHRAR = 0;
|
---|
98 | RTC.RWKAR = 0;
|
---|
99 | RTC.RDAYAR = 1;
|
---|
100 | RTC.RMONAR = 1;
|
---|
101 | RTC.RYRAR = 0x1970;
|
---|
102 |
|
---|
103 | // Dummy read
|
---|
104 | dummy_read = RTC.RYRCNT;
|
---|
105 | dummy_read = RTC.RYRCNT;
|
---|
106 |
|
---|
107 | }
|
---|
108 |
|
---|
109 |
|
---|
110 | /*
|
---|
111 | * Release the RTC based on a time structure.
|
---|
112 | * [in]
|
---|
113 | * None.
|
---|
114 | * [out]
|
---|
115 | * None.
|
---|
116 | */
|
---|
117 | void rtc_free(void) {
|
---|
118 | volatile uint8_t dummy_read;
|
---|
119 |
|
---|
120 | // Set control register
|
---|
121 | RTC.RCR2 = RCR2_VAL_ALLSTOP;
|
---|
122 | RTC.RCR1 = RCR1_VAL_OFF;
|
---|
123 | RTC.RCR3 = RCR3_VAL;
|
---|
124 | RTC.RCR5 = RCR5_VAL_RTCX1;
|
---|
125 | RTC.RFRH = RFRH_VAL_MAX;
|
---|
126 | RTC.RFRL = RFRL_VAL_MAX;
|
---|
127 |
|
---|
128 | // Dummy read
|
---|
129 | dummy_read = RTC.RCR2;
|
---|
130 | dummy_read = RTC.RCR2;
|
---|
131 | RTC.RCR2 = RCR2_VAL_RESET; // RESET = 1
|
---|
132 |
|
---|
133 | // Dummy read
|
---|
134 | dummy_read = RTC.RCR2;
|
---|
135 | dummy_read = RTC.RCR2;
|
---|
136 |
|
---|
137 | // Set timer and alarm. Default value :01-01-1970 00:00:00
|
---|
138 | RTC.RSECCNT = 0;
|
---|
139 | RTC.RMINCNT = 0;
|
---|
140 | RTC.RHRCNT = 0;
|
---|
141 | RTC.RWKCNT = 0;
|
---|
142 | RTC.RDAYCNT = 1;
|
---|
143 | RTC.RMONCNT = 1;
|
---|
144 | RTC.RYRCNT = 0x1970;
|
---|
145 | RTC.RSECAR = 0;
|
---|
146 | RTC.RMINAR = 0;
|
---|
147 | RTC.RHRAR = 0;
|
---|
148 | RTC.RWKAR = 0;
|
---|
149 | RTC.RDAYAR = 1;
|
---|
150 | RTC.RMONAR = 1;
|
---|
151 | RTC.RYRAR = 0x1970;
|
---|
152 |
|
---|
153 | // Dummy read
|
---|
154 | dummy_read = RTC.RYRCNT;
|
---|
155 | dummy_read = RTC.RYRCNT;
|
---|
156 |
|
---|
157 | }
|
---|
158 |
|
---|
159 |
|
---|
160 | /*
|
---|
161 | * Check the RTC has been enabled.
|
---|
162 | * Clock Control Register RTC.RCR1(bit3): 0 = Disabled, 1 = Enabled.
|
---|
163 | * [in]
|
---|
164 | * None.
|
---|
165 | * [out]
|
---|
166 | * 0:Disabled, 1:Enabled.
|
---|
167 | */
|
---|
168 | int rtc_isenabled(void) {
|
---|
169 | int ret_val = 0;
|
---|
170 |
|
---|
171 | if ((RTC.RCR1 & RCR1_VAL_ON) != 0) { // RTC ON ?
|
---|
172 | ret_val = 1;
|
---|
173 | }
|
---|
174 |
|
---|
175 | return ret_val;
|
---|
176 | }
|
---|
177 |
|
---|
178 |
|
---|
179 | /*
|
---|
180 | * RTC read function.
|
---|
181 | * [in]
|
---|
182 | * None.
|
---|
183 | * [out]
|
---|
184 | * UNIX timestamp value.
|
---|
185 | */
|
---|
186 | time_t rtc_read(void) {
|
---|
187 |
|
---|
188 | struct tm timeinfo;
|
---|
189 | int err = 0;
|
---|
190 | uint8_t tmp_regdata;
|
---|
191 | time_t t;
|
---|
192 |
|
---|
193 | if (rtc_isenabled() != 0) {
|
---|
194 | RTC.RCR1 &= ~0x10u; // CIE = 0
|
---|
195 | do {
|
---|
196 | // before reading process
|
---|
197 | tmp_regdata = RTC.RCR1;
|
---|
198 | tmp_regdata &= ~0x80u; // CF = 0
|
---|
199 | tmp_regdata |= 0x01u; // AF = 1
|
---|
200 | RTC.RCR1 = tmp_regdata;
|
---|
201 |
|
---|
202 | // Read RTC register
|
---|
203 | err = rtc_dec8_to_hex(RTC.RSECCNT , 0 , &timeinfo.tm_sec);
|
---|
204 | err += rtc_dec8_to_hex(RTC.RMINCNT , 0 , &timeinfo.tm_min);
|
---|
205 | err += rtc_dec8_to_hex(RTC.RHRCNT , 0 , &timeinfo.tm_hour);
|
---|
206 | err += rtc_dec8_to_hex(RTC.RDAYCNT , 0 , &timeinfo.tm_mday);
|
---|
207 | err += rtc_dec8_to_hex(RTC.RMONCNT , 1 , &timeinfo.tm_mon);
|
---|
208 | err += rtc_dec16_to_hex(RTC.RYRCNT , 1900 , &timeinfo.tm_year);
|
---|
209 | } while ((RTC.RCR1 & 0x80u) != 0);
|
---|
210 | } else {
|
---|
211 | err = 1;
|
---|
212 | }
|
---|
213 |
|
---|
214 | if (err == 0) {
|
---|
215 | // Convert to timestamp
|
---|
216 | t = mktime(&timeinfo);
|
---|
217 | } else {
|
---|
218 | // Error
|
---|
219 | t = TIME_ERROR_VAL;
|
---|
220 | }
|
---|
221 |
|
---|
222 | return t;
|
---|
223 | }
|
---|
224 |
|
---|
225 | /*
|
---|
226 | * Dec(8bit) to Hex function for RTC.
|
---|
227 | * [in]
|
---|
228 | * dec_val:Decimal value (from 0x00 to 0x99).
|
---|
229 | * offset:Subtract offset from dec_val.
|
---|
230 | * hex_val:Pointer of output hexadecimal value.
|
---|
231 | * [out]
|
---|
232 | * 0:Success
|
---|
233 | * 1:Error
|
---|
234 | */
|
---|
235 | static int rtc_dec8_to_hex(uint8_t dec_val, uint8_t offset, int *hex_val) {
|
---|
236 | int err = 0;
|
---|
237 | uint8_t ret_val;
|
---|
238 |
|
---|
239 | if (hex_val != NULL) {
|
---|
240 | if (((dec_val & MASK_04_07_POS) >= (0x0A << SHIFT_1_HBYTE)) ||
|
---|
241 | ((dec_val & MASK_00_03_POS) >= 0x0A)) {
|
---|
242 | err = 1;
|
---|
243 | } else {
|
---|
244 | ret_val = ((dec_val & MASK_04_07_POS) >> SHIFT_1_HBYTE) * 10 +
|
---|
245 | (dec_val & MASK_00_03_POS);
|
---|
246 | if (ret_val < offset) {
|
---|
247 | err = 1;
|
---|
248 | } else {
|
---|
249 | *hex_val = ret_val - offset;
|
---|
250 | }
|
---|
251 | }
|
---|
252 | } else {
|
---|
253 | err = 1;
|
---|
254 | }
|
---|
255 |
|
---|
256 | return err;
|
---|
257 | }
|
---|
258 |
|
---|
259 | /*
|
---|
260 | * Dec(16bit) to Hex function for RTC
|
---|
261 | * [in]
|
---|
262 | * dec_val:Decimal value (from 0x0000 to 0x9999).
|
---|
263 | * offset:Subtract offset from dec_val.
|
---|
264 | * hex_val:Pointer of output hexadecimal value.
|
---|
265 | * [out]
|
---|
266 | * 0:Success
|
---|
267 | * 1:Error
|
---|
268 | */
|
---|
269 | static int rtc_dec16_to_hex(uint16_t dec_val, uint16_t offset, int *hex_val) {
|
---|
270 | int err = 0;
|
---|
271 | uint16_t ret_val;
|
---|
272 |
|
---|
273 | if (hex_val != NULL) {
|
---|
274 | if (((dec_val & MASK_12_15_POS) >= (0x0A << SHIFT_3_HBYTE)) ||
|
---|
275 | ((dec_val & MASK_08_11_POS) >= (0x0A << SHIFT_2_HBYTE)) ||
|
---|
276 | ((dec_val & MASK_04_07_POS) >= (0x0A << SHIFT_1_HBYTE)) ||
|
---|
277 | ((dec_val & MASK_00_03_POS) >= 0x0A)) {
|
---|
278 | err = 1;
|
---|
279 | *hex_val = 0;
|
---|
280 | } else {
|
---|
281 | ret_val = (((dec_val & MASK_12_15_POS)) >> SHIFT_3_HBYTE) * 1000 +
|
---|
282 | (((dec_val & MASK_08_11_POS)) >> SHIFT_2_HBYTE) * 100 +
|
---|
283 | (((dec_val & MASK_04_07_POS)) >> SHIFT_1_HBYTE) * 10 +
|
---|
284 | (dec_val & MASK_00_03_POS);
|
---|
285 | if (ret_val < offset) {
|
---|
286 | err = 1;
|
---|
287 | } else {
|
---|
288 | *hex_val = ret_val - offset;
|
---|
289 | }
|
---|
290 | }
|
---|
291 | } else {
|
---|
292 | err = 1;
|
---|
293 | }
|
---|
294 | return err;
|
---|
295 | }
|
---|
296 |
|
---|
297 | /*
|
---|
298 | * RTC write function
|
---|
299 | * [in]
|
---|
300 | * t:UNIX timestamp value
|
---|
301 | * [out]
|
---|
302 | * None.
|
---|
303 | */
|
---|
304 | void rtc_write(time_t t) {
|
---|
305 |
|
---|
306 | struct tm *timeinfo = localtime(&t);
|
---|
307 | volatile uint16_t dummy_read;
|
---|
308 |
|
---|
309 | if (rtc_isenabled() != 0) {
|
---|
310 | RTC.RCR2 = RCR2_VAL_ALLSTOP;
|
---|
311 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
312 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
313 | RTC.RCR2 = RCR2_VAL_RESET; // RESET = 1
|
---|
314 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
315 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
316 |
|
---|
317 | RTC.RSECCNT = rtc_hex8_to_dec(timeinfo->tm_sec);
|
---|
318 | RTC.RMINCNT = rtc_hex8_to_dec(timeinfo->tm_min);
|
---|
319 | RTC.RHRCNT = rtc_hex8_to_dec(timeinfo->tm_hour);
|
---|
320 | RTC.RDAYCNT = rtc_hex8_to_dec(timeinfo->tm_mday);
|
---|
321 | RTC.RMONCNT = rtc_hex8_to_dec(timeinfo->tm_mon + 1);
|
---|
322 | RTC.RYRCNT = rtc_hex16_to_dec(timeinfo->tm_year + 1900);
|
---|
323 | dummy_read = (uint16_t)RTC.RYRCNT;
|
---|
324 | dummy_read = (uint16_t)RTC.RYRCNT;
|
---|
325 |
|
---|
326 | RTC.RCR2 = RCR2_VAL_START; // START = 1
|
---|
327 |
|
---|
328 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
329 | dummy_read = (uint16_t)RTC.RCR2;
|
---|
330 | }
|
---|
331 | }
|
---|
332 |
|
---|
333 | /*
|
---|
334 | * HEX to Dec(8bit) function for RTC.
|
---|
335 | * [in]
|
---|
336 | * hex_val:Hexadecimal value.
|
---|
337 | * [out]
|
---|
338 | * decimal value:From 0x00 to 0x99.
|
---|
339 | */
|
---|
340 | static uint8_t rtc_hex8_to_dec(uint8_t hex_val) {
|
---|
341 | uint32_t calc_data;
|
---|
342 |
|
---|
343 | calc_data = hex_val / 10 * 0x10;
|
---|
344 | calc_data += hex_val % 10;
|
---|
345 |
|
---|
346 | if (calc_data > 0x99) {
|
---|
347 | calc_data = 0;
|
---|
348 | }
|
---|
349 |
|
---|
350 | return (uint8_t)calc_data;
|
---|
351 | }
|
---|
352 |
|
---|
353 | /*
|
---|
354 | * HEX to Dec(16bit) function for RTC.
|
---|
355 | * [in]
|
---|
356 | * hex_val:Hexadecimal value.
|
---|
357 | * [out]
|
---|
358 | * decimal value:From 0x0000 to 0x9999.
|
---|
359 | */
|
---|
360 | static uint16_t rtc_hex16_to_dec(uint16_t hex_val) {
|
---|
361 | uint32_t calc_data;
|
---|
362 | calc_data = hex_val / 1000 * 0x1000;
|
---|
363 | calc_data += ((hex_val / 100) % 10) * 0x100;
|
---|
364 | calc_data += ((hex_val / 10) % 10) * 0x10;
|
---|
365 | calc_data += hex_val % 10;
|
---|
366 |
|
---|
367 | if (calc_data > 0x9999) {
|
---|
368 | calc_data = 0;
|
---|
369 | }
|
---|
370 | return (uint16_t)calc_data;
|
---|
371 |
|
---|
372 | }
|
---|
373 |
|
---|
374 | #endif /* DEVICE_RTC */
|
---|