Implement a heap profiler for the Dart managed heap.

runtime/vm/raw_object.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/raw_object.h"
 
 #include "vm/class_table.h"
 #include "vm/freelist.h"
 #include "vm/isolate.h"
 #include "vm/object.h"
@@ skipping 226 matching lines @@
     }
   }
   ASSERT(instance_size != 0);
   uword tags = ptr()->tags_;
   ASSERT((instance_size == SizeTag::decode(tags)) ||
          (SizeTag::decode(tags) == 0));
   return instance_size;
 }
 
 
+ObjectKind RawObject::GetObjectKind() const {
+  intptr_t class_id = GetClassId();
+  ObjectKind kind;
+  if (class_id < kNumPredefinedKinds) {
+    kind = static_cast<ObjectKind>(class_id);
+  } else {
+    RawClass* raw_class = Isolate::Current()->class_table()->At(class_id);
+    kind = raw_class->ptr()->instance_kind_;
+  }
+  return kind;
+}
+
+
 intptr_t RawObject::VisitPointers(ObjectPointerVisitor* visitor) {
   intptr_t size = 0;
   NoHandleScope no_handles(visitor->isolate());
 
   // Only reasonable to be called on heap objects.
   ASSERT(IsHeapObject());
 
   // Read the necessary data out of the class before visting the class itself.
   intptr_t class_id = GetClassId();
   ObjectKind kind;
@@ skipping 670 matching lines @@
 intptr_t RawJSRegExp::VisitJSRegExpPointers(RawJSRegExp* raw_obj,
                                             ObjectPointerVisitor* visitor) {
   // Make sure that we got here with the tagged pointer as this.
   ASSERT(raw_obj->IsHeapObject());
   intptr_t length = Smi::Value(raw_obj->ptr()->data_length_);
   visitor->VisitPointers(raw_obj->from(), raw_obj->to());
   return JSRegExp::InstanceSize(length);
 }
 
 }  // namespace dart