require File.dirname(__FILE__) + '/test_helper'

class FormTest < Presenting::Test
  def setup
    @f = Presentation::Form.new
  end
  
  def test_method_for_new_record
    @f.presentable = stub('record', :new_record? => true)
    assert_equal :post, @f.method
  end
  
  def test_method_for_existing_record
    @f.presentable = stub('record', :new_record? => false)
    assert_equal :put, @f.method
  end
  
  def test_button_for_new_record
    @f.presentable = stub('record', :new_record? => true)
    assert_equal 'Create', @f.button
  end
  
  def test_button_for_existing_record
    @f.presentable = stub('record', :new_record? => false)
    assert_equal 'Update', @f.button
  end
  
  def test_adding_a_field_by_name
    @f.fields = [:a]
    
    assert_equal :a, @f.fields.first.name
    assert_equal 'A', @f.fields.first.label
    assert_equal :string, @f.fields.first.type
  end
  
  def test_adding_a_field_by_name_and_type
    @f.fields = [{:b => :boolean}]
    
    assert_equal :b, @f.fields.first.name
    assert_equal 'B', @f.fields.first.label
    assert_equal :boolean, @f.fields.first.type
  end
  
  def test_adding_a_field_by_name_and_options
    @f.fields = [{:foo => {:label => "Foo Bar", :type => :select}}]

    assert_equal :foo, @f.fields.first.name
    assert_equal 'Foo Bar', @f.fields.first.label
    assert_equal :select, @f.fields.first.type
  end
  
  def test_fields_accessors_are_shortcuts_to_first_group
    @f.fields = [:a]
    assert_equal :a, @f.groups.first.fields.first.name
    assert_equal @f.fields, @f.groups.first.fields
  end
  
  def test_adding_an_unnamed_group_of_fields
    @f.groups = [[:a]]
    
    assert_nil @f.groups.first.name
    assert_equal :a, @f.groups.first.fields.first.name
  end
  
  def test_adding_a_named_group_of_fields
    @f.groups = [{"foo" => [:a]}]
    
    assert_equal "foo", @f.groups.first.name
    assert_equal :a, @f.groups.first.fields.first.name
  end
end

class FormFieldTest < Presenting::Test
  def setup
    @f = Presentation::Form::Field.new
  end
  
  def test_default_value
    @f.name = 'foo'
    assert_equal :foo, @f.value
  end
  
  def test_symbol_value
    @f.value = :foo
    assert_equal 'bar', @f.value_from(stub('record', :foo => 'bar'))
  end
  
  def test_string_value
    @f.value = 'foo'
    assert_equal 'foo', @f.value_from(stub('record', :foo => 'bar'))
  end
  
  def test_proc_value
    @f.value = proc{|r| r.foo }
    assert_equal 'bar', @f.value_from(stub('record', :foo => 'bar'))
  end
end

class FormRenderingTest < Presentation::RenderTest
  def setup
    Rails.application.routes.draw do resources :users end
    @presentation = Presentation::Form.new
    @presentation.controller = ActionView::TestCase::TestController.new
  end
  
  def teardown
    Rails.application.reload_routes!
  end
  
  def test_rendering_a_string_field
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields = [:name]

    assert_select 'form div.field' do
      assert_select 'label', 'Name'
      assert_select "input[type=text][name='user[name]'][value='bob smith']"
    end
  end
  
  def test_rendering_a_string_field_with_a_custom_value
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields << {:name => {:value => 'test'}}
    
    assert_select 'form div.field' do
      assert_select "input[type=text][name='user[name]'][value='test']"
    end
  end
  
  def test_rendering_a_text_field
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields = [{:name => :text}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Name'
      assert_select "textarea[name='user[name]']", 'bob smith'
    end
  end
  
  def test_rendering_a_text_field_with_a_custom_value
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields << {:name => {:type => :text, :value => 'test'}}
    
    assert_select 'form div.field' do
      assert_select "textarea[name='user[name]']", 'test'
    end
  end
  
  def test_rendering_a_readonly_field
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields = [{:name => :readonly}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Name'
      assert_select "input[type=text][disabled=disabled][name='user[name]'][value='bob smith']"
    end
  end
  
  def test_rendering_a_readonly_field_with_a_custom_value
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields << {:name => {:type => :readonly, :value => 'test'}}
    
    assert_select 'form div.field' do
      assert_select "input[type=text][disabled=disabled][name='user[name]'][value='test']"
    end
  end
  
  def test_rendering_a_password_field
    @presentation.presentable = User.new(:name => 'bob smith')
    @presentation.fields = [{:name => :password}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Name'
      assert_select "input[type=password][name='user[name]'][value='bob smith']"
    end
  end
  
  def test_rendering_a_boolean_field
    @presentation.presentable = User.new(:suspended => false, :registered => true)
    @presentation.fields = [{:suspended => :boolean}, {:registered => :boolean}]

    assert_select 'form div.field:nth-of-type(1)' do
      assert_select 'label', 'Suspended'
      assert_select "input[type=checkbox][name='user[suspended]']"
    end
    assert_select 'form div.field:nth-of-type(2)' do
      assert_select 'label', 'Registered'
      assert_select "input[type=checkbox][name='user[registered]'][checked=checked]"
    end
  end
  
  def test_rendering_a_hidden_field
    @presentation.presentable = User.new(:suspended => false)
    @presentation.fields = [{:suspended => :hidden}]
    
    assert_select 'form' do
      assert_select 'label', {:text => 'Suspended', :count => 0}
      assert_select "input[type=hidden][name='user[suspended]']"
    end
  end
  
  def test_rendering_a_dropdown_field
    @presentation.presentable = User.new(:prefix => 'mr')
    @presentation.fields = [{:prefix => {:type => :dropdown, :type_options => [['Mr.', 'mr'], ['Mrs.', 'mrs']]}}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Prefix'
      assert_select "select[name='user[prefix]']" do
        assert_select "option[value=mr][selected=selected]", "Mr."
        assert_select "option[value=mrs]", "Mrs."
      end
    end
  end

  def test_rendering_a_radios_field
    @presentation.presentable = User.new(:prefix => 'mr')
    @presentation.fields = [{:prefix => {:type => :radios, :type_options => [['Mr.', 'mr'], ['Mrs.', 'mrs']]}}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Prefix'
      assert_select "label[for=user_prefix_mr]", "Mr."
      assert_select "input[type=radio][name='user[prefix]'][value=mr][checked=checked]"
      assert_select "label[for=user_prefix_mrs]", "Mrs."
      assert_select "input[type=radio][name='user[prefix]'][value=mrs]"
    end
  end

  def test_rendering_a_multi_select_field
    @presentation.presentable = User.new(:role_ids => [1,3])
    @presentation.fields = [{:role_ids => {:type => :multi_select, :type_options => [['A', 1], ['B', 2], ['C', 3]], :label => "Roles"}}]
    
    assert_select 'form div.field' do
      assert_select 'label', 'Roles'
      assert_select "select[name='user[role_ids][]'][multiple=multiple]" do
        assert_select "option[value=1][selected=selected]", "A"
        assert_select "option[value=2]", "B"
        assert_select "option[value=3][selected=selected]", "C"
      end
    end
  end
  
  def test_rendering_a_group_of_fields
    @presentation.presentable = User.new
    @presentation.groups = [
      [:name, :email],
      {"flags" => [:registered, :suspended]}
    ]

    assert_select "form fieldset:nth-of-type(1)" do
      assert_select "legend", false
      assert_select "div.field input[name='user[name]']"
      assert_select "div.field input[name='user[email]']"
    end
    assert_select "form fieldset:nth-of-type(2)" do
      assert_select "legend", "flags"
      assert_select "div.field input[name='user[registered]']"
      assert_select "div.field input[name='user[suspended]']"
    end
  end
  
  class User
    include Presenting::Configurable

    attr_accessor :prefix
    attr_accessor :name
    attr_accessor :email
    attr_accessor :registered
    attr_accessor :suspended
    attr_accessor :role_ids

    ##
    ## duck typing
    ##

    def new_record=(val)
      @new_record = val
    end

    def new_record?
      !! @new_record
    end

    ##
    ## Keys
    ##

    def id
      @id ||= new_record? ? nil : '12345'
    end

    def to_key
      new_record? ? nil : [ id ]
    end

    def to_param
      id
    end

    ##
    ## Naming
    ##

    extend ActiveModel::Naming

    # i actually want this model's name to not include the FormRenderingTest namespace
    # so i'm stubbing out the ActiveModel::Name with my own structure
    def self.model_name
      @_model_name ||= Name.new(:plural => 'users', :singular => 'user')
    end
    class Name
      attr_accessor :plural, :singular
      def initialize(hash)
        hash.each { |k, v| self.instance_variable_set("@#{k}", v) }
      end
    end
  end
end