darkhelmet-sinatra 0.9.0.5

data/Rakefile

@@ -0,0 +1,136 @@
+require 'rake/clean'
+require 'rake/testtask'
+require 'fileutils'
+
+task :default => [:test]
+task :spec => :test
+
+# SPECS ===============================================================
+
+Rake::TestTask.new(:test) do |t|
+  t.test_files = FileList['test/*_test.rb']
+  t.ruby_opts = ['-rubygems'] if defined? Gem
+end
+
+desc 'Run compatibility specs (requires test/spec)'
+task :compat do |t|
+  pattern = ENV['TEST'] || '.*'
+  sh "specrb --testcase '#{pattern}' -Ilib:test compat/*_test.rb"
+end
+
+# PACKAGING ============================================================
+
+# Load the gemspec using the same limitations as github
+def spec
+  @spec ||=
+    begin
+      require 'rubygems/specification'
+      data = File.read('sinatra.gemspec')
+      spec = nil
+      Thread.new { spec = eval("$SAFE = 3\n#{data}") }.join
+      spec
+    end
+end
+
+def package(ext='')
+  "dist/sinatra-#{spec.version}" + ext
+end
+
+desc 'Build packages'
+task :package => %w[.gem .tar.gz].map {|e| package(e)}
+
+desc 'Build and install as local gem'
+task :install => package('.gem') do
+  sh "gem install #{package('.gem')}"
+end
+
+directory 'dist/'
+CLOBBER.include('dist')
+
+file package('.gem') => %w[dist/ sinatra.gemspec] + spec.files do |f|
+  sh "gem build sinatra.gemspec"
+  mv File.basename(f.name), f.name
+end
+
+file package('.tar.gz') => %w[dist/] + spec.files do |f|
+  sh <<-SH
+    git archive \
+      --prefix=sinatra-#{source_version}/ \
+      --format=tar \
+      HEAD | gzip > #{f.name}
+  SH
+end
+
+# Rubyforge Release / Publish Tasks ==================================
+
+desc 'Publish gem and tarball to rubyforge'
+task 'publish:gem' => [package('.gem'), package('.tar.gz')] do |t|
+  sh <<-end
+    rubyforge add_release sinatra sinatra #{spec.version} #{package('.gem')} &&
+    rubyforge add_file    sinatra sinatra #{spec.version} #{package('.tar.gz')}
+  end
+end
+
+# Website ============================================================
+# Building docs requires HAML and the hanna gem:
+#   gem install mislav-hanna --source=http://gems.github.com
+
+task 'doc'     => ['doc:api']
+
+desc 'Generate Hanna RDoc under doc/api'
+task 'doc:api' => ['doc/api/index.html']
+
+file 'doc/api/index.html' => FileList['lib/**/*.rb','README.rdoc'] do |f|
+  rb_files = f.prerequisites
+  sh((<<-end).gsub(/\s+/, ' '))
+    hanna --charset utf8 \
+          --fmt html \
+          --inline-source \
+          --line-numbers \
+          --main README.rdoc \
+          --op doc/api \
+          --title 'Sinatra API Documentation' \
+          #{rb_files.join(' ')}
+  end
+end
+CLEAN.include 'doc/api'
+
+def rdoc_to_html(file_name)
+  require 'rdoc/markup/to_html'
+  rdoc = RDoc::Markup::ToHtml.new
+  rdoc.convert(File.read(file_name))
+end
+
+# Gemspec Helpers ====================================================
+
+def source_version
+  line = File.read('lib/sinatra/base.rb')[/^\s*VERSION = .*/]
+  line.match(/.*VERSION = '(.*)'/)[1]
+end
+
+project_files =
+  FileList[
+    '{lib,test,compat,images}/**',
+    'Rakefile', 'CHANGES', 'README.rdoc'
+  ]
+file 'sinatra.gemspec' => project_files do |f|
+  # read spec file and split out manifest section
+  spec = File.read(f.name)
+  head, manifest, tail = spec.split("  # = MANIFEST =\n")
+  # replace version and date
+  head.sub!(/\.version = '.*'/, ".version = '#{source_version}'")
+  head.sub!(/\.date = '.*'/, ".date = '#{Date.today.to_s}'")
+  # determine file list from git ls-files
+  files = `git ls-files`.
+    split("\n").
+    sort.
+    reject{ |file| file =~ /^\./ }.
+    reject { |file| file =~ /^doc/ }.
+    map{ |file| "    #{file}" }.
+    join("\n")
+  # piece file back together and write...
+  manifest = "  s.files = %w[\n#{files}\n  ]\n"
+  spec = [head,manifest,tail].join("  # = MANIFEST =\n")
+  File.open(f.name, 'w') { |io| io.write(spec) }
+  puts "updated #{f.name}"
+end

data/compat/app_test.rb

@@ -0,0 +1,301 @@
+require File.dirname(__FILE__) + '/helper'
+
+context "Sinatra" do
+
+  setup do
+    Sinatra.application = nil
+  end
+
+  specify "should put all DSL methods on (main)" do
+    object = Object.new
+    methods = %w[get put post head delete configure template helpers set]
+    methods.each do |method|
+      object.private_methods.map { |m| m.to_sym }.should.include(method.to_sym)
+    end
+  end
+
+  specify "should handle result of nil" do
+    get '/' do
+      nil
+    end
+
+    get_it '/'
+    should.be.ok
+    body.should == ''
+  end
+
+  specify "handles events" do
+    get '/:name' do
+      'Hello ' + params["name"]
+    end
+
+    get_it '/Blake'
+
+    should.be.ok
+    body.should.equal 'Hello Blake'
+  end
+
+
+  specify "handles splats" do
+    get '/hi/*' do
+      params["splat"].kind_of?(Array).should.equal true
+      params["splat"].first
+    end
+
+    get_it '/hi/Blake'
+
+    should.be.ok
+    body.should.equal 'Blake'
+  end
+
+  specify "handles multiple splats" do
+    get '/say/*/to/*' do
+      params["splat"].join(' ')
+    end
+
+    get_it '/say/hello/to/world'
+
+    should.be.ok
+    body.should.equal 'hello world'
+  end
+
+  specify "allow empty splats" do
+    get '/say/*/to*/*' do
+      params["splat"].join(' ')
+    end
+
+    get_it '/say/hello/to/world'
+
+    should.be.ok
+    body.should.equal 'hello  world' # second splat is empty
+
+    get_it '/say/hello/tomy/world'
+
+    should.be.ok
+    body.should.equal 'hello my world'
+  end
+
+  specify "gives access to underlying response header Hash" do
+    get '/' do
+      header['X-Test'] = 'Is this thing on?'
+      headers 'X-Test2' => 'Foo', 'X-Test3' => 'Bar'
+      ''
+    end
+
+    get_it '/'
+    should.be.ok
+    headers.should.include 'X-Test'
+    headers['X-Test'].should.equal 'Is this thing on?'
+    headers.should.include 'X-Test3'
+    headers['X-Test3'].should.equal 'Bar'
+  end
+
+  specify "follows redirects" do
+    get '/' do
+      redirect '/blake'
+    end
+
+    get '/blake' do
+      'Mizerany'
+    end
+
+    get_it '/'
+    should.be.redirection
+    body.should.equal ''
+
+    follow!
+    should.be.ok
+    body.should.equal 'Mizerany'
+  end
+
+  specify "renders a body with a redirect" do
+    helpers do
+      def foo ; 'blah' ; end
+    end
+    get "/" do
+      redirect 'foo', :foo
+    end
+    get_it '/'
+    should.be.redirection
+    headers['Location'].should.equal 'foo'
+    body.should.equal 'blah'
+  end
+
+  specify "redirects permanently with 301 status code" do
+    get "/" do
+      redirect 'foo', 301
+    end
+    get_it '/'
+    should.be.redirection
+    headers['Location'].should.equal 'foo'
+    status.should.equal 301
+    body.should.be.empty
+  end
+
+  specify "stop sets content and ends event" do
+    get '/set_body' do
+      stop 'Hello!'
+      stop 'World!'
+      fail 'stop should have halted'
+    end
+
+    get_it '/set_body'
+
+    should.be.ok
+    body.should.equal 'Hello!'
+
+  end
+
+  # Deprecated. WTF was going on here? What's the 1 in [:foo, 1] do?
+  xspecify "should set status then call helper with a var" do
+    helpers do
+      def foo
+        'bah!'
+      end
+    end
+
+    get '/set_body' do
+      stop [404, [:foo, 1]]
+    end
+
+    get_it '/set_body'
+
+    should.be.not_found
+    body.should.equal 'bah!'
+
+  end
+
+  specify "should easily set response Content-Type" do
+    get '/foo.html' do
+      content_type 'text/html', :charset => 'utf-8'
+      "<h1>Hello, World</h1>"
+    end
+
+    get_it '/foo.html'
+    should.be.ok
+    headers['Content-Type'].should.equal 'text/html;charset=utf-8'
+    body.should.equal '<h1>Hello, World</h1>'
+
+    get '/foo_test.xml' do
+      content_type :xml
+      "<feed></feed>"
+    end
+
+    get_it '/foo_test.xml'
+    should.be.ok
+    headers['Content-Type'].should.equal 'application/xml'
+    body.should.equal '<feed></feed>'
+  end
+
+  specify "supports conditional GETs with last_modified" do
+    modified_at = Time.now
+    get '/maybe' do
+      last_modified modified_at
+      'response body, maybe'
+    end
+
+    get_it '/maybe'
+    should.be.ok
+    body.should.equal 'response body, maybe'
+
+    get_it '/maybe', :env => { 'HTTP_IF_MODIFIED_SINCE' => modified_at.httpdate }
+    status.should.equal 304
+    body.should.equal ''
+  end
+
+  specify "supports conditional GETs with entity_tag" do
+    get '/strong' do
+      entity_tag 'FOO'
+      'foo response'
+    end
+
+    get_it '/strong'
+    should.be.ok
+    body.should.equal 'foo response'
+
+    get_it '/strong', {},
+      'HTTP_IF_NONE_MATCH' => '"BAR"'
+    should.be.ok
+    body.should.equal 'foo response'
+
+    get_it '/strong', {},
+      'HTTP_IF_NONE_MATCH' => '"FOO"'
+    status.should.equal 304
+    body.should.equal ''
+
+    get_it '/strong', {},
+      'HTTP_IF_NONE_MATCH' => '"BAR", *'
+    status.should.equal 304
+    body.should.equal ''
+  end
+
+  specify "delegates HEAD requests to GET handlers" do
+    get '/invisible' do
+      "I am invisible to the world"
+    end
+
+    head_it '/invisible'
+    should.be.ok
+    body.should.not.equal "I am invisible to the world"
+    body.should.equal ''
+  end
+
+
+  specify "supports PUT" do
+    put '/' do
+      'puted'
+    end
+    put_it '/'
+    assert_equal 'puted', body
+  end
+
+  specify "rewrites POSTs with _method param to PUT" do
+    put '/' do
+      'puted'
+    end
+    post_it '/', :_method => 'PUT'
+    assert_equal 'puted', body
+  end
+
+  specify "rewrites POSTs with lowercase _method param to PUT" do
+    put '/' do
+      'puted'
+    end
+    post_it '/', :_method => 'put'
+    body.should.equal 'puted'
+  end
+
+  specify "does not rewrite GETs with _method param to PUT" do
+    get '/' do
+      'getted'
+    end
+    get_it '/', :_method => 'put'
+    should.be.ok
+    body.should.equal 'getted'
+  end
+
+  specify "ignores _method query string parameter on non-POST requests" do
+    post '/' do
+      'posted'
+    end
+    put '/' do
+      'booo'
+    end
+    post_it "/?_method=PUT"
+    should.be.ok
+    body.should.equal 'posted'
+  end
+
+  specify "does not read body if content type is not url encoded" do
+    post '/foo.xml' do
+      request.env['CONTENT_TYPE'].should.be == 'application/xml'
+      request.content_type.should.be == 'application/xml'
+      request.body.read
+    end
+
+    post_it '/foo.xml', '<foo></foo>', :content_type => 'application/xml'
+    @response.should.be.ok
+    @response.body.should.be == '<foo></foo>'
+  end
+
+end

data/compat/application_test.rb

@@ -0,0 +1,334 @@
+require File.dirname(__FILE__) + '/helper'
+
+require 'uri'
+
+class TesterWithEach
+  def each
+    yield 'foo'
+    yield 'bar'
+    yield 'baz'
+  end
+end
+
+context "Looking up a request" do
+
+  setup do
+    Sinatra.application = nil
+  end
+
+  # Deprecated. The lookup method is no longer used.
+  xspecify "returns what's at the end" do
+    block = Proc.new { 'Hello' }
+    get '/', &block
+
+    result = Sinatra.application.lookup(
+      Rack::Request.new(
+        'REQUEST_METHOD' => 'GET',
+        'PATH_INFO' => '/'
+      )
+    )
+
+    result.should.not.be.nil
+    result.block.should.be block
+  end
+
+  # Deprecated. The lookup method is no longer used.
+  xspecify "takes params in path" do
+    block = Proc.new { 'Hello' }
+    get '/:foo', &block
+
+    result = Sinatra.application.lookup(
+      Rack::Request.new(
+        'REQUEST_METHOD' => 'GET',
+        'PATH_INFO' => '/bar'
+      )
+    )
+
+    result.should.not.be.nil
+    result.block.should.be block
+    result.params.should.equal "foo" => 'bar'
+  end
+
+end
+
+context "An app returns" do
+
+  setup do
+    Sinatra.application = nil
+  end
+
+  specify "404 if no events found" do
+    request = Rack::MockRequest.new(@app)
+    get_it '/'
+    should.be.not_found
+    body.should.equal '<h1>Not Found</h1>'
+  end
+
+  specify "200 if success" do
+    get '/' do
+      'Hello World'
+    end
+    get_it '/'
+    should.be.ok
+    body.should.equal 'Hello World'
+  end
+
+  specify "an objects result from each if it has it" do
+
+    get '/' do
+      TesterWithEach.new
+    end
+
+    get_it '/'
+    should.be.ok
+    body.should.equal 'foobarbaz'
+
+  end
+
+  # Deprecated. The body method no longer halts.
+  xspecify "the body set if set before the last" do
+
+    get '/' do
+      body 'Blake'
+      'Mizerany'
+    end
+
+    get_it '/'
+    should.be.ok
+    body.should.equal 'Blake'
+
+  end
+
+  specify "404 if NotFound is raised" do
+
+    get '/' do
+      raise Sinatra::NotFound
+    end
+
+    get_it '/'
+    should.be.not_found
+
+  end
+
+end
+
+context "Application#configure blocks" do
+
+  setup do
+    Sinatra.application = nil
+  end
+
+  specify "run when no environment specified" do
+    ref = false
+    configure { ref = true }
+    ref.should.equal true
+  end
+
+  specify "run when matching environment specified" do
+    ref = false
+    configure(:test) { ref = true }
+    ref.should.equal true
+  end
+
+  specify "do not run when no matching environment specified" do
+    configure(:foo) { flunk "block should not have been executed" }
+    configure(:development, :production, :foo) { flunk "block should not have been executed" }
+  end
+
+  specify "accept multiple environments" do
+    ref = false
+    configure(:foo, :test, :bar) { ref = true }
+    ref.should.equal true
+  end
+
+end
+
+context "Default Application Configuration" do
+
+  # Sinatra::ServerError is no longer used
+  xspecify "includes 404 and 500 error handlers" do
+    Sinatra.application.errors.should.include(Sinatra::ServerError)
+    Sinatra.application.errors[Sinatra::ServerError].should.not.be.nil
+    Sinatra.application.errors.should.include(Sinatra::NotFound)
+    Sinatra.application.errors[Sinatra::NotFound].should.not.be.nil
+  end
+
+  # Deprecated. No such thing as a Static event anymore.
+  xspecify "includes Static event" do
+    assert Sinatra.application.events[:get].any? { |e| Sinatra::Static === e }
+  end
+
+end
+
+context "Events in an app" do
+
+  setup do
+    Sinatra.application = nil
+  end
+
+  specify "evaluate in a clean context" do
+    helpers do
+      def foo
+        'foo'
+      end
+    end
+
+    get '/foo' do
+      foo
+    end
+
+    get_it '/foo'
+    should.be.ok
+    body.should.equal 'foo'
+  end
+
+  specify "get access to request, response, and params" do
+    get '/:foo' do
+      params["foo"] + params["bar"]
+    end
+
+    get_it '/foo?bar=baz'
+    should.be.ok
+    body.should.equal 'foobaz'
+  end
+
+  specify "can filters by agent" do
+
+    get '/', :agent => /Windows/ do
+      request.env['HTTP_USER_AGENT']
+    end
+
+    get_it '/', :env => { :agent => 'Windows' }
+    should.be.ok
+    body.should.equal 'Windows'
+
+    get_it '/', :env => { :agent => 'Mac' }
+    should.not.be.ok
+
+  end
+
+  specify "can use regex to get parts of user-agent" do
+
+    get '/', :agent => /Windows (NT)/ do
+      params[:agent].first
+    end
+
+    get_it '/', :env => { :agent => 'Windows NT' }
+
+    body.should.equal 'NT'
+
+  end
+
+  specify "can deal with spaces in paths" do
+
+    path = '/path with spaces'
+
+    get path do
+      "Look ma, a path with spaces!"
+    end
+
+    get_it URI.encode(path)
+
+    body.should.equal "Look ma, a path with spaces!"
+  end
+
+  specify "route based on host" do
+
+    get '/' do
+      'asdf'
+    end
+
+    get_it '/'
+    assert ok?
+    assert_equal('asdf', body)
+
+    get '/foo', :host => 'foo.sinatrarb.com' do
+      'in foo!'
+    end
+
+    get '/foo', :host => 'bar.sinatrarb.com'  do
+      'in bar!'
+    end
+
+    get_it '/foo', {}, 'HTTP_HOST' => 'foo.sinatrarb.com'
+    assert ok?
+    assert_equal 'in foo!', body
+
+    get_it '/foo', {}, 'HTTP_HOST' => 'bar.sinatrarb.com'
+    assert ok?
+    assert_equal 'in bar!', body
+
+    get_it '/foo'
+    assert not_found?
+
+  end
+
+end
+
+
+context "Options in an app" do
+
+  setup do
+    Sinatra.application = nil
+    @app = Sinatra::application
+  end
+
+  specify "can be set singly on app" do
+    @app.set :foo, 1234
+    @app.options.foo.should.equal 1234
+  end
+
+  specify "can be set singly from top-level" do
+    set_option :foo, 1234
+    @app.options.foo.should.equal 1234
+  end
+
+  specify "can be set multiply on app" do
+    @app.options.foo.should.be.nil
+    @app.set :foo => 1234,
+      :bar => 'hello, world'
+    @app.options.foo.should.equal 1234
+    @app.options.bar.should.equal 'hello, world'
+  end
+
+  specify "can be set multiply from top-level" do
+    @app.options.foo.should.be.nil
+    set_options :foo => 1234,
+      :bar => 'hello, world'
+    @app.options.foo.should.equal 1234
+    @app.options.bar.should.equal 'hello, world'
+  end
+
+  specify "can be enabled on app" do
+    @app.options.foo.should.be.nil
+    @app.enable :sessions, :foo, :bar
+    @app.options.sessions.should.equal true
+    @app.options.foo.should.equal true
+    @app.options.bar.should.equal true
+  end
+
+  specify "can be enabled from top-level" do
+    @app.options.foo.should.be.nil
+    enable :sessions, :foo, :bar
+    @app.options.sessions.should.equal true
+    @app.options.foo.should.equal true
+    @app.options.bar.should.equal true
+  end
+
+  specify "can be disabled on app" do
+    @app.options.foo.should.be.nil
+    @app.disable :sessions, :foo, :bar
+    @app.options.sessions.should.equal false
+    @app.options.foo.should.equal false
+    @app.options.bar.should.equal false
+  end
+
+  specify "can be enabled from top-level" do
+    @app.options.foo.should.be.nil
+    disable :sessions, :foo, :bar
+    @app.options.sessions.should.equal false
+    @app.options.foo.should.equal false
+    @app.options.bar.should.equal false
+  end
+
+end