Emit symbol maps for compiled code for use by the Linux perf tool.

runtime/vm/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/object.h"
 
+#include "include/dart_api.h"
 #include "platform/assert.h"
 #include "vm/assembler.h"
 #include "vm/bigint_operations.h"
 #include "vm/bootstrap.h"
 #include "vm/datastream.h"
 #include "vm/code_generator.h"
 #include "vm/code_patcher.h"
 #include "vm/compiler.h"
 #include "vm/compiler_stats.h"
 #include "vm/class_finalizer.h"
@@ skipping 6828 matching lines @@
 
   // Allocate the Instructions object.
   Instructions& instrs =
       Instructions::ZoneHandle(Instructions::New(assembler->CodeSize()));
 
   // Copy the instructions into the instruction area and apply all fixups.
   // Embedded pointers are still in handles at this point.
   MemoryRegion region(reinterpret_cast<void*>(instrs.EntryPoint()),
                       instrs.size());
   assembler->FinalizeInstructions(region);
+  Dart_FileWriterFunction perf_events_writer = Dart::perf_events_writer();
+  if (perf_events_writer != NULL) {
+    const char* format = "%x %x %s\n";
+    uword addr = instrs.EntryPoint();
+    uword size = instrs.size();
+    intptr_t len = OS::SNPrint(NULL, 0, format, addr, size, name);
+    char* buffer = reinterpret_cast<char*>(
+        Isolate::Current()->current_zone()->Allocate(len + 1));
+    OS::SNPrint(buffer, len + 1, format, addr, size, name);
+    (*perf_events_writer)(buffer, len);
+  }
   DebugInfo* pprof_symbol_generator = Dart::pprof_symbol_generator();
   if (pprof_symbol_generator != NULL) {
     ASSERT(strlen(name) != 0);
     pprof_symbol_generator->AddCode(instrs.EntryPoint(), instrs.size());
     pprof_symbol_generator->AddCodeRegion(name,
                                           instrs.EntryPoint(),
                                           instrs.size());
   }
   if (FLAG_generate_gdb_symbols) {
     ASSERT(strlen(name) != 0);
@@ skipping 39 matching lines @@
     // Hook up Code and Instruction objects.
     instrs.set_code(code.raw());
     code.set_instructions(instrs.raw());
   }
   return code.raw();
 }
 
 
 RawCode* Code::FinalizeCode(const Function& function, Assembler* assembler) {
   // Calling ToFullyQualifiedCString is very expensive, try to avoid it.
-  if (FLAG_generate_gdb_symbols || (Dart::pprof_symbol_generator() != NULL)) {
+  if (FLAG_generate_gdb_symbols ||
+      Dart::perf_events_writer() != NULL ||
+      Dart::pprof_symbol_generator() != NULL) {
     return FinalizeCode(function.ToFullyQualifiedCString(), assembler);
   } else {
     return FinalizeCode("", assembler);
   }
 }
 
 
 // Check if object matches find condition.
 bool Code::FindRawCodeVisitor::FindObject(RawObject* obj) {
   return RawInstructions::ContainsPC(obj, pc_);
@@ skipping 3950 matching lines @@
   const String& str = String::Handle(pattern());
   const char* format = "JSRegExp: pattern=%s flags=%s";
   intptr_t len = OS::SNPrint(NULL, 0, format, str.ToCString(), Flags());
   char* chars = reinterpret_cast<char*>(
       Isolate::Current()->current_zone()->Allocate(len + 1));
   OS::SNPrint(chars, (len + 1), format, str.ToCString(), Flags());
   return chars;
 }
 
 }  // namespace dart