renee-url-generation 0.4.0.pre1

data/test/renee-core/responding_test.rb

@@ -0,0 +1,128 @@
+require File.expand_path('../test_helper', __FILE__)
+
+describe Renee::Core::Responding do
+  describe "#interpret_response" do
+    it "should render from a number" do
+      mock_app do
+        path('/') { halt 200 }
+      end
+      get '/'
+      assert_equal 200,               response.status
+      assert_equal 'Status code 200', response.body
+    end
+
+    it "should render from a symbol" do
+      mock_app do
+        path('/') { halt :not_found }
+      end
+      get '/'
+      assert_equal 404,               response.status
+      assert_equal 'Status code 404', response.body
+    end
+
+    it "should render from a string" do
+      mock_app do
+        path('/') { halt "hello!" }
+      end
+      get '/'
+      assert_equal 200,      response.status
+      assert_equal 'hello!', response.body
+    end
+
+    it "should render from an array" do
+      mock_app do
+        path('/') { halt 500, "hello!" }
+      end
+      get '/'
+      assert_equal 500,      response.status
+      assert_equal 'hello!', response.body
+    end
+
+    it "should render from an array with a symbol" do
+      mock_app do
+        path('/') { halt :payment_required, "hello!" }
+      end
+      get '/'
+      assert_equal 403,      response.status
+      assert_equal 'hello!', response.body
+    end
+
+    it "should render a rack-sized array as a rack response" do
+      mock_app do
+        path('/') { halt [200, {'Content-Type' => 'text/plain'}, []] }
+      end
+      get '/'
+      assert_equal 200, response.status
+    end
+  end
+
+  describe "#respond" do
+    it "should allow respond! with response init arguments" do
+      mock_app do
+        get do
+          respond!("hello!", 403, "foo" => "bar")
+        end
+      end
+      get "/"
+      assert_equal 403,   response.status
+      assert_equal "bar",   response.headers["foo"]
+      assert_equal "hello!", response.body
+    end # respond!
+
+    it "should allow respond!" do
+      mock_app do
+        get do
+          respond! { status 403; headers :foo => "bar"; body "hello!" }
+        end
+      end
+      get "/"
+      assert_equal 403,   response.status
+      assert_equal "bar",   response.headers["foo"]
+      assert_equal "hello!", response.body
+    end # respond!
+
+    it "should allow respond" do
+      mock_app do
+        get do
+          halt(respond { status 403; headers :foo => "bar"; body "hello!" })
+        end
+      end
+      get "/"
+      assert_equal 403,   response.status
+      assert_equal "bar",   response.headers["foo"]
+      assert_equal "hello!", response.body
+    end # respond
+  end
+
+  describe "#redirect" do
+    it "should allow redirects" do
+      mock_app do
+        get { halt redirect('/hello') }
+      end
+
+      get '/'
+      assert_equal 302,      response.status
+      assert_equal "/hello", response.headers['Location']
+    end
+
+    it "should accept custom status codes" do
+      mock_app do
+        get { halt redirect('/hello', 303) }
+      end
+
+      get '/'
+      assert_equal 303,      response.status
+      assert_equal "/hello", response.headers['Location']
+    end
+
+    it "should allow redirect!" do
+      mock_app do
+        get { redirect!('/hello') }
+      end
+
+      get '/'
+      assert_equal 302,      response.status
+      assert_equal "/hello", response.headers['Location']
+    end
+  end
+end

data/test/renee-core/routing_test.rb

@@ -0,0 +1,443 @@
+require File.expand_path('../test_helper', __FILE__)
+
+describe Renee::Core::Routing do
+
+  def renee_for(path, options = {}, &block)
+    Renee.core(&block).call(Rack::MockRequest.env_for(path, options))
+  end
+
+  describe "with paths" do
+    it "generates a basic route" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path('/')   { get { halt [200,type,['foo']] } }
+        path('bar') { put { halt [200,type,['bar']] } }
+
+        path '/foo' do
+          delete { halt [200,type,['hi']] }
+
+          path '/bar/har' do
+            get  { halt [200,type,['foobar']] }
+            post { halt [200,type,['posted']] }
+          end
+
+        end
+      end
+      get '/'
+      assert_equal 200,   response.status
+      assert_equal 'foo', response.body
+      put '/bar'
+      assert_equal 200,   response.status
+      assert_equal 'bar', response.body
+      delete '/foo'
+      assert_equal 200,   response.status
+      assert_equal 'hi', response.body
+      get '/foo/bar/har'
+      assert_equal 200,   response.status
+      assert_equal 'foobar', response.body
+      post '/foo/bar/har'
+      assert_equal 200,   response.status
+      assert_equal 'posted', response.body
+    end
+
+    describe "with trailing slashes" do
+      it "should ignore trailing slashes normally" do
+        type = { 'Content-Type' => 'text/plain' }
+        mock_app do
+          path('test') { get { halt [200,type,['test']] } }
+        end
+
+        get '/test/'
+        assert_equal 200,    response.status
+        assert_equal 'test', response.body
+        get '/test'
+        assert_equal 200,    response.status
+        assert_equal 'test', response.body
+      end
+
+      it "should not ignore trailing slashes if told not to" do
+        type = { 'Content-Type' => 'text/plain' }
+        mock_app do
+          path('test').empty { get { halt [200,type,['test']] } }
+        end
+        get '/test/'
+        assert_equal 404,    response.status
+        get '/test'
+        assert_equal 200,    response.status
+        assert_equal 'test', response.body
+      end
+    end
+  end
+
+  describe "with variables" do
+
+    it "generates for path" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'test' do
+          variable do  |id|
+            get { halt [200,type,[id]] }
+          end
+        end
+
+        path 'two' do
+          var.var do |foo, bar|
+            get { halt [200, type,["#{foo}-#{bar}"]] }
+          end
+        end
+
+        path 'multi' do
+          multi_var(3) do |foo, bar, lol|
+            post { halt [200, type,["#{foo}-#{bar}-#{lol}"]] }
+          end
+        end
+      end
+
+      get '/test/hello'
+      assert_equal 200,     response.status
+      assert_equal 'hello', response.body
+      get '/two/1/2'
+      assert_equal 200,     response.status
+      assert_equal '1-2',   response.body
+      post '/multi/1/2/3'
+      assert_equal 200,     response.status
+      assert_equal '1-2-3', response.body
+    end
+
+    it "generates nested paths" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'test' do
+          var do |id|
+            path 'moar' do
+              post { halt [200, type, [id]] }
+            end
+
+            path 'more' do
+              var.var do |foo, bar|
+                get { halt [200, type, ["#{foo}-#{bar}"]] }
+
+                path 'woo' do
+                  get { halt [200, type, ["#{foo}-#{bar}-woo"]] }
+                end
+              end
+            end
+          end
+        end
+      end
+
+      post '/test/world/moar'
+      assert_equal 200,       response.status
+      assert_equal 'world',   response.body
+      get '/test/world/more/1/2'
+      assert_equal 200,       response.status
+      assert_equal '1-2',     response.body
+      get '/test/world/more/1/2/woo'
+      assert_equal 200,       response.status
+      assert_equal '1-2-woo', response.body
+    end
+
+    it "accepts an typcasts integers" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'add' do
+          var(:integer).var(:integer) do |a, b|
+            halt [200, type, ["#{a + b}"]]
+          end
+        end
+      end
+
+      get '/add/3/4'
+      assert_equal 200, response.status
+      assert_equal '7', response.body
+    end
+
+    it "can take an optional variable" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'add' do
+          var(:integer).optional(:integer) do |a, b|
+            b ||= a
+            halt [200, type, ["#{a + b}"]]
+          end
+        end
+      end
+
+      get '/add/3/4'
+      assert_equal 200, response.status
+      assert_equal '7', response.body
+      get '/add/3'
+      assert_equal 200, response.status
+      assert_equal '6', response.body
+    end
+
+    it "allows arbitrary ranges of values" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'add' do
+          multi_var(2..5, :integer).get do |numbers|
+            halt [200, type, ["Add up to #{numbers.inject(numbers.shift) {|m, i| m += i}}"]]
+          end
+        end
+      end
+
+      get '/add/3/4'
+      assert_equal 200, response.status
+      assert_equal 'Add up to 7', response.body
+      get '/add/3/4/6/7'
+      assert_equal 200, response.status
+      assert_equal 'Add up to 20', response.body
+      get '/add/3/4/6/7/8/10/2'
+      assert_equal 404, response.status
+    end
+
+    it "accepts allows repeating vars" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'add' do
+          glob :integer do |numbers|
+            halt [200, type, ["Add up to #{numbers.inject(numbers.shift) {|m, i| m += i}}"]]
+          end
+        end
+      end
+
+      get '/add/3/4'
+      assert_equal 200, response.status
+      assert_equal 'Add up to 7', response.body
+      get '/add/3/4/6/7'
+      assert_equal 200, response.status
+      assert_equal 'Add up to 20', response.body
+    end
+
+    it "accepts a regexp" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'add' do
+          var(/foo|bar/).var(/foo|bar/) do |a, b|
+            halt [200, type, ["#{a + b}"]]
+          end
+        end
+      end
+
+      get '/add/bar/foo'
+      assert_equal 200,      response.status
+      assert_equal 'barfoo', response.body
+    end
+  end
+
+  describe "with remainder" do
+
+    it "matches the rest of the routes" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'test' do
+          get { halt [200,type,['test']] }
+
+          remainder do |rest|
+            post { halt [200, type, ["test-#{rest}"]] }
+          end
+        end
+
+        remainder do |rest|
+          halt [200, type, [rest]]
+        end
+      end
+
+      get '/a/b/c'
+      assert_equal 200,      response.status
+      assert_equal '/a/b/c', response.body
+      post '/test/world/moar'
+      assert_equal 200,      response.status
+      assert_equal 'test-/world/moar', response.body
+    end
+  end
+
+  describe "with extensions" do
+    it "should match an extension" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path('/test').get do
+          case extension
+          when 'html' then halt [200, type, ['test html']]
+          when 'json' then halt [200, type, ['test json']]
+          when nil    then halt [200, type, ['test nope']]
+          else             halt [406, type, ['unknown']]
+          end
+        end
+        
+        extension 'html' do
+          halt [200, type, ['test html']]
+        end
+      end
+      get '/test.html'
+      assert_equal 200,    response.status
+      assert_equal 'test html', response.body
+      get '/test.json'
+      assert_equal 200,    response.status
+      assert_equal 'test json', response.body
+      get '/test.xml'
+      assert_equal 406,    response.status
+    end
+
+    it "should match an extension when there is a non-specific variable before" do
+      mock_app do
+        var do |id|
+          case extension
+          when 'html' then halt "html #{id}"
+          when 'xml'  then halt "xml #{id}"
+          when nil    then halt "none #{id}"
+          end
+        end
+      end
+      get '/var.html'
+      assert_equal 200,        response.status
+      assert_equal 'html var', response.body
+      get '/var.xml'
+      assert_equal 200,        response.status
+      assert_equal 'xml var',  response.body
+      get '/var'
+      assert_equal 200,        response.status
+      assert_equal 'none var',  response.body
+    end
+  end
+
+  describe "with part and part_var" do
+    it "should match a part" do
+      mock_app do
+        part '/test' do
+          part 'more' do
+            halt :ok
+          end
+        end
+      end
+      get '/testmore'
+      assert_equal 200,    response.status
+    end
+
+    it "should match a part_var" do
+      mock_app do
+        part '/test' do
+          part 'more' do
+            part_var do |var|
+              path 'test' do
+                halt var
+              end
+            end
+          end
+        end
+      end
+      get '/testmorethisvar/test'
+      assert_equal 'thisvar',    response.body
+    end
+
+    it "should match a part_var with Integer" do
+      mock_app do
+        part '/test' do
+          part 'more' do
+            part_var :integer do |var|
+              path 'test' do
+                halt var.to_s
+              end
+            end
+          end
+        end
+      end
+      get '/testmore123/test'
+      assert_equal '123',    response.body
+      get '/testmore123a/test'
+      assert_equal 404,    response.status
+    end
+  end
+
+  describe "multiple Renee's" do
+    it "should pass between them normally" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'test' do
+          halt run Renee.core {
+            path 'time' do
+              halt halt [200,type,['test']]
+            end
+          }
+        end
+      end
+      get '/test/time'
+      assert_equal 200,    response.status
+      assert_equal 'test', response.body
+    end
+
+    it "should support run! passing between" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path 'test' do
+          run! Renee.core {
+            path 'time' do
+              halt halt [200,type,['test']]
+            end
+          }
+        end
+      end
+      get '/test/time'
+      assert_equal 200,    response.status
+      assert_equal 'test', response.body
+    end
+  end
+
+  describe "#build" do
+    it "should allow building in-place rack apps" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        path('test') do
+          halt build {
+            run proc {|env| [200, type, ['someone built me!']] }
+          }
+        end
+      end
+
+      get '/test'
+      assert_equal 200,                 response.status
+      assert_equal 'someone built me!', response.body
+    end
+  end
+
+  describe "#part and #part_var" do
+    it "should match parts and partial vars" do
+      mock_app do
+        part('test') {
+          part_var(:integer) { |id|
+            part('more') {
+              halt "the id is #{id}"
+            }
+          }
+        }
+      end
+      get '/test123more'
+      assert_equal 200,                 response.status
+      assert_equal 'the id is 123',     response.body
+    end
+  end
+
+  describe "request methods" do
+    it "should allow request method routing when you're matching on /" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        get { halt [200, type, ["hiya"]] }
+      end
+
+      get '/'
+      assert_equal 200,    response.status
+      assert_equal 'hiya', response.body
+    end
+
+    it "should raise if you fail to halt" do
+      type = { 'Content-Type' => 'text/plain' }
+      mock_app do
+        get {  }
+        halt :ok
+      end
+
+      get '/'
+      assert_equal 404,    response.status
+    end
+  end
+end

data/test/renee-core/test_helper.rb

@@ -0,0 +1,4 @@
+$: << File.expand_path('../../lib', __FILE__)
+require 'renee/core'
+# Load shared test helpers
+require File.expand_path('../../test_helper', __FILE__)

data/test/renee-core/variable_type_test.rb

@@ -0,0 +1,57 @@
+require File.expand_path('../test_helper', __FILE__)
+
+describe Renee::Core::Matcher do
+  it "should transform variables" do
+    mock_app {
+      var :symbol do |i|
+        halt i.inspect
+      end
+    }.setup {
+      register_variable_type(:symbol, /[a-z_]+/).on_transform{|v| v.to_sym}
+    }
+    get '/test'
+    assert_equal ":test", response.body
+  end
+
+  it "should halt on errors if told to" do
+    mock_app {
+      var :symbol do |i|
+        halt i.inspect
+      end
+    }.setup {
+      register_variable_type(:symbol, /[a-z_]+/).on_transform{|v| v.to_sym}.raise_on_error!
+    }
+    get '/123'
+    assert_equal 400, response.status
+  end
+
+  it "should allow custom error handling behaviour on values that don't match" do
+    mock_app {
+      var :symbol do |i|
+        halt i.inspect
+      end
+    }.setup {
+      register_variable_type(:symbol, /[a-z_]+/).on_transform{|v| v.to_sym}.on_error{|v| halt 500 }
+    }
+    get '/123'
+    assert_equal 500, response.status
+  end
+
+  it "should allow composite variable types" do
+    mock_app {
+      path("plus10").var(:int_or_hex) do |i|
+        halt "plus10: #{i + 10}"
+      end
+    }.setup {
+      register_variable_type(:int, /[0-9]+/).on_transform{|v| Integer(v)}
+      register_variable_type(:hex, /0x[0-9a-f]+/).on_transform{|v| v.to_i(16)}
+      register_variable_type(:int_or_hex, [:hex, :int])
+    }
+    get '/plus10/123'
+    assert_equal 'plus10: 133', response.body
+    get '/plus10/0x7b'
+    assert_equal 'plus10: 133', response.body
+  end
+end
+
+

data/test/test_helper.rb

@@ -0,0 +1,70 @@
+require 'rubygems'
+gem 'minitest'
+require 'minitest/autorun'
+gem 'rack-test'
+require 'rack/test'
+
+class ColoredIO
+  ESC = "\e["
+  NND = "#{ESC}0m"
+
+  def initialize(io)
+    @io = io
+  end
+
+  def print(o)
+    case o
+    when "."
+      @io.send(:print, "#{ESC}32m#{o}#{NND}")
+    when "E"
+      @io.send(:print, "#{ESC}33m#{o}#{NND}")
+    when "F"
+      @io.send(:print, "#{ESC}31m#{o}#{NND}")
+    else
+      @io.send(:print, o)
+    end
+  end
+
+  def puts(*o)
+    super
+  end
+end
+
+MiniTest::Unit.output = ColoredIO.new(MiniTest::Unit.output)
+
+## TEST HELPERS
+class MiniTest::Spec
+  include Rack::Test::Methods
+
+  # Sets up a Sinatra::Base subclass defined with the block
+  # given. Used in setup or individual spec methods to establish
+  # the application.
+  def mock_app(&block)
+    path = default_views_path
+    @app = Renee.core(&block).setup {
+      views_path(path) if respond_to?(:views_path)
+    }
+  end
+
+  def default_views_path
+    File.dirname(__FILE__) + "/views"
+  end
+
+  def app
+    Rack::Lint.new(@app)
+  end
+
+  alias :response :last_response
+
+  # create_view :index, "test", :haml
+  def create_view(name, content, engine=:erb)
+    FileUtils.mkdir_p(default_views_path)
+    file = File.join(default_views_path, name.to_s + ".#{engine}")
+    File.open(file, 'w') { |io| io.write content }
+  end
+
+  # Removes the view folder after the test
+  def remove_views
+    FileUtils.rm_rf(File.dirname(__FILE__) + "/views")
+  end
+end