tarantula 0.3.3 → 0.4.0

data/lib/relevance/tarantula/response.rb

@@ -1,13 +1,19 @@
 # Used to create a stub response when we didn't get back a real response
-class Relevance::Tarantula::Response
-  HASHABLE_ATTRS = [:code, :body, :content_type]
-  attr_accessor *HASHABLE_ATTRS
-
-  def initialize(hash)
-    hash.each do |k,v|
-      raise ArgumentError, k unless HASHABLE_ATTRS.member?(k)
-      self.instance_variable_set("@#{k}", v)
+module Relevance
+  module Tarantula
+
+    class Response
+      HASHABLE_ATTRS = [:code, :body, :content_type]
+      attr_accessor *HASHABLE_ATTRS
+
+      def initialize(hash)
+        hash.each do |k,v|
+          raise ArgumentError, k unless HASHABLE_ATTRS.member?(k)
+          self.instance_variable_set("@#{k}", v)
+        end
+      end
+
     end
+
   end
-  
-end
+end

data/lib/relevance/tarantula/result.rb

@@ -1,77 +1,83 @@
-class Relevance::Tarantula::Result
-  HASHABLE_ATTRS = [:success, :method, :url, :response, :referrer, :data, :description, :log, :test_name]
-  DEFAULT_LOCALHOST = "http://localhost:3000"
-  attr_accessor *HASHABLE_ATTRS
-  include Relevance::Tarantula
-  include Relevance::Tarantula::HtmlReportHelper
-
-  def initialize(hash)
-    hash.each do |k,v|
-      raise ArgumentError, k unless HASHABLE_ATTRS.member?(k)
-      self.instance_variable_set("@#{k}", v)
-    end
-  end
+module Relevance
+  module Tarantula
 
-  def short_description
-    [method,url].join(" ")
-  end
+    class Result
+      HASHABLE_ATTRS = [:success, :method, :url, :response, :referrer, :data, :description, :log, :test_name]
+      DEFAULT_LOCALHOST = "http://localhost:3000"
+      attr_accessor *HASHABLE_ATTRS
+      include Relevance::Tarantula
+      include Relevance::Tarantula::HtmlReportHelper
 
-  def sequence_number
-    @sequence_number ||= (self.class.next_number += 1)
-  end
+      def initialize(hash)
+        hash.each do |k,v|
+          raise ArgumentError, k unless HASHABLE_ATTRS.member?(k)
+          self.instance_variable_set("@#{k}", v)
+        end
+      end
 
-  def file_name
-    "#{sequence_number}.html"
-  end
+      def short_description
+        [method,url].join(" ")
+      end
 
-  def code
-    response && response.code
-  end
+      def sequence_number
+        @sequence_number ||= (self.class.next_number += 1)
+      end
 
-  def body
-    response && response.body
-  end
+      def file_name
+        "#{sequence_number}.html"
+      end
 
-  def full_url
-    "#{DEFAULT_LOCALHOST}#{url}"
-  end
+      def code
+        response && response.code
+      end
 
-  ALLOW_NNN_FOR = /^allow_(\d\d\d)_for$/
+      def body
+        response && response.body
+      end
 
-  class << self
-    attr_accessor :next_number
-    
-    def handle(result)
-      retval = result.dup
-      retval.success = successful?(result.response) || can_skip_error?(result)
-      retval.description = "Bad HTTP Response" unless retval.success
-      retval
-    end
+      def full_url
+        "#{DEFAULT_LOCALHOST}#{url}"
+      end
 
-    def success_codes 
-      %w{200 201 302 401}
-    end
-    
-    # allow_errors_for is a hash 
-    #  k=error code,
-    #  v=array of matchers for urls that can skip said error
-    attr_accessor :allow_errors_for
-    def can_skip_error?(result)
-      coll = allow_errors_for[result.code]
-      return false unless coll
-      coll.any? {|item| item === result.url}
-    end
+      ALLOW_NNN_FOR = /^allow_(\d\d\d)_for$/
 
-    def successful?(response)
-      success_codes.member?(response.code)
-    end
+        class << self
+          attr_accessor :next_number
+
+          def handle(result)
+            retval = result.dup
+            retval.success = successful?(result.response) || can_skip_error?(result)
+            retval.description = "Bad HTTP Response" unless retval.success
+            retval
+          end
+
+          def success_codes 
+            %w{200 201 302 401}
+          end
+
+          # allow_errors_for is a hash 
+          #  k=error code,
+          #  v=array of matchers for urls that can skip said error
+          attr_accessor :allow_errors_for
+          def can_skip_error?(result)
+            coll = allow_errors_for[result.code]
+            return false unless coll
+            coll.any? {|item| item === result.url}
+          end
 
-    def method_missing(meth, *args)  
-      super unless ALLOW_NNN_FOR =~ meth.to_s
-      (allow_errors_for[$1] ||= []).push(*args)
+          def successful?(response)
+            success_codes.member?(response.code)
+          end
+
+          def method_missing(meth, *args)  
+            super unless ALLOW_NNN_FOR =~ meth.to_s
+            (allow_errors_for[$1] ||= []).push(*args)
+          end
+        end
+
+      self.allow_errors_for = {}
+      self.next_number = 0
     end
-  end
 
-  self.allow_errors_for = {}
-  self.next_number = 0
+  end
 end

data/lib/relevance/tarantula/tidy_handler.rb

@@ -9,23 +9,28 @@ end
 if defined? Tidy
   Tidy.path = ENV['TIDY_PATH'] if ENV['TIDY_PATH']
 
-  class Relevance::Tarantula::TidyHandler 
-    include Relevance::Tarantula
-    def initialize(options = {})
-      @options = {:show_warnings=>true}.merge(options)
-    end
-    def handle(result)
-      response = result.response
-      return unless response.html?
-      tidy = Tidy.open(@options) do |tidy|
-        xml = tidy.clean(response.body)
-        tidy
-      end
-      unless tidy.errors.blank?
-        error_result = result.dup
-        error_result.description = "Bad HTML (Tidy)"
-        error_result.data = tidy.errors.inspect
-        error_result
+  module Relevance
+    module Tarantula
+
+      class TidyHandler 
+        include Relevance::Tarantula
+        def initialize(options = {})
+          @options = {:show_warnings=>true}.merge(options)
+        end
+        def handle(result)
+          response = result.response
+          return unless response.html?
+          tidy = Tidy.open(@options) do |tidy|
+            xml = tidy.clean(response.body)
+            tidy
+          end
+          unless tidy.errors.blank?
+            error_result = result.dup
+            error_result.description = "Bad HTML (Tidy)"
+            error_result.data = tidy.errors.inspect
+            error_result
+          end
+        end
       end
     end
   end

data/lib/relevance/tarantula/transform.rb

@@ -1,17 +1,21 @@
-class Relevance::Tarantula::Transform 
-  attr_accessor :from, :to
-  def initialize(from, to)
-    @from = from
-    @to = to
-  end
-  def [](string)
-    case to
-    when Proc
-      string.gsub(from, &to)
-    else
-      string.gsub(from, to)
+module Relevance
+  module Tarantula
+
+    class Transform 
+      attr_accessor :from, :to
+      def initialize(from, to)
+        @from = from
+        @to = to
+      end
+      def [](string)
+        case to
+        when Proc
+          string.gsub(from, &to)
+        else
+          string.gsub(from, to)
+        end
+      end
     end
+
   end
 end
-
-

data/lib/relevance/tarantula/version.rb

@@ -0,0 +1,5 @@
+module Relevance
+  module Tarantula
+    VERSION = "0.4.0"
+  end
+end

data/{tasks → lib/relevance/tasks}/tarantula_tasks.rake

@@ -36,7 +36,7 @@ namespace :tarantula do
   desc 'Generate a default tarantula test'
   task :setup do
     mkdir_p "test/tarantula"
-    template_path = File.expand_path(File.join(File.dirname(__FILE__), "..", "template", "tarantula_test.rb"))
+    template_path = File.expand_path(File.join(File.dirname(__FILE__), "../../..", "template", "tarantula_test.rb"))
     cp template_path, "test/tarantula/"
   end
 end

data/lib/tarantula-rails3.rb

@@ -0,0 +1,9 @@
+module Relevance	
+	module Tarantula
+		class Railtie < ::Rails::Railtie
+		  rake_tasks do
+			load "relevance/tasks/tarantula_tasks.rake"
+		  end
+		end
+	end
+end

data/{examples/relevance/core_extensions/ellipsize_example.rb → spec/relevance/core_extensions/ellipsize_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "../..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::CoreExtensions::Object#ellipsize" do
   it "converts nil to empty string" do
@@ -16,4 +16,4 @@ describe "Relevance::CoreExtensions::Object#ellipsize" do
   it "shortens long strings and adds ..." do
     "long-string".ellipsize(5).should == "long-..."
   end
-end
+end

data/{examples/relevance/core_extensions/file_example.rb → spec/relevance/core_extensions/file_spec.rb}

@@ -1,8 +1,8 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "../..", "example_helper.rb"))
+require "spec_helper"
 require 'relevance/core_extensions/file'
 
 describe "Relevance::CoreExtensions::File#extension" do
   it "should return the extension without the leading dot" do
     File.extension("foo.bar").should == "bar"
   end
-end
+end

data/{examples/relevance/core_extensions/response_example.rb → spec/relevance/core_extensions/response_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "../..", "example_helper.rb"))
+require "spec_helper"
 require 'relevance/core_extensions/file'
 
 describe "Relevance::CoreExtensions::Response#html?" do
@@ -26,4 +26,4 @@ describe "Relevance::CoreExtensions::Response#html?" do
     @response.should be_html
   end
   
-end
+end

data/{examples/relevance/core_extensions/test_case_example.rb → spec/relevance/core_extensions/test_case_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "../..", "example_helper.rb"))
+require "spec_helper"
 require 'relevance/core_extensions/test_case'
 
 describe "TestCase extensions" do

data/{examples/relevance/tarantula/attack_handler_example.rb → spec/relevance/tarantula/attack_handler_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::AttackHandler" do
   before do

data/{examples/relevance/tarantula/basic_attack_example.rb → spec/relevance/tarantula/basic_attack_spec.rb}

@@ -1,4 +1,4 @@
-require File.dirname(__FILE__) + "/../../example_helper.rb"
+require "spec_helper"
 
 describe Relevance::Tarantula::BasicAttack do
   before do
@@ -9,4 +9,4 @@ describe Relevance::Tarantula::BasicAttack do
     @attack.random_whole_number.should >= 0
     Fixnum.should === @attack.random_whole_number
   end
-end
+end

data/{examples/relevance/tarantula/crawler_example.rb → spec/relevance/tarantula/crawler_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe Relevance::Tarantula::Crawler do
   
@@ -372,4 +372,4 @@ describe Relevance::Tarantula::Crawler do
     
   end
   
-end
+end

data/{examples/relevance/tarantula/form_example.rb → spec/relevance/tarantula/form_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::Form large example" do
   before do
@@ -47,4 +47,4 @@ END
     @form.method.should == "put"
   end
   
-end
+end

data/{examples/relevance/tarantula/form_submission_example.rb → spec/relevance/tarantula/form_submission_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe Relevance::Tarantula::FormSubmission do
   
@@ -53,7 +53,7 @@ describe Relevance::Tarantula::FormSubmission do
       end
   
       it "can mutate selects" do
-        Hpricot::Elements.any_instance.stubs(:rand).returns(stub(:[] => "2006-stub"))
+        Hpricot::Elements.any_instance.stubs(:sample).returns(stub(:[] => "2006-stub"))
         @fs.mutate_selects(@form).should == {"foo[opened_on(1i)]" => "2006-stub"}
       end
   
@@ -91,7 +91,7 @@ describe Relevance::Tarantula::FormSubmission do
       end
       
       it "can mutate selects" do
-        Hpricot::Elements.any_instance.stubs(:rand).returns(stub(:[] => "2006-stub"))
+        Hpricot::Elements.any_instance.stubs(:sample).returns(stub(:[] => "2006-stub"))
         @fs.mutate_selects(@form).should == {"foo[opened_on(1i)]" => "2006-stub"}
       end
 

data/{examples/relevance/tarantula/html_document_handler_example.rb → spec/relevance/tarantula/html_document_handler_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::HtmlDocumentHandler" do
   

data/{examples/relevance/tarantula/html_report_helper_example.rb → spec/relevance/tarantula/html_report_helper_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 module HtmlReportHelperSpec
   # Is there an idiom for this?

data/{examples/relevance/tarantula/html_reporter_example.rb → spec/relevance/tarantula/html_reporter_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::HtmlReporter file output" do
 

data/{examples/relevance/tarantula/invalid_html_handler_example.rb → spec/relevance/tarantula/invalid_html_handler_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::InvalidHtmlHandler" do
   before do

data/{examples/relevance/tarantula/io_reporter_example.rb → spec/relevance/tarantula/io_reporter_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe 'Relevance::Tarantula::IOReporter' do
   it "reports errors to stderr and then raises" do

data/{examples/relevance/tarantula/link_example.rb → spec/relevance/tarantula/link_spec.rb}

@@ -1,4 +1,4 @@
-require File.expand_path(File.join(File.dirname(__FILE__), "..", "..", "example_helper.rb"))
+require "spec_helper"
 
 describe "Relevance::Tarantula::Link" do
   include ActionView::Helpers::UrlHelper
@@ -16,19 +16,19 @@ describe "Relevance::Tarantula::Link" do
   end
 
   it "parses anchor tags with POST 'method'" do
-    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{method_javascript_function(:post)}">foo</a>}).at('a'))
+    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{Relevance::Tarantula::Link.method_javascript_function(:post)}">foo</a>}).at('a'))
     link.href.should == '/foo'
     link.method.should == :post
   end
 
   it "parses anchor tags with PUT 'method'" do
-    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{method_javascript_function(:put)}">foo</a>}).at('a'))
+    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{Relevance::Tarantula::Link.method_javascript_function(:put)}">foo</a>}).at('a'))
     link.href.should == '/foo'
     link.method.should == :put
   end
 
   it "parses anchor tags with DELETE 'method'" do
-    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{method_javascript_function(:delete)}">foo</a>}).at('a'))
+    link = make_link(Hpricot(%Q{<a href="/foo" onclick="#{Relevance::Tarantula::Link.method_javascript_function(:delete)}">foo</a>}).at('a'))
     link.href.should == '/foo'
     link.method.should == :delete
   end
@@ -81,4 +81,4 @@ describe "possible conflict when user has an AR model named Link" do
     }.should_not raise_error
   end
   
-end
+end