Pistos-ramaze 2009.02 → 2009.04.08

data/spec/snippets/ramaze/dictionary.rb

@@ -0,0 +1,110 @@
+require 'spec/helper'
+
+describe Ramaze::Dictionary do
+  Dictionary = Ramaze::Dictionary
+
+  should 'create' do
+    dict = Dictionary['z', 1, 'a', 2, 'c', 3]
+    dict.keys.should == %w[z a c]
+  end
+
+  should 'store' do
+    dict = Dictionary.new
+    dict['z'] = 1
+    dict['a'] = 2
+    dict['c'] = 3
+    dict.keys.should == %w[z a c]
+
+    dict = Dictionary.new
+    dict[:a] = 1
+    dict[:c] = 3
+    dict.values.should == [1, 3]
+    dict.keys.should == [:a, :c]
+
+    dict[:b, 1] = 2
+    dict.values.should == [1, 2, 3]
+    dict.keys.should == [:a, :b, :c]
+  end
+
+  should 'push' do
+    dict = Dictionary.new
+    dict.push('end', 15).should == true
+    dict['end'].should == 15
+    dict.push('end', 30).should == false
+    dict['end'].should == 15
+  end
+
+  should 'unshift' do
+    dict = Dictionary['a', 1, 'c', 2, 'z', 3]
+    dict.push('end', 15).should == true
+    dict.unshift('begin', 50).should == true
+    dict['begin'].should == 50
+    dict.keys.should == %w[begin a c z end]
+  end
+
+  should 'pop' do
+    dict = Dictionary['a', 1, 'c', 2, 'z', 3]
+    dict.pop.should == ['z', 3]
+    dict.keys.should == %w[a c]
+  end
+
+  should 'shift' do
+    dict = Dictionary['a', 1, 'c', 2, 'z', 3]
+    dict.shift.should == ['a', 1]
+    dict.keys.should == %w[c z]
+  end
+
+  should 'insert' do
+    dict_a = Dictionary['a', 1, 'b', 2, 'c', 3]
+    dict_b = Dictionary['d', 4, 'a', 1, 'b', 2, 'c', 3]
+
+    dict_a.insert(0, 'd', 4).should == 4
+    dict_a.should == dict_b
+
+    dict_c = Dictionary['a', 1, 'b', 2, 'c', 3]
+    dict_d = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
+
+    dict_c.insert(-1, 'd', 4)
+    dict_c.should == dict_d
+  end
+
+  should 'update with Dictionary' do
+    left = Dictionary['a', 1, 'b', 2, 'c', 3]
+    right = Dictionary['d', 4]
+    result = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
+
+    left.update(right).should == result
+    left.should == result
+  end
+
+  should 'update with Hash' do
+    left = Dictionary['a', 1, 'b', 2, 'c', 3]
+    right = { 'd' => 4 }
+    result = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
+    left.update(right).should == result
+    left.should == result
+  end
+
+  should 'merge with Dictionary' do
+    left = Dictionary['a', 1, 'b', 2, 'c', 3]
+    right = Dictionary['d', 4]
+    result = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
+    left.merge(right).should == result
+    left.should.not == result
+  end
+
+  should 'merge with Hash' do
+    left = Dictionary['a', 1, 'b', 2, 'c', 3]
+    right = { 'd' => 4 }
+    result = Dictionary['a', 1, 'b', 2, 'c', 3, 'd', 4]
+    left.merge(right).should == result
+    left.should.not == result
+  end
+
+  should 'order by set order_by' do
+    dict = Dictionary['a', 3, 'b', 2, 'c', 1]
+    dict.order_by{|k,v| v }
+    dict.values.should == [1, 2, 3]
+    dict.keys.should == %w[c b a]
+  end
+end

data/spec/snippets/ramaze/struct.rb

@@ -0,0 +1,12 @@
+require 'spec/helper'
+
+describe Ramaze::Struct do
+  should 'provide #values_at' do
+    Point = Ramaze::Struct.new(:x, :y)
+    point = Point.new(15, 10)
+
+    point.values_at(1, 0).should == [10, 15]
+    point.values_at(0..1).should == [15, 10]
+    point.values_at(:y, :x).should == [10, 15]
+  end
+end

data/spec/snippets/thread/into.rb

@@ -1,20 +1,9 @@
 require 'spec/helper'
 
-class TCThreadIntoController < Ramaze::Controller
-  map :/
-
-  def hello
-    Thread.into('goodbye') do |str|
-      "#{Ramaze::Action.current.name}, #{str}"
-    end.value
-  end
-end
-
 describe 'Thread.into' do
-  behaves_like 'http'
-  ramaze
-
   it 'should provide access to thread vars' do
-    get('/hello').body.should == 'hello, goodbye'
+    Thread.current[:foo] = :bar
+    Thread.new{ Thread.current[:foo].should == nil }.join
+    Thread.into{ Thread.current[:foo].should == :bar }.join
   end
 end

data/tasks/authors.rake

@@ -0,0 +1,30 @@
+# Once git has a fix for the glibc in handling .mailmap and another fix for
+# allowing empty mail address to be mapped in .mailmap we won't have to handle
+# them manually.
+
+desc 'Update doc/AUTHORS'
+task :authors do
+  authors = Hash.new(0)
+
+  `git shortlog -nse`.scan(/(\d+)\s(.+)\s<(.*)>$/) do |count, name, email|
+    case name
+    when "ahoward"
+      name, email = "Ara T. Howard", "ara.t.howard@gmail.com"
+    when "Martin Hilbig blueonyx@dev-area.net"
+      name, email = "Martin Hilbig", "blueonyx@dev-area.net"
+    when "Michael Fellinger m.fellinger@gmail.com"
+      name, email = "Michael Fellinger", "m.fellinger@gmail.com"
+    end
+
+    authors[[name, email]] += count.to_i
+  end
+
+  File.open('doc/AUTHORS', 'w+') do |io|
+    io.puts "Following persons have contributed to #{GEMSPEC.name}."
+    io.puts '(Sorted by number of submitted patches, then alphabetically)'
+    io.puts ''
+    authors.sort_by{|(n,e),c| [-c, n.downcase] }.each do |(name, email), count|
+      io.puts("%6d %s <%s>" % [count, name, email])
+    end
+  end
+end

data/tasks/bacon.rake

@@ -0,0 +1,66 @@
+desc 'Run all bacon specs with pretty output'
+task :bacon => :install_dependencies do
+  require 'open3'
+  require 'scanf'
+  require 'matrix'
+
+  specs = PROJECT_SPECS
+
+  some_failed = false
+  specs_size = specs.size
+  len = specs.map{|s| s.size }.sort.last
+  total_tests = total_assertions = total_failures = total_errors = 0
+  totals = Vector[0, 0, 0, 0]
+
+  red, yellow, green = "\e[31m%s\e[0m", "\e[33m%s\e[0m", "\e[32m%s\e[0m"
+  left_format = "%4d/%d: %-#{len + 11}s"
+  spec_format = "%d specifications (%d requirements), %d failures, %d errors"
+
+  specs.each_with_index do |spec, idx|
+    print(left_format % [idx + 1, specs_size, spec])
+
+    Open3.popen3(RUBY, spec) do |sin, sout, serr|
+      out = sout.read.strip
+      err = serr.read.strip
+
+      # this is conventional, see spec/innate/state/fiber.rb for usage
+      if out =~ /^Bacon::Error: (needed .*)/
+        puts(yellow % ("%6s %s" % ['', $1]))
+      else
+        total = nil
+
+        out.each_line do |line|
+          scanned = line.scanf(spec_format)
+
+          next unless scanned.size == 4
+
+          total = Vector[*scanned]
+          break
+        end
+
+        if total
+          totals += total
+          tests, assertions, failures, errors = total_array = total.to_a
+
+          if tests > 0 && failures + errors == 0
+            puts((green % "%6d passed") % tests)
+          else
+            some_failed = true
+            puts(red % "       failed")
+            puts out unless out.empty?
+            puts err unless err.empty?
+          end
+        else
+          some_failed = true
+          puts(red % "       failed")
+          puts out unless out.empty?
+          puts err unless err.empty?
+        end
+      end
+    end
+  end
+
+  total_color = some_failed ? red : green
+  puts(total_color % (spec_format % totals.to_a))
+  exit 1 if some_failed
+end

data/tasks/changelog.rake

@@ -0,0 +1,18 @@
+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

data/tasks/copyright.rake

@@ -0,0 +1,21 @@
+desc "add copyright to all .rb files in the distribution"
+task :copyright do
+  ignore = File.readlines('doc/LEGAL').
+    select{|line| line.strip!; File.exist?(line)}.
+    map{|file| File.expand_path(file)}
+
+  puts "adding copyright to files that don't have it currently"
+  puts PROJECT_COPYRIGHT
+  puts
+
+  Dir['{lib,test}/**/*{.rb}'].each do |file|
+    file = File.expand_path(file)
+    next if ignore.include? file
+    lines = File.readlines(file).map{|l| l.chomp}
+    unless lines.first(PROJECT_COPYRIGHT.size) == PROJECT_COPYRIGHT
+      puts "#{file} seems to need attention, first 4 lines:"
+      puts lines[0..3]
+      puts
+    end
+  end
+end

data/tasks/gem.rake

@@ -0,0 +1,22 @@
+require 'rake/gempackagetask'
+
+task :gemspec => [:manifest, :changelog] do
+  gemspec_file = "#{GEMSPEC.name}.gemspec"
+  File.open(gemspec_file, 'w+'){|gs| gs.puts(GEMSPEC.to_ruby) }
+end
+
+desc "package and install from gemspec"
+task :install => [:gemspec] do
+  sh "gem build #{GEMSPEC.name}.gemspec"
+  sh "gem install #{GEMSPEC.name}-#{GEMSPEC.version}.gem"
+end
+
+desc "uninstall the gem"
+task :uninstall => [:clean] do
+  sh %{gem uninstall -x #{GEMSPEC.name}}
+end
+
+Rake::GemPackageTask.new(GEMSPEC) do |p|
+  p.need_tar = true
+  p.need_zip = true
+end

data/tasks/gem_installer.rake

@@ -0,0 +1,76 @@
+task :gem_installer do
+  class GemInstaller
+    def initialize(options = {}, &block)
+      @gems = []
+      @options = options
+
+      run(&block)
+    end
+
+    def run(&block)
+      instance_eval(&block) if block_given?
+    end
+
+    def gem(name, version = nil, options = {})
+      if version.respond_to?(:merge!)
+        options = version
+      else
+        options[:version] = version
+      end
+
+      @gems << [name, options]
+    end
+
+    def setup_gemspec(gemspec)
+      gemspec.dependencies.each do |dependency|
+        dependency.version_requirements.as_list.each do |version|
+          gem(dependency.name, version)
+        end
+      end
+
+      setup
+    end
+
+    def setup
+      require 'rubygems'
+      require 'rubygems/dependency_installer'
+
+      @gems.each do |name, options|
+        setup_gem(name, options)
+      end
+    end
+
+    def setup_gem(name, options, try_install = true)
+      print "activating #{name} ... "
+      Gem.activate(name, *[options[:version]].compact)
+      require(options[:lib] || name)
+      puts "success."
+    rescue LoadError => error
+      puts error
+      install_gem(name, options) if try_install
+      setup_gem(name, options, try_install = false)
+    end
+
+    def install_gem(name, options)
+      installer = Gem::DependencyInstaller.new(options)
+
+      temp_argv(options[:extconf]) do
+        print "Installing #{name} ... "
+        installer.install(name, options[:version])
+        puts "done."
+      end
+    end
+
+    def temp_argv(extconf)
+      if extconf ||= @options[:extconf]
+        old_argv = ARGV.clone
+        ARGV.replace(extconf.split(' '))
+      end
+
+      yield
+
+    ensure
+      ARGV.replace(old_argv) if extconf
+    end
+  end
+end

data/{rake_tasks → tasks}/git.rake

@@ -1,7 +1,3 @@
-def git_branch
-  `git branch`[/^\*\s+(.*)/, 1]
-end
-
 namespace :git do
   task :anon do
     sh 'git config remote.origin.url git://github.com/manveru/ramaze'
@@ -18,7 +14,7 @@ namespace :git do
     puts "Putting your changes on stash"
     sh 'git stash'
 
-    branch = git_branch
+    branch = `git branch`[/^\*\s+(.*)/, 1]
     puts "Current branch is #{branch}"
 
     if switch = branch != 'master'
@@ -38,4 +34,13 @@ namespace :git do
   task :send do
     sh 'git format-patch ^HEAD'
   end
+
+  desc "show some stats about patches"
+  task :patchflow do
+    patches = `git rev-list HEAD | wc -l`.to_i
+    puts "currently we have #{patches} patches"
+    init = Time.parse("Sat Oct 14 04:22:49 JST 2006")
+    days = (Time.now - init) / (3600 * 24)
+    puts "%d days since init, avg %4.2f patches per day" % [days, patches/days]
+  end
 end

data/tasks/grancher.rake

@@ -0,0 +1,12 @@
+begin
+  require 'grancher/task'
+
+  Grancher::Task.new do |g|
+    g.branch = 'gh-pages'
+    g.push_to = 'origin'
+    g.message = 'Updated website'
+    g.directory 'ydoc', 'doc'
+  end
+rescue LoadError
+  # oh well :)
+end

data/tasks/install_dependencies.rake

@@ -0,0 +1,6 @@
+desc 'install dependencies'
+task :install_dependencies => [:gem_installer] do
+  GemInstaller.new do
+    setup_gemspec(GEMSPEC)
+  end
+end

data/tasks/jquery.rake

@@ -0,0 +1,15 @@
+desc 'download latest jquery and put in /lib/proto/public/js/jquery.js'
+task :jquery do
+  require 'open-uri'
+  $stdout.sync = true
+
+  File.open(PROJECT_JQUERY_FILE, 'w+') do |jquery|
+    remote = open('http://code.jquery.com/jquery-latest.js')
+    print "openend remote side, copying..."
+    while chunk = remote.read(4096)
+      print '.'
+      jquery.write(chunk)
+    end
+    puts " done."
+  end
+end

data/tasks/manifest.rake

@@ -0,0 +1,4 @@
+desc 'update manifest'
+task :manifest do
+  File.open('MANIFEST', 'w+'){|io| io.puts(*GEMSPEC.files) }
+end

data/{rake_tasks/metric.rake → tasks/metric_changes.rake}

@@ -1,21 +1,21 @@
 namespace :metric do
-  desc 'changes per file according to git'
-  task :churn do
+  desc 'committed changes per file according to git'
+  task 'changes' do
     $stdout.sync = true
     out = lambda{|changes, rb| puts("%4d %s" % [changes, rb]) }
-    churn = {}
+    changes = {}
 
-    print 'churning '
+    print 'counting changes '
 
     Dir['lib/**/*.rb'].each do |rb|
-      changes = `git log --pretty=oneline '#{rb}'`.count("\n")
+      changes = `git-log --pretty=oneline '#{rb}'`.count("\n")
       print '.'
       # out[changes, rb]
-      churn[rb] = changes
+      changes[rb] = changes
     end
     puts ' done.'
 
-    sorted = churn.sort_by{|r,c| c }.reverse
+    sorted = changes.sort_by{|r,c| c }.reverse
     puts "Top 20:"
     sorted.first(20).each{|(r,c)| out[c,r] }
     puts "Bottom 20:"

data/tasks/rcov.rake

@@ -0,0 +1,23 @@
+desc 'code coverage'
+task :rcov => :clean do
+  specs = PROJECT_SPECS
+
+  ignore = %w[ gem rack bacon innate hpricot nagoro/lib/nagoro ]
+
+  if RUBY_VERSION >= '1.8.7'
+    ignore << 'begin_with' << 'end_with'
+  end
+  if RUBY_VERSION < '1.9'
+    ignore << 'fiber'
+  end
+
+  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

data/tasks/release.rake

@@ -0,0 +1,69 @@
+namespace :release do
+  task :all => [:release_github, :release_rubyforge]
+
+  desc 'Display instructions to release on github'
+  task :github => [:reversion, :gemspec] do
+    name, version = GEMSPEC.name, GEMSPEC.version
+
+    puts <<INSTRUCTIONS
+First add the relevant files:
+
+git add MANIFEST CHANGELOG #{name}.gemspec lib/#{name}/version.rb
+
+Then commit them, tag the commit, and push:
+
+git commit -m 'Version #{version}'
+git tag -a -m '#{version}' '#{version}'
+git push
+
+INSTRUCTIONS
+
+  end
+
+  # TODO: Not tested
+  desc 'Display instructions to release on rubyforge'
+  task :rubyforge => [:reversion, :gemspec, :package] do
+    name, version = GEMSPEC.name, GEMSPEC.version
+
+    puts <<INSTRUCTIONS
+To publish to rubyforge do following:
+
+rubyforge login
+rubyforge add_release #{name} #{version} pkg/#{name}-#{version}.gem
+
+After you have done these steps, see:
+
+rake release:rubyforge_archives
+
+INSTRUCTIONS
+  end
+
+  desc 'Display instructions to add archives after release:rubyforge'
+  task :rubyforge_archives do
+    release_id = latest_release_id
+
+    puts "Adding archives for distro packagers is:", ""
+
+    Dir["pkg/#{name}-#{version}.{gz,zip}"].each do |file|
+      puts "rubyforge add_file #{name} #{name} #{release_id} '#{file}'"
+    end
+
+    puts
+  end
+end
+
+# Use URI and proper XPATH, something along these lines:
+#
+# a = doc.at('a[@href=~"release_id"]')[:href]
+# release_id = URI(a).query[/release_id=(\w+)/, 1]
+def latest_release_id
+  require 'open-uri'
+  require 'hpricot'
+
+  url = "http://rubyforge.org/frs/?group_id=#{PROJECT_RUBYFORGE_GROUP_ID}"
+  doc = Hpricot(open(url))
+  a = (doc/:a).find{|a| a[:href] =~ /release_id/}
+
+  version = a.inner_html
+  release_id = Hash[*a[:href].split('?').last.split('=').flatten]['release_id']
+end

data/tasks/reversion.rake

@@ -0,0 +1,8 @@
+desc "update version.rb"
+task :reversion do
+  File.open("lib/#{GEMSPEC.name}/version.rb", 'w+') do |file|
+    file.puts("module #{PROJECT_MODULE}")
+    file.puts('  VERSION = %p' % GEMSPEC.version.to_s)
+    file.puts('end')
+  end
+end

data/tasks/todo.rake

@@ -0,0 +1,29 @@
+desc "show a todolist from all the TODO tags in the source"
+task :todo do
+  files = Dir[File.join(BASEDIR, '{lib,spec}', '**/*.rb')]
+
+  files.each do |file|
+    lastline = todo = comment = long_comment = false
+
+    File.readlines(file).each_with_index do |line, lineno|
+      lineno += 1
+      comment = line =~ /^\s*?#.*?$/
+      long_comment = line =~ /^=begin/
+      long_comment = line =~ /^=end/
+      todo = true if line =~ /TODO/ and (long_comment or comment)
+      todo = false if line.gsub('#', '').strip.empty?
+      todo = false unless comment or long_comment
+      if todo
+        unless lastline and lastline + 1 == lineno
+          puts
+          puts "vim #{file} +#{lineno}"
+        end
+
+        l = line.strip.gsub(/^#\s*/, '')
+        print '  ' unless l =~ /^-/
+        puts l
+        lastline = lineno
+      end
+    end
+  end
+end

data/tasks/traits.rake

@@ -0,0 +1,21 @@
+desc 'listing of available traits per class/module'
+task 'traits' do
+  nodes = Hash.new{|h,k| h[k] = []}
+  Dir['lib/**/*.rb'].each do |file|
+    content = File.read(file)
+    traits = content.grep(/^\s*trait\s*:/)
+    traits.each do |trait|
+      space = content[0..content.index(trait)].scan(/^\s*(?:class|module)\s+(.*)$/)
+      space = space.flatten.join('::')
+      nodes[space] << trait.strip
+    end
+  end
+
+  nodes.each do |space, traits|
+    puts space
+    traits.each do |trait|
+      print '  ', trait, "\n"
+    end
+    puts
+  end
+end

data/tasks/yard.rake

@@ -0,0 +1,4 @@
+desc 'Generate YARD documentation'
+task :yard => :clean do
+  sh("yardoc -o ydoc -r #{PROJECT_README}")
+end