File: /home/oboss/Users/gec/sources/Demonstrator/Payload/payload-function_management.ads
1 --% Compilation Unit: Payload.Function_Management
2 --
3 --% Category: Package Declaration
4 --
5 --% Release: $Name: $
6 --
7 --% Version: $Revision: 2.1 $
8 --
9 --% Author: $Author: gec $
10 --
11 --% Revision Log:
12 -- $Log: payload-function_management.ads,v $
13 -- Revision 2.1 2004/02/13 16:16:45 gec
14 -- Merged results of Demonstrator development on to main OBOSS trunk.
15 --
16 -- Revision 1.1.2.1 2004/01/26 10:13:56 gec
17 -- Partial update of payload application process according to Demonstrator specification. Applicable for integration testing.
18 --
19 --
20 --% Project: OBOSS
21 --
22 --% Copyright (C) 2004 by Terma A/S
23 -- Proprietary and intellectual rights of Terma A/S, Denmark,
24 -- are involved in the subject-matter of this material and
25 -- all manufacturing, reproduction, use, disclosure, and
26 -- sales rights pertaining to such subject-matter are
27 -- expressly reserved. This material is submitted for a
28 -- specific purpose as agreed, and the recipient by
29 -- accepting this material agrees that this material will
30 -- not be used, copied, or reproduced in whole or in part
31 -- nor its contents revealed in any manner or to any person,
32 -- except to meet the purpose for which it was submitted and
33 -- subject to the terms of the agreement.
34 --
35 --% Target Dependencies:
36 -- None
37 --% Compiler Dependencies:
38 -- None
39
40 --% Library Package:
41 -- Function management service (service type 8) specific to Payload
42 --+ application process
43
44 with Generic_TC_Translator;
45 with Payload.Parameters;
46 with Payload.Router;
47 with Payload.Function_Interpreter;
48 with Payload.TC_Acknowledger;
49 package Payload.Function_Management is new Generic_TC_Translator
50 (My_APID =>
51 Payload.Parameters.Application_ID,
52 Router =>
53 Payload.Router,
54 Telecommand_Verifier =>
55 Payload.TC_Acknowledger,
56 Perform_Function =>
57 Payload.Function_Interpreter.Perform_Function,
58 Telecommand_Buffer_Priority =>
59 Payload.Parameters.TC_Interpreters.Telecommand_Buffer_Priority,
60 Telecommand_Buffer_Size =>
61 Payload.Parameters.TC_Interpreters.Telecommand_Buffer_Size,
62 Telecommand_Interpreter_Priority =>
63 Payload.Parameters.TC_Interpreters.
64 Telecommand_Interpreter_Priority,
65 Telecommand_Interpreter_Stack_Size =>
66 Payload.Parameters.Function_Management.
67 Telecommand_Interpreter_Stack_Size);
68