Track live instance and allocation counts for classes

runtime/vm/stub_code_mips.cc

 // Copyright (c) 2013, 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/globals.h"
 #if defined(TARGET_ARCH_MIPS)
 
 #include "vm/assembler.h"
 #include "vm/code_generator.h"
 #include "vm/compiler.h"
@@ skipping 695 matching lines @@
     __ lw(CMPRES1, Address(T0, Scavenger::end_offset()));
     __ BranchUnsignedGreaterEqual(T2, CMPRES1, &slow_case);
 
     // Successfully allocated the object(s), now update top to point to
     // next object start and initialize the object.
     // V0: potential new object start.
     // T2: potential next object start.
     // T0: Points to new space object.
     __ sw(T2, Address(T0, Scavenger::top_offset()));
     __ addiu(V0, V0, Immediate(kHeapObjectTag));
+    // T1: Size of allocation in bytes.
+    __ subu(T1, T2, V0);
+    __ UpdateAllocationStatsWithSize(kArrayCid, T1, T5);
 
     // V0: new object start as a tagged pointer.
     // A0: array element type.
     // A1: Array length as Smi.
     // T2: new object end address.
 
     // Store the type argument field.
     __ StoreIntoObjectNoBarrier(
         V0,
         FieldAddress(V0, Array::type_arguments_offset()),
@@ skipping 382 matching lines @@
     }
 
     // Successfully allocated the object, now update top to point to
     // next object start and initialize the object.
     // V0: new object.
     // T1: number of context variables.
     // T2: object size.
     // T3: next object start.
     __ sw(T3, Address(T5, 0));
     __ addiu(V0, V0, Immediate(kHeapObjectTag));
+    __ UpdateAllocationStatsWithSize(context_class.id(), T2, T5);
 
     // Calculate the size tag.
     // V0: new object.
     // T1: number of context variables.
     // T2: object size.
     const intptr_t shift = RawObject::kSizeTagBit - kObjectAlignmentLog2;
     __ LoadImmediate(TMP, RawObject::SizeTag::kMaxSizeTag);
     __ sltu(CMPRES1, TMP, T2);  // CMPRES1 = T2 > TMP ? 1 : 0.
     __ movn(T2, ZR, CMPRES1);  // T2 = CMPRES1 != 0 ? 0 : T2.
     __ sll(TMP, T2, shift);  // TMP = T2 << shift.
@@ skipping 262 matching lines @@
       __ addiu(T4, T4, Immediate(kWordSize));
       __ bne(T4, T3, &loop);
       __ delay_slot()->sw(T7, Address(T4, -kWordSize));
       __ Bind(&loop_exit);
     }
     if (is_cls_parameterized) {
       // R1: new object type arguments.
       // Set the type arguments in the new object.
       __ sw(T1, Address(T2, cls.type_arguments_field_offset()));
     }
+    __ UpdateAllocationStats(cls.id(), T5);
     // Done allocating and initializing the instance.
     // T2: new object still missing its heap tag.
     __ Ret();
     __ delay_slot()->addiu(V0, T2, Immediate(kHeapObjectTag));
 
     __ Bind(&slow_case);
   }
   if (is_cls_parameterized) {
     __ lw(T1, Address(SP, 1 * kWordSize));
     __ lw(T0, Address(SP, 0 * kWordSize));
@@ skipping 69 matching lines @@
     __ lw(CMPRES1, Address(TMP));
     if (FLAG_use_slow_path) {
       __ b(&slow_case);
     } else {
       __ BranchUnsignedGreaterEqual(T3, CMPRES1, &slow_case);
     }
 
     // Successfully allocated the object, now update top to point to
     // next object start and initialize the object.
     __ sw(T3, Address(T5));
+    if (is_implicit_instance_closure) {
+      // This closure allocates a context, update allocation stats.
+      // T3: context size.
+      __ LoadImmediate(T3, context_size);
+      // T5: Clobbered.
+     __ UpdateAllocationStatsWithSize(kContextCid, T3, T5);
+    }
+    // The closure allocation is attributed to the signature class.
+    // T5: Will be clobbered.
+    __ UpdateAllocationStats(cls.id(), T5);
 
     // T2: new closure object.
     // T4: new context object (only if is_implicit_closure).
     // Set the tags.
     uword tags = 0;
     tags = RawObject::SizeTag::update(closure_size, tags);
     tags = RawObject::ClassIdTag::update(cls.id(), tags);
     __ LoadImmediate(T0, tags);
     __ sw(T0, Address(T2, Instance::tags_offset()));
 
@@ skipping 898 matching lines @@
   const Register right = T0;
   __ lw(left, Address(SP, 1 * kWordSize));
   __ lw(right, Address(SP, 0 * kWordSize));
   GenerateIdenticalWithNumberCheckStub(assembler, left, right, temp1, temp2);
   __ Ret();
 }
 
 }  // namespace dart
 
 #endif  // defined TARGET_ARCH_MIPS