bleak_house 3.1 → 3.2

data/lib/bleak_house/analyze.rb

@@ -1,139 +0,0 @@
-
-require 'rubygems'
-require 'fileutils'
-require 'base64'
-
-gem 'gruff', '= 0.2.8'
-require 'gruff'
-
-# require, but make rdoc not whine
-load "#{File.dirname(__FILE__)}/gruff_hacks.rb"
-load "#{File.dirname(__FILE__)}/support_methods.rb"
-
-Gruff::Base::LEFT_MARGIN = 200
-Gruff::Base::NEGATIVE_TOP_MARGIN = 30
-Gruff::Base::MAX_LEGENDS = 28
-
-class BleakHouse
-  class Analyze    
-    
-    DIR = "#{RAILS_ROOT}/log/bleak_house/"
-    
-    def initialize(data, increments, name)
-      @data = data
-      @increments = increments
-      @name = name
-    end 
-    
-    def draw    
-      g = Gruff::Line.new("1024x768")
-      g.title = @name
-      g.x_axis_label = "time"
-      g.legend_font_size = g.legend_box_size = 14
-      g.title_font_size = 24
-      g.marker_font_size = 14
-            
-      @data.map do |key, values|
-        name = if key.to_s == ""
-          '[Unknown]' 
-        else
-#        elsif key =~ Regexp.new(@specials.keys.join('|'))
-#          name = "#{key} (#{values.to_i.max / (2**10)} MB)"
-#          @specials.each do |regex, scale|
-#            values.map! {|x| x * scale} if key =~ regex
-#          end              
-#        else
-          "#{key.gsub(/.*::/, '')} (#{values.to_i.max})"
-        end
-        [name, values]
-      end.sort_by do |key, values|
-        0 - key[/.*?([\d]+)\)$/, 1].to_i
-      end.each do |key, values|
-        g.data(key, values.to_i)
-      end
-      
-      labels = {}
-      mod = (@increments.size / 4.0).ceil
-      @increments.each_with_index do |increment, index|
-        labels[index] = increment.split(" ").last if (index % mod).zero?
-      end
-      g.labels = labels
-      
-      g.minimum_value = 0
-#      g.maximum_value = @maximum
-      
-      g.write(@name.to_filename + ".png")
-    end
-    
-    def self.aggregate(data, selector, namer)
-      aggregate_data = {}
-      increments = []
-      data.each_with_index do |frameset, index|
-        increments << frameset.time
-        frameset.data.keys.select do |key| 
-          key =~ selector #or key =~ Regexp.new(specials.keys.join('|'))
-        end.each do |key|
-          aggregate_data[key.to_s[namer, 1]] ||= []
-          aggregate_data[key.to_s[namer, 1]][index] += frameset.data[key].to_i
-        end
-      end
-      [aggregate_data, increments]
-    end
-    
-    def self.build_all(filename)
-      unless File.exists? filename
-        puts "No data file found: #{filename}"
-        exit 
-      end
-      FileUtils.rm_r(DIR) rescue nil
-      Dir.mkdir(DIR)
-
-      Dir.chdir(DIR) do        
-
-        puts "Parsing data"
-        data = File.open(filename).readlines.map do |line|
-          Marshal.load Base64.decode64(line)
-        end
-        
-#        data_maximum = data.flatten.inject(0) do |max, el|
-#          if el.is_a? Hash
-#            current_max = el.merge({:"real memory" => 0, :"virtual memory" => 0}).values.to_i.max
-#            current_max if max < current_max
-#          end or max
-#        end
-#        mem_maximum = data.flatten.inject(0) do |max, el| # only real memory (RSS) for now
-#          (el["real memory"] if el.is_a?(Hash) and max < el["real memory"]) or max
-#        end
-#        mem_scale = data_maximum / mem_maximum.to_f
-#        scales = {/memory$/ => mem_scale}
-        
-        puts "By controller"
-        controller_data, increments = aggregate(data, //, /^(.*?)($|\/|::::)/)
-        Analyze.new(controller_data, increments, "objects by controller").draw
-                
-        # in each controller, by action
-        puts "By action"
-        controller_data.keys.each do |controller|
-          puts "  ...in #{controller} controller"
-          Dir.descend(controller) do             
-            action_data, increments = aggregate(data, /^#{controller}($|\/|::::)/, /\/(.*?)($|\/|::::)/)
-            Analyze.new(action_data, increments, "objects by action in /#{controller}").draw
-          
-          # in each action, by object class
-          action_data.keys.each do |action|
-            action = "unknown" if action.to_s == ""
-            puts "    ...in #{action} action"
-            Dir.descend(action) do
-              class_data, increments = aggregate(data, /^#{controller}#{"\/#{action}" unless action == "unknown"}($|\/|::::)/, 
-                /::::(.*)/)
-              Analyze.new(class_data, increments, "objects by class in /#{controller}/#{action}").draw
-            end
-          end
-          
-          end          
-        end
-      end    
-    end 
-    
-  end
-end

data/lib/bleak_house/bleak_house.rb

@@ -1,33 +0,0 @@
-
-class BleakHouse  
-  cattr_accessor :last_request_name
-  cattr_accessor :dispatch_count
-  cattr_accessor :log_interval
-
-  self.dispatch_count = 0
-  self.log_interval = (ENV['INTERVAL'] and ENV['INTERVAL'].to_i or 10)
-
-  def self.set_request_name request, other = nil
-    self.last_request_name = "#{request.parameters['controller']}/#{request.parameters['action']}/#{request.request_method}#{other}"
-  end
-
-  def self.debug s
-    s = "#{name.underscore}: #{s}"
-    ::ActiveRecord::Base.logger.debug s if ::ActiveRecord::Base.logger
-  end
-    
-  def self.warn s
-    s = "#{name.underscore}: #{s}"
-    if ::ActiveRecord::Base.logger
-      ::ActiveRecord::Base.logger.warn s
-    else
-      $stderr.puts s
-    end
-  end
-
-  LOGFILE = "#{RAILS_ROOT}/log/bleak_house_#{RAILS_ENV}.dump"
-  if File.exists?(LOGFILE)
-    File.rename(LOGFILE, "#{LOGFILE}.old") 
-    warn "renamed old logfile"
-  end
-end

data/lib/bleak_house/dispatcher.rb

@@ -1,23 +0,0 @@
-
-# crazyness
-
-class Dispatcher
-  class << self
-    def prepare_application_with_bleak_house
-      prepare_application_without_bleak_house
-      BleakHouse.dispatch_count += 1
-      BleakHouse::MemLogger.snapshot('core rails')
-    end
-    alias_method_chain :prepare_application, :bleak_house
-    
-    def reset_after_dispatch_with_bleak_house
-      BleakHouse::MemLogger.snapshot(BleakHouse.last_request_name || 'unknown')
-      if (BleakHouse.dispatch_count % BleakHouse.log_interval).zero?
-        BleakHouse.warn "wrote frameset (#{BleakHouse.dispatch_count} dispatches)"
-        BleakHouse::MemLogger.log(BleakHouse::LOGFILE)
-      end
-      reset_after_dispatch_without_bleak_house
-    end
-    alias_method_chain :reset_after_dispatch, :bleak_house
-  end
-end

data/lib/bleak_house/gruff_hacks.rb

@@ -1,56 +0,0 @@
-
-class Gruff::Base
-  
-  def draw_legend
-    @legend_labels = @data.collect {|item| item[DATA_LABEL_INDEX] }
-
-    legend_square_width = @legend_box_size # small square with color of this item
-    legend_left = 10
-
-    current_x_offset = legend_left
-    current_y_offset =  TOP_MARGIN + TITLE_MARGIN + @title_caps_height + LEGEND_MARGIN
-
-    debug { @d.line 0.0, current_y_offset, @raw_columns, current_y_offset }
-                                                  
-    @legend_labels.each_with_index do |legend_label, index|      
-
-      next if index > MAX_LEGENDS
-      legend_label = "Some not shown" if index == MAX_LEGENDS
-
-      # Draw label
-      @d.fill = @font_color
-      @d.font = @font if @font
-      @d.pointsize = scale_fontsize(@legend_font_size)
-      @d.stroke('transparent')
-      @d.font_weight = NormalWeight
-      @d.gravity = WestGravity
-      @d = @d.annotate_scaled( @base_image, 
-                        @raw_columns, 1.0,
-                        current_x_offset + (legend_square_width * 1.7), current_y_offset, 
-                        legend_label.to_s, @scale)
-      
-      if index < MAX_LEGENDS
-      # Now draw box with color of this dataset
-        @d = @d.stroke('transparent')
-        @d = @d.fill @data[index][DATA_COLOR_INDEX]
-        @d = @d.rectangle(current_x_offset, 
-                          current_y_offset - legend_square_width / 2.0, 
-                          current_x_offset + legend_square_width, 
-                          current_y_offset + legend_square_width / 2.0)
-      end
-
-      @d.pointsize = @legend_font_size
-      metrics = @d.get_type_metrics(@base_image, legend_label.to_s)
-      current_y_offset += metrics.height * 1.05
-    end
-    @color_index = 0
-  end
-  
-  alias :setup_graph_measurements_without_top_margin :setup_graph_measurements
-  def setup_graph_measurements  
-    setup_graph_measurements_without_top_margin
-    @graph_height += NEGATIVE_TOP_MARGIN
-    @graph_top -= NEGATIVE_TOP_MARGIN    
-  end
-  
-end

data/lib/bleak_house/mem_logger.rb

@@ -1,54 +0,0 @@
-
-require 'base64'
-
-class BleakHouse::MemLogger
-  class << self
-
-    SEEN = {}
-    CURRENT = {}
-    TAGS = Hash.new(0)
-    TIMEFORMAT = '%Y-%m-%d %H:%M:%S'
-    VSZ = "virtual memory"
-    RSS = "real memory"
-
-    def log(path, with_mem = false)
-      File.open(path, 'a+') do |log|
-        log.sync = true
-        TAGS[VSZ], TAGS[RSS] = mem_usage if with_mem
-        log.puts Base64.encode64(Marshal.dump([Time.now.strftime(TIMEFORMAT), TAGS])).gsub("\n", '')
-      end
-      GC.start
-    end
-    
-    def snapshot(tag)
-#      puts "bleak_house: seen: #{SEEN.size}"
-      CURRENT.clear
-      ObjectSpace.each_object do |obj|
-        CURRENT[obj_id = obj._bleak_house_object_id] = true
-        unless SEEN[obj_id]
-          # symbols will rapidly stabilize; don't worry
-          SEEN[obj_id] = "#{tag}::::#{obj._bleak_house_class}".to_sym 
-          TAGS[SEEN[obj_id]] += 1
-        end
-      end
-#      puts "bleak_house: current: #{CURRENT.size}"
-      SEEN.keys.each do |obj_id|
-        TAGS[SEEN.delete(obj_id)] -= 1 unless CURRENT[obj_id]          
-      end
- #     puts "bleak_house: done"
-      CURRENT.clear
-      GC.start
-    end        
-    
-    def mem_usage
-      `ps -x -o 'rss vsz' -p #{Process.pid}`.split(/\s+/)[-2..-1].map{|el| el.to_i}
-    end
-    
-  end
-end
-
-class Object
-  alias :_bleak_house_object_id :object_id
-  alias :_bleak_house_class  :class
-end
-

data/tasks/bleak_house_tasks.rake

@@ -1,13 +0,0 @@
-
-namespace :bleak_house do
-  desc 'Analyze and chart all data'  
-  task :analyze do    
-    begin
-      require "#{File.dirname(__FILE__)}/../lib/bleak_house/analyze"
-    rescue LoadError
-      require 'bleak_house/analyze' 
-    end        
-    BleakHouse::Analyze.build_all("#{RAILS_ROOT}/log/bleak_house_#{RAILS_ENV}.dump")
-  end  
-end
-