IEnumerable <XamlNodeInfo> GetKeyNodes(object ikey, XamlType keyType, XamlNodeMember xknm)
{
foreach (var xn in GetMemberNodes(xknm, GetNodes(XamlLanguage.Key, new XamlObject(GetType(ikey), ikey), keyType, false)))
{
yield return(xn);
}
}
IEnumerable <XamlNodeInfo> GetItemsNodes(XamlMember xm, XamlObject xobj)
{
var obj = xobj.GetRawValue();
if (obj == null)
{
yield break;
}
var ie = xobj.Type.Invoker.GetItems(obj);
while (ie.MoveNext())
{
var iobj = ie.Current;
// If it is dictionary, then retrieve the key, and rewrite the item as the Value part.
object ikey = null;
if (xobj.Type.IsDictionary)
{
Type kvpType = iobj.GetType();
bool isNonGeneric = kvpType == typeof(DictionaryEntry);
var kp = isNonGeneric ? null : kvpType.GetRuntimeProperty("Key");
var vp = isNonGeneric ? null : kvpType.GetRuntimeProperty("Value");
ikey = isNonGeneric ? ((DictionaryEntry)iobj).Key : kp.GetValue(iobj, null);
iobj = isNonGeneric ? ((DictionaryEntry)iobj).Value : vp.GetValue(iobj, null);
}
var wobj = TypeExtensionMethods.GetExtensionWrapped(iobj);
var xiobj = new XamlObject(GetType(wobj), wobj);
if (ikey != null)
{
var en = GetNodes(null, xiobj).ToList();
yield return(en [0]); // StartObject
var xknm = new XamlNodeMember(xobj, XamlLanguage.Key);
var nodes1 = en.Skip(1).Take(en.Count - 2);
var nodes2 = GetKeyNodes(ikey, xobj.Type.KeyType, xknm);
// group the members then sort to put the key nodes in the correct order
var grouped = GroupMemberNodes(nodes1.Concat(nodes2))
.OrderBy(r => r.Item1, TypeExtensionMethods.MemberComparer);
foreach (var item in grouped)
{
foreach (var node in item.Item2)
{
yield return(node);
}
}
yield return(en [en.Count - 1]); // EndObject
}
else
{
foreach (var xn in GetNodes(null, xiobj))
{
yield return(xn);
}
}
}
}
IEnumerable <XamlNodeInfo> GetMemberNodes(XamlNodeMember member, IEnumerable <XamlNodeInfo> contents)
{
yield return(new XamlNodeInfo(XamlNodeType.StartMember, member));
foreach (var cn in contents)
{
yield return(cn);
}
yield return(new XamlNodeInfo(XamlNodeType.EndMember, member));
}
IEnumerable <XamlNodeInfo> GetItemsNodes(XamlMember xm, XamlObject xobj)
{
var obj = xobj.GetRawValue();
if (obj == null)
{
yield break;
}
var ie = xobj.Type.Invoker.GetItems(obj);
while (ie.MoveNext())
{
var iobj = ie.Current;
// If it is dictionary, then retrieve the key, and rewrite the item as the Value part.
object ikey = null;
if (xobj.Type.IsDictionary)
{
Type kvpType = iobj.GetType();
bool isNonGeneric = kvpType == typeof(DictionaryEntry);
var kp = isNonGeneric ? null : kvpType.GetRuntimeProperty("Key");
var vp = isNonGeneric ? null : kvpType.GetRuntimeProperty("Value");
ikey = isNonGeneric ? ((DictionaryEntry)iobj).Key : kp.GetValue(iobj, null);
iobj = isNonGeneric ? ((DictionaryEntry)iobj).Value : vp.GetValue(iobj, null);
}
var wobj = TypeExtensionMethods.GetExtensionWrapped(iobj);
var xiobj = new XamlObject(GetType(wobj), wobj);
if (ikey != null)
{
// Key member is written *inside* the item object.
//
// It is messy, but Key and Value are *sorted*. In most cases Key goes first, but for example PositionalParameters comes first.
// To achieve this behavior, we compare XamlLanguage.Key and value's Member and returns in order. It's all nasty hack, but at least it could be achieved like this!
var en = GetNodes(null, xiobj).ToArray();
yield return(en [0]); // StartObject
var xknm = new XamlNodeMember(xobj, XamlLanguage.Key);
var nodes1 = en.Skip(1).Take(en.Length - 2);
var nodes2 = GetKeyNodes(ikey, xobj.Type.KeyType, xknm);
foreach (var xn in EnumerateMixingMember(nodes1, XamlLanguage.Key, nodes2))
{
yield return(xn);
}
yield return(en [en.Length - 1]);
}
else
{
foreach (var xn in GetNodes(null, xiobj))
{
yield return(xn);
}
}
}
}
IEnumerable <XamlNodeInfo> GetMemberNodes(XamlNodeMember member, IEnumerable <XamlNodeInfo> contents)
{
bool hasData = false;
foreach (var cn in contents)
{
if (!hasData)
{
hasData = true;
yield return(new XamlNodeInfo(XamlNodeType.StartMember, member));
}
yield return(cn);
}
if (hasData)
{
yield return(new XamlNodeInfo(XamlNodeType.EndMember, member));
}
}
IEnumerable <XamlNodeInfo> GetNodes(XamlMember xm, XamlObject xobj, XamlType overrideMemberType, bool partOfPositionalParameters)
{
// collection items: each item is exposed as a standalone object that has StartObject, EndObject and contents.
if (xm == XamlLanguage.Items)
{
foreach (var xn in GetItemsNodes(xm, xobj))
{
yield return(xn);
}
yield break;
}
// Arguments: each argument is written as a standalone object
if (xm == XamlLanguage.Arguments)
{
foreach (var argm in xobj.Type.GetSortedConstructorArguments())
{
var argv = argm.Invoker.GetValue(xobj.GetRawValue());
var xarg = new XamlObject(argm.Type, argv);
foreach (var cn in GetNodes(null, xarg))
{
yield return(cn);
}
}
yield break;
}
// PositionalParameters: items are from constructor arguments, written as Value node sequentially. Note that not all of them are in simple string value. Also, null values are not written as NullExtension
if (xm == XamlLanguage.PositionalParameters)
{
foreach (var argm in xobj.Type.GetSortedConstructorArguments())
{
foreach (var cn in GetNodes(argm, new XamlObject(argm.Type, xobj.GetMemberValue(argm)), null, true))
{
yield return(cn);
}
}
yield break;
}
if (xm == XamlLanguage.Initialization)
{
yield return(new XamlNodeInfo(TypeExtensionMethods.GetStringValue(xobj.Type, xm, xobj.GetRawValue(), value_serializer_ctx)));
yield break;
}
// Value - only for non-top-level node (thus xm != null)
if (xm != null)
{
// overrideMemberType is (so far) used for XamlLanguage.Key.
var xtt = overrideMemberType ?? xm.Type;
if (!xtt.IsMarkupExtension && // this condition is to not serialize MarkupExtension whose type has TypeConverterAttribute (e.g. StaticExtension) as a string.
(xtt.IsContentValue(value_serializer_ctx) || xm.IsContentValue(value_serializer_ctx)))
{
// though null value is special: it is written as a standalone object.
var val = xobj.GetRawValue();
if (val == null)
{
if (!partOfPositionalParameters)
{
foreach (var xn in GetNodes(null, null_object))
{
yield return(xn);
}
}
else
{
yield return(new XamlNodeInfo(String.Empty));
}
}
else
{
yield return(new XamlNodeInfo(TypeExtensionMethods.GetStringValue(xtt, xm, val, value_serializer_ctx)));
}
yield break;
}
}
// collection items: return GetObject and Items.
if (xm != null && xm.Type.IsCollection && !xm.IsWritePublic)
{
yield return(new XamlNodeInfo(XamlNodeType.GetObject, xobj));
// Write Items member only when there are items (i.e. do not write it if it is empty).
var xnm = new XamlNodeMember(xobj, XamlLanguage.Items);
var en = GetNodes(XamlLanguage.Items, xnm.Value).GetEnumerator();
if (en.MoveNext())
{
yield return(new XamlNodeInfo(XamlNodeType.StartMember, xnm));
do
{
yield return(en.Current);
} while (en.MoveNext());
yield return(new XamlNodeInfo(XamlNodeType.EndMember, xnm));
}
yield return(new XamlNodeInfo(XamlNodeType.EndObject, xobj));
}
else if (xm != null && xm.Type.IsXData)
{
var sw = new StringWriter();
var xw = XmlWriter.Create(sw, new XmlWriterSettings()
{
OmitXmlDeclaration = true, ConformanceLevel = ConformanceLevel.Auto
});
var val = xobj.GetRawValue() as IXmlSerializable;
if (val == null)
{
yield break; // do not output anything
}
val.WriteXml(xw);
xw.Dispose();
var obj = new XData()
{
Text = sw.ToString()
};
foreach (var xn in GetNodes(null, new XamlObject(XamlLanguage.XData, obj)))
{
yield return(xn);
}
}
else
{
// Object - could become Reference
var val = xobj.GetRawValue();
if (!xobj.Type.IsContentValue(value_serializer_ctx) && val != null)
{
string refName = NameResolver.GetName(val);
if (refName != null)
{
// The target object is already retrieved, so we don't return the same object again.
NameResolver.SaveAsReferenced(val); // Record it as named object.
// Then return Reference object instead.
foreach (var xn in GetNodes(null, new XamlObject(XamlLanguage.Reference, new Reference(refName))))
{
yield return(xn);
}
yield break;
}
else
{
// The object appeared in the xaml tree for the first time. So we store the reference with a unique name so that it could be referenced later.
refName = GetReferenceName(xobj);
if (NameResolver.IsCollectingReferences && NameResolver.Contains(refName))
{
throw new InvalidOperationException(String.Format("There is already an object of type {0} named as '{1}'. Object names must be unique.", val.GetType(), refName));
}
NameResolver.SetNamedObject(refName, val, true); // probably fullyInitialized is always true here.
}
}
yield return(new XamlNodeInfo(XamlNodeType.StartObject, xobj));
// If this object is referenced and there is no [RuntimeNameProperty] member, then return Name property in addition.
if (val != null && xobj.Type.GetAliasedProperty(XamlLanguage.Name) == null)
{
string name = NameResolver.GetReferencedName(val);
if (name != null)
{
var sobj = new XamlObject(XamlLanguage.String, name);
foreach (var cn in GetMemberNodes(new XamlNodeMember(sobj, XamlLanguage.Name), new XamlNodeInfo [] { new XamlNodeInfo(name) }))
{
yield return(cn);
}
}
}
foreach (var xn in GetObjectMemberNodes(xobj))
{
yield return(xn);
}
yield return(new XamlNodeInfo(XamlNodeType.EndObject, xobj));
}
}
public XamlNodeInfo(XamlNodeType nodeType, XamlNodeMember member)
{
node_type = nodeType;
this.value = default(XamlObject);
this.member = member;
}
IEnumerable <XamlNodeMember> GetNodeMembers(XamlObject xobj, IValueSerializerContext vsctx)
{
var member = new XamlNodeMember();
// XData.XmlReader is not returned.
if (ReferenceEquals(xobj.Type, XamlLanguage.XData))
{
yield return(member.Set(xobj, XamlLanguage.XData.GetMember("Text")));
yield break;
}
// FIXME: find out why root Reference has PositionalParameters.
if (xobj.Value != root && ReferenceEquals(xobj.Type, XamlLanguage.Reference))
{
yield return(member.Set(xobj, XamlLanguage.PositionalParameters));
}
else
{
var inst = xobj.Value;
var atts = new KeyValuePair <AttachableMemberIdentifier, object> [AttachablePropertyServices.GetAttachedPropertyCount(inst)];
AttachablePropertyServices.CopyPropertiesTo(inst, atts, 0);
XamlObject cobj = null;
foreach (var p in atts)
{
var axt = ctx.GetXamlType(p.Key.DeclaringType);
if (cobj == null)
{
cobj = new XamlObject();
}
yield return(member.Set(cobj.Set(axt, p.Value), axt.GetAttachableMember(p.Key.MemberName)));
}
var type = xobj.Type;
if (type.HasPositionalParameters(vsctx))
{
yield return(member.Set(xobj, XamlLanguage.PositionalParameters));
yield break;
}
// Note that if the XamlType has the default constructor, we don't need "Arguments".
IEnumerable <XamlMember> args = type.ConstructionRequiresArguments ? type.GetSortedConstructorArguments() : null;
if (args != null && args.Any())
{
yield return(member.Set(xobj, XamlLanguage.Arguments));
}
if (type.IsContentValue(vsctx))
{
yield return(member.Set(xobj, XamlLanguage.Initialization));
yield break;
}
if (type.IsDictionary)
{
yield return(member.Set(xobj, XamlLanguage.Items));
yield break;
}
var members = type.GetAllMembersAsList();
for (int i = 0; i < members.Count; i++)
{
var m = members[i];
// do not read constructor arguments twice (they are written inside Arguments).
if (args != null && args.Contains(m))
{
continue;
}
// do not return non-public members (of non-collection/xdata). Not sure why .NET filters out them though.
if (!m.IsReadPublic ||
!m.ShouldSerialize(xobj.Value))
{
continue;
}
if (!m.IsWritePublic &&
!m.Type.IsXData &&
!m.Type.IsArray &&
!m.Type.IsCollection &&
!m.Type.IsDictionary)
{
continue;
}
yield return(member.Set(xobj, m));
}
if (type.IsCollection)
{
yield return(member.Set(xobj, XamlLanguage.Items));
}
}
}
IEnumerable<XamlNodeInfo> GetNodes (XamlMember xm, XamlObject xobj, XamlType overrideMemberType, bool partOfPositionalParameters)
{
object val;
// Value - only for non-top-level node (thus xm != null)
if (xm != null)
{
// collection items: each item is exposed as a standalone object that has StartObject, EndObject and contents.
if (xm == XamlLanguage.Items)
{
foreach (var xn in GetItemsNodes(xm, xobj))
yield return xn;
yield break;
}
// Arguments: each argument is written as a standalone object
if (xm == XamlLanguage.Arguments)
{
foreach (var argm in xobj.Type.GetSortedConstructorArguments())
{
var argv = argm.Invoker.GetValue(xobj.GetRawValue());
var xarg = new XamlObject(argm.Type, argv);
foreach (var cn in GetNodes(null, xarg))
yield return cn;
}
yield break;
}
// PositionalParameters: items are from constructor arguments, written as Value node sequentially. Note that not all of them are in simple string value. Also, null values are not written as NullExtension
if (xm == XamlLanguage.PositionalParameters)
{
foreach (var argm in xobj.Type.GetSortedConstructorArguments())
{
foreach (var cn in GetNodes(argm, new XamlObject(argm.Type, xobj.GetMemberValue(argm)), null, true))
yield return cn;
}
yield break;
}
if (xm == XamlLanguage.Initialization)
{
yield return new XamlNodeInfo(TypeExtensionMethods.GetStringValue(xobj.Type, xm, xobj.GetRawValue(), value_serializer_ctx));
yield break;
}
val = xobj.GetRawValue();
if (xm.DeferringLoader != null)
{
foreach (var xn in GetDeferredNodes(xm, val))
yield return xn;
yield break;
}
// don't serialize default values if one is explicitly specified using the DefaultValueAttribute
if (!partOfPositionalParameters && xm.DefaultValue != null && Equals(xm.DefaultValue.Value, val))
yield break;
// overrideMemberType is (so far) used for XamlLanguage.Key.
var xtt = overrideMemberType ?? xm.Type;
if (!xtt.IsMarkupExtension && // this condition is to not serialize MarkupExtension whose type has TypeConverterAttribute (e.g. StaticExtension) as a string.
(xtt.IsContentValue(value_serializer_ctx) || xm.IsContentValue(value_serializer_ctx))) {
// though null value is special: it is written as a standalone object.
if (val == null)
{
if (!partOfPositionalParameters)
foreach (var xn in GetNodes(null, null_object))
yield return xn;
else
yield return new XamlNodeInfo(String.Empty);
}
else
yield return new XamlNodeInfo(TypeExtensionMethods.GetStringValue(xtt, xm, val, value_serializer_ctx));
yield break;
}
// collection items: return GetObject and Items.
if (xm.Type.IsCollection && !xm.IsWritePublic)
{
yield return new XamlNodeInfo(XamlNodeType.GetObject, xobj);
// Write Items member only when there are items (i.e. do not write it if it is empty).
var xnm = new XamlNodeMember(xobj, XamlLanguage.Items);
var en = GetNodes(XamlLanguage.Items, xnm.Value).GetEnumerator();
if (en.MoveNext())
{
yield return new XamlNodeInfo(XamlNodeType.StartMember, xnm);
do
{
yield return en.Current;
} while (en.MoveNext());
yield return new XamlNodeInfo(XamlNodeType.EndMember, xnm);
}
yield return new XamlNodeInfo(XamlNodeType.EndObject, xobj);
yield break;
}
if (xm.Type.IsXData)
{
var sw = new StringWriter();
var xw = XmlWriter.Create(sw, new XmlWriterSettings() { OmitXmlDeclaration = true, ConformanceLevel = ConformanceLevel.Auto });
var val3 = val as IXmlSerializable;
if (val3 == null)
yield break; // do not output anything
val3.WriteXml(xw);
xw.Dispose();
var obj = new XData() { Text = sw.ToString() };
foreach (var xn in GetNodes(null, new XamlObject(XamlLanguage.XData, obj)))
yield return xn;
yield break;
}
}
else
val = xobj.GetRawValue();
// Object - could become Reference
if (val != null && xobj.Type != XamlLanguage.Reference) {
if (xm != null && !xm.IsReadOnly && !IsPublicOrVisible(val.GetType()))
throw new XamlObjectReaderException($"Cannot read from internal type {xobj.Type}");
if (!xobj.Type.IsContentValue (value_serializer_ctx)) {
string refName = NameResolver.GetReferenceName (xobj, val);
if (refName != null) {
// The target object is already retrieved, so we don't return the same object again.
NameResolver.SaveAsReferenced (val); // Record it as named object.
// Then return Reference object instead.
foreach (var xn in GetNodes (null, new XamlObject (XamlLanguage.Reference, new Reference (refName))))
yield return xn;
yield break;
} else {
// The object appeared in the xaml tree for the first time. So we store the reference with a unique name so that it could be referenced later.
NameResolver.SetNamedObject (val, true); // probably fullyInitialized is always true here.
}
}
yield return new XamlNodeInfo (XamlNodeType.StartObject, xobj);
// If this object is referenced and there is no [RuntimeNameProperty] member, then return Name property in addition.
if (!NameResolver.IsCollectingReferences && xobj.Type.GetAliasedProperty (XamlLanguage.Name) == null) {
string name = NameResolver.GetReferencedName (xobj, val);
if (name != null) {
var sobj = new XamlObject (XamlLanguage.String, name);
foreach (var cn in GetMemberNodes (new XamlNodeMember (sobj, XamlLanguage.Name), new [] { new XamlNodeInfo (name)}))
yield return cn;
}
}
}
else
yield return new XamlNodeInfo (XamlNodeType.StartObject, xobj);
foreach (var xn in GetObjectMemberNodes (xobj))
yield return xn;
yield return new XamlNodeInfo (XamlNodeType.EndObject, xobj);
}
public XamlNodeInfo (XamlNodeType nodeType, XamlNodeMember member)
{
node_type = nodeType;
this.value = default (XamlObject);
this.member = member;
}
IEnumerable<XamlNodeInfo> GetKeyNodes (object ikey, XamlType keyType, XamlNodeMember xknm)
{
foreach (var xn in GetMemberNodes (xknm, GetNodes (XamlLanguage.Key, new XamlObject (GetType (ikey), ikey), keyType, false)))
yield return xn;
}
IEnumerable<XamlNodeInfo> GetItemsNodes (XamlMember xm, XamlObject xobj)
{
var obj = xobj.GetRawValue ();
if (obj == null)
yield break;
var ie = xobj.Type.Invoker.GetItems (obj);
while (ie.MoveNext ()) {
var iobj = ie.Current;
// If it is dictionary, then retrieve the key, and rewrite the item as the Value part.
object ikey = null;
if (xobj.Type.IsDictionary) {
Type kvpType = iobj.GetType ();
bool isNonGeneric = kvpType == typeof (DictionaryEntry);
var kp = isNonGeneric ? null : kvpType.GetRuntimeProperty ("Key");
var vp = isNonGeneric ? null : kvpType.GetRuntimeProperty ("Value");
ikey = isNonGeneric ? ((DictionaryEntry) iobj).Key : kp.GetValue (iobj, null);
iobj = isNonGeneric ? ((DictionaryEntry) iobj).Value : vp.GetValue (iobj, null);
}
var wobj = TypeExtensionMethods.GetExtensionWrapped (iobj);
var xiobj = new XamlObject (GetType (wobj), wobj);
if (ikey != null) {
var en = GetNodes (null, xiobj).ToList ();
yield return en [0]; // StartObject
var xknm = new XamlNodeMember (xobj, XamlLanguage.Key);
var nodes1 = en.Skip (1).Take (en.Count - 2);
var nodes2 = GetKeyNodes (ikey, xobj.Type.KeyType, xknm);
// group the members then sort to put the key nodes in the correct order
var grouped = GroupMemberNodes (nodes1.Concat (nodes2))
.OrderBy (r => r.Item1, TypeExtensionMethods.MemberComparer);
foreach (var item in grouped) {
foreach (var node in item.Item2)
yield return node;
}
yield return en [en.Count - 1]; // EndObject
}
else
foreach (var xn in GetNodes (null, xiobj))
yield return xn;
}
}
IEnumerable<XamlNodeInfo> GetMemberNodes(XamlNodeMember member, IEnumerable<XamlNodeInfo> contents)
{
bool hasData = false;
foreach (var cn in contents)
{
if (!hasData)
{
hasData = true;
yield return new XamlNodeInfo(XamlNodeType.StartMember, member);
}
yield return cn;
}
if (hasData)
yield return new XamlNodeInfo(XamlNodeType.EndMember, member);
}
IEnumerable<XamlNodeInfo> GetItemsNodes (XamlMember xm, XamlObject xobj)
{
var obj = xobj.GetRawValue ();
if (obj == null)
yield break;
var ie = xobj.Type.Invoker.GetItems (obj);
while (ie.MoveNext ()) {
var iobj = ie.Current;
// If it is dictionary, then retrieve the key, and rewrite the item as the Value part.
object ikey = null;
if (xobj.Type.IsDictionary) {
Type kvpType = iobj.GetType ();
bool isNonGeneric = kvpType == typeof (DictionaryEntry);
var kp = isNonGeneric ? null : kvpType.GetRuntimeProperty ("Key");
var vp = isNonGeneric ? null : kvpType.GetRuntimeProperty ("Value");
ikey = isNonGeneric ? ((DictionaryEntry) iobj).Key : kp.GetValue (iobj, null);
iobj = isNonGeneric ? ((DictionaryEntry) iobj).Value : vp.GetValue (iobj, null);
}
var wobj = TypeExtensionMethods.GetExtensionWrapped (iobj);
var xiobj = new XamlObject (GetType (wobj), wobj);
if (ikey != null) {
// Key member is written *inside* the item object.
//
// It is messy, but Key and Value are *sorted*. In most cases Key goes first, but for example PositionalParameters comes first.
// To achieve this behavior, we compare XamlLanguage.Key and value's Member and returns in order. It's all nasty hack, but at least it could be achieved like this!
var en = GetNodes (null, xiobj).ToArray ();
yield return en [0]; // StartObject
var xknm = new XamlNodeMember (xobj, XamlLanguage.Key);
var nodes1 = en.Skip (1).Take (en.Length - 2);
var nodes2 = GetKeyNodes (ikey, xobj.Type.KeyType, xknm);
foreach (var xn in EnumerateMixingMember (nodes1, XamlLanguage.Key, nodes2))
yield return xn;
yield return en [en.Length - 1];
}
else
foreach (var xn in GetNodes (null, xiobj))
yield return xn;
}
}
IEnumerable<XamlNodeInfo> GetMemberNodes (XamlNodeMember member, IEnumerable<XamlNodeInfo> contents)
{
yield return new XamlNodeInfo (XamlNodeType.StartMember, member);
foreach (var cn in contents)
yield return cn;
yield return new XamlNodeInfo (XamlNodeType.EndMember, member);
}
