hamlet 0.1

data/test/slim/helper.rb

@@ -0,0 +1,200 @@
+# encoding: utf-8
+
+require 'rubygems'
+require 'minitest/unit'
+require 'hamlet'
+require 'slim/grammar'
+
+MiniTest::Unit.autorun
+
+Slim::Engine.after  Slim::Parser, Temple::Filters::Validator, :grammar => Slim::Grammar
+Slim::Engine.before Slim::Compiler, Temple::Filters::Validator, :grammar => Slim::Grammar
+Slim::Engine.before Temple::HTML::Pretty, Temple::Filters::Validator
+
+class TestSlim < MiniTest::Unit::TestCase
+  def setup
+    @env = Env.new
+  end
+
+  def teardown
+    Slim::Sections.set_default_options(:dictionary_access => :wrapped)
+  end
+
+  def render(source, options = {}, &block)
+    Hamlet::Template.new(options[:file], options) { source }.render(options[:scope] || @env, &block)
+  end
+
+  def assert_html(expected, source, options = {}, &block)
+    assert_equal expected, render(source, options, &block)
+  end
+
+  def assert_syntax_error(message, source, options = {})
+    render(source, options)
+    raise 'Syntax error expected'
+  rescue Slim::Parser::SyntaxError => ex
+    assert_equal message, ex.message
+  end
+
+  def assert_ruby_error(error, from, source, options = {})
+    render(source, options)
+    raise 'Ruby error expected'
+  rescue error => ex
+    assert_backtrace(ex, from)
+  end
+
+  def assert_backtrace(ex, from)
+    if defined?(RUBY_ENGINE) && RUBY_ENGINE == 'rbx'
+      # HACK: Rubinius stack trace sometimes has one entry more
+      if ex.backtrace[0] !~ /^#{Regexp.escape from}:/
+        ex.backtrace[1] =~ /^(.*?:\d+):/
+        assert_equal from, $1
+      end
+    else
+      ex.backtrace[0] =~ /^(.*?:\d+):/
+      assert_equal from, $1
+    end
+  end
+
+  def assert_ruby_syntax_error(from, source, options = {})
+    render(source, options)
+    raise 'Ruby syntax error expected'
+  rescue SyntaxError => ex
+    ex.message =~ /^(.*?:\d+):/
+    assert_equal from, $1
+  end
+
+  def assert_runtime_error(message, source, options = {})
+    render(source, options)
+    raise Exception, 'Runtime error expected'
+  rescue RuntimeError => ex
+    assert_equal message, ex.message
+  end
+end
+
+class Env
+  attr_reader :var
+
+  class ::HtmlSafeString < String
+    def html_safe?
+      true
+    end
+  end
+
+  class ::HtmlUnsafeString < String
+    def html_safe?
+      false
+    end
+  end
+
+  def initialize
+    @var = 'instance'
+  end
+
+  def id_helper
+    "notice"
+  end
+
+  def hash
+    {:a => 'The letter a', :b => 'The letter b'}
+  end
+
+  def show_first?(show = false)
+    show
+  end
+
+  def define_macro(name, &block)
+    @macro ||= {}
+    @macro[name.to_s] = block
+    ''
+  end
+
+  def call_macro(name, *args)
+    @macro[name.to_s].call(*args)
+  end
+
+  def hello_world(text = "Hello World from @env", opts = {})
+    text << opts.to_a * " " if opts.any?
+    if block_given?
+      "#{text} #{yield} #{text}"
+    else
+      text
+    end
+  end
+
+  def message(*args)
+    args.join(' ')
+  end
+
+  def action_path(*args)
+    "/action-#{args.join('-')}"
+  end
+
+  def in_keyword
+    "starts with keyword"
+  end
+
+  def evil_method
+    "<script>do_something_evil();</script>"
+  end
+
+  def method_which_returns_true
+    true
+  end
+
+  def output_number
+    1337
+  end
+end
+
+class ViewEnv
+  def output_number
+     1337
+  end
+
+  def person
+    [{:name => 'Joe'}, {:name => 'Jack'}]
+  end
+
+  def people
+    %w(Andy Fred Daniel).collect{|n| Person.new(n)}
+  end
+
+  def cities
+    %w{Atlanta Melbourne Karlsruhe}
+  end
+
+  def people_with_locations
+    array = []
+    people.each_with_index do |p,i|
+      p.location = Location.new cities[i]
+      array << p
+    end
+    array
+  end
+end
+
+require 'forwardable'
+
+class Person
+  extend Forwardable
+
+  attr_accessor :name
+
+  def initialize(name)
+    @name = name
+  end
+
+  def location=(location)
+    @location = location
+  end
+
+  def_delegators :@location, :city
+end
+
+class Location
+  attr_accessor :city
+
+  def initialize(city)
+    @city   = city
+  end
+end

data/test/slim/test_chain_manipulation.rb

@@ -0,0 +1,42 @@
+require 'helper'
+
+class TestSlimChainManipulation < TestSlim
+  def test_replace
+    source = %q{
+p Test
+}
+    chain = proc do |engine|
+      engine.replace(Temple::HTML::Pretty, :ReplacementFilter) do |exp|
+        [:dynamic, '1+1']
+      end
+    end
+
+    assert_html '2', source, :chain => chain
+  end
+
+  def test_before
+    source = %q{
+p Test
+}
+    chain = proc do |engine|
+      engine.before(Slim::Parser, :WrapInput) do |input|
+        "p Header\n#{input}\np Footer"
+      end
+    end
+
+    assert_html '<p>Header</p><p>Test</p><p>Footer</p>', source, :chain => chain
+  end
+
+  def test_after
+    source = %q{
+p Test
+}
+    chain = proc do |engine|
+      engine.after(Slim::Parser, :ReplaceParsedExp) do |exp|
+        [:slim, :output, false, '1+1', [:multi]]
+      end
+    end
+
+    assert_html '2', source, :chain => chain
+  end
+end

data/test/slim/test_code_blocks.rb

@@ -0,0 +1,68 @@
+require 'helper'
+
+class TestSlimCodeBlocks < TestSlim
+  def test_render_with_output_code_block
+    source = %q{
+p
+  = hello_world "Hello Ruby!" do
+    | Hello from within a block!
+}
+
+    assert_html '<p>Hello Ruby! Hello from within a block! Hello Ruby!</p>', source
+  end
+
+  def test_render_with_output_code_within_block
+    source = %q{
+p
+  = hello_world "Hello Ruby!" do
+    = hello_world "Hello from within a block!"
+}
+
+    assert_html '<p>Hello Ruby! Hello from within a block! Hello Ruby!</p>', source
+  end
+
+  def test_render_with_output_code_within_block_2
+    source = %q{
+p
+  = hello_world "Hello Ruby!" do
+    = hello_world "Hello from within a block!" do
+      = hello_world "And another one!"
+}
+
+    assert_html '<p>Hello Ruby! Hello from within a block! And another one! Hello from within a block! Hello Ruby!</p>', source
+  end
+
+  def test_output_block_with_arguments
+    source = %q{
+p
+  = define_macro :person do |first_name, last_name|
+    .first_name = first_name
+    .last_name = last_name
+  == call_macro :person, 'John', 'Doe'
+  == call_macro :person, 'Max', 'Mustermann'
+}
+
+    assert_html '<p><div class="first_name">John</div><div class="last_name">Doe</div><div class="first_name">Max</div><div class="last_name">Mustermann</div></p>', source
+  end
+
+
+  def test_render_with_control_code_loop
+    source = %q{
+p
+  - 3.times do
+    | Hey!
+}
+
+    assert_html '<p>Hey!Hey!Hey!</p>', source
+  end
+
+  def test_captured_code_block_with_conditional
+    source = %q{
+= hello_world "Hello Ruby!" do
+  - if true
+    | Hello from within a block!
+}
+
+    assert_html 'Hello Ruby! Hello from within a block! Hello Ruby!', source
+  end
+end

data/test/slim/test_code_escaping.rb

@@ -0,0 +1,53 @@
+require 'helper'
+
+class TestSlimCodeEscaping < TestSlim
+  def test_escaping_evil_method
+    source = %q{
+p = evil_method
+}
+
+    assert_html '<p>&lt;script&gt;do_something_evil();&lt;&#47;script&gt;</p>', source
+  end
+
+  def test_render_without_html_safe
+    source = %q{
+p = "<strong>Hello World\\n, meet \\"Slim\\"</strong>."
+}
+
+    assert_html "<p>&lt;strong&gt;Hello World\n, meet \&quot;Slim\&quot;&lt;&#47;strong&gt;.</p>", source
+  end
+
+  def test_render_with_html_safe_false
+    source = %q{
+p = HtmlUnsafeString.new("<strong>Hello World\\n, meet \\"Slim\\"</strong>.")
+}
+
+    assert_html "<p>&lt;strong&gt;Hello World\n, meet \&quot;Slim\&quot;&lt;&#47;strong&gt;.</p>", source, :use_html_safe => true
+  end
+
+  def test_render_with_html_safe_true
+    source = %q{
+p = HtmlSafeString.new("<strong>Hello World\\n, meet \\"Slim\\"</strong>.")
+}
+
+    assert_html "<p><strong>Hello World\n, meet \"Slim\"</strong>.</p>", source, :use_html_safe => true
+  end
+
+  def test_render_with_disable_escape_false
+    source = %q{
+= "<p>Hello</p>"
+== "<p>World</p>"
+}
+
+    assert_html "&lt;p&gt;Hello&lt;&#47;p&gt;<p>World</p>", source
+  end
+
+  def test_render_with_disable_escape_true
+    source = %q{
+= "<p>Hello</p>"
+== "<p>World</p>"
+}
+
+    assert_html "<p>Hello</p><p>World</p>", source, :disable_escape => true
+  end
+end

data/test/slim/test_code_evaluation.rb

@@ -0,0 +1,281 @@
+require 'helper'
+
+class TestSlimCodeEvaluation < TestSlim
+  def test_render_with_call_to_set_attributes
+    source = %q{
+p id="#{id_helper}" class="hello world" = hello_world
+}
+
+    assert_html '<p class="hello world" id="notice">Hello World from @env</p>', source
+  end
+
+  def test_render_with_call_to_set_custom_attributes
+    source = %q{
+p data-id="#{id_helper}" data-class="hello world"
+  = hello_world
+}
+
+    assert_html '<p data-class="hello world" data-id="notice">Hello World from @env</p>', source
+  end
+
+  def test_render_with_call_to_set_attributes_and_call_to_set_content
+    source = %q{
+p id="#{id_helper}" class="hello world" = hello_world
+}
+
+    assert_html '<p class="hello world" id="notice">Hello World from @env</p>', source
+  end
+
+  def test_render_with_parameterized_call_to_set_attributes_and_call_to_set_content
+    source = %q{
+p id="#{id_helper}" class="hello world" = hello_world("Hello Ruby!")
+}
+
+    assert_html '<p class="hello world" id="notice">Hello Ruby!</p>', source
+  end
+
+  def test_render_with_spaced_parameterized_call_to_set_attributes_and_call_to_set_content
+    source = %q{
+p id="#{id_helper}" class="hello world" = hello_world "Hello Ruby!"
+}
+
+    assert_html '<p class="hello world" id="notice">Hello Ruby!</p>', source
+  end
+
+  def test_render_with_spaced_parameterized_call_to_set_attributes_and_call_to_set_content_2
+    source = %q{
+p id="#{id_helper}" class="hello world" = hello_world "Hello Ruby!", :dummy => "value"
+}
+
+    assert_html '<p class="hello world" id="notice">Hello Ruby!dummy value</p>', source
+  end
+
+  def test_hash_call_in_attribute
+    source = %q{
+p id="#{hash[:a]}" Test it
+}
+
+    assert_html '<p id="The letter a">Test it</p>', source
+  end
+
+  def test_instance_variable_in_attribute_without_quotes
+    source = %q{
+p id=@var
+}
+
+    assert_html '<p id="instance"></p>', source
+  end
+
+  def test_method_call_in_attribute_without_quotes
+    source = %q{
+form action=action_path(:page, :save) method='post'
+}
+
+    assert_html '<form action="&#47;action-page-save" method="post"></form>', source
+  end
+
+  def test_ruby_attribute_with_unbalanced_delimiters
+    source = %q{
+div crazy=action_path('[') id="crazy_delimiters"
+}
+
+    assert_html '<div crazy="&#47;action-[" id="crazy_delimiters"></div>', source
+  end
+
+  def test_method_call_in_delimited_attribute_without_quotes
+    source = %q{
+form(action=action_path(:page, :save) method='post')
+}
+
+    assert_html '<form action="&#47;action-page-save" method="post"></form>', source
+  end
+
+  def test_method_call_in_delimited_attribute_without_quotes2
+    source = %q{
+form(method='post' action=action_path(:page, :save))
+}
+
+    assert_html '<form action="&#47;action-page-save" method="post"></form>', source
+  end
+
+  def test_bypassing_escape_in_attribute
+    source = %q{
+form action==action_path(:page, :save) method='post'
+}
+
+    assert_html '<form action="/action-page-save" method="post"></form>', source
+  end
+
+  def test_hash_call_in_attribute_without_quotes
+    source = %q{
+p id=hash[:a] Test it
+}
+
+    assert_html '<p id="The letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute
+    source = %q{
+p(id=hash[:a]) Test it
+}
+
+    assert_html '<p id="The letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_attribute_with_ruby_evaluation
+    source = %q{
+p id={hash[:a] + hash[:a]} Test it
+}
+
+    assert_html '<p id="The letter aThe letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute_with_ruby_evaluation
+    source = %q{
+p(id=(hash[:a] + hash[:a])) Test it
+}
+
+    assert_html '<p id="The letter aThe letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute_with_ruby_evaluation_2
+    source = %q{
+p[id=(hash[:a] + hash[:a])] Test it
+}
+
+    assert_html '<p id="The letter aThe letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute_with_ruby_evaluation_3
+    source = %q{
+p(id=[hash[:a] + hash[:a]]) Test it
+}
+
+    assert_html '<p id="The letter aThe letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute_with_ruby_evaluation_4
+    source = %q{
+p(id=[hash[:a] + hash[:a]] class=[hash[:a]]) Test it
+}
+
+    assert_html '<p class="The letter a" id="The letter aThe letter a">Test it</p>', source
+  end
+
+  def test_hash_call_in_delimited_attribute_with_ruby_evaluation_5
+    source = %q{
+p(id=hash[:a] class=[hash[:a]]) Test it
+}
+
+    assert_html '<p class="The letter a" id="The letter a">Test it</p>', source
+  end
+
+  def test_computation_in_attribute
+    source = %q{
+p id=(1 + 1)*5 Test it
+}
+
+    assert_html '<p id="10">Test it</p>', source
+  end
+
+  def test_number_type_interpolation
+    source = %q{
+p = output_number
+}
+
+    assert_html '<p>1337</p>', source
+  end
+
+  def test_ternary_operation_in_attribute
+    source = %q{
+p id="#{(false ? 'notshown' : 'shown')}" = output_number
+}
+
+    assert_html '<p id="shown">1337</p>', source
+  end
+
+  def test_class_attribute_merging
+    source = %{
+.alpha class="beta" Test it
+}
+    assert_html '<div class="alpha beta">Test it</div>', source
+  end
+
+  def test_class_attribute_merging_with_nil
+    source = %{
+.alpha class="beta" class=nil class="gamma" Test it
+}
+    assert_html '<div class="alpha beta gamma">Test it</div>', source
+  end
+
+  def test_id_attribute_merging
+    source = %{
+#alpha id="beta" Test it
+}
+    assert_html '<div id="alpha_beta">Test it</div>', source, :attr_delimiter => {'class' => ' ', 'id' => '_' }
+  end
+
+  def test_id_attribute_merging2
+    source = %{
+#alpha id="beta" Test it
+}
+    assert_html '<div id="alpha-beta">Test it</div>', source, :attr_delimiter => {'class' => ' ', 'id' => '-' }
+  end
+
+  def test_boolean_attribute_false
+    source = %{
+option selected=false Text
+}
+
+    assert_html '<option>Text</option>', source
+  end
+
+  def test_boolean_attribute_true
+    source = %{
+option selected=true Text
+}
+
+    assert_html '<option selected="selected">Text</option>', source
+  end
+
+  def test_boolean_attribute_dynamic
+    source = %{
+option selected=method_which_returns_true Text
+}
+
+    assert_html '<option selected="selected">Text</option>', source
+  end
+
+  def test_boolean_attribute_nil
+    source = %{
+option selected=nil Text
+}
+
+    assert_html '<option>Text</option>', source
+  end
+
+  def test_boolean_attribute_string2
+    source = %{
+option selected="selected" Text
+}
+
+    assert_html '<option selected="selected">Text</option>', source
+  end
+
+  def test_boolean_attribute_shortcut
+    source = %{
+option(class="clazz" selected) Text
+option(selected class="clazz") Text
+}
+
+    assert_html '<option class="clazz" selected="selected">Text</option><option class="clazz" selected="selected">Text</option>', source
+  end
+
+  def test_array_attribute
+    source = %{
+.alpha class="beta" class=[:gamma, nil, :delta, [true, false]]
+}
+
+    assert_html '<div class="alpha beta gamma delta true false"></div>', source
+  end
+end