nagoro 2009.05

data/spec/example/hello.rb

@@ -0,0 +1,13 @@
+require 'spec/helper'
+
+describe "example/hello.nag" do
+  behaves_like 'xpath'
+
+  Nagoro.file_element('Html', 'example/element/Html.nage')
+
+  should 'render Hello, World!' do
+    file = 'example/hello.nag'
+    doc = Nagoro.compile(file, :pipes => [:Element]).compiled
+    xpath(doc, '//title').first.text.should == 'Hello, World!'
+  end
+end

data/spec/helper.rb

@@ -0,0 +1,19 @@
+require 'lib/nagoro'
+require 'spec/core_extensions'
+
+require 'stringio'
+require 'rexml/document'
+require 'rexml/xpath'
+require 'pp'
+
+require 'rubygems'
+require 'bacon'
+
+Bacon.summary_on_exit
+
+shared 'xpath' do
+  def xpath(string, path)
+    doc = REXML::Document.new(string)
+    REXML::XPath.match(doc, path)
+  end
+end

data/spec/nagoro/listener/base.rb

@@ -0,0 +1,19 @@
+require 'spec/helper'
+
+describe "Nagoro::Listener::Base" do
+  def base(string)
+    nagoro = Nagoro::Template[:Base]
+    nagoro.pipeline(string)
+  end
+
+  should 'not fail on backslash' do
+    base('#{}').should == '#{}'
+  end
+
+  it 'should not stumble over HTML entities' do
+    %w[gt lt quot amp nbsp uuml].each do |entity|
+      str = "&#{entity};"
+      base(str).should == str
+    end
+  end
+end

data/spec/nagoro/pipe/compile.rb

@@ -0,0 +1,31 @@
+require 'spec/helper'
+
+describe "Nagoro::Pipe::Compile" do
+  def render(obj)
+    Nagoro::Template[Nagoro::Pipe::Compile].render(obj)
+  end
+
+  should 'compile normal string' do
+    render('Hello, World!').should == 'Hello, World!'
+  end
+
+  should 'compile ruby instructions' do
+    render('<?r a = 1 ?><?ro a ?>').should == '1'
+    render('<?r a = 1 ?><?ro a > 1 ?>').should == 'false'
+    render('<?r a = 1 ?><?ro a < 1 ?>').should == 'false'
+  end
+
+  should 'compile with compatiblity to Ezamar' do
+    render('<?r a = 1 ?>#{a}').should == '1'
+    render('<?r a = 1 ?>#{a > 1}').should == 'false'
+    render('<?r a = 1 ?>#{a < 1}').should == 'false'
+  end
+
+  should 'not fail on nested {} inside #{}' do
+    render('#{"Hello, {World}!"}').should == 'Hello, {World}!'
+  end
+
+  should 'not fail on > inside ruby instruction' do
+    render('#{{:hi => :there}[:hi]}').should == 'there'
+  end
+end

data/spec/nagoro/pipe/element.rb

@@ -0,0 +1,46 @@
+require 'spec/helper'
+
+describe "Nagoro::Pipe::Element" do
+  behaves_like 'xpath'
+
+  def compile(obj)
+    Nagoro::Template[Nagoro::Pipe::Element].compile(obj).compiled
+  end
+
+  Nagoro.element('Page') do |content, attrs|
+    "(Page: #{content.dump})"
+  end
+
+  Nagoro.element('SideBar') do |content, attrs|
+    "(SideBar: #{content.dump})"
+  end
+
+  Nagoro.file_element('Html', 'example/element/Html.nage')
+
+  it 'should compile single element' do
+    compile('<Page />').
+      should == '(Page: "")'
+  end
+
+  it 'should compile two elements' do
+    compile('<Page /><Page />').
+      should == '(Page: "")(Page: "")'
+  end
+
+  it 'should compile nested elements' do
+    compile('<Page><Page /></Page>').
+      should == '(Page: "(Page: \\"\\")")'
+  end
+
+  it 'should compile different nested elements' do
+    compile('<Page><SideBar /></Page>').
+      should == '(Page: "(SideBar: \\"\\")")'
+  end
+
+  it 'should render file-elements' do
+    doc = compile(File.read('example/hello.nag'))
+    doc.should.not.be.empty
+    xpath(doc, '//title').first.text.should == 'Hello, World!'
+    xpath(doc, '//h1').first.text.should == 'Hello, World!'
+  end
+end

data/spec/nagoro/pipe/include.rb

@@ -0,0 +1,17 @@
+require 'spec/helper'
+
+describe "Nagoro::Pipe::Include" do
+  def compile(obj)
+    Nagoro::Template[Nagoro::Pipe::Include].compile(obj).compiled
+  end
+
+  it 'should append included file with arguments src or href' do
+    path = __DIR__/'../template/hello.nag'
+
+    compile(%{<p id="text"><include src="#{path}" /></p>}).strip.
+      should == %{<p id="text">#{File.read(path).strip}</p>}
+
+    compile(%{<p id="text"><include href="#{path}" /></p>}).strip.
+      should == %{<p id="text">#{File.read(path).strip}</p>}
+  end
+end

data/spec/nagoro/pipe/instruction.rb

@@ -0,0 +1,32 @@
+require 'spec/helper'
+
+describe "Nagoro::Pipe::Instruction" do
+  behaves_like 'xpath'
+  def compile(obj)
+    Nagoro::Template[Nagoro::Pipe::Instruction].compile(obj).compiled
+  end
+
+  it 'should expand <?js code ?>' do
+    compile('<?js alert("Hello, World!"); ?>').
+      should == '<script type="text/javascript"> alert("Hello, World!"); </script>'
+  end
+
+  it 'should expand <?js:src path?>' do
+    doc = compile('<?js:src /js/foo.js ?>')
+    scripts = xpath(doc, 'script[@type="text/javascript" @src="/js/foo.js"]')
+    scripts.size.should == 1
+    scripts.first.texts.should.be.empty
+  end
+
+  it 'should expand <?css styles ?>' do
+    compile('<?css body{ color: #eee; } ?>').
+      should == '<style type="text/css"> body{ color: #eee; } </style>'
+  end
+
+  it 'should expand <?css:src path ?>' do
+    doc = compile('<?css:src /css/foo.css ?>')
+    styles = xpath(doc, 'style[@type="text/css" @src="/css/foo.css"]')
+    styles.size.should == 1
+    styles.first.texts.should.be.empty
+  end
+end

data/spec/nagoro/pipe/morph.rb

@@ -0,0 +1,47 @@
+require 'spec/helper'
+
+describe "Nagoro::Pipe::Morph" do
+  def compile(obj)
+    Nagoro::Template[Nagoro::Pipe::Morph].compile(obj).compiled
+  end
+
+  it 'should morph single tag' do
+    compile('<a href="foo" if="1">bar</a>').
+      should == '<?r if 1 ?><a href="foo">bar</a><?r end ?>'
+  end
+
+  it 'should morph multiple tags' do
+    compile('<div if="2"><p if="1"></p></div>').
+      should == '<?r if 2 ?><div><?r if 1 ?><p></p><?r end ?></div><?r end ?>'
+  end
+
+  it 'should morph if' do
+    compile('<p if="1">x</p>').
+      should == '<?r if 1 ?><p>x</p><?r end ?>'
+  end
+
+  it 'should morph unless' do
+    compile('<p unless="1">x</p>').
+      should == '<?r unless 1 ?><p>x</p><?r end ?>'
+  end
+
+  it 'should morph foreach' do
+    compile('<p foreach="i in 1..10">#{i}</p>').
+      should == '<?r for i in 1..10 ?><p>#{i}</p><?r end ?>'
+  end
+
+  it 'should morph each' do
+    compile('<p each="1..10">#{_e}</p>').
+      should == '<?r 1..10.each do |_e| ?><p>#{_e}</p><?r end ?>'
+  end
+
+  it 'should morph times' do
+    compile('<p times="3">#{_t}</p>').
+      should == '<?r 3.times do |_t| ?><p>#{_t}</p><?r end ?>'
+  end
+
+  it 'should morph filter' do
+    compile('<p filter="my_filter">x</p>').
+      should == '<?o my_filter(%<<p>x</p>>) ?>'
+  end
+end

data/spec/nagoro/pipe/tidy.rb

@@ -0,0 +1,23 @@
+require 'spec/helper'
+require 'nagoro/pipe/tidy'
+
+describe "Nagoro::Pipe::Tidy" do
+  def compile(obj)
+    Nagoro::Template[Nagoro::Pipe::Tidy].compile(obj).compiled
+  end
+
+  it 'pipes the template through tidy' do
+    compile('<html></html>').strip.should ==
+"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"
+    \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">
+
+<html xmlns=\"http://www.w3.org/1999/xhtml\">
+<head>
+  <title></title>
+</head>
+
+<body>
+</body>
+</html>"
+  end
+end

data/spec/nagoro/template.rb

@@ -0,0 +1,105 @@
+require 'spec/helper'
+
+describe "Nagoro" do
+  should '::compile from filename' do
+    file = __DIR__/'template/hello.nag'
+    template = Nagoro.compile(file)
+    template.compiled.should == "_out_ = []; _out_ << %Q`Hello, World!\n`; _out_.join"
+  end
+
+  should '::compile' do
+    string = 'Hello, World!'
+    template = Nagoro.compile(string)
+    template.compiled.should == '_out_ = []; _out_ << %Q`Hello, World!`; _out_.join'
+  end
+
+  should 'compile <?end ?> to <?r end ?>' do
+    string = '<?end ?>'
+    template = Nagoro.compile(string)
+    template.compiled.should == '_out_ = []; _out_ << %Q``;end; _out_ << %Q``; _out_.join'
+  end
+
+  should '::render from filename' do
+    file = __DIR__/'template/hello.nag'
+    rendered = Nagoro.render(file)
+    rendered.should == File.read(file).strip
+  end
+
+  should '::render' do
+    string = 'Hello, World!'
+    rendered = Nagoro.render(string)
+    rendered.should == string
+  end
+
+  should '::render from IO' do
+    io = StringIO.new('Hello, World!')
+    rendered = Nagoro.render(io)
+    rendered.should == 'Hello, World!'
+  end
+
+  should 'render a full featured template with binding' do
+    file = __DIR__/'template/full.nag'
+    @title = 'Full template'
+
+    template = Nagoro.render(file, :binding => binding)
+
+    template.should =~ %r~<!DOCTYPE html PUBLIC~
+    template.should =~ %r~<title>Full template</title>~
+    template.should =~ %r~<h1>Full template</h1>~
+  end
+end
+
+describe "Nagoro::Template" do
+  should 'set up with ::[]' do
+    template = Nagoro::Template[]
+    template.pipes.should == []
+    template = Nagoro::Template[*Nagoro::DEFAULT_PIPES]
+    template.pipes.size.should == Nagoro::DEFAULT_PIPES.size
+  end
+
+  should 'set up with ::new' do
+    template = Nagoro::Template.new(:pipes => [])
+    template.pipes.should.be.empty
+    template = Nagoro::Template.new(:pipes => Nagoro::DEFAULT_PIPES)
+    template.pipes.size.should == Nagoro::DEFAULT_PIPES.size
+  end
+
+  should 'not open/close empty tags' do
+    %w[ img hr br link meta ].each do |tag|
+      tag = "<#{tag} />"
+      Nagoro.render(tag).should == tag
+    end
+  end
+
+  should 'render and pass result to tidy via #tidy_result' do
+    template = Nagoro::Template.new
+    template.compile('<html></html>').tidy_result.should ==
+"<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\"
+    \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">
+
+<html xmlns=\"http://www.w3.org/1999/xhtml\">
+<head>
+  <title></title>
+</head>
+
+<body>
+</body>
+</html>"
+  end
+
+  def noop(*args) end
+
+  it "doesn't get stuck when ruby contains double-quotes" do
+    tag = %q(<link href='#{ noop("some.thing") }' />)
+    Nagoro.render(tag, :binding => binding).should == "<link href='' />"
+  end
+
+  it "ignores comments" do
+    comment = '
+<!--[if IE]>
+  <link rel="stylesheet" type="text/css" media="screen, projection" href="css/blueprint/ie.css">
+<![endif]-->'.strip
+
+    Nagoro.render(comment).should == comment
+  end
+end

data/spec/nagoro/template/full.nag

@@ -0,0 +1,26 @@
+<?xml version="1.0" ?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.1//EN"
+  "http://www.w3.org/TR/xhtml11/DTD/xhtml11.dtd">
+<html xmlns="http://www.w3.org/1999/xhtml">
+  <head>
+    <title>#{@title}</title>
+    <meta http-equiv="Content-Script-Type" content="text/javascript" />
+    <meta http-equiv="Content-Style-Type" content="text/css" />
+    <meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
+    <meta http-equiv="expires" content="0" />
+    <meta name="description" content="Description for search engines" />
+    <meta name="generator" content="Nagoro #{Nagoro::VERSION}" />
+    <meta name="keywords" content="Nagoro, Your own keywords" />
+    <meta name="author" content="Max Mustermann" />
+    <style type="text/css">
+      body { margin: 2em; }
+      #content { margin-left: 2em; }
+    </style>
+  </head>
+  <body>
+    <h1>#{@title}</h1>
+    <div id="content">
+      #{@content}
+    </div>
+  </body>
+</html>

data/spec/nagoro/template/hello.nag

@@ -0,0 +1 @@
+Hello, World!

data/tasks/bacon.rake

@@ -0,0 +1,49 @@
+desc 'Run all bacon specs with pretty output'
+task :bacon => :install_dependencies do
+  require 'open3'
+  require 'scanf'
+
+  specs = PROJECT_SPECS
+
+  some_failed = false
+  total = specs.size
+  len = specs.map{|s| s.size }.sort.last
+  tt = ta = tf = te = 0
+
+  red, yellow, green = "\e[31m%s\e[0m", "\e[33m%s\e[0m", "\e[32m%s\e[0m"
+  left_format = "%4d/%d: %-#{len + 11}s"
+  spec_format = "%d specifications (%d requirements), %d failures, %d errors"
+
+  specs.each_with_index do |spec, idx|
+    print(left_format % [idx + 1, total, spec])
+
+    Open3.popen3(RUBY, spec) do |sin, sout, serr|
+      out = sout.read
+      err = serr.read
+
+      ran = false
+
+      out.each_line do |line|
+        tests, assertions, failures, errors = all = line.scanf(spec_format)
+        next unless all.any?
+        ran = true
+        tt += tests; ta += assertions; tf += failures; te += errors
+
+        if tests == 0 || failures + errors > 0
+          puts((red % spec_format) % all)
+          puts out
+          puts err
+        else
+          puts((green % "%6d passed") % tests)
+        end
+
+        break
+      end
+
+      puts(yellow % "       skipped") unless ran
+    end
+  end
+
+  puts(spec_format % [tt, ta, tf, te])
+  exit 1 if some_failed
+end