use of org.eclipse.titan.designer.AST.ASN1.types.ASN1_Choice_Type in project titan.EclipsePlug-ins by eclipse.
the class IsChoosenExpression method checkExpressionOperands.
/**
* Checks the parameters of the expression and if they are valid in
* their position in the expression or not.
*
* @param timestamp
* the timestamp of the actual semantic check cycle.
* @param expectedValue
* the kind of value expected.
* @param referenceChain
* a reference chain to detect cyclic references.
*/
private void checkExpressionOperands(final CompilationTimeStamp timestamp, final Expected_Value_type expectedValue, final IReferenceChain referenceChain) {
if (lastTimeoperandsChecked != null && !lastTimeoperandsChecked.isLess(timestamp)) {
return;
}
lastTimeoperandsChecked = timestamp;
value = null;
identifier = null;
if (reference == null || reference.getSubreferences().size() < 2) {
setIsErroneous(true);
return;
}
final Reference tempReference = reference.newInstance();
tempReference.setFullNameParent(this);
tempReference.setMyScope(getMyScope());
final ISubReference subreference = tempReference.removeLastSubReference();
if (Subreference_type.fieldSubReference.equals(subreference.getReferenceType())) {
identifier = ((FieldSubReference) subreference).getId();
} else {
setIsErroneous(true);
return;
}
final Assignment assignment = tempReference.getRefdAssignment(timestamp, true);
if (assignment == null) {
setIsErroneous(true);
return;
}
IType governor;
switch(assignment.getAssignmentType()) {
case A_CONST:
case A_EXT_CONST:
case A_MODULEPAR:
case A_VAR:
case A_PAR_VAL:
case A_PAR_VAL_IN:
case A_PAR_VAL_OUT:
case A_PAR_VAL_INOUT:
{
value = new Referenced_Value(tempReference);
value.setLocation(tempReference.getLocation());
value.setMyScope(getMyScope());
final BridgingNamedNode tempNamedNode = new BridgingNamedNode(this, OPERAND);
value.setFullNameParent(tempNamedNode);
governor = value.getExpressionGovernor(timestamp, expectedValue);
if (governor == null) {
setIsErroneous(true);
} else {
value.setMyGovernor(governor);
final IValue tempValue2 = governor.checkThisValueRef(timestamp, value);
if (tempValue2.getIsErroneous(timestamp)) {
setIsErroneous(true);
}
}
break;
}
case A_TEMPLATE:
case A_VAR_TEMPLATE:
case A_PAR_TEMP_IN:
case A_PAR_TEMP_OUT:
case A_PAR_TEMP_INOUT:
{
template = new Referenced_Template(tempReference);
template.setLocation(tempReference.getLocation());
template.setMyScope(getMyScope());
final BridgingNamedNode tempNamedNode = new BridgingNamedNode(this, OPERAND);
template.setFullNameParent(tempNamedNode);
if (Expected_Value_type.EXPECTED_DYNAMIC_VALUE.equals(expectedValue) || Expected_Value_type.EXPECTED_DYNAMIC_VALUE.equals(expectedValue)) {
governor = template.getExpressionGovernor(timestamp, Expected_Value_type.EXPECTED_TEMPLATE);
} else {
governor = template.getExpressionGovernor(timestamp, expectedValue);
}
if (governor == null) {
setIsErroneous(true);
} else {
template.setMyGovernor(governor);
final TTCN3Template last = template.getTemplateReferencedLast(timestamp, referenceChain);
if (last.getIsErroneous(timestamp)) {
setIsErroneous(true);
}
}
if (!Expected_Value_type.EXPECTED_TEMPLATE.equals(expectedValue) && !Expected_Value_type.EXPECTED_DYNAMIC_VALUE.equals(expectedValue)) {
if (Expected_Value_type.EXPECTED_CONSTANT.equals(expectedValue)) {
template.getLocation().reportSemanticError(MessageFormat.format(CONSTANTREFERENCEEXPECTED, assignment.getDescription()));
} else {
template.getLocation().reportSemanticError(MessageFormat.format(STATICREFERENCEEXPECTED, assignment.getDescription()));
}
setIsErroneous(true);
}
break;
}
default:
tempReference.getLocation().reportSemanticError(MessageFormat.format(VALUETEMPLATEEXPECTED, assignment.getDescription()));
setIsErroneous(true);
return;
}
if (governor != null) {
governor = governor.getTypeRefdLast(timestamp);
if (!governor.getIsErroneous(timestamp)) {
CompField field = null;
switch(governor.getTypetype()) {
case TYPE_ASN1_CHOICE:
if (((ASN1_Choice_Type) governor).hasComponentWithName(identifier)) {
field = ((ASN1_Choice_Type) governor).getComponentByName(identifier);
}
break;
case TYPE_TTCN3_CHOICE:
if (((TTCN3_Choice_Type) governor).hasComponentWithName(identifier.getName())) {
field = ((TTCN3_Choice_Type) governor).getComponentByName(identifier.getName());
}
break;
case TYPE_OPENTYPE:
if (((Open_Type) governor).hasComponentWithName(identifier)) {
field = ((Open_Type) governor).getComponentByName(identifier);
}
break;
case TYPE_ANYTYPE:
if (((Anytype_Type) governor).hasComponentWithName(identifier.getName())) {
field = ((Anytype_Type) governor).getComponentByName(identifier.getName());
}
break;
default:
location.reportSemanticError(MessageFormat.format(OPERANDERROR, governor.getTypename()));
setIsErroneous(true);
return;
}
if (null == field) {
location.reportSemanticError(MessageFormat.format(MISSINGFIELD, governor.getTypename(), identifier.getDisplayName()));
setIsErroneous(true);
}
}
}
}
use of org.eclipse.titan.designer.AST.ASN1.types.ASN1_Choice_Type in project titan.EclipsePlug-ins by eclipse.
the class TTCN3_Set_Seq_Choice_BaseType method checkSetSeqRawCodingAttributes.
/**
* Check the raw coding attributes of TTCN3 record and set types.
*
* @param timestamp the timestamp of the actual semantic check cycle.
*/
protected void checkSetSeqRawCodingAttributes(final CompilationTimeStamp timestamp) {
// check raw attributes
if (rawAttribute != null) {
if (rawAttribute.taglist != null) {
for (int c = 0; c < rawAttribute.taglist.size(); c++) {
final rawAST_single_tag singleTag = rawAttribute.taglist.get(c);
final Identifier fieldname = singleTag.fieldName;
if (!hasComponentWithName(fieldname.getName())) {
fieldname.getLocation().reportSemanticError(MessageFormat.format("Invalid field name `{0}'' in RAW parameter TAG for type `{1}''", fieldname.getDisplayName(), getTypename()));
continue;
}
if (singleTag.keyList != null) {
for (int a = 0; a < singleTag.keyList.size(); a++) {
final Reference reference = new Reference(null);
reference.addSubReference(new FieldSubReference(fieldname));
for (int b = 0; b < singleTag.keyList.get(a).keyField.names.size(); b++) {
reference.addSubReference(new FieldSubReference(singleTag.keyList.get(a).keyField.names.get(b)));
}
final IType t = getFieldType(timestamp, reference, 0, Expected_Value_type.EXPECTED_DYNAMIC_VALUE, false);
if (t != null) {
final Value v = singleTag.keyList.get(a).v_value;
if (v != null) {
v.setMyScope(getMyScope());
v.setMyGovernor(t);
final IValue tempValue = t.checkThisValueRef(timestamp, v);
t.checkThisValue(timestamp, tempValue, null, new ValueCheckingOptions(Expected_Value_type.EXPECTED_CONSTANT, false, false, false, false, false));
}
}
}
}
}
}
if (rawAttribute.ext_bit_groups != null) {
for (int a = 0; a < rawAttribute.ext_bit_groups.size(); a++) {
final rawAST_ext_bit_group tempExtBitGroup = rawAttribute.ext_bit_groups.get(a);
final Identifier fromIdentifier = tempExtBitGroup.from;
final Identifier toIdentifier = tempExtBitGroup.to;
boolean foundError = false;
if (!hasComponentWithName(fromIdentifier.getName())) {
fromIdentifier.getLocation().reportSemanticError(MessageFormat.format("Invalid field name `{0}'' in RAW parameter EXTENSION_BIT_GROUP for type `{1}''", fromIdentifier.getDisplayName(), getTypename()));
foundError = true;
}
if (!hasComponentWithName(toIdentifier.getName())) {
toIdentifier.getLocation().reportSemanticError(MessageFormat.format("Invalid field name `{0}'' in RAW parameter EXTENSION_BIT_GROUP for type `{1}''", toIdentifier.getDisplayName(), getTypename()));
foundError = true;
}
if (!foundError) {
boolean foundStart = false;
for (int i = 0; i < getNofComponents(); i++) {
final Identifier tempId = getComponentByIndex(i).getIdentifier();
if (tempId.equals(fromIdentifier)) {
foundStart = true;
} else if (tempId.equals(toIdentifier)) {
if (!foundStart) {
getLocation().reportSemanticError(MessageFormat.format("Invalid field order in RAW parameter EXTENSION_BIT_GROUP for type `{0}'': `{1}'', `{2}''", getTypename(), fromIdentifier.getDisplayName(), toIdentifier.getDisplayName()));
}
break;
}
}
}
}
}
if (rawAttribute.paddall != RawAST.XDEFDEFAULT) {
for (int i = 0; i < getNofComponents(); i++) {
final CompField cField = getComponentByIndex(i);
final Type fieldType = cField.getType();
RawAST fieldRawAttribute = fieldType.rawAttribute;
if (fieldRawAttribute == null) {
IType t = fieldType;
if (t instanceof Referenced_Type) {
final IReferenceChain referenceChain = ReferenceChain.getInstance(IReferenceChain.CIRCULARREFERENCE, true);
t = ((Referenced_Type) t).getTypeRefd(timestamp, referenceChain);
referenceChain.release();
}
while (t.getRawAttribute() == null && t instanceof Referenced_Type) {
final IReferenceChain referenceChain = ReferenceChain.getInstance(IReferenceChain.CIRCULARREFERENCE, true);
t = ((Referenced_Type) t).getTypeRefd(timestamp, referenceChain);
referenceChain.release();
}
fieldRawAttribute = new RawAST(t.getRawAttribute(), fieldType.getDefaultRawFieldLength());
fieldType.setRawAttributes(fieldRawAttribute);
}
if (fieldRawAttribute.padding == 0) {
fieldRawAttribute.padding = rawAttribute.padding;
}
if (fieldRawAttribute.prepadding == 0) {
fieldRawAttribute.prepadding = rawAttribute.prepadding;
}
if (fieldRawAttribute.padding_pattern_length == 0 && rawAttribute.padding_pattern_length > 0) {
fieldRawAttribute.padding_pattern = rawAttribute.padding_pattern;
fieldRawAttribute.padding_pattern_length = rawAttribute.padding_pattern_length;
}
}
}
if (rawAttribute.fieldorder != RawAST.XDEFDEFAULT) {
for (int i = 0; i < getNofComponents(); i++) {
final CompField cField = getComponentByIndex(i);
final Type fieldType = cField.getType();
RawAST fieldRawAttribute = fieldType.rawAttribute;
if (fieldRawAttribute == null) {
fieldRawAttribute = new RawAST(fieldType.getDefaultRawFieldLength());
fieldType.setRawAttributes(fieldRawAttribute);
}
if (fieldRawAttribute.fieldorder == RawAST.XDEFDEFAULT) {
fieldRawAttribute.fieldorder = rawAttribute.fieldorder;
}
}
}
}
if (rawAttribute != null && rawAttribute.presence != null) {
if (rawAttribute.presence.keyList != null) {
for (int a = 0; a < rawAttribute.presence.keyList.size(); a++) {
final rawAST_tag_field_value tempTagFieldValue = rawAttribute.presence.keyList.get(a);
final Reference reference = new Reference(null);
reference.addSubReference(new FieldSubReference(tempTagFieldValue.keyField.names.get(0)));
for (int b = 1; b < tempTagFieldValue.keyField.names.size(); b++) {
reference.addSubReference(new FieldSubReference(tempTagFieldValue.keyField.names.get(b)));
}
final IType t = getFieldType(timestamp, reference, 0, Expected_Value_type.EXPECTED_DYNAMIC_VALUE, false);
if (t != null) {
final Value v = tempTagFieldValue.v_value;
if (v != null) {
v.setMyScope(getMyScope());
v.setMyGovernor(t);
final IValue tempValue = t.checkThisValueRef(timestamp, v);
t.checkThisValue(timestamp, tempValue, null, new ValueCheckingOptions(Expected_Value_type.EXPECTED_CONSTANT, false, false, false, false, false));
}
}
}
}
}
// number of bits used to store all previous fields
int usedBits = 0;
for (int i = 0; i < getNofComponents(); i++) {
final CompField cField = getComponentByIndex(i);
final Type fieldType = cField.getType();
fieldType.forceRaw(timestamp);
final RawAST rawPar = fieldType.rawAttribute;
if (rawPar != null) {
final Identifier fieldId = cField.getIdentifier();
final IType fieldTypeLast = fieldType.getTypeRefdLast(timestamp);
if (rawPar.prepadding != 0) {
usedBits = (usedBits + rawPar.prepadding - 1) / rawPar.prepadding * rawPar.prepadding;
}
if (rawPar.intX && fieldTypeLast.getTypetype() == Type_type.TYPE_INTEGER) {
if (usedBits % 8 != 0 && (rawAttribute == null || rawAttribute.fieldorder != RawAST.XDEFMSB)) {
getLocation().reportSemanticError(MessageFormat.format("Using RAW parameter IntX in a record/set with FIELDORDER set to 'lsb' is only supported if the IntX field starts at the beginning of a new octet. There are {0} unused bits in the last octet before field {1}.", 8 - (usedBits % 8), fieldId.getDisplayName()));
}
} else if (rawPar.fieldlength > 0) {
usedBits += rawPar.fieldlength;
}
if (rawPar.padding != 0) {
usedBits = (usedBits + rawPar.padding - 1) / rawPar.padding * rawPar.padding;
}
if (rawPar.lengthto != null) {
for (int j = 0; j < rawPar.lengthto.size(); j++) {
final Identifier id = rawPar.lengthto.get(j);
if (!hasComponentWithName(id.getName())) {
id.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter LENGTHTO for field {0}: {1}", fieldId.getDisplayName(), id.getDisplayName()));
}
}
}
if (rawPar.lengthto != null) {
switch(fieldTypeLast.getTypetype()) {
case TYPE_INTEGER:
case TYPE_INTEGER_A:
break;
case TYPE_TTCN3_CHOICE:
for (int fi = 0; fi < ((TTCN3_Choice_Type) fieldTypeLast).getNofComponents(); fi++) {
final Type_type tt = ((TTCN3_Choice_Type) fieldTypeLast).getComponentByIndex(fi).getType().getTypetype();
if (tt != Type_type.TYPE_INTEGER && tt != Type_type.TYPE_INTEGER_A) {
getLocation().reportSemanticError("The union type LENGTHTO field must contain only integer fields");
}
}
break;
case TYPE_ASN1_CHOICE:
for (int fi = 0; fi < ((ASN1_Choice_Type) fieldTypeLast).getNofComponents(timestamp); fi++) {
final Type_type tt = ((ASN1_Choice_Type) fieldTypeLast).getComponentByIndex(fi).getType().getTypetype();
if (tt != Type_type.TYPE_INTEGER && tt != Type_type.TYPE_INTEGER_A) {
getLocation().reportSemanticError("The union type LENGTHTO field must contain only integer fields");
}
}
break;
case TYPE_ANYTYPE:
case TYPE_OPENTYPE:
case TYPE_TTCN3_SEQUENCE:
case TYPE_ASN1_SEQUENCE:
case TYPE_TTCN3_SET:
case TYPE_ASN1_SET:
if (rawPar.lengthindex != null) {
// will be checked in the next step
break;
}
default:
getLocation().reportSemanticError(MessageFormat.format("The LENGTHTO field must be an integer or union type instead of `{0}''", fieldTypeLast.getTypename()));
break;
}
}
if (rawPar.lengthto != null && rawPar.lengthindex != null) {
final Identifier id = rawPar.lengthindex.names.get(0);
switch(fieldTypeLast.getTypetype()) {
case TYPE_TTCN3_CHOICE:
case TYPE_TTCN3_SEQUENCE:
case TYPE_TTCN3_SET:
if (!((TTCN3_Set_Seq_Choice_BaseType) fieldTypeLast).hasComponentWithName(id.getName())) {
id.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter LENGTHINDEX for field {0}: {1}", fieldId.getDisplayName(), id.getDisplayName()));
}
break;
case TYPE_ASN1_CHOICE:
case TYPE_ASN1_SEQUENCE:
case TYPE_ASN1_SET:
if (!((ASN1_Set_Seq_Choice_BaseType) fieldTypeLast).hasComponentWithName(id)) {
id.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter LENGTHINDEX for field {0}: {1}", fieldId.getDisplayName(), id.getDisplayName()));
}
break;
default:
fieldId.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldmember type in RAW parameter LENGTHINDEX for field {0}.", fieldId.getDisplayName()));
break;
}
}
if (rawPar.pointerto != null) {
final Identifier id = rawPar.pointerto;
boolean errorFound = false;
int pointed = 0;
if (!hasComponentWithName(id.getName())) {
id.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter POINTERTO for field {0}: {1}", fieldId.getDisplayName(), id.getDisplayName()));
errorFound = true;
}
if (!errorFound) {
pointed = getComponentIndexByName(id);
if (pointed <= i) {
id.getLocation().reportSemanticError(MessageFormat.format("Pointer must precede the pointed field. Incorrect field name `{0}'' in RAW parameter POINTERTO for field `{1}''", id.getDisplayName(), fieldId.getDisplayName()));
errorFound = true;
}
}
if (!errorFound && rawPar.ptrbase != null) {
final Identifier idf2 = rawPar.ptrbase;
if (!hasComponentWithName(idf2.getName())) {
idf2.getLocation().reportSemanticError(MessageFormat.format("Invalid field name `{0}'' in RAW parameter PTROFFSET for field `{1}''", idf2.getDisplayName(), fieldId.getDisplayName()));
errorFound = true;
}
if (!errorFound && getComponentIndexByName(idf2) > pointed) {
idf2.getLocation().reportSemanticError(MessageFormat.format("Pointer base must precede the pointed field. Incorrect field name `{0}'' in RAW parameter PTROFFSET for field `{1}''", idf2.getDisplayName(), fieldId.getDisplayName()));
}
}
}
if (rawPar.presence != null && rawPar.presence.keyList != null) {
for (int a = 0; a < rawPar.presence.keyList.size(); a++) {
final rawAST_tag_field_value tempTagFieldValue = rawPar.presence.keyList.get(a);
final Reference reference = new Reference(null);
reference.addSubReference(new FieldSubReference(tempTagFieldValue.keyField.names.get(0)));
for (int b = 1; b < tempTagFieldValue.keyField.names.size(); b++) {
reference.addSubReference(new FieldSubReference(tempTagFieldValue.keyField.names.get(b)));
}
final IType t = getFieldType(timestamp, reference, 0, Expected_Value_type.EXPECTED_DYNAMIC_VALUE, false);
if (t != null) {
final Value v = tempTagFieldValue.v_value;
if (v != null) {
v.setMyScope(getMyScope());
v.setMyGovernor(t);
final IValue tempValue = t.checkThisValueRef(timestamp, v);
t.checkThisValue(timestamp, tempValue, null, new ValueCheckingOptions(Expected_Value_type.EXPECTED_CONSTANT, false, false, false, false, false));
}
}
}
}
if (rawPar.crosstaglist != null) {
for (int c = 0; c < rawPar.crosstaglist.size(); c++) {
final rawAST_single_tag singleTag = rawPar.crosstaglist.get(c);
final Identifier idf = singleTag.fieldName;
switch(fieldTypeLast.getTypetype()) {
case TYPE_TTCN3_CHOICE:
case TYPE_TTCN3_SEQUENCE:
case TYPE_TTCN3_SET:
if (!((TTCN3_Set_Seq_Choice_BaseType) fieldTypeLast).hasComponentWithName(idf.getName())) {
idf.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter CROSSTAG for field {0}: {1}", fieldId.getDisplayName(), idf.getDisplayName()));
}
break;
case TYPE_ASN1_CHOICE:
case TYPE_ASN1_SEQUENCE:
case TYPE_ASN1_SET:
if (!((ASN1_Set_Seq_Choice_BaseType) fieldTypeLast).hasComponentWithName(idf)) {
idf.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter CROSSTAG for field {0}: {1}", fieldId.getDisplayName(), idf.getDisplayName()));
}
break;
default:
fieldId.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldmember type in RAW parameter CROSSTAG for field {0}.", fieldId.getDisplayName()));
break;
}
if (singleTag.keyList != null) {
for (int a = 0; a < singleTag.keyList.size(); a++) {
IType t2 = this;
boolean errorFound = false;
boolean allow_omit = false;
final rawAST_tag_field_value tagField = singleTag.keyList.get(a);
for (int b = 0; b < tagField.keyField.names.size() && !errorFound; b++) {
final Identifier idf2 = tagField.keyField.names.get(b);
CompField cf2 = null;
switch(t2.getTypetype()) {
case TYPE_TTCN3_CHOICE:
case TYPE_TTCN3_SEQUENCE:
case TYPE_TTCN3_SET:
if (!((TTCN3_Set_Seq_Choice_BaseType) t2).hasComponentWithName(idf2.getName())) {
idf2.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter CROSSTAG for field {0}: {1}", fieldId.getDisplayName(), idf2.getDisplayName()));
errorFound = true;
} else {
cf2 = ((TTCN3_Set_Seq_Choice_BaseType) t2).getComponentByName(idf2.getName());
}
break;
case TYPE_ASN1_CHOICE:
case TYPE_ASN1_SEQUENCE:
case TYPE_ASN1_SET:
if (!((ASN1_Set_Seq_Choice_BaseType) t2).hasComponentWithName(idf2)) {
idf2.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldname in RAW parameter CROSSTAG for field {0}: {1}", fieldId.getDisplayName(), idf2.getDisplayName()));
errorFound = true;
} else {
cf2 = ((ASN1_Set_Seq_Choice_BaseType) t2).getComponentByName(idf2);
}
break;
default:
fieldId.getLocation().reportSemanticError(MessageFormat.format("Invalid fieldmember type in RAW parameter CROSSTAG for field {0}.", fieldId.getDisplayName()));
errorFound = true;
break;
}
if (b == 0) {
final int fieldIndex = getComponentIndexByName(idf2);
if (fieldIndex == i) {
idf2.getLocation().reportSemanticError(MessageFormat.format("RAW parameter CROSSTAG for field `{0}'' cannot refer to the field itself", idf2.getDisplayName()));
errorFound = true;
} else if (fieldIndex > i) {
if (cField.isOptional()) {
// TODO || fieldType.getRawLength() < 0
idf2.getLocation().reportSemanticError(MessageFormat.format("Field `{0}'' that CROSSTAG refers to must precede field `{1}'' or field `{1}'' must be mandatory with fixed length", idf2.getDisplayName(), fieldId.getDisplayName()));
errorFound = true;
}
}
}
if (!errorFound) {
t2 = cf2.getType().getTypeRefdLast(timestamp);
if (b == tagField.keyField.names.size() - 1 && cf2.isOptional()) {
allow_omit = true;
}
}
}
if (!errorFound) {
final Value v = singleTag.keyList.get(a).v_value;
if (v != null) {
v.setMyScope(getMyScope());
v.setMyGovernor(t2);
final IValue tempValue = t2.checkThisValueRef(timestamp, v);
t2.checkThisValue(timestamp, tempValue, null, new ValueCheckingOptions(Expected_Value_type.EXPECTED_CONSTANT, false, allow_omit, false, false, false));
}
}
}
}
}
}
}
}
}
use of org.eclipse.titan.designer.AST.ASN1.types.ASN1_Choice_Type in project titan.EclipsePlug-ins by eclipse.
the class Named_Template_List method generateCodeInit.
@Override
public /**
* {@inheritDoc}
*/
void generateCodeInit(final JavaGenData aData, final StringBuilder source, final String name) {
if (lastTimeBuilt != null && !lastTimeBuilt.isLess(aData.getBuildTimstamp())) {
return;
}
lastTimeBuilt = aData.getBuildTimstamp();
if (asValue != null) {
asValue.generateCodeInit(aData, source, name);
return;
}
if (myGovernor == null) {
return;
}
// FIXME actually a bit more complex
final IType type = myGovernor.getTypeRefdLast(CompilationTimeStamp.getBaseTimestamp());
if (type == null) {
return;
}
if (namedTemplates.getNofTemplates() == 0) {
aData.addBuiltinTypeImport("TitanNull_Type");
source.append(MessageFormat.format("{0}.assign(TitanNull_Type.NULL_VALUE);\n", name));
}
// else is not needed as the loop will not run
for (int i = 0; i < namedTemplates.getNofTemplates(); i++) {
final NamedTemplate namedTemplate = namedTemplates.getTemplateByIndex(i);
final String fieldName = namedTemplate.getName().getName();
// FIXME handle needs_temp_ref case
final String generatedFieldName = FieldSubReference.getJavaGetterName(fieldName);
final TTCN3Template template = namedTemplate.getTemplate();
if (template.needsTemporaryReference()) {
Type fieldType;
switch(type.getTypetype()) {
case TYPE_SIGNATURE:
fieldType = ((Signature_Type) type).getParameterByName(fieldName).getType();
break;
case TYPE_TTCN3_SEQUENCE:
fieldType = ((TTCN3_Sequence_Type) type).getComponentByName(fieldName).getType();
break;
case TYPE_TTCN3_SET:
fieldType = ((TTCN3_Set_Type) type).getComponentByName(fieldName).getType();
break;
case TYPE_ASN1_SEQUENCE:
fieldType = ((ASN1_Sequence_Type) type).getComponentByName(new Identifier(Identifier_type.ID_NAME, fieldName)).getType();
break;
case TYPE_ASN1_SET:
fieldType = ((ASN1_Set_Type) type).getComponentByName(new Identifier(Identifier_type.ID_NAME, fieldName)).getType();
break;
case TYPE_ASN1_CHOICE:
fieldType = ((ASN1_Choice_Type) type).getComponentByName(new Identifier(Identifier_type.ID_NAME, fieldName)).getType();
break;
case TYPE_TTCN3_CHOICE:
fieldType = ((TTCN3_Choice_Type) type).getComponentByName(fieldName).getType();
break;
case TYPE_OPENTYPE:
fieldType = ((Open_Type) type).getComponentByName(new Identifier(Identifier_type.ID_NAME, fieldName)).getType();
break;
case TYPE_ANYTYPE:
fieldType = ((Anytype_Type) type).getComponentByName(fieldName).getType();
break;
default:
ErrorReporter.INTERNAL_ERROR("FATAL ERROR while processing named template list `" + getFullName() + "''");
return;
}
final String tempId = aData.getTemporaryVariableName();
source.append("{\n");
source.append(MessageFormat.format("{0} {1} = {2}.get{3}();\n", fieldType.getGenNameTemplate(aData, source, myScope), tempId, name, generatedFieldName));
template.generateCodeInit(aData, source, tempId);
source.append("}\n");
} else {
final String embeddedName = MessageFormat.format("{0}.get{1}()", name, generatedFieldName);
template.generateCodeInit(aData, source, embeddedName);
}
}
if (lengthRestriction != null) {
if (getCodeSection() == CodeSectionType.CS_POST_INIT) {
lengthRestriction.reArrangeInitCode(aData, source, myScope.getModuleScope());
}
lengthRestriction.generateCodeInit(aData, source, name);
}
if (isIfpresent) {
source.append(name);
source.append(".set_ifPresent();\n");
}
}
Aggregations