porthole 0.99.4

data/test/fixtures/node.porthole

@@ -0,0 +1,8 @@
+<li>
+  %%contents%%
+  <ul>
+    %%#children%%
+    %%> node%%
+    %%/children%%
+  </ul>
+</li>

data/test/fixtures/partial_with_module.porthole

@@ -0,0 +1,4 @@
+<h1>%%greeting%%</h1>
+%%>simple%%
+
+<h3>%%farewell%%</h3>

data/test/fixtures/partial_with_module.rb

@@ -0,0 +1,37 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+module SimpleView
+  def name
+    "Bob"
+  end
+
+  def value
+    100_000
+  end
+
+  def taxed_value
+    value - (value * 0.4)
+  end
+
+  def in_ca
+    false
+  end
+end
+
+class PartialWithModule < Porthole
+  include SimpleView
+  self.path = File.dirname(__FILE__)
+
+  def greeting
+    "Welcome"
+  end
+
+  def farewell
+    "Fair enough, right?"
+  end
+end
+
+if $0 == __FILE__
+  puts PartialWithModule.to_html
+end

data/test/fixtures/passenger.conf

@@ -0,0 +1,5 @@
+<VirtualHost *>
+  ServerName %%server%%
+  DocumentRoot %%deploy_to%%
+  RailsEnv %%stage%%
+</VirtualHost>

data/test/fixtures/passenger.rb

@@ -0,0 +1,27 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+class Passenger < Porthole
+  self.path = File.dirname(__FILE__)
+  self.template_extension = 'conf'
+
+  def server
+    "example.com"
+  end
+
+  def deploy_to
+    "/var/www/example.com"
+  end
+
+  def stage
+    "production"
+  end
+
+  def timestamp
+    Time.now.strftime('%Y%m%d%H%M%S')
+  end
+end
+
+if $0 == __FILE__
+  puts Passenger.to_text
+end

data/test/fixtures/recursive.porthole

@@ -0,0 +1,4 @@
+It works!
+%%#show%%
+%%>recursive%%
+%%/show%%

data/test/fixtures/recursive.rb

@@ -0,0 +1,14 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+class Recursive < Porthole
+  self.path = File.dirname(__FILE__)
+
+  def show
+    false
+  end
+end
+
+if $0 == __FILE__
+  puts Recursive.to_html
+end

data/test/fixtures/simple.porthole

@@ -0,0 +1,5 @@
+Hello %%name%%
+You have just won $%%value%%!
+%%#in_ca%%
+Well, $%% taxed_value %%, after taxes.
+%%/in_ca%%

data/test/fixtures/simple.rb

@@ -0,0 +1,26 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+class Simple < Porthole
+  self.path = File.dirname(__FILE__)
+
+  def name
+    "Chris"
+  end
+
+  def value
+    10_000
+  end
+
+  def taxed_value
+    value - (value * 0.4)
+  end
+
+  def in_ca
+    true
+  end
+end
+
+if $0 == __FILE__
+  puts Simple.to_html
+end

data/test/fixtures/template_partial.porthole

@@ -0,0 +1,2 @@
+<h1>%%title%%</h1>
+%%>inner_partial%%

data/test/fixtures/template_partial.rb

@@ -0,0 +1,18 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+class TemplatePartial < Porthole
+  self.path = File.dirname(__FILE__)
+
+  def title
+    "Welcome"
+  end
+
+  def title_bars
+    '-' * title.size
+  end
+end
+
+if $0 == __FILE__
+  puts TemplatePartial.to_html
+end

data/test/fixtures/template_partial.txt

@@ -0,0 +1,4 @@
+%%title%%
+%%title_bars%%
+
+%%>inner_partial%%

data/test/fixtures/unescaped.porthole

@@ -0,0 +1 @@
+<h1>%%{title}%%</h1>

data/test/fixtures/unescaped.rb

@@ -0,0 +1,14 @@
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/../lib'
+require 'porthole'
+
+class Unescaped < Porthole
+  self.path = File.dirname(__FILE__)
+
+  def title
+    "Bear > Shark"
+  end
+end
+
+if $0 == __FILE__
+  puts Unescaped.to_html
+end

data/test/fixtures/utf8.porthole

@@ -0,0 +1,3 @@
+<h1>中文 %%test%%</h1>
+
+%%> utf8_partial%%

data/test/fixtures/utf8_partial.porthole

@@ -0,0 +1 @@
+<h2>中文又来啦</h2>

data/test/helper.rb

@@ -0,0 +1,7 @@
+require 'test/unit'
+
+$LOAD_PATH.unshift File.dirname(__FILE__) + '/fixtures'
+
+Dir[File.dirname(__FILE__) + '/fixtures/*.rb'].each do |f|
+  require f
+end

data/test/parser_test.rb

@@ -0,0 +1,78 @@
+$LOAD_PATH.unshift File.dirname(__FILE__)
+require 'helper'
+
+class ParserTest < Test::Unit::TestCase
+  def test_parser
+    lexer = Porthole::Parser.new
+    tokens = lexer.compile(<<-EOF)
+<h1>%%header%%</h1>
+%%#items%%
+%%#first%%
+  <li><strong>%%name%%</strong></li>
+%%/first%%
+%%#link%%
+  <li><a href="%%url%%">%%name%%</a></li>
+%%/link%%
+%%/items%%
+
+%%#empty%%
+<p>The list is empty.</p>
+%%/empty%%
+EOF
+
+    expected = [:multi,
+      [:static, "<h1>"],
+      [:porthole, :etag, [:porthole, :fetch, ["header"]]],
+      [:static, "</h1>\n"],
+      [:porthole,
+        :section,
+        [:porthole, :fetch, ["items"]],
+        [:multi,
+          [:porthole,
+            :section,
+            [:porthole, :fetch, ["first"]],
+            [:multi,
+              [:static, "  <li><strong>"],
+              [:porthole, :etag, [:porthole, :fetch, ["name"]]],
+              [:static, "</strong></li>\n"]],
+            %Q'  <li><strong>%%name%%</strong></li>\n',
+            %w[%% %%]],
+          [:porthole,
+            :section,
+            [:porthole, :fetch, ["link"]],
+            [:multi,
+              [:static, "  <li><a href=\""],
+              [:porthole, :etag, [:porthole, :fetch, ["url"]]],
+              [:static, "\">"],
+              [:porthole, :etag, [:porthole, :fetch, ["name"]]],
+              [:static, "</a></li>\n"]],
+            %Q'  <li><a href="%%url%%">%%name%%</a></li>\n',
+            %w[%% %%]]],
+        %Q'%%#first%%\n  <li><strong>%%name%%</strong></li>\n%%/first%%\n%%#link%%\n  <li><a href="%%url%%">%%name%%</a></li>\n%%/link%%\n',
+        %w[%% %%]],
+      [:static, "\n"],
+      [:porthole,
+        :section,
+        [:porthole, :fetch, ["empty"]],
+        [:multi, [:static, "<p>The list is empty.</p>\n"]],
+        %Q'<p>The list is empty.</p>\n',
+        %w[%% %%]]]
+
+    assert_equal expected, tokens
+  end
+
+  def test_raw_content_and_whitespace
+    lexer = Porthole::Parser.new
+    tokens = lexer.compile("%%#list%%\t%%/list%%")
+
+    expected = [:multi,
+      [:porthole,
+        :section,
+        [:porthole, :fetch, ["list"]],
+        [:multi, [:static, "\t"]],
+        "\t",
+        %w[%% %%]]]
+
+    assert_equal expected, tokens
+  end
+end

data/test/partial_test.rb

@@ -0,0 +1,168 @@
+$LOAD_PATH.unshift File.dirname(__FILE__)
+require 'helper'
+
+class PartialTest < Test::Unit::TestCase
+  def test_view_partial
+    assert_equal <<-end_partial.strip, PartialWithModule.render
+<h1>Welcome</h1>
+Hello Bob
+You have just won $100000!
+
+<h3>Fair enough, right?</h3>
+end_partial
+  end
+
+  def test_partial_with_slashes
+    klass = Class.new(Porthole)
+    klass.template = '%%> test/fixtures/inner_partial%%'
+    view = klass.new
+    view[:title] = 'success'
+
+    assert_equal "Again, success!", view.render
+  end
+
+  def test_view_partial_inherits_context
+    klass = Class.new(TemplatePartial)
+    view = klass.new
+    view.template_path = File.dirname(__FILE__) + '/fixtures'
+    view[:titles] = [{:title => :One}, {:title => :Two}]
+    view.template = <<-end_template
+<h1>Context Test</h1>
+<ul>
+%%#titles%%
+<li>%%>inner_partial%%</li>
+%%/titles%%
+</ul>
+end_template
+    assert_equal <<-end_partial, view.render
+<h1>Context Test</h1>
+<ul>
+<li>Again, One!</li>
+<li>Again, Two!</li>
+</ul>
+end_partial
+  end
+
+  def test_view_partial_inherits_context_of_class_methods
+    klass = Class.new(TemplatePartial)
+    klass.template_path = File.dirname(__FILE__) + '/fixtures'
+    klass.send(:define_method, :titles) do
+      [{:title => :One}, {:title => :Two}]
+    end
+    view = klass.new
+    view.template = <<-end_template
+<h1>Context Test</h1>
+<ul>
+%%#titles%%
+<li>%%>inner_partial%%</li>
+%%/titles%%
+</ul>
+end_template
+    assert_equal <<-end_partial, view.render
+<h1>Context Test</h1>
+<ul>
+<li>Again, One!</li>
+<li>Again, Two!</li>
+</ul>
+end_partial
+  end
+
+  def test_template_partial
+    assert_equal <<-end_partial.strip, TemplatePartial.render
+<h1>Welcome</h1>
+Again, Welcome!
+end_partial
+  end
+
+  def test_template_partial_with_custom_extension
+    partial = Class.new(TemplatePartial)
+    partial.template_extension = 'txt'
+    partial.template_path = File.dirname(__FILE__) + '/fixtures'
+
+    assert_equal <<-end_partial.strip, partial.render.strip
+Welcome
+-------
+
+## Again, Welcome! ##
+end_partial
+  end
+
+  def test_recursive_paritals
+    assert_equal <<-end_partial, Recursive.render
+It works!
+end_partial
+  end
+
+  def test_crazy_recursive_partials
+    assert_equal <<-end_partial.strip, CrazyRecursive.render
+<html>
+  <body>
+    <ul>
+      <li>
+        1
+        <ul>
+          <li>
+            2
+            <ul>
+              <li>
+                3
+                <ul>
+                </ul>
+              </li>
+            </ul>
+          </li>
+          <li>
+            4
+            <ul>
+              <li>
+                5
+                <ul>
+                  <li>
+                    6
+                    <ul>
+                    </ul>
+                  </li>
+                </ul>
+              </li>
+            </ul>
+          </li>
+        </ul>
+      </li>
+    </ul>
+  </body>
+</html>
+end_partial
+  end
+
+  def test_partials_use_proper_context
+    assert_equal "OuterThing OuterThing", OuterThing.render('%%name%% %%> p%%')
+
+    assert_equal "InnerThing InnerThing", InnerThing.render('%%name%% %%> p%%')
+
+    assert_equal "OuterThing InnerThing InnerThing",
+      OuterThing.render('%%name%% %%#inner%%%%name%% %%> p%%%%/inner%%')
+  end
+
+  def test_partials_render_returned_strings
+    assert_equal "ok", MiddleThing.render('%%> some_partial %%')
+  end
+end
+
+class InnerThing < Porthole
+  def partial(p) self.class end
+  def name;      self.class end
+end
+
+class OuterThing < Porthole
+  def inner
+    InnerThing.new
+  end
+
+  def partial(p) self.class end
+  def name;      self.class end
+end
+
+class MiddleThing < Porthole
+  def partial(name) "%%#{name}%%" end
+  def some_partial; "ok" end
+end