mcs/class/corlib/System.Runtime.Serialization.Formatters.Binary/ObjectReader.cs

   1 // ObjectReader.cs\r
   2 //\r
   3 // Author:\r
   4 //   Lluis Sanchez Gual (lluis@ideary.com)\r
   5 //   Patrik Torstensson\r
   6 //\r
   7 // (C) 2003 Lluis Sanchez Gual\r
   8 \r
   9 //\r
  10 // Copyright (C) 2004 Novell, Inc (http://www.novell.com)\r
  11 //\r
  12 // Permission is hereby granted, free of charge, to any person obtaining\r
  13 // a copy of this software and associated documentation files (the\r
  14 // "Software"), to deal in the Software without restriction, including\r
  15 // without limitation the rights to use, copy, modify, merge, publish,\r
  16 // distribute, sublicense, and/or sell copies of the Software, and to\r
  17 // permit persons to whom the Software is furnished to do so, subject to\r
  18 // the following conditions:\r
  19 // \r
  20 // The above copyright notice and this permission notice shall be\r
  21 // included in all copies or substantial portions of the Software.\r
  22 // \r
  23 // THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,\r
  24 // EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF\r
  25 // MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND\r
  26 // NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE\r
  27 // LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION\r
  28 // OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION\r
  29 // WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.\r
  30 //\r
  31 \r
  32 using System;\r
  33 using System.Runtime.Serialization;\r
  34 using System.IO;\r
  35 using System.Collections;\r
  36 using System.Reflection;\r
  37 using System.Runtime.Remoting.Messaging;\r
  38 using System.Globalization;\r
  39 \r
  40 namespace System.Runtime.Serialization.Formatters.Binary\r
  41 {\r
  42         internal class ObjectReader\r
  43         {\r
  44                 BinaryFormatter _formatter;\r
  45                 ISurrogateSelector _surrogateSelector;\r
  46                 StreamingContext _context;\r
  47                 SerializationBinder _binder;\r
  48                 \r
  49 #if NET_1_1\r
  50                 TypeFilterLevel _filterLevel;\r
  51 #endif\r
  52 \r
  53                 ObjectManager _manager;\r
  54                 Hashtable _registeredAssemblies = new Hashtable();\r
  55                 Hashtable _typeMetadataCache = new Hashtable();\r
  56 \r
  57                 object _lastObject = null;\r
  58                 long _lastObjectID = 0;\r
  59                 long _rootObjectID = 0;\r
  60                 byte[] arrayBuffer;\r
  61                 int ArrayBufferLength = 4096;\r
  62 \r
  63                 class TypeMetadata\r
  64                 {\r
  65                         public Type Type;\r
  66                         public Type[] MemberTypes;\r
  67                         public string[] MemberNames;\r
  68                         public MemberInfo[] MemberInfos;\r
  69                         public int FieldCount;\r
  70                         public bool NeedsSerializationInfo;\r
  71                 }\r
  72 \r
  73                 class ArrayNullFiller\r
  74                 {\r
  75                         public ArrayNullFiller(int count) { NullCount = count; }\r
  76                         public int NullCount;\r
  77                 }\r
  78 \r
  79                 public ObjectReader (BinaryFormatter formatter)\r
  80                 {\r
  81                         _formatter = formatter;\r
  82                         _surrogateSelector = formatter.SurrogateSelector;\r
  83                         _context = formatter.Context;\r
  84                         _binder = formatter.Binder;\r
  85                         _manager = new ObjectManager (_surrogateSelector, _context);\r
  86                         \r
  87 #if NET_1_1\r
  88                         _filterLevel = formatter.FilterLevel;\r
  89 #endif\r
  90                 }\r
  91 \r
  92                 public void ReadObjectGraph (BinaryReader reader, bool readHeaders, out object result, out Header[] headers)\r
  93                 {\r
  94                         headers = null;\r
  95 \r
  96                         // Reads the objects. The first object in the stream is the\r
  97                         // root object.\r
  98 \r
  99                         while (ReadNextObject (reader))\r
 100                         {\r
 101                                 if (readHeaders && (headers == null))\r
 102                                         headers = (Header[])CurrentObject;\r
 103                                 else\r
 104                                         if (_rootObjectID == 0) _rootObjectID = _lastObjectID;\r
 105                         }\r
 106 \r
 107                         result = _manager.GetObject (_rootObjectID);\r
 108                 }\r
 109 \r
 110                 public bool ReadNextObject (BinaryReader reader)\r
 111                 {\r
 112                         BinaryElement element = (BinaryElement)reader.ReadByte ();\r
 113                         if (element == BinaryElement.End)\r
 114                         {\r
 115                                 _manager.DoFixups();\r
 116 \r
 117                                 _manager.RaiseDeserializationEvent();\r
 118                                 return false;\r
 119                         }\r
 120 \r
 121                         SerializationInfo info;\r
 122                         long objectId;\r
 123 \r
 124                         ReadObject (element, reader, out objectId, out _lastObject, out info);\r
 125 \r
 126                         if (objectId != 0) {\r
 127                                 RegisterObject (objectId, _lastObject, info, 0, null, null);\r
 128                                 _lastObjectID = objectId;               \r
 129                         }\r
 130         \r
 131                         return true;\r
 132                 }\r
 133 \r
 134                 public object CurrentObject\r
 135                 {\r
 136                         get { return _lastObject; }\r
 137                 }\r
 138 \r
 139                 // Reads an object from the stream. The object is registered in the ObjectManager.\r
 140                 // The result can be either the object instance\r
 141                 // or the id of the object (when what is found in the stream is an object reference).\r
 142                 // If an object instance is read, the objectId is set to 0.\r
 143                 \r
 144                 private void ReadObject (BinaryElement element, BinaryReader reader, out long objectId, out object value, out SerializationInfo info)\r
 145                 {\r
 146                         switch (element)\r
 147                         {\r
 148                                 case BinaryElement.RefTypeObject:\r
 149                                         ReadRefTypeObjectInstance (reader, out objectId, out value, out info);\r
 150                                         break;\r
 151 \r
 152                                 case BinaryElement.UntypedRuntimeObject:\r
 153                                         ReadObjectInstance (reader, true, false, out objectId, out value, out info);\r
 154                                         break;\r
 155 \r
 156                                 case BinaryElement.UntypedExternalObject:\r
 157                                         ReadObjectInstance (reader, false, false, out objectId, out value, out info);\r
 158                                         break;\r
 159 \r
 160                                 case BinaryElement.RuntimeObject:\r
 161                                         ReadObjectInstance (reader, true, true, out objectId, out value, out info);\r
 162                                         break;\r
 163 \r
 164                                 case BinaryElement.ExternalObject:\r
 165                                         ReadObjectInstance (reader, false, true, out objectId, out value, out info);\r
 166                                         break;\r
 167 \r
 168                                 case BinaryElement.String:\r
 169                                         info = null;\r
 170                                         ReadStringIntance (reader, out objectId, out value);\r
 171                                         break;\r
 172 \r
 173                                 case BinaryElement.GenericArray:\r
 174                                         info = null;\r
 175                                         ReadGenericArray (reader, out objectId, out value);\r
 176                                         break;\r
 177 \r
 178 \r
 179                                 case BinaryElement.BoxedPrimitiveTypeValue:\r
 180                                         value = ReadBoxedPrimitiveTypeValue (reader);\r
 181                                         objectId = 0;\r
 182                                         info = null;\r
 183                                         break;\r
 184 \r
 185                                 case BinaryElement.NullValue:\r
 186                                         value = null;\r
 187                                         objectId = 0;\r
 188                                         info = null;\r
 189                                         break;\r
 190 \r
 191                                 case BinaryElement.Assembly:\r
 192                                         ReadAssembly (reader);\r
 193                                         ReadObject ((BinaryElement)reader.ReadByte (), reader, out objectId, out value, out info);\r
 194                                         break;\r
 195 \r
 196                                 case BinaryElement.ArrayFiller8b:\r
 197                                         value = new ArrayNullFiller(reader.ReadByte());\r
 198                                         objectId = 0;\r
 199                                         info = null;\r
 200                                         break;\r
 201 \r
 202                                 case BinaryElement.ArrayFiller32b:\r
 203                                         value = new ArrayNullFiller(reader.ReadInt32());\r
 204                                         objectId = 0;\r
 205                                         info = null;\r
 206                                         break;\r
 207 \r
 208                                 case BinaryElement.ArrayOfPrimitiveType:\r
 209                                         ReadArrayOfPrimitiveType (reader, out objectId, out value);\r
 210                                         info = null;\r
 211                                         break;\r
 212 \r
 213                                 case BinaryElement.ArrayOfObject:\r
 214                                         ReadArrayOfObject (reader, out objectId, out value);\r
 215                                         info = null;\r
 216                                         break;\r
 217 \r
 218                                 case BinaryElement.ArrayOfString:\r
 219                                         ReadArrayOfString (reader, out objectId, out value);\r
 220                                         info = null;\r
 221                                         break;\r
 222 \r
 223                                 default:\r
 224                                         throw new SerializationException ("Unexpected binary element: " + (int)element);\r
 225                         }\r
 226                 }\r
 227 \r
 228                 private void ReadAssembly (BinaryReader reader)\r
 229                 {\r
 230                         long id = (long) reader.ReadUInt32 ();\r
 231                         string assemblyName = reader.ReadString ();\r
 232                         _registeredAssemblies [id] = assemblyName;\r
 233                 }\r
 234 \r
 235                 private void ReadObjectInstance (BinaryReader reader, bool isRuntimeObject, bool hasTypeInfo, out long objectId, out object value, out SerializationInfo info)\r
 236                 {\r
 237                         objectId = (long) reader.ReadUInt32 ();\r
 238 \r
 239                         TypeMetadata metadata = ReadTypeMetadata (reader, isRuntimeObject, hasTypeInfo);\r
 240                         ReadObjectContent (reader, metadata, objectId, out value, out info);\r
 241                 }\r
 242 \r
 243                 private void ReadRefTypeObjectInstance (BinaryReader reader, out long objectId, out object value, out SerializationInfo info)\r
 244                 {\r
 245                         objectId = (long) reader.ReadUInt32 ();\r
 246                         long refTypeObjectId = (long) reader.ReadUInt32 ();\r
 247 \r
 248                         // Gets the type of the referred object and its metadata\r
 249 \r
 250                         object refObj = _manager.GetObject (refTypeObjectId);\r
 251                         if (refObj == null) throw new SerializationException ("Invalid binary format");\r
 252                         TypeMetadata metadata = (TypeMetadata)_typeMetadataCache [refObj.GetType()];\r
 253 \r
 254                         ReadObjectContent (reader, metadata, objectId, out value, out info);\r
 255                 }\r
 256 \r
 257                 private void ReadObjectContent (BinaryReader reader, TypeMetadata metadata, long objectId, out object objectInstance, out SerializationInfo info)\r
 258                 {\r
 259 #if NET_1_1\r
 260                         if (_filterLevel == TypeFilterLevel.Low)\r
 261                                 objectInstance = FormatterServices.GetSafeUninitializedObject (metadata.Type);\r
 262                         else\r
 263 #endif\r
 264                                 objectInstance = FormatterServices.GetUninitializedObject (metadata.Type);\r
 265                                 \r
 266                         info = metadata.NeedsSerializationInfo ? new SerializationInfo(metadata.Type, new FormatterConverter()) : null;\r
 267 \r
 268                         if (metadata.MemberNames != null)\r
 269                                 for (int n=0; n<metadata.FieldCount; n++)\r
 270                                         ReadValue (reader, objectInstance, objectId, info, metadata.MemberTypes[n], metadata.MemberNames[n], null, null);\r
 271                         else\r
 272                                 for (int n=0; n<metadata.FieldCount; n++)\r
 273                                         ReadValue (reader, objectInstance, objectId, info, metadata.MemberTypes[n], metadata.MemberInfos[n].Name, metadata.MemberInfos[n], null);\r
 274                 }\r
 275 \r
 276                 private void RegisterObject (long objectId, object objectInstance, SerializationInfo info, long parentObjectId, MemberInfo parentObjectMemeber, int[] indices)\r
 277                 {\r
 278                         if (parentObjectId == 0) indices = null;\r
 279 \r
 280                         if (!objectInstance.GetType().IsValueType || parentObjectId == 0)\r
 281                                 _manager.RegisterObject (objectInstance, objectId, info, 0, null, null);\r
 282                         else\r
 283                         {\r
 284                                 if (indices != null) indices = (int[])indices.Clone();\r
 285                                 _manager.RegisterObject (objectInstance, objectId, info, parentObjectId, parentObjectMemeber, indices);\r
 286                         }\r
 287                 }\r
 288 \r
 289                 private void ReadStringIntance (BinaryReader reader, out long objectId, out object value)\r
 290                 {\r
 291                         objectId = (long) reader.ReadUInt32 ();\r
 292                         value = reader.ReadString ();\r
 293                 }\r
 294 \r
 295                 private void ReadGenericArray (BinaryReader reader, out long objectId, out object val)\r
 296                 {\r
 297                         objectId = (long) reader.ReadUInt32 ();\r
 298                         // Array structure\r
 299                         reader.ReadByte();\r
 300 \r
 301                         int rank = reader.ReadInt32();\r
 302 \r
 303                         bool emptyDim = false;\r
 304                         int[] lengths = new int[rank];\r
 305                         for (int n=0; n<rank; n++)\r
 306                         {\r
 307                                 lengths[n] = reader.ReadInt32();\r
 308                                 if (lengths[n] == 0) emptyDim = true;\r
 309                         }\r
 310 \r
 311                         TypeTag code = (TypeTag) reader.ReadByte ();\r
 312                         Type elementType = ReadType (reader, code);\r
 313 \r
 314                         Array array = Array.CreateInstance (elementType, lengths);\r
 315 \r
 316                         if (emptyDim) \r
 317                         { \r
 318                                 val = array;\r
 319                                 return;\r
 320                         }\r
 321 \r
 322                         int[] indices = new int[rank];\r
 323 \r
 324                         // Initialize indexes\r
 325                         for (int dim = rank-1; dim >= 0; dim--)\r
 326                                 indices[dim] = array.GetLowerBound (dim);\r
 327 \r
 328                         bool end = false;\r
 329                         while (!end)\r
 330                         {\r
 331                                 ReadValue (reader, array, objectId, null, elementType, null, null, indices);\r
 332 \r
 333                                 for (int dim = array.Rank-1; dim >= 0; dim--)\r
 334                                 {\r
 335                                         indices[dim]++;\r
 336                                         if (indices[dim] > array.GetUpperBound (dim))\r
 337                                         {\r
 338                                                 if (dim > 0) \r
 339                                                 {\r
 340                                                         indices[dim] = array.GetLowerBound (dim);\r
 341                                                         continue;       // Increment the next dimension's index\r
 342                                                 }\r
 343                                                 end = true;     // That was the last dimension. Finished.\r
 344                                         }\r
 345                                         break;\r
 346                                 }\r
 347                         }\r
 348                         val = array;\r
 349                 }\r
 350 \r
 351                 private object ReadBoxedPrimitiveTypeValue (BinaryReader reader)\r
 352                 {\r
 353                         Type type = ReadType (reader, TypeTag.PrimitiveType);\r
 354                         return ReadPrimitiveTypeValue (reader, type);\r
 355                 }\r
 356 \r
 357                 private void ReadArrayOfPrimitiveType (BinaryReader reader, out long objectId, out object val)\r
 358                 {\r
 359                         objectId = (long) reader.ReadUInt32 ();\r
 360                         int length = reader.ReadInt32 ();\r
 361                         Type elementType = ReadType (reader, TypeTag.PrimitiveType);\r
 362 \r
 363                         switch (Type.GetTypeCode (elementType))\r
 364                         {\r
 365                                 case TypeCode.Boolean: {\r
 366                                         bool[] arr = new bool [length];\r
 367                                         for (int n = 0; n < length; n++) arr [n] = reader.ReadBoolean();\r
 368                                         val = arr;\r
 369                                         break;\r
 370                                 }\r
 371 \r
 372                                 case TypeCode.Byte: {\r
 373                                         byte[] arr = new byte [length];\r
 374                                         int pos = 0;\r
 375                                         while (pos < length) {\r
 376                                                 int nr = reader.Read (arr, pos, length - pos);\r
 377                                                 if (nr == 0) break;\r
 378                                                 pos += nr;\r
 379                                         }\r
 380                                         val = arr;\r
 381                                         break;\r
 382                                 }\r
 383 \r
 384                                 case TypeCode.Char: {\r
 385                                         char[] arr = new char [length];\r
 386                                         int pos = 0;\r
 387                                         while (pos < length) {\r
 388                                                 int nr = reader.Read (arr, pos, length - pos);\r
 389                                                 if (nr == 0) break;\r
 390                                                 pos += nr;\r
 391                                         }\r
 392                                         val = arr;\r
 393                                         break;\r
 394                                 }\r
 395 \r
 396                                 case TypeCode.DateTime: {\r
 397                                         DateTime[] arr = new DateTime [length];\r
 398                                         for (int n = 0; n < length; n++) {\r
 399                                                 ulong nr = reader.ReadUInt64 ();\r
 400                                                 const ulong mask = (1ul << 62) - 1;\r
 401                                                 long ticks = (long) (nr & mask);\r
 402 #if NET_2_0\r
 403                                                 DateTimeKind kind = (DateTimeKind) (nr >> 62);\r
 404                                                 arr [n] = new DateTime (ticks, kind);\r
 405 #else\r
 406                                                 arr [n] = new DateTime (ticks);\r
 407 #endif\r
 408                                         }\r
 409                                         val = arr;\r
 410                                         break;\r
 411                                 }\r
 412 \r
 413                                 case TypeCode.Decimal: {\r
 414                                         Decimal[] arr = new Decimal [length];\r
 415                                         for (int n = 0; n < length; n++) arr [n] = reader.ReadDecimal();\r
 416                                         val = arr;\r
 417                                         break;\r
 418                                 }\r
 419 \r
 420                                 case TypeCode.Double: {\r
 421                                         Double[] arr = new Double [length];\r
 422                                         if (length > 2)\r
 423                                                 BlockRead (reader, arr, 8);\r
 424                                         else\r
 425                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadDouble();\r
 426                                         val = arr;\r
 427                                         break;\r
 428                                 }\r
 429 \r
 430                                 case TypeCode.Int16: {\r
 431                                         short[] arr = new short [length];\r
 432                                         if (length > 2)\r
 433                                                 BlockRead (reader, arr, 2);\r
 434                                         else\r
 435                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadInt16();\r
 436                                         val = arr;\r
 437                                         break;\r
 438                                 }\r
 439 \r
 440                                 case TypeCode.Int32: {\r
 441                                         int[] arr = new int [length];\r
 442                                         if (length > 2)\r
 443                                                 BlockRead (reader, arr, 4);\r
 444                                         else\r
 445                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadInt32();\r
 446                                         val = arr;\r
 447                                         break;\r
 448                                 }\r
 449 \r
 450                                 case TypeCode.Int64: {\r
 451                                         long[] arr = new long [length];\r
 452                                         if (length > 2)\r
 453                                                 BlockRead (reader, arr, 8);\r
 454                                         else\r
 455                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadInt64();\r
 456                                         val = arr;\r
 457                                         break;\r
 458                                 }\r
 459 \r
 460                                 case TypeCode.SByte: {\r
 461                                         sbyte[] arr = new sbyte [length];\r
 462                                         if (length > 2)\r
 463                                                 BlockRead (reader, arr, 1);\r
 464                                         else\r
 465                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadSByte();\r
 466                                         val = arr;\r
 467                                         break;\r
 468                                 }\r
 469 \r
 470                                 case TypeCode.Single: {\r
 471                                         float[] arr = new float [length];\r
 472                                         if (length > 2)\r
 473                                                 BlockRead (reader, arr, 4);\r
 474                                         else\r
 475                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadSingle();\r
 476                                         val = arr;\r
 477                                         break;\r
 478                                 }\r
 479 \r
 480                                 case TypeCode.UInt16: {\r
 481                                         ushort[] arr = new ushort [length];\r
 482                                         if (length > 2)\r
 483                                                 BlockRead (reader, arr, 2);\r
 484                                         else\r
 485                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadUInt16();\r
 486                                         val = arr;\r
 487                                         break;\r
 488                                 }\r
 489 \r
 490                                 case TypeCode.UInt32: {\r
 491                                         uint[] arr = new uint [length];\r
 492                                         if (length > 2)\r
 493                                                 BlockRead (reader, arr, 4);\r
 494                                         else\r
 495                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadUInt32();\r
 496                                         val = arr;\r
 497                                         break;\r
 498                                 }\r
 499 \r
 500                                 case TypeCode.UInt64: {\r
 501                                         ulong[] arr = new ulong [length];\r
 502                                         if (length > 2)\r
 503                                                 BlockRead (reader, arr, 8);\r
 504                                         else\r
 505                                                 for (int n = 0; n < length; n++) arr [n] = reader.ReadUInt64();\r
 506                                         val = arr;\r
 507                                         break;\r
 508                                 }\r
 509 \r
 510                                 case TypeCode.String: {\r
 511                                         string[] arr = new string [length];\r
 512                                         for (int n = 0; n < length; n++) arr [n] = reader.ReadString();\r
 513                                         val = arr;\r
 514                                         break;\r
 515                                 }\r
 516 \r
 517                                 default: {\r
 518                                         if (elementType == typeof(TimeSpan)) {\r
 519                                                 TimeSpan[] arr = new TimeSpan [length];\r
 520                                                 for (int n = 0; n < length; n++) arr [n] = new TimeSpan (reader.ReadInt64 ());\r
 521                                                 val = arr;\r
 522                                         }\r
 523                                         else\r
 524                                                 throw new NotSupportedException ("Unsupported primitive type: " + elementType.FullName);\r
 525                                         break;\r
 526                                 }\r
 527                         }                       \r
 528                 }\r
 529 \r
 530                 private void BlockRead (BinaryReader reader, Array array, int dataSize)\r
 531                 {\r
 532                         int totalSize = Buffer.ByteLength (array);\r
 533                         \r
 534                         if (arrayBuffer == null || (totalSize > arrayBuffer.Length && arrayBuffer.Length != ArrayBufferLength))\r
 535                                 arrayBuffer = new byte [totalSize <= ArrayBufferLength ? totalSize : ArrayBufferLength];\r
 536                         \r
 537                         int pos = 0;\r
 538                         while (totalSize > 0) {\r
 539                                 int size = totalSize < arrayBuffer.Length ? totalSize : arrayBuffer.Length;\r
 540                                 int ap = 0;\r
 541                                 do {\r
 542                                         int nr = reader.Read (arrayBuffer, ap, size - ap);\r
 543                                         if (nr == 0) break;\r
 544                                         ap += nr;\r
 545                                 } while (ap < size);\r
 546                                 \r
 547                                 if (!BitConverter.IsLittleEndian && dataSize > 1)\r
 548                                         BinaryCommon.SwapBytes (arrayBuffer, size, dataSize);\r
 549 \r
 550                                 Buffer.BlockCopy (arrayBuffer, 0, array, pos, size);\r
 551                                 totalSize -= size;\r
 552                                 pos += size;\r
 553                         }\r
 554                 }\r
 555                 \r
 556 \r
 557                 private void ReadArrayOfObject (BinaryReader reader, out long objectId, out object array)\r
 558                 {\r
 559                         ReadSimpleArray (reader, typeof (object), out objectId, out array);\r
 560                 }\r
 561                 \r
 562                 private void ReadArrayOfString (BinaryReader reader, out long objectId, out object array)\r
 563                 {\r
 564                         ReadSimpleArray (reader, typeof (string), out objectId, out array);\r
 565                 }\r
 566 \r
 567                 private void ReadSimpleArray (BinaryReader reader, Type elementType, out long objectId, out object val)\r
 568                 {\r
 569                         objectId = (long) reader.ReadUInt32 ();\r
 570                         int length = reader.ReadInt32 ();\r
 571                         int[] indices = new int[1];\r
 572 \r
 573                         Array array = Array.CreateInstance (elementType, length);\r
 574                         for (int n = 0; n < length; n++)\r
 575                         {\r
 576                                 indices[0] = n;\r
 577                                 ReadValue (reader, array, objectId, null, elementType, null, null, indices);\r
 578                                 n = indices[0];\r
 579                         }\r
 580                         val = array;\r
 581                 }\r
 582 \r
 583                 private TypeMetadata ReadTypeMetadata (BinaryReader reader, bool isRuntimeObject, bool hasTypeInfo)\r
 584                 {\r
 585                         TypeMetadata metadata = new TypeMetadata();\r
 586 \r
 587                         string className = reader.ReadString ();\r
 588                         int fieldCount = reader.ReadInt32 ();\r
 589 \r
 590                         Type[] types = new Type[fieldCount];\r
 591                         string[] names = new string[fieldCount];\r
 592 \r
 593                         for (int n=0; n<fieldCount; n++)\r
 594                                 names [n] = reader.ReadString ();\r
 595 \r
 596                         if (hasTypeInfo)\r
 597                         {\r
 598                                 TypeTag[] codes = new TypeTag[fieldCount];\r
 599 \r
 600                                 for (int n=0; n<fieldCount; n++)\r
 601                                         codes [n] = (TypeTag) reader.ReadByte ();\r
 602         \r
 603                                 for (int n=0; n<fieldCount; n++)\r
 604                                         types [n] = ReadType (reader, codes[n]);\r
 605                         }\r
 606                         \r
 607                         // Gets the type\r
 608 \r
 609                         if (!isRuntimeObject) \r
 610                         {\r
 611                                 long assemblyId = (long)reader.ReadUInt32();\r
 612                                 metadata.Type = GetDeserializationType (assemblyId, className);\r
 613                         }\r
 614                         else\r
 615                                 metadata.Type = Type.GetType (className, true);\r
 616 \r
 617                         metadata.MemberTypes = types;\r
 618                         metadata.MemberNames = names;\r
 619                         metadata.FieldCount = names.Length;\r
 620 \r
 621                         // Now check if this objects needs a SerializationInfo struct for deserialziation.\r
 622                         // SerializationInfo is needed if the object has to be deserialized using\r
 623                         // a serialization surrogate, or if it implements ISerializable.\r
 624 \r
 625                         if (_surrogateSelector != null)\r
 626                         {\r
 627                                 // check if the surrogate selector handles objects of the given type. \r
 628                                 ISurrogateSelector selector;\r
 629                                 ISerializationSurrogate surrogate = _surrogateSelector.GetSurrogate (metadata.Type, _context, out selector);\r
 630                                 metadata.NeedsSerializationInfo = (surrogate != null);\r
 631                         }\r
 632 \r
 633                         if (!metadata.NeedsSerializationInfo)\r
 634                         {\r
 635                                 // Check if the object is marked with the Serializable attribute\r
 636 \r
 637                                 if (!metadata.Type.IsSerializable)\r
 638                                         throw new SerializationException("Serializable objects must be marked with the Serializable attribute");\r
 639 \r
 640                                 metadata.NeedsSerializationInfo = (metadata.Type.GetInterface ("ISerializable") != null);\r
 641                                 if (!metadata.NeedsSerializationInfo)\r
 642                                 {\r
 643                                         metadata.MemberInfos = new MemberInfo [fieldCount];\r
 644                                         for (int n=0; n<fieldCount; n++)\r
 645                                         {\r
 646                                                 FieldInfo field = null;\r
 647                                                 string memberName = names[n];\r
 648                                                 \r
 649                                                 int i = memberName.IndexOf ('+');\r
 650                                                 if (i != -1) {\r
 651                                                         string baseTypeName = names[n].Substring (0,i);\r
 652                                                         memberName = names[n].Substring (i+1);\r
 653                                                         Type t = metadata.Type.BaseType;\r
 654                                                         while (t != null) {\r
 655                                                                 if (t.Name == baseTypeName) {\r
 656                                                                         field = t.GetField (memberName, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);\r
 657                                                                         break;\r
 658                                                                 }\r
 659                                                                 else\r
 660                                                                         t = t.BaseType;\r
 661                                                         }\r
 662                                                 }\r
 663                                                 else\r
 664                                                         field = metadata.Type.GetField (memberName, BindingFlags.Instance | BindingFlags.Public | BindingFlags.NonPublic);\r
 665                                                         \r
 666                                                 if (field == null) throw new SerializationException ("Field \"" + names[n] + "\" not found in class " + metadata.Type.FullName);\r
 667                                                 metadata.MemberInfos [n] = field;\r
 668                                                 \r
 669                                                 if (!hasTypeInfo) {\r
 670                                                         types [n] = field.FieldType;\r
 671                                                 }\r
 672                                         }\r
 673                                         metadata.MemberNames = null;    // Info now in MemberInfos\r
 674                                 }\r
 675                         }\r
 676 \r
 677                         // Registers the type's metadata so it can be reused later if\r
 678                         // a RefTypeObject element is found\r
 679 \r
 680                         if (!_typeMetadataCache.ContainsKey (metadata.Type))\r
 681                                 _typeMetadataCache [metadata.Type] = metadata;\r
 682 \r
 683                         return metadata;\r
 684                 }\r
 685 \r
 686 \r
 687                 private void ReadValue (BinaryReader reader, object parentObject, long parentObjectId, SerializationInfo info, Type valueType, string fieldName, MemberInfo memberInfo, int[] indices)\r
 688                 {\r
 689                         // Reads a value from the stream and assigns it to the member of an object\r
 690 \r
 691                         object val;\r
 692 \r
 693                         if (BinaryCommon.IsPrimitive (valueType))\r
 694                         {\r
 695                                 val = ReadPrimitiveTypeValue (reader, valueType);\r
 696                                 SetObjectValue (parentObject, fieldName, memberInfo, info, val, valueType, indices);\r
 697                                 return;\r
 698                         }\r
 699 \r
 700                         // Gets the object\r
 701 \r
 702                         BinaryElement element = (BinaryElement)reader.ReadByte ();\r
 703 \r
 704                         if (element == BinaryElement.ObjectReference)\r
 705                         {\r
 706                                 // Just read the id of the referred object and record a fixup\r
 707                                 long childObjectId = (long) reader.ReadUInt32();\r
 708                                 RecordFixup (parentObjectId, childObjectId, parentObject, info, fieldName, memberInfo, indices);\r
 709                                 return;\r
 710                         }\r
 711 \r
 712                         long objectId;\r
 713                         SerializationInfo objectInfo;\r
 714 \r
 715                         ReadObject (element, reader, out objectId, out val, out objectInfo);\r
 716 \r
 717                         // There are two cases where the object cannot be assigned to the parent\r
 718                         // and a fixup must be used:\r
 719                         //  1) When what has been read is not an object, but an id of an object that\r
 720                         //     has not been read yet (an object reference). This is managed in the\r
 721                         //     previous block of code.\r
 722                         //  2) When the read object is a value type object. Value type fields hold\r
 723                         //     copies of objects, not references. Thus, if the value object that\r
 724                         //     has been read has pending fixups, those fixups would be made to the\r
 725                         //     boxed copy in the ObjectManager, and not in the required object instance\r
 726 \r
 727                         // First of all register the fixup, and then the object. ObjectManager is more\r
 728                         // efficient if done in this order\r
 729 \r
 730                         bool hasFixup = false;\r
 731                         if (objectId != 0)\r
 732                         {\r
 733                                 if (val.GetType().IsValueType)\r
 734                                 {\r
 735                                         RecordFixup (parentObjectId, objectId, parentObject, info, fieldName, memberInfo, indices);\r
 736                                         hasFixup = true;\r
 737                                 }\r
 738 \r
 739                                 // Register the value\r
 740 \r
 741                                 if (info == null && !(parentObject is Array))\r
 742                                         RegisterObject (objectId, val, objectInfo, parentObjectId, memberInfo, null);\r
 743                                 else\r
 744                                         RegisterObject (objectId, val, objectInfo, parentObjectId, null, indices);\r
 745                         }\r
 746                         // Assign the value to the parent object, unless there is a fixup\r
 747                         \r
 748                         if (!hasFixup) \r
 749                                 SetObjectValue (parentObject, fieldName, memberInfo, info, val, valueType, indices);\r
 750                 }\r
 751 \r
 752                 private void SetObjectValue (object parentObject, string fieldName, MemberInfo memberInfo, SerializationInfo info, object value, Type valueType, int[] indices)\r
 753                 {\r
 754                         if (value is IObjectReference)\r
 755                                 value = ((IObjectReference)value).GetRealObject (_context);\r
 756 \r
 757                         if (parentObject is Array) \r
 758                         {\r
 759                                 if (value is ArrayNullFiller) \r
 760                                 {\r
 761                                         // It must be a single dimension array of objects.\r
 762                                         // Just increase the index. Elements are null by default.\r
 763                                         int count = ((ArrayNullFiller)value).NullCount;\r
 764                                         indices[0] += count - 1;\r
 765                                 }\r
 766                                 else\r
 767                                         ((Array)parentObject).SetValue (value, indices);\r
 768                         }\r
 769                         else if (info != null) {\r
 770                                 info.AddValue (fieldName, value, valueType);\r
 771                         }\r
 772                         else {\r
 773                                 if (memberInfo is FieldInfo)\r
 774                                         ((FieldInfo)memberInfo).SetValue (parentObject, value);\r
 775                                 else\r
 776                                         ((PropertyInfo)memberInfo).SetValue (parentObject, value, null);\r
 777                         }\r
 778                 }\r
 779 \r
 780                 private void RecordFixup (long parentObjectId, long childObjectId, object parentObject, SerializationInfo info, string fieldName, MemberInfo memberInfo, int[] indices)\r
 781                 {\r
 782                         if (info != null) {\r
 783                                 _manager.RecordDelayedFixup (parentObjectId, fieldName, childObjectId);\r
 784                         }\r
 785                         else if (parentObject is Array) {\r
 786                                 if (indices.Length == 1)\r
 787                                         _manager.RecordArrayElementFixup (parentObjectId, indices[0], childObjectId);\r
 788                                 else\r
 789                                         _manager.RecordArrayElementFixup (parentObjectId, (int[])indices.Clone(), childObjectId);\r
 790                         }\r
 791                         else {\r
 792                                 _manager.RecordFixup (parentObjectId, memberInfo, childObjectId);\r
 793                         }\r
 794                 }\r
 795 \r
 796                 private Type GetDeserializationType (long assemblyId, string className)\r
 797                 {\r
 798                         Type t;\r
 799                         string assemblyName = (string)_registeredAssemblies[assemblyId];\r
 800 \r
 801                         if (_binder != null) {\r
 802                                 t = _binder.BindToType (assemblyName, className);\r
 803                                 if (t != null)\r
 804                                         return t;\r
 805                         }\r
 806                                 \r
 807                         Assembly assembly = Assembly.Load (assemblyName);\r
 808                         t = assembly.GetType (className, true);\r
 809                         if (t != null)\r
 810                                 return t;\r
 811                         throw new SerializationException ("Couldn't find type '" + className + "'.");\r
 812                 }\r
 813 \r
 814                 public Type ReadType (BinaryReader reader, TypeTag code)\r
 815                 {\r
 816                         switch (code)\r
 817                         {\r
 818                                 case TypeTag.PrimitiveType:\r
 819                                         return BinaryCommon.GetTypeFromCode (reader.ReadByte());\r
 820 \r
 821                                 case TypeTag.String:\r
 822                                         return typeof(string);\r
 823 \r
 824                                 case TypeTag.ObjectType:\r
 825                                         return typeof(object);\r
 826 \r
 827                                 case TypeTag.RuntimeType:\r
 828                                 {\r
 829                                         string name = reader.ReadString ();\r
 830                                         return Type.GetType (name, true);\r
 831                                 }\r
 832 \r
 833                                 case TypeTag.GenericType:\r
 834                                 {\r
 835                                         string name = reader.ReadString ();\r
 836                                         long asmid = (long) reader.ReadUInt32();\r
 837                                         return GetDeserializationType (asmid, name);\r
 838                                 }\r
 839 \r
 840                                 case TypeTag.ArrayOfObject:\r
 841                                         return typeof(object[]);\r
 842 \r
 843                                 case TypeTag.ArrayOfString:\r
 844                                         return typeof(string[]);\r
 845 \r
 846                                 case TypeTag.ArrayOfPrimitiveType:\r
 847                                         Type elementType = BinaryCommon.GetTypeFromCode (reader.ReadByte());\r
 848                                         return Type.GetType(elementType.FullName + "[]");\r
 849 \r
 850                                 default:\r
 851                                         throw new NotSupportedException ("Unknow type tag");\r
 852                         }\r
 853                 }\r
 854                 \r
 855                 public static object ReadPrimitiveTypeValue (BinaryReader reader, Type type)\r
 856                 {\r
 857                         if (type == null) return null;\r
 858 \r
 859                         switch (Type.GetTypeCode (type))\r
 860                         {\r
 861                                 case TypeCode.Boolean:\r
 862                                         return reader.ReadBoolean();\r
 863 \r
 864                                 case TypeCode.Byte:\r
 865                                         return reader.ReadByte();\r
 866 \r
 867                                 case TypeCode.Char:\r
 868                                         return reader.ReadChar();\r
 869 \r
 870                                 case TypeCode.DateTime: \r
 871                                         return new DateTime (reader.ReadInt64());\r
 872 \r
 873                                 case TypeCode.Decimal:\r
 874                                         return Decimal.Parse (reader.ReadString(), CultureInfo.InvariantCulture);\r
 875 \r
 876                                 case TypeCode.Double:\r
 877                                         return reader.ReadDouble();\r
 878 \r
 879                                 case TypeCode.Int16:\r
 880                                         return reader.ReadInt16();\r
 881 \r
 882                                 case TypeCode.Int32:\r
 883                                         return reader.ReadInt32();\r
 884 \r
 885                                 case TypeCode.Int64:\r
 886                                         return reader.ReadInt64();\r
 887 \r
 888                                 case TypeCode.SByte:\r
 889                                         return reader.ReadSByte();\r
 890 \r
 891                                 case TypeCode.Single:\r
 892                                         return reader.ReadSingle();\r
 893 \r
 894                                 case TypeCode.UInt16:\r
 895                                         return reader.ReadUInt16();\r
 896 \r
 897                                 case TypeCode.UInt32:\r
 898                                         return reader.ReadUInt32();\r
 899 \r
 900                                 case TypeCode.UInt64:\r
 901                                         return reader.ReadUInt64();\r
 902 \r
 903                                 case TypeCode.String:\r
 904                                         return reader.ReadString();\r
 905 \r
 906                                 default:\r
 907                                         if (type == typeof(TimeSpan))\r
 908                                                 return new TimeSpan (reader.ReadInt64 ());\r
 909                                         else\r
 910                                                 throw new NotSupportedException ("Unsupported primitive type: " + type.FullName);\r
 911                         }\r
 912                 }\r
 913         }\r
 914 }\r