Merged into single file, added assertions
[mono.git] / mcs / class / System.XML / System.Xml.Serialization / XmlSerializationReaderInterpreter.cs
1 //
2 // XmlSerializationReaderInterpreter.cs: 
3 //
4 // Author:
5 //   Lluis Sanchez Gual (lluis@ximian.com)
6 //
7 // (C) 2002, 2003 Ximian, Inc.  http://www.ximian.com
8 //
9
10 //
11 // Permission is hereby granted, free of charge, to any person obtaining
12 // a copy of this software and associated documentation files (the
13 // "Software"), to deal in the Software without restriction, including
14 // without limitation the rights to use, copy, modify, merge, publish,
15 // distribute, sublicense, and/or sell copies of the Software, and to
16 // permit persons to whom the Software is furnished to do so, subject to
17 // the following conditions:
18 // 
19 // The above copyright notice and this permission notice shall be
20 // included in all copies or substantial portions of the Software.
21 // 
22 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
23 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
24 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
25 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
26 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
27 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
28 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
29 //
30
31 using System;
32 using System.Reflection;
33 using System.Collections;
34
35 namespace System.Xml.Serialization
36 {
37         internal class XmlSerializationReaderInterpreter: XmlSerializationReader
38         {
39                 XmlMapping _typeMap;
40                 SerializationFormat _format;
41                 static readonly XmlQualifiedName AnyType = new XmlQualifiedName("anyType", System.Xml.Schema.XmlSchema.Namespace);
42                 static readonly object [] empty_array = new object [0];
43
44                 public XmlSerializationReaderInterpreter(XmlMapping typeMap)
45                 {
46                         _typeMap = typeMap;
47                         _format = typeMap.Format;
48                 }
49
50                 protected override void InitCallbacks ()
51                 {
52                         ArrayList maps = _typeMap.RelatedMaps;
53                         if (maps != null)
54                         {
55                                 foreach (XmlTypeMapping map in maps)  
56                                 {
57                                         if (map.TypeData.SchemaType == SchemaTypes.Class || map.TypeData.SchemaType == SchemaTypes.Enum)
58                                         {
59                                                 ReaderCallbackInfo info = new ReaderCallbackInfo (this, map);
60                                                 AddReadCallback (map.XmlType, map.Namespace, map.TypeData.Type, new XmlSerializationReadCallback (info.ReadObject));
61                                         }
62                                 }
63                         }
64                 }
65
66                 protected override void InitIDs ()
67                 {
68                 }
69
70                 protected XmlTypeMapping GetTypeMap (Type type)
71                 {
72                         ArrayList maps = _typeMap.RelatedMaps;
73                         if (maps != null)
74                         {
75                                 foreach (XmlTypeMapping map in maps)
76                                         if (map.TypeData.Type == type) return map;
77                         }
78                         throw new InvalidOperationException ("Type " + type + " not mapped");
79                 }
80
81                 public object ReadRoot ()
82                 {
83                         Reader.MoveToContent();
84                         if (_typeMap is XmlTypeMapping)
85                         {
86                                 if (_format == SerializationFormat.Literal)
87                                         return ReadRoot ((XmlTypeMapping)_typeMap);
88                                 else
89                                         return ReadEncodedObject ((XmlTypeMapping)_typeMap);
90                         }
91                         else
92                                 return ReadMessage ((XmlMembersMapping)_typeMap);
93                 }
94
95                 object ReadEncodedObject (XmlTypeMapping typeMap)
96                 {
97 #if MOONLIGHT
98                         throw new NotSupportedException ();
99 #else
100                         object ob = null;
101                         Reader.MoveToContent();
102                         if (Reader.NodeType == System.Xml.XmlNodeType.Element) 
103                         {
104                                 if (Reader.LocalName == typeMap.ElementName && Reader.NamespaceURI == typeMap.Namespace)
105                                         ob = ReadReferencedElement();
106                                 else 
107                                         throw CreateUnknownNodeException();
108                         }
109                         else 
110                                 UnknownNode(null);
111
112                         ReadReferencedElements();
113                         return ob;
114 #endif
115                 }
116
117                 protected virtual object ReadMessage (XmlMembersMapping typeMap)
118                 {
119 #if MOONLIGHT
120                         throw new NotSupportedException ();
121 #else
122                         object[] parameters = new object[typeMap.Count];
123
124                         if (typeMap.HasWrapperElement)
125                         {
126                                 // bug #79988: out parameters need to be initialized if they 
127                                 // are value types
128                                 ArrayList members = ((ClassMap) typeMap.ObjectMap).AllMembers;
129                                 for (int n = 0; n < members.Count; n++) {
130                                         XmlTypeMapMember mem = (XmlTypeMapMember) members [n];
131                                         if (!mem.IsReturnValue && mem.TypeData.IsValueType)
132                                                 SetMemberValueFromAttr (mem, parameters, CreateInstance (
133                                                         mem.TypeData.Type), true);
134                                 }
135
136                                 if (_format == SerializationFormat.Encoded)
137                                 {
138                                         while (Reader.NodeType == System.Xml.XmlNodeType.Element)
139                                         {
140                                                 string root = Reader.GetAttribute ("root", XmlSerializer.EncodingNamespace);
141                                                 if (root == null || System.Xml.XmlConvert.ToBoolean(root)) break;
142                                                 ReadReferencedElement ();
143                                                 Reader.MoveToContent ();
144                                         }
145                                 }
146
147                                 while (Reader.NodeType != System.Xml.XmlNodeType.EndElement &&
148                                        // it could be an empty root element
149                                        Reader.ReadState == ReadState.Interactive)
150                                 {
151                                         if (Reader.IsStartElement(typeMap.ElementName, typeMap.Namespace) 
152                                             || _format == SerializationFormat.Encoded)  
153                                         {
154                                                 ReadAttributeMembers ((ClassMap)typeMap.ObjectMap, parameters, true);
155                                                 if (Reader.IsEmptyElement) {
156                                                         Reader.Skip();
157                                                         Reader.MoveToContent();
158                                                         continue;
159                                                 }
160                                                 Reader.ReadStartElement();
161                                                 ReadMembers ((ClassMap)typeMap.ObjectMap, parameters, true, false);
162                                                 ReadEndElement();
163                                                 break;
164                                         }
165                                         else 
166                                                 UnknownNode(null);
167
168                                         Reader.MoveToContent();
169                                 }
170                         }
171                         else
172                                 ReadMembers ((ClassMap)typeMap.ObjectMap, parameters, true, _format == SerializationFormat.Encoded);
173
174                         if (_format == SerializationFormat.Encoded)
175                                 ReadReferencedElements();
176
177                         return parameters;
178 #endif
179                 }
180
181                 object ReadRoot (XmlTypeMapping rootMap)
182                 {
183                         if (rootMap.TypeData.SchemaType == SchemaTypes.XmlNode)
184                         {
185                                 return ReadXmlNodeElement (rootMap, true);
186                         }
187                         else
188                         {
189                                 if (Reader.LocalName != rootMap.ElementName || Reader.NamespaceURI != rootMap.Namespace)
190                                         throw CreateUnknownNodeException();
191                                 
192                                 return ReadObject (rootMap, rootMap.IsNullable, true);
193                         }
194                 }               
195
196
197                 protected virtual object ReadObject (XmlTypeMapping typeMap, bool isNullable, bool checkType)
198                 {
199                         switch (typeMap.TypeData.SchemaType)
200                         {
201                                 case SchemaTypes.Class: return ReadClassInstance (typeMap, isNullable, checkType);
202                                 case SchemaTypes.Array: return ReadListElement (typeMap, isNullable, null, true);
203                                 case SchemaTypes.XmlNode: return ReadXmlNodeElement (typeMap, isNullable);
204                                 case SchemaTypes.Primitive: return ReadPrimitiveElement (typeMap, isNullable);
205                                 case SchemaTypes.Enum: return ReadEnumElement (typeMap, isNullable);
206                                 case SchemaTypes.XmlSerializable: return ReadXmlSerializableElement (typeMap, isNullable);
207                                 default: throw new Exception ("Unsupported map type");
208                         }
209                 }
210
211                 protected virtual object ReadClassInstance (XmlTypeMapping typeMap, bool isNullable, bool checkType)
212                 {
213                         if (isNullable && ReadNull()) return null;
214
215                         if (checkType) 
216                         {
217                 System.Xml.XmlQualifiedName t = GetXsiType();
218                                 if (t != null) 
219                                 {
220                                         XmlTypeMapping realMap = typeMap.GetRealElementMap (t.Name, t.Namespace);
221                                         if (realMap == null) {
222                                                 if (typeMap.TypeData.Type == typeof(object))
223                                                         return ReadTypedPrimitive (t);
224                                                 else
225                                                         throw CreateUnknownTypeException((System.Xml.XmlQualifiedName)t);
226                                         }
227                                         if (realMap != typeMap)
228                                                 return ReadObject (realMap, false, false);
229                                 }
230                                 else if (typeMap.TypeData.Type == typeof(object))
231                                         return ReadTypedPrimitive (AnyType);
232             }
233
234                         object ob = CreateInstance (typeMap.TypeData.Type, true);
235
236                         Reader.MoveToElement();
237                         bool isEmpty = Reader.IsEmptyElement;
238                         ReadClassInstanceMembers (typeMap, ob);
239
240                         if (isEmpty) Reader.Skip();
241                         else ReadEndElement();
242
243                         return ob;
244                 }
245
246                 protected virtual void ReadClassInstanceMembers (XmlTypeMapping typeMap, object ob)
247                 {
248                         ReadMembers ((ClassMap) typeMap.ObjectMap, ob, false, false);
249                 }
250
251                 void ReadAttributeMembers (ClassMap map, object ob, bool isValueList)
252                 {
253                         XmlTypeMapMember anyAttrMember = map.DefaultAnyAttributeMember;
254                         int anyAttributeIndex = 0;
255                         object anyAttributeArray = null;
256
257                         while (Reader.MoveToNextAttribute())
258                         {
259                                 XmlTypeMapMemberAttribute member = map.GetAttribute (Reader.LocalName, Reader.NamespaceURI);
260
261                                 if (member != null) 
262                                 {
263                                         SetMemberValue (member, ob, GetValueFromXmlString (Reader.Value, member.TypeData, member.MappedType), isValueList);
264                                 }
265                                 else if (IsXmlnsAttribute(Reader.Name)) 
266                                 {
267                                         // If the map has NamespaceDeclarations,
268                                         // then store this xmlns to the given member.
269                                         // If the instance doesn't exist, then create.
270                                         if (map.NamespaceDeclarations != null) {
271                                                 XmlSerializerNamespaces nss = this.GetMemberValue (map.NamespaceDeclarations, ob, isValueList) as XmlSerializerNamespaces;
272                                                 if (nss == null) {
273                                                         nss = new XmlSerializerNamespaces ();
274                                                         SetMemberValue (map.NamespaceDeclarations, ob, nss, isValueList);
275                                                 }
276                                                 if (Reader.Prefix == "xmlns")
277                                                         nss.Add (Reader.LocalName, Reader.Value);
278                                                 else
279                                                         nss.Add ("", Reader.Value);
280                                         }
281                                 }       
282 #if !MOONLIGHT
283                                 else if (anyAttrMember != null) 
284                                 {
285                                         XmlAttribute attr = (XmlAttribute) Document.ReadNode(Reader);
286                                         ParseWsdlArrayType (attr);
287                                         AddListValue (anyAttrMember.TypeData, ref anyAttributeArray, anyAttributeIndex++, attr, true);
288                                 }
289                                 else
290                                         ProcessUnknownAttribute(ob);
291 #endif
292                         }
293
294 #if !MOONLIGHT
295                         if (anyAttrMember != null)
296                         {
297                                 anyAttributeArray = ShrinkArray ((Array)anyAttributeArray, anyAttributeIndex, anyAttrMember.TypeData.Type.GetElementType(), true);
298                                 SetMemberValue (anyAttrMember, ob, anyAttributeArray, isValueList);
299                         }
300 #endif
301                         Reader.MoveToElement ();
302                 }
303
304                 void ReadMembers (ClassMap map, object ob, bool isValueList, bool readBySoapOrder)
305                 {
306                         // Reads attributes
307                         ReadAttributeMembers (map, ob, isValueList);
308
309                         if (!isValueList)
310                         {
311                                 Reader.MoveToElement();
312                                 if (Reader.IsEmptyElement) { 
313                                         SetListMembersDefaults (map, ob, isValueList);
314                                         return;
315                                 }
316
317                                 Reader.ReadStartElement();
318                         }
319
320                         // Reads elements
321
322                         bool[] readFlag = new bool[(map.ElementMembers != null) ? map.ElementMembers.Count : 0];
323
324                         bool hasAnyReturnMember = (isValueList && _format == SerializationFormat.Encoded && map.ReturnMember != null);
325                         
326                         Reader.MoveToContent();
327
328                         int[] indexes = null;
329                         object[] flatLists = null;
330                         object[] flatListsChoices = null;
331                         Fixup fixup = null;
332                         int ind = 0;
333                         int maxInd;
334
335                         if (readBySoapOrder) {
336                                 if (map.ElementMembers != null) maxInd = map.ElementMembers.Count;
337                                 else maxInd = 0;
338                         }
339                         else
340                                 maxInd = int.MaxValue;
341
342                         if (map.FlatLists != null) 
343                         {
344                                 indexes = new int[map.FlatLists.Count];
345                                 flatLists = new object[map.FlatLists.Count];
346                                 foreach (XmlTypeMapMemberExpandable mem in map.FlatLists) {
347                                         if (IsReadOnly (mem, mem.TypeData, ob, isValueList))
348                                                 flatLists [mem.FlatArrayIndex] = mem.GetValue (ob);
349                                         else if (mem.TypeData.Type.IsArray) {
350                                                 flatLists [mem.FlatArrayIndex] = InitializeList (mem.TypeData);
351                                         }
352                                         else {
353                                                 object list = mem.GetValue (ob);
354                                                 if (list == null) {
355                                                         list = InitializeList (mem.TypeData);
356                                                         SetMemberValue (mem, ob, list, isValueList);
357                                                 }
358                                                 flatLists [mem.FlatArrayIndex] = list;
359                                         }
360                                                 
361                                         if (mem.ChoiceMember != null) {
362                                                 if (flatListsChoices == null)
363                                                         flatListsChoices = new object [map.FlatLists.Count];
364                                                 flatListsChoices [mem.FlatArrayIndex] = InitializeList (mem.ChoiceTypeData);
365                                         }
366                                 }
367                         }
368                         
369                         if (_format == SerializationFormat.Encoded && map.ElementMembers != null)
370                         {
371                                 FixupCallbackInfo info = new FixupCallbackInfo (this, map, isValueList);
372                                 fixup = new Fixup(ob, new XmlSerializationFixupCallback(info.FixupMembers), map.ElementMembers.Count);
373                                 AddFixup (fixup);
374                         }
375
376                         while (Reader.NodeType != System.Xml.XmlNodeType.EndElement && (ind < maxInd)) 
377                         {
378                                 if (Reader.NodeType == System.Xml.XmlNodeType.Element) 
379                                 {
380                                         XmlTypeMapElementInfo info;
381                                         
382                                         if (readBySoapOrder) {
383                                                 info = map.GetElement (ind++);
384                                         }
385                                         else if (hasAnyReturnMember) {
386                                                 info = (XmlTypeMapElementInfo) ((XmlTypeMapMemberElement)map.ReturnMember).ElementInfo[0];
387                                                 hasAnyReturnMember = false;
388                                         }
389                                         else {
390                                                 if (map.IsOrderDependentMap) {
391                                                         while ((info = map.GetElement (ind++)) != null)
392                                                                 if (info.ElementName == Reader.LocalName && info.Namespace == Reader.NamespaceURI)
393                                                                         break;
394                                                 }
395                                                 else
396                                                         info = map.GetElement (Reader.LocalName, Reader.NamespaceURI, -1);
397                                         }
398
399                                         if (info != null && !readFlag[info.Member.Index] )
400                                         {
401                                                 if (info.Member.GetType() == typeof (XmlTypeMapMemberList))
402                                                 {
403                                                         if (_format == SerializationFormat.Encoded && info.MultiReferenceType)
404                                                         {
405                                                                 object list = ReadReferencingElement (out fixup.Ids[info.Member.Index]);
406                                                                 if (fixup.Ids[info.Member.Index] == null)       // Already read
407                                                                 {
408                                                                         if (IsReadOnly (info.Member, info.TypeData, ob, isValueList)) throw CreateReadOnlyCollectionException (info.TypeData.FullTypeName);
409                                                                         else SetMemberValue (info.Member, ob, list, isValueList);
410                                                                 }
411                                                                 else if (!info.MappedType.TypeData.Type.IsArray)
412                                                                 {
413                                                                         if (IsReadOnly (info.Member, info.TypeData, ob, isValueList)) 
414                                                                                 list = GetMemberValue (info.Member, ob, isValueList);
415                                                                         else { 
416                                                                                 list = CreateList (info.MappedType.TypeData.Type);
417                                                                                 SetMemberValue (info.Member, ob, list, isValueList);
418                                                                         }
419                                                                         AddFixup (new CollectionFixup (list, new XmlSerializationCollectionFixupCallback (FillList), fixup.Ids[info.Member.Index]));
420                                                                         fixup.Ids[info.Member.Index] = null;    // The member already has the value, no further fix needed.
421                                                                 }
422                                                         }
423                                                         else
424                                                         {
425                                                                 if (IsReadOnly (info.Member, info.TypeData, ob, isValueList)) {
426                                                                         ReadListElement (info.MappedType, info.IsNullable, GetMemberValue (info.Member, ob, isValueList), false);
427                                                                 } else if (info.MappedType.TypeData.Type.IsArray) {
428                                                                         object list = ReadListElement (info.MappedType, info.IsNullable, null, true);
429                                                                         if (list != null || info.IsNullable)
430                                                                                 SetMemberValue (info.Member, ob, list, isValueList);
431                                                                 } else {
432                                                                         // If the member already has a list, reuse that list. No need to create a new one. 
433                                                                         object list = GetMemberValue (info.Member, ob, isValueList);
434                                                                         if (list == null) {
435                                                                                 list = CreateList (info.MappedType.TypeData.Type);
436                                                                                 SetMemberValue (info.Member, ob, list, isValueList);
437                                                                         }
438                                                                         ReadListElement (info.MappedType, info.IsNullable, list, true);
439                                                                 }
440                                                         }
441                                                         readFlag[info.Member.Index] = true;
442                                                 }
443                                                 else if (info.Member.GetType() == typeof (XmlTypeMapMemberFlatList))
444                                                 {
445                                                         XmlTypeMapMemberFlatList mem = (XmlTypeMapMemberFlatList)info.Member;
446                                                         AddListValue (mem.TypeData, ref flatLists[mem.FlatArrayIndex], indexes[mem.FlatArrayIndex]++, ReadObjectElement (info), !IsReadOnly (info.Member, info.TypeData, ob, isValueList));
447                                                         if (mem.ChoiceMember != null) {
448                                                                 AddListValue (mem.ChoiceTypeData, ref flatListsChoices [mem.FlatArrayIndex], indexes[mem.FlatArrayIndex]-1, info.ChoiceValue, true);
449                                                         }
450                                                 }
451                                                 else if (info.Member.GetType() == typeof (XmlTypeMapMemberAnyElement))
452                                                 {
453                                                         XmlTypeMapMemberAnyElement mem = (XmlTypeMapMemberAnyElement)info.Member;
454                                                         if (mem.TypeData.IsListType) AddListValue (mem.TypeData, ref flatLists[mem.FlatArrayIndex], indexes[mem.FlatArrayIndex]++, ReadXmlNode (mem.TypeData.ListItemTypeData, false), true);
455                                                         else SetMemberValue (mem, ob, ReadXmlNode (mem.TypeData, false), isValueList);
456                                                 }
457                                                 else if (info.Member.GetType() == typeof(XmlTypeMapMemberElement))
458                                                 {
459                                                         object val;
460                                                         readFlag[info.Member.Index] = true;
461                                                         if (_format == SerializationFormat.Encoded)
462                                                         {
463                                                                 if (info.Member.TypeData.SchemaType != SchemaTypes.Primitive)
464                                                                         val = ReadReferencingElement (out fixup.Ids[info.Member.Index]);
465                                                                 else
466                                                                         val = ReadReferencingElement (info.Member.TypeData.XmlType, System.Xml.Schema.XmlSchema.Namespace, out fixup.Ids[info.Member.Index]);
467                                                                         
468                                                                 if (info.MultiReferenceType) {
469                                                                         if (fixup.Ids[info.Member.Index] == null)       // already read
470                                                                                 SetMemberValue (info.Member, ob, val, isValueList);
471                                                                 }
472                                                                 else if (val != null)
473                                                                         SetMemberValue (info.Member, ob, val, isValueList);
474                                                         }
475                                                         else {
476                                                                 SetMemberValue (info.Member, ob, ReadObjectElement (info), isValueList);
477                                                                 if (info.ChoiceValue != null) {
478                                                                         XmlTypeMapMemberElement imem = (XmlTypeMapMemberElement) info.Member;
479                                                                         imem.SetChoice (ob, info.ChoiceValue);
480                                                                 }
481                                                         }
482                                                 }
483                                                 else
484                                                         throw new InvalidOperationException ("Unknown member type");
485                                         }
486                                         else if (map.DefaultAnyElementMember != null)
487                                         {
488                                                 XmlTypeMapMemberAnyElement mem = map.DefaultAnyElementMember;
489                                                 if (mem.TypeData.IsListType) AddListValue (mem.TypeData, ref flatLists[mem.FlatArrayIndex], indexes[mem.FlatArrayIndex]++, ReadXmlNode (mem.TypeData.ListItemTypeData, false), true);
490                                                 else SetMemberValue (mem, ob, ReadXmlNode (mem.TypeData, false), isValueList);
491                                         }
492                                         else 
493                                                 ProcessUnknownElement(ob);
494                                 }
495                                 else if ((Reader.NodeType == System.Xml.XmlNodeType.Text || Reader.NodeType == System.Xml.XmlNodeType.CDATA) && map.XmlTextCollector != null)
496                                 {
497                                         if (map.XmlTextCollector is XmlTypeMapMemberExpandable)
498                                         {
499                                                 XmlTypeMapMemberExpandable mem = (XmlTypeMapMemberExpandable)map.XmlTextCollector;
500                                                 XmlTypeMapMemberFlatList flatl = mem as XmlTypeMapMemberFlatList;
501                                                 TypeData itype = (flatl == null) ? mem.TypeData.ListItemTypeData : flatl.ListMap.FindTextElement().TypeData;
502
503                                                 object val = (itype.Type == typeof (string)) ? (object) Reader.ReadString() : (object) ReadXmlNode (itype, false);
504                                                 AddListValue (mem.TypeData, ref flatLists[mem.FlatArrayIndex], indexes[mem.FlatArrayIndex]++, val, true);
505                                         }
506                                         else
507                                         {
508                                                 XmlTypeMapMemberElement mem = (XmlTypeMapMemberElement) map.XmlTextCollector;
509                                                 XmlTypeMapElementInfo info = (XmlTypeMapElementInfo) mem.ElementInfo [0];
510                                                 if (info.TypeData.Type == typeof (string))
511                                                         SetMemberValue (mem, ob, ReadString ((string) GetMemberValue (mem, ob, isValueList)), isValueList);
512                                                 else
513                                                         SetMemberValue (mem, ob, GetValueFromXmlString (Reader.ReadString(), info.TypeData, info.MappedType), isValueList);
514                                         }
515                                 }
516 #if !MOONLIGHT
517                                 else 
518                                         UnknownNode(ob);
519 #endif
520                                 Reader.MoveToContent();
521                         }
522
523                         if (flatLists != null)
524                         {
525                                 foreach (XmlTypeMapMemberExpandable mem in map.FlatLists)
526                                 {
527                                         Object list = flatLists[mem.FlatArrayIndex];
528                                         if (mem.TypeData.Type.IsArray)
529                                                 list = ShrinkArray ((Array)list, indexes[mem.FlatArrayIndex], mem.TypeData.Type.GetElementType(), true);
530                                         if (!IsReadOnly (mem, mem.TypeData, ob, isValueList) && mem.TypeData.Type.IsArray)
531                                                 SetMemberValue (mem, ob, list, isValueList);
532                                 }
533                         }
534
535                         if (flatListsChoices != null)
536                         {
537                                 foreach (XmlTypeMapMemberExpandable mem in map.FlatLists)
538                                 {
539                                         Object list = flatListsChoices[mem.FlatArrayIndex];
540                                         if (list == null) continue;
541                                         list = ShrinkArray ((Array)list, indexes[mem.FlatArrayIndex], mem.ChoiceTypeData.Type.GetElementType(), true);
542                                         XmlTypeMapMember.SetValue (ob, mem.ChoiceMember, list);
543                                 }
544                         }
545                         SetListMembersDefaults (map, ob, isValueList);
546                 }
547                 
548                 void SetListMembersDefaults (ClassMap map, object ob, bool isValueList)
549                 {
550                         if (map.ListMembers != null)
551                         {
552                                 ArrayList members = map.ListMembers;
553                                 for (int n=0; n<members.Count; n++) {
554                                         XmlTypeMapMember mem = (XmlTypeMapMember) members[n];
555                                         if (IsReadOnly (mem, mem.TypeData, ob, isValueList))
556                                                 continue;
557                                         if (GetMemberValue (mem, ob, isValueList) == null)
558                                                 SetMemberValue (mem, ob, InitializeList (mem.TypeData), isValueList);
559                                 }
560                         }
561                 }
562
563                 internal void FixupMembers (ClassMap map, object obfixup, bool isValueList)
564                 {
565                         Fixup fixup = (Fixup)obfixup;
566                         ICollection members = map.ElementMembers;
567                         string[] ids = fixup.Ids;
568                         foreach (XmlTypeMapMember member in members)
569                         {
570                                 if (ids[member.Index] != null)
571                                         SetMemberValue (member, fixup.Source, GetTarget(ids[member.Index]), isValueList);
572                         }
573                 }
574                 
575                 protected virtual void ProcessUnknownAttribute (object target)
576                 {
577                         UnknownNode (target);
578                 }
579                 
580                 protected virtual void ProcessUnknownElement (object target)
581                 {
582                         UnknownNode (target);
583                 }
584
585                 bool IsReadOnly (XmlTypeMapMember member, TypeData memType, object ob, bool isValueList)
586                 {
587                         if (isValueList) return !memType.HasPublicConstructor;
588                         else return member.IsReadOnly (ob.GetType()) || !memType.HasPublicConstructor;
589                 }
590
591                 void SetMemberValue (XmlTypeMapMember member, object ob, object value, bool isValueList)
592                 {
593                         if (isValueList)
594                                 ((object[])ob)[member.GlobalIndex] = value;
595                         else
596                                 member.SetValue (ob, value);
597                         if (member.IsOptionalValueType)
598                                 member.SetValueSpecified (ob, true); 
599                 }
600
601                 void SetMemberValueFromAttr (XmlTypeMapMember member, object ob, object value, bool isValueList)
602                 {
603                         // Enumeration values specified in custom attributes are stored as integer
604                         // values if the custom attribute property is of type object. So, it is
605                         // necessary to convert to the enum type before asigning the value to the field.
606                         
607                         if (member.TypeData.Type.IsEnum)
608                                 value = Enum.ToObject (member.TypeData.Type, value);
609                         SetMemberValue (member, ob, value, isValueList);
610                 }
611
612                 object GetMemberValue (XmlTypeMapMember member, object ob, bool isValueList)
613                 {
614                         if (isValueList) return ((object[])ob)[member.GlobalIndex];
615                         else return member.GetValue (ob);
616                 }
617
618                 object ReadObjectElement (XmlTypeMapElementInfo elem)
619                 {
620                         switch (elem.TypeData.SchemaType)
621                         {
622                                 case SchemaTypes.XmlNode:
623                                         return ReadXmlNode (elem.TypeData, true);
624
625                                 case SchemaTypes.Primitive:
626                                 case SchemaTypes.Enum:
627                                         return ReadPrimitiveValue (elem);
628
629                                 case SchemaTypes.Array:
630                                         return ReadListElement (elem.MappedType, elem.IsNullable, null, true);
631
632                                 case SchemaTypes.Class:
633                                         return ReadObject (elem.MappedType, elem.IsNullable, true);
634
635                                 case SchemaTypes.XmlSerializable:
636                                         object ob = CreateInstance (elem.TypeData.Type, true);
637                                         return ReadSerializable ((IXmlSerializable)ob);
638
639                                 default:
640                                         throw new NotSupportedException ("Invalid value type");
641                         }
642                 }
643
644                 object ReadPrimitiveValue (XmlTypeMapElementInfo elem)
645                 {
646                         if (elem.TypeData.Type == typeof (XmlQualifiedName)) {
647                                 if (elem.IsNullable) return ReadNullableQualifiedName ();
648                                 else return ReadElementQualifiedName ();
649                         }
650                         else if (elem.IsNullable)
651                                 return GetValueFromXmlString (ReadNullableString (), elem.TypeData, elem.MappedType);
652                         else
653                                 return GetValueFromXmlString (Reader.ReadElementString (), elem.TypeData, elem.MappedType);
654                 }
655                 
656                 object GetValueFromXmlString (string value, TypeData typeData, XmlTypeMapping typeMap)
657                 {
658                         if (typeData.SchemaType == SchemaTypes.Array)
659                                 return ReadListString (typeMap, value);
660                         else if (typeData.SchemaType == SchemaTypes.Enum)
661                                 return GetEnumValue (typeMap, value);
662                         else if (typeData.Type == typeof (XmlQualifiedName))
663                                 return ToXmlQualifiedName (value);
664                         else 
665                                 return XmlCustomFormatter.FromXmlString (typeData, value);
666                 }
667
668                 object ReadListElement (XmlTypeMapping typeMap, bool isNullable, object list, bool canCreateInstance)
669                 {
670                         Type listType = typeMap.TypeData.Type;
671                         ListMap listMap = (ListMap)typeMap.ObjectMap;
672
673                         if (listType.IsArray && ReadNull()) return null;
674
675                         if (list == null) {
676                                 if (canCreateInstance && typeMap.TypeData.HasPublicConstructor) list = CreateList (listType);
677                                 else throw CreateReadOnlyCollectionException (typeMap.TypeFullName);
678                         }
679
680                         if (Reader.IsEmptyElement) {
681                                 Reader.Skip();
682                                 if (listType.IsArray)
683                                         list = ShrinkArray ((Array)list, 0, listType.GetElementType(), false);
684                                 return list;
685                         }
686
687                         int index = 0;
688                         Reader.ReadStartElement();
689                         Reader.MoveToContent();
690
691                         while (Reader.NodeType != System.Xml.XmlNodeType.EndElement) 
692                         {
693                                 if (Reader.NodeType == System.Xml.XmlNodeType.Element) 
694                                 {
695                                         XmlTypeMapElementInfo elemInfo = listMap.FindElement (Reader.LocalName, Reader.NamespaceURI);
696                                         if (elemInfo != null)
697                                                 AddListValue (typeMap.TypeData, ref list, index++, ReadObjectElement (elemInfo), false);
698                                         else
699                                                 UnknownNode(null);
700                                 }
701                                 else 
702                                         UnknownNode(null);
703
704                                 Reader.MoveToContent();
705                         }
706                         ReadEndElement();
707
708                         if (listType.IsArray)
709                                 list = ShrinkArray ((Array)list, index, listType.GetElementType(), false);
710
711                         return list;
712                 }
713
714                 object ReadListString (XmlTypeMapping typeMap, string values)
715                 {
716                         Type listType = typeMap.TypeData.Type;
717                         ListMap listMap = (ListMap)typeMap.ObjectMap;
718                         values = values.Trim ();
719
720                         if (values == string.Empty)
721                         {
722                                 return Array.CreateInstance (listType.GetElementType(), 0);
723                         }
724
725                         string[] valueArray = values.Split (' ');
726                         Array list = Array.CreateInstance (listType.GetElementType(), valueArray.Length);
727
728                         XmlTypeMapElementInfo info = (XmlTypeMapElementInfo)listMap.ItemInfo[0];
729
730                         for (int index = 0; index < valueArray.Length; index++)
731                                 list.SetValue (GetValueFromXmlString (valueArray[index], info.TypeData, info.MappedType), index);
732
733                         return list;
734                 }
735
736                 void AddListValue (TypeData listType, ref object list, int index, object value, bool canCreateInstance)
737                 {
738                         Type type = listType.Type;
739                         if (type.IsArray)
740                         {
741                                 list = EnsureArrayIndex ((Array)list, index, type.GetElementType());
742                                 ((Array)list).SetValue (value, index);
743                         }
744                         else    // Must be IEnumerable
745                         {
746                                 if (list == null) {
747                                         if (canCreateInstance) list = CreateInstance (type, true);
748                                         else throw CreateReadOnlyCollectionException (type.FullName);
749                                 }
750
751                                 MethodInfo mi = type.GetMethod ("Add", new Type[] {listType.ListItemType} );
752                                 mi.Invoke (list, new object[] { value });
753                         }
754                 }
755
756                 static object CreateInstance (Type type, bool nonPublic)
757                 {
758 #if MOONLIGHT
759                         return Activator.CreateInstance (type); // always false
760 #else
761                         return Activator.CreateInstance (type, nonPublic);
762 #endif
763                 }
764
765                 object CreateInstance (Type type)
766                 {
767                         return Activator.CreateInstance (type, empty_array);
768                 }
769
770                 object CreateList (Type listType)
771                 {
772                         if (listType.IsArray)
773                                 return EnsureArrayIndex (null, 0, listType.GetElementType());
774                         else
775                                 return CreateInstance (listType, true);
776                 }
777                 
778                 object InitializeList (TypeData listType)
779                 {
780                         if (listType.Type.IsArray)
781                                 return null;
782                         else
783                                 return CreateInstance (listType.Type, true);
784                 }
785
786                 void FillList (object list, object items)
787                 {
788                         CopyEnumerableList (items, list);
789                 }
790
791                 void CopyEnumerableList (object source, object dest)
792                 {
793                         if (dest == null) throw CreateReadOnlyCollectionException (source.GetType().FullName);
794
795                         object[] param = new object[1];
796                         MethodInfo mi = dest.GetType().GetMethod ("Add");
797                         foreach (object ob in (IEnumerable)source)
798                         {
799                                 param[0] = ob;
800                                 mi.Invoke (dest, param);
801                         }
802                 }
803
804                 object ReadXmlNodeElement (XmlTypeMapping typeMap, bool isNullable)
805                 {
806                         return ReadXmlNode (typeMap.TypeData, false);
807                 }
808                 
809                 object ReadXmlNode (TypeData type, bool wrapped)
810                 {
811 #if MOONLIGHT
812                         throw new NotSupportedException ();
813 #else
814                         if (type.Type == typeof (XmlDocument))
815                                 return ReadXmlDocument (wrapped);
816                         else
817                                 return ReadXmlNode (wrapped);
818 #endif
819                 }
820
821                 object ReadPrimitiveElement (XmlTypeMapping typeMap, bool isNullable)
822                 {
823                         XmlQualifiedName t = GetXsiType();
824                         if (t == null) t = new XmlQualifiedName (typeMap.XmlType, typeMap.Namespace);
825                         return ReadTypedPrimitive (t);
826                 }
827
828                 object ReadEnumElement (XmlTypeMapping typeMap, bool isNullable)
829                 {
830                         Reader.ReadStartElement ();
831                         object o = GetEnumValue (typeMap, Reader.ReadString());
832                         ReadEndElement ();
833                         return o;
834                 }
835
836                 object GetEnumValue (XmlTypeMapping typeMap, string val)
837                 {
838                         if (val == null)
839                                 return null;
840                         EnumMap map = (EnumMap) typeMap.ObjectMap;
841                         string ev = map.GetEnumName (typeMap.TypeFullName, val);
842                         if (ev == null) throw CreateUnknownConstantException (val, typeMap.TypeData.Type);
843                         return Enum.Parse (typeMap.TypeData.Type, ev, false);
844                 }
845
846                 object ReadXmlSerializableElement (XmlTypeMapping typeMap, bool isNullable)
847                 {
848                         Reader.MoveToContent ();
849                         if (Reader.NodeType == XmlNodeType.Element)
850                         {
851                                 if (Reader.LocalName == typeMap.ElementName && Reader.NamespaceURI == typeMap.Namespace)
852                                 {
853                                         object ob = CreateInstance (typeMap.TypeData.Type, true);
854                                         return ReadSerializable ((IXmlSerializable)ob);
855                                 }
856                                 else
857                                         throw CreateUnknownNodeException ();
858                         }
859                         else
860                         {
861                                 UnknownNode (null);
862                                 return null;
863                         }
864                 }
865
866                 class FixupCallbackInfo
867                 {
868                         XmlSerializationReaderInterpreter _sri;
869                         ClassMap _map;
870                         bool _isValueList;
871
872                         public FixupCallbackInfo (XmlSerializationReaderInterpreter sri, ClassMap map, bool isValueList)
873                         {
874                                 _sri = sri;
875                                 _map = map;
876                                 _isValueList = isValueList;
877                         }
878
879                         public void FixupMembers (object fixup)
880                         {
881                                 _sri.FixupMembers (_map, fixup, _isValueList);
882                         }
883                 }
884
885                 class ReaderCallbackInfo
886                 {
887                         XmlSerializationReaderInterpreter _sri;
888                         XmlTypeMapping _typeMap;
889
890                         public ReaderCallbackInfo (XmlSerializationReaderInterpreter sri, XmlTypeMapping typeMap)
891                         {
892                                 _sri = sri;
893                                 _typeMap = typeMap;
894                         }
895
896                         internal object ReadObject ()
897                         {
898                                 return _sri.ReadObject (_typeMap, true, true);
899                         }
900                 }
901         }
902 }