Commit 5d4c61b8 authored by Thanassis Tsiodras's avatar Thanassis Tsiodras

Add all the pre-existing (and enabled) tests.

parent 67bfd667
TASTE-Dataview DEFINITIONS ::=
BEGIN
MyComplexType ::= SEQUENCE {
a SEQUENCE { x INTEGER(0..255), y MyInteger }
}
MyComplexSeqOf ::= SEQUENCE(SIZE(2)) OF SEQUENCE { x INTEGER (0..255) }
MyComplexChoice ::= CHOICE { a SEQUENCE { x INTEGER (0..255) } }
EnableDisable ::= ENUMERATED {scrubon, scruboff}
MyRefSeqOf ::= SEQUENCE { seqof MySeqOf }
-- A few simple types to start with ASN.1
MyInteger ::= INTEGER (-255..255)
MyReal ::= REAL (-10.0 .. 1000.0)
MyEnum ::= ENUMERATED { hello, world, howareyou }
MySeq ::= SEQUENCE {
a MyInteger,
b ENUMERATED { taste(1), welcomes(2), you(3) }
}
MyChoice ::= CHOICE {
a BOOLEAN,
b MySeq
}
MySeqOf ::= SEQUENCE (SIZE (2)) OF MyEnum
MyPossiblyEmptySeqOf ::= SEQUENCE(SIZE(0..2)) OF INTEGER (1..2)
MySeqWithEmbeddedSeqOf ::= SEQUENCE {
a SEQUENCE(SIZE(0..2)) OF BOOLEAN
}
MyOctStr ::= OCTET STRING (SIZE (3))
-- Include an embedded choice
MyChoice2 ::= CHOICE {
a BOOLEAN,
b CHOICE {
c BOOLEAN,
d MyInteger
}
}
END
---------------------------------------------------
-- AADL2.0
-- TASTE
-- (c)Ellidiss Technologies
--
---------------------------------------------------
PACKAGE deploymentview::DV::obj97
PUBLIC
WITH Taste;
WITH Deployment;
WITH TASTE_DV_Properties;
PROCESS demo
END demo;
PROCESS IMPLEMENTATION demo.others
END demo.others;
END deploymentview::DV::obj97;
PACKAGE deploymentview::DV
PUBLIC
WITH ocarina_processors_x86;
WITH deploymentview::DV::obj97;
WITH Taste;
WITH Deployment;
WITH interfaceview::IV;
WITH TASTE_DV_Properties;
SYSTEM obj97
END obj97;
SYSTEM IMPLEMENTATION obj97.others
SUBCOMPONENTS
IV_orchestrator : SYSTEM interfaceview::IV::orchestrator.others {
Taste::coordinates => "1044 634 1260 815";
Taste::FunctionName => "orchestrator";
};
IV_ground : SYSTEM interfaceview::IV::ground.others {
Taste::coordinates => "1087 892 1395 1115";
Taste::FunctionName => "ground";
};
IV_passiveFunction : SYSTEM interfaceview::IV::passiveFunction.others {
Taste::coordinates => "1516 624 1712 837";
Taste::FunctionName => "passiveFunction";
};
IV_MemoryScrub : SYSTEM interfaceview::IV::MemoryScrub.others {
Taste::coordinates => "1529 877 1688 1062";
Taste::FunctionName => "MemoryScrub";
};
demo : PROCESS deploymentview::DV::obj97::demo.others {
Taste::coordinates => "880 474 1878 1128";
TASTE_DV_Properties::CoverageEnabled => FALSE;
Deployment::Port_Number => 0;
};
obj107 : PROCESSOR ocarina_processors_x86::x86.linux32 {
Taste::coordinates => "854 336 2030 1257";
};
PROPERTIES
Taste::APLC_Binding => (reference (demo)) APPLIES TO IV_orchestrator;
Taste::APLC_Binding => (reference (demo)) APPLIES TO IV_ground;
Taste::APLC_Binding => (reference (demo)) APPLIES TO IV_passiveFunction;
Taste::APLC_Binding => (reference (demo)) APPLIES TO IV_MemoryScrub;
Actual_Processor_Binding => (reference (obj107)) APPLIES TO demo;
END obj97.others;
SYSTEM deploymentview
END deploymentview;
SYSTEM IMPLEMENTATION deploymentview.others
SUBCOMPONENTS
obj97 : SYSTEM obj97.others {
Taste::coordinates => "619 152 2970 1993";
};
interfaceview : SYSTEM interfaceview::IV::interfaceview.others;
END deploymentview.others;
PROPERTIES
Taste::coordinates => "0 0 2970 2100";
Taste::version => "1.3.17";
Taste::interfaceView => "InterfaceView.aadl";
Taste::HWLibraries => ("../../../../tool-inst/share/ocarina/AADLv2/ocarina_components.aadl");
END deploymentview::DV;
---------------------------------------------------
-- AADL2.0
-- TASTE
-- (c)Ellidiss Technologies
--
---------------------------------------------------
PACKAGE interfaceview::FV::orchestrator
PUBLIC
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_pulse
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_pulse;
SUBPROGRAM IMPLEMENTATION PI_pulse.others
END PI_pulse.others;
SUBPROGRAM PI_run
FEATURES
cmd : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_run;
SUBPROGRAM IMPLEMENTATION PI_run.others
END PI_run.others;
SUBPROGRAM RI_housekeeping
FEATURES
hk : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
END RI_housekeeping;
SUBPROGRAM IMPLEMENTATION RI_housekeeping.others
END RI_housekeeping.others;
SUBPROGRAM RI_computeGNC
FEATURES
inP : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
outP : OUT PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
END RI_computeGNC;
SUBPROGRAM IMPLEMENTATION RI_computeGNC.others
END RI_computeGNC.others;
END interfaceview::FV::orchestrator;
PACKAGE interfaceview::FV::ground
PUBLIC
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_housekeeping
FEATURES
hk : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_housekeeping;
SUBPROGRAM IMPLEMENTATION PI_housekeeping.others
END PI_housekeeping.others;
SUBPROGRAM RI_run
FEATURES
cmd : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
END RI_run;
SUBPROGRAM IMPLEMENTATION RI_run.others
END RI_run.others;
SUBPROGRAM RI_EnableOrDisable
FEATURES
action : IN PARAMETER DataView::EnableDisable {
Taste::encoding => NATIVE;
};
END RI_EnableOrDisable;
SUBPROGRAM IMPLEMENTATION RI_EnableOrDisable.others
END RI_EnableOrDisable.others;
END interfaceview::FV::ground;
PACKAGE interfaceview::FV::passiveFunction
PUBLIC
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_computeGNC
FEATURES
inP : IN PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
outP : OUT PARAMETER DataView::MyInteger {
Taste::encoding => NATIVE;
};
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_computeGNC;
SUBPROGRAM IMPLEMENTATION PI_computeGNC.others
END PI_computeGNC.others;
END interfaceview::FV::passiveFunction;
PACKAGE interfaceview::FV::MemoryScrub
PUBLIC
WITH Taste;
WITH DataView;
WITH TASTE_IV_Properties;
SUBPROGRAM PI_EnableOrDisable
FEATURES
action : IN PARAMETER DataView::EnableDisable {
Taste::encoding => NATIVE;
};
PROPERTIES
Taste::Associated_Queue_Size => 1;
END PI_EnableOrDisable;
SUBPROGRAM IMPLEMENTATION PI_EnableOrDisable.others
END PI_EnableOrDisable.others;
END interfaceview::FV::MemoryScrub;
PACKAGE interfaceview::IV
PUBLIC
WITH interfaceview::FV::orchestrator;
WITH interfaceview::FV::ground;
WITH interfaceview::FV::passiveFunction;