mirror of
https://github.com/nasa/fprime.git
synced 2025-12-10 00:44:37 -06:00
* Interfaces * Point to new fpp alpha release * Fix the fprime-gds version * Update for framer/deframer work * Fix cmake tests * Clean up annotations * Clean up final fpp
39 lines
977 B
Fortran
39 lines
977 B
Fortran
module Svc {
|
|
|
|
@ A time component using OSAL RawTime abstractions
|
|
passive component OsTime {
|
|
import Time
|
|
|
|
sync input port setEpoch: OsTimeEpoch
|
|
|
|
@ Port for receiving commands
|
|
command recv port CmdDisp
|
|
|
|
@ Port for sending command registration requests
|
|
command reg port CmdReg
|
|
|
|
@ Port for sending command responses
|
|
command resp port CmdStatus
|
|
|
|
@ Event port
|
|
event port EventOut
|
|
|
|
@ Text event port
|
|
text event port LogText
|
|
|
|
@ Time get port
|
|
time get port timeCaller
|
|
|
|
sync command SetCurrentTime(seconds_now: U32) opcode 0x00
|
|
|
|
@ An error occurred while attempting to set the current time
|
|
event SetCurrentTimeError(
|
|
status: U32 @< The error status
|
|
) \
|
|
severity warning high \
|
|
id 0x00 \
|
|
format "Could not set current time due to RawTime error status {}"
|
|
|
|
}
|
|
}
|