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

class MailerBehaviorTest < Test::Unit::TestCase
  test_helper :behavior_render
  
  def setup
    @page = Page.new(:title => 'Test Page', :slug => "\\")
    @page.behavior_id = 'Mailer'
    @behavior = @page.behavior
  end
  
  # Testing the tags...
  def test_form_tag_without_name_attribute
    assert_renders(
      %Q(<div><strong>`mailer:form' tag requires a `name' attribute</strong></div>), 
      '<r:mailer:form />',
      '/test-mailer' )
  end
  
  def test_form_tag_with_name_attribute
    assert_renders(
      %Q|<form action="http://testhost.tld/test-mailer" method="POST" class="mailer-form" enctype="multipart/form-data"><input type="hidden" name="mailer_name" value="test" />HELLO</form>|,
      '<r:mailer:form name="test">HELLO</r:mailer:form>',
      '/test-mailer' )
  end
  
  # Do the same tests with each of these similar input tags...
  %w(text password file).each do |type|
    define_method "test_#{type}_tag_with_no_name_attribute" do 
      assert_renders(
        %Q|<div><strong>`mailer:#{type}' tag requires a `name' attribute</strong></div>|,
        %Q|<r:mailer:#{type} />|,
        '/test-mailer' )
    end

    define_method "test_#{type}_tag_with_name_attribute" do 
      assert_renders(
        %Q|<input type="#{type}" name="mailer[fullname]" class="mailer-field" id="fullname" value="" />|,
        %Q|<r:mailer:#{type} name="fullname" />|,
        '/test-mailer' )
    end

    define_method "test_#{type}_tag_with_name_and_value_attributes" do 
      assert_renders(
        %Q|<input type="#{type}" name="mailer[fullname]" class="mailer-field" id="fullname" value="test value" />|,
        %Q|<r:mailer:#{type} name="fullname" value="test value"/>|,
        '/test-mailer' )
    end
    
    define_method "test_#{type}_tag_with_name_and_class_attributes" do 
      assert_renders(
        %Q|<input type="#{type}" name="mailer[fullname]" class="my-field-style" id="fullname" value="" />|,
        %Q|<r:mailer:#{type} name="fullname" class="my-field-style" />|,
        '/test-mailer' )
    end

    define_method "test_#{type}_tag_with_name_class_and_size_attributes" do 
      assert_renders(
        %Q|<input type="#{type}" name="mailer[fullname]" class="my-other-style" id="fullname" size="10" value="" />|,
        %Q|<r:mailer:#{type} name="fullname" size="10" class="my-other-style"/>|,
        '/test-mailer' )
    end
  end
  
end