cuba 0.0.1

data/LICENSE

@@ -0,0 +1,19 @@
+Copyright (c) 2010 Michel Martens
+
+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.

data/README.markdown

@@ -0,0 +1,86 @@
+Cuba
+====
+
+Rum based microframework for web development.
+
+Description
+-----------
+
+Cuba is a light wrapper around [Rum](http://github.com/chneukirchen/rum), a tiny but powerful mapper for [Rack](http://github.com/chneukirchen/rack) applications.
+
+It integrates [Haml](http://haml-lang.com/) templates via [Tilt](http://github.com/rtomayko/tilt), and testing via [Contest](http://github.com/citrusbyte/contest) and [Stories](http://github.com/citrusbyte/stories).
+
+Usage
+-----
+
+Here's a simple application:
+
+    # cat hello_world.rb
+    require "cuba"
+
+    Cuba.define do
+      on get do
+        on path("hello") do
+          res.write "Hello world!"
+        end
+
+        on default do
+          res.redirect "/hello"
+        end
+      end
+    end
+
+    # cat hello_world_test.rb
+    require "cuba/test"
+
+    Cuba.test "My App" do
+      story "As a user I want to be greeted with a Hello world" do
+        scenario "A user visits the homepage" do
+          visit "/"
+
+          assert_contain "Hello world!"
+        end
+      end
+    end
+
+To run it, you can create a `config.ru`:
+
+    # cat config.ru
+    require "hello_world"
+
+    run Cuba.app
+
+That's it, you can now run `rackup` and enjoy what you have just created.
+
+For more information about what you can do, check [Rum's documentation](http://github.com/chneukirchen/rum). To see how you can test it, check the documentation for [Stories](http://github.com/citrusbyte/stories).
+
+Installation
+------------
+
+    $ sudo gem install cuba
+
+License
+-------
+
+Copyright (c) 2010 Michel Martens
+
+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.

data/Rakefile

@@ -0,0 +1,5 @@
+task :test do
+  system "cd test && ruby cuba_test.rb"
+end
+
+task :default => :test

data/cuba.gemspec

@@ -0,0 +1,17 @@
+Gem::Specification.new do |s|
+  s.name              = "cuba"
+  s.version           = "0.0.1"
+  s.summary           = "Rum based microframework for web applications."
+  s.description       = "Cuba is a light wrapper for Rum, a microframework for Rack applications."
+  s.authors           = ["Michel Martens"]
+  s.email             = ["michel@soveran.com"]
+  s.homepage          = "http://github.com/soveran/cuba"
+  s.files = ["LICENSE", "README.markdown", "Rakefile", "lib/cuba/ron.rb", "lib/cuba/rum.rb", "lib/cuba/test.rb", "lib/cuba/version.rb", "lib/cuba.rb", "cuba.gemspec", "test/cuba_test.rb"]
+  s.add_dependency "rack", ">= 1.1.0"
+  s.add_dependency "haml", ">= 2.2.22"
+  s.add_dependency "tilt", ">= 0.9"
+  s.add_dependency "webrat", ">= 0.7.0"
+  s.add_dependency "contest", ">= 0.1.2"
+  s.add_dependency "stories", ">= 0.1.3"
+  s.add_dependency "rack-test", ">= 0.5.3"
+end

data/lib/cuba.rb

@@ -0,0 +1,12 @@
+require "cuba/version"
+require "cuba/ron"
+
+module Cuba
+  def self.define(&block)
+    @app = Ron.new(&block)
+  end
+
+  def self.app
+    @app
+  end
+end

data/lib/cuba/ron.rb

@@ -0,0 +1,11 @@
+require "cuba/rum"
+require "haml"
+require "tilt"
+
+module Cuba
+  class Ron < Rum
+    def haml(template, locals = {})
+      res.write Tilt::HamlTemplate.new("#{template}.haml").render(self, locals)
+    end
+  end
+end

data/lib/cuba/rum.rb

@@ -0,0 +1,153 @@
+# Rum, the gRand Unified Mapper
+#
+# Rum is a powerful mapper for your Rack applications that can be used
+# as a microframework.
+#
+# More information at http://github.com/chneukirchen/rum
+#
+# == Copyright
+#
+# Copyright (C) 2008, 2009 Christian Neukirchen <http://purl.org/net/chneukirchen>
+#
+# 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 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 'rack'
+
+class Rack::Response
+  # 301 Moved Permanently
+  # 302 Found
+  # 303 See Other
+  # 307 Temporary Redirect
+  def redirect(target, status=302)
+    self.status = status
+    self["Location"] = target
+  end
+end
+
+class Rum
+  attr_reader :env, :req, :res
+
+  def initialize(&blk)
+    @blk = blk
+  end
+
+  def call(env)
+    dup._call(env)
+  end
+
+  def _call(env)
+    @env = env
+    @req = Rack::Request.new(env)
+    @res = Rack::Response.new
+    @matched = false
+    catch(:rum_run_next_app) {
+      instance_eval(&@blk)
+      @res.status = 404  unless @matched || !@res.empty?
+      return @res.finish
+    }.call(env)
+  end
+
+  def on(*arg, &block)
+    return  if @matched
+    s, p = env["SCRIPT_NAME"], env["PATH_INFO"]
+    yield *arg.map { |a| a == true || (a != false && a.call) || return }
+    env["SCRIPT_NAME"], env["PATH_INFO"] = s, p
+    @matched = true
+  end
+
+  def any(*args)
+    args.any? { |a| a == true || (a != false && a.call) }
+  end
+
+  def also
+    @matched = false
+  end
+
+  def path(p)
+    lambda {
+      if env["PATH_INFO"] =~ /\A\/(#{p})(\/|\z)/   #/
+        env["SCRIPT_NAME"] += "/#{$1}"
+        env["PATH_INFO"] = $2 + $'
+        $1
+      end
+    }
+  end
+
+  def number
+    path("\\d+")
+  end
+
+  def segment
+    path("[^\\/]+")
+  end
+
+  def extension(e="\\w+")
+    lambda { env["PATH_INFO"] =~ /\.(#{e})\z/ && $1 }
+  end
+
+  def param(p, default=nil)
+    lambda { req[p] || default }
+  end
+
+  def header(p, default=nil)
+    lambda { env[p.upcase.tr('-','_')] || default }
+  end
+
+  def default
+    true
+  end
+
+  def host(h)
+    req.host == h
+  end
+
+  def method(m)
+    req.request_method = m
+  end
+
+  def get; req.get?; end
+  def post; req.post?; end
+  def put; req.put?; end
+  def delete; req.delete?; end
+
+  def accept(mimetype)
+    lambda {
+      env['HTTP_ACCEPT'].split(',').any? { |s| s.strip == mimetype }  and
+        res['Content-Type'] = mimetype
+    }
+  end
+
+  def check(&block)
+    block
+  end
+
+  def run(app)
+    throw :rum_run_next_app, app
+  end
+
+  def puts(*args)
+    args.each { |s|
+      res.write s
+      res.write "\n"
+    }
+  end
+
+  def print(*args)
+    args.each { |s| res.write s }
+  end
+end

data/lib/cuba/test.rb

@@ -0,0 +1,25 @@
+require "webrat"
+require "rack/test"
+require "stories"
+require "stories/runner"
+
+Webrat.configure do |config|
+  config.mode = :rack
+end
+
+class Test::Unit::TestCase
+  include Rack::Test::Methods
+  include Webrat::Methods
+  include Webrat::Matchers
+  include Stories::Webrat
+
+  def app
+    Cuba.app
+  end
+end
+
+module Cuba
+  def self.test(name, &block)
+    Test::Unit::TestCase.context(name, &block)
+  end
+end

data/lib/cuba/version.rb

@@ -0,0 +1,3 @@
+module Cuba
+  VERSION = "0.0.1"
+end

data/test/cuba_test.rb

@@ -0,0 +1,45 @@
+$:.unshift(File.join("..", "lib"))
+
+require "cuba"
+require "cuba/test"
+
+form = <<EOS
+  <form action="/login" method="post">
+    <input name="user">
+    <input type="submit" value="Login">
+  </form>
+EOS
+
+Cuba.define do
+  on get do
+    on path("login") do
+      res.write "Enter your username"
+      res.write form
+    end
+
+    on default do
+      res.redirect "/login"
+    end
+  end
+
+  on post, path("login") do
+    on param("user") do |user|
+      res.write "Got #{user}"
+    end
+  end
+end
+
+Cuba.test "Sample Site" do
+  story "As a user I want to be able to login" do
+    scenario "A user submits good info" do
+      visit "/"
+
+      assert_contain "Enter your username"
+
+      fill_in "user", :with => "Michel"
+      click_button "Login"
+
+      assert_contain "Got Michel"
+    end
+  end
+end

metadata

@@ -0,0 +1,168 @@
+--- !ruby/object:Gem::Specification 
+name: cuba
+version: !ruby/object:Gem::Version 
+  prerelease: false
+  segments: 
+  - 0
+  - 0
+  - 1
+  version: 0.0.1
+platform: ruby
+authors: 
+- Michel Martens
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2010-04-25 00:00:00 -03:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: rack
+  prerelease: false
+  requirement: &id001 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 1
+        - 1
+        - 0
+        version: 1.1.0
+  type: :runtime
+  version_requirements: *id001
+- !ruby/object:Gem::Dependency 
+  name: haml
+  prerelease: false
+  requirement: &id002 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 2
+        - 2
+        - 22
+        version: 2.2.22
+  type: :runtime
+  version_requirements: *id002
+- !ruby/object:Gem::Dependency 
+  name: tilt
+  prerelease: false
+  requirement: &id003 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 9
+        version: "0.9"
+  type: :runtime
+  version_requirements: *id003
+- !ruby/object:Gem::Dependency 
+  name: webrat
+  prerelease: false
+  requirement: &id004 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 7
+        - 0
+        version: 0.7.0
+  type: :runtime
+  version_requirements: *id004
+- !ruby/object:Gem::Dependency 
+  name: contest
+  prerelease: false
+  requirement: &id005 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 1
+        - 2
+        version: 0.1.2
+  type: :runtime
+  version_requirements: *id005
+- !ruby/object:Gem::Dependency 
+  name: stories
+  prerelease: false
+  requirement: &id006 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 1
+        - 3
+        version: 0.1.3
+  type: :runtime
+  version_requirements: *id006
+- !ruby/object:Gem::Dependency 
+  name: rack-test
+  prerelease: false
+  requirement: &id007 !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        segments: 
+        - 0
+        - 5
+        - 3
+        version: 0.5.3
+  type: :runtime
+  version_requirements: *id007
+description: Cuba is a light wrapper for Rum, a microframework for Rack applications.
+email: 
+- michel@soveran.com
+executables: []
+
+extensions: []
+
+extra_rdoc_files: []
+
+files: 
+- LICENSE
+- README.markdown
+- Rakefile
+- lib/cuba/ron.rb
+- lib/cuba/rum.rb
+- lib/cuba/test.rb
+- lib/cuba/version.rb
+- lib/cuba.rb
+- cuba.gemspec
+- test/cuba_test.rb
+has_rdoc: true
+homepage: http://github.com/soveran/cuba
+licenses: []
+
+post_install_message: 
+rdoc_options: []
+
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      segments: 
+      - 0
+      version: "0"
+requirements: []
+
+rubyforge_project: 
+rubygems_version: 1.3.6
+signing_key: 
+specification_version: 3
+summary: Rum based microframework for web applications.
+test_files: []
+