devcenter 0.0.3 → 0.0.4

data/vendor/sinatra/test/delegator_test.rb

@@ -1,160 +0,0 @@
-require File.expand_path('../helper', __FILE__)
-
-class DelegatorTest < Test::Unit::TestCase
-  class Mirror
-    attr_reader :last_call
-    def method_missing(*a, &b)
-      @last_call = [*a.map(&:to_s)]
-      @last_call << b if b
-    end
-  end
-
-  def self.delegates(name)
-    it "delegates #{name}" do
-      m = mirror { send name }
-      assert_equal [name.to_s], m.last_call
-    end
-
-    it "delegates #{name} with arguments" do
-      m = mirror { send name, "foo", "bar" }
-      assert_equal [name.to_s, "foo", "bar"], m.last_call
-    end
-
-    it "delegates #{name} with block" do
-      block = proc { }
-      m = mirror { send(name, &block) }
-      assert_equal [name.to_s, block], m.last_call
-    end
-  end
-
-  setup do
-    @target_was = Sinatra::Delegator.target
-  end
-
-  def teardown
-    Sinatra::Delegator.target = @target_was
-  end
-
-  def delegation_app(&block)
-    mock_app { Sinatra::Delegator.target = self }
-    delegate(&block)
-  end
-
-  def mirror(&block)
-    mirror = Mirror.new
-    Sinatra::Delegator.target = mirror
-    delegate(&block)
-  end
-
-  def delegate(&block)
-    assert Sinatra::Delegator.target != Sinatra::Application
-    Object.new.extend(Sinatra::Delegator).instance_eval(&block) if block
-    Sinatra::Delegator.target
-  end
-
-  def target
-    Sinatra::Delegator.target
-  end
-
-  it 'defaults to Sinatra::Application as target' do
-    assert_equal Sinatra::Application, Sinatra::Delegator.target
-  end
-
-  %w[get put post delete options patch].each do |verb|
-    it "delegates #{verb} correctly" do
-      delegation_app do
-        send(verb, '/hello') { 'Hello World' }
-      end
-
-      request = Rack::MockRequest.new(@app)
-      response = request.request(verb.upcase, '/hello', {})
-      assert response.ok?
-      assert_equal 'Hello World', response.body
-    end
-  end
-
-  it "delegates head correctly" do
-    delegation_app do
-      head '/hello' do
-        response['X-Hello'] = 'World!'
-        'remove me'
-      end
-    end
-
-    request = Rack::MockRequest.new(@app)
-    response = request.request('HEAD', '/hello', {})
-    assert response.ok?
-    assert_equal 'World!', response['X-Hello']
-    assert_equal '', response.body
-  end
-
-  it "registers extensions with the delegation target" do
-    app, mixin = mirror, Module.new
-    Sinatra.register mixin
-    assert_equal ["register", mixin.to_s], app.last_call
-  end
-
-  it "registers helpers with the delegation target" do
-    app, mixin = mirror, Module.new
-    Sinatra.helpers mixin
-    assert_equal ["helpers", mixin.to_s], app.last_call
-  end
-
-  it "registers middleware with the delegation target" do
-    app, mixin = mirror, Module.new
-    Sinatra.use mixin
-    assert_equal ["use", mixin.to_s], app.last_call
-  end
-
-  it "should work with method_missing proxies for options" do
-    mixin = Module.new do
-      def respond_to?(method, *)
-        method.to_sym == :options or super
-      end
-
-      def method_missing(method, *args, &block)
-        return super unless method.to_sym == :options
-        {:some => :option}
-      end
-    end
-
-    value = nil
-    mirror do
-      extend mixin
-      value = options
-    end
-
-    assert_equal({:some => :option}, value)
-  end
-
-  it "delegates crazy method names" do
-    Sinatra::Delegator.delegate "foo:bar:"
-    method = mirror { send "foo:bar:" }.last_call.first
-    assert_equal "foo:bar:", method
-  end
-
-  delegates 'get'
-  delegates 'patch'
-  delegates 'put'
-  delegates 'post'
-  delegates 'delete'
-  delegates 'head'
-  delegates 'options'
-  delegates 'template'
-  delegates 'layout'
-  delegates 'before'
-  delegates 'after'
-  delegates 'error'
-  delegates 'not_found'
-  delegates 'configure'
-  delegates 'set'
-  delegates 'mime_type'
-  delegates 'enable'
-  delegates 'disable'
-  delegates 'use'
-  delegates 'development?'
-  delegates 'test?'
-  delegates 'production?'
-  delegates 'helpers'
-  delegates 'settings'
-end

data/vendor/sinatra/test/encoding_test.rb

@@ -1,20 +0,0 @@
-# encoding: UTF-8
-require File.expand_path('../helper', __FILE__)
-require 'erb'
-
-class BaseTest < Test::Unit::TestCase
-  setup do
-    @base = Sinatra.new(Sinatra::Base)
-    @base.set :views, File.dirname(__FILE__) + "/views"
-  end
-
-  it 'allows unicode strings in ascii templates per default (1.9)' do
-    next unless defined? Encoding
-    @base.new!.erb(File.read(@base.views + "/ascii.erb").encode("ASCII"), {}, :value => "åkej")
-  end
-
-  it 'allows ascii strings in unicode templates per default (1.9)' do
-    next unless defined? Encoding
-    @base.new!.erb(:utf8, {}, :value => "Some Lyrics".encode("ASCII"))
-  end
-end

data/vendor/sinatra/test/erb_test.rb

@@ -1,98 +0,0 @@
-require File.expand_path('../helper', __FILE__)
-
-class ERBTest < Test::Unit::TestCase
-  def engine
-    Tilt::ERBTemplate
-  end
-
-  def setup
-    Tilt.prefer engine, :erb
-    super
-  end
-
-  def erb_app(&block)
-    mock_app do
-      set :views, File.dirname(__FILE__) + '/views'
-      get('/', &block)
-    end
-    get '/'
-  end
-
-  it 'uses the correct engine' do
-    assert_equal engine, Tilt[:erb]
-  end
-
-  it 'renders inline ERB strings' do
-    erb_app { erb '<%= 1 + 1 %>' }
-    assert ok?
-    assert_equal '2', body
-  end
-
-  it 'renders .erb files in views path' do
-    erb_app { erb :hello }
-    assert ok?
-    assert_equal "Hello World\n", body
-  end
-
-  it 'takes a :locals option' do
-    erb_app do
-      locals = {:foo => 'Bar'}
-      erb '<%= foo %>', :locals => locals
-    end
-    assert ok?
-    assert_equal 'Bar', body
-  end
-
-  it "renders with inline layouts" do
-    mock_app do
-      layout { 'THIS. IS. <%= yield.upcase %>!' }
-      get('/') { erb 'Sparta' }
-    end
-    get '/'
-    assert ok?
-    assert_equal 'THIS. IS. SPARTA!', body
-  end
-
-  it "renders with file layouts" do
-    erb_app { erb 'Hello World', :layout => :layout2 }
-    assert ok?
-    assert_body "ERB Layout!\nHello World"
-  end
-
-  it "renders erb with blocks" do
-    mock_app do
-      def container
-        @_out_buf << "THIS."
-        yield
-        @_out_buf << "SPARTA!"
-      end
-      def is; "IS." end
-      get('/') { erb '<% container do %> <%= is %> <% end %>' }
-    end
-    get '/'
-    assert ok?
-    assert_equal 'THIS. IS. SPARTA!', body
-  end
-
-  it "can be used in a nested fashion for partials and whatnot" do
-    mock_app do
-      template(:inner) { "<inner><%= 'hi' %></inner>" }
-      template(:outer) { "<outer><%= erb :inner %></outer>" }
-      get('/') { erb :outer }
-    end
-
-    get '/'
-    assert ok?
-    assert_equal '<outer><inner>hi</inner></outer>', body
-  end
-end
-
-
-begin
-  require 'erubis'
-  class ErubisTest < ERBTest
-    def engine; Tilt::ErubisTemplate end
-  end
-rescue LoadError
-  warn "#{$!.to_s}: skipping erubis tests"
-end

data/vendor/sinatra/test/extensions_test.rb

@@ -1,98 +0,0 @@
-require File.expand_path('../helper', __FILE__)
-
-class ExtensionsTest < Test::Unit::TestCase
-  module FooExtensions
-    def foo
-    end
-
-    private
-      def im_hiding_in_ur_foos
-      end
-  end
-
-  module BarExtensions
-    def bar
-    end
-  end
-
-  module BazExtensions
-    def baz
-    end
-  end
-
-  module QuuxExtensions
-    def quux
-    end
-  end
-
-  module PainExtensions
-    def foo=(name); end
-    def bar?(name); end
-    def fizz!(name); end
-  end
-
-  it 'will add the methods to the DSL for the class in which you register them and its subclasses' do
-    Sinatra::Base.register FooExtensions
-    assert Sinatra::Base.respond_to?(:foo)
-
-    Sinatra::Application.register BarExtensions
-    assert Sinatra::Application.respond_to?(:bar)
-    assert Sinatra::Application.respond_to?(:foo)
-    assert !Sinatra::Base.respond_to?(:bar)
-  end
-
-  it 'allows extending by passing a block' do
-    Sinatra::Base.register { def im_in_ur_anonymous_module; end }
-    assert Sinatra::Base.respond_to?(:im_in_ur_anonymous_module)
-  end
-
-  it 'will make sure any public methods added via Application#register are delegated to Sinatra::Delegator' do
-    Sinatra::Application.register FooExtensions
-    assert Sinatra::Delegator.private_instance_methods.
-      map { |m| m.to_sym }.include?(:foo)
-    assert !Sinatra::Delegator.private_instance_methods.
-      map { |m| m.to_sym }.include?(:im_hiding_in_ur_foos)
-  end
-
-  it 'will handle special method names' do
-    Sinatra::Application.register PainExtensions
-    assert Sinatra::Delegator.private_instance_methods.
-      map { |m| m.to_sym }.include?(:foo=)
-    assert Sinatra::Delegator.private_instance_methods.
-      map { |m| m.to_sym }.include?(:bar?)
-    assert Sinatra::Delegator.private_instance_methods.
-      map { |m| m.to_sym }.include?(:fizz!)
-  end
-
-  it 'will not delegate methods on Base#register' do
-    Sinatra::Base.register QuuxExtensions
-    assert !Sinatra::Delegator.private_instance_methods.include?("quux")
-  end
-
-  it 'will extend the Sinatra::Application application by default' do
-    Sinatra.register BazExtensions
-    assert !Sinatra::Base.respond_to?(:baz)
-    assert Sinatra::Application.respond_to?(:baz)
-  end
-
-  module BizzleExtension
-    def bizzle
-      bizzle_option
-    end
-
-    def self.registered(base)
-      fail "base should be BizzleApp" unless base == BizzleApp
-      fail "base should have already extended BizzleExtension" unless base.respond_to?(:bizzle)
-      base.set :bizzle_option, 'bizzle!'
-    end
-  end
-
-  class BizzleApp < Sinatra::Base
-  end
-
-  it 'sends .registered to the extension module after extending the class' do
-    BizzleApp.register BizzleExtension
-    assert_equal 'bizzle!', BizzleApp.bizzle_option
-    assert_equal 'bizzle!', BizzleApp.bizzle
-  end
-end

data/vendor/sinatra/test/filter_test.rb

@@ -1,437 +0,0 @@
-require File.expand_path('../helper', __FILE__)
-
-class BeforeFilterTest < Test::Unit::TestCase
-  it "executes filters in the order defined" do
-    count = 0
-    mock_app do
-      get('/') { 'Hello World' }
-      before do
-        assert_equal 0, count
-        count = 1
-      end
-      before do
-        assert_equal 1, count
-        count = 2
-      end
-    end
-
-    get '/'
-    assert ok?
-    assert_equal 2, count
-    assert_equal 'Hello World', body
-  end
-
-  it "can modify the request" do
-    mock_app do
-      get('/foo') { 'foo' }
-      get('/bar') { 'bar' }
-      before { request.path_info = '/bar' }
-    end
-
-    get '/foo'
-    assert ok?
-    assert_equal 'bar', body
-  end
-
-  it "can modify instance variables available to routes" do
-    mock_app do
-      before { @foo = 'bar' }
-      get('/foo') { @foo }
-    end
-
-    get '/foo'
-    assert ok?
-    assert_equal 'bar', body
-  end
-
-  it "allows redirects" do
-    mock_app do
-      before { redirect '/bar' }
-      get('/foo') do
-        fail 'before block should have halted processing'
-        'ORLY?!'
-      end
-    end
-
-    get '/foo'
-    assert redirect?
-    assert_equal 'http://example.org/bar', response['Location']
-    assert_equal '', body
-  end
-
-  it "does not modify the response with its return value" do
-    mock_app do
-      before { 'Hello World!' }
-      get('/foo') do
-        assert_equal [], response.body
-        'cool'
-      end
-    end
-
-    get '/foo'
-    assert ok?
-    assert_equal 'cool', body
-  end
-
-  it "does modify the response with halt" do
-    mock_app do
-      before { halt 302, 'Hi' }
-      get '/foo' do
-        "should not happen"
-      end
-    end
-
-    get '/foo'
-    assert_equal 302, response.status
-    assert_equal 'Hi', body
-  end
-
-  it "gives you access to params" do
-    mock_app do
-      before { @foo = params['foo'] }
-      get('/foo') { @foo }
-    end
-
-    get '/foo?foo=cool'
-    assert ok?
-    assert_equal 'cool', body
-  end
-
-  it "properly unescapes parameters" do
-    mock_app do
-      before { @foo = params['foo'] }
-      get('/foo') { @foo }
-    end
-
-    get '/foo?foo=bar%3Abaz%2Fbend'
-    assert ok?
-    assert_equal 'bar:baz/bend', body
-  end
-
-  it "runs filters defined in superclasses" do
-    base = Class.new(Sinatra::Base)
-    base.before { @foo = 'hello from superclass' }
-
-    mock_app(base) { get('/foo') { @foo } }
-
-    get '/foo'
-    assert_equal 'hello from superclass', body
-  end
-
-  it 'does not run before filter when serving static files' do
-    ran_filter = false
-    mock_app do
-      before { ran_filter = true }
-      set :static, true
-      set :public_folder, File.dirname(__FILE__)
-    end
-    get "/#{File.basename(__FILE__)}"
-    assert ok?
-    assert_equal File.read(__FILE__), body
-    assert !ran_filter
-  end
-
-  it 'takes an optional route pattern' do
-    ran_filter = false
-    mock_app do
-      before("/b*") { ran_filter = true }
-      get('/foo') { }
-      get('/bar') { }
-    end
-    get '/foo'
-    assert !ran_filter
-    get '/bar'
-    assert ran_filter
-  end
-
-  it 'generates block arguments from route pattern' do
-    subpath = nil
-    mock_app do
-      before("/foo/:sub") { |s| subpath = s }
-      get('/foo/*') { }
-    end
-    get '/foo/bar'
-    assert_equal subpath, 'bar'
-  end
-end
-
-class AfterFilterTest < Test::Unit::TestCase
-  it "executes before and after filters in correct order" do
-    invoked = 0
-    mock_app do
-      before   { invoked = 2 }
-      get('/') { invoked += 2; 'hello' }
-      after    { invoked *= 2 }
-    end
-
-    get '/'
-    assert ok?
-
-    assert_equal 8, invoked
-  end
-
-  it "executes filters in the order defined" do
-    count = 0
-    mock_app do
-      get('/') { 'Hello World' }
-      after do
-        assert_equal 0, count
-        count = 1
-      end
-      after do
-        assert_equal 1, count
-        count = 2
-      end
-    end
-
-    get '/'
-    assert ok?
-    assert_equal 2, count
-    assert_equal 'Hello World', body
-  end
-
-  it "allows redirects" do
-    mock_app do
-      get('/foo') { 'ORLY' }
-      after { redirect '/bar' }
-    end
-
-    get '/foo'
-    assert redirect?
-    assert_equal 'http://example.org/bar', response['Location']
-    assert_equal '', body
-  end
-
-  it "does not modify the response with its return value" do
-    mock_app do
-      get('/foo') { 'cool' }
-      after { 'Hello World!' }
-    end
-
-    get '/foo'
-    assert ok?
-    assert_equal 'cool', body
-  end
-
-  it "does modify the response with halt" do
-    mock_app do
-      get '/foo' do
-        "should not be returned"
-      end
-      after { halt 302, 'Hi' }
-    end
-
-    get '/foo'
-    assert_equal 302, response.status
-    assert_equal 'Hi', body
-  end
-
-  it "runs filters defined in superclasses" do
-    count = 2
-    base = Class.new(Sinatra::Base)
-    base.after { count *= 2 }
-    mock_app(base) do
-      get('/foo') do
-        count += 2
-        "ok"
-      end
-    end
-
-    get '/foo'
-    assert_equal 8, count
-  end
-
-  it 'does not run after filter when serving static files' do
-    ran_filter = false
-    mock_app do
-      after { ran_filter = true }
-      set :static, true
-      set :public_folder, File.dirname(__FILE__)
-    end
-    get "/#{File.basename(__FILE__)}"
-    assert ok?
-    assert_equal File.read(__FILE__), body
-    assert !ran_filter
-  end
-
-  it 'takes an optional route pattern' do
-    ran_filter = false
-    mock_app do
-      after("/b*") { ran_filter = true }
-      get('/foo') { }
-      get('/bar') { }
-    end
-    get '/foo'
-    assert !ran_filter
-    get '/bar'
-    assert ran_filter
-  end
-
-  it 'changes to path_info from a pattern matching before filter are respoected when routing' do
-    mock_app do
-      before('/foo') { request.path_info = '/bar' }
-      get('/bar') { 'blah' }
-    end
-    get '/foo'
-    assert ok?
-    assert_equal 'blah', body
-  end
-
-  it 'generates block arguments from route pattern' do
-    subpath = nil
-    mock_app do
-      after("/foo/:sub") { |s| subpath = s }
-      get('/foo/*') { }
-    end
-    get '/foo/bar'
-    assert_equal subpath, 'bar'
-  end
-
-  it 'is possible to access url params from the route param' do
-    ran = false
-    mock_app do
-      get('/foo/*') { }
-      before('/foo/:sub') do
-        assert_equal params[:sub], 'bar'
-        ran = true
-      end
-    end
-    get '/foo/bar'
-    assert ran
-  end
-
-  it 'is possible to apply host_name conditions to before filters with no path' do
-    ran = false
-    mock_app do
-      before(:host_name => 'example.com') { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_HOST' => 'example.org' })
-    assert !ran
-    get('/', {}, { 'HTTP_HOST' => 'example.com' })
-    assert ran
-  end
-
-  it 'is possible to apply host_name conditions to before filters with a path' do
-    ran = false
-    mock_app do
-      before('/foo', :host_name => 'example.com') { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_HOST' => 'example.com' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_HOST' => 'example.org' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_HOST' => 'example.com' })
-    assert ran
-  end
-
-  it 'is possible to apply host_name conditions to after filters with no path' do
-    ran = false
-    mock_app do
-      after(:host_name => 'example.com') { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_HOST' => 'example.org' })
-    assert !ran
-    get('/', {}, { 'HTTP_HOST' => 'example.com' })
-    assert ran
-  end
-
-  it 'is possible to apply host_name conditions to after filters with a path' do
-    ran = false
-    mock_app do
-      after('/foo', :host_name => 'example.com') { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_HOST' => 'example.com' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_HOST' => 'example.org' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_HOST' => 'example.com' })
-    assert ran
-  end
-
-  it 'is possible to apply user_agent conditions to before filters with no path' do
-    ran = false
-    mock_app do
-      before(:user_agent => /foo/) { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_USER_AGENT' => 'bar' })
-    assert !ran
-    get('/', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert ran
-  end
-
-  it 'is possible to apply user_agent conditions to before filters with a path' do
-    ran = false
-    mock_app do
-      before('/foo', :user_agent => /foo/) { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_USER_AGENT' => 'bar' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert ran
-  end
-
-  it 'can add params' do
-    mock_app do
-      before { params['foo'] = 'bar' }
-      get('/') { params['foo'] }
-    end
-
-    get '/'
-    assert_body 'bar'
-  end
-
-  it 'can remove params' do
-    mock_app do
-      before { params.delete('foo') }
-      get('/') { params['foo'].to_s }
-    end
-
-    get '/?foo=bar'
-    assert_body ''
-  end
-
-  it 'is possible to apply user_agent conditions to after filters with no path' do
-    ran = false
-    mock_app do
-      after(:user_agent => /foo/) { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_USER_AGENT' => 'bar' })
-    assert !ran
-    get('/', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert ran
-  end
-
-  it 'is possible to apply user_agent conditions to after filters with a path' do
-    ran = false
-    mock_app do
-      after('/foo', :user_agent => /foo/) { ran = true }
-      get('/') { 'welcome' }
-    end
-    get('/', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_USER_AGENT' => 'bar' })
-    assert !ran
-    get('/foo', {}, { 'HTTP_USER_AGENT' => 'foo' })
-    assert ran
-  end
-
-  it 'only triggeres provides condition if conforms with current Content-Type' do
-    mock_app do
-      before(:provides => :txt)  { @type = 'txt' }
-      before(:provides => :html) { @type = 'html' }
-      get('/') { @type }
-    end
-
-    get('/', {}, { 'HTTP_ACCEPT' => '*' })
-    assert_body 'txt'
-  end
-end