newrelic_rpm 2.8.0

data/test/new_relic/tc_deployments_api.rb

@@ -0,0 +1,37 @@
+require File.expand_path(File.join(File.dirname(__FILE__),'/../test_helper'))
+require 'new_relic_api'
+class NewRelic::DeploymentsTests < Test::Unit::TestCase
+  
+  def setup
+    NewRelic::API::Deployments.class_eval do
+      attr_accessor :messages, :exit_status, :errors, :revision
+      def err(message); @errors = @errors ? @errors + message : message; end
+      def info(message); @messages = @messages ? @messages + message : message; end
+      def just_exit(status=0); @exit_status ||= status; end
+    end
+  end
+  def teardown
+    return unless @deployment
+    puts @deployment.errors
+    puts @deployment.messages
+    puts @deployment.exit_status
+  end
+  def test_help
+    @deployment = NewRelic::API::Deployments.new "-?"
+    assert_equal 0, @deployment.exit_status
+    assert_match /^Usage/, @deployment.messages
+    assert_nil @deployment.revision
+    @deployment = nil
+  end
+  def test_run
+    @deployment = NewRelic::API::Deployments.new(%w[-a APP -r 3838 --user=Bill] << "Some lengthy description")
+    assert_nil @deployment.exit_status
+    assert_nil @deployment.errors
+    assert_equal '3838', @deployment.revision
+    @deployment.run
+    assert_equal 1, @deployment.exit_status
+    assert_match /Unable to upload/, @deployment.errors
+    @deployment = nil
+  end
+  
+end

data/test/new_relic/tc_environment.rb

@@ -0,0 +1,94 @@
+require File.expand_path(File.join(File.dirname(__FILE__),'..', 'test_helper'))
+require "test/unit"
+require "mocha"
+##require 'new_relic/local_environment'
+class EnvironmentTest < ActiveSupport::TestCase
+  
+  def teardown
+    # To remove mock server instances from ObjectSpace
+    ObjectSpace.garbage_collect
+    super
+  end
+  class MockOptions
+    def fetch (*args)
+      1000
+    end
+  end
+  MOCK_OPTIONS = MockOptions.new
+  
+  def test_environment
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :unknown, e.environment
+    assert_nil e.identifier
+  end
+  def test_webrick
+    Object.const_set :OPTIONS, { :port => 3000 }
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :webrick, e.environment
+    assert_equal 3000, e.identifier
+    Object.class_eval { remove_const :OPTIONS }
+  end
+  def test_no_webrick
+    Object.const_set :OPTIONS, 'foo'
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :unknown, e.environment
+    assert_nil e.identifier
+    Object.class_eval { remove_const :OPTIONS }
+  end
+  def test_mongrel
+    
+    class << self
+      module ::Mongrel
+        class HttpServer
+          def port; 3000; end
+        end
+      end
+    end
+    Mongrel::HttpServer.new
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :mongrel, e.environment
+    assert_equal 3000, e.identifier
+    Mongrel::HttpServer.class_eval {undef_method :port}
+  end
+  def test_thin
+    class << self
+      module ::Thin
+        class Server
+          def backend; self; end
+          def socket; "/socket/file.000"; end
+        end
+      end
+    end
+    mock_thin = Thin::Server.new
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :thin, e.environment
+    assert_equal '/socket/file.000', e.identifier
+    mock_thin
+  end
+  def test_litespeed
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :unknown, e.environment
+    assert_nil e.identifier
+  end
+  def test_passenger
+    class << self
+      module ::Passenger
+        const_set "AbstractServer", 0
+      end
+    end
+    e = NewRelic::LocalEnvironment.new
+    assert_equal :passenger, e.environment
+    assert_equal 'passenger', e.identifier
+
+    NewRelic::Config.instance.instance_eval do
+      @settings['app_name'] = 'myapp'
+    end
+    
+    e = NewRelic::LocalEnvironment.new 
+    assert_equal :passenger, e.environment
+    assert_equal 'passenger:myapp', e.identifier
+    
+    ::Passenger.class_eval { remove_const :AbstractServer }
+  end
+
+end

data/test/new_relic/tc_metric_spec.rb

@@ -0,0 +1,150 @@
+require File.expand_path(File.join(File.dirname(__FILE__),'..', 'test_helper'))
+##require "new_relic/stats"
+class NewRelic::StatsTests < Test::Unit::TestCase
+  
+  def test_simple
+    stats = NewRelic::MethodTraceStats.new 
+    validate stats, 0, 0, 0, 0
+    
+    assert_equal stats.call_count,0
+    stats.trace_call 10
+    stats.trace_call 20
+    stats.trace_call 30
+    
+    validate stats, 3, (10+20+30), 10, 30
+  end
+  
+  def test_equal
+    spec1 = NewRelic::MetricSpec.new('Controller')
+    spec2 = NewRelic::MetricSpec.new('Controller', nil)
+    
+    assert spec1.eql?(NewRelic::MetricSpec.new('Controller'))
+    assert spec2.eql?(NewRelic::MetricSpec.new('Controller', nil))
+    assert !spec1.eql?(spec2)
+    assert !spec2.eql?(NewRelic::MetricSpec.new('Controller', '/dude'))
+  end
+  
+  def test_merge
+    s1 = NewRelic::MethodTraceStats.new
+    s2 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10
+    s2.trace_call 20
+    s2.freeze
+    
+    validate s2, 1, 20, 20, 20
+    s3 = s1.merge s2
+    validate s3, 2, (10+20), 10, 20
+    validate s1, 1, 10, 10, 10
+    validate s2, 1, 20, 20, 20
+    
+    s1.merge! s2
+    validate s1, 2, (10+20), 10, 20
+    validate s2, 1, 20, 20, 20
+  end
+  
+  def test_merge_with_exclusive
+    s1 = NewRelic::MethodTraceStats.new
+    
+    s2 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10, 5
+    s2.trace_call 20, 10
+    s2.freeze
+    
+    validate s2, 1, 20, 20, 20, 10
+    s3 = s1.merge s2
+    validate s3, 2, (10+20), 10, 20, (10+5)
+    validate s1, 1, 10, 10, 10, 5
+    validate s2, 1, 20, 20, 20, 10
+    
+    s1.merge! s2
+    validate s1, 2, (10+20), 10, 20, (5+10)
+    validate s2, 1, 20, 20, 20, 10
+  end
+  
+  def test_merge_array
+    s1 = NewRelic::MethodTraceStats.new
+    merges = []
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    
+    s1.merge! merges
+    validate s1, 3, 3, 1, 1
+  end
+  
+  def test_freeze
+    s1 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10
+    s1.freeze
+    
+    begin
+      # the following should throw an exception because s1 is frozen
+      s1.trace_call 20
+      assert false
+    rescue StandardError
+      assert s1.frozen?
+      validate s1, 1, 10, 10, 10
+    end
+  end
+  
+  def test_std_dev
+    s = NewRelic::MethodTraceStats.new
+    
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    assert s.standard_deviation == 0
+    
+    s = NewRelic::MethodTraceStats.new
+    s.trace_call 4
+    s.trace_call 7
+    s.trace_call 13
+    s.trace_call 16
+    s.trace_call 8
+    s.trace_call 4
+    assert_equal(s.sum_of_squares, 4**2 + 7**2 + 13**2 + 16**2 + 8**2 + 4**2)
+    
+    s.trace_call 9
+    s.trace_call 3
+    s.trace_call 1000
+    s.trace_call 4
+    
+    # calculated stdev (population, not sample) from a spreadsheet.
+    assert_in_delta(s.standard_deviation, 297.76, 0.01)
+  end
+  
+  def test_std_dev_merge
+    s1 = NewRelic::MethodTraceStats.new
+    s1.trace_call 4
+    s1.trace_call 7
+    
+    s2 = NewRelic::MethodTraceStats.new
+    s2.trace_call 13
+    s2.trace_call 16
+    
+    s3 = s1.merge(s2)
+    
+    assert(s1.sum_of_squares, 4*4 + 7*7)
+    assert_in_delta(s1.standard_deviation, 1.5, 0.01)
+    
+    assert_in_delta(s2.standard_deviation, 1.5, 0.01)
+    assert_equal(s3.sum_of_squares, 4*4 + 7*7 + 13*13 + 16*16, "check sum of squares")
+    assert_in_delta(s3.standard_deviation, 4.743, 0.01)
+  end
+  
+  private
+  def validate (stats, count, total, min, max, exclusive = nil)
+    assert_equal stats.call_count, count
+    assert_equal stats.total_call_time, total
+    assert_equal stats.average_call_time, (count > 0 ? total / count : 0)
+    assert_equal stats.min_call_time, min
+    assert_equal stats.max_call_time, max
+    assert_equal stats.total_exclusive_time, exclusive if exclusive
+  end
+end

data/test/new_relic/tc_shim_agent.rb

@@ -0,0 +1,9 @@
+require File.expand_path(File.join(File.dirname(__FILE__),'/../test_helper'))
+# TODO
+class NewRelic::ShimAgentTests < Test::Unit::TestCase
+  
+  def test_shim
+  end
+  
+
+end

data/test/new_relic/tc_stats.rb

@@ -0,0 +1,141 @@
+require File.expand_path(File.join(File.dirname(__FILE__),'..', 'test_helper'))
+##require "new_relic/stats"
+
+class NewRelic::StatsTests < Test::Unit::TestCase
+  
+  def test_simple
+    stats = NewRelic::MethodTraceStats.new 
+    validate stats, 0, 0, 0, 0
+    
+    assert_equal stats.call_count,0
+    stats.trace_call 10
+    stats.trace_call 20
+    stats.trace_call 30
+    
+    validate stats, 3, (10+20+30), 10, 30
+  end
+  
+  def test_merge
+    s1 = NewRelic::MethodTraceStats.new
+    s2 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10
+    s2.trace_call 20
+    s2.freeze
+    
+    validate s2, 1, 20, 20, 20
+    s3 = s1.merge s2
+    validate s3, 2, (10+20), 10, 20
+    validate s1, 1, 10, 10, 10
+    validate s2, 1, 20, 20, 20
+    
+    s1.merge! s2
+    validate s1, 2, (10+20), 10, 20
+    validate s2, 1, 20, 20, 20
+  end
+  
+  def test_merge_with_exclusive
+    s1 = NewRelic::MethodTraceStats.new
+    
+    s2 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10, 5
+    s2.trace_call 20, 10
+    s2.freeze
+    
+    validate s2, 1, 20, 20, 20, 10
+    s3 = s1.merge s2
+    validate s3, 2, (10+20), 10, 20, (10+5)
+    validate s1, 1, 10, 10, 10, 5
+    validate s2, 1, 20, 20, 20, 10
+    
+    s1.merge! s2
+    validate s1, 2, (10+20), 10, 20, (5+10)
+    validate s2, 1, 20, 20, 20, 10
+  end
+  
+  def test_merge_array
+    s1 = NewRelic::MethodTraceStats.new
+    merges = []
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    merges << (NewRelic::MethodTraceStats.new.trace_call 1)
+    
+    s1.merge! merges
+    validate s1, 3, 3, 1, 1
+  end
+  
+  def test_freeze
+    s1 = NewRelic::MethodTraceStats.new
+    
+    s1.trace_call 10
+    s1.freeze
+    
+    begin
+      # the following should throw an exception because s1 is frozen
+      s1.trace_call 20
+      assert false
+    rescue StandardError
+      assert s1.frozen?
+      validate s1, 1, 10, 10, 10
+    end
+  end
+  
+  def test_std_dev
+    s = NewRelic::MethodTraceStats.new
+    
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    s.trace_call 10
+    assert s.standard_deviation == 0
+    
+    s = NewRelic::MethodTraceStats.new
+    s.trace_call 4
+    s.trace_call 7
+    s.trace_call 13
+    s.trace_call 16
+    s.trace_call 8
+    s.trace_call 4
+    assert_equal(s.sum_of_squares, 4**2 + 7**2 + 13**2 + 16**2 + 8**2 + 4**2)
+    
+    s.trace_call 9
+    s.trace_call 3
+    s.trace_call 1000
+    s.trace_call 4
+    
+    # calculated stdev (population, not sample) from a spreadsheet.
+    assert_in_delta(s.standard_deviation, 297.76, 0.01)
+  end
+  
+  def test_std_dev_merge
+    s1 = NewRelic::MethodTraceStats.new
+    s1.trace_call 4
+    s1.trace_call 7
+    
+    s2 = NewRelic::MethodTraceStats.new
+    s2.trace_call 13
+    s2.trace_call 16
+    
+    s3 = s1.merge(s2)
+    
+    assert(s1.sum_of_squares, 4*4 + 7*7)
+    assert_in_delta(s1.standard_deviation, 1.5, 0.01)
+    
+    assert_in_delta(s2.standard_deviation, 1.5, 0.01)
+    assert_equal(s3.sum_of_squares, 4*4 + 7*7 + 13*13 + 16*16, "check sum of squares")
+    assert_in_delta(s3.standard_deviation, 4.743, 0.01)
+  end
+  
+  private
+  def validate (stats, count, total, min, max, exclusive = nil)
+    assert_equal stats.call_count, count
+    assert_equal stats.total_call_time, total
+    assert_equal stats.average_call_time, (count > 0 ? total / count : 0)
+    assert_equal stats.min_call_time, min
+    assert_equal stats.max_call_time, max
+    assert_equal stats.total_exclusive_time, exclusive if exclusive
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,39 @@
+module NewRelic; TEST = true; end unless defined? NewRelic::TEST
+NEWRELIC_PLUGIN_DIR = File.expand_path(File.dirname(__FILE__)+"/..")
+$LOAD_PATH << File.join(NEWRELIC_PLUGIN_DIR,"test")
+$LOAD_PATH.uniq!
+
+require File.expand_path(File.dirname(__FILE__) + "/../../../../config/environment")
+
+require 'test_help'
+require 'mocha'
+require 'test/unit'
+
+
+module NewRelic
+  class Config
+    def setup_log_with_block_logging(*args)
+      silence_stream(::STDERR) { self.setup_log_without_block_logging(*args) }
+    end
+    alias_method_chain :setup_log, :block_logging rescue nil
+  end
+end
+
+# This is a mixin for hacking the select method
+if defined? ActiveRecord::ConnectionAdapters
+  class ActiveRecord::ConnectionAdapters::MysqlAdapter
+    
+    def log_info_with_slowdown(sql, name, seconds)
+      log_info_without_slowdown(sql, name, seconds)
+      sleep 0.1
+    end
+    
+    def setup_slow
+      self.class.alias_method_chain :log_info, :slowdown
+    end
+    
+    def teardown_slow
+      alias :log_info :log_info_without_slowdown
+    end
+  end
+end