ruby-prof 1.1.0

data/ext/ruby_prof/rp_thread.h

@@ -0,0 +1,36 @@
+/* Copyright (C) 2005-2019 Shugo Maeda <shugo@ruby-lang.org> and Charlie Savage <cfis@savagexi.com>
+   Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RP_THREAD__
+#define __RP_THREAD__
+
+#include "ruby_prof.h"
+#include "rp_stack.h"
+
+/* Profiling information for a thread. */
+typedef struct
+{
+    // Runtime
+    VALUE object;                     /* Cache to wrapped object */
+    VALUE fiber;                      /* Fiber */
+    prof_stack_t* stack;              /* Stack of frames */
+    bool trace;                       /* Are we tracking this thread */
+
+    VALUE thread_id;                  /* Thread id */
+    VALUE fiber_id;                   /* Fiber id */
+    VALUE methods;                    /* Array of RubyProf::MethodInfo */
+    st_table* method_table;           /* Methods called in the thread */
+} thread_data_t;
+
+void rp_init_thread(void);
+st_table * threads_table_create(void);
+thread_data_t *threads_table_lookup(void *profile, VALUE fiber);
+thread_data_t* threads_table_insert(void *profile, VALUE fiber);
+void switch_thread(void *profile, thread_data_t *thread_data, double measurement);
+void threads_table_free(st_table *table);
+VALUE prof_thread_wrap(thread_data_t *thread);
+void prof_thread_mark(void *data);
+int pause_thread(st_data_t key, st_data_t value, st_data_t data);
+int unpause_thread(st_data_t key, st_data_t value, st_data_t data);
+
+#endif //__RP_THREAD__

data/ext/ruby_prof/ruby_prof.c

@@ -0,0 +1,48 @@
+/* Copyright (C) 2005-2019 Shugo Maeda <shugo@ruby-lang.org> and Charlie Savage <cfis@savagexi.com>
+   Please see the LICENSE file for copyright and distribution information */
+
+/* ruby-prof tracks the time spent executing every method in ruby programming.
+   The main players are:
+
+     profile_t         - This represents 1 profile.
+     thread_data_t     - Stores data about a single thread.
+     prof_stack_t      - The method call stack in a particular thread
+     prof_method_t     - Profiling information about each method
+     prof_call_info_t  - Keeps track a method's callers and callees.
+
+  The final result is an instance of a profile object which has a hash table of
+  thread_data_t, keyed on the thread id.  Each thread in turn has a hash table
+  of prof_method_t, keyed on the method id.  A hash table is used for quick 
+  look up when doing a profile.  However, it is exposed to Ruby as an array.
+
+  Each prof_method_t has two hash tables, parent and children, of prof_call_info_t.
+  These objects keep track of a method's callers (who called the method) and its
+  callees (who the method called).  These are keyed the method id, but once again,
+  are exposed to Ruby as arrays.  Each prof_call_into_t maintains a pointer to the
+  caller or callee method, thereby making it easy to navigate through the call
+  hierarchy in ruby - which is very helpful for creating call graphs.
+*/
+
+#include "ruby_prof.h"
+
+#include "rp_allocation.h"
+#include "rp_measurement.h"
+#include "rp_method.h"
+#include "rp_call_info.h"
+#include "rp_profile.h"
+#include "rp_stack.h"
+#include "rp_thread.h"
+
+VALUE mProf;
+
+void Init_ruby_prof()
+{
+    mProf = rb_define_module("RubyProf");
+
+    rp_init_allocation();
+    rp_init_call_info();
+    rp_init_measure();
+    rp_init_method_info();
+    rp_init_profile();
+    rp_init_thread();
+}

data/ext/ruby_prof/ruby_prof.h

@@ -0,0 +1,17 @@
+/* Copyright (C) 2005-2019 Shugo Maeda <shugo@ruby-lang.org> and Charlie Savage <cfis@savagexi.com>
+   Please see the LICENSE file for copyright and distribution information */
+
+#ifndef __RUBY_PROF_H__
+#define __RUBY_PROF_H__
+
+#include <ruby.h>
+#include <ruby/debug.h>
+#include <stdio.h>
+#include <stdbool.h>
+
+extern VALUE mProf;
+
+// This method is not exposed in Ruby header files - at least not as of Ruby 2.6.3 :(
+extern size_t rb_obj_memsize_of(VALUE);
+
+#endif //__RUBY_PROF_H__

data/ext/ruby_prof/vc/ruby_prof.sln

@@ -0,0 +1,31 @@
+
+Microsoft Visual Studio Solution File, Format Version 12.00
+# Visual Studio Version 16
+VisualStudioVersion = 16.0.28803.452
+MinimumVisualStudioVersion = 10.0.40219.1
+Project("{8BC9CEB8-8B4A-11D0-8D11-00A0C91BC942}") = "ruby_prof", "ruby_prof.vcxproj", "{6B4978F4-3B5F-4D38-81A8-069EC28CC069}"
+EndProject
+Global
+	GlobalSection(SolutionConfigurationPlatforms) = preSolution
+		Debug|x64 = Debug|x64
+		Debug|x86 = Debug|x86
+		Release|x64 = Release|x64
+		Release|x86 = Release|x86
+	EndGlobalSection
+	GlobalSection(ProjectConfigurationPlatforms) = postSolution
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Debug|x64.ActiveCfg = Debug|x64
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Debug|x64.Build.0 = Debug|x64
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Debug|x86.ActiveCfg = Debug|Win32
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Debug|x86.Build.0 = Debug|Win32
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Release|x64.ActiveCfg = Release|x64
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Release|x64.Build.0 = Release|x64
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Release|x86.ActiveCfg = Release|Win32
+		{6B4978F4-3B5F-4D38-81A8-069EC28CC069}.Release|x86.Build.0 = Release|Win32
+	EndGlobalSection
+	GlobalSection(SolutionProperties) = preSolution
+		HideSolutionNode = FALSE
+	EndGlobalSection
+	GlobalSection(ExtensibilityGlobals) = postSolution
+		SolutionGuid = {9E7746F2-2467-4738-9746-4472B5CBF1DA}
+	EndGlobalSection
+EndGlobal

data/ext/ruby_prof/vc/ruby_prof.vcxproj

@@ -0,0 +1,143 @@
+<?xml version="1.0" encoding="utf-8"?>
+<Project DefaultTargets="Build" ToolsVersion="4.0" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
+  <ItemGroup Label="ProjectConfigurations">
+    <ProjectConfiguration Include="Debug|Win32">
+      <Configuration>Debug</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Debug|x64">
+      <Configuration>Debug</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|Win32">
+      <Configuration>Release</Configuration>
+      <Platform>Win32</Platform>
+    </ProjectConfiguration>
+    <ProjectConfiguration Include="Release|x64">
+      <Configuration>Release</Configuration>
+      <Platform>x64</Platform>
+    </ProjectConfiguration>
+  </ItemGroup>
+  <PropertyGroup Label="Globals">
+    <ProjectGuid>{6B4978F4-3B5F-4D38-81A8-069EC28CC069}</ProjectGuid>
+    <Keyword>Win32Proj</Keyword>
+    <RootNamespace>ruby_prof</RootNamespace>
+    <WindowsTargetPlatformVersion>10.0</WindowsTargetPlatformVersion>
+  </PropertyGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.Default.props" />
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'" Label="Configuration">
+    <ConfigurationType>DynamicLibrary</ConfigurationType>
+    <UseDebugLibraries>true</UseDebugLibraries>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'" Label="Configuration">
+    <ConfigurationType>DynamicLibrary</ConfigurationType>
+    <UseDebugLibraries>false</UseDebugLibraries>
+    <WholeProgramOptimization>true</WholeProgramOptimization>
+    <CharacterSet>Unicode</CharacterSet>
+  </PropertyGroup>
+  <PropertyGroup Label="Configuration" Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <PlatformToolset>v142</PlatformToolset>
+    <ConfigurationType>DynamicLibrary</ConfigurationType>
+  </PropertyGroup>
+  <PropertyGroup Label="Configuration" Condition="'$(Configuration)|$(Platform)'=='Release|x64'">
+    <PlatformToolset>v142</PlatformToolset>
+  </PropertyGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.props" />
+  <ImportGroup Label="ExtensionSettings">
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <ImportGroup Label="PropertySheets" Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <Import Project="$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props" Condition="exists('$(UserRootDir)\Microsoft.Cpp.$(Platform).user.props')" Label="LocalAppDataPlatform" />
+  </ImportGroup>
+  <PropertyGroup Label="UserMacros" />
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <LinkIncremental>true</LinkIncremental>
+    <OutDir>..\..\..\lib\2.0</OutDir>
+    <TargetExt>.so</TargetExt>
+    <TargetName>ruby_prof</TargetName>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <LinkIncremental>false</LinkIncremental>
+  </PropertyGroup>
+  <PropertyGroup Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <TargetExt>.so</TargetExt>
+    <OutDir>..\</OutDir>
+  </PropertyGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|Win32'">
+    <ClCompile>
+      <PrecompiledHeader>
+      </PrecompiledHeader>
+      <WarningLevel>Level3</WarningLevel>
+      <Optimization>Disabled</Optimization>
+      <PreprocessorDefinitions>WIN32;_DEBUG;_WINDOWS;_USRDLL;RUBY_PROF_EXPORTS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+      <AdditionalIncludeDirectories>C:\MinGW\local\ruby200vc\include\ruby-2.0.0;C:\MinGW\local\ruby200vc\include\ruby-2.0.0\i386-mswin32_100;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+    </ClCompile>
+    <Link>
+      <SubSystem>Windows</SubSystem>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+      <AdditionalLibraryDirectories>C:\MinGW\local\ruby200vc\lib;%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+      <AdditionalDependencies>msvcr100-ruby200.lib;kernel32.lib;user32.lib;gdi32.lib;winspool.lib;comdlg32.lib;advapi32.lib;shell32.lib;ole32.lib;oleaut32.lib;uuid.lib;odbc32.lib;odbccp32.lib;%(AdditionalDependencies)</AdditionalDependencies>
+      <ModuleDefinitionFile>ruby_prof.def</ModuleDefinitionFile>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Release|Win32'">
+    <ClCompile>
+      <WarningLevel>Level3</WarningLevel>
+      <PrecompiledHeader>
+      </PrecompiledHeader>
+      <Optimization>MaxSpeed</Optimization>
+      <FunctionLevelLinking>true</FunctionLevelLinking>
+      <IntrinsicFunctions>true</IntrinsicFunctions>
+      <PreprocessorDefinitions>WIN32;NDEBUG;_WINDOWS;_USRDLL;RUBY_PROF_EXPORTS;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+    </ClCompile>
+    <Link>
+      <SubSystem>Windows</SubSystem>
+      <GenerateDebugInformation>true</GenerateDebugInformation>
+      <EnableCOMDATFolding>true</EnableCOMDATFolding>
+      <OptimizeReferences>true</OptimizeReferences>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemDefinitionGroup Condition="'$(Configuration)|$(Platform)'=='Debug|x64'">
+    <ClCompile>
+      <AdditionalIncludeDirectories>C:\msys64\usr\local\ruby-2.6.5vc\include\ruby-2.6.0\x64-mswin64_140;C:\msys64\usr\local\ruby-2.6.5vc\include\ruby-2.6.0;%(AdditionalIncludeDirectories)</AdditionalIncludeDirectories>
+      <Optimization>Disabled</Optimization>
+      <PreprocessorDefinitions>HAVE_RB_TRACEARG_CALLEE_ID;%(PreprocessorDefinitions)</PreprocessorDefinitions>
+    </ClCompile>
+    <Link>
+      <AdditionalLibraryDirectories>C:\msys64\usr\local\ruby-2.6.5vc\lib;%(AdditionalLibraryDirectories)</AdditionalLibraryDirectories>
+      <AdditionalDependencies>x64-vcruntime140-ruby260.lib;%(AdditionalDependencies)</AdditionalDependencies>
+      <ModuleDefinitionFile>ruby_prof.def</ModuleDefinitionFile>
+    </Link>
+  </ItemDefinitionGroup>
+  <ItemGroup>
+    <ClInclude Include="..\rp_allocation.h" />
+    <ClInclude Include="..\rp_call_info.h" />
+    <ClInclude Include="..\rp_measurement.h" />
+    <ClInclude Include="..\rp_method.h" />
+    <ClInclude Include="..\rp_profile.h" />
+    <ClInclude Include="..\rp_stack.h" />
+    <ClInclude Include="..\rp_thread.h" />
+    <ClInclude Include="..\ruby_prof.h" />
+    <ClInclude Include="..\version.h" />
+  </ItemGroup>
+  <ItemGroup>
+    <ClCompile Include="..\rp_allocation.c" />
+    <ClCompile Include="..\rp_call_info.c" />
+    <ClCompile Include="..\rp_measurement.c" />
+    <ClCompile Include="..\rp_measure_allocations.c" />
+    <ClCompile Include="..\rp_measure_memory.c" />
+    <ClCompile Include="..\rp_measure_process_time.c" />
+    <ClCompile Include="..\rp_measure_wall_time.c" />
+    <ClCompile Include="..\rp_method.c" />
+    <ClCompile Include="..\rp_profile.c" />
+    <ClCompile Include="..\rp_stack.c" />
+    <ClCompile Include="..\rp_thread.c" />
+    <ClCompile Include="..\ruby_prof.c" />
+  </ItemGroup>
+  <Import Project="$(VCTargetsPath)\Microsoft.Cpp.targets" />
+  <ImportGroup Label="ExtensionTargets">
+  </ImportGroup>
+</Project>

data/lib/ruby-prof.rb

@@ -0,0 +1,52 @@
+# encoding: utf-8
+
+# Load the C-based binding.
+begin
+  RUBY_VERSION =~ /(\d+\.\d+\.\d+)/
+  require "#{$1}/ruby_prof.so"
+rescue LoadError
+  require "ruby_prof.so"
+end
+
+require 'ruby-prof/version'
+require 'ruby-prof/call_info'
+require 'ruby-prof/compatibility'
+require 'ruby-prof/measurement'
+require 'ruby-prof/method_info'
+require 'ruby-prof/profile'
+require 'ruby-prof/rack'
+require 'ruby-prof/thread'
+
+module RubyProf
+  autoload :CallInfoVisitor, 'ruby-prof/call_info_visitor'
+
+  autoload :AbstractPrinter, 'ruby-prof/printers/abstract_printer'
+  autoload :CallInfoPrinter, 'ruby-prof/printers/call_info_printer'
+  autoload :CallStackPrinter, 'ruby-prof/printers/call_stack_printer'
+  autoload :CallTreePrinter, 'ruby-prof/printers/call_tree_printer'
+  autoload :DotPrinter, 'ruby-prof/printers/dot_printer'
+  autoload :FlatPrinter, 'ruby-prof/printers/flat_printer'
+  autoload :GraphHtmlPrinter, 'ruby-prof/printers/graph_html_printer'
+  autoload :GraphPrinter, 'ruby-prof/printers/graph_printer'
+  autoload :MultiPrinter, 'ruby-prof/printers/multi_printer'
+
+  # :nodoc:
+  # Checks if the user specified the clock mode via
+  # the RUBY_PROF_MEASURE_MODE environment variable
+  def self.figure_measure_mode
+    case ENV["RUBY_PROF_MEASURE_MODE"]
+    when "wall", "wall_time"
+      RubyProf.measure_mode = RubyProf::WALL_TIME
+    when "allocations"
+      RubyProf.measure_mode = RubyProf::ALLOCATIONS
+    when "memory"
+      RubyProf.measure_mode = RubyProf::MEMORY
+    when "process", "process_time"
+      RubyProf.measure_mode = RubyProf::PROCESS_TIME
+    else
+      # the default is defined in the measure_mode reader
+    end
+  end
+end
+
+RubyProf::figure_measure_mode

data/lib/ruby-prof/assets/call_stack_printer.html.erb

@@ -0,0 +1,713 @@
+<!DOCTYPE html>
+<html>
+  <head>
+    <meta http-equiv="content-type" content="text/html; charset=utf-8">
+    <title>ruby-prof call tree</title>
+    <style type="text/css">
+      body {
+        font-size: 70%;
+        padding: 0;
+        margin: 5px;
+        margin-right: 0px;
+        margin-left: 0px;
+        background: #ffffff;
+      }
+
+      ul {
+        margin-left: 0px;
+        margin-top: 0px;
+        margin-bottom: 0px;
+        padding-left: 0px;
+        list-style-type: none;
+      }
+
+      li {
+        margin-left: 11px;
+        padding: 0px;
+        white-space: nowrap;
+        border-top: 1px solid #cccccc;
+        border-left: 1px solid #cccccc;
+        border-bottom: none;
+      }
+
+      .thread {
+        margin-left: 11px;
+        background: #708090;
+        padding-top: 3px;
+        padding-left: 12px;
+        padding-bottom: 2px;
+        border-left: 1px solid #CCCCCC;
+        border-top: 1px solid #CCCCCC;
+        font-weight: bold;
+      }
+
+      .hidden {
+        display: none;
+        width: 0px;
+        height: 0px;
+        margin: 0px;
+        padding: 0px;
+        border-style: none;
+      }
+
+      .color01 {
+        background: #adbdeb
+      }
+
+      .color05 {
+        background: #9daddb
+      }
+
+      .color0 {
+        background: #8d9dcb
+      }
+
+      .color1 {
+        background: #89bccb
+      }
+
+      .color2 {
+        background: #56e3e7
+      }
+
+      .color3 {
+        background: #32cd70
+      }
+
+      .color4 {
+        background: #a3d53c
+      }
+
+      .color5 {
+        background: #c4cb34
+      }
+
+      .color6 {
+        background: #dcb66d
+      }
+
+      .color7 {
+        background: #cda59e
+      }
+
+      .color8 {
+        background: #be9d9c
+      }
+
+      .color9 {
+        background: #cf947a
+      }
+
+      #commands {
+        font-size: 10pt;
+        padding: 10px;
+        margin-left: 11px;
+        margin-bottom: 0px;
+        margin-top: 0px;
+        background: #708090;
+        border-top: 1px solid #cccccc;
+        border-left: 1px solid #cccccc;
+        border-bottom: none;
+      }
+
+      #titlebar {
+        font-size: 10pt;
+        padding: 10px;
+        margin-left: 11px;
+        margin-bottom: 0px;
+        margin-top: 10px;
+        background: #8090a0;
+        border-top: 1px solid #cccccc;
+        border-left: 1px solid #cccccc;
+        border-bottom: none;
+      }
+
+      #help {
+        font-size: 10pt;
+        padding: 10px;
+        margin-left: 11px;
+        margin-bottom: 0px;
+        margin-top: 0px;
+        background: #8090a0;
+        display: none;
+        border-top: 1px solid #cccccc;
+        border-left: 1px solid #cccccc;
+        border-bottom: none;
+      }
+
+      #sentinel {
+        height: 400px;
+        margin-left: 11px;
+        background: #8090a0;
+        border-top: 1px solid #cccccc;
+        border-left: 1px solid #cccccc;
+        border-bottom: none;
+      }
+
+      input {
+        margin-left: 10px;
+      }
+
+      .toggle {
+        background: url(data:image/png;base64,<%= base64_image %>) no-repeat left center;
+        float: left;
+        width: 9px;
+        height: 9px;
+        margin: 2px 1px 1px 1px;
+      }
+
+      .toggle.minus {
+        background-position: -9px 0;
+      }
+
+      .toggle.plus {
+        background-position: -18px 0;
+      }
+    </style>
+
+    <script type="text/javascript">
+      function rootNode()
+      {
+        return currentThread
+      }
+
+      function showUL(node, show)
+      {
+        Array.prototype.forEach.call(node.childNodes, function(child)
+        {
+          if (child.nodeName == 'LI')
+            toggle(child, show)
+        })
+      }
+
+      function findUlChild(li)
+      {
+        var ul = li.childNodes[2]
+        while (ul && ul.nodeName != "UL")
+        {
+          ul = ul.nextSibling
+        }
+        return ul
+      }
+
+      function isLeafNode(li)
+      {
+        var element = li.querySelector('a')
+        return element.classList.contains('empty')
+      }
+
+      function toggle(li, show)
+      {
+        if (isLeafNode(li))
+          return
+
+        var img = li.firstChild
+        img.className = 'toggle '
+        img.className += show ? 'minus' : 'plus'
+
+        var ul = findUlChild(li)
+        if (ul)
+        {
+          ul.style.display = show ? 'block' : 'none'
+          showUL(ul, true)
+        }
+      }
+
+      function toggleLI(li)
+      {
+        var img = li.firstChild
+        if (img.className.indexOf("minus") > -1)
+          toggle(li, false)
+        else
+        {
+          if (img.className.indexOf("plus") > -1)
+            toggle(li, true)
+        }
+      }
+
+      function aboveThreshold(text, threshold)
+      {
+        var match = text.match(/\d+[.,]\d+%/)
+        if (!match)
+        {
+          return true
+        }
+        else
+        {
+          var value = parseFloat(match[0].replace(/,/, '.'))
+          return value >= threshold
+        }
+      }
+
+      function setThresholdLI(li, threshold)
+      {
+        var a = li.querySelector('a')
+        var span = li.querySelector('span')
+        var ul = li.querySelector('ul')
+
+        var visible = aboveThreshold(span.textContent, threshold) ? 1 : 0
+
+        var count = 0
+        if (ul)
+        {
+          count = setThresholdUL(ul, threshold)
+        }
+
+        if (count > 0)
+        {
+          a.className = 'toggle minus'
+        }
+        else
+        {
+          a.className = 'toggle empty'
+        }
+
+        if (visible)
+        {
+          li.style.display = 'block'
+        } else
+        {
+          li.style.display = 'none'
+        }
+        return visible
+      }
+
+      function setThresholdUL(node, threshold)
+      {
+        var count = 0
+        Array.prototype.forEach.call(node.childNodes, function(child)
+        {
+          if (child.nodeName == 'LI')
+            count = count + setThresholdLI(child, threshold)
+        })
+
+        var visible = (count > 0) ? 1 : 0
+        if (visible)
+        {
+          node.style.display = 'block'
+        } else
+        {
+          node.style.display = 'none'
+        }
+        return visible
+      }
+
+      function toggleChildren(img, event)
+      {
+        event.cancelBubble = true
+        if (img.className.indexOf('empty') > -1)
+          return
+
+        var minus = (img.className.indexOf('minus') > -1)
+
+        if (minus)
+        {
+          img.className = 'toggle plus'
+        } else
+          img.className = 'toggle minus'
+
+        var li = img.parentNode
+        var ul = findUlChild(li)
+        if (ul)
+        {
+          if (minus)
+            ul.style.display = 'none'
+          else
+            ul.style.display = 'block'
+        }
+        if (minus)
+          moveSelectionIfNecessary(li)
+      }
+
+      function showChildren(li)
+      {
+        var img = li.firstChild
+        if (img.className.indexOf('empty') > -1)
+          return
+        img.className = 'toggle minus'
+
+        var ul = findUlChild(li)
+        if (ul)
+        {
+          ul.style.display = 'block'
+        }
+      }
+
+      function setThreshold()
+      {
+        var tv = document.getElementById("threshold").value
+        if (tv.match(/[0-9]+([.,][0-9]+)?/))
+        {
+          var f = parseFloat(tv.replace(/,/, '.'))
+          var threads = document.getElementsByName("thread")
+          var l = threads.length
+          for (var i = 0; i < l; i++)
+          {
+            setThresholdUL(threads[i], f)
+          }
+          var p = selectedNode
+          while (p && p.style.display == 'none')
+            p = p.parentNode.parentNode
+          if (p && p.nodeName == "LI")
+            selectNode(p)
+        } else
+        {
+          alert("Please specify a decimal number as threshold value!")
+        }
+      }
+
+      function expandAll(event)
+      {
+        toggleAll(event, true)
+      }
+
+      function collapseAll(event)
+      {
+        toggleAll(event, false)
+        selectNode(rootNode(), null)
+      }
+
+      function toggleAll(event, show)
+      {
+        event.cancelBubble = true
+        var threads = document.getElementsByName("thread")
+        var l = threads.length
+        for (var i = 0; i < l; i++)
+        {
+          showUL(threads[i], show)
+        }
+      }
+
+      function toggleHelp(node)
+      {
+        var help = document.getElementById("help")
+        if (node.value == "Show Help")
+        {
+          node.value = "Hide Help"
+          help.style.display = 'block'
+        } else
+        {
+          node.value = "Show Help"
+          help.style.display = 'none'
+        }
+      }
+
+      var selectedNode = null
+      var selectedColor = null
+      var selectedThread = null
+
+      function descendentOf(a, b)
+      {
+        while (a != b && b != null)
+          b = b.parentNode
+        return (a == b)
+      }
+
+      function moveSelectionIfNecessary(node)
+      {
+        if (descendentOf(node, selectedNode))
+          selectNode(node, null)
+      }
+
+      function selectNode(node, event)
+      {
+        if (event)
+        {
+          event.cancelBubble = true
+          thread = findThread(node)
+          selectThread(thread)
+        }
+        if (selectedNode)
+        {
+          selectedNode.style.background = selectedColor
+        }
+        selectedNode = node
+        selectedColor = node.style.background
+        selectedNode.style.background = "red"
+        selectedNode.scrollIntoView()
+        window.scrollBy(0, -400)
+      }
+
+      function moveUp()
+      {
+        move(selectedNode.previousSibling)
+      }
+
+      function moveDown()
+      {
+        move(selectedNode.nextSibling)
+      }
+
+      function move(p)
+      {
+        while (p && p.style.display == 'none')
+          p = p.nextSibling
+        if (p && p.nodeName == "LI")
+        {
+          selectNode(p, null)
+        }
+      }
+
+      function moveLeft()
+      {
+        var p = selectedNode.parentNode.parentNode
+        if (p && p.nodeName == "LI")
+        {
+          selectNode(p, null)
+        }
+      }
+
+      function moveRight()
+      {
+        if (!isLeafNode(selectedNode))
+        {
+          showChildren(selectedNode)
+          var ul = findUlChild(selectedNode)
+          if (ul)
+          {
+            selectNode(ul.firstChild, null)
+          }
+        }
+      }
+
+      function moveForward()
+      {
+        if (isLeafNode(selectedNode))
+        {
+          var p = selectedNode
+          while ((p.nextSibling == null || p.nextSibling.style.display == 'none') && p.nodeName == "LI")
+          {
+            p = p.parentNode.parentNode
+          }
+          if (p.nodeName == "LI")
+            selectNode(p.nextSibling, null)
+        } else
+        {
+          moveRight()
+        }
+      }
+
+      function isExpandedNode(li)
+      {
+        var img = li.firstChild
+        return (img.className.indexOf('minus') > -1)
+      }
+
+      function moveBackward()
+      {
+        var p = selectedNode
+        var q = p.previousSibling
+        while (q != null && q.style.display == 'none')
+          q = q.previousSibling
+        if (q == null)
+        {
+          p = p.parentNode.parentNode
+        } else
+        {
+          while (!isLeafNode(q) && isExpandedNode(q))
+          {
+            q = findUlChild(q).lastChild
+            while (q.style.display == 'none')
+              q = q.previousSibling
+          }
+          p = q
+        }
+        if (p.nodeName == "LI")
+          selectNode(p, null)
+      }
+
+      function moveHome()
+      {
+        selectNode(currentThread)
+      }
+
+      var currentThreadIndex = null
+
+      function findThread(node)
+      {
+        while (node && !node.parentNode.nodeName.match(/BODY|DIV/g))
+        {
+          node = node.parentNode
+        }
+        return node.firstChild
+      }
+
+      function selectThread(node)
+      {
+        var threads = document.getElementsByName("thread")
+        currentThread = node
+        for (var i = 0; i < threads.length; i++)
+        {
+          if (threads[i] == currentThread.parentNode)
+            currentThreadIndex = i
+        }
+      }
+
+      function nextThread()
+      {
+        var threads = document.getElementsByName("thread")
+        if (currentThreadIndex == threads.length - 1)
+          currentThreadIndex = 0
+        else
+          currentThreadIndex += 1
+        currentThread = threads[currentThreadIndex].firstChild
+        selectNode(currentThread, null)
+      }
+
+      function previousThread()
+      {
+        var threads = document.getElementsByName("thread")
+        if (currentThreadIndex == 0)
+          currentThreadIndex = threads.length - 1
+        else
+          currentThreadIndex -= 1
+        currentThread = threads[currentThreadIndex].firstChild
+        selectNode(currentThread, null)
+      }
+
+      function switchThread(node, event)
+      {
+        event.cancelBubble = true
+        selectThread(node.nextSibling.firstChild)
+        selectNode(currentThread, null)
+      }
+
+      function handleKeyEvent(event)
+      {
+        var code = event.charCode ? event.charCode : event.keyCode
+        var str = String.fromCharCode(code)
+        switch (str)
+        {
+          case "a":
+            moveLeft()
+            break
+          case "s":
+            moveDown()
+            break
+          case "d":
+            moveRight()
+            break
+          case "w":
+            moveUp()
+            break
+          case "f":
+            moveForward()
+            break
+          case "b":
+            moveBackward()
+            break
+          case "x":
+            toggleChildren(selectedNode.firstChild, event)
+            break
+          case "*":
+            toggleLI(selectedNode)
+            break
+          case "n":
+            nextThread()
+            break
+          case "h":
+            moveHome()
+            break
+          case "p":
+            previousThread()
+            break
+        }
+      }
+
+      document.onkeypress = function (event)
+      {
+        handleKeyEvent(event)
+      }
+
+      window.onload = function ()
+      {
+        var images = document.querySelectorAll(".toggle")
+        for (var i = 0; i < images.length; i++)
+        {
+          var img = images[i]
+          img.onclick = function (event)
+          {
+            toggleChildren(this, event)
+            return false
+          }
+        }
+        var divs = document.getElementsByTagName("div")
+        for (i = 0; i < divs.length; i++)
+        {
+          var div = divs[i]
+          if (div.className == "thread")
+            div.onclick = function (event)
+            {
+              switchThread(this, event)
+            }
+        }
+        var lis = document.getElementsByTagName("li")
+        for (var i = 0; i < lis.length; i++)
+        {
+          lis[i].onclick = function (event)
+          {
+            selectNode(this, event)
+          }
+        }
+
+        var threads = document.getElementsByName("thread")
+        currentThreadIndex = 0
+        currentThread = threads[0].querySelector('li')
+        selectNode(currentThread, null)
+      }
+    </script>
+
+    <% @overall_time = @result.threads.reduce(0) do |val, thread|
+      val += thread.total_time
+    end %>
+  </head>
+  <body>
+    <div style="display: inline-block;">
+      <div id="titlebar">
+        Call tree for application <strong><%= application %> <%= arguments %></strong><br/> Generated on <%= Time.now %>
+        with options <%= @options.inspect %><br/>
+      </div>
+      <div id="commands">
+        <span style="font-size: 11pt; font-weight: bold;">Threshold:</span>
+        <input value="1.0" size="3" id="threshold" type="text">
+        <input value="Apply" onclick="setThreshold();" type="submit">
+        <input value="Expand All" onclick="expandAll(event);" type="submit">
+        <input value="Collapse All" onclick="collapseAll(event);" type="submit">
+        <input value="Show Help" onclick="toggleHelp(this);" type="submit">
+      </div>
+      <ul style="display: none;" id="help">
+        <li>* indicates recursively called methods</li>
+        <li>Enter a decimal value <i>d</i> into the threshold field and click "Apply" to hide all nodes marked with time
+          values lower than <em>d</em>.
+        </li>
+        <li>Click on "Expand All" for full tree expansion.</li>
+        <li>Click on "Collapse All" to show only top level nodes.</li>
+        <li>Use a, s, d, w as in Quake or Urban Terror to navigate the tree.</li>
+        <li>Use f and b to navigate the tree in preorder forward and backwards.</li>
+        <li>Use x to toggle visibility of a subtree.</li>
+        <li>Use * to expand/collapse a whole subtree.</li>
+        <li>Use h to navigate to thread root.</li>
+        <li>Use n and p to navigate between threads.</li>
+        <li>Click on background to move focus to a subtree.</li>
+      </ul>
+
+      <% @result.threads.each do |thread| %>
+        <% thread_percent = 100 * (thread.total_time / @overall_time)
+           thread_info = "#{"%4.2f%%" % thread_percent} ~ #{@overall_time}" %>
+        <div class="thread">
+          <span>Thread: <%= thread.id %>, Fiber: <%= thread.fiber_id %> (<%= thread_info %>)</span>
+          <ul name="thread">
+            <% call_infos = thread.root_methods.map(&:callers).flatten %>
+            <% call_infos.each do |call_info| %>
+              <% visited = Set.new
+                 output = StringIO.new('')
+                 print_stack(output, visited, call_info, call_info.total_time) %>
+              <%= output.string %>
+            <% end %>
+          </ul>
+        </div>
+      <% end %>
+      <div id="sentinel"></div>
+    </div>
+  </body>
+</html>