circuit 0.2.0

data/spec/spec_helper.rb

@@ -0,0 +1,79 @@
+require 'rubygems'
+require 'simplecov'
+SimpleCov.start do
+  add_filter "/lib/circuit/version.rb"
+  add_filter "/spec/"
+end
+
+require 'bundler'
+
+require 'simplecov'
+SimpleCov.start
+
+required_groups = [:default, :development]
+
+# Require gems and attempt to load mongo
+begin
+  Bundler.require *(required_groups+[:mongo])
+rescue LoadError
+  Bundler.require *required_groups
+end
+# Determine if we want to run tests with mongo (i.e. whether mongo was loaded)
+$mongo_tests = !!Bundler.definition.requested_specs.detect {|s| s.name == "mongo"}
+
+require 'combustion'
+
+require 'machinist'
+require 'machinist/mongoid' if $mongo_tests
+
+Mongoid.load! "spec/internal/config/mongoid.yml" if $mongo_tests
+
+Combustion.initialize! :action_controller, :action_view, :sprockets
+
+require 'rails/mongoid' if $mongo_tests
+require 'rspec/rails'
+require 'rspec/rails/mocha'
+require 'support/blueprints'
+
+# Requires supporting ruby files with custom matchers and macros, etc,
+# in spec/support/ and its subdirectories.
+Dir[File.expand_path("../support/**/*.rb", __FILE__)].each {|f|  require f}
+
+RSpec.configure do |config|
+  config.mock_with :mocha
+  config.include SpecHelpers::RackHelpers
+
+  if $mongo_tests
+    config.include Mongoid::Matchers
+
+    config.after(:each) do
+      Mongoid.master.collections.select do |collection|
+        collection.name !~ /system/
+      end.each(&:drop)
+    end
+
+    # Clean up the database
+    require 'database_cleaner'
+    config.before(:suite) do
+      DatabaseCleaner.strategy = :truncation
+      DatabaseCleaner.orm = "mongoid"
+    end
+
+    config.before(:each) do
+      DatabaseCleaner.clean
+    end
+  end
+
+  config.after(:each) do
+    Circuit::Storage::Sites::MemoryStore::Site.all.clear
+    Circuit::Storage::Nodes::MemoryStore::Node.all.clear
+  end
+
+  config.before(:each) { stub_time! }
+end
+
+# freeze time, so time tests appear to run without time passing.
+def stub_time!
+  @time = Time.zone.now
+  Time.zone.stubs(:now).returns(@time)
+end

data/spec/support/blueprints.rb

@@ -0,0 +1,24 @@
+require 'support/spec_helpers/simple_machinable'
+
+module CircuitBlueprints
+  def ensure_blueprints
+    SimpleMachinable.ensure_machinable(Circuit::Site, Circuit::Node)
+
+    if Circuit::Site.blueprint.nil?
+      Circuit::Site.blueprint do
+        host      { 'example.org' }
+        aliases   { %w[www.example.org subdomain.example.com] }
+      end
+    end
+
+    if Circuit::Node.blueprint.nil?
+      Circuit::Node.blueprint do
+        slug            { Faker::Lorem.words(rand(3) + 2).join('-') }
+        behavior_klass  { "RenderOk" }
+      end
+    end
+  end
+  module_function :ensure_blueprints
+end
+
+CircuitBlueprints.ensure_blueprints

data/spec/support/matchers/be_current_time_matcher.rb

@@ -0,0 +1,14 @@
+RSpec::Matchers.define :be_current_time do
+  match do |time|
+    # the to is is for rounding errors
+    time.try(:utc).to_i == Time.zone.now.utc.to_i
+  end
+
+  failure_message_for_should do |time|
+    "#{time.class} should be set to local time"
+  end
+
+  failure_message_for_should_not do |time|
+    "#{time.class} should not be set to local time"
+  end
+end

data/spec/support/matchers/extended_have_key.rb

@@ -0,0 +1,31 @@
+RSpec::Matchers.define :have_key do |key|
+  chain :== do |value|
+    @value = value
+  end
+
+  match do |hash|
+    @has_key = hash.has_key?(key)
+
+    if @value
+      @has_key && hash[key] == @value
+    else
+      @has_key
+    end
+  end
+
+  failure_message_for_should do |hash|
+    if @value
+      "#{hash.inspect} should have key #{key.inspect} == #{value.inspect}"
+    else
+      "#{hash.inspect} should have key #{key.inspect}"
+    end
+  end
+
+  failure_message_for_should_not do |model|
+    if @value
+      "#{hash.inspect} should not have key #{key.inspect} == #{value.inspect}"
+    else
+      "#{hash.inspect} should not have key #{key.inspect}"
+    end
+  end
+end

data/spec/support/matchers/have_accessor_matcher.rb

@@ -0,0 +1,13 @@
+RSpec::Matchers.define :have_accessor do |attribute|
+  match do |model|
+    model.respond_to?(attribute) and model.respond_to?("#{attribute}=")
+  end
+
+  failure_message_for_should do |model|
+    "#{model.class} should have attribute accessor #{attribute.inspect}"
+  end
+
+  failure_message_for_should_not do |model|
+    "#{model.class} should not have attribute accessor #{attribute.inspect}"
+  end
+end

data/spec/support/matchers/have_attribute_matcher.rb

@@ -0,0 +1,22 @@
+RSpec::Matchers.define :have_attribute do |attribute|
+  match do |model|
+    if model.respond_to?(attribute) and model.respond_to?("#{attribute}=")
+      obj = Object.new
+      old = model.send(attribute)
+      model.send("#{attribute}=", obj)
+      result = (model.attributes[attribute] == obj)
+      model.send("#{attribute}=", old)
+      result
+    else
+      false
+    end
+  end
+
+  failure_message_for_should do |model|
+    "#{model.class} should have attribute accessor #{attribute.inspect}"
+  end
+
+  failure_message_for_should_not do |model|
+    "#{model.class} should not have attribute accessor #{attribute.inspect}"
+  end
+end

data/spec/support/matchers/have_block_matcher.rb

@@ -0,0 +1,14 @@
+RSpec::Matchers.define :have_block do |block_sym|
+  match do |template|
+    # the to is is for rounding errors
+    template.blocks[block_sym]
+  end
+
+  failure_message_for_should do |template|
+    "#{template.class} should have block(#{block_sym})"
+  end
+
+  failure_message_for_should_not do |template|
+    "#{template.class} should not have block(#{block_sym})"
+  end
+end

data/spec/support/matchers/have_errors_on_matcher.rb

@@ -0,0 +1,30 @@
+# http://solnic.eu/2011/01/14/custom-rspec-2-matchers.html
+RSpec::Matchers.define :have_errors_on do |attribute|
+  chain :with_message do |message|
+    @message = message
+  end
+
+  match do |model|
+    model.valid?
+
+    @has_errors = !(model.errors[attribute].blank?)
+
+    if @message
+      @has_errors && model.errors[attribute].include?(@message)
+    else
+      @has_errors
+    end
+  end
+
+  failure_message_for_should do |model|
+    if @message
+      "Validation errors #{model.errors[attribute].inspect} should include #{@message.inspect}"
+    else
+      "#{model.class} should have errors on attribute #{attribute.inspect}"
+    end
+  end
+
+  failure_message_for_should_not do |model|
+    "#{model.class} should not have an error on attribute #{attribute.inspect}"
+  end
+end

data/spec/support/matchers/have_module_matcher.rb

@@ -0,0 +1,13 @@
+RSpec::Matchers.define :have_module do |mod_or_name|
+  match do |obj|
+    !!obj.included_modules.detect { |m| m.to_s == mod_or_name.to_s }
+  end
+
+  failure_message_for_should do |obj|
+    "expected %p with modules %p to include module '%s'"%[obj, obj.included_modules, mod_or_name]
+  end
+
+  failure_message_for_should_not do |obj|
+    "expected %p with modules %p to not include module '%s'"%[obj, obj.included_modules, mod_or_name]
+  end
+end

data/spec/support/matchers/have_reader_matcher.rb

@@ -0,0 +1,18 @@
+# http://solnic.eu/2011/01/14/custom-rspec-2-matchers.html
+RSpec::Matchers.define :have_reader do |attribute|
+  match do |model|
+    model.respond_to?(attribute)
+  end
+
+  failure_message_for_should do |model|
+    if @message
+      "Validation errors #{model.errors[attribute].inspect} should include #{@message.inspect}"
+    else
+      "#{model.class} should have attribute reader #{attribute.inspect}"
+    end
+  end
+
+  failure_message_for_should_not do |model|
+    "#{model.class} should not have attribute reader #{attribute.inspect}"
+  end
+end

data/spec/support/matchers/have_writer_matcher.rb

@@ -0,0 +1,18 @@
+# http://solnic.eu/2011/01/14/custom-rspec-2-matchers.html
+RSpec::Matchers.define :have_writer do |attribute|
+  match do |model|
+    model.respond_to?("#{attribute}=")
+  end
+
+  failure_message_for_should do |model|
+    if @message
+      "Validation errors #{model.errors[attribute].inspect} should include #{@message.inspect}"
+    else
+      "#{model.class} should have attribute writer #{attribute.inspect}"
+    end
+  end
+
+  failure_message_for_should_not do |model|
+    "#{model.class} should not have attribute writer #{attribute.inspect}"
+  end
+end

data/spec/support/matchers/set_instance_variable.rb

@@ -0,0 +1,32 @@
+RSpec::Matchers.define :have_instance_variable do |var_symbol|
+  chain :== do |value|
+    @value = value
+  end
+
+  match do |model|
+    @ivar = model.instance_variable_get("@#{var_symbol.to_s}")
+
+    if @value
+      @ivar == @value
+    else
+      @ivar
+    end
+  end
+
+  failure_message_for_should do |model|
+    if @message
+      "#{model.class} should have instance variable #{var_symbol.inspect} == #{value.inspect}"
+    else
+      "#{model.class} should have instance variable #{var_symbol.inspect}"
+    end
+  end
+
+  failure_message_for_should_not do |model|
+    if @message
+      "#{model.class} should not have instance variable #{var_symbol.inspect} == #{value.inspect}"
+    else
+      "#{model.class} should not have instance variable #{var_symbol.inspect}"
+    end
+
+  end
+end

data/spec/support/spec_helpers/base_behaviors.rb

@@ -0,0 +1,20 @@
+require 'active_support/concern'
+
+module SpecHelpers
+  module BaseBehaviors
+    extend ActiveSupport::Concern
+
+    included do
+
+      class ::StatusOkBehavior
+        include Decks::Behavior
+
+        def self.call_with_downstream_app(env, app)
+          [200, {'Content-Type' => 'text/plain'}, ["OK"]]
+        end
+      end
+
+    end
+
+  end
+end

data/spec/support/spec_helpers/base_models.rb

@@ -0,0 +1,64 @@
+# constructs 2 different trees of routing for our examples purposes.
+#
+#     + root
+#       + child
+#         + grandchild
+#           + great_grandchild
+#
+# And a more complex version:
+#
+#     + root_1
+#       + child_1
+#         + grandchild_1
+#         + grandchild_2
+#           + great_grandchild_1
+#           + great_grandchild_2
+#       + child_2
+#         + grandchild_3
+#           + great_grandchild_3
+#     + root_2
+#
+# This include doesn't take into account any slug information(as they are generated
+# by the Circuit::Node blueprint already).  Also, each of these is persisted, so if you want
+# something faster or don't require routing tree, you should consider using a stub or
+# `node_class.make` to generate a non-persisted record.
+#
+require 'active_support/concern'
+
+module SpecHelpers
+  module BaseModels
+    extend ActiveSupport::Concern
+
+    included do
+      let(:node_class) { Circuit::Node }
+      let(:site_class) { Circuit::Site }
+
+      let(:site_1)                    { site_class.make! :host => "www.foo.com", :aliases => [] }
+      let(:root_1)                    { node_class.make! :slug => nil, :site => site_1 }
+        let(:child_1)                 { node_class.make! :parent => root_1       }
+          let(:grandchild_1)          { node_class.make! :parent => child_1      }
+          let(:grandchild_2)          { node_class.make! :parent => child_1      }
+            let(:great_grandchild_1)  { node_class.make! :parent => grandchild_2 }
+            let(:great_grandchild_2)  { node_class.make! :parent => grandchild_2 }
+        let(:child_2)                 { node_class.make! :parent => root_1       }
+          let(:grandchild_3)          { node_class.make! :parent => child_2      }
+            let(:great_grandchild_3)  { node_class.make! :parent => grandchild_3 }
+
+      let(:site_2)                    { site_class.make! :host => "www.bar.com", :aliases => [] }
+      let(:root_2)                    { node_class.make! :slug => nil, :site => site_2 }
+
+      let(:site)                      { site_class.make! }
+      let(:root)                      { node_class.make! :slug => nil, :site => site }
+      let(:child)                     { node_class.make! :parent => root         }
+      let(:grandchild)                { node_class.make! :parent => child        }
+      let(:great_grandchild)          { node_class.make! :parent => grandchild   }
+
+      let(:dup_site_1)         { site_class.make! :host => "dup1.com", :aliases => [] }
+      let(:dup_site_1_dup)     { site_class.make! :host => "dup1.com", :aliases => %w[foo.com] }
+      let(:dup_site_2)         { site_class.make! :host => "dup2.com", :aliases => [] }
+      let(:dup_site_2_dup)     { site_class.make! :host => "bar.com", :aliases => %w[dup2.com] }
+      let(:dup_site_3)         { site_class.make! :host => "wow1.com", :aliases => %w[dup3.com] }
+      let(:dup_site_3_dup)     { site_class.make! :host => "wow2.com", :aliases => %w[dup3.com] }
+    end
+  end
+end

data/spec/support/spec_helpers/logger_helpers.rb

@@ -0,0 +1,58 @@
+require 'active_support/concern'
+require 'active_support/core_ext/module/delegation'
+
+module SpecHelpers
+  module LoggerHelpers
+    extend ActiveSupport::Concern
+
+    included do
+      attr_reader :default_logger, :use_logger
+
+      around :each do |example|
+        @default_logger = Circuit.logger
+
+        if clean_logger?
+          Circuit.logger = nil
+        elsif !default_logger?
+          @logger_sio = StringIO.new
+          Circuit.logger = Logger.new(@logger_sio)
+        end
+
+        example.run
+
+        if clean_logger?
+          clean_logger!(false)
+        elsif !default_logger?
+          @logger_sio.close
+          @logger_sio = nil
+        end
+
+        Circuit.logger = @default_logger
+      end
+    end
+
+    def use_logger!(key)
+      @use_logger = (key ? key.to_sym : nil)
+    end
+
+    def use_logger?(key)
+      @use_logger == key.to_sym
+    end
+
+    def clean_logger!(val=true)
+      use_logger!(val ? :clean : false)
+    end
+    def clean_logger?() use_logger?(:clean); end
+
+    def default_logger!(val=true)
+      use_logger!(val ? :default : false)
+    end
+    def default_logger?() use_logger?(:default); end
+
+    def logger_output
+      raise "Clean logger used" if clean_logger?
+      raise "Default logger used" if default_logger?
+      @logger_sio.string
+    end
+  end
+end