OpenCores
URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [rtems-20020807/] [cpukit/] [score/] [src/] [coretodtickle.c] - Blame information for rev 1774

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 1026 ivang
/*
2
 *  Time of Day (TOD) Handler
3
 *
4
 *
5
 *  COPYRIGHT (c) 1989-1999.
6
 *  On-Line Applications Research Corporation (OAR).
7
 *
8
 *  The license and distribution terms for this file may be
9
 *  found in the file LICENSE in this distribution or at
10
 *  http://www.OARcorp.com/rtems/license.html.
11
 *
12
 *  coretodtickle.c,v 1.2 1999/11/17 17:50:39 joel Exp
13
 */
14
 
15
#include <rtems/system.h>
16
#include <rtems/score/object.h>
17
#include <rtems/score/thread.h>
18
#include <rtems/score/tod.h>
19
#include <rtems/score/watchdog.h>
20
 
21
/*PAGE
22
 *
23
 *  _TOD_Tickle
24
 *
25
 *  This routine updates the calendar time and tickles the
26
 *  per second watchdog timer chain.
27
 *
28
 *  Input parameters:
29
 *    ignored - this parameter is ignored
30
 *
31
 *  Output parameters: NONE
32
 *
33
 *  NOTE: This routine only works for leap-years through 2099.
34
 */
35
 
36
void _TOD_Tickle(
37
  Objects_Id  id,
38
  void       *ignored
39
)
40
{
41
  unsigned32 leap;
42
 
43
  _TOD_Current.ticks = 0;
44
  ++_TOD_Seconds_since_epoch;
45
  if ( ++_TOD_Current.second >= TOD_SECONDS_PER_MINUTE ) {
46
    _TOD_Current.second = 0;
47
    if ( ++_TOD_Current.minute >= TOD_MINUTES_PER_HOUR ) {
48
      _TOD_Current.minute = 0;
49
      if ( ++_TOD_Current.hour >= TOD_HOURS_PER_DAY ) {
50
        _TOD_Current.hour = 0;
51
        if ( _TOD_Current.year & 0x3 ) leap = 0;
52
        else                           leap = 1;
53
        if ( ++_TOD_Current.day >
54
               _TOD_Days_per_month[ leap ][ _TOD_Current.month ]) {
55
          _TOD_Current.day = 1;
56
          if ( ++_TOD_Current.month > TOD_MONTHS_PER_YEAR ) {
57
            _TOD_Current.month = 1;
58
            _TOD_Current.year++;
59
          }
60
        }
61
      }
62
    }
63
  }
64
 
65
  _Watchdog_Tickle_seconds();
66
  _Watchdog_Insert_ticks( &_TOD_Seconds_watchdog, _TOD_Ticks_per_second );
67
}

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.