ssoroka-bleak_house 4.1.1

data/ruby/valgrind.patch

@@ -0,0 +1,123 @@
+Index: Makefile.in
+===================================================================
+--- Makefile.in	(revision 6439)
++++ Makefile.in	(working copy)
+@@ -34,7 +34,7 @@
+ 
+ empty =
+ OUTFLAG = @OUTFLAG@$(empty)
+-CFLAGS = @CFLAGS@ @XCFLAGS@ @ARCH_FLAG@
++CFLAGS = @CFLAGS@ @XCFLAGS@ @ARCH_FLAG@ @VALGRIND_CFLAGS@
+ CPPFLAGS = -I. -I$(srcdir) @CPPFLAGS@
+ LDFLAGS = @STATIC@ $(CFLAGS) @LDFLAGS@
+ EXTLDFLAGS = 
+Index: configure.in
+===================================================================
+--- configure.in	(revision 6439)
++++ configure.in	(working copy)
+@@ -895,6 +895,22 @@
+     fi
+ fi
+ 
++AC_ARG_ENABLE(valgrind,
++       [  --enable-valgrind       use valgrind support],
++       [want_valgrind=$enableval], [want_valgrind=auto])
++
++if test x"$want_valgrind" != xno; then
++  AC_CHECK_HEADERS(valgrind/memcheck.h, have_valgrind=yes, have_valgrind=no)
++	if test x"$have_valgrind" = xyes; then
++		AC_DEFINE(HAVE_VALGRIND)
++		VALGRIND_CFLAGS="";
++	elif test x"$want_valgrind" = xyes -a x"$have_valgrind" = xno; then
++		AC_MSG_ERROR(valgrind support requested but valgrind not found)
++	else
++	  VALGRIND_CFLAGS="";
++	fi
++fi
++
+ dnl default value for $KANJI
+ DEFAULT_KCODE="KCODE_NONE"
+ 
+@@ -1504,6 +1520,7 @@
+ esac
+ 
+ AC_SUBST(XCFLAGS)dnl
++AC_SUBST(VALGRIND_CFLAGS)dnl
+ AC_SUBST(XLDFLAGS)dnl
+ AC_SUBST(LIBRUBY_LDSHARED)
+ AC_SUBST(LIBRUBY_DLDFLAGS)
+Index: eval.c
+===================================================================
+--- eval.c	(revision 6439)
++++ eval.c	(working copy)
+@@ -28,6 +28,12 @@
+ #define EXIT_FAILURE 1
+ #endif
+ 
++#ifdef HAVE_VALGRIND
++#include <valgrind/memcheck.h>
++#else
++#define VALGRIND_MAKE_MEM_DEFINED(p, n) /* empty */
++#endif
++
+ #include <stdio.h>
+ 
+ #include "st.h"
+@@ -5225,6 +5231,9 @@
+     int pcall;
+ {
+     ruby_current_node = lhs;
++
++    VALGRIND_MAKE_MEM_DEFINED(&val, sizeof(val));
++
+     if (val == Qundef) {
+ 	rb_warning("assigning void value");
+ 	val = Qnil;
+Index: gc.c
+===================================================================
+--- gc.c	(revision 6439)
++++ gc.c	(working copy)
+@@ -30,6 +30,12 @@
+ #include <sys/resource.h>
+ #endif
+ 
++#ifdef HAVE_VALGRIND
++#include <valgrind/memcheck.h>
++#else
++#define VALGRIND_MAKE_MEM_DEFINED(p, n) /* empty */
++#endif
++
+ #if defined _WIN32 || defined __CYGWIN__
+ #include <windows.h>
+ #endif
+@@ -93,6 +99,9 @@
+ {
+     void *mem;
+ 
++    VALGRIND_MAKE_MEM_DEFINED(&malloc_increase, sizeof(malloc_increase));
++    VALGRIND_MAKE_MEM_DEFINED(&malloc_limit, sizeof(malloc_limit));
++
+     if (size < 0) {
+ 	rb_raise(rb_eNoMemError, "negative allocation size (or too big)");
+     }
+@@ -623,6 +632,9 @@
+     register long n;
+ {
+     VALUE v;
++
++    VALGRIND_MAKE_MEM_DEFINED(x, sizeof(*x) * n);
++
+     while (n--) {
+         v = *x;
+ 	if (is_pointer_to_heap((void *)v)) {
+@@ -713,7 +725,10 @@
+ {
+     register RVALUE *obj;
+ 
++    VALGRIND_MAKE_MEM_DEFINED(&ptr, sizeof(ptr));
+     obj = RANY(ptr);
++    VALGRIND_MAKE_MEM_DEFINED(obj, sizeof(*obj));
++
+     if (rb_special_const_p(ptr)) return; /* special const not marked */
+     if (obj->as.basic.flags == 0) return;       /* free cell */
+     if (obj->as.basic.flags & FL_MARK) return;  /* already marked */

data/test/benchmark/bench.rb

@@ -0,0 +1,16 @@
+#!/usr/bin/env ruby
+
+require 'rubygems'
+require 'dike'
+$LOAD_PATH.unshift(File.dirname(__FILE__) + "/../../lib")
+require 'bleak_house'
+
+Dike.logfactory("/tmp")
+if ARGV[0] 
+  Dike.finger
+  exec('cat /tmp/0')
+else
+  BleakHouse.snapshot("/tmp/0")
+  exec("#{$LOAD_PATH.first}/../bin/bleak /tmp/0")
+end
+

data/test/test_helper.rb

@@ -0,0 +1,6 @@
+
+require 'test/unit'
+require 'open-uri'
+
+HERE = File.expand_path(File.dirname(__FILE__))
+$LOAD_PATH << HERE

data/test/unit/test_bleak_house.rb

@@ -0,0 +1,52 @@
+
+$LOAD_PATH.unshift(File.dirname(__FILE__) + "/../../lib")
+
+ENV['NO_EXIT_HANDLER'] = "1"
+
+require 'rubygems'
+require 'echoe'
+require 'test/unit'
+require 'bleak_house'
+  
+class BleakHouseTest < Test::Unit::TestCase
+
+  # Match the default hook filename, for convenience
+  FILE =  "/tmp/bleak.#{Process.pid}.0.dump" 
+
+  def setup
+    File.delete FILE rescue nil
+  end
+
+  def test_snapshot
+    symbol_count = Symbol.all_symbols.size
+    BleakHouse.snapshot(FILE)
+    assert File.exist?(FILE)
+    assert BleakHouse.heaps_used > 0
+    assert BleakHouse.heaps_length > 0    
+  end
+  
+  def test_exception
+    assert_raises(RuntimeError) do
+      BleakHouse.snapshot("/")
+    end    
+  end
+  
+  def test_analyze
+    BleakHouse.snapshot(FILE)
+    Dir.chdir(File.dirname(__FILE__) + "/../../bin") do
+      output = `./bleak #{FILE}`.split("\n")
+      # require 'ruby-debug/debugger'
+      assert_match(/top 20 most common/, output[0])
+      assert_match(/free heap/, output[3])
+      assert_match(/\d+ __null__:__null__:__node__/, output[4])
+    end
+  end
+  
+  def test_signal
+    Echoe.silence do
+      system("kill -s SIGUSR2 #{Process.pid}")
+    end
+    assert File.exist?(FILE)
+  end
+
+end

metadata

@@ -0,0 +1,99 @@
+--- !ruby/object:Gem::Specification 
+name: ssoroka-bleak_house
+version: !ruby/object:Gem::Version 
+  version: 4.1.1
+platform: ruby
+authors: 
+- Evan Weaver
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2008-12-01 00:00:00 -08:00
+default_executable: bleak
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: echoe
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: "0"
+    version: 
+description: A library for finding memory leaks.
+email: ""
+executables: 
+- bleak
+extensions: 
+- ext/extconf.rb
+extra_rdoc_files: 
+- CHANGELOG
+- ext/snapshot.c
+- lib/bleak_house/analyzer.rb
+- lib/bleak_house/hook.rb
+- lib/bleak_house.rb
+- LICENSE
+- LICENSE_BSD
+- README
+- TODO
+files: 
+- bin/bleak
+- bleak_house.gemspec
+- CHANGELOG
+- ext/build_ruby.rb
+- ext/build_snapshot.rb
+- ext/extconf.rb
+- ext/snapshot.c
+- ext/snapshot.h
+- lib/bleak_house/analyzer.rb
+- lib/bleak_house/hook.rb
+- lib/bleak_house.rb
+- LICENSE
+- LICENSE_BSD
+- Manifest
+- Rakefile
+- README
+- ruby/configure.patch
+- ruby/gc.patch
+- ruby/ruby-1.8.6-p230.tar.bz2
+- ruby/valgrind.patch
+- test/benchmark/bench.rb
+- test/test_helper.rb
+- test/unit/test_bleak_house.rb
+- TODO
+has_rdoc: true
+homepage: http://blog.evanweaver.com/files/doc/fauna/bleak_house/
+post_install_message: 
+rdoc_options: 
+- --line-numbers
+- --inline-source
+- --title
+- Bleak_house
+- --main
+- README
+require_paths: 
+- lib
+- ext
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "1.2"
+  version: 
+requirements: []
+
+rubyforge_project: fauna
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 2
+summary: A library for finding memory leaks.
+test_files: 
+- test/test_helper.rb
+- test/unit/test_bleak_house.rb