Skip to content

GitLab

Commit d5783922 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Add Demo_Distrib

parent 7c02f521
Hide whitespace changes
Inline Side-by-side
Showing with 877 additions and 0 deletions
test/Demo_Distrib/DataView.aadl 0 → 100644
View file @ d5783922
--------------------------------------------------------
--! File generated by asn2aadl v2.1.38: DO NOT EDIT !
--------------------------------------------------------
--! InputASN1FileChecksum:0e33b3111ca43a9af18489d279ecae68:/home/taste/tool-src/kazoo/test/Demo_Distrib/DataView.asn:
--! InputASN1FileChecksum:ee8a7e01f29874c0d50f437d5abb9599:/home/taste/tool-inst/share/taste-types/taste-types.asn:
--------------------------------------------------------
package DataView
public
with Data_Model;
with Taste;
with Base_Types;
with Deployment;
DATA Simulink_Tunable_Parameter
PROPERTIES
TASTE::Ada_Package_Name => "TASTE_Directives";
Type_Source_Name => "Simulink-Tunable-Parameter";
Deployment::ASN1_Module_Name => "TASTE-Directives";
TASTE::Forbid_in_PI => true;
END Simulink_Tunable_Parameter;
DATA Timer
PROPERTIES
TASTE::Ada_Package_Name => "TASTE_Directives";
Type_Source_Name => "Timer";
Deployment::ASN1_Module_Name => "TASTE-Directives";
TASTE::Forbid_in_PI => true;
END Timer;
DATA Taste_directive
PROPERTIES
TASTE::Ada_Package_Name => "TASTE_Directives";
Type_Source_Name => "Taste-directive";
Deployment::ASN1_Module_Name => "TASTE-Directives";
TASTE::Forbid_in_PI => true;
END Taste_directive;
data Stream_Element_Buffer
-- Root type for buffer elements
properties
Data_Model::Data_Representation => Character;
end Stream_Element_Buffer;
DATA My_Integer
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-src/kazoo/test/Demo_Distrib/DataView.asn");
TASTE::Ada_Package_Name => "DataView";
Deployment::ASN1_Module_Name => "DataView";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 8; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "My-Integer";
TASTE::Position_In_File => [ line => 3 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aINTEGER;
END My_Integer;
DATA IMPLEMENTATION My_Integer.impl
END My_Integer.impl;
DATA My_Integer_Buffer_Max
END My_Integer_Buffer_Max;
DATA IMPLEMENTATION My_Integer_Buffer_Max.impl
-- Buffer to hold a marshalled data of type My_Integer
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END My_Integer_Buffer_Max.impl;
DATA My_Integer_Buffer
END My_Integer_Buffer;
DATA IMPLEMENTATION My_Integer_Buffer.impl
-- Buffer to hold a marshalled data of type My_Integer
SUBCOMPONENTS
Buffer : data My_Integer_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END My_Integer_Buffer.impl;
DATA T_Boolean
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-inst/share/taste-types/taste-types.asn");
TASTE::Ada_Package_Name => "TASTE_BasicTypes";
Deployment::ASN1_Module_Name => "TASTE-BasicTypes";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 1; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "T-Boolean";
TASTE::Position_In_File => [ line => 14 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aBOOLEAN;
END T_Boolean;
DATA IMPLEMENTATION T_Boolean.impl
END T_Boolean.impl;
DATA T_Boolean_Buffer_Max
END T_Boolean_Buffer_Max;
DATA IMPLEMENTATION T_Boolean_Buffer_Max.impl
-- Buffer to hold a marshalled data of type T_Boolean
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END T_Boolean_Buffer_Max.impl;
DATA T_Boolean_Buffer
END T_Boolean_Buffer;
DATA IMPLEMENTATION T_Boolean_Buffer.impl
-- Buffer to hold a marshalled data of type T_Boolean
SUBCOMPONENTS
Buffer : data T_Boolean_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END T_Boolean_Buffer.impl;
DATA T_Int32
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-inst/share/taste-types/taste-types.asn");
TASTE::Ada_Package_Name => "TASTE_BasicTypes";
Deployment::ASN1_Module_Name => "TASTE-BasicTypes";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 8; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "T-Int32";
TASTE::Position_In_File => [ line => 6 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aINTEGER;
END T_Int32;
DATA IMPLEMENTATION T_Int32.impl
END T_Int32.impl;
DATA T_Int32_Buffer_Max
END T_Int32_Buffer_Max;
DATA IMPLEMENTATION T_Int32_Buffer_Max.impl
-- Buffer to hold a marshalled data of type T_Int32
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END T_Int32_Buffer_Max.impl;
DATA T_Int32_Buffer
END T_Int32_Buffer;
DATA IMPLEMENTATION T_Int32_Buffer.impl
-- Buffer to hold a marshalled data of type T_Int32
SUBCOMPONENTS
Buffer : data T_Int32_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END T_Int32_Buffer.impl;
DATA T_Int8
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-inst/share/taste-types/taste-types.asn");
TASTE::Ada_Package_Name => "TASTE_BasicTypes";
Deployment::ASN1_Module_Name => "TASTE-BasicTypes";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 8; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "T-Int8";
TASTE::Position_In_File => [ line => 10 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aINTEGER;
END T_Int8;
DATA IMPLEMENTATION T_Int8.impl
END T_Int8.impl;
DATA T_Int8_Buffer_Max
END T_Int8_Buffer_Max;
DATA IMPLEMENTATION T_Int8_Buffer_Max.impl
-- Buffer to hold a marshalled data of type T_Int8
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END T_Int8_Buffer_Max.impl;
DATA T_Int8_Buffer
END T_Int8_Buffer;
DATA IMPLEMENTATION T_Int8_Buffer.impl
-- Buffer to hold a marshalled data of type T_Int8
SUBCOMPONENTS
Buffer : data T_Int8_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END T_Int8_Buffer.impl;
DATA T_UInt32
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-inst/share/taste-types/taste-types.asn");
TASTE::Ada_Package_Name => "TASTE_BasicTypes";
Deployment::ASN1_Module_Name => "TASTE-BasicTypes";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 8; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "T-UInt32";
TASTE::Position_In_File => [ line => 8 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aINTEGER;
END T_UInt32;
DATA IMPLEMENTATION T_UInt32.impl
END T_UInt32.impl;
DATA T_UInt32_Buffer_Max
END T_UInt32_Buffer_Max;
DATA IMPLEMENTATION T_UInt32_Buffer_Max.impl
-- Buffer to hold a marshalled data of type T_UInt32
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END T_UInt32_Buffer_Max.impl;
DATA T_UInt32_Buffer
END T_UInt32_Buffer;
DATA IMPLEMENTATION T_UInt32_Buffer.impl
-- Buffer to hold a marshalled data of type T_UInt32
SUBCOMPONENTS
Buffer : data T_UInt32_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END T_UInt32_Buffer.impl;
DATA T_UInt8
PROPERTIES
-- name of the ASN.1 source file:
Source_Text => ("/home/taste/tool-inst/share/taste-types/taste-types.asn");
TASTE::Ada_Package_Name => "TASTE_BasicTypes";
Deployment::ASN1_Module_Name => "TASTE-BasicTypes";
Source_Language => (ASN1);
-- Size of a buffer to cover all forms of message representation:
-- Real message size is 8; suggested aligned message buffer is...
Source_Data_Size => 8 Bytes;
-- name of the corresponding data type in the source file:
Type_Source_Name => "T-UInt8";
TASTE::Position_In_File => [ line => 12 ; column => 1 ; ];
-- what kind of type is this?
TASTE::ASN1_Basic_Type =>aINTEGER;
END T_UInt8;
DATA IMPLEMENTATION T_UInt8.impl
END T_UInt8.impl;
DATA T_UInt8_Buffer_Max
END T_UInt8_Buffer_Max;
DATA IMPLEMENTATION T_UInt8_Buffer_Max.impl
-- Buffer to hold a marshalled data of type T_UInt8
PROPERTIES
Data_Model::Data_Representation => array;
Data_Model::Dimension => (8); -- Size of the buffer
Source_Data_Size => 8 Bytes; -- Size of the buffer in bytes
Data_Model::Base_Type => (classifier (DataView::Stream_Element_Buffer));
END T_UInt8_Buffer_Max.impl;
DATA T_UInt8_Buffer
END T_UInt8_Buffer;
DATA IMPLEMENTATION T_UInt8_Buffer.impl
-- Buffer to hold a marshalled data of type T_UInt8
SUBCOMPONENTS
Buffer : data T_UInt8_Buffer_Max.impl;
Length : data Base_Types::Unsigned_32;
PROPERTIES
Data_Model::Data_Representation => Struct;
Source_Data_Size => 24 Bytes; -- Size of the buffer in bytes
END T_UInt8_Buffer.impl;
SYSTEM Taste_DataView
END Taste_DataView;
SYSTEM IMPLEMENTATION Taste_DataView.others
SUBCOMPONENTS
My_Integer : DATA My_Integer.impl;
T_Boolean : DATA T_Boolean.impl;
T_Int32 : DATA T_Int32.impl;
T_Int8 : DATA T_Int8.impl;
T_UInt32 : DATA T_UInt32.impl;
T_UInt8 : DATA T_UInt8.impl;
END Taste_DataView.others;
end DataView;
test/Demo_Distrib/DataView.asn 0 → 100644
View file @ d5783922
DataView DEFINITIONS AUTOMATIC TAGS ::= BEGIN
My-Integer ::= INTEGER (0 .. 65535)
END
test/Demo_Distrib/DeploymentView.aadl 0 → 100644
View file @ d5783922
---------------------------------------------------
-- AADL2.2
-- TASTE type deploymentview
--
-- generated code: do not edit
---------------------------------------------------
PACKAGE deploymentview::DV::pb1
PUBLIC
WITH ocarina_buses;
WITH ocarina_drivers;
WITH Taste;
WITH Deployment;
WITH TASTE_DV_Properties;
PROCESS pinger
END pinger;
PROCESS IMPLEMENTATION pinger.others
END pinger.others;
DEVICE ethernet1
EXTENDS ocarina_drivers::generic_sockets_ip
FEATURES
link : REFINED TO REQUIRES BUS ACCESS ocarina_buses::ip.i {
Taste::coordinates => "729 966";
};
PROPERTIES
Taste::Interface_Coordinates => "1145 1062" APPLIES TO link;
Deployment::Configuration => "{devname ""eth0"", address ""127.0.0.1"", version ipv4, port 5115 }";
Deployment::Config => "~/tool-inst/include/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/ip.asn";
Deployment::Version => "0.1beta";
END ethernet1;
DEVICE IMPLEMENTATION ethernet1.others
EXTENDS ocarina_drivers::generic_sockets_ip.pohic
END ethernet1.others;
END deploymentview::DV::pb1;
PACKAGE deploymentview::DV::pb2
PUBLIC
WITH ocarina_buses;
WITH ocarina_drivers;
WITH Taste;
WITH Deployment;
WITH TASTE_DV_Properties;
PROCESS pingee
END pingee;
PROCESS IMPLEMENTATION pingee.others
END pingee.others;
DEVICE ethernet2
EXTENDS ocarina_drivers::generic_sockets_ip
FEATURES
link : REFINED TO REQUIRES BUS ACCESS ocarina_buses::ip.i {
Taste::coordinates => "2276 780";
};
PROPERTIES
Taste::Interface_Coordinates => "1710 1062" APPLIES TO link;
Deployment::Configuration => "{devname ""eth0"", address ""127.0.0.1"", version ipv4, port 5116 }";
Deployment::Config => "~/tool-inst/include/ocarina/runtime/polyorb-hi-c/src/drivers/configuration/ip.asn";
Deployment::Version => "0.1beta";
END ethernet2;
DEVICE IMPLEMENTATION ethernet2.others
EXTENDS ocarina_drivers::generic_sockets_ip.pohic
END ethernet2.others;
END deploymentview::DV::pb2;
PACKAGE deploymentview::DV
PUBLIC
WITH interfaceview::IV::A;
WITH ocarina_processors_x86;
WITH deploymentview::DV::pb1;
WITH interfaceview::IV::B;
WITH deploymentview::DV::pb2;
WITH ocarina_buses;
WITH Taste;
WITH Deployment;
WITH interfaceview::IV;
WITH TASTE_DV_Properties;
SYSTEM pb1
FEATURES
ethernet1_eth0 : REQUIRES BUS ACCESS ocarina_buses::ip.i;
END pb1;
SYSTEM IMPLEMENTATION pb1.others
SUBCOMPONENTS
IV_A : SYSTEM interfaceview::IV::A::A.others {
Taste::FunctionName => "A";
};
pinger : PROCESS deploymentview::DV::pb1::pinger.others {
Taste::coordinates => "420 296 680 747";
Deployment::Port_Number => 0;
};
p1 : PROCESSOR ocarina_processors_x86::x86.linux {
Taste::coordinates => "391 255 719 754";
};
ethernet1 : DEVICE deploymentview::DV::pb1::ethernet1.others {
Taste::coordinates => "457 793 850 966";
};
CONNECTIONS
ethernet1_eth0_link : BUS ACCESS ethernet1_eth0 -> ethernet1.link;
PROPERTIES
Taste::APLC_Binding => (reference (pinger)) APPLIES TO IV_A;
Actual_Processor_Binding => (reference (p1)) APPLIES TO pinger;
Actual_Processor_Binding => (reference (p1)) APPLIES TO ethernet1;
END pb1.others;
SYSTEM pb2
FEATURES
ethernet2_eth0 : REQUIRES BUS ACCESS ocarina_buses::ip.i;
END pb2;
SYSTEM IMPLEMENTATION pb2.others
SUBCOMPONENTS
IV_B : SYSTEM interfaceview::IV::B::B.others {
Taste::FunctionName => "B";
};
pingee : PROCESS deploymentview::DV::pb2::pingee.others {
Taste::coordinates => "2269 363 2584 708";
Deployment::Port_Number => 0;
};
p2 : PROCESSOR ocarina_processors_x86::x86.linux {
Taste::coordinates => "2249 307 2591 725";
};
ethernet2 : DEVICE deploymentview::DV::pb2::ethernet2.others {
Taste::coordinates => "2276 775 2726 963";
};
CONNECTIONS
ethernet2_eth0_link : BUS ACCESS ethernet2_eth0 -> ethernet2.link;
PROPERTIES
Taste::APLC_Binding => (reference (pingee)) APPLIES TO IV_B;
Actual_Processor_Binding => (reference (p2)) APPLIES TO pingee;
Actual_Processor_Binding => (reference (p2)) APPLIES TO ethernet2;
END pb2.others;
SYSTEM deploymentview
END deploymentview;
SYSTEM IMPLEMENTATION deploymentview.others
SUBCOMPONENTS
pb1 : SYSTEM pb1.others {
Taste::coordinates => "333 173 913 995";
};
pb2 : SYSTEM pb2.others {
Taste::coordinates => "2181 223 2864 1058";
};
eth0 : BUS ocarina_buses::ip.i {
Taste::coordinates => "1073 1062 1788 1282";
};
interfaceview : SYSTEM interfaceview::IV::interfaceview.others;
CONNECTIONS
obj1366 : BUS ACCESS eth0 -> pb1.ethernet1_eth0 {
Taste::coordinates => "729 966 729 1003 1145 1003 1145 1062";
};
obj1487 : BUS ACCESS eth0 -> pb2.ethernet2_eth0 {
Taste::coordinates => "2276 780 1710 780 1710 1062";
};
PROPERTIES
Actual_Connection_Binding => (reference (eth0)) APPLIES TO interfaceview.A_PI_ping_B_RI_pong;
Actual_Connection_Binding => (reference (eth0)) APPLIES TO interfaceview.B_PI_ping_A_RI_pong;
END deploymentview.others;
PROPERTIES
Taste::coordinates => "0 0 2970 2100";
Taste::version => "2.2";
Taste::interfaceView => "InterfaceView.aadl";
Taste::HWLibraries => ("/home/taste/tool-inst/share/ocarina/AADLv2/ocarina_components.aadl");
END deploymentview::DV;
test/Demo_Distrib/InterfaceView.aadl 0 → 100644
View file @ d5783922
---------------------------------------------------
-- AADL2.2
-- TASTE type interfaceview
--
-- generated code: do not edit
---------------------------------------------------
PACKAGE interfaceview::IV::A
PUBLIC
WITH interfaceview::IV::B;
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_ping
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_ping;
SUBPROGRAM IMPLEMENTATION PI_ping.others
PROPERTIES
Compute_Execution_Time => 0 ms .. 1000 ms;
END PI_ping.others;
SUBPROGRAM PI_cyclic_activation
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_cyclic_activation;
SUBPROGRAM IMPLEMENTATION PI_cyclic_activation.others
PROPERTIES
Compute_Execution_Time => 0 ms .. 1000 ms;
END PI_cyclic_activation.others;
SUBPROGRAM RI_pong
FEATURES
p1 : IN PARAMETER DataView::My_Integer {
Taste::encoding => UPER;
};
END RI_pong;
SUBPROGRAM IMPLEMENTATION RI_pong.others
END RI_pong.others;
SYSTEM A
FEATURES
PI_ping : PROVIDES SUBPROGRAM ACCESS interfaceview::IV::A::PI_ping.others {
Taste::coordinates => "1232 1132";
Taste::RCMoperationKind => sporadic;
Taste::RCMperiod => 1000 ms;
Taste::Deadline => 1000 ms;
Taste::InterfaceName => "ping";
};
PI_cyclic_activation : PROVIDES SUBPROGRAM ACCESS interfaceview::IV::A::PI_cyclic_activation.others {
Taste::coordinates => "877 570";
Taste::RCMoperationKind => cyclic;
Taste::RCMperiod => 2000 ms;
Taste::Deadline => 1000 ms;
Taste::InterfaceName => "cyclic_activation";
};
RI_pong : REQUIRES SUBPROGRAM ACCESS interfaceview::IV::B::PI_ping.others {
Taste::coordinates => "1232 672";
Taste::RCMoperationKind => sporadic;
Taste::InterfaceName => "pong";
Taste::labelInheritance => "true";
};
PROPERTIES
Source_Language => (C);
Taste::Active_Interfaces => enabled;
END A;
SYSTEM IMPLEMENTATION A.others
END A.others;
END interfaceview::IV::A;
PACKAGE interfaceview::IV::B
PUBLIC
WITH interfaceview::IV::A;
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_ping
FEATURES
p1 : IN PARAMETER DataView::My_Integer {
Taste::encoding => UPER;
};
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_ping;
SUBPROGRAM IMPLEMENTATION PI_ping.others
PROPERTIES
Compute_Execution_Time => 0 ms .. 1000 ms;
END PI_ping.others;
SUBPROGRAM RI_pong
END RI_pong;
SUBPROGRAM IMPLEMENTATION RI_pong.others
END RI_pong.others;
SYSTEM B
FEATURES
PI_ping : PROVIDES SUBPROGRAM ACCESS interfaceview::IV::B::PI_ping.others {
Taste::coordinates => "1781 671";
Taste::RCMoperationKind => sporadic;
Taste::RCMperiod => 1000 ms;
Taste::Deadline => 1000 ms;
Taste::InterfaceName => "ping";
};
RI_pong : REQUIRES SUBPROGRAM ACCESS interfaceview::IV::A::PI_ping.others {
Taste::coordinates => "1781 1131";
Taste::RCMoperationKind => sporadic;
Taste::InterfaceName => "pong";
Taste::labelInheritance => "true";
};