require 'spec_helper'

describe "default values" do

  before do
    module Examples

      class Reference
        include Virtus::ValueObject

        attribute :ref, String
      end

      class Page
        include Virtus

        attribute :title,        String
        attribute :slug,         String,  :default => lambda { |post, attribute| post.title.downcase.gsub(' ', '-') }
        attribute :view_count,   Integer, :default => 0
        attribute :published,    Boolean, :default => false, :accessor => :private
        attribute :editor_title, String,  :default => :default_editor_title
        attribute :reference,    String,  :default => Reference.new
        attribute :revisions,    Array
        attribute :index,        Hash
        attribute :authors,      Set

        def default_editor_title
          published? ? title : "UNPUBLISHED: #{title}"
        end
      end

    end
  end

  subject { Examples::Page.new }

  specify 'without a default the value is nil' do
    subject.title.should be_nil
  end

  specify 'can be supplied with the :default option' do
    subject.view_count.should == 0
  end

  specify "you can pass a 'callable-object' to the :default option" do
    subject.title = 'Example Blog Post'
    subject.slug.should == 'example-blog-post'
  end

  specify 'you can set defaults for private attributes' do
    subject.title = 'Top Secret'
    subject.editor_title.should == 'UNPUBLISHED: Top Secret'
  end

  context 'a ValueObject' do
    it 'does not duplicate the ValueObject' do
      page1 = Examples::Page.new
      page2 = Examples::Page.new
      page1.reference.should equal(page2.reference)
    end
  end

  context 'an Array' do
    specify 'without a default the value is an empty Array' do
      subject.revisions.should eql([])
    end
  end

  context 'a Hash' do
    specify 'without a default the value is an empty Hash' do
      subject.index.should eql({})
    end
  end

  context 'a Set' do
    specify 'without a default the value is an empty Set' do
      subject.authors.should eql(Set.new)
    end
  end
end