Profile dynamic calls.

tool/input_sdk/private/ddc_runtime/operations.dart

 // Copyright (c) 2015, 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.
 
 /// This library defines runtime operations on objects used by the code
 /// generator.
 part of dart._runtime;
 
 _canonicalFieldName(obj, name, args, displayName) => JS('', '''(() => {
   $name = $canonicalMember($obj, $name);
   if ($name) return $name;
   // TODO(jmesserly): in the future we might have types that "overlay" Dart
   // methods while also exposing the full native API, e.g. dart:html vs
   // dart:dom. To support that we'd need to fall back to the normal name
   // if an extension method wasn't found.
   $throwNoSuchMethodFunc($obj, $displayName, $args);
 })()''');
 
 dload(obj, field) => JS('', '''(() => {
   $field = $_canonicalFieldName($obj, $field, [], $field);
+  $_trackCall(obj, $field);
   if ($hasMethod($obj, $field)) {
     return $bind($obj, $field);
   }
   // TODO(vsm): Implement NSM robustly.  An 'in' check breaks on certain
   // types.  hasOwnProperty doesn't chase the proto chain.
   // Also, do we want an NSM on regular JS objects?
   // See: https://github.com/dart-lang/dev_compiler/issues/169
   let result = $obj[$field];
   return result;
 })()''');
 
 dput(obj, field, value) => JS('', '''(() => {
   $field = $_canonicalFieldName($obj, $field, [$value], $field);
+  $_trackCall(obj, $field);
+
   // TODO(vsm): Implement NSM and type checks.
   // See: https://github.com/dart-lang/dev_compiler/issues/170
   $obj[$field] = $value;
   return $value;
 })()''');
 
 /// Check that a function of a given type can be applied to
 /// actuals.
 _checkApply(type, actuals) => JS('', '''(() => {
   if ($actuals.length < $type.args.length) return false;
@@ skipping 37 matching lines @@
 throwNoSuchMethod(obj, name, pArgs, nArgs, extras) => JS('', '''(() => {
   $throw_(new $NoSuchMethodError($obj, $_dartSymbol($name), $pArgs, $nArgs, $extras));
 })()''');
 
 throwNoSuchMethodFunc(obj, name, pArgs, opt_func) => JS('', '''(() => {
   if ($obj === void 0) $obj = $opt_func;
   $throwNoSuchMethod($obj, $name, $pArgs);
 })()''');
 
 _checkAndCall(f, ftype, obj, typeArgs, args, name) => JS('', '''(() => {
+  $_trackCall(obj, name);
+
   let originalFunction = $f;
   if (!($f instanceof Function)) {
     // We're not a function (and hence not a method either)
     // Grab the `call` method if it's not a function.
     if ($f != null) {
       $ftype = $getMethodType($f, 'call');
       $f = $f.call;
     }
     if (!($f instanceof Function)) {
       $throwNoSuchMethodFunc($obj, $name, $args, originalFunction);
@@ skipping 49 matching lines @@
   $throwNoSuchMethodFunc($obj, $name, $args, originalFunction);
 })()''');
 
 dcall(f, @rest args) => _checkAndCall(
     f, _getRuntimeType(f), JS('', 'void 0'), null, args, 'call');
 
 
 dgcall(f, typeArgs, @rest args) => _checkAndCall(
     f, _getRuntimeType(f), JS('', 'void 0'), typeArgs, args, 'call');
 
+Map<String, int> _callMethodStats = new Map();
+
+class ProfileEntry {
+  final String key;
+  final num count;
+
+  ProfileEntry(this.key, this.count);
+}
+
+List<ProfileEntry> getDynamicStats() {
+  List<ProfileEntry> ret = new List();
+
+  var keys = _callMethodStats.keys.toList();
+
+  keys.sort((a, b) => _callMethodStats[b].compareTo(_callMethodStats[a]));
+  for (var key in keys) {
+    int count = _callMethodStats[key];
+    ret.add(new ProfileEntry(key, count));
+  }
+
+  return ret;
+}
+
+clearDynamicStats() {
+  _callMethodStats.clear();
+}
+
+_trackCall(obj, name) {
+  if(JS('bool', '!window.trackDdcProfile')) return;
+
+  var actual = getReifiedType(obj);
+  String stackStr = JS('String', "new Error().stack");
+  var stack = stackStr.split('\n    at ');
+  var src = '';
+  for (int i = 2; i < stack.length; ++i) {
+    var frame = stack[i];
+    if (!frame.contains('dev_compiler/lib/runtime/dart_sdk.js')) {
+      src = frame;
+      break;
+    }
+  }
+
+  name = "${typeName(actual)}.$name <$src>";
+  if (_callMethodStats.containsKey(name)) {
+    _callMethodStats[name] = _callMethodStats[name] + 1;
+  } else {
+    _callMethodStats[name] = 1;
+  }
+}
 
 /// Shared code for dsend, dindex, and dsetindex.
 _callMethod(obj, name, typeArgs, args, displayName) {
   var symbol = _canonicalFieldName(obj, name, args, displayName);
   var f = obj != null ? JS('', '#[#]', obj, symbol) : null;
   var ftype = getMethodType(obj, symbol);
   return _checkAndCall(f, ftype, obj, typeArgs, args, displayName);
 }
 
 dsend(obj, method, @rest args) => _callMethod(obj, method, null, args, method);
@@ skipping 417 matching lines @@
     constructor(dartIterator) {
       this.dartIterator = dartIterator;
     }
     next() {
       let i = this.dartIterator;
       let done = !i.moveNext();
       return { done: done, value: done ? void 0 : i.current };
     }
   }
 ''');