]>
Commit | Line | Data |
---|---|---|
1 | /** @file\r | |
2 | RTC Architectural Protocol GUID as defined in DxeCis 0.96.\r | |
3 | \r | |
4 | Copyright (c) 2006 - 2007, Intel Corporation\r | |
5 | All rights reserved. This program and the accompanying materials\r | |
6 | are licensed and made available under the terms and conditions of the BSD License\r | |
7 | which accompanies this distribution. The full text of the license may be found at\r | |
8 | http://opensource.org/licenses/bsd-license.php\r | |
9 | \r | |
10 | THE PROGRAM IS DISTRIBUTED UNDER THE BSD LICENSE ON AN "AS IS" BASIS,\r | |
11 | WITHOUT WARRANTIES OR REPRESENTATIONS OF ANY KIND, EITHER EXPRESS OR IMPLIED.\r | |
12 | \r | |
13 | **/\r | |
14 | \r | |
15 | #include "PcRtc.h"\r | |
16 | \r | |
17 | /**\r | |
18 | Compare the Hour, Minute and Second of the From time and the To time.\r | |
19 | \r | |
20 | Only compare H/M/S in EFI_TIME and ignore other fields here.\r | |
21 | \r | |
22 | @param From the first time\r | |
23 | @param To the second time\r | |
24 | \r | |
25 | @return >0 The H/M/S of the From time is later than those of To time\r | |
26 | @return ==0 The H/M/S of the From time is same as those of To time\r | |
27 | @return <0 The H/M/S of the From time is earlier than those of To time\r | |
28 | **/\r | |
29 | INTN\r | |
30 | CompareHMS (\r | |
31 | IN EFI_TIME *From,\r | |
32 | IN EFI_TIME *To\r | |
33 | );\r | |
34 | \r | |
35 | /**\r | |
36 | To check if second date is later than first date within 24 hours.\r | |
37 | \r | |
38 | @param From the first date\r | |
39 | @param To the second date\r | |
40 | \r | |
41 | @retval TRUE From is previous to To within 24 hours.\r | |
42 | @retval FALSE From is later, or it is previous to To more than 24 hours.\r | |
43 | **/\r | |
44 | BOOLEAN\r | |
45 | IsWithinOneDay (\r | |
46 | IN EFI_TIME *From,\r | |
47 | IN EFI_TIME *To\r | |
48 | );\r | |
49 | \r | |
50 | /**\r | |
51 | Read RTC content through its registers.\r | |
52 | \r | |
53 | @param Address Address offset of RTC. It is recommended to use macros such as\r | |
54 | RTC_ADDRESS_SECONDS.\r | |
55 | \r | |
56 | @return The data of UINT8 type read from RTC.\r | |
57 | **/\r | |
58 | UINT8\r | |
59 | RtcRead (\r | |
60 | IN UINT8 Address\r | |
61 | )\r | |
62 | {\r | |
63 | IoWrite8 (PCAT_RTC_ADDRESS_REGISTER, (UINT8) (Address | (UINT8) (IoRead8 (PCAT_RTC_ADDRESS_REGISTER) & 0x80)));\r | |
64 | return IoRead8 (PCAT_RTC_DATA_REGISTER);\r | |
65 | }\r | |
66 | \r | |
67 | /**\r | |
68 | Write RTC through its registers.\r | |
69 | \r | |
70 | @param Address Address offset of RTC. It is recommended to use macros such as\r | |
71 | RTC_ADDRESS_SECONDS.\r | |
72 | @param Data The content you want to write into RTC.\r | |
73 | \r | |
74 | **/\r | |
75 | VOID\r | |
76 | RtcWrite (\r | |
77 | IN UINT8 Address,\r | |
78 | IN UINT8 Data\r | |
79 | )\r | |
80 | {\r | |
81 | IoWrite8 (PCAT_RTC_ADDRESS_REGISTER, (UINT8) (Address | (UINT8) (IoRead8 (PCAT_RTC_ADDRESS_REGISTER) & 0x80)));\r | |
82 | IoWrite8 (PCAT_RTC_DATA_REGISTER, Data);\r | |
83 | }\r | |
84 | \r | |
85 | /**\r | |
86 | Initialize RTC.\r | |
87 | \r | |
88 | @param Global For global use inside this module.\r | |
89 | \r | |
90 | @retval EFI_DEVICE_ERROR Initialization failed due to device error.\r | |
91 | @retval EFI_SUCCESS Initialization successful.\r | |
92 | \r | |
93 | **/\r | |
94 | EFI_STATUS\r | |
95 | PcRtcInit (\r | |
96 | IN PC_RTC_MODULE_GLOBALS *Global\r | |
97 | )\r | |
98 | {\r | |
99 | EFI_STATUS Status;\r | |
100 | RTC_REGISTER_A RegisterA;\r | |
101 | RTC_REGISTER_B RegisterB;\r | |
102 | RTC_REGISTER_D RegisterD;\r | |
103 | UINT8 Century;\r | |
104 | EFI_TIME Time;\r | |
105 | UINTN DataSize;\r | |
106 | UINT32 TimerVar;\r | |
107 | \r | |
108 | //\r | |
109 | // Acquire RTC Lock to make access to RTC atomic\r | |
110 | //\r | |
111 | //Code here doesn't consider the runtime environment.\r | |
112 | if (!EfiAtRuntime ()) {\r | |
113 | EfiAcquireLock (&Global->RtcLock);\r | |
114 | }\r | |
115 | //\r | |
116 | // Initialize RTC Register\r | |
117 | //\r | |
118 | // Make sure Division Chain is properly configured,\r | |
119 | // or RTC clock won't "tick" -- time won't increment\r | |
120 | //\r | |
121 | RegisterA.Data = RTC_INIT_REGISTER_A;\r | |
122 | RtcWrite (RTC_ADDRESS_REGISTER_A, RegisterA.Data);\r | |
123 | \r | |
124 | //\r | |
125 | // Read Register B\r | |
126 | //\r | |
127 | RegisterB.Data = RtcRead (RTC_ADDRESS_REGISTER_B);\r | |
128 | \r | |
129 | //\r | |
130 | // Clear RTC flag register\r | |
131 | //\r | |
132 | RtcRead (RTC_ADDRESS_REGISTER_C);\r | |
133 | \r | |
134 | //\r | |
135 | // Clear RTC register D\r | |
136 | //\r | |
137 | RegisterD.Data = RTC_INIT_REGISTER_D;\r | |
138 | RtcWrite (RTC_ADDRESS_REGISTER_D, RegisterD.Data);\r | |
139 | \r | |
140 | //\r | |
141 | // Wait for up to 0.1 seconds for the RTC to be updated\r | |
142 | //\r | |
143 | Status = RtcWaitToUpdate (PcdGet32 (PcdRealTimeClockUpdateTimeout));\r | |
144 | if (EFI_ERROR (Status)) {\r | |
145 | //Code here doesn't consider the runtime environment.\r | |
146 | if (!EfiAtRuntime ()) {\r | |
147 | EfiReleaseLock (&Global->RtcLock);\r | |
148 | }\r | |
149 | return EFI_DEVICE_ERROR;\r | |
150 | }\r | |
151 | //\r | |
152 | // Get the Time/Date/Daylight Savings values.\r | |
153 | //\r | |
154 | Time.Second = RtcRead (RTC_ADDRESS_SECONDS);\r | |
155 | Time.Minute = RtcRead (RTC_ADDRESS_MINUTES);\r | |
156 | Time.Hour = RtcRead (RTC_ADDRESS_HOURS);\r | |
157 | Time.Day = RtcRead (RTC_ADDRESS_DAY_OF_THE_MONTH);\r | |
158 | Time.Month = RtcRead (RTC_ADDRESS_MONTH);\r | |
159 | Time.Year = RtcRead (RTC_ADDRESS_YEAR);\r | |
160 | \r | |
161 | Century = RtcRead (RTC_ADDRESS_CENTURY);\r | |
162 | Time.Year = (UINT16) (Century * 100 + Time.Year);\r | |
163 | \r | |
164 | //\r | |
165 | // Set RTC configuration after get original time\r | |
166 | // The value of bit AIE should be reserved.\r | |
167 | //\r | |
168 | RtcWrite (RTC_ADDRESS_REGISTER_B, (UINT8)(RTC_INIT_REGISTER_B | (RegisterB.Data & BIT5)));\r | |
169 | \r | |
170 | //\r | |
171 | // Release RTC Lock.\r | |
172 | //\r | |
173 | //Code here doesn't consider the runtime environment.\r | |
174 | if (!EfiAtRuntime ()) {\r | |
175 | EfiReleaseLock (&Global->RtcLock);\r | |
176 | }\r | |
177 | \r | |
178 | //\r | |
179 | // Validate time fields\r | |
180 | //\r | |
181 | Status = ConvertRtcTimeToEfiTime (&Time, Century, RegisterB);\r | |
182 | if (!EFI_ERROR (Status)) {\r | |
183 | Status = RtcTimeFieldsValid (&Time);\r | |
184 | }\r | |
185 | if (EFI_ERROR (Status)) {\r | |
186 | Time.Second = RTC_INIT_SECOND;\r | |
187 | Time.Minute = RTC_INIT_MINUTE;\r | |
188 | Time.Hour = RTC_INIT_HOUR;\r | |
189 | Time.Day = RTC_INIT_DAY;\r | |
190 | Time.Month = RTC_INIT_MONTH;\r | |
191 | Time.Year = RTC_INIT_YEAR;\r | |
192 | }\r | |
193 | //\r | |
194 | // Get the data of Daylight saving and time zone, if they have been\r | |
195 | // stored in NV variable during previous boot.\r | |
196 | //\r | |
197 | DataSize = sizeof (UINT32);\r | |
198 | Status = EfiGetVariable (\r | |
199 | L"RTC",\r | |
200 | &gEfiCallerIdGuid,\r | |
201 | NULL,\r | |
202 | &DataSize,\r | |
203 | (VOID *) &TimerVar\r | |
204 | );\r | |
205 | if (!EFI_ERROR (Status)) {\r | |
206 | Global->SavedTimeZone = (INT16) TimerVar;\r | |
207 | Global->Daylight = (UINT8) (TimerVar >> 16);\r | |
208 | \r | |
209 | Time.TimeZone = Global->SavedTimeZone;\r | |
210 | Time.Daylight = Global->Daylight;\r | |
211 | }\r | |
212 | //\r | |
213 | // Reset time value according to new RTC configuration\r | |
214 | //\r | |
215 | PcRtcSetTime (&Time, Global);\r | |
216 | \r | |
217 | return EFI_SUCCESS;\r | |
218 | }\r | |
219 | \r | |
220 | /**\r | |
221 | Returns the current time and date information, and the time-keeping capabilities\r | |
222 | of the hardware platform.\r | |
223 | \r | |
224 | @param Time A pointer to storage to receive a snapshot of the current time.\r | |
225 | @param Capabilities An optional pointer to a buffer to receive the real time clock\r | |
226 | device's capabilities.\r | |
227 | @param Global For global use inside this module.\r | |
228 | \r | |
229 | @retval EFI_SUCCESS The operation completed successfully.\r | |
230 | @retval EFI_INVALID_PARAMETER Time is NULL.\r | |
231 | @retval EFI_DEVICE_ERROR The time could not be retrieved due to hardware error.\r | |
232 | \r | |
233 | **/\r | |
234 | EFI_STATUS\r | |
235 | PcRtcGetTime (\r | |
236 | OUT EFI_TIME *Time,\r | |
237 | OUT EFI_TIME_CAPABILITIES *Capabilities, OPTIONAL\r | |
238 | IN PC_RTC_MODULE_GLOBALS *Global\r | |
239 | )\r | |
240 | {\r | |
241 | EFI_STATUS Status;\r | |
242 | RTC_REGISTER_B RegisterB;\r | |
243 | UINT8 Century;\r | |
244 | \r | |
245 | //\r | |
246 | // Check parameters for null pointer\r | |
247 | //\r | |
248 | if (Time == NULL) {\r | |
249 | return EFI_INVALID_PARAMETER;\r | |
250 | \r | |
251 | }\r | |
252 | //\r | |
253 | // Acquire RTC Lock to make access to RTC atomic\r | |
254 | //\r | |
255 | //Code here doesn't consider the runtime environment.\r | |
256 | if (!EfiAtRuntime ()) {\r | |
257 | EfiAcquireLock (&Global->RtcLock);\r | |
258 | }\r | |
259 | //\r | |
260 | // Wait for up to 0.1 seconds for the RTC to be updated\r | |
261 | //\r | |
262 | Status = RtcWaitToUpdate (PcdGet32 (PcdRealTimeClockUpdateTimeout));\r | |
263 | if (EFI_ERROR (Status)) {\r | |
264 | //Code here doesn't consider the runtime environment.\r | |
265 | if (!EfiAtRuntime ()) {\r | |
266 | EfiReleaseLock (&Global->RtcLock);\r | |
267 | }\r | |
268 | return Status;\r | |
269 | }\r | |
270 | //\r | |
271 | // Read Register B\r | |
272 | //\r | |
273 | RegisterB.Data = RtcRead (RTC_ADDRESS_REGISTER_B);\r | |
274 | \r | |
275 | //\r | |
276 | // Get the Time/Date/Daylight Savings values.\r | |
277 | //\r | |
278 | Time->Second = RtcRead (RTC_ADDRESS_SECONDS);\r | |
279 | Time->Minute = RtcRead (RTC_ADDRESS_MINUTES);\r | |
280 | Time->Hour = RtcRead (RTC_ADDRESS_HOURS);\r | |
281 | Time->Day = RtcRead (RTC_ADDRESS_DAY_OF_THE_MONTH);\r | |
282 | Time->Month = RtcRead (RTC_ADDRESS_MONTH);\r | |
283 | Time->Year = RtcRead (RTC_ADDRESS_YEAR);\r | |
284 | \r | |
285 | Century = RtcRead (RTC_ADDRESS_CENTURY);\r | |
286 | Time->Year = (UINT16) (Century * 100 + Time->Year);\r | |
287 | \r | |
288 | //\r | |
289 | // Release RTC Lock.\r | |
290 | //\r | |
291 | //Code here doesn't consider the runtime environment.\r | |
292 | if (!EfiAtRuntime ()) {\r | |
293 | EfiReleaseLock (&Global->RtcLock);\r | |
294 | }\r | |
295 | //\r | |
296 | // Get the variable that contains the TimeZone and Daylight fields\r | |
297 | //\r | |
298 | Time->TimeZone = Global->SavedTimeZone;\r | |
299 | Time->Daylight = Global->Daylight;\r | |
300 | \r | |
301 | //\r | |
302 | // Make sure all field values are in correct range\r | |
303 | //\r | |
304 | Status = ConvertRtcTimeToEfiTime (Time, Century, RegisterB);\r | |
305 | if (!EFI_ERROR (Status)) {\r | |
306 | Status = RtcTimeFieldsValid (Time);\r | |
307 | }\r | |
308 | if (EFI_ERROR (Status)) {\r | |
309 | return EFI_DEVICE_ERROR;\r | |
310 | }\r | |
311 | //\r | |
312 | // Fill in Capabilities if it was passed in\r | |
313 | //\r | |
314 | if (Capabilities != NULL) {\r | |
315 | Capabilities->Resolution = 1;\r | |
316 | //\r | |
317 | // 1 hertz\r | |
318 | //\r | |
319 | Capabilities->Accuracy = 50000000;\r | |
320 | //\r | |
321 | // 50 ppm\r | |
322 | //\r | |
323 | Capabilities->SetsToZero = FALSE;\r | |
324 | }\r | |
325 | \r | |
326 | return EFI_SUCCESS;\r | |
327 | }\r | |
328 | \r | |
329 | /**\r | |
330 | Sets the current local time and date information.\r | |
331 | \r | |
332 | @param Time A pointer to the current time.\r | |
333 | @param Global For global use inside this module.\r | |
334 | \r | |
335 | @retval EFI_SUCCESS The operation completed successfully.\r | |
336 | @retval EFI_INVALID_PARAMETER A time field is out of range.\r | |
337 | @retval EFI_DEVICE_ERROR The time could not be set due due to hardware error.\r | |
338 | \r | |
339 | **/\r | |
340 | EFI_STATUS\r | |
341 | PcRtcSetTime (\r | |
342 | IN EFI_TIME *Time,\r | |
343 | IN PC_RTC_MODULE_GLOBALS *Global\r | |
344 | )\r | |
345 | {\r | |
346 | EFI_STATUS Status;\r | |
347 | EFI_TIME RtcTime;\r | |
348 | RTC_REGISTER_B RegisterB;\r | |
349 | UINT8 Century;\r | |
350 | UINT32 TimerVar;\r | |
351 | \r | |
352 | if (Time == NULL) {\r | |
353 | return EFI_INVALID_PARAMETER;\r | |
354 | }\r | |
355 | //\r | |
356 | // Make sure that the time fields are valid\r | |
357 | //\r | |
358 | Status = RtcTimeFieldsValid (Time);\r | |
359 | if (EFI_ERROR (Status)) {\r | |
360 | return Status;\r | |
361 | }\r | |
362 | \r | |
363 | CopyMem (&RtcTime, Time, sizeof (EFI_TIME));\r | |
364 | \r | |
365 | //\r | |
366 | // Acquire RTC Lock to make access to RTC atomic\r | |
367 | //\r | |
368 | //Code here doesn't consider the runtime environment.\r | |
369 | if (!EfiAtRuntime ()) {\r | |
370 | EfiAcquireLock (&Global->RtcLock);\r | |
371 | }\r | |
372 | //\r | |
373 | // Wait for up to 0.1 seconds for the RTC to be updated\r | |
374 | //\r | |
375 | Status = RtcWaitToUpdate (PcdGet32 (PcdRealTimeClockUpdateTimeout));\r | |
376 | if (EFI_ERROR (Status)) {\r | |
377 | //Code here doesn't consider the runtime environment.\r | |
378 | if (!EfiAtRuntime ()) {\r | |
379 | EfiReleaseLock (&Global->RtcLock);\r | |
380 | }\r | |
381 | return Status;\r | |
382 | }\r | |
383 | //\r | |
384 | // Read Register B, and inhibit updates of the RTC\r | |
385 | //\r | |
386 | RegisterB.Data = RtcRead (RTC_ADDRESS_REGISTER_B);\r | |
387 | RegisterB.Bits.SET = 1;\r | |
388 | RtcWrite (RTC_ADDRESS_REGISTER_B, RegisterB.Data);\r | |
389 | \r | |
390 | ConvertEfiTimeToRtcTime (&RtcTime, RegisterB, &Century);\r | |
391 | \r | |
392 | RtcWrite (RTC_ADDRESS_SECONDS, RtcTime.Second);\r | |
393 | RtcWrite (RTC_ADDRESS_MINUTES, RtcTime.Minute);\r | |
394 | RtcWrite (RTC_ADDRESS_HOURS, RtcTime.Hour);\r | |
395 | RtcWrite (RTC_ADDRESS_DAY_OF_THE_MONTH, RtcTime.Day);\r | |
396 | RtcWrite (RTC_ADDRESS_MONTH, RtcTime.Month);\r | |
397 | RtcWrite (RTC_ADDRESS_YEAR, (UINT8) RtcTime.Year);\r | |
398 | RtcWrite (RTC_ADDRESS_CENTURY, Century);\r | |
399 | \r | |
400 | //\r | |
401 | // Allow updates of the RTC registers\r | |
402 | //\r | |
403 | RegisterB.Bits.SET = 0;\r | |
404 | RtcWrite (RTC_ADDRESS_REGISTER_B, RegisterB.Data);\r | |
405 | \r | |
406 | //\r | |
407 | // Release RTC Lock.\r | |
408 | //\r | |
409 | //Code here doesn't consider the runtime environment.\r | |
410 | if (!EfiAtRuntime ()) {\r | |
411 | EfiReleaseLock (&Global->RtcLock);\r | |
412 | }\r | |
413 | //\r | |
414 | // Set the variable that contains the TimeZone and Daylight fields\r | |
415 | //\r | |
416 | Global->SavedTimeZone = Time->TimeZone;\r | |
417 | Global->Daylight = Time->Daylight;\r | |
418 | \r | |
419 | TimerVar = Time->Daylight;\r | |
420 | TimerVar = (UINT32) ((TimerVar << 16) | Time->TimeZone);\r | |
421 | Status = EfiSetVariable (\r | |
422 | L"RTC",\r | |
423 | &gEfiCallerIdGuid,\r | |
424 | EFI_VARIABLE_BOOTSERVICE_ACCESS | EFI_VARIABLE_RUNTIME_ACCESS | EFI_VARIABLE_NON_VOLATILE,\r | |
425 | sizeof (TimerVar),\r | |
426 | &TimerVar\r | |
427 | );\r | |
428 | ASSERT_EFI_ERROR (Status);\r | |
429 | \r | |
430 | return EFI_SUCCESS;\r | |
431 | }\r | |
432 | \r | |
433 | /**\r | |
434 | Returns the current wakeup alarm clock setting.\r | |
435 | \r | |
436 | @param Enabled Indicates if the alarm is currently enabled or disabled.\r | |
437 | @param Pending Indicates if the alarm signal is pending and requires acknowledgment.\r | |
438 | @param Time The current alarm setting.\r | |
439 | @param Global For global use inside this module.\r | |
440 | \r | |
441 | @retval EFI_SUCCESS The alarm settings were returned.\r | |
442 | @retval EFI_INVALID_PARAMETER Enabled is NULL.\r | |
443 | @retval EFI_INVALID_PARAMETER Pending is NULL.\r | |
444 | @retval EFI_INVALID_PARAMETER Time is NULL.\r | |
445 | @retval EFI_DEVICE_ERROR The wakeup time could not be retrieved due to a hardware error.\r | |
446 | @retval EFI_UNSUPPORTED A wakeup timer is not supported on this platform.\r | |
447 | \r | |
448 | **/\r | |
449 | EFI_STATUS\r | |
450 | PcRtcGetWakeupTime (\r | |
451 | OUT BOOLEAN *Enabled,\r | |
452 | OUT BOOLEAN *Pending,\r | |
453 | OUT EFI_TIME *Time,\r | |
454 | IN PC_RTC_MODULE_GLOBALS *Global\r | |
455 | )\r | |
456 | {\r | |
457 | EFI_STATUS Status;\r | |
458 | RTC_REGISTER_B RegisterB;\r | |
459 | RTC_REGISTER_C RegisterC;\r | |
460 | UINT8 Century;\r | |
461 | \r | |
462 | //\r | |
463 | // Check parameters for null pointers\r | |
464 | //\r | |
465 | if ((Enabled == NULL) || (Pending == NULL) || (Time == NULL)) {\r | |
466 | return EFI_INVALID_PARAMETER;\r | |
467 | \r | |
468 | }\r | |
469 | //\r | |
470 | // Acquire RTC Lock to make access to RTC atomic\r | |
471 | //\r | |
472 | //Code here doesn't consider the runtime environment.\r | |
473 | if (!EfiAtRuntime ()) {\r | |
474 | EfiAcquireLock (&Global->RtcLock);\r | |
475 | }\r | |
476 | //\r | |
477 | // Wait for up to 0.1 seconds for the RTC to be updated\r | |
478 | //\r | |
479 | Status = RtcWaitToUpdate (PcdGet32 (PcdRealTimeClockUpdateTimeout));\r | |
480 | if (EFI_ERROR (Status)) {\r | |
481 | //Code here doesn't consider the runtime environment.\r | |
482 | if (!EfiAtRuntime ()) {\r | |
483 | EfiReleaseLock (&Global->RtcLock);\r | |
484 | }\r | |
485 | return EFI_DEVICE_ERROR;\r | |
486 | }\r | |
487 | //\r | |
488 | // Read Register B and Register C\r | |
489 | //\r | |
490 | RegisterB.Data = RtcRead (RTC_ADDRESS_REGISTER_B);\r | |
491 | RegisterC.Data = RtcRead (RTC_ADDRESS_REGISTER_C);\r | |
492 | \r | |
493 | //\r | |
494 | // Get the Time/Date/Daylight Savings values.\r | |
495 | //\r | |
496 | *Enabled = RegisterB.Bits.AIE;\r | |
497 | if (*Enabled) {\r | |
498 | Time->Second = RtcRead (RTC_ADDRESS_SECONDS_ALARM);\r | |
499 | Time->Minute = RtcRead (RTC_ADDRESS_MINUTES_ALARM);\r | |
500 | Time->Hour = RtcRead (RTC_ADDRESS_HOURS_ALARM);\r | |
501 | Time->Day = RtcRead (RTC_ADDRESS_DAY_OF_THE_MONTH);\r | |
502 | Time->Month = RtcRead (RTC_ADDRESS_MONTH);\r | |
503 | Time->Year = RtcRead (RTC_ADDRESS_YEAR);\r | |
504 | } else {\r | |
505 | Time->Second = 0;\r | |
506 | Time->Minute = 0;\r | |
507 | Time->Hour = 0;\r | |
508 | Time->Day = RtcRead (RTC_ADDRESS_DAY_OF_THE_MONTH);\r | |
509 | Time->Month = RtcRead (RTC_ADDRESS_MONTH);\r | |
510 | Time->Year = RtcRead (RTC_ADDRESS_YEAR);\r | |
511 | }\r | |
512 | \r | |
513 | Century = RtcRead (RTC_ADDRESS_CENTURY);\r | |
514 | Time->Year = (UINT16) (Century * 100 + Time->Year);\r | |
515 | \r | |
516 | //\r | |
517 | // Release RTC Lock.\r | |
518 | //\r | |
519 | //Code here doesn't consider the runtime environment.\r | |
520 | if (!EfiAtRuntime ()) {\r | |
521 | EfiReleaseLock (&Global->RtcLock);\r | |
522 | }\r | |
523 | //\r | |
524 | // Make sure all field values are in correct range\r | |
525 | //\r | |
526 | Status = ConvertRtcTimeToEfiTime (Time, Century, RegisterB);\r | |
527 | if (!EFI_ERROR (Status)) {\r | |
528 | Status = RtcTimeFieldsValid (Time);\r | |
529 | }\r | |
530 | if (EFI_ERROR (Status)) {\r | |
531 | return EFI_DEVICE_ERROR;\r | |
532 | }\r | |
533 | \r | |
534 | *Pending = RegisterC.Bits.AF;\r | |
535 | \r | |
536 | return EFI_SUCCESS;\r | |
537 | }\r | |
538 | \r | |
539 | /**\r | |
540 | Sets the system wakeup alarm clock time.\r | |
541 | \r | |
542 | @param Enabled Enable or disable the wakeup alarm.\r | |
543 | @param Time If Enable is TRUE, the time to set the wakeup alarm for.\r | |
544 | If Enable is FALSE, then this parameter is optional, and may be NULL.\r | |
545 | @param Global For global use inside this module.\r | |
546 | \r | |
547 | @retval EFI_SUCCESS If Enable is TRUE, then the wakeup alarm was enabled.\r | |
548 | If Enable is FALSE, then the wakeup alarm was disabled.\r | |
549 | @retval EFI_INVALID_PARAMETER A time field is out of range.\r | |
550 | @retval EFI_DEVICE_ERROR The wakeup time could not be set due to a hardware error.\r | |
551 | @retval EFI_UNSUPPORTED A wakeup timer is not supported on this platform.\r | |
552 | \r | |
553 | **/\r | |
554 | EFI_STATUS\r | |
555 | PcRtcSetWakeupTime (\r | |
556 | IN BOOLEAN Enable,\r | |
557 | IN EFI_TIME *Time, OPTIONAL\r | |
558 | IN PC_RTC_MODULE_GLOBALS *Global\r | |
559 | )\r | |
560 | {\r | |
561 | EFI_STATUS Status;\r | |
562 | EFI_TIME RtcTime;\r | |
563 | RTC_REGISTER_B RegisterB;\r | |
564 | UINT8 Century;\r | |
565 | EFI_TIME_CAPABILITIES Capabilities;\r | |
566 | \r | |
567 | if (Enable) {\r | |
568 | \r | |
569 | if (Time == NULL) {\r | |
570 | return EFI_INVALID_PARAMETER;\r | |
571 | }\r | |
572 | //\r | |
573 | // Make sure that the time fields are valid\r | |
574 | //\r | |
575 | Status = RtcTimeFieldsValid (Time);\r | |
576 | if (EFI_ERROR (Status)) {\r | |
577 | return EFI_INVALID_PARAMETER;\r | |
578 | }\r | |
579 | //\r | |
580 | // Just support set alarm time within 24 hours\r | |
581 | //\r | |
582 | PcRtcGetTime (&RtcTime, &Capabilities, Global);\r | |
583 | Status = RtcTimeFieldsValid (&RtcTime);\r | |
584 | if (EFI_ERROR (Status)) {\r | |
585 | return EFI_DEVICE_ERROR;\r | |
586 | }\r | |
587 | if (!IsWithinOneDay (&RtcTime, Time)) {\r | |
588 | return EFI_UNSUPPORTED;\r | |
589 | }\r | |
590 | //\r | |
591 | // Make a local copy of the time and date\r | |
592 | //\r | |
593 | CopyMem (&RtcTime, Time, sizeof (EFI_TIME));\r | |
594 | \r | |
595 | }\r | |
596 | //\r | |
597 | // Acquire RTC Lock to make access to RTC atomic\r | |
598 | //\r | |
599 | //Code here doesn't consider the runtime environment.\r | |
600 | if (!EfiAtRuntime ()) {\r | |
601 | EfiAcquireLock (&Global->RtcLock);\r | |
602 | }\r | |
603 | //\r | |
604 | // Wait for up to 0.1 seconds for the RTC to be updated\r | |
605 | //\r | |
606 | Status = RtcWaitToUpdate (PcdGet32 (PcdRealTimeClockUpdateTimeout));\r | |
607 | if (EFI_ERROR (Status)) {\r | |
608 | //Code here doesn't consider the runtime environment.\r | |
609 | if (!EfiAtRuntime ()) {\r | |
610 | EfiReleaseLock (&Global->RtcLock);\r | |
611 | }\r | |
612 | return EFI_DEVICE_ERROR;\r | |
613 | }\r | |
614 | //\r | |
615 | // Read Register B, and inhibit updates of the RTC\r | |
616 | //\r | |
617 | RegisterB.Data = RtcRead (RTC_ADDRESS_REGISTER_B);\r | |
618 | \r | |
619 | RegisterB.Bits.SET = 1;\r | |
620 | RtcWrite (RTC_ADDRESS_REGISTER_B, RegisterB.Data);\r | |
621 | \r | |
622 | if (Enable) {\r | |
623 | ConvertEfiTimeToRtcTime (&RtcTime, RegisterB, &Century);\r | |
624 | \r | |
625 | //\r | |
626 | // Set RTC alarm time\r | |
627 | //\r | |
628 | RtcWrite (RTC_ADDRESS_SECONDS_ALARM, RtcTime.Second);\r | |
629 | RtcWrite (RTC_ADDRESS_MINUTES_ALARM, RtcTime.Minute);\r | |
630 | RtcWrite (RTC_ADDRESS_HOURS_ALARM, RtcTime.Hour);\r | |
631 | \r | |
632 | RegisterB.Bits.AIE = 1;\r | |
633 | \r | |
634 | } else {\r | |
635 | RegisterB.Bits.AIE = 0;\r | |
636 | }\r | |
637 | //\r | |
638 | // Allow updates of the RTC registers\r | |
639 | //\r | |
640 | RegisterB.Bits.SET = 0;\r | |
641 | RtcWrite (RTC_ADDRESS_REGISTER_B, RegisterB.Data);\r | |
642 | \r | |
643 | //\r | |
644 | // Release RTC Lock.\r | |
645 | //\r | |
646 | //Code here doesn't consider the runtime environment.\r | |
647 | if (!EfiAtRuntime ()) {\r | |
648 | EfiReleaseLock (&Global->RtcLock);\r | |
649 | }\r | |
650 | return EFI_SUCCESS;\r | |
651 | }\r | |
652 | \r | |
653 | \r | |
654 | /**\r | |
655 | Checks an 8-bit BCD value, and converts to an 8-bit value if valid.\r | |
656 | \r | |
657 | This function checks the 8-bit BCD value specified by Value.\r | |
658 | If valid, the function converts it to an 8-bit value and returns it.\r | |
659 | Otherwise, return 0xff.\r | |
660 | \r | |
661 | @param Value The 8-bit BCD value to check and convert\r | |
662 | \r | |
663 | @return The 8-bit value converted. Or 0xff if Value is invalid.\r | |
664 | \r | |
665 | **/\r | |
666 | UINT8\r | |
667 | CheckAndConvertBcd8ToDecimal8 (\r | |
668 | IN UINT8 Value\r | |
669 | )\r | |
670 | {\r | |
671 | if ((Value < 0xa0) && ((Value & 0xf) < 0xa)) {\r | |
672 | return BcdToDecimal8 (Value);\r | |
673 | }\r | |
674 | \r | |
675 | return 0xff;\r | |
676 | }\r | |
677 | \r | |
678 | /**\r | |
679 | Converts time read from RTC to EFI_TIME format defined by UEFI spec.\r | |
680 | \r | |
681 | This function converts raw time data read from RTC to the EFI_TIME format\r | |
682 | defined by UEFI spec.\r | |
683 | If data mode of RTC is BCD, then converts it to decimal,\r | |
684 | If RTC is in 12-hour format, then converts it to 24-hour format.\r | |
685 | \r | |
686 | @param Time On input, the time data read from RTC to convert\r | |
687 | On output, the time converted to UEFI format\r | |
688 | @param Century Value of century read from RTC.\r | |
689 | @param RegisterB Value of Register B of RTC, indicating data mode\r | |
690 | and hour format.\r | |
691 | \r | |
692 | @retval EFI_INVALID_PARAMETER Parameters passed in are invalid.\r | |
693 | @retval EFI_SUCCESS Convert RTC time to EFI time successfully.\r | |
694 | \r | |
695 | **/\r | |
696 | EFI_STATUS\r | |
697 | ConvertRtcTimeToEfiTime (\r | |
698 | IN OUT EFI_TIME *Time,\r | |
699 | IN UINT8 Century,\r | |
700 | IN RTC_REGISTER_B RegisterB\r | |
701 | )\r | |
702 | {\r | |
703 | BOOLEAN IsPM;\r | |
704 | \r | |
705 | if ((Time->Hour & 0x80) != 0) {\r | |
706 | IsPM = TRUE;\r | |
707 | } else {\r | |
708 | IsPM = FALSE;\r | |
709 | }\r | |
710 | \r | |
711 | Time->Hour = (UINT8) (Time->Hour & 0x7f);\r | |
712 | \r | |
713 | if (RegisterB.Bits.DM == 0) {\r | |
714 | Time->Year = CheckAndConvertBcd8ToDecimal8 ((UINT8) Time->Year);\r | |
715 | Time->Month = CheckAndConvertBcd8ToDecimal8 (Time->Month);\r | |
716 | Time->Day = CheckAndConvertBcd8ToDecimal8 (Time->Day);\r | |
717 | Time->Hour = CheckAndConvertBcd8ToDecimal8 (Time->Hour);\r | |
718 | Time->Minute = CheckAndConvertBcd8ToDecimal8 (Time->Minute);\r | |
719 | Time->Second = CheckAndConvertBcd8ToDecimal8 (Time->Second);\r | |
720 | Century = CheckAndConvertBcd8ToDecimal8 (Century);\r | |
721 | }\r | |
722 | \r | |
723 | if (Time->Year == 0xff || Time->Month == 0xff || Time->Day == 0xff ||\r | |
724 | Time->Hour == 0xff || Time->Minute == 0xff || Time->Second == 0xff ||\r | |
725 | Century == 0xff) {\r | |
726 | return EFI_INVALID_PARAMETER;\r | |
727 | }\r | |
728 | \r | |
729 | Time->Year = (UINT16) (Century * 100 + Time->Year);\r | |
730 | \r | |
731 | //\r | |
732 | // If time is in 12 hour format, convert it to 24 hour format\r | |
733 | //\r | |
734 | if (RegisterB.Bits.MIL == 0) {\r | |
735 | if (IsPM && Time->Hour < 12) {\r | |
736 | Time->Hour = (UINT8) (Time->Hour + 12);\r | |
737 | }\r | |
738 | \r | |
739 | if (!IsPM && Time->Hour == 12) {\r | |
740 | Time->Hour = 0;\r | |
741 | }\r | |
742 | }\r | |
743 | \r | |
744 | Time->Nanosecond = 0;\r | |
745 | Time->TimeZone = EFI_UNSPECIFIED_TIMEZONE;\r | |
746 | Time->Daylight = 0;\r | |
747 | \r | |
748 | return EFI_SUCCESS;\r | |
749 | }\r | |
750 | \r | |
751 | /**\r | |
752 | Wait for a period for the RTC to be ready.\r | |
753 | \r | |
754 | @param Timeout Tell how long it should take to wait.\r | |
755 | \r | |
756 | @retval EFI_DEVICE_ERROR RTC device error.\r | |
757 | @retval EFI_SUCCESS RTC is updated and ready. \r | |
758 | **/\r | |
759 | EFI_STATUS\r | |
760 | RtcWaitToUpdate (\r | |
761 | UINTN Timeout\r | |
762 | )\r | |
763 | {\r | |
764 | RTC_REGISTER_A RegisterA;\r | |
765 | RTC_REGISTER_D RegisterD;\r | |
766 | \r | |
767 | //\r | |
768 | // See if the RTC is functioning correctly\r | |
769 | //\r | |
770 | RegisterD.Data = RtcRead (RTC_ADDRESS_REGISTER_D);\r | |
771 | \r | |
772 | if (RegisterD.Bits.VRT == 0) {\r | |
773 | return EFI_DEVICE_ERROR;\r | |
774 | }\r | |
775 | //\r | |
776 | // Wait for up to 0.1 seconds for the RTC to be ready.\r | |
777 | //\r | |
778 | Timeout = (Timeout / 10) + 1;\r | |
779 | RegisterA.Data = RtcRead (RTC_ADDRESS_REGISTER_A);\r | |
780 | while (RegisterA.Bits.UIP == 1 && Timeout > 0) {\r | |
781 | MicroSecondDelay (10);\r | |
782 | RegisterA.Data = RtcRead (RTC_ADDRESS_REGISTER_A);\r | |
783 | Timeout--;\r | |
784 | }\r | |
785 | \r | |
786 | RegisterD.Data = RtcRead (RTC_ADDRESS_REGISTER_D);\r | |
787 | if (Timeout == 0 || RegisterD.Bits.VRT == 0) {\r | |
788 | return EFI_DEVICE_ERROR;\r | |
789 | }\r | |
790 | \r | |
791 | return EFI_SUCCESS;\r | |
792 | }\r | |
793 | \r | |
794 | /**\r | |
795 | See if all fields of a variable of EFI_TIME type is correct.\r | |
796 | \r | |
797 | @param Time The time to be checked.\r | |
798 | \r | |
799 | @retval EFI_INVALID_PARAMETER Some fields of Time are not correct.\r | |
800 | @retval EFI_SUCCESS Time is a valid EFI_TIME variable.\r | |
801 | \r | |
802 | **/\r | |
803 | EFI_STATUS\r | |
804 | RtcTimeFieldsValid (\r | |
805 | IN EFI_TIME *Time\r | |
806 | )\r | |
807 | {\r | |
808 | if (Time->Year < 1998 ||\r | |
809 | Time->Year > 2099 ||\r | |
810 | Time->Month < 1 ||\r | |
811 | Time->Month > 12 ||\r | |
812 | Time->Hour > 23 ||\r | |
813 | Time->Minute > 59 ||\r | |
814 | Time->Second > 59 ||\r | |
815 | Time->Nanosecond > 999999999 ||\r | |
816 | (!(Time->TimeZone == EFI_UNSPECIFIED_TIMEZONE || (Time->TimeZone >= -1440 && Time->TimeZone <= 1440))) ||\r | |
817 | ((Time->Daylight & (~(EFI_TIME_ADJUST_DAYLIGHT | EFI_TIME_IN_DAYLIGHT))) != 0)\r | |
818 | ) {\r | |
819 | if (!DayValid (Time)) {\r | |
820 | return EFI_INVALID_PARAMETER;\r | |
821 | }\r | |
822 | }\r | |
823 | \r | |
824 | return EFI_SUCCESS;\r | |
825 | }\r | |
826 | \r | |
827 | /**\r | |
828 | See if field Day of an EFI_TIME is correct.\r | |
829 | \r | |
830 | @param Time Its Day field is to be checked.\r | |
831 | \r | |
832 | @retval TRUE Day field of Time is correct.\r | |
833 | @retval FALSE Day field of Time is NOT correct.\r | |
834 | **/\r | |
835 | BOOLEAN\r | |
836 | DayValid (\r | |
837 | IN EFI_TIME *Time\r | |
838 | )\r | |
839 | {\r | |
840 | INTN DayOfMonth[12];\r | |
841 | \r | |
842 | DayOfMonth[0] = 31;\r | |
843 | DayOfMonth[1] = 29;\r | |
844 | DayOfMonth[2] = 31;\r | |
845 | DayOfMonth[3] = 30;\r | |
846 | DayOfMonth[4] = 31;\r | |
847 | DayOfMonth[5] = 30;\r | |
848 | DayOfMonth[6] = 31;\r | |
849 | DayOfMonth[7] = 31;\r | |
850 | DayOfMonth[8] = 30;\r | |
851 | DayOfMonth[9] = 31;\r | |
852 | DayOfMonth[10] = 30;\r | |
853 | DayOfMonth[11] = 31;\r | |
854 | \r | |
855 | //\r | |
856 | // The validity of Time->Month field should be checked before\r | |
857 | //\r | |
858 | ASSERT (Time->Month >=1);\r | |
859 | ASSERT (Time->Month <=12);\r | |
860 | if (Time->Day < 1 ||\r | |
861 | Time->Day > DayOfMonth[Time->Month - 1] ||\r | |
862 | (Time->Month == 2 && (!IsLeapYear (Time) && Time->Day > 28))\r | |
863 | ) {\r | |
864 | return FALSE;\r | |
865 | }\r | |
866 | \r | |
867 | return TRUE;\r | |
868 | }\r | |
869 | \r | |
870 | /**\r | |
871 | Check if it is a leap year.\r | |
872 | \r | |
873 | @param Time The time to be checked.\r | |
874 | \r | |
875 | @retval TRUE It is a leap year.\r | |
876 | @retval FALSE It is NOT a leap year.\r | |
877 | **/\r | |
878 | BOOLEAN\r | |
879 | IsLeapYear (\r | |
880 | IN EFI_TIME *Time\r | |
881 | )\r | |
882 | {\r | |
883 | if (Time->Year % 4 == 0) {\r | |
884 | if (Time->Year % 100 == 0) {\r | |
885 | if (Time->Year % 400 == 0) {\r | |
886 | return TRUE;\r | |
887 | } else {\r | |
888 | return FALSE;\r | |
889 | }\r | |
890 | } else {\r | |
891 | return TRUE;\r | |
892 | }\r | |
893 | } else {\r | |
894 | return FALSE;\r | |
895 | }\r | |
896 | }\r | |
897 | \r | |
898 | /**\r | |
899 | Converts time from EFI_TIME format defined by UEFI spec to RTC's.\r | |
900 | \r | |
901 | This function converts time from EFI_TIME format defined by UEFI spec to RTC's.\r | |
902 | If data mode of RTC is BCD, then converts EFI_TIME to it.\r | |
903 | If RTC is in 12-hour format, then converts EFI_TIME to it.\r | |
904 | \r | |
905 | @param Time On input, the time data read from UEFI to convert\r | |
906 | On output, the time converted to RTC format\r | |
907 | @param RegisterB Value of Register B of RTC, indicating data mode\r | |
908 | @param Century It is set according to EFI_TIME Time.\r | |
909 | \r | |
910 | **/\r | |
911 | VOID\r | |
912 | ConvertEfiTimeToRtcTime (\r | |
913 | IN OUT EFI_TIME *Time,\r | |
914 | IN RTC_REGISTER_B RegisterB,\r | |
915 | OUT UINT8 *Century\r | |
916 | )\r | |
917 | {\r | |
918 | BOOLEAN IsPM;\r | |
919 | \r | |
920 | IsPM = TRUE;\r | |
921 | //\r | |
922 | // Adjust hour field if RTC is in 12 hour mode\r | |
923 | //\r | |
924 | if (RegisterB.Bits.MIL == 0) {\r | |
925 | if (Time->Hour < 12) {\r | |
926 | IsPM = FALSE;\r | |
927 | }\r | |
928 | \r | |
929 | if (Time->Hour >= 13) {\r | |
930 | Time->Hour = (UINT8) (Time->Hour - 12);\r | |
931 | } else if (Time->Hour == 0) {\r | |
932 | Time->Hour = 12;\r | |
933 | }\r | |
934 | }\r | |
935 | //\r | |
936 | // Set the Time/Date/Daylight Savings values.\r | |
937 | //\r | |
938 | *Century = DecimalToBcd8 ((UINT8) (Time->Year / 100));\r | |
939 | \r | |
940 | Time->Year = (UINT16) (Time->Year % 100);\r | |
941 | \r | |
942 | if (RegisterB.Bits.DM == 0) {\r | |
943 | Time->Year = DecimalToBcd8 ((UINT8) Time->Year);\r | |
944 | Time->Month = DecimalToBcd8 (Time->Month);\r | |
945 | Time->Day = DecimalToBcd8 (Time->Day);\r | |
946 | Time->Hour = DecimalToBcd8 (Time->Hour);\r | |
947 | Time->Minute = DecimalToBcd8 (Time->Minute);\r | |
948 | Time->Second = DecimalToBcd8 (Time->Second);\r | |
949 | }\r | |
950 | //\r | |
951 | // If we are in 12 hour mode and PM is set, then set bit 7 of the Hour field.\r | |
952 | //\r | |
953 | if (RegisterB.Bits.MIL == 0 && IsPM) {\r | |
954 | Time->Hour = (UINT8) (Time->Hour | 0x80);\r | |
955 | }\r | |
956 | }\r | |
957 | \r | |
958 | /**\r | |
959 | Compare the Hour, Minute and Second of the From time and the To time.\r | |
960 | \r | |
961 | Only compare H/M/S in EFI_TIME and ignore other fields here.\r | |
962 | \r | |
963 | @param From the first time\r | |
964 | @param To the second time\r | |
965 | \r | |
966 | @return >0 The H/M/S of the From time is later than those of To time\r | |
967 | @return ==0 The H/M/S of the From time is same as those of To time\r | |
968 | @return <0 The H/M/S of the From time is earlier than those of To time\r | |
969 | **/\r | |
970 | INTN\r | |
971 | CompareHMS (\r | |
972 | IN EFI_TIME *From,\r | |
973 | IN EFI_TIME *To\r | |
974 | )\r | |
975 | {\r | |
976 | if ((From->Hour > To->Hour) ||\r | |
977 | ((From->Hour == To->Hour) && (From->Minute > To->Minute)) ||\r | |
978 | ((From->Hour == To->Hour) && (From->Minute == To->Minute) && (From->Second > To->Second))) {\r | |
979 | return 1;\r | |
980 | } else if ((From->Hour == To->Hour) && (From->Minute == To->Minute) && (From->Second == To->Second)) {\r | |
981 | return 0;\r | |
982 | } else {\r | |
983 | return -1;\r | |
984 | }\r | |
985 | }\r | |
986 | \r | |
987 | /**\r | |
988 | To check if second date is later than first date within 24 hours.\r | |
989 | \r | |
990 | @param From the first date\r | |
991 | @param To the second date\r | |
992 | \r | |
993 | @retval TRUE From is previous to To within 24 hours.\r | |
994 | @retval FALSE From is later, or it is previous to To more than 24 hours.\r | |
995 | **/\r | |
996 | BOOLEAN\r | |
997 | IsWithinOneDay (\r | |
998 | IN EFI_TIME *From,\r | |
999 | IN EFI_TIME *To\r | |
1000 | )\r | |
1001 | {\r | |
1002 | UINT8 DayOfMonth[12];\r | |
1003 | BOOLEAN Adjacent;\r | |
1004 | \r | |
1005 | DayOfMonth[0] = 31;\r | |
1006 | DayOfMonth[1] = 29;\r | |
1007 | DayOfMonth[2] = 31;\r | |
1008 | DayOfMonth[3] = 30;\r | |
1009 | DayOfMonth[4] = 31;\r | |
1010 | DayOfMonth[5] = 30;\r | |
1011 | DayOfMonth[6] = 31;\r | |
1012 | DayOfMonth[7] = 31;\r | |
1013 | DayOfMonth[8] = 30;\r | |
1014 | DayOfMonth[9] = 31;\r | |
1015 | DayOfMonth[10] = 30;\r | |
1016 | DayOfMonth[11] = 31;\r | |
1017 | \r | |
1018 | Adjacent = FALSE;\r | |
1019 | \r | |
1020 | //\r | |
1021 | // The validity of From->Month field should be checked before\r | |
1022 | //\r | |
1023 | ASSERT (From->Month >=1);\r | |
1024 | ASSERT (From->Month <=12);\r | |
1025 | \r | |
1026 | if (From->Year == To->Year) {\r | |
1027 | if (From->Month == To->Month) {\r | |
1028 | if ((From->Day + 1) == To->Day) {\r | |
1029 | if ((CompareHMS(From, To) >= 0)) {\r | |
1030 | Adjacent = TRUE;\r | |
1031 | }\r | |
1032 | } else if (From->Day == To->Day) {\r | |
1033 | if ((CompareHMS(From, To) <= 0)) {\r | |
1034 | Adjacent = TRUE;\r | |
1035 | }\r | |
1036 | }\r | |
1037 | } else if (((From->Month + 1) == To->Month) && (To->Day == 1)) {\r | |
1038 | if ((From->Month == 2) && !IsLeapYear(From)) {\r | |
1039 | if (From->Day == 28) {\r | |
1040 | if ((CompareHMS(From, To) >= 0)) {\r | |
1041 | Adjacent = TRUE;\r | |
1042 | }\r | |
1043 | }\r | |
1044 | } else if (From->Day == DayOfMonth[From->Month - 1]) {\r | |
1045 | if ((CompareHMS(From, To) >= 0)) {\r | |
1046 | Adjacent = TRUE;\r | |
1047 | }\r | |
1048 | }\r | |
1049 | }\r | |
1050 | } else if (((From->Year + 1) == To->Year) &&\r | |
1051 | (From->Month == 12) &&\r | |
1052 | (From->Day == 31) &&\r | |
1053 | (To->Month == 1) &&\r | |
1054 | (To->Day == 1)) {\r | |
1055 | if ((CompareHMS(From, To) >= 0)) {\r | |
1056 | Adjacent = TRUE;\r | |
1057 | }\r | |
1058 | }\r | |
1059 | \r | |
1060 | return Adjacent;\r | |
1061 | }\r | |
1062 | \r |