source: rtems/c/src/ada/rtems-timer.ads @ c499856

4.115
Last change on this file since c499856 was c499856, checked in by Chris Johns <chrisj@…>, on Mar 20, 2014 at 9:10:47 PM

Change all references of rtems.com to rtems.org.

  • Property mode set to 100644
File size: 2.6 KB
Line 
1--
2--  RTEMS / Specification
3--
4--  DESCRIPTION:
5--
6--  This package provides the interface to the RTEMS API.
7--
8--  DEPENDENCIES:
9--
10--  NOTES:
11--    RTEMS initialization and configuration are called from
12--    the BSP side, therefore should never be called from ADA.
13--
14--  COPYRIGHT (c) 1997-2008.
15--  On-Line Applications Research Corporation (OAR).
16--
17--  The license and distribution terms for this file may in
18--  the file LICENSE in this distribution or at
19--  http://www.rtems.org/license/LICENSE.
20--
21
22with RTEMS.Tasks;
23
24package RTEMS.Timer is
25
26   --
27   --  The following type define a pointer to a watchdog/timer service routine.
28   --
29
30   type Service_Routine is access procedure (
31      ID          : in     RTEMS.ID;
32      User_Data   : in     RTEMS.Address
33   );
34   pragma Convention (C, Service_Routine);
35
36   --
37   --  Timer Manager
38   --
39
40   procedure Create (
41      Name   : in     RTEMS.Name;
42      ID     :    out RTEMS.ID;
43      Result :    out RTEMS.Status_Codes
44   );
45
46   procedure Ident (
47      Name   : in     RTEMS.Name;
48      ID     :    out RTEMS.ID;
49      Result :    out RTEMS.Status_Codes
50   );
51
52   procedure Delete (
53      ID     : in     RTEMS.ID;
54      Result :    out RTEMS.Status_Codes
55   );
56
57   procedure Fire_After (
58      ID        : in     RTEMS.ID;
59      Ticks     : in     RTEMS.Interval;
60      Routine   : in     RTEMS.Timer.Service_Routine;
61      User_Data : in     RTEMS.Address;
62      Result    :    out RTEMS.Status_Codes
63   );
64
65   procedure Server_Fire_After (
66      ID        : in     RTEMS.ID;
67      Ticks     : in     RTEMS.Interval;
68      Routine   : in     RTEMS.Timer.Service_Routine;
69      User_Data : in     RTEMS.Address;
70      Result    :    out RTEMS.Status_Codes
71   );
72
73   procedure Fire_When (
74      ID        : in     RTEMS.ID;
75      Wall_Time : in     RTEMS.Time_Of_Day;
76      Routine   : in     RTEMS.Timer.Service_Routine;
77      User_Data : in     RTEMS.Address;
78      Result    :    out RTEMS.Status_Codes
79   );
80
81   procedure Server_Fire_When (
82      ID        : in     RTEMS.ID;
83      Wall_Time : in     RTEMS.Time_Of_Day;
84      Routine   : in     RTEMS.Timer.Service_Routine;
85      User_Data : in     RTEMS.Address;
86      Result    :    out RTEMS.Status_Codes
87   );
88
89   procedure Reset (
90      ID     : in     RTEMS.ID;
91      Result :    out RTEMS.Status_Codes
92   );
93
94   procedure Cancel (
95      ID     : in     RTEMS.ID;
96      Result :    out RTEMS.Status_Codes
97   );
98
99   procedure Initiate_Server (
100      Server_Priority : in     RTEMS.Tasks.Priority;
101      Stack_Size      : in     Unsigned32;
102      Attribute_Set   : in     RTEMS.Attribute;
103      Result          :    out RTEMS.Status_Codes
104   );
105
106end RTEMS.Timer;
Note: See TracBrowser for help on using the repository browser.