Added API Dart_PostCMessage for posting a Dart_CMessage structure

runtime/vm/snapshot.cc

 // Copyright (c) 2012, the Dart project authors.  Please see the AUTHORS file
 // for details. All rights reserved. Use of this source code is governed by a
 // BSD-style license that can be found in the LICENSE file.
 
 #include "vm/snapshot.h"
 
 #include "platform/assert.h"
 #include "vm/bootstrap.h"
 #include "vm/exceptions.h"
 #include "vm/heap.h"
@@ skipping 437 matching lines @@
   // updated.
   memset(&type_arguments_marker, 0, sizeof(type_arguments_marker));
   memset(&dynamic_type_marker, 0, sizeof(dynamic_type_marker));
   type_arguments_marker.type =
       static_cast<Dart_CObject::Type>(Dart_CObject_Internal::kTypeArguments);
   dynamic_type_marker.type =
       static_cast<Dart_CObject::Type>(Dart_CObject_Internal::kDynamicType);
 }
 
 
-Dart_CMessage* CMessageReader::ReadMessage() {
+Dart_CObject* CMessageReader::ReadMessage() {
   // Read the object out of the message.
-  Dart_CObject* object = ReadObject();
-
-  Dart_CMessage* message =
-      reinterpret_cast<Dart_CMessage*>(alloc_(NULL, 0, sizeof(Dart_CMessage)));
-  if (message == NULL) return NULL;
-  message->root = object;
-  return message;
+  return ReadObject();
 }
 
 intptr_t CMessageReader::LookupInternalClass(intptr_t class_header) {
   SerializedHeaderType header_type = SerializedHeaderTag::decode(class_header);
   ASSERT(header_type == kObjectId);
   intptr_t header_value = SerializedHeaderData::decode(class_header);
   return header_value;
 }
 
 
@@ skipping 217 matching lines @@
 
   // Write out the individual Smis.
   for (int i = 0; i < field_count; i++) {
     Write<RawObject*>(Integer::New(data[i]));
   }
 
   FinalizeBuffer();
 }
 
 
+void MessageWriter::MarkCObject(Dart_CObject* object, intptr_t object_id) {
+  // Mark the object as serialized by adding the object id to the
+  // upper bits of the type field in the Dart_CObject structure. Add
+  // an offset for making marking of object id 0 possible.
+  ASSERT(!IsCObjectMarked(object));
+  intptr_t mark_value = object_id + kDartCObjectMarkOffset;
+  object->type = static_cast<Dart_CObject::Type>(
+      ((mark_value) << kDartCObjectTypeBits) | object->type);
+}
+
+
+void MessageWriter::UnmarkCObject(Dart_CObject* object) {
+  ASSERT(IsCObjectMarked(object));
+  object->type = static_cast<Dart_CObject::Type>(
+      object->type & kDartCObjectTypeMask);
+}
+
+
+bool MessageWriter::IsCObjectMarked(Dart_CObject* object) {
+  return (object->type & kDartCObjectMarkMask) != 0;
+}
+
+
+intptr_t MessageWriter::GetMarkedCObjectMark(Dart_CObject* object) {
+  ASSERT(IsCObjectMarked(object));
+  intptr_t mark_value = ((object->type & kDartCObjectMarkMask) >> 3);
+  // An offset was added to object id for making marking object id 0 possible.
+  return mark_value - kDartCObjectMarkOffset;
+}
+
+
+void MessageWriter::UnmarkAllCObjects(Dart_CObject* object) {
+  if (!IsCObjectMarked(object)) return;
+  UnmarkCObject(object);
+  if (object->type == Dart_CObject::kArray) {
+    for (int i = 0; i < object->value.as_array.length; i++) {
+      Dart_CObject* element = object->value.as_array.values[i];
+      UnmarkAllCObjects(element);
+    }
+  }
+}
+
+
+void MessageWriter::WriteSmi(int32_t value) {
+  Write<RawObject*>(Smi::New(value));
+}
+
+
+void MessageWriter::WriteInlinedHeader(Dart_CObject* object) {
+  // Write out the serialization header value for this object.
+  WriteSerializationMarker(kInlined, kMaxPredefinedObjectIds + object_id_);
+  // Mark object with its object id.
+  MarkCObject(object, object_id_);
+  // Advance object id.
+  object_id_++;
+}
+
+
+void MessageWriter::WriteCObject(Dart_CObject* object) {
+  if (IsCObjectMarked(object)) {
+    intptr_t object_id = GetMarkedCObjectMark(object);
+    WriteIndexedObject(kMaxPredefinedObjectIds + object_id);
+    return;
+  }
+
+  switch (object->type) {
+    case Dart_CObject::kNull:
+      WriteIndexedObject(Object::kNullObject);
+      break;
+    case Dart_CObject::kBool:
+      if (object->value.as_bool) {
+        WriteIndexedObject(ObjectStore::kTrueValue);
+      } else {
+        WriteIndexedObject(ObjectStore::kFalseValue);
+      }
+      break;
+    case Dart_CObject::kInt32: {
+      WriteSmi(object->value.as_int32);
+      break;
+    }
+    case Dart_CObject::kDouble:
+      // Write out the serialization header value for this object.
+      WriteInlinedHeader(object);
+      // Write out the class and tags information.
+      WriteObjectHeader(ObjectStore::kDoubleClass, 0);
+      // Write double value.
+      Write<double>(object->value.as_double);
+      break;
+    case Dart_CObject::kString: {
+      // Write out the serialization header value for this object.
+      WriteInlinedHeader(object);
+      // Write out the class and tags information.
+      WriteObjectHeader(ObjectStore::kOneByteStringClass, 0);
+      // Write string length, hash and content
+      char* str = object->value.as_string;
+      intptr_t len = strlen(str);
+      WriteSmi(len);
+      WriteSmi(0);  // TODO(sgjesse): Hash - not written.
+      for (intptr_t i = 0; i < len; i++) {
+        Write<uint8_t>(str[i]);
+      }
+      break;
+    }
+    case Dart_CObject::kArray: {
+      // Write out the serialization header value for this object.
+      WriteInlinedHeader(object);
+      // Write out the class and tags information.
+      WriteObjectHeader(ObjectStore::kArrayClass, 0);
+      WriteSmi(object->value.as_array.length);
+      // Write out the type arguments.
+      WriteIndexedObject(Object::kNullObject);
+      // Write out array elements.
+      for (int i = 0; i < object->value.as_array.length; i++) {
+        WriteCObject(object->value.as_array.values[i]);
+      }
+      break;
+    }
+    default:
+      UNREACHABLE();
+  }
+}
+
+
+void MessageWriter::WriteCMessage(Dart_CObject* object) {
+  WriteCObject(object);
+  UnmarkAllCObjects(object);
+  FinalizeBuffer();
+}
+
+
 void SnapshotWriter::WriteObject(RawObject* rawobj) {
   // An object is written in one of the following ways:
   // - Smi: the Smi value is written as is (last bit is not tagged).
   // - VM internal class (from VM isolate): (index of class in vm isolate | 0x3)
   // - Object that has already been written: (negative id in stream | 0x3)
   // - Object that is seen for the first time (inlined as follows):
   //    (object size in multiples of kObjectAlignment | 0x1)
   //    serialized fields of the object
   //    ......
 
@@ skipping 190 matching lines @@
 
 
 void SnapshotWriterVisitor::VisitPointers(RawObject** first, RawObject** last) {
   for (RawObject** current = first; current <= last; current++) {
     RawObject* raw_obj = *current;
     writer_->WriteObject(raw_obj);
   }
 }
 
 }  // namespace dart