require 'spec_helper'

describe Supernova do
  let(:clazz) do
    clazz = Class.new
    clazz.send(:include, Supernova::Solr)
  end
  
  describe "#including" do
    it "can be includes" do
      Class.new.send(:include, Supernova::Solr)
    end

    it "defines a named_search_scope method" do
      clazz.send(:include, Supernova)
      clazz.should be_respond_to(:named_search_scope)
    end
  end
  
  describe "#search_scope" do
    it "returns a new criteria" do
      clazz.search_scope.should be_an_instance_of(Supernova::SolrCriteria)
    end
    
    it "sets the correct clazz" do
      clazz.search_scope.clazz.should == clazz
    end
  end
  
  describe "#named_search_scope" do
    before(:each) do
      clazz.named_search_scope :popular do
        order("popularity desc")
      end
    end
    
    describe "without parameters" do
      it "defines a new method" do
        clazz.should respond_to(:popular)
      end

      it "returns a new criteria" do
        clazz.popular.should be_an_instance_of(Supernova::SolrCriteria)
      end

      it "sets the clazz attribute" do
        clazz.popular.clazz.should == clazz
      end

      it "sets the correct order option" do
        clazz.popular.search_options[:order].should == ["popularity desc"]
      end
      
      it "adds the name of the scope to the defined_named_search_scopes array" do
        clazz.defined_named_search_scopes.should == [:popular]
      end
    end
    
    describe "chaining" do
      it "calls merge with both scopes" do
        scope = Supernova::SolrCriteria.new(clazz).named_scope_class(clazz)
        scope.should_receive(:merge).with(instance_of(Supernova::SolrCriteria))
        scope.popular
      end
      # Supernova::SolrCriteria.new(clazz).popular.should be_an_instance_of()
    end
    
    describe "with parameters" do
      before(:each) do
        clazz.named_search_scope :for_artists do |artist_ids|
          with(:artist_id => artist_ids)
        end
        clazz.named_search_scope :popular do
          order("popularity desc")
        end
      end
      
      it "sets the correct filters" do
        filters = clazz.for_artists(%w(1 3 2)).to_params[:fq]
        filters.should include("artist_id:1")
        filters.should include("artist_id:2")
        filters.should include("artist_id:3")
      end
      
      it "allows chaining of named_search_scopes" do
        clazz.for_artists(%w(1 3 2)).popular.search_options[:order].should == ["popularity desc"]
      end
    end
  end

  describe "#build_ar_like_record" do
    let(:offer_double) { double("offer").as_null_object }
    
    before(:each) do
      Offer.stub!(:new).and_return offer_double
    end
    
    it "is callable" do
      Supernova.should respond_to(:build_ar_like_record)
    end
    
    it "creates a new instance" do
      Offer.should_receive(:new).and_return offer_double
      Supernova.build_ar_like_record(Offer, {})
    end
    
    it "sets the attributes" do
      atts = { :a => 1 }
      offer_double.should_receive(:instance_variable_set).with("@attributes", atts)
      Supernova.build_ar_like_record(Offer, atts)
    end
    
    it "returns the record" do
      Supernova.build_ar_like_record(Offer, {}).should == offer_double
    end
    
    it "sets readonly to true" do
      Supernova.build_ar_like_record(Offer, {}).instance_variable_get("@readonly").should == true
    end
    
    it "sets new_record to false" do
      Supernova.build_ar_like_record(Offer, {}).instance_variable_get("@new_record").should == false
    end
    
    it "sets the original_search_doc hash when given" do
      original_search_doc = double("original_search_doc")
      doc = Supernova.build_ar_like_record(Offer, {}, original_search_doc)
      doc.instance_variable_get("@original_search_doc").should == original_search_doc
    end
  end
end