private void RecurseOnSme(
AdminShell.SubmodelElementWrapperCollection smwc,
CstIdObjectBase presetId,
string presetClassType,
CstPropertyRecord.ListOfProperty propRecs)
{
// access
if (smwc == null)
{
return;
}
// create a class def
CstClassDef.ClassDefinition clsdef;
if (presetId != null)
{
clsdef = new CstClassDef.ClassDefinition(presetId);
}
else
{
clsdef = new CstClassDef.ClassDefinition(GenerateCustomId("CLS"));
}
clsdef.ClassType = presetClassType;
// add the class def (to have the following classes below)
ClassDefs.AddIfUnique(clsdef);
// values
for (int smcMode = 0; smcMode < 2; smcMode++)
{
foreach (var smw in smwc)
{
// trivial
var sme = smw?.submodelElement;
if (sme == null)
{
continue;
}
// is SMC? .. ugly contraption to have first all Properties, then all SMCs
var smc = sme as AdminShell.SubmodelElementCollection;
if ((smcMode == 0 && smc != null) ||
(smcMode == 1 && smc == null))
{
continue;
}
// check, if ConceptDescription exists ..
var cd = _env?.AasEnv.FindConceptDescription(sme.semanticId);
// try to take over as much information from the pure SME as possible
var semid = sme.semanticId.GetAsExactlyOneKey()?.value;
string refStr = null;
string refName = null;
if (semid != null)
{
// standardized ID?
if (semid.StartsWith("0173") || semid.StartsWith("0112"))
{
refStr = semid;
}
// already known, fixed id?
var it = _knownIdStore?.FindStringSemId(semid);
if (it != null)
{
if (it.cstRef != null)
{
refStr = it.cstRef;
}
if (it.cstId != null)
{
refStr = it.cstId.ToRef();
}
if (it.preferredName != null)
{
refName = it.preferredName;
}
}
}
// prepare a prop def & data type
CstPropertyDef.PropertyDefinition tmpPd = null;
string tmpDt = null;
if (refStr != null)
{
// make it
var bo = CstIdObjectBase.Parse(refStr);
tmpPd = new CstPropertyDef.PropertyDefinition(bo);
// more info
tmpPd.Name = "" + sme.idShort;
if (sme.description != null)
{
tmpPd.Remark = sme.description.GetDefaultStr("en");
}
if (sme is AdminShell.Property prop)
{
tmpDt = prop.valueType;
}
// more info
if (cd != null)
{
var ds61360 = cd.IEC61360Content;
if (ds61360 != null)
{
if (ds61360.definition != null)
{
tmpPd.Definition = ds61360.definition.GetDefaultStr("en");
}
var dst = ds61360.dataType?.Trim().ToUpper();
if (ds61360 == null && dst != null)
{
tmpDt = dst;
}
}
}
// default
if (!tmpDt.HasContent())
{
tmpDt = "STRING";
}
}
if (smc != null)
{
// SMC
// make a reference property def
// the property itself needs to have an ALTERED ID, to be not ídentical with
if (tmpPd != null)
{
// class id
tmpPd.ID = "BLPRP_" + tmpPd.ID;
// will be a reference to the intended class
tmpPd.DataType = new CstPropertyDef.DataType()
{
Type = "Reference",
BlockReference = "" + refStr
};
// rest of attributes
tmpPd.ObjectType = "02";
tmpPd.Status = "Released";
// add
PropertyDefs.AddIfUnique(tmpPd);
}
// create a new class attribute (with reference to ALTERED ID!)
var attr = new CstClassDef.ClassAttribute()
{
Type = "Property",
Reference = tmpPd?.ToRef() ?? "NULL"
};
clsdef.ClassAttributes.AddIfUnique(attr);
// start new list of property values, embedded in a PropertyRecord
var rec = new CstPropertyRecord.PropertyRecord();
var lop = new CstPropertyRecord.ListOfProperty();
rec.ClassDefinition = refStr;
rec.Properties = lop;
var pr = new CstPropertyRecord.Property()
{
ID = tmpPd.ToRef(),
Name = "" + smc.idShort,
ValueProps = rec
};
// execute the following, only if twice the same ID in proprety records
// (for blocks are allowed)
var addBlockRec = true;
if (DoNotAddMultipleBlockRecordsWithSameIds &&
propRecs.FindExisting(pr) != null)
{
addBlockRec = false;
}
// ok?
if (addBlockRec)
{
if (propRecs != null)
{
propRecs.Add(pr);
}
// recursion, but as Block
// TODO (MIHO, 2021-05-28): extend Parse() to parse also ECLASS, IEC CDD
var blockId = CstIdObjectBase.Parse(refStr);
blockId.Name = refName;
RecurseOnSme(smc.value, blockId, "Block", lop);
}
}
else
{
// normal case .. Property or so
// create a new class attribute
var attr = new CstClassDef.ClassAttribute()
{
Type = "Property",
Reference = refStr
};
clsdef.ClassAttributes.AddIfUnique(attr);
// make a "normal" property definition
if (tmpPd != null)
{
// use data type?
if (tmpDt != null)
{
tmpPd.DataType = new CstPropertyDef.DataType()
{
Type = AasxCstUtils.ToPascalCase(tmpDt)
}
}
;
tmpPd.ObjectType = "02";
tmpPd.Status = "Released";
PropertyDefs.AddIfUnique(tmpPd);
}
// make a prop rec
var pr = new CstPropertyRecord.Property()
{
ValueStr = sme.ValueAsText(),
ID = refStr,
Name = "" + sme.idShort
};
if (propRecs != null)
{
propRecs.Add(pr);
}
}
}
}
}
public void ExportSingleSubmodel(
AdminShellPackageEnv env, string path,
AdminShell.Key smId,
IEnumerable <AdminShell.Referable> cdReferables,
CstIdObjectBase firstNodeId,
CstIdObjectBase secondNodeId,
CstIdObjectBase appClassId)
{
// access
if (env?.AasEnv == null || path == null)
{
return;
}
_env = env;
var sm = _env?.AasEnv.FindFirstSubmodelBySemanticId(smId);
if (sm == null)
{
return;
}
// Step 1: copy all relevant CDs into the AAS
if (cdReferables != null)
{
foreach (var rf in cdReferables)
{
if (rf is AdminShell.ConceptDescription cd)
{
env?.AasEnv.ConceptDescriptions.AddIfNew(cd);
}
}
}
// Step 2: make up a list of used semantic references and write to default file
var tmpIdStore = new CstIdStore();
tmpIdStore.CreateEmptyItemsFromSMEs(sm.submodelElements, omitIecEclass: true);
tmpIdStore.WriteToFile(path + "_default_prop_refs.json");
// Step 3: initialize node defs
var nd1 = new CstNodeDef.NodeDefinition(firstNodeId);
NodeDefRoot.Add(nd1);
var nd2 = new CstNodeDef.NodeDefinition(secondNodeId);
nd2.Parent = nd1;
nd2.ApplicationClass = new CstNodeDef.NodeDefinition(appClassId);
NodeDefRoot.Add(nd2);
// Step 4: start list of (later) lson entities
// Note: already done by class init
var lop = new CstPropertyRecord.ListOfProperty();
PropertyRecs.Add(new CstPropertyRecord.PropertyRecord()
{
ID = "0815",
ClassDefinition = appClassId.ToRef(),
ObjectType = "PR",
UnitSystem = 1,
Properties = lop,
ClassifiedObject = new CstPropertyRecord.ClassifiedObject()
{
ObjectType = "Item",
ClassifyRevision = true,
ID = new List <CstPropertyRecord.ID>(new[] { new CstPropertyRecord.ID()
{
PropertyName = "item_id",
PropertyValue = "000337"
} }),
Properties = new CstPropertyRecord.ListOfProperty(new[] { new CstPropertyRecord.Property()
{
PropertyName = "object_name",
PropertyValue = "" + appClassId.Name
} })
}
});
// Step 4: recursively look at SME
RecurseOnSme(sm.submodelElements, appClassId, "Application Class", lop);
// Step 90: write class definitions
var clsRoot = new CstClassDef.Root()
{
ClassDefinitions = ClassDefs
};
clsRoot.WriteToFile(path + "_classdefs.json");
// Step 91: write node definitions
NodeDefRoot.WriteToFile(path + "_nodedefs.json");
// Step 92: write property definitions
var prpRoot = new CstPropertyDef.Root()
{
PropertyDefinitions = PropertyDefs
};
prpRoot.WriteToFile(path + "_propdefs.json");
// Step 93: write property definitions
var recRoot = new CstPropertyRecord.Root()
{
PropertyRecords = PropertyRecs
};
recRoot.WriteToFile(path + "_proprecs.json");
}
