IEnumerable <XamlNodeMember> GetNodeMembers(XamlObject xobj, IValueSerializerContext vsctx)
{
// XData.XmlReader is not returned.
if (xobj.Type == XamlLanguage.XData)
{
yield return(new XamlNodeMember(xobj, XamlLanguage.XData.GetMember("Text")));
yield break;
}
// FIXME: find out why root Reference has PositionalParameters.
if (xobj.GetRawValue() != root && xobj.Type == XamlLanguage.Reference)
{
yield return(new XamlNodeMember(xobj, XamlLanguage.PositionalParameters));
}
else
{
var inst = xobj.GetRawValue();
var atts = new KeyValuePair <AttachableMemberIdentifier, object> [AttachablePropertyServices.GetAttachedPropertyCount(inst)];
AttachablePropertyServices.CopyPropertiesTo(inst, atts, 0);
foreach (var p in atts)
{
var axt = ctx.GetXamlType(p.Key.DeclaringType);
yield return(new XamlNodeMember(new XamlObject(axt, p.Value), axt.GetAttachableMember(p.Key.MemberName)));
}
foreach (var xm in xobj.Type.GetAllObjectReaderMembersByType(vsctx))
{
yield return(new XamlNodeMember(xobj, xm));
}
}
}
internal static object GetMemberValue(this XamlObject xobj, XamlMember xm)
{
if (xm.IsUnknown)
{
return(null);
}
if (xm.IsAttachable)
{
return(xobj.GetRawValue()); // attachable property value
}
// FIXME: this looks like an ugly hack. Is this really true? What if there's MarkupExtension that uses another MarkupExtension type as a member type.
var obj = xobj.Context.GetRawValue();
if (xm == XamlLanguage.Initialization)
{
return(obj);
}
if (xm == XamlLanguage.Items) // collection itself.
{
return(obj);
}
if (xm == XamlLanguage.Arguments) // object itself
{
return(obj);
}
if (xm == XamlLanguage.PositionalParameters)
{
return(xobj.GetRawValue()); // dummy value
}
return(xm.Invoker.GetValue(xobj.GetRawValue()));
}
internal static object GetMemberValue(this XamlObject xobj, XamlMember xm)
{
if (xm.IsUnknown)
{
return(null);
}
if (xm.IsAttachable)
{
return(xobj.GetRawValue()); // attachable property value
}
// FIXME: this looks like an ugly hack. Is this really true? What if there's MarkupExtension that uses another MarkupExtension type as a member type.
var obj = xobj.Context.GetRawValue();
if (xm == XamlLanguage.Initialization)
{
return(obj);
}
if (xm == XamlLanguage.Items) // collection itself.
{
return(obj);
}
if (xm == XamlLanguage.Arguments) // object itself
{
return(obj);
}
if (xm == XamlLanguage.PositionalParameters)
{
return(xobj.GetRawValue()); // dummy value
}
TypeConverter tc = null;
var cas = xm.GetCustomAttributeProvider().GetCustomAttributes(true);
foreach (var ca in cas)
{
tc = TypeDescriptor.GetConverter(ca);
if (tc != null)
{
break;
}
}
if (tc != null)
{
return(xm.UnderlyingGetter.Invoke(xobj.GetRawValue(), new object[] {}));
}
return(xm.Invoker.GetValue(xobj.GetRawValue()));
}
internal string GetReferenceName(XamlObject xobj, object value)
{
var name = GetName(value);
if (name != null)
{
return(name);
}
var un = unnamed.FirstOrDefault(r => ReferenceEquals(r.Value, value));
if (un == null)
{
return(null);
}
// generate a name for it, only when needed.
var xm = xobj.Type.GetAliasedProperty(XamlLanguage.Name);
if (xm != null)
{
name = (string)xm.Invoker.GetValue(xobj.GetRawValue());
}
else
{
name = "__ReferenceID" + used_reference_ids++;
}
un.Name = name;
objects [name] = un;
return(name);
}
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);
}
}
}
}
string GetReferenceName(XamlObject xobj)
{
var xm = xobj.Type.GetAliasedProperty(XamlLanguage.Name);
if (xm != null)
{
return((string)xm.Invoker.GetValue(xobj.GetRawValue()));
}
return("__ReferenceID" + used_reference_ids++);
}
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> 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));
}
}
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);
}
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<XamlNodeMember> GetNodeMembers (XamlObject xobj, IValueSerializerContext vsctx)
{
// XData.XmlReader is not returned.
if (xobj.Type == XamlLanguage.XData) {
yield return new XamlNodeMember (xobj, XamlLanguage.XData.GetMember ("Text"));
yield break;
}
// FIXME: find out why root Reference has PositionalParameters.
if (xobj.GetRawValue () != root && xobj.Type == XamlLanguage.Reference)
yield return new XamlNodeMember (xobj, XamlLanguage.PositionalParameters);
else {
var inst = xobj.GetRawValue ();
var atts = new KeyValuePair<AttachableMemberIdentifier,object> [AttachablePropertyServices.GetAttachedPropertyCount (inst)];
AttachablePropertyServices.CopyPropertiesTo (inst, atts, 0);
foreach (var p in atts) {
var axt = ctx.GetXamlType (p.Key.DeclaringType);
yield return new XamlNodeMember (new XamlObject (axt, p.Value), axt.GetAttachableMember (p.Key.MemberName));
}
foreach (var xm in xobj.Type.GetAllObjectReaderMembersByType (vsctx))
yield return new XamlNodeMember (xobj, xm);
}
}
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;
}
}
string GetReferenceName (XamlObject xobj)
{
var xm = xobj.Type.GetAliasedProperty (XamlLanguage.Name);
if (xm != null)
return (string) xm.Invoker.GetValue (xobj.GetRawValue ());
return "__ReferenceID" + used_reference_ids++;
}
internal string GetReferenceName (XamlObject xobj, object value)
{
var name = GetName (value);
if (name != null)
return name;
var un = unnamed.FirstOrDefault (r => ReferenceEquals (r.Value, value));
if (un == null)
return null;
// generate a name for it, only when needed.
var xm = xobj.Type.GetAliasedProperty (XamlLanguage.Name);
if (xm != null)
name = (string) xm.Invoker.GetValue (xobj.GetRawValue ());
else
name = "__ReferenceID" + used_reference_ids++;
un.Name = name;
objects [name] = un;
return name;
}