devcreek 0.1

data/lib/devcreek.rb

@@ -0,0 +1,10 @@
+# devcreek.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file README.txt in the distribution
+
+require 'devcreek_testrunnermediator.rb' #for test/unit library
+module DevCreek
+  VERSION = "0.1"
+end

data/lib/devcreek_core.rb

@@ -0,0 +1,28 @@
+# devcreek_core.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+require 'yaml'
+
+module DevCreek
+  class Core
+    require 'singleton'
+    require 'socket'
+    include Singleton
+    attr_accessor :principal, :project, :user, :password, :enabled
+    
+    def load(attributes=Hash.new)
+      attributes.each do |key, val|
+        instance_variable_set("@#{key}", val)
+      end
+    end
+
+    def load_from_yaml(file_name)
+      load(YAML.load_file(file_name))
+    end
+  end
+  
+  Core.instance.principal = Socket.gethostname
+end

data/lib/devcreek_record_template.rb

@@ -0,0 +1,67 @@
+# devcreek_record_template.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+module DevCreek
+  TRANSMISSION_RECORD_TEMPLATE = %{
+        <record>
+          <core.principal><%= DevCreek::Core.instance.principal %></core.principal>
+          <core.project><%= DevCreek::Core.instance.project %></core.project>
+          <core.sessionId><%= session_id %></core.sessionId>
+          <core.timeStamp><%= start.localtime.to_i  * 1000 %></core.timeStamp>
+          <core.timeZoneOffset><%= start.localtime.gmt_offset  * 1000 %></core.timeZoneOffset>
+          <core.type>unittest.TestRunStarted</core.type>
+          <unittest.testCount><%= run_count %></unittest.testCount>
+          <unittest.testFramework><%= framework %></unittest.testFramework>
+          <unittest.testLanguage>ruby</unittest.testLanguage>
+          <unittest.testRunLauncher>manual</unittest.testRunLauncher>
+      </record>
+      <% test_results.values.each do |test_result| %>
+        <record>
+            <core.principal><%= DevCreek::Core.instance.principal %></core.principal>
+            <core.project><%= DevCreek::Core.instance.project %></core.project>
+            <core.sessionId><%= session_id %></core.sessionId>
+            <core.timeStamp><%= test_result.start.localtime.to_i  * 1000 %></core.timeStamp>
+            <core.timeZoneOffset><%=  test_result.start.localtime.gmt_offset  * 1000 %></core.timeZoneOffset>
+            <core.type>unittest.TestStarted</core.type>
+            <unittest.testClass><%= test_result.test_class %></unittest.testClass>
+            <unittest.testFramework><%= framework %></unittest.testFramework>
+            <unittest.testLanguage>ruby</unittest.testLanguage>
+            <unittest.testName><%= test_result.test_name %></unittest.testName>
+            <unittest.testRunLauncher>manual</unittest.testRunLauncher>
+        </record>
+        <record>
+            <core.principal><%= DevCreek::Core.instance.principal %></core.principal>
+            <core.project><%= DevCreek::Core.instance.project %></core.project>
+            <core.sessionId><%= session_id %></core.sessionId>
+            <core.timeStamp><%= test_result.finish.localtime.to_i  * 1000 %></core.timeStamp>
+            <core.timeZoneOffset><%=  test_result.finish.localtime.gmt_offset  * 1000 %></core.timeZoneOffset>
+            <core.type>unittest.TestEnded</core.type>
+            <unittest.testClass><%= test_result.test_class %></unittest.testClass>
+            <unittest.testFramework><%= framework %></unittest.testFramework>
+            <unittest.testLanguage>ruby</unittest.testLanguage>
+            <unittest.testName><%= test_result.test_name %></unittest.testName>
+            <unittest.testRunLauncher>manual</unittest.testRunLauncher>
+            <unittest.testStatus><%= test_result.status %></unittest.testStatus>
+        </record>
+      <% end %>
+        <record>
+            <core.elapsedTime><%= elapsed_time %></core.elapsedTime>
+            <core.principal><%= DevCreek::Core.instance.principal %></core.principal>
+            <core.project><%= DevCreek::Core.instance.project %></core.project>
+            <core.sessionId><%= session_id %></core.sessionId>
+            <core.timeStamp><%= finish.localtime.to_i  * 1000 %></core.timeStamp>
+            <core.timeZoneOffset><%=  finish.localtime.gmt_offset  * 1000 %></core.timeZoneOffset>
+            <core.type>unittest.TestRunEnded</core.type>
+            <unittest.errorTotal><%=  error_count %></unittest.errorTotal>
+            <unittest.failureTotal><%=  failure_count %></unittest.failureTotal>
+            <unittest.successTotal><%=  success_count %></unittest.successTotal>
+            <unittest.testFramework><%= framework %></unittest.testFramework>
+            <unittest.testLanguage>ruby</unittest.testLanguage>
+            <unittest.testRunLauncher>manual</unittest.testRunLauncher>
+            <unittest.testRunStatus>ENDED</unittest.testRunStatus>
+        </record>
+      }.gsub(/^  /, '').freeze
+end

data/lib/devcreek_testresult.rb

@@ -0,0 +1,36 @@
+# devcreek_testresult.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+module DevCreek
+  class TestResult
+    OK = "OK"    
+    FAILURE = "FAILURE"    
+    ERROR = "ERROR"    
+    
+    attr_reader :test_name, :test_class, :start, :finish, :status
+    
+    def initialize(test_name, test_class, status=OK, start=Time.now)
+      @test_name, @test_class, @status, @start = test_name, test_class, status, start
+    end
+    
+    def has_finished
+      raise ArgumentError, "The finish time cannot be set twice" unless @finish.nil?
+      @finish = Time.now
+    end
+    
+    def elapsed_time
+      return finish - start unless finish.nil? or start.nil?
+    end
+    
+    def has_a_failure
+      @status = FAILURE    
+    end
+    
+    def has_an_error
+      @status = ERROR    
+    end
+  end
+end

data/lib/devcreek_testrunnermediator.rb

@@ -0,0 +1,80 @@
+# devcreek_testrunnermediator.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+require 'test/unit'
+require 'test/unit/util/observable'
+require 'test/unit/testresult'
+require 'devcreek_testresult'
+require 'devcreek_testsuite'
+require 'devcreek_transmitter'
+require 'devcreek_core'
+require 'rubygems'
+require 'uuidtools'
+require 'test/unit/ui/testrunnermediator'
+
+#class Test::Unit::TestCase
+#  alias_method :old_run,  :run
+#  def run(*args)
+#    puts "TestCase.run.start #{name}"
+##    result = old_run(*args, &block)
+#    puts "TestCase.run.start #{name}"
+#  end
+#end
+
+class Test::Unit::UI::TestRunnerMediator
+  alias_method :old_initialize,  :initialize
+  def initialize(*args)
+    result = old_initialize(*args)
+    
+    #DevCreek Modifications
+    @@dev_creek_test_suite = nil
+    @@dev_creek_reg = /([\w]*)\(([\w]*)\)/
+    
+    add_listener(Test::Unit::UI::TestRunnerMediator::STARTED) do |test_result| 
+      @@dev_creek_test_suite = DevCreek::TestSuite.new("Test::Unit")
+    end
+    
+    add_listener(Test::Unit::TestCase::STARTED) do |name| 
+      test_name = name.match(@@dev_creek_reg)[1]
+      test_class = name.match(@@dev_creek_reg)[2]
+      @@dev_creek_test_suite.test_results[name] = DevCreek::TestResult.new(test_name, test_class)
+    end
+    
+    add_listener(Test::Unit::TestResult::FAULT) do |fault| 
+      dc_test_result = @@dev_creek_test_suite.test_results[fault.test_name]
+      if fault.instance_of? Test::Unit::Failure
+        dc_test_result.has_a_failure
+      else
+        dc_test_result.has_an_error
+      end
+    end
+    
+    add_listener(Test::Unit::TestCase::FINISHED) do |test_name|
+      @@dev_creek_test_suite.test_results[test_name].has_finished
+    end
+    
+    add_listener(Test::Unit::UI::TestRunnerMediator::FINISHED) do |elapsed_time| 
+      if DevCreek::Core.instance().enabled != false 
+        @@dev_creek_test_suite.has_finished
+        if @@dev_creek_test_suite.has_test_results?
+          session_id = UUID.timestamp_create().to_s
+          xml_data = @@dev_creek_test_suite.to_xml(session_id)
+          puts xml_data
+          p 'Attempting DevCreek transmission...'
+          response = DevCreek::Transmitter.submit(session_id, xml_data)     
+          case response
+          when Net::HTTPSuccess
+            puts '...transmission successful.'
+          else
+            puts "...failure transmiting TestUnit results to DevCreek: ${response.error!}"
+          end  
+        end  
+      end
+    end
+    
+    return result
+  end
+end

data/lib/devcreek_testsuite.rb

@@ -0,0 +1,58 @@
+# devcreek_testsuite.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+require 'devcreek_core'
+require 'devcreek_record_template'
+require 'erb'
+
+module DevCreek
+  class TestSuite
+    attr_accessor :test_results, :elapsed_time
+    attr_reader :start, :framework, :finish, :session_id
+    def initialize(framework)
+      @framework, @test_results, @start, @elapsed_time = framework, {}, Time.new, 0.0   
+    end
+    
+    private
+    def sum_test_results_with_status(status)
+      success = 0
+      test_results.values.each do |test| 
+        success = success + 1 if test.status == status;
+      end
+      return success
+    end
+    
+    public    
+    def run_count
+      return test_results.size
+    end
+    
+    def has_test_results?
+      return run_count > 0
+    end
+    
+    def success_count
+      return sum_test_results_with_status("OK")
+    end
+    
+    def failure_count
+      return sum_test_results_with_status("FAILURE")
+    end
+    
+    def error_count
+      return sum_test_results_with_status("ERROR")
+    end
+    
+    def has_finished
+      raise ArgumentError, "The finish time cannot be set twice" unless @finish.nil?
+      @finish = Time.now
+    end
+    
+    def to_xml(session_id)
+      ERB.new(DevCreek::TRANSMISSION_RECORD_TEMPLATE, 0, "%<>").result(binding).gsub(/^  /, '')
+    end
+  end
+end

data/lib/devcreek_transmitter.rb

@@ -0,0 +1,35 @@
+# devcreektansmitter_.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+require 'net/http'
+require 'digest_auth'
+require 'devcreek_core'
+
+module DevCreek
+  module Transmitter
+    
+    SUBMIT_URL = "http://devcreek.com/submitData/"
+    
+    def Transmitter.submit(session_id, xml_data)
+    
+      raise Exception.new("Invalid argument: session_id and xml_data cannot be nil") if session_id.nil? or xml_data.nil?   
+      raise Exception.new("Core data not initialized") if DevCreek::Core.instance().project.nil? or 
+                                                    DevCreek::Core.instance().user.nil?   or
+                                                    DevCreek::Core.instance().password.nil?
+      
+      url = URI.parse("#{SUBMIT_URL}#{DevCreek::Core.instance().project}/#{session_id}")
+      response = nil
+      Net::HTTP.start(url.host) do |http|
+        res = http.head(url.request_uri)
+        req = Net::HTTP::Post.new(url.path)
+        req.body= xml_data
+        req.digest_auth(DevCreek::Core.instance().user, DevCreek::Core.instance().password, res) 
+        response = http.request(req)
+      end
+      return response
+    end
+  end
+end

data/lib/digest_auth.rb

@@ -0,0 +1,37 @@
+# Written by Eric Hodel <drbrain@segment7.net>
+
+require 'digest/md5' 
+require 'net/http' 
+
+module Net 
+  module HTTPHeader 
+    @@nonce_count = -1 
+    CNONCE = Digest::MD5::hexdigest("%x" % (Time.now.to_i + rand(65535)))
+    def digest_auth(user, password, response) # based on http://segment7.net/projects/ruby/snippets/digest_auth.rb 
+      @@nonce_count += 1 
+      response['www-authenticate'] =~ /^(\w+) (.*)/ 
+      params = {} 
+      $2.gsub(/(\w+)="(.*?)"/) { params[$1] = $2 } 
+      a_1 = "#{user}:#{params['realm']}:#{password}" 
+      a_2 = "#{@method}:#{@path}" 
+      request_digest = '' 
+      request_digest << Digest::MD5.hexdigest(a_1) 
+      request_digest << ':' << params['nonce'] 
+      request_digest << ':' << ('%08x' % @@nonce_count) 
+      request_digest << ':' << CNONCE 
+      request_digest << ':' << params['qop'] 
+      request_digest << ':' << Digest::MD5.hexdigest(a_2) 
+      header = [] 
+      header << "Digest username=\"#{user}\"" 
+      header << "realm=\"#{params['realm']}\"" 
+      header << "qop=#{params['qop']}" 
+      header << "algorithm=MD5" 
+      header << "uri=\"#{@path}\"" 
+      header << "nonce=\"#{params['nonce']}\"" 
+      header << "nc=#{'%08x' % @@nonce_count}" 
+      header << "cnonce=\"#{CNONCE}\"" 
+      header << "response=\"#{Digest::MD5.hexdigest(request_digest)}\"" 
+      @header['Authorization'] = header 
+    end 
+  end
+end

data/test/test_fiction.rb

@@ -0,0 +1,45 @@
+# test_fiction.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+require 'test/unit'
+
+class TestFiction < Test::Unit::TestCase
+  
+  def test_success
+    assert(true)
+  end
+  
+  def test_fail
+    assert(false)
+  end
+  
+  def test_error
+    raise "I just disagree"
+  end
+  
+end
+
+class TestMoreFiction < Test::Unit::TestCase
+  
+  def test_success
+    assert(true)
+  end
+  
+  def test_just_for_fun
+    assert true
+  end
+  
+  def test_fail
+    assert(false)
+  end
+  
+  def test_error
+    raise "I just disagree"
+  end
+  
+  
+end
+ 

data/test/testcore_spec.rb

@@ -0,0 +1,70 @@
+# testcore_spec.rb
+#
+# Copyright Caleb Powell 2007
+#
+# Licensed under the LGPL, see the file COPYING in the distribution
+
+$LOAD_PATH.push(FileUtils::pwd + '/lib')
+require 'devcreek'
+require 'socket'
+
+describe DevCreek::Core do
+
+  before :each do
+    DevCreek::Core.instance().load(
+      :user => nil,
+      :password => nil,
+      :project => nil
+    )
+  end
+  
+  it "should be a singleton" do
+    lambda{Core.new}.should raise_error(NameError)
+  end  
+
+  it "should have a principal attribute that defaults to the hostname" do
+    DevCreek::Core.instance().principal().should eql(Socket.gethostname)
+  end  
+
+  it "should have a principal attribute that is mutable" do
+    DevCreek::Core.instance().principal().should_not eql("")
+    DevCreek::Core.instance().principal= "Mutable"
+    DevCreek::Core.instance().principal().should eql("Mutable")
+  end  
+
+  it "load method should parse a Hash and set the properties correctly" do
+    DevCreek::Core.instance().user().should be_nil
+    DevCreek::Core.instance().password().should be_nil
+    DevCreek::Core.instance().project().should be_nil
+    
+    DevCreek::Core.instance().load(
+      :user => 'foo@bar.com',
+      :password => 'pass_it_on',
+      :project => 'fooProject'
+    )
+    
+    DevCreek::Core.instance().user().should eql("foo@bar.com")
+    DevCreek::Core.instance().password().should eql("pass_it_on")
+    DevCreek::Core.instance().project().should eql("fooProject")
+  end  
+
+  it "load_from_yaml method should parse the file and set the properties correctly" do
+    DevCreek::Core.instance().user().should be_nil
+    DevCreek::Core.instance().password().should be_nil
+    DevCreek::Core.instance().project().should be_nil
+    
+    
+    def YAML.load_file(filename)
+      return {:user => 'foo@bar.com',
+              :password => 'pass_it_on',
+              :project => 'fooProject'} 
+    end
+    
+    DevCreek::Core.instance().load_from_yaml("props.yaml")
+    
+    DevCreek::Core.instance().user().should eql("foo@bar.com")
+    DevCreek::Core.instance().password().should eql("pass_it_on")
+    DevCreek::Core.instance().project().should eql("fooProject")
+  end  
+
+end