Commit 91b57e71 authored by jdelange's avatar jdelange

* Integrate the SCOC3 platform for new projects with M3



git-svn-id: https://tecsw.estec.esa.int/svn/taste/trunk/ocarina@5539 129961e7-ef38-4bb5-a8f7-c9a525a55882
parent 4e5842c5
......@@ -210,6 +210,24 @@ public
Provided_Virtual_Bus_Class => (classifier (ocarina_buses::pohi.c));
end rasta_spacewire.pohiada;
---------------------
-- SCOC3 SPACEWIRE --
---------------------
device scoc3_spacewire
features
link : requires bus access ocarina_buses::spacewire.generic;
end scoc3_spacewire;
device implementation scoc3_spacewire.pohic
properties
Deployment::Driver_Name => "spacewire_scoc3";
Device_Driver => classifier (ocarina_drivers_scoc3_spacewire::driver.i);
Initialize_Entrypoint => classifier (ocarina_drivers_scoc3_spacewire::spg_init);
Provided_Virtual_Bus_Class => (classifier (ocarina_buses::pohi.c));
end scoc3_spacewire.pohic;
---------------------------
-- Generic serial driver --
---------------------------
......
package ocarina_drivers_scoc3_spacewire
public
with ocarina_buses;
with Deployment;
subprogram spg_poller
properties
Source_Language => C;
Source_Name => "__po_hi_c_driver_spacewire_scoc3_poller";
end spg_poller;
subprogram spg_sender
properties
Source_Language => C;
Source_Name => "__po_hi_c_driver_spacewire_scoc3_sender";
end spg_sender;
subprogram spg_init
properties
Source_Language => C;
Source_Name => "__po_hi_c_driver_spacewire_scoc3_init";
end spg_init;
thread thr_poller
end thr_poller;
thread implementation thr_poller.i
calls
mycall : {
pspg : subprogram spg_poller;
};
properties
Period => 1000ms;
Dispatch_Protocol => Periodic;
end thr_poller.i;
abstract driver
properties
Deployment::Version => "0.1beta";
Deployment::Help => "Check the ASN.1 type definition";
Deployment::Configuration_Type => classifier (ocarina_drivers::configuration_type_spacewire);
end driver;
abstract implementation driver.i
subcomponents
receiver_rasta_spacewire : thread thr_poller.i;
sender : subprogram spg_sender;
end driver.i;
end ocarina_drivers_scoc3_spacewire;
......@@ -42,6 +42,11 @@ end xtratum_partition;
virtual processor implementation xtratum_partition.generic
end xtratum_partition.generic;
processor implementation leon3.scoc3
properties
Deployment::Execution_Platform => LEON3_SCOC3;
end leon3.scoc3;
processor implementation leon3.xtratum
properties
Deployment::Execution_Platform => LEON3_XTRATUM;
......
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