public BamlDocument Analyze(ModuleDefMD module, string bamlName, byte[] data)
{
Module = module;
CurrentBAMLName = bamlName;
if (module.IsClr40)
{
things = thingsv4 ?? (thingsv4 = new KnownThingsv4(context, module));
}
else
{
things = thingsv3 ?? (thingsv3 = new KnownThingsv3(context, module));
}
Debug.Assert(BitConverter.ToInt32(data, 0) == data.Length - 4);
BamlDocument document = BamlReader.ReadDocument(new MemoryStream(data, 4, data.Length - 4));
// Remove debug infos
document.RemoveWhere(rec => rec is LineNumberAndPositionRecord || rec is LinePositionRecord);
// Populate references
PopulateReferences(document);
// Process elements
BamlElement rootElem = BamlElement.Read(document);
BamlElement trueRoot = rootElem.Children.Single();
var stack = new Stack <BamlElement>();
stack.Push(rootElem);
while (stack.Count > 0)
{
BamlElement elem = stack.Pop();
ProcessBAMLElement(trueRoot, elem);
foreach (BamlElement child in elem.Children)
{
stack.Push(child);
}
}
return(document);
}
void ProcessElementBody(BamlElement root, BamlElement elem)
{
foreach (BamlRecord rec in elem.Body)
{
// Resolve the type & property for simple property record too.
TypeDef type = null;
IDnlibDef attr = null;
if (rec is PropertyRecord)
{
var propRec = (PropertyRecord)rec;
var attrInfo = ResolveAttribute(propRec.AttributeId);
type = attrInfo.Item3;
attr = attrInfo.Item1;
if (attr != null)
{
type = GetAttributeType(attr);
}
if (attrInfo.Item1 is EventDef)
{
MethodDef method = root.Type.FindMethod(propRec.Value);
if (method == null)
{
context.Logger.WarnFormat("Cannot resolve method '{0}' in '{1}'.", root.Type.FullName, propRec.Value);
}
else
{
var reference = new BAMLAttributeReference(method, propRec);
service.AddReference(method, reference);
}
}
if (rec is PropertyWithConverterRecord)
{
ProcessConverter((PropertyWithConverterRecord)rec, type);
}
}
else if (rec is PropertyComplexStartRecord)
{
var attrInfo = ResolveAttribute(((PropertyComplexStartRecord)rec).AttributeId);
type = attrInfo.Item3;
attr = attrInfo.Item1;
if (attr != null)
{
type = GetAttributeType(attr);
}
}
else if (rec is ContentPropertyRecord)
{
var attrInfo = ResolveAttribute(((ContentPropertyRecord)rec).AttributeId);
type = attrInfo.Item3;
attr = attrInfo.Item1;
if (elem.Attribute != null && attr != null)
{
type = GetAttributeType(attr);
}
foreach (BamlElement child in elem.Children)
{
child.Type = type;
child.Attribute = attr;
}
}
else if (rec is PropertyCustomRecord)
{
var customRec = (PropertyCustomRecord)rec;
var attrInfo = ResolveAttribute(customRec.AttributeId);
type = attrInfo.Item3;
attr = attrInfo.Item1;
if (elem.Attribute != null && attr != null)
{
type = GetAttributeType(attr);
}
if ((customRec.SerializerTypeId & ~0x4000) != 0 && (customRec.SerializerTypeId & ~0x4000) == 0x89)
{
// See BamlRecordReader.GetCustomDependencyPropertyValue.
// Umm... Well, actually nothing to do, since this record only describe DP, which already won't be renamed.
}
}
else if (rec is PropertyWithExtensionRecord)
{
var extRec = (PropertyWithExtensionRecord)rec;
var attrInfo = ResolveAttribute(extRec.AttributeId);
type = attrInfo.Item3;
attr = attrInfo.Item1;
if (elem.Attribute != null && attr != null)
{
type = GetAttributeType(attr);
}
if (extRec.Flags == 602)
{
// Static Extension
// We only care about the references in user-defined assemblies, so skip built-in attributes
// Also, ValueId is a resource ID, which is not implemented, so just skip it.
if ((short)extRec.ValueId >= 0)
{
attrInfo = ResolveAttribute(extRec.ValueId);
var attrTarget = attrInfo.Item1;
if (attrTarget == null)
{
TypeSig declType;
TypeDef declTypeDef;
if (typeRefs.TryGetValue(attrInfo.Item2.OwnerTypeId, out declType))
{
declTypeDef = declType.ToBasicTypeDefOrRef().ResolveTypeDefThrow();
}
else
{
Debug.Assert((short)attrInfo.Item2.OwnerTypeId < 0);
declTypeDef = things.Types((KnownTypes)(-(short)attrInfo.Item2.OwnerTypeId));
}
attrTarget = declTypeDef.FindField(attrInfo.Item2.Name);
}
if (attrTarget != null)
{
service.AddReference(attrTarget, new BAMLAttributeReference(attrTarget, attrInfo.Item2));
}
}
}
}
else if (rec is TextRecord)
{
var txt = (TextRecord)rec;
string value = txt.Value;
if (txt is TextWithIdRecord)
{
value = strings[((TextWithIdRecord)txt).ValueId].Value;
}
string prefix;
TypeSig sig = ResolveType(value.Trim(), out prefix);
if (sig != null && context.Modules.Contains((ModuleDefMD)sig.ToBasicTypeDefOrRef().ResolveTypeDefThrow().Module))
{
var reference = new BAMLConverterTypeReference(xmlnsCtx, sig, txt);
AddTypeSigReference(sig, reference);
}
else
{
AnalyzePropertyPath(value);
}
}
}
}