devcenter 0.0.1

data/vendor/sinatra/test/builder_test.rb

@@ -0,0 +1,91 @@
+require File.expand_path('../helper', __FILE__)
+
+begin
+require 'builder'
+
+class BuilderTest < Test::Unit::TestCase
+  def builder_app(options = {}, &block)
+    mock_app do
+      set :views, File.dirname(__FILE__) + '/views'
+      set options
+      get('/', &block)
+    end
+    get '/'
+  end
+
+  it 'renders inline Builder strings' do
+    builder_app { builder 'xml.instruct!' }
+    assert ok?
+    assert_equal %{<?xml version="1.0" encoding="UTF-8"?>\n}, body
+  end
+
+  it 'defaults content type to xml' do
+    builder_app { builder 'xml.instruct!' }
+    assert ok?
+    assert_equal "application/xml;charset=utf-8", response['Content-Type']
+  end
+
+  it 'defaults allows setting content type per route' do
+    builder_app do
+      content_type :html
+      builder 'xml.instruct!'
+    end
+    assert ok?
+    assert_equal "text/html;charset=utf-8", response['Content-Type']
+  end
+
+  it 'defaults allows setting content type globally' do
+    builder_app(:builder => { :content_type => 'html' }) do
+      builder 'xml.instruct!'
+    end
+    assert ok?
+    assert_equal "text/html;charset=utf-8", response['Content-Type']
+  end
+
+  it 'renders inline blocks' do
+    builder_app do
+      @name = "Frank & Mary"
+      builder { |xml| xml.couple @name }
+    end
+    assert ok?
+    assert_equal "<couple>Frank &amp; Mary</couple>\n", body
+  end
+
+  it 'renders .builder files in views path' do
+    builder_app do
+      @name = "Blue"
+      builder :hello
+    end
+    assert ok?
+    assert_equal %(<exclaim>You're my boy, Blue!</exclaim>\n), body
+  end
+
+  it "renders with inline layouts" do
+    mock_app do
+      layout { %(xml.layout { xml << yield }) }
+      get('/') { builder %(xml.em 'Hello World') }
+    end
+    get '/'
+    assert ok?
+    assert_equal "<layout>\n<em>Hello World</em>\n</layout>\n", body
+  end
+
+  it "renders with file layouts" do
+    builder_app do
+      builder %(xml.em 'Hello World'), :layout => :layout2
+    end
+    assert ok?
+    assert_equal "<layout>\n<em>Hello World</em>\n</layout>\n", body
+  end
+
+  it "raises error if template not found" do
+    mock_app do
+      get('/') { builder :no_such_template }
+    end
+    assert_raise(Errno::ENOENT) { get('/') }
+  end
+end
+
+rescue LoadError
+  warn "#{$!.to_s}: skipping builder tests"
+end

data/vendor/sinatra/test/coffee_test.rb

@@ -0,0 +1,90 @@
+require File.expand_path('../helper', __FILE__)
+
+begin
+require 'coffee-script'
+require 'execjs'
+
+begin
+  ExecJS.compile '1'
+rescue Exception
+  raise LoadError, 'unable to execute JavaScript'
+end
+
+class CoffeeTest < Test::Unit::TestCase
+  def coffee_app(options = {}, &block)
+    mock_app do
+      set :views, File.dirname(__FILE__) + '/views'
+      set(options)
+      get('/', &block)
+    end
+    get '/'
+  end
+
+  it 'renders inline Coffee strings' do
+    coffee_app { coffee "alert 'Aye!'\n" }
+    assert ok?
+    assert body.include?("alert('Aye!');")
+  end
+
+  it 'defaults content type to javascript' do
+    coffee_app { coffee "alert 'Aye!'\n" }
+    assert ok?
+    assert_equal "application/javascript;charset=utf-8", response['Content-Type']
+  end
+
+  it 'defaults allows setting content type per route' do
+    coffee_app do
+      content_type :html
+      coffee "alert 'Aye!'\n"
+    end
+    assert ok?
+    assert_equal "text/html;charset=utf-8", response['Content-Type']
+  end
+
+  it 'defaults allows setting content type globally' do
+    coffee_app(:coffee => { :content_type => 'html' }) do
+      coffee "alert 'Aye!'\n"
+    end
+    assert ok?
+    assert_equal "text/html;charset=utf-8", response['Content-Type']
+  end
+
+  it 'renders .coffee files in views path' do
+    coffee_app { coffee :hello }
+    assert ok?
+    assert_include body, "alert(\"Aye!\");"
+  end
+
+  it 'ignores the layout option' do
+    coffee_app { coffee :hello, :layout => :layout2 }
+    assert ok?
+    assert_include body, "alert(\"Aye!\");"
+  end
+
+  it "raises error if template not found" do
+    mock_app {
+      get('/') { coffee :no_such_template }
+    }
+    assert_raise(Errno::ENOENT) { get('/') }
+  end
+
+  it "passes coffee options to the coffee engine" do
+    coffee_app { coffee "alert 'Aye!'\n", :no_wrap => true }
+    assert ok?
+    assert_body "alert('Aye!');"
+  end
+
+  it "passes default coffee options to the coffee engine" do
+    mock_app do
+      set :coffee, :no_wrap => true # default coffee style is :nested
+      get('/') { coffee "alert 'Aye!'\n" }
+    end
+    get '/'
+    assert ok?
+    assert_body "alert('Aye!');"
+  end
+end
+
+rescue LoadError
+  warn "#{$!.to_s}: skipping coffee tests"
+end

data/vendor/sinatra/test/compile_test.rb

@@ -0,0 +1,139 @@
+# I like coding: UTF-8
+require File.expand_path('../helper', __FILE__)
+
+class CompileTest < Test::Unit::TestCase
+
+  def self.converts pattern, expected_regexp
+    it "generates #{expected_regexp.source} from #{pattern}" do
+      compiled, _ = compiled pattern
+      assert_equal expected_regexp, compiled
+    end
+  end
+  def self.parses pattern, example, expected_params
+    it "parses #{example} with #{pattern} into params #{expected_params}" do
+      compiled, keys = compiled pattern
+      match = compiled.match(example)
+      fail %Q{"#{example}" does not parse on pattern "#{pattern}".} unless match
+
+      # Aggregate e.g. multiple splat values into one array.
+      #
+      params = keys.zip(match.captures).reduce({}) do |hash, mapping|
+        key, value = mapping
+        hash[key] = if existing = hash[key]
+          existing.respond_to?(:to_ary) ? existing << value : [existing, value]
+        else
+          value
+        end
+        hash
+      end
+
+      assert_equal(expected_params, params)
+    end
+  end
+  def self.fails pattern, example
+    it "does not parse #{example} with #{pattern}" do
+      compiled, _ = compiled pattern
+      match = compiled.match(example)
+      fail %Q{"#{pattern}" does parse "#{example}" but it should fail} if match
+    end
+  end
+  def compiled pattern
+    app ||= mock_app {}
+    compiled, keys = app.send(:compile, pattern)
+    [compiled, keys]
+  end
+
+  converts "/", %r{\A/\z}
+  parses "/", "/", {}
+
+  converts "/foo", %r{\A/foo\z}
+  parses "/foo", "/foo", {}
+
+  converts "/:foo", %r{\A/([^/?#]+)\z}
+  parses "/:foo", "/foo",       "foo" => "foo"
+  parses "/:foo", "/foo.bar",   "foo" => "foo.bar"
+  parses "/:foo", "/foo%2Fbar", "foo" => "foo%2Fbar"
+  fails  "/:foo", "/foo?"
+  fails  "/:foo", "/foo/bar"
+  fails  "/:foo", "/"
+  fails  "/:foo", "/foo/"
+
+  converts "/föö", %r{\A/f%C3%B6%C3%B6\z}
+  parses "/föö", "/f%C3%B6%C3%B6", {}
+
+  converts "/:foo/:bar", %r{\A/([^/?#]+)/([^/?#]+)\z}
+  parses "/:foo/:bar", "/foo/bar", "foo" => "foo", "bar" => "bar"
+
+  converts "/hello/:person", %r{\A/hello/([^/?#]+)\z}
+  parses "/hello/:person", "/hello/Frank", "person" => "Frank"
+
+  converts "/?:foo?/?:bar?", %r{\A/?([^/?#]+)?/?([^/?#]+)?\z}
+  parses "/?:foo?/?:bar?", "/hello/world", "foo" => "hello", "bar" => "world"
+  parses "/?:foo?/?:bar?", "/hello",       "foo" => "hello", "bar" => nil
+  parses "/?:foo?/?:bar?", "/",            "foo" => nil, "bar" => nil
+  parses "/?:foo?/?:bar?", "",             "foo" => nil, "bar" => nil
+
+  converts "/*", %r{\A/(.*?)\z}
+  parses "/*", "/",       "splat" => ""
+  parses "/*", "/foo",    "splat" => "foo"
+  parses "/*", "/foo/bar", "splat" => "foo/bar"
+
+  converts "/:foo/*", %r{\A/([^/?#]+)/(.*?)\z}
+  parses "/:foo/*", "/foo/bar/baz", "foo" => "foo", "splat" => "bar/baz"
+
+  converts "/:foo/:bar", %r{\A/([^/?#]+)/([^/?#]+)\z}
+  parses "/:foo/:bar", "/user@example.com/name", "foo" => "user@example.com", "bar" => "name"
+
+  converts "/test$/", %r{\A/test(?:\$|%24)/\z}
+  parses "/test$/", "/test$/", {}
+
+  converts "/te+st/", %r{\A/te(?:\+|%2B)st/\z}
+  parses "/te+st/", "/te+st/", {}
+  fails  "/te+st/", "/test/"
+  fails  "/te+st/", "/teeest/"
+
+  converts "/test(bar)/", %r{\A/test(?:\(|%28)bar(?:\)|%29)/\z}
+  parses "/test(bar)/", "/test(bar)/", {}
+
+  converts "/path with spaces", %r{\A/path(?:%20|(?:\+|%2B))with(?:%20|(?:\+|%2B))spaces\z}
+  parses "/path with spaces", "/path%20with%20spaces", {}
+  parses "/path with spaces", "/path%2Bwith%2Bspaces", {}
+  parses "/path with spaces", "/path+with+spaces",     {}
+
+  converts "/foo&bar", %r{\A/foo(?:&|%26)bar\z}
+  parses "/foo&bar", "/foo&bar", {}
+
+  converts "/:foo/*", %r{\A/([^/?#]+)/(.*?)\z}
+  parses "/:foo/*", "/hello%20world/how%20are%20you", "foo" => "hello%20world", "splat" => "how%20are%20you"
+
+  converts "/*/foo/*/*", %r{\A/(.*?)/foo/(.*?)/(.*?)\z}
+  parses "/*/foo/*/*", "/bar/foo/bling/baz/boom", "splat" => ["bar", "bling", "baz/boom"]
+  fails  "/*/foo/*/*", "/bar/foo/baz"
+
+  converts "/test.bar", %r{\A/test(?:\.|%2E)bar\z}
+  parses "/test.bar", "/test.bar", {}
+  fails  "/test.bar", "/test0bar"
+
+  converts "/:file.:ext", %r{\A/([^\.%2E/?#]+)(?:\.|%2E)([^\.%2E/?#]+)\z}
+  parses "/:file.:ext", "/pony.jpg",   "file" => "pony", "ext" => "jpg"
+  parses "/:file.:ext", "/pony%2Ejpg", "file" => "pony", "ext" => "jpg"
+  fails  "/:file.:ext", "/.jpg"
+
+  converts "/:name.?:format?", %r{\A/([^\.%2E/?#]+)(?:\.|%2E)?([^\.%2E/?#]+)?\z}
+  parses "/:name.?:format?", "/foo",       "name" => "foo", "format" => nil
+  parses "/:name.?:format?", "/foo.bar",   "name" => "foo", "format" => "bar"
+  parses "/:name.?:format?", "/foo%2Ebar", "name" => "foo", "format" => "bar"
+  fails  "/:name.?:format?", "/.bar"
+
+  converts "/:user@?:host?", %r{\A/([^@%40/?#]+)(?:@|%40)?([^@%40/?#]+)?\z}
+  parses "/:user@?:host?", "/foo@bar",     "user" => "foo", "host" => "bar"
+  parses "/:user@?:host?", "/foo.foo@bar", "user" => "foo.foo", "host" => "bar"
+  parses "/:user@?:host?", "/foo@bar.bar", "user" => "foo", "host" => "bar.bar"
+
+  # From https://gist.github.com/2154980#gistcomment-169469.
+  #
+  # converts "/:name(.:format)?", %r{\A/([^\.%2E/?#]+)(?:\(|%28)(?:\.|%2E)([^\.%2E/?#]+)(?:\)|%29)?\z}
+  # parses "/:name(.:format)?", "/foo", "name" => "foo", "format" => nil
+  # parses "/:name(.:format)?", "/foo.bar", "name" => "foo", "format" => "bar"
+  fails "/:name(.:format)?", "/foo."
+end

data/vendor/sinatra/test/contest.rb

@@ -0,0 +1,98 @@
+# Copyright (c) 2009 Damian Janowski and Michel Martens for Citrusbyte
+#
+# 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.
+require "test/unit"
+
+# Test::Unit loads a default test if the suite is empty, whose purpose is to
+# fail. Since having empty contexts is a common practice, we decided to
+# overwrite TestSuite#empty? in order to allow them. Having a failure when no
+# tests have been defined seems counter-intuitive.
+class Test::Unit::TestSuite
+  def empty?
+    false
+  end
+end
+
+# Contest adds +teardown+, +test+ and +context+ as class methods, and the
+# instance methods +setup+ and +teardown+ now iterate on the corresponding
+# blocks. Note that all setup and teardown blocks must be defined with the
+# block syntax. Adding setup or teardown instance methods defeats the purpose
+# of this library.
+class Test::Unit::TestCase
+  def self.setup(&block)     setup_blocks    << block  end
+  def self.teardown(&block)  teardown_blocks << block  end
+  def self.setup_blocks()    @setup_blocks    ||= []   end
+  def self.teardown_blocks() @teardown_blocks ||= []   end
+
+  def setup_blocks(base = self.class)
+    setup_blocks base.superclass if base.superclass.respond_to? :setup_blocks
+    base.setup_blocks.each do |block|
+      instance_eval(&block)
+    end
+  end
+
+  def teardown_blocks(base = self.class)
+    teardown_blocks base.superclass if base.superclass.respond_to? :teardown_blocks
+    base.teardown_blocks.each do |block|
+      instance_eval(&block)
+    end
+  end
+
+  alias setup setup_blocks
+  alias teardown teardown_blocks
+
+  def self.context(*name, &block)
+    subclass = Class.new(self)
+    remove_tests(subclass)
+    subclass.class_eval(&block) if block_given?
+    const_set(context_name(name.join(" ")), subclass)
+  end
+
+  def self.test(name, &block)
+    define_method(test_name(name), &block)
+  end
+
+  class << self
+    alias_method :should, :test
+    alias_method :describe, :context
+  end
+
+private
+
+  def self.context_name(name)
+    # "Test#{sanitize_name(name).gsub(/(^| )(\w)/) { $2.upcase }}".to_sym
+    name = "Test#{sanitize_name(name).gsub(/(^| )(\w)/) { $2.upcase }}"
+    name.tr(" ", "_").to_sym
+  end
+
+  def self.test_name(name)
+    "test_#{sanitize_name(name).gsub(/\s+/,'_')}".to_sym
+  end
+
+  def self.sanitize_name(name)
+    # name.gsub(/\W+/, ' ').strip
+    name.gsub(/\W+/, ' ')
+  end
+
+  def self.remove_tests(subclass)
+    subclass.public_instance_methods.grep(/^test_/).each do |meth|
+      subclass.send(:undef_method, meth.to_sym)
+    end
+  end
+end

data/vendor/sinatra/test/creole_test.rb

@@ -0,0 +1,65 @@
+require File.expand_path('../helper', __FILE__)
+
+begin
+require 'creole'
+
+class CreoleTest < Test::Unit::TestCase
+  def creole_app(&block)
+    mock_app do
+      set :views, File.dirname(__FILE__) + '/views'
+      get('/', &block)
+    end
+    get '/'
+  end
+
+  it 'renders inline creole strings' do
+    creole_app { creole '= Hiya' }
+    assert ok?
+    assert_body "<h1>Hiya</h1>"
+  end
+
+  it 'renders .creole files in views path' do
+    creole_app { creole :hello }
+    assert ok?
+    assert_body "<h1>Hello From Creole</h1>"
+  end
+
+  it "raises error if template not found" do
+    mock_app { get('/') { creole :no_such_template } }
+    assert_raise(Errno::ENOENT) { get('/') }
+  end
+
+  it "renders with inline layouts" do
+    mock_app do
+      layout { 'THIS. IS. #{yield.upcase}!' }
+      get('/') { creole 'Sparta', :layout_engine => :str }
+    end
+    get '/'
+    assert ok?
+    assert_like 'THIS. IS. <P>SPARTA</P>!', body
+  end
+
+  it "renders with file layouts" do
+    creole_app do
+      creole 'Hello World', :layout => :layout2, :layout_engine => :erb
+    end
+    assert ok?
+    assert_body "ERB Layout!\n<p>Hello World</p>"
+  end
+
+  it "can be used in a nested fashion for partials and whatnot" do
+    mock_app do
+      template(:inner) { "hi" }
+      template(:outer) { "<outer><%= creole :inner %></outer>" }
+      get('/') { erb :outer }
+    end
+
+    get '/'
+    assert ok?
+    assert_like '<outer><p>hi</p></outer>', body
+  end
+end
+
+rescue LoadError
+  warn "#{$!.to_s}: skipping creole tests"
+end