faithfulgeek-haml_splash 0.1.0

data/.document

@@ -0,0 +1,5 @@
+README.rdoc
+lib/**/*.rb
+bin/*
+features/**/*.feature
+LICENSE

data/.gitignore

@@ -0,0 +1,5 @@
+*.sw?
+.DS_Store
+coverage
+rdoc
+pkg

data/LICENSE

@@ -0,0 +1,20 @@
+Copyright (c) 2009 Joe Fiorini
+
+Permission is hereby granted, free of charge, to any person obtaining
+a copy of this software and associated documentation files (the
+"Software"), to deal in the Software without restriction, including
+without limitation the rights to use, copy, modify, merge, publish,
+distribute, sublicense, and/or sell copies of the Software, and to
+permit persons to whom the Software is furnished to do so, subject to
+the following conditions:
+
+The above copyright notice and this permission notice shall be
+included in all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND,
+EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF
+MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND
+NONINFRINGEMENT. IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE
+LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION
+OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION
+WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.

data/README.rdoc

@@ -0,0 +1,7 @@
+= haml_splash
+
+Description goes here.
+
+== Copyright
+
+Copyright (c) 2009 Joe Fiorini. See LICENSE for details.

data/Rakefile

@@ -0,0 +1,56 @@
+require 'rubygems'
+require 'rake'
+
+begin
+  require 'jeweler'
+  Jeweler::Tasks.new do |gem|
+    gem.name = "haml_splash"
+    gem.summary = %Q{TODO}
+    gem.email = "joe@faithfulgeek.org"
+    gem.homepage = "http://github.com/faithfulgeek/haml_splash"
+    gem.authors = ["Joe Fiorini"]
+    # gem is a Gem::Specification... see http://www.rubygems.org/read/chapter/20 for additional settings
+  end
+
+rescue LoadError
+  puts "Jeweler (or a dependency) not available. Install it with: sudo gem install jeweler"
+end
+
+require 'rake/testtask'
+Rake::TestTask.new(:test) do |test|
+  test.libs << 'lib' << 'test'
+  test.pattern = 'test/**/*_test.rb'
+  test.verbose = true
+end
+
+begin
+  require 'rcov/rcovtask'
+  Rcov::RcovTask.new do |test|
+    test.libs << 'test'
+    test.pattern = 'test/**/*_test.rb'
+    test.verbose = true
+  end
+rescue LoadError
+  task :rcov do
+    abort "RCov is not available. In order to run rcov, you must: sudo gem install spicycode-rcov"
+  end
+end
+
+
+task :default => :test
+
+require 'rake/rdoctask'
+Rake::RDocTask.new do |rdoc|
+  if File.exist?('VERSION.yml')
+    config = YAML.load(File.read('VERSION.yml'))
+    version = "#{config[:major]}.#{config[:minor]}.#{config[:patch]}"
+  else
+    version = ""
+  end
+
+  rdoc.rdoc_dir = 'rdoc'
+  rdoc.title = "haml_splash #{version}"
+  rdoc.rdoc_files.include('README*')
+  rdoc.rdoc_files.include('lib/**/*.rb')
+end
+

data/VERSION

@@ -0,0 +1 @@
+0.1.0

data/haml_splash.gemspec

@@ -0,0 +1,52 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{haml_splash}
+  s.version = "0.1.0"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Joe Fiorini"]
+  s.date = %q{2009-06-22}
+  s.email = %q{joe@faithfulgeek.org}
+  s.extra_rdoc_files = [
+    "LICENSE",
+     "README.rdoc"
+  ]
+  s.files = [
+    ".document",
+     ".gitignore",
+     "LICENSE",
+     "README.rdoc",
+     "Rakefile",
+     "VERSION",
+     "haml_splash.gemspec",
+     "lib/core_ext/hash.rb",
+     "lib/haml/splash.rb",
+     "lib/haml_splash.rb",
+     "lib/haml_splash/haml_hacks.rb",
+     "lib/haml_splash/liquid_hacks.rb",
+     "test/haml_liquid_if_tags_test.rb",
+     "test/haml_splash_test.rb",
+     "test/test_helper.rb"
+  ]
+  s.homepage = %q{http://github.com/faithfulgeek/haml_splash}
+  s.rdoc_options = ["--charset=UTF-8"]
+  s.require_paths = ["lib"]
+  s.rubygems_version = %q{1.3.3}
+  s.summary = %q{TODO}
+  s.test_files = [
+    "test/haml_liquid_if_tags_test.rb",
+     "test/haml_splash_test.rb",
+     "test/test_helper.rb"
+  ]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 3
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+    else
+    end
+  else
+  end
+end

data/lib/core_ext/hash.rb

@@ -0,0 +1,13 @@
+class Hash
+  def stringify_keys
+    inject({}) do |acc,(key, value)|
+      if value.is_a?(Hash)
+        acc[key.to_s] = value.stringify_keys 
+      else
+        acc[key.to_s] = value
+      end
+      acc
+    end
+  end
+end
+

data/lib/haml/splash.rb

@@ -0,0 +1,3 @@
+require 'haml'
+require 'liquid'
+require File.dirname(__FILE__) + '/../haml_splash'

data/lib/haml_splash.rb

@@ -0,0 +1,10 @@
+module HamlSplash
+  def self.register!
+    HamlSplash::HamlHacks.register!
+    HamlSplash::LiquidHacks.register!
+  end
+end
+
+require File.dirname(__FILE__) + '/core_ext/hash'
+require File.dirname(__FILE__) + '/haml_splash/haml_hacks'
+require File.dirname(__FILE__) + '/haml_splash/liquid_hacks'

data/lib/haml_splash/haml_hacks.rb

@@ -0,0 +1,75 @@
+class HamlSplash::HamlHacks
+
+  def self.register!
+    hacker = self.new
+    hacker.override_push_script!
+    hacker.override_push_silent!
+    hacker.create_render_liquid_method!
+  end
+
+  def override_push_script!
+    Haml::Precompiler.module_eval do
+      def push_script(text, preserve_script, in_tag = false,
+                      preserve_tag = false, escape_html = false,
+                      nuke_inner_whitespace = false)
+        push_merged_text '' unless in_tag
+
+        flush_merged_text
+        newline_now
+        if block_opened?
+          push_and_tabulate([:loud, out])
+        else
+          @precompiled << "_hamlout.push_script('{{#{text.lstrip}}}', [])"
+        end
+      end
+    end
+  end
+
+  def override_push_silent!
+    Haml::Precompiler.module_eval do
+      def push_silent(text, can_suppress = false)
+        flush_merged_text
+        @precompiled << "{% #{text.lstrip} %}"
+      end
+    end
+  end
+
+  def create_render_liquid_method!
+    Haml::Engine.class_eval do
+      def render_liquid(locals={}, &block)
+        scope = Object.new
+        buffer = Haml::Buffer.new(scope, options_for_buffer)
+
+        if scope.is_a?(Binding) || scope.is_a?(Proc)
+          scope_object = eval("self", scope)
+          scope = scope_object.instance_eval{binding} if block_given?
+        else
+          scope_object = scope
+          scope = scope_object.instance_eval{binding}
+        end
+
+
+        set_locals(locals.merge(:_hamlout => buffer, :_erbout => buffer.buffer), scope, scope_object)
+        scope_object.instance_eval do
+          extend Haml::Helpers
+          @haml_buffer = buffer
+        end
+
+        template = Liquid::Template.parse(@precompiled)
+        output = template.render(locals.stringify_keys)
+        eval(output, scope)
+
+        # Get rid of the current buffer
+        scope_object.instance_eval do
+          @haml_buffer = buffer.upper
+        end
+
+        buffer.buffer
+
+      end
+    end
+  end
+
+end
+
+

data/lib/haml_splash/liquid_hacks.rb

@@ -0,0 +1,15 @@
+class HamlSplash::LiquidHacks
+  def self.register!
+    hacker = self.new
+    hacker.override_block_delimiter!
+  end
+  def override_block_delimiter!
+    Liquid::Block.class_eval do
+      def block_delimiter
+        "end"
+      end
+    end
+  end
+end
+
+

data/test/haml_liquid_if_tags_test.rb

@@ -0,0 +1,195 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class HamlLiquidTagsTest < Test::Unit::TestCase
+  context 'If we hack Haml' do
+    setup do
+      HamlSplash.register!
+    end
+
+    context "when evaluating Liquid {% if ... %} tags" do
+
+      should 'not display anything for false' do
+        t = haml("- if false\n  this text should not go in output")
+        assert t == ""
+      end
+
+      should 'display text for true' do
+        t = haml("- if true\n this text should go in output")
+        assert t == "this text should go in output\n"
+      end
+
+      should 'display text for true with two different if statements' do
+        t = haml("- if false\n  you suck\n- if true\n  you rock\n?")
+        assert t == "you rock\n?\n"
+      end
+    end
+
+    context "when evaluating Liquid {% if ... %} ... {% else %} ... tags" do
+
+      should 'branch to else when if clause is false' do
+        t = haml("- if false\n  NO\n- else\n  YES")
+        assert t == "YES\n"
+      end
+
+      should 'use if clause when else clause is false' do
+        t = haml("- if true\n  YES\n- else\n  NO")
+        assert t == "YES\n"
+      end
+
+      should 'use if clause with non-null value when else clause is false' do
+        t = haml("- if \"foo\"\n  YES\n- else\n  NO")
+        assert t == "YES\n"
+      end
+
+    end
+
+    context 'when evaluating with a boolean variable' do
+
+      should 'use if clause with true local variable' do
+        t = haml("- if var\n  YES", :var => true)
+        assert t == "YES\n"
+      end
+
+    end
+
+    should 'evaluate with a boolean "or"' do
+      t = "- if a or b\n  YES"
+      assert haml(t, :a => true, :b => true) == "YES\n"
+      assert haml(t, :a => true, :b => false) == "YES\n"
+      assert haml(t, :a => false, :b => true) == "YES\n"
+      assert haml(t, :a => false, :b => false) == ""
+
+      t = "- if a or b or c\n YES"
+      assert haml(t, :a => false, :b => false, :c => true) == "YES\n"
+      assert haml(t, :a => false, :b => false, :c => false) == ""
+    end
+
+    should 'evaluate with a boolean "or" with operators' do
+      assert haml("- if a == true or b == true\n  YES", :a => true, :b => true) == "YES\n"
+      assert haml("- if a == true or b == false\n  YES", :a => true, :b => true) == "YES\n"
+      assert haml("- if a == false or b == false\n  YES", :a => true, :b => true) == ""
+    end
+
+    should 'evaluate with a boolean "and"' do
+      assert haml("- if true and true\n  YES") == "YES\n"
+      assert haml("- if false and true\n  YES") == ""
+      assert haml("- if false and false\n  YES") == ""
+    end
+
+    should 'evaluate false with an empty hash' do
+      assert haml("- if foo.bar\n  NO", :foo => {}) == ""
+    end
+
+    should 'evaluate if statements from a variable' do
+      assert haml("- if var\n  NO", :var => false) == ''
+      assert haml("- if var\n  NO", :var => nil) == ''
+      assert haml("- if foo.bar\n  NO", :foo => {:bar => false}) == ''
+      assert haml("- if foo.bar\n  NO", :foo => {}) == ''
+      assert haml("- if foo.bar\n  NO", :foo => nil) == ''
+      assert haml("- if foo.bar\n  NO", :foo => true) == ''
+
+      assert haml("- if var\n  YES", :var => "text") == "YES\n"
+      assert haml("- if var\n  YES", :var => true) == "YES\n"
+      assert haml("- if var\n  YES", :var => 1) == "YES\n"
+      assert haml("- if var\n  YES", :var => {}) == "YES\n"
+      assert haml("- if var\n  YES", :var => []) == "YES\n"
+      assert haml("- if 'foo'\n  YES") == "YES\n"
+      assert haml("- if foo.bar\n  YES", :foo => {:bar => true}) == "YES\n"
+      assert haml("- if foo.bar\n  YES", :foo => {:bar => "text"}) == "YES\n"
+      assert haml("- if foo.bar\n  YES", :foo => {:bar => 1 }) == "YES\n"
+      assert haml("- if foo.bar\n  YES", :foo => {:bar => {} }) == "YES\n"
+      assert haml("- if foo.bar\n  YES", :foo => {:bar => [] }) == "YES\n"
+
+      assert haml("- if var\n  NO\n- else\n  YES", :var => false) == "YES\n"
+      assert haml("- if var\n  NO\n- else\n  YES", :var => nil) == "YES\n"
+      assert haml("- if var\n  YES\n- else\n  NO", :var => true) == "YES\n"
+      assert haml("- if 'foo'\n  YES\n- else\n  NO", :var => "text") == "YES\n"
+
+      assert haml("- if foo.bar\n  NO\n- else\n  YES",
+                  :foo => {:bar => false}) == "YES\n"
+      assert haml("- if foo.bar\n  YES\n- else\n  NO",
+                  :foo => {:bar => true}) == "YES\n"
+      assert haml("- if foo.bar\n  YES\n- else\n  NO",
+                  :foo => {:bar => "text"}) == "YES\n"
+      assert haml("- if foo.bar\n  NO\n- else\n  YES",
+                  :foo => {:notbar => true}) == "YES\n"
+      assert haml("- if foo.bar\n  NO\n- else\n  YES",
+                  :foo => {}) == "YES\n"
+      assert haml("- if foo.bar\n  NO\n- else\n  YES",
+                  :notfoo => {:bar => true}) == "YES\n"
+
+    end
+
+    should 'evaluate nested if statements' do
+      assert haml("- if false\n  - if false\n    NO") == ""
+      assert haml("- if false\n  - if true\n    NO") == ""
+      assert haml("- if true\n  - if false\n    NO") == ""
+      assert haml(<<-EHAML) == "YES\n"
+- if true
+  - if true
+    YES
+EHAML
+      assert haml(<<-EHAML) =="YES\n"
+- if true
+  - if true
+    YES
+  - else
+    NO
+- else
+  NO
+EHAML
+      assert haml(<<-EHAML) == "YES\n"
+- if false
+  - if true
+    NO
+  - else
+    NONO
+- else
+  YES
+EHAML
+      assert haml(<<-EHAML) == "YES\n"
+- if false
+  - if true
+    NO
+  - else
+    NONO
+- else
+  YES
+EHAML
+    end
+
+    should 'evaluate comparisons on null' do
+      assert haml("- if null < 10\n  NO") == ""
+      assert haml("- if null <= 10\n  NO") == ""
+      assert haml("- if null >= 10\n  NO") == ""
+      assert haml("- if null > 10\n  NO") == ""
+
+      assert haml("- if 10 < null\n  NO") == ""
+      assert haml("- if 10 <= null\n  NO") == ""
+      assert haml("- if 10 >= null\n  NO") == ""
+      assert haml("- if 10 > null\n  NO") == ""
+    end
+
+    should 'evaluate Liquid elseif' do
+      assert haml("- if 0 == 0\n  0\n- elsif 1 == 1\n  1\n- else\n  2") == "0\n"
+      assert haml("- if 0 != 0\n  0\n- elsif 1 == 1\n  1\n- else\n  2") == "1\n"
+      assert haml("- if 0 != 0\n  0\n- elsif 1 != 1\n  1\n- else\n  2") == "2\n"
+      assert haml("- if false\n  if\n- elsif true\n  elsif") == "elsif\n"
+    end
+
+    should 'raise syntax error with no variable' do
+      assert_raise(Liquid::SyntaxError) { haml("- if jerry == 1") }
+    end
+
+    should 'raise syntax error with no expression' do
+      assert_raise(Liquid::SyntaxError) { haml("- if") }
+    end
+
+    should 'evaluate with custom conditions' do
+      Liquid::Condition.operators['contains'] = :[]
+      assert haml("- if 'bob' contains 'o'\n  YES") == "YES\n"
+      assert haml("- if 'bob' contains 'f'\n  NO") == ""
+    end
+  end
+end
+

data/test/haml_splash_test.rb

@@ -0,0 +1,56 @@
+require File.dirname(__FILE__) + '/test_helper'
+
+class HamlTestsRenderWithLiquid < Test::Unit::TestCase
+  context 'If we hack Haml' do
+    setup do
+      HamlSplash.register!
+    end
+
+    context 'render_liquid' do
+      should 'render Hello World with liquid' do
+        assert haml("= \"Hello World\"") == "Hello World\n"
+      end
+
+      should 'render Hello World with liquid filter' do
+        assert haml("= \"hello world\" | upcase") == "HELLO WORLD\n"
+      end
+
+      should 'render with variable' do
+        t = haml("= name", :name => "joe")
+        assert t == "joe\n"
+      end
+
+      should 'not evaluate Ruby' do
+        assert_raises(Liquid::SyntaxError) do
+          haml("- [1,2,3,4,5].each do |i|\n  = i")
+        end
+      end
+
+      should 'still evaluate html' do
+        assert haml("%h1 Hello World") == "<h1>Hello World</h1>\n"
+      end
+
+      should 'evaluate script with html' do
+        assert haml("%h1= \"Hello World\"") == "<h1>Hello World\n</h1>\n"
+      end
+
+      should 'evaluate script with variable' do
+        t = haml("%h1= name", :name => 'joe')
+        assert t == "<h1>joe\n</h1>\n"
+      end
+
+      should 'evaluate script with html and filter' do
+        t = haml("%h1= name | capitalize", :name => 'joe')
+        assert t == "<h1>Joe\n</h1>\n"
+      end
+
+      should 'evaluate liquid {% for . in ... %} tag' do
+        assert haml("- for i in array\n  = i", :array => [1,2,3,4,5]) ==
+          "1\n2\n3\n4\n5\n"
+      end
+
+    end
+
+  end
+
+end

data/test/test_helper.rb

@@ -0,0 +1,14 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'haml/splash'
+
+class Test::Unit::TestCase
+  def haml(t, locals={})
+    Haml::Engine.new(t).render_liquid(locals)
+  end
+
+end

metadata

@@ -0,0 +1,70 @@
+--- !ruby/object:Gem::Specification 
+name: faithfulgeek-haml_splash
+version: !ruby/object:Gem::Version 
+  version: 0.1.0
+platform: ruby
+authors: 
+- Joe Fiorini
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-06-22 00:00:00 -07:00
+default_executable: 
+dependencies: []
+
+description: 
+email: joe@faithfulgeek.org
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- LICENSE
+- README.rdoc
+files: 
+- .document
+- .gitignore
+- LICENSE
+- README.rdoc
+- Rakefile
+- VERSION
+- haml_splash.gemspec
+- lib/core_ext/hash.rb
+- lib/haml/splash.rb
+- lib/haml_splash.rb
+- lib/haml_splash/haml_hacks.rb
+- lib/haml_splash/liquid_hacks.rb
+- test/haml_liquid_if_tags_test.rb
+- test/haml_splash_test.rb
+- test/test_helper.rb
+has_rdoc: false
+homepage: http://github.com/faithfulgeek/haml_splash
+post_install_message: 
+rdoc_options: 
+- --charset=UTF-8
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.2.0
+signing_key: 
+specification_version: 3
+summary: TODO
+test_files: 
+- test/haml_liquid_if_tags_test.rb
+- test/haml_splash_test.rb
+- test/test_helper.rb