manveru-innate 2009.02.06

data/Rakefile

@@ -0,0 +1,139 @@
+require 'rake/rdoctask'
+require 'rake/clean'
+require 'time'
+require 'date'
+require 'pp'
+
+INNATE_VERSION = Date.today.strftime("%Y.%m.%d")
+
+task :default => [:spec]
+
+CLEAN.include('*coverage*')
+
+desc 'update lib/innate/version.rb'
+task :reversion do
+  File.open('lib/innate/version.rb', 'w+') do |file|
+    file.puts('module Innate')
+    file.puts('  VERSION = %p' % INNATE_VERSION)
+    file.puts('end')
+  end
+end
+
+desc 'publish to github'
+task :release => [:reversion, :gemspec] do
+  sh('git add MANIFEST CHANGELOG innate.gemspec lib/innate/version.rb')
+  puts "I added the relevant files, you can now run:", ''
+  puts "git commit -m 'Version #{INNATE_VERSION}'"
+  puts "git tag -m '#{INNATE_VERSION}'"
+  puts "git push"
+  puts
+end
+
+desc 'update manifest'
+task :manifest do
+  File.open('MANIFEST', 'w+') do|manifest|
+    manifest.puts(`git ls-files`)
+  end
+end
+
+desc 'update changelog'
+task :changelog do
+  File.open('CHANGELOG', 'w+') do |changelog|
+    `git log -z --abbrev-commit`.split("\0").each do |commit|
+      next if commit =~ /^Merge: \d*/
+      ref, author, time, _, title, _, message = commit.split("\n", 7)
+      ref    = ref[/commit ([0-9a-f]+)/, 1]
+      author = author[/Author: (.*)/, 1].strip
+      time   = Time.parse(time[/Date: (.*)/, 1]).utc
+      title.strip!
+
+      changelog.puts "[#{ref} | #{time}] #{author}"
+      changelog.puts '', "  * #{title}"
+      changelog.puts '', message.rstrip if message
+      changelog.puts
+    end
+  end
+end
+
+desc 'generate gemspec'
+task :gemspec => [:manifest, :changelog] do
+  manifest = File.read('MANIFEST').split("\n")
+  files = manifest.map{|file| "    %p," % file }.join("\n")[0..-2]
+
+gemspec = <<-GEMSPEC
+Gem::Specification.new do |s|
+  s.name = "innate"
+  s.version = #{INNATE_VERSION.dump}
+
+  s.summary = "Powerful web-framework wrapper for Rack."
+  s.description = "Simple, straight-forward, base for web-frameworks."
+  s.platform = "ruby"
+  s.has_rdoc = true
+  s.author = "Michael 'manveru' Fellinger"
+  s.email = "m.fellinger@gmail.com"
+  s.homepage = "http://github.com/manveru/innate"
+  s.require_path = "lib"
+
+  s.add_dependency('rack', '>= 0.4.0')
+
+  s.files = [
+#{files}
+  ]
+end
+GEMSPEC
+
+  File.open('innate.gemspec', 'w+'){|gs| gs.puts(gemspec) }
+end
+
+desc 'code coverage'
+task :rcov => :clean do
+  specs = Dir['spec/innate/**/*.rb']
+  specs -= Dir['spec/innate/cache/common.rb']
+
+  # we ignore adapter as this has extensive specs in rack already.
+  ignore = %w[ gem rack bacon innate/adapter\.rb ]
+  ignore << 'fiber\.rb' if RUBY_VERSION < '1.9'
+
+  ignored = ignore.join(',')
+
+  cmd = "rcov --aggregate coverage.data --sort coverage -t --%s -x '#{ignored}' %s"
+
+  while spec = specs.shift
+    puts '', "Gather coverage for #{spec} ..."
+    html = specs.empty? ? 'html' : 'no-html'
+    sh(cmd % [html, spec])
+  end
+end
+
+desc 'Run all specs'
+task :spec do
+  require 'open3'
+
+  specs = Dir['spec/{innate,example}/**/*.rb']
+  specs.delete_if{|f| f =~ /cache\/common\.rb/ }
+
+  total = specs.size
+  len = specs.sort.last.size
+  left_format = "%4d/%d: %-#{len + 11}s"
+
+  red, green = "\e[31m%s\e[0m", "\e[32m%s\e[0m"
+
+  specs.each_with_index do |spec, idx|
+    print(left_format % [idx + 1, total, spec])
+
+    Open3.popen3("#{RUBY} #{spec}") do |sin, sout, serr|
+      out = sout.read
+      err = serr.read
+
+      md = out.match(/(\d+) tests, (\d+) assertions, (\d+) failures, (\d+) errors/)
+      tests, assertions, failures, errors = all = md.captures.map{|c| c.to_i }
+
+      if failures + errors > 0
+        puts((red % "%5d tests, %d assertions, %d failures, %d errors") % all)
+        puts "", out, err, ""
+      else
+        puts((green % "%5d passed") % tests)
+      end
+    end
+  end
+end

data/example/app/retro_games.rb

@@ -0,0 +1,57 @@
+require 'innate'
+require 'yaml/store'
+
+STORE = YAML::Store.new('games.yaml')
+
+def STORE.[](key) transaction{|s| s[key] } end
+def STORE.[]=(key, value) transaction{|s| s[key] = value } end
+def STORE.each
+  YAML.load_file('games.yaml').sort_by{|k,v| -v }.each{|(k,v)| yield(k, v) }
+end
+
+class Games
+  include Innate::Node
+  map '/'
+  provide :html => :haml
+
+  def index
+    TEMPLATE
+  end
+
+  def create
+    if request.post?
+      name = request.params['name']
+      STORE[name] ||= 0
+    end
+
+    redirect_referrer
+  end
+
+  def vote(name)
+    STORE[url_decode name] += 1
+
+    redirect_referrer
+  end
+
+  TEMPLATE = <<-'T'.strip
+!!! XML
+!!!
+
+%html
+  %head
+    %title Top Retro Games
+  %body
+    %h1 Vote on your favorite Retro Game
+    %form{:action => r(:create), :method => 'POST'}
+      %input{:type => 'text', :name => 'name'}
+      %input{:type => 'submit', :value => 'Add'}
+    %ol
+      - STORE.each do |name, votes|
+        %li
+          = Games.a("Vote", "/vote/#{u name}")
+          = h("%5d => %s" % [votes, name])
+  T
+
+end
+
+Innate.start

data/example/app/whywiki_erb/layout/wiki.html.erb

@@ -0,0 +1,15 @@
+<?xml version='1.0' encoding='utf-8' ?>
+<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
+<html>
+  <head>
+    <title><%= "MicroWiki #{h @page}" %></title>
+    <style type="text/css">
+      a.exists{ color: #00f; }
+      a.missing{ color: #f00; }
+      textarea{ width: 90%; height: 20em; }
+    </style>
+  </head>
+  <body>
+    <%= @content %>
+  </body>
+</html>

data/example/app/whywiki_erb/spec/wiki.rb

@@ -0,0 +1,19 @@
+require 'innate'
+require 'innate/spec'
+require 'yaml/store'
+
+base = File.join(File.dirname(__FILE__), '..')
+DB = YAML::Store.new(db_file = "#{base}/spec/wiki.yaml")
+
+require "start"
+
+Innate.config.app.root = base
+
+describe 'Wiki' do
+  it 'should have index page' do
+    page = Innate::Mock.get('/')
+    page.body.should == ''
+  end
+
+  FileUtils.rm_f(db_file)
+end

data/example/app/whywiki_erb/start.rb

@@ -0,0 +1,45 @@
+# The minimal _why wiki in Innate
+
+%w[rubygems innate erb maruku yaml/store].each{|l| require(l) }
+
+DB = YAML::Store.new('wiki.yaml') unless defined?(DB)
+
+class Wiki
+  include Innate::Node
+  map '/'
+  provide :html => :erb
+  layout 'wiki'
+
+  def index(page = 'Home')
+    @page = page
+    @text = 'foo'
+    sync{
+      @text = DB[page].to_s.dup
+      @text.gsub!(/\[\[(.*?)\]\]/) do
+        %(<a href="#{r($1)}" class="#{DB[$1] ? 'exists' : 'missing'}">#{h($1)}</a>)
+      end
+    }
+  end
+
+  def edit(page)
+    @page = page
+    @text = sync{ DB[page].to_s }
+  end
+
+  def save
+    redirect_referrer unless request.post?
+
+    page, text = request[:page, :text]
+    sync{ DB[page] = text } if page and text
+
+    redirect(r(page))
+  end
+
+  private
+
+  def sync
+    Innate::STATE.sync{ DB.transaction{ yield }}
+  end
+end
+
+Innate.start :adapter => :mongrel

data/example/app/whywiki_erb/view/edit.html.erb

@@ -0,0 +1,6 @@
+<a href="<%= r @page %>"><%= h "< #{@page}" %></a>
+<form method="post" action="<%= r :save %>">
+  <input type="hidden" name="page" value="<%= h @page %>" />
+  <textarea name="text"><%= @text %></textarea>
+  <input type="submit" value="Save" />
+</form>

data/example/app/whywiki_erb/view/index.html.erb

@@ -0,0 +1,10 @@
+<% unless @page == 'Home' %>
+<a href="<%= r 'Home' %>">&lt; Home</a>
+<% end %>
+<h1><%= h @page %></h1>
+<% if @text.empty? %>
+<a href="<%= r :edit, @page %>"><%= h "Create #{@page}" %></a>
+<% else %>
+<a href="<%= r :edit, @page %>"><%= h "Edit #{@page}" %></a>
+<%= Maruku.new(@text).to_html %>
+<% end %>

data/example/custom_middleware.rb

@@ -0,0 +1,43 @@
+require 'innate'
+
+class Demo
+  include Innate::Node
+  map '/'
+
+  def index
+    'Hello, World!'
+  end
+
+  def empty
+    response.status = 405
+    ''
+  end
+end
+
+# Make sure you do this before Innate.start, otherwise you have to use
+# Innate.middleware! to force a rebuild in the MiddlewareCompiler.
+Innate.middleware :innate do |mw|
+  # Makes sure all requests and responses conform to Rack protocol
+  mw.use Rack::Lint
+
+  # Avoid showing empty failure pages, give information when it happens.
+  mw.use Rack::ShowStatus
+
+  # Catch exceptions inside Innate and give nice status info
+  mw.use Rack::ShowExceptions
+
+  # Log access
+  mw.use Rack::CommonLogger
+
+  # Reload modified files before request
+  mw.use Rack::Reloader
+
+  # Initializes the Current objects: Request, Response, and Session
+  mw.use Innate::Current
+
+  # This will try to find a static file in /public first, and try DynaMap if
+  # Rack::File returns a 404 status.
+  mw.cascade Rack::File.new('public'), Innate::DynaMap
+end
+
+Innate.start

data/example/error_handling.rb

@@ -0,0 +1,31 @@
+require 'innate'
+
+class Flawed
+  include Innate::Node
+  map '/'
+
+  def index
+    raise ArgumentError, "No go"
+  end
+
+  def i_raise
+    100 * "foo"
+  end
+end
+
+class Errors
+  include Innate::Node
+  map '/error'
+
+  def internal
+    path = request.env['rack.route_exceptions.path_info']
+    exception = request.env['rack.route_exceptions.exception']
+
+    format = "Oh my, you just went to %p, something went horribly wrong: %p"
+    format % [path, exception.message]
+  end
+end
+
+Rack::RouteExceptions.route(Exception, '/error/internal')
+
+Innate.start

data/example/hello.rb

@@ -0,0 +1,12 @@
+require 'innate'
+
+class Hello
+  include Innate::Node
+  map '/'
+
+  def index
+    'Hello, World!'
+  end
+end
+
+Innate.start

data/example/howto_spec.rb

@@ -0,0 +1,60 @@
+require 'innate'
+require 'bacon'
+
+class SpecMe
+  include Innate::Node
+  map '/'
+
+  def index
+    "I should be at /"
+  end
+
+  def foo
+    action.content_type = 'text/css'
+    "I should be at /foo"
+  end
+end
+
+class SpecMeToo
+  include Innate::Node
+  map '/too'
+
+  def index
+    "I should be at /too"
+  end
+
+  def foo
+    action.content_type = 'text/css'
+    "I should be at /too/foo"
+  end
+end
+
+Innate.setup_middleware
+
+Bacon.summary_on_exit
+Bacon.extend(Bacon::TestUnitOutput)
+
+describe 'An example spec' do
+  def assert(url, body, content_type)
+    response = Innate::Mock.get(url)
+    response.status.should == 200
+    response.body.should == body
+    response.content_type.should == content_type
+  end
+
+  should 'respond to /' do
+    assert('/', "I should be at /", 'text/html')
+  end
+
+  should 'respond to /foo' do
+    assert('/foo', "I should be at /foo", 'text/css')
+  end
+
+  should 'respond to /too' do
+    assert('/too', "I should be at /too", 'text/html')
+  end
+
+  should 'respond to /too/foo' do
+    assert('/too/foo', "I should be at /too/foo", 'text/css')
+  end
+end