require File.expand_path('../../spec_helper', __FILE__)

describe Tagtical::TagList do
  before { @tag_list = Tagtical::TagList.new("awesome", "radical") }
  subject { @tag_list }

  it { should be_an Array }

  specify do
    @tag_list.each do |value|
      value.should be_an_instance_of Tagtical::TagList::TagValue
      value.relevance.should be_nil
    end
  end

  describe ".from" do

    it "should accept a hash with relevance values" do
      @tag_list = Tagtical::TagList.from("tag 1" => 4.5, "tag 2" => 4.454)
      @tag_list.map(&:relevance).should == [4.5, 4.454]
    end
    
  end

  it "should convert all values to Tagtical::TagList::TagValue" do
    @tag_list << "foo"
    @tag_list.concat(["bar"])
    @tag_list.each do |value|
      value.should be_an_instance_of Tagtical::TagList::TagValue
    end
  end

  it "should be able to be add a new tag word" do
    @tag_list.add("cool")
    @tag_list.include?("cool").should be_true
  end

  it "should be able to add delimited lists of words" do
    @tag_list.add("cool, wicked", :parse => true)
    @tag_list.should include("cool", "wicked")
  end

  it "should be able to add delimited list of words with quoted delimiters" do
    @tag_list.add("'cool, wicked', \"really cool, really wicked\"", :parse => true)
    @tag_list.should include("cool, wicked", "really cool, really wicked")
  end

  it "should be able to handle other uses of quotation marks correctly" do
    @tag_list.add("john's cool car, mary's wicked toy", :parse => true)
    @tag_list.should include("john's cool car", "mary's wicked toy")
  end

  it "should be able to add an array of words" do
    @tag_list.add(["cool", "wicked"], :parse => true)
    @tag_list.should include("cool", "wicked")
  end

  it "should be able to add a hash" do
    @tag_list.add("crazy" => 0.45, "narly" => 5.4)
    @tag_list.should include("crazy", "narly")
    @tag_list.detect { |t| t=="crazy" }.relevance.should == 0.45
  end

  it "should be able to remove words" do
    @tag_list.remove("awesome")
    @tag_list.include?("awesome").should be_false
  end

  it "should be able to remove delimited lists of words" do
    @tag_list.remove("awesome, radical", :parse => true)
    @tag_list.should be_empty
  end

  it "should be able to remove an array of words" do
    @tag_list.remove(["awesome", "radical"], :parse => true)
    @tag_list.should be_empty
  end

  its(:to_s) { should == "awesome, radical" }

  it "should quote escape tags with commas in them" do
    @tag_list.add("cool","rad,bodacious")
    @tag_list.to_s.should == "awesome, radical, cool, \"rad,bodacious\""
  end

  it "should be able to call to_s on a frozen tag list" do
    @tag_list.freeze
    lambda { @tag_list.add("cool","rad,bodacious") }.should raise_error
    lambda { @tag_list.to_s }.should_not raise_error
  end

  describe "TagValue" do
    before do
      @tag_value = Tagtical::TagList::TagValue.new("sweetness", @relevance = 3.2)
    end
    subject { @tag_value }

    its(:relevance) { should == @relevance }

  end
  
end