use of verdict.vdm.vdm_lustre.VariableDeclaration in project VERDICT by ge-high-assurance.
the class VDM2Lustre method visit.
// Connect -> NodeCall
public void visit(Connection connection, NodeBody nodeBody) {
// R.H.S
ConnectionEnd src = connection.getSource();
// Source Connection
Port src_component_port = src.getComponentPort();
// L.H.S.
ConnectionEnd dest = connection.getDestination();
// Destination Connection
Port dest_component_port = dest.getComponentPort();
if (dest_component_port != null) {
// Destination = Component (z3)
// Source = SubComponent (my_b:B _z2)
NodeEquation neq = new NodeEquation();
NodeEquationLHS eq_lhs = new NodeEquationLHS();
eq_lhs.getIdentifier().add(dest_component_port.getName());
neq.setLhs(eq_lhs);
CompInstancePort compInstancePort = src.getSubcomponentPort();
ComponentInstance componentInstance = compInstancePort.getSubcomponent();
src_component_port = compInstancePort.getPort();
String src_portID = src_component_port.getName();
Expression expr = new Expression();
List<VariableDeclaration> vars = nodeBody.getVariableDeclaration();
boolean match = false;
String id_expr = componentInstance.getId() + "_port_" + src_portID;
for (VariableDeclaration var : vars) {
if (var.getName().equals(id_expr)) {
match = true;
break;
}
}
if (match) {
expr.setIdentifier(id_expr);
} else {
String inst_cmp = "(.+)_instrumented";
Pattern inst_pattern = Pattern.compile(inst_cmp);
// System.out.println(src_portID);
Matcher m = inst_pattern.matcher(src_portID);
if (m.matches()) {
src_portID = m.group(1);
}
id_expr = componentInstance.getId() + "_port_" + src_portID;
expr.setIdentifier(id_expr);
// System.out.println(id_expr);
// System.out.println(">>>>>>>>>>>>>Identifiers: " +
// expr.getIdentifier());
}
neq.setRhs(expr);
nodeBody.getEquation().add(neq);
} else if (src_component_port != null) {
CompInstancePort compInstancePort = dest.getSubcomponentPort();
// X1
dest_component_port = compInstancePort.getPort();
// my_a1 : A
ComponentInstance componentInstance = compInstancePort.getSubcomponent();
String arg_value = src_component_port.getName();
// called node Identifier.
String called_node_ID = null;
ComponentType componentType = componentInstance.getSpecification();
ComponentImpl componentImpl = componentInstance.getImplementation();
if (componentType == null) {
componentType = componentImpl.getType();
called_node_ID = componentType.getName() + "_dot_Impl";
}
if (componentType != null && componentImpl != null) {
componentType = componentImpl.getType();
called_node_ID = componentType.getName() + "_dot_Impl";
String inst_cmp = "(.+)_instrumented";
Pattern inst_pattern = Pattern.compile(inst_cmp);
// System.out.println(arg_value);
Matcher m = inst_pattern.matcher(arg_value);
if (m.matches()) {
arg_value = m.group(1);
}
} else {
called_node_ID = componentType.getName();
arg_value = src_component_port.getName();
// System.out.println(arg_value);
}
for (Port port : componentType.getPort()) {
// MODE
PortMode port_mode = port.getMode();
if (port_mode == PortMode.OUT) {
// EQ L.H.S Variables *called Node return values
String expr_id = componentInstance.getId() + "_port_" + port.getName();
// System.out.print(">>>" + expr_id);
NodeEquation n_eq = getNodeEq(expr_id, nodeBody);
if (n_eq != null) {
Expression eq_rhs = n_eq.getRhs();
NodeCall node_called = eq_rhs.getCall();
String inst_cmp = "(.+)_Inst_.*";
Pattern inst_pattern = Pattern.compile(inst_cmp);
// String node_id = "";
// if (node_called != null) {
// node_id = node_called.getNodeId();
// }
// System.out.println(" = " + node_id + " (" + arg_value
// +
// ")");
Matcher m = inst_pattern.matcher(node_called.getNodeId());
IfThenElse ifelse = new IfThenElse();
Expression called_expr = new Expression();
// Condition
Expression gps_expr = new Expression();
if (m.matches()) {
// Instrumented component Instance ID
String component_id = m.group(1);
gps_expr.setIdentifier(component_id);
}
ifelse.setCondition(gps_expr);
// Then
ifelse.setThenBranch(called_expr);
// Else
Expression arg = new Expression();
arg.setIdentifier(src_component_port.getName());
ifelse.setElseBranch(arg);
// NodeCalled Expr
called_expr.setCall(node_called);
Expression instrumented_expr = new Expression();
instrumented_expr.setConditionalExpression(ifelse);
if (node_called != null) {
if (node_called.getNodeId().equals(called_node_ID)) {
for (Expression arg_expr : node_called.getArgument()) {
if (arg_expr.getIdentifier().equals(dest_component_port.getName())) {
arg_expr.setIdentifier(arg_value);
} else if (node_called.getArgument().size() == 1) {
arg_expr.setIdentifier(arg_value);
}
}
}
}
}
}
}
} else {
CompInstancePort compInstancePort = src.getSubcomponentPort();
ComponentInstance componentInstance = compInstancePort.getSubcomponent();
src_component_port = compInstancePort.getPort();
Expression arg_expr = new Expression();
// my_a1_y1
String src_portID = src_component_port.getName();
String componentInstanceID = componentInstance.getId();
arg_expr.setIdentifier(componentInstanceID + "_port_" + src_portID);
// called node Identifier.
String called_node_ID = null;
compInstancePort = dest.getSubcomponentPort();
componentInstance = compInstancePort.getSubcomponent();
dest_component_port = compInstancePort.getPort();
ComponentType componentType = componentInstance.getSpecification();
ComponentImpl componentImpl = componentInstance.getImplementation();
String old_portID = null;
if (componentType == null) {
componentType = componentImpl.getType();
called_node_ID = componentType.getName();
}
if (componentType != null && componentImpl != null) {
componentType = componentImpl.getType();
called_node_ID = componentType.getName() + "_dot_Impl";
String inst_cmp = "(.+)_instrumented";
Pattern inst_pattern = Pattern.compile(inst_cmp);
// System.out.print(src_portID + " ==> ");
Matcher m = inst_pattern.matcher(src_portID);
if (m.matches()) {
old_portID = src_portID;
src_portID = m.group(1);
arg_expr.setIdentifier(componentInstanceID + "_port_" + src_portID);
// System.out.println(old_portID + " -- " + src_portID);
}
// System.out.println(arg_expr.getIdentifier() + " <== " +
// src_portID);
} else {
called_node_ID = componentType.getName();
}
String node_arg = "(.+)_Inst_.*";
Pattern arg_pattern = Pattern.compile(node_arg);
Matcher m_arg = arg_pattern.matcher(called_node_ID);
if (!m_arg.matches() && old_portID != null) {
arg_expr.setIdentifier(componentInstanceID + "_port_" + old_portID);
// System.out.println("Node ID =>" + called_node_ID + "(" +
// arg_expr.getIdentifier() + ")");
}
// System.out.println(called_node_ID);
for (Port port : componentType.getPort()) {
// MODE
PortMode port_mode = port.getMode();
if (port_mode == PortMode.OUT) {
// EQ L.H.S Variables *called Node return values
String expr_id = componentInstance.getId() + "_port_" + port.getName();
NodeEquation n_eq = getNodeEq(expr_id, nodeBody);
if (n_eq != null) {
Expression eq_rhs = n_eq.getRhs();
NodeCall node_called = eq_rhs.getCall();
String inst_cmp = "(.+)_Inst_.*";
Pattern inst_pattern = Pattern.compile(inst_cmp);
String node_id = "";
if (node_called != null) {
node_id = node_called.getNodeId();
}
Matcher m = inst_pattern.matcher(node_id);
IfThenElse ifelse = new IfThenElse();
Expression called_expr = new Expression();
// Condition
Expression g_expr = new Expression();
if (m.matches()) {
// Instrumented component Instance ID
String component_id = m.group(1);
g_expr.setIdentifier(component_id);
}
ifelse.setCondition(g_expr);
// Then
ifelse.setThenBranch(called_expr);
// Else
// Expression arg = new Expression();
ifelse.setElseBranch(arg_expr);
// NodeCalled Expr
called_expr.setCall(node_called);
Expression instrumented_expr = new Expression();
instrumented_expr.setConditionalExpression(ifelse);
if (node_called != null) {
if (node_called.getNodeId().equals(called_node_ID)) {
for (Expression a_expr : node_called.getArgument()) {
if (a_expr.getIdentifier().equals(dest_component_port.getName())) {
a_expr.setIdentifier(arg_expr.getIdentifier());
} else if (node_called.getArgument().size() == 1) {
a_expr.setIdentifier(arg_expr.getIdentifier());
}
}
}
}
}
}
}
}
}
use of verdict.vdm.vdm_lustre.VariableDeclaration in project VERDICT by ge-high-assurance.
the class Agree2Vdm method translateEqStatementImpl.
private NodeBody translateEqStatementImpl(EqStatementImpl eqStmtImpl, HashSet<String> dataTypeDecl, HashSet<String> nodeDecl, Model model, NodeBody nodebody) {
// get all LHS identifiers in the statement and add it to the vdm node equation LHS
NodeEquation vdmNodeEquation = new NodeEquation();
EList<Arg> agreeLHSArgs = eqStmtImpl.getLhs();
// this type is just a list of strings
NodeEquationLHS vdmNodeEquationLHS = new NodeEquationLHS();
VariableDeclaration varDecl = new VariableDeclaration();
for (Arg agreeLHSArg : agreeLHSArgs) {
vdmNodeEquationLHS.getIdentifier().add(agreeLHSArg.getName());
varDecl.setName(agreeLHSArg.getName());
varDecl.setDataType(getVdmTypeFromAgreeType(agreeLHSArg.getType(), dataTypeDecl, model));
nodebody.getVariableDeclaration().add(varDecl);
}
vdmNodeEquation.setLhs(vdmNodeEquationLHS);
// get the RHS i.e.expr of the agree NodeEq and set it as the vdm node equation's RHS
vdmNodeEquation.setRhs(getVdmExpressionFromAgreeExpression(eqStmtImpl.getExpr(), dataTypeDecl, nodeDecl, model));
nodebody.getEquation().add(vdmNodeEquation);
return nodebody;
}
use of verdict.vdm.vdm_lustre.VariableDeclaration in project VERDICT by ge-high-assurance.
the class VerdictLustreListener method exitLocalVarDeclList.
/**
* Extract a list of local variable declarations.
*/
@Override
public void exitLocalVarDeclList(LustreParser.LocalVarDeclListContext ctx) {
ctx.variableDeclarations = new ArrayList<>();
ctx.ID().forEach(id -> {
VariableDeclaration variableDeclaration = new VariableDeclaration();
String name = id.getText();
variableDeclaration.setName(name);
if (ctx.type() != null) {
variableDeclaration.setDataType(ctx.type().dataType);
}
ctx.variableDeclarations.add(variableDeclaration);
});
}
use of verdict.vdm.vdm_lustre.VariableDeclaration in project VERDICT by ge-high-assurance.
the class VDM2Lustre method visit.
public void visit(ComponentType componentType, NodeBody nodeBody, String componentInstanceID, boolean impl_type) {
// Rename componentType
String cmpName = componentType.getName();
cmpName = cmpName.replace(".", "_dot_");
cmpName = cmpName.replace("::", "_double_colon_");
componentType.setName(cmpName);
// Node Equation
NodeEquation node_eq = new NodeEquation();
// Return variables
NodeEquationLHS eq_lhs = new NodeEquationLHS();
// Node Call
Expression node = new Expression();
NodeCall nodeCall = new NodeCall();
if (impl_type) {
nodeCall.setNodeId(componentType.getName() + "_dot_Impl");
} else {
nodeCall.setNodeId(componentType.getName());
}
// Port
for (Port port : componentType.getPort()) {
// //Event Port Definition
// for (Port port : componentType.getPort()) {
// visit(port);
// }
// MODE
PortMode port_mode = port.getMode();
if (port_mode == PortMode.IN) {
Expression arg = new Expression();
arg.setIdentifier(port.getName());
nodeCall.getArgument().add(arg);
}
if (port_mode == PortMode.OUT) {
VariableDeclaration var = new VariableDeclaration();
// Node Name
String output_name = port.getName();
String var_name = componentInstanceID + "_port_" + output_name;
var.setName(var_name);
// Node DataType
DataType dataType = port.getType();
var.setDataType(dataType);
nodeBody.getVariableDeclaration().add(var);
eq_lhs.getIdentifier().add(var_name);
}
}
// Ignore node call that do not have output
if (eq_lhs.getIdentifier() != null) {
node.setCall(nodeCall);
node_eq.setRhs(node);
node_eq.setLhs(eq_lhs);
nodeBody.getEquation().add(node_eq);
}
}
use of verdict.vdm.vdm_lustre.VariableDeclaration in project VERDICT by ge-high-assurance.
the class VDM2Lustre method visit.
public void visit(NodeBody nodeBody, LustreProgram program) {
for (VariableDeclaration var : nodeBody.getVariableDeclaration()) {
DataType data_type = var.getDataType();
String user_defined_type = null;
if (data_type != null) {
user_defined_type = data_type.getUserDefinedType();
}
if (user_defined_type != null) {
// user_defined_type = user_defined_type + "_Impl";
boolean implemented_type = typeDeclarations.containsKey(user_defined_type);
if (implemented_type) {
data_type.setUserDefinedType(user_defined_type);
}
}
}
for (NodeEquation node_equation : nodeBody.getEquation()) {
visit(node_equation);
}
// Update Expression related to Events
// for (NodeEquation node_equation : nodeBody.getEquation()) {
// visitNodeEq(node_equation);
// }
}
Aggregations