ruby-prof 0.18.0 → 1.0.0

data/ext/ruby_prof/rp_measure.c

@@ -1,40 +0,0 @@
-/* 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 */
-
-#include "ruby_prof.h"
-
-VALUE mMeasure;
-
-prof_measurer_t* prof_get_measurer(prof_measure_mode_t measure)
-{
-    switch (measure) {
-    case MEASURE_WALL_TIME:
-        return prof_measurer_wall_time();
-    case MEASURE_PROCESS_TIME:
-        return prof_measurer_process_time();
-    case MEASURE_CPU_TIME:
-        return prof_measurer_cpu_time();
-    case MEASURE_ALLOCATIONS:
-        return prof_measurer_allocations();
-    case MEASURE_MEMORY:
-        return prof_measurer_memory();
-    case MEASURE_GC_TIME:
-        return prof_measurer_gc_time();
-    case MEASURE_GC_RUNS:
-        return prof_measurer_gc_runs();
-    default:
-        rb_raise(rb_eArgError, "Unknown measure mode: %d", measure);
-    }
-};
-
-void rp_init_measure()
-{
-    mMeasure = rb_define_module_under(mProf, "Measure");
-    rp_init_measure_wall_time();
-    rp_init_measure_cpu_time();
-    rp_init_measure_process_time();
-    rp_init_measure_allocations();
-    rp_init_measure_memory();
-    rp_init_measure_gc_time();
-    rp_init_measure_gc_runs();
-}

data/ext/ruby_prof/rp_measure.h

@@ -1,45 +0,0 @@
-/* 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_MEASUREMENT_H__
-#define __RP_MEASUREMENT_H__
-
-extern VALUE mMeasure;
-
-typedef double (*get_measurement)();
-
-typedef struct
-{
-    get_measurement measure;
-} prof_measurer_t;
-
-typedef enum
-{
-    MEASURE_WALL_TIME,
-    MEASURE_PROCESS_TIME,
-    MEASURE_CPU_TIME,
-    MEASURE_ALLOCATIONS,
-    MEASURE_MEMORY,
-    MEASURE_GC_TIME,
-    MEASURE_GC_RUNS,
-} prof_measure_mode_t;
-
-prof_measurer_t* prof_get_measurer(prof_measure_mode_t measure);
-prof_measurer_t* prof_measurer_allocations();
-prof_measurer_t* prof_measurer_cpu_time();
-prof_measurer_t* prof_measurer_gc_runs();
-prof_measurer_t* prof_measurer_gc_time();
-prof_measurer_t* prof_measurer_memory();
-prof_measurer_t* prof_measurer_process_time();
-prof_measurer_t* prof_measurer_wall_time();
-
-void rp_init_measure();
-void rp_init_measure_allocations();
-void rp_init_measure_cpu_time();
-void rp_init_measure_gc_runs();
-void rp_init_measure_gc_time();
-void rp_init_measure_memory();
-void rp_init_measure_process_time();
-void rp_init_measure_wall_time();
-
-#endif //__RP_MEASUREMENT_H__

data/ext/ruby_prof/rp_measure_cpu_time.c

@@ -1,136 +0,0 @@
-/* Copyright (C) 2005-2013 Shugo Maeda <shugo@ruby-lang.org> and Charlie Savage <cfis@savagexi.com>
-   Please see the LICENSE file for copyright and distribution information */
-
-#include "ruby_prof.h"
-
-static VALUE cMeasureCpuTime;
-
-/* The _WIN32 check is needed for msys (and maybe cygwin?) */
-#if defined(_WIN32)
-
-static unsigned long long get_cpu_time()
-{
-    LARGE_INTEGER time;
-    QueryPerformanceCounter(&time);
-    return time.QuadPart;
-}
-
-static unsigned long long get_cpu_frequency()
-{
-    static unsigned long long cpu_frequency;
-
-    if(!cpu_frequency) {
-        LARGE_INTEGER cpu_frequency_struct;
-        QueryPerformanceFrequency(&cpu_frequency_struct);
-        cpu_frequency = cpu_frequency_struct.QuadPart;
-    }
-
-    return cpu_frequency;
-}
-
-static double measure_cpu_time()
-{
-    return ((double)get_cpu_time()) / get_cpu_frequency();
-}
-
-#else
-
-#include <sys/resource.h>
-#include <stdint.h>
-#include <time.h>
-
-static unsigned long long get_cpu_time()
-{
-#if defined(__i386__) || defined(__x86_64__)
-    uint32_t a, d;
-    __asm__ volatile("rdtsc" : "=a" (a), "=d" (d));
-    return ((uint64_t)d << 32) + a;
-#elif defined(__powerpc__) || defined(__ppc__)
-    unsigned long long x, y;
-
-    __asm__ __volatile__ ("\n\
-    1:  mftbu   %1\n\
-        mftb    %L0\n\
-        mftbu   %0\n\
-        cmpw    %0,%1\n\
-        bne-    1b"
-        : "=r" (x), "=r" (y));
-
-    return x;
-#endif
-}
-
-static unsigned long long get_cpu_frequency()
-{
-    static unsigned long long cpu_frequency;
-
-    if(!cpu_frequency) {
-        unsigned long long x, y;
-
-        struct timespec ts;
-        ts.tv_sec = 0;
-        ts.tv_nsec = 500000000;
-        x = get_cpu_time();
-        nanosleep(&ts, NULL);
-        y = get_cpu_time();
-        cpu_frequency = (y - x) * 2;
-    }
-
-    return cpu_frequency;
-}
-
-static double measure_cpu_time()
-{
-    struct rusage rusage;
-    getrusage(RUSAGE_SELF, &rusage);
-
-    double seconds = 0;
-
-    seconds += rusage.ru_utime.tv_sec;
-    seconds += rusage.ru_stime.tv_sec;
-
-    seconds += rusage.ru_utime.tv_usec / 1000000.0;
-    seconds += rusage.ru_stime.tv_usec / 1000000.0;
-
-    return seconds;
-}
-#endif
-
-
-prof_measurer_t* prof_measurer_cpu_time()
-{
-    prof_measurer_t* measure = ALLOC(prof_measurer_t);
-    measure->measure = measure_cpu_time;
-    return measure;
-}
-
-/* call-seq:
-   measure -> float
-
-Returns the cpu time.*/
-static VALUE
-prof_measure_cpu_time(VALUE self)
-{
-    return rb_float_new(measure_cpu_time());
-}
-
-/* call-seq:
-   cpu_frequency -> int
-
-Returns the cpu's frequency.  This value is needed when
-RubyProf::measure_mode is set to CPU_TIME. */
-static VALUE
-prof_get_cpu_frequency(VALUE self)
-{
-    return ULL2NUM(get_cpu_frequency());
-}
-
-void rp_init_measure_cpu_time()
-{
-    rb_define_const(mProf, "CPU_TIME", INT2NUM(MEASURE_CPU_TIME));
-    rb_define_const(mProf, "CPU_TIME_ENABLED", Qtrue);
-
-    cMeasureCpuTime = rb_define_class_under(mMeasure, "CpuTime", rb_cObject);
-    rb_define_singleton_method(cMeasureCpuTime, "measure", prof_measure_cpu_time, 0);
-    rb_define_singleton_method(cMeasureCpuTime, "frequency", prof_get_cpu_frequency, 0);
-}

data/ext/ruby_prof/rp_measure_gc_runs.c

@@ -1,73 +0,0 @@
-/* Copyright (C) 2005-2013 Shugo Maeda <shugo@ruby-lang.org> and Charlie Savage <cfis@savagexi.com>
-   Please see the LICENSE file for copyright and distribution information */
-
-/* :nodoc: */
-
-#include "ruby_prof.h"
-
-static VALUE cMeasureGcRuns;
-
-#if defined(HAVE_RB_GC_COLLECTIONS)
-  VALUE rb_gc_collections(void);
-#endif
-
-#if defined(HAVE_RB_GC_COUNT)
-  size_t rb_gc_count(void);
-#endif
-
-#if defined(HAVE_RB_GC_HEAP_INFO)
-  VALUE rb_gc_heap_info(void);
-#endif
-
-
-static double
-measure_gc_runs()
-{
-#if defined(HAVE_RB_GC_COLLECTIONS)
-#define MEASURE_GC_RUNS_ENABLED Qtrue
-  return NUM2INT(rb_gc_collections());
-
-#elif defined(HAVE_RB_GC_COUNT)
-#define MEASURE_GC_RUNS_ENABLED Qtrue
-  return rb_gc_count();
-
-#elif defined(HAVE_RB_GC_HEAP_INFO)
-#define MEASURE_GC_RUNS_ENABLED Qtrue
-  VALUE h = rb_gc_heap_info();
-  return NUM2UINT(rb_hash_aref(h, rb_str_new2("num_gc_passes")));
-
-#else
-#define MEASURE_GC_RUNS_ENABLED Qfalse
-  return 0;
-#endif
-}
-
-prof_measurer_t* prof_measurer_gc_runs()
-{
-  prof_measurer_t* measure = ALLOC(prof_measurer_t);
-  measure->measure = measure_gc_runs;
-  return measure;
-}
-
-/* call-seq:
-   measure -> int
-
-Returns the number of GC runs.*/
-static VALUE
-prof_measure_gc_runs(VALUE self)
-{
-#if defined(HAVE_LONG_LONG)
-    return ULL2NUM(measure_gc_runs());
-#else
-    return ULONG2NUM(measure_gc_runs());
-#endif
-}
-
-void rp_init_measure_gc_runs()
-{
-    rb_define_const(mProf, "GC_RUNS", INT2NUM(MEASURE_GC_RUNS));
-    rb_define_const(mProf, "GC_RUNS_ENABLED", MEASURE_GC_RUNS_ENABLED);
-    
-    cMeasureGcRuns = rb_define_class_under(mMeasure, "GcRuns", rb_cObject);
-    rb_define_singleton_method(cMeasureGcRuns, "measure", prof_measure_gc_runs, 0);
-}

data/ext/ruby_prof/rp_measure_gc_time.c

@@ -1,60 +0,0 @@
-/* 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 */
-
-/* :nodoc: */
-
-#include "ruby_prof.h"
-
-static VALUE cMeasureGcTimes;
-
-#if defined(HAVE_RB_GC_TIME)
-  VALUE rb_gc_time();
-#endif
-
-static double
-measure_gc_time()
-{
-#if defined(HAVE_RB_GC_TOTAL_TIME)
-#define MEASURE_GC_TIME_ENABLED Qtrue
-    return rb_gc_total_time();
-
-#elif defined(HAVE_RB_GC_TIME)
-#define MEASURE_GC_TIME_ENABLED Qtrue
-    const double conversion = 1000000.0;
-#if HAVE_LONG_LONG
-    return NUM2LL(rb_gc_time()) / conversion;
-#else
-    return NUM2LONG(rb_gc_time()) / conversion;
-#endif
-
-#else
-#define MEASURE_GC_TIME_ENABLED Qfalse
-    return 0.0;
-#endif
-}
-
-prof_measurer_t* prof_measurer_gc_time()
-{
-  prof_measurer_t* measure = ALLOC(prof_measurer_t);
-  measure->measure = measure_gc_time;
-  return measure;
-}
-
-/* call-seq:
-   measure -> float
-
-Returns the time spent performing GC.*/
-static VALUE
-prof_measure_gc_time(VALUE self)
-{
-    return rb_float_new(measure_gc_time());
-}
-
-void rp_init_measure_gc_time()
-{
-    rb_define_const(mProf, "GC_TIME", INT2NUM(MEASURE_GC_TIME));
-    rb_define_const(mProf, "GC_TIME_ENABLED", MEASURE_GC_TIME_ENABLED);
-
-    cMeasureGcTimes = rb_define_class_under(mMeasure, "GcTime", rb_cObject);
-    rb_define_singleton_method(cMeasureGcTimes, "measure", prof_measure_gc_time, 0);
-}

data/lib/ruby-prof/aggregate_call_info.rb

@@ -1,76 +0,0 @@
-# encoding: utf-8
-
-module RubyProf
-  class AggregateCallInfo
-    attr_reader :call_infos, :method_info
-
-    def initialize(call_infos, method_info)
-      if call_infos.length == 0
-        raise(ArgumentError, "Must specify at least one call info.")
-      end
-      @call_infos = call_infos
-      @method_info = method_info
-    end
-
-    def target
-      call_infos.first.target
-    end
-
-    def parent
-      call_infos.first.parent
-    end
-
-    def line
-      call_infos.first.line
-    end
-
-    def children
-      call_infos.inject(Array.new) do |result, call_info|
-        result.concat(call_info.children)
-      end
-    end
-
-    def total_time
-      aggregate_roots(:total_time)
-    end
-
-    def self_time
-      aggregate_roots(:self_time)
-    end
-
-    def wait_time
-      aggregate_roots(:wait_time)
-    end
-
-    def children_time
-      aggregate_roots(:children_time)
-    end
-
-    def called
-      aggregate_all(:called)
-    end
-
-    def to_s
-      "#{call_infos.first.target.full_name}"
-    end
-
-    private
-
-    # return all call_infos which are not (grand) children of any other node in the list of given call_infos
-    def roots
-      @roots ||= method_info.recursive? ? CallInfo.roots_of(call_infos) : call_infos
-    end
-
-    def aggregate_all(method_name)
-      call_infos.inject(0) do |sum, call_info|
-        sum + call_info.send(method_name)
-      end
-    end
-
-    def aggregate_roots(method_name)
-      roots.inject(0) do |sum, call_info|
-        sum + call_info.send(method_name)
-      end
-    end
-  end
-end

data/lib/ruby-prof/printers/flat_printer_with_line_numbers.rb

@@ -1,83 +0,0 @@
-# encoding: utf-8
-
-module RubyProf
-  # Generates flat[link:files/examples/flat_txt.html] profile reports as text.
-  # To use the flat printer with line numbers:
-  #
-  #   result = RubyProf.profile do
-  #     [code to profile]
-  #   end
-  #
-  #   printer = RubyProf::FlatPrinterWithLineNumbers.new(result)
-  #   printer.print(STDOUT, {})
-  #
-  class FlatPrinterWithLineNumbers < FlatPrinter
-    def print_methods(thread)
-      @editor = editor_uri
-      total_time = thread.total_time
-
-      methods = thread.methods.sort_by(&sort_method).reverse
-      sum = 0
-      methods.each do |method|
-        self_percent = (method.self_time / total_time) * 100
-        next if self_percent < min_percent
-
-        sum += method.self_time
-        #self_time_called = method.called > 0 ? method.self_time/method.called : 0
-        #total_time_called = method.called > 0? method.total_time/method.called : 0
-
-        @output << "%6.2f  %9.3f %9.3f %9.3f %9.3f %8d  %s%s" % [
-            method.self_time / total_time * 100, # %self
-            method.total_time,                   # total
-            method.self_time,                    # self
-            method.wait_time,                    # wait
-            method.children_time,                # children
-            method.called,                       # calls
-            method.recursive? ? "*" : " ",       # cycle
-            method_name(method)                  # name
-        ]
-         if method.source_file == 'ruby_runtime'
-           @output << "\n"
-         else
-           @output << "\n    defined at:\n"
-           @output << defined_at_format % [File.expand_path(method.source_file), method.line]
-         end
-
-         callers = []
-         method.call_infos.each do |ci|
-           if ci.parent && ci.parent.target.source_file != 'ruby_runtime'
-             callers << [method_name(ci.parent.target), File.expand_path(ci.parent.target.source_file), ci.parent.target.line]
-           end
-         end
-         # make sure callers are unique
-         callers.uniq!
-
-         unless callers.empty?
-           @output << "    called from:\n"
-           callers.each do |args|
-             @output << called_from_format % args
-           end
-         end
-         @output << "\n"
-      end
-    end
-
-    private
-
-    def defined_at_format
-      if @editor
-        "      #{@editor}://open?url=file://%s&line=%s\n"
-      else
-        "      %s:%s\n"
-      end
-    end
-
-    def called_from_format
-      if @editor
-        "      %s (#{@editor}://open?url=file://%s&line=%s)\n"
-      else
-        "      %s (%s:%s)\n"
-      end
-    end
-  end
-end