Commit e724c1d2 authored by yoogx's avatar yoogx
Browse files

* Working loopback example with GRSPW Packet driver

	For openaadl/ocarina#144
parent 2ff3a4c8
...@@ -190,18 +190,28 @@ public ...@@ -190,18 +190,28 @@ public
actual_processor_binding => (reference (CPU_A)) applies to Device_A; actual_processor_binding => (reference (CPU_A)) applies to Device_A;
end PC_Simple.Loopback; end PC_Simple.Loopback;
system implementation PC_Simple.Loopback_Spw extends PC_Simple.Loopback system implementation PC_Simple.Loopback_Spw
-- Loopback variant using SpaceWire -- Loopback variant using SpaceWire
-- --
-- Note; does not work properly, as we cannot perform loopback -- Note; does not work properly, as we cannot perform loopback
-- with rasta_spacewire.pohic driver. Used only to test proper -- with rasta_spacewire.pohic driver. Used only to test proper
-- sending. -- sending.
subcomponents subcomponents
Device_A : refined to device ocarina_drivers::rasta_spacewire.pohic pr_A : process A.Impl;
Device_A : device ocarina_drivers::rasta_spacewire.grspw_pohic
{Source_Text => ("devicesconf_spw.c");}; {Source_Text => ("devicesconf_spw.c");};
the_bus : refined to bus ocarina_buses::spacewire.generic;
CPU_A : processor the_processor.i;
the_bus : bus ocarina_buses::spacewire.generic;
connections
bus access the_bus -> Device_A.link;
port pr_A.Alpha -> pr_A.Beta
{Actual_Connection_Binding => (reference (the_bus));};
properties properties
actual_processor_binding => (reference (CPU_A)) applies to pr_A;
actual_processor_binding => (reference (CPU_A)) applies to Device_A;
Deployment::Execution_Platform => LEON_RTEMS_POSIX applies to CPU_A; Deployment::Execution_Platform => LEON_RTEMS_POSIX applies to CPU_A;
end PC_Simple.Loopback_Spw; end PC_Simple.Loopback_Spw;
......
...@@ -52,6 +52,7 @@ public ...@@ -52,6 +52,7 @@ public
properties properties
Dispatch_Protocol => Periodic; Dispatch_Protocol => Periodic;
Period => 5 sec; Period => 5 sec;
Priority => 110;
end P.Impl; end P.Impl;
thread Q thread Q
...@@ -69,6 +70,7 @@ public ...@@ -69,6 +70,7 @@ public
properties properties
Dispatch_Protocol => Periodic; Dispatch_Protocol => Periodic;
Period => 5 sec; Period => 5 sec;
Priority => 100;
end Q.Impl; end Q.Impl;
end Software; end Software;
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment