engineyard-serverside 1.5.21 → 1.5.23.ruby19

data/lib/vendor/json_pure/tools/fuzz.rb

@@ -1,139 +0,0 @@
-require 'json'
-
-require 'iconv'
-ISO_8859_1_TO_UTF8 = Iconv.new('utf-8', 'iso-8859-15')
-class ::String
-  def to_utf8
-    ISO_8859_1_TO_UTF8.iconv self
-  end
-end
-
-class Fuzzer
-  def initialize(n, freqs = {})
-    sum = freqs.inject(0.0) { |s, x| s + x.last }
-    freqs.each_key { |x| freqs[x] /= sum }
-    s = 0.0
-    freqs.each_key do |x|
-      freqs[x] = s .. (s + t = freqs[x])
-      s += t
-    end
-    @freqs = freqs
-    @n = n
-    @alpha = (0..0xff).to_a
-  end
-
-  def random_string
-    s = ''
-    30.times { s << @alpha[rand(@alpha.size)] }
-    s.to_utf8
-  end
-
-  def pick
-    r = rand
-    found = @freqs.find { |k, f| f.include? rand }
-    found && found.first
-  end
-
-  def make_pick
-    k = pick
-    case
-    when k == Hash, k == Array
-      k.new
-    when k == true, k == false, k == nil
-      k
-    when k == String
-      random_string
-    when k == Fixnum
-      rand(2 ** 30) - 2 ** 29
-    when k == Bignum
-      rand(2 ** 70) - 2 ** 69
-    end
-  end
-
-  def fuzz(current = nil)
-    if @n > 0
-      case current
-      when nil
-        @n -= 1
-        current = fuzz [ Hash, Array ][rand(2)].new
-      when Array
-        while @n > 0
-          @n -= 1
-          current << case p = make_pick
-          when Array, Hash
-            fuzz(p)
-          else
-            p
-          end
-        end
-      when Hash
-        while @n > 0
-          @n -= 1
-          current[random_string] = case p = make_pick
-          when Array, Hash
-            fuzz(p)
-          else
-            p
-          end
-        end
-      end
-    end
-    current
-  end
-end
-
-class MyState < JSON.state
-  WS = " \r\t\n"
-
-  def initialize
-    super(
-          :indent       => make_spaces,
-          :space        => make_spaces,
-          :space_before => make_spaces,
-          :object_nl    => make_spaces,
-          :array_nl     => make_spaces,
-          :max_nesting  => false
-         )
-  end
-
-  def make_spaces
-    s = ''
-    rand(1).times { s << WS[rand(WS.size)] }
-    s
-  end
-end
-
-n = (ARGV.shift || 500).to_i
-loop do
-  fuzzer = Fuzzer.new(n,
-                      Hash => 25,
-                      Array => 25,
-                      String => 10,
-                      Fixnum => 10,
-                      Bignum => 10,
-                      nil => 5,
-                      true => 5,
-                      false => 5
-                     )
-  o1 = fuzzer.fuzz
-  json = JSON.generate o1, MyState.new
-  if $DEBUG
-    puts "-" * 80
-    puts json, json.size
-  else 
-    puts json.size
-  end
-  begin
-    o2 = JSON.parse(json, :max_nesting => false)
-  rescue JSON::ParserError => e
-    puts "Caught #{e.class}: #{e.message}\n#{e.backtrace * "\n"}"
-    puts "o1 = #{o1.inspect}", "json = #{json}", "json_str = #{json.inspect}"
-    puts "locals = #{local_variables.inspect}"
-    exit
-  end
-  if o1 != o2
-    puts "mismatch", "o1 = #{o1.inspect}", "o2 = #{o2.inspect}",
-      "json = #{json}", "json_str = #{json.inspect}"
-    puts "locals = #{local_variables.inspect}"
-  end
-end

data/lib/vendor/json_pure/tools/server.rb

@@ -1,61 +0,0 @@
-#!/usr/bin/env ruby
-
-require 'webrick'
-include WEBrick
-$:.unshift 'ext'
-$:.unshift 'lib'
-require 'json'
-
-class JSONServlet < HTTPServlet::AbstractServlet
-  @@count = 1
-
-  def do_GET(req, res)
-    obj = {
-      "TIME" => Time.now.strftime("%FT%T"),
-      "foo" => "Bär",
-      "bar" => "© ≠ €!",
-      'a' => 2,
-      'b' => 3.141,
-      'COUNT' => @@count += 1,
-      'c' => 'c',
-      'd' => [ 1, "b", 3.14 ],
-      'e' => { 'foo' => 'bar' },
-      'g' => "松本行弘",
-      'h' => 1000.0,
-      'i' => 0.001,
-      'j' => "\xf0\xa0\x80\x81",
-    }
-    res.body = JSON.generate obj
-    res['Content-Type'] = "application/json"
-  end
-end
-
-def create_server(err, dir, port)
-  dir = File.expand_path(dir)
-  err.puts "Surf to:", "http://#{Socket.gethostname}:#{port}"
-
-  s = HTTPServer.new(
-    :Port         => port,
-    :DocumentRoot => dir,
-    :Logger       => WEBrick::Log.new(err),
-    :AccessLog    => [
-      [ err, WEBrick::AccessLog::COMMON_LOG_FORMAT  ],
-      [ err, WEBrick::AccessLog::REFERER_LOG_FORMAT ],
-      [ err, WEBrick::AccessLog::AGENT_LOG_FORMAT   ]
-    ]
-  )
-  s.mount("/json", JSONServlet)
-  s
-end
-
-default_dir = File.expand_path(File.join(File.dirname(__FILE__), '..', 'data'))
-dir = ARGV.shift || default_dir
-port = (ARGV.shift || 6666).to_i
-s = create_server(STDERR, dir, 6666)
-t = Thread.new { s.start }
-trap(:INT) do
-  s.shutdown
-  t.join
-  exit
-end
-sleep

data/lib/vendor/open4/lib/open4.rb

@@ -1,403 +0,0 @@
-# vim: ts=2:sw=2:sts=2:et:fdm=marker
-require 'fcntl'
-require 'timeout'
-require 'thread'
-
-module Open4
-#--{{{
-  VERSION = '1.1.0'
-  def self.version() VERSION end
-
-  class Error < ::StandardError; end
-
-  def popen4(*cmd, &b)
-#--{{{
-    pw, pr, pe, ps = IO.pipe, IO.pipe, IO.pipe, IO.pipe
-
-    verbose = $VERBOSE
-    begin
-      $VERBOSE = nil
-      ps.first.fcntl(Fcntl::F_SETFD, Fcntl::FD_CLOEXEC)
-      ps.last.fcntl(Fcntl::F_SETFD, Fcntl::FD_CLOEXEC)
-
-      cid = fork {
-        pw.last.close
-        STDIN.reopen pw.first
-        pw.first.close
-
-        pr.first.close
-        STDOUT.reopen pr.last
-        pr.last.close
-
-        pe.first.close
-        STDERR.reopen pe.last
-        pe.last.close
-
-        STDOUT.sync = STDERR.sync = true
-
-        begin
-          exec(*cmd)
-          raise 'forty-two' 
-        rescue Exception => e
-          Marshal.dump(e, ps.last)
-          ps.last.flush
-        end
-        ps.last.close unless (ps.last.closed?)
-        exit!
-      }
-    ensure
-      $VERBOSE = verbose
-    end
-
-    [pw.first, pr.last, pe.last, ps.last].each{|fd| fd.close}
-
-    begin
-      e = Marshal.load ps.first
-      raise(Exception === e ? e : "unknown failure!")
-    rescue EOFError # If we get an EOF error, then the exec was successful
-      42
-    ensure
-      ps.first.close
-    end
-
-    pw.last.sync = true
-
-    pi = [pw.last, pr.first, pe.first]
-
-    if b 
-      begin
-        b[cid, *pi]
-        Process.waitpid2(cid).last
-      ensure
-        pi.each{|fd| fd.close unless fd.closed?}
-      end
-    else
-      [cid, pw.last, pr.first, pe.first]
-    end
-#--}}}
-  end
-  alias open4 popen4
-  module_function :popen4
-  module_function :open4
-
-  class SpawnError < Error
-#--{{{
-    attr 'cmd'
-    attr 'status'
-    attr 'signals'
-    def exitstatus
-      @status.exitstatus
-    end
-    def initialize cmd, status
-      @cmd, @status = cmd, status
-      @signals = {} 
-      if status.signaled?
-        @signals['termsig'] = status.termsig
-        @signals['stopsig'] = status.stopsig
-      end
-      sigs = @signals.map{|k,v| "#{ k }:#{ v.inspect }"}.join(' ')
-      super "cmd <#{ cmd }> failed with status <#{ exitstatus.inspect }> signals <#{ sigs }>"
-    end
-#--}}}
-  end
-
-  class ThreadEnsemble
-#--{{{
-    attr 'threads'
-
-    def initialize cid
-      @cid, @threads, @argv, @done, @running = cid, [], [], Queue.new, false
-      @killed = false
-    end
-
-    def add_thread *a, &b
-      @running ? raise : (@argv << [a, b])
-    end
-
-#
-# take down process more nicely
-#
-    def killall
-      c = Thread.critical
-      return nil if @killed
-      Thread.critical = true
-      (@threads - [Thread.current]).each{|t| t.kill rescue nil}
-      @killed = true
-    ensure
-      Thread.critical = c
-    end
-
-    def run
-      @running = true
-
-      begin
-        @argv.each do |a, b|
-          @threads << Thread.new(*a) do |*a|
-            begin
-              b[*a]
-            ensure
-              killall rescue nil if $!
-              @done.push Thread.current
-            end
-          end
-        end
-      rescue
-        killall
-        raise
-      ensure
-        all_done
-      end
-
-      @threads.map{|t| t.value}
-    end
-
-    def all_done
-      @threads.size.times{ @done.pop }
-    end
-#--}}}
-  end
-
-  def to timeout = nil
-#--{{{
-    Timeout.timeout(timeout){ yield }
-#--}}}
-  end
-  module_function :to
-
-  def new_thread *a, &b
-#--{{{
-    cur = Thread.current
-    Thread.new(*a) do |*a|
-      begin
-        b[*a]
-      rescue Exception => e
-        cur.raise e
-      end
-    end
-#--}}}
-  end
-  module_function :new_thread
-
-  def getopts opts = {}
-#--{{{
-    lambda do |*args|
-      keys, default, ignored = args
-      catch('opt') do
-        [keys].flatten.each do |key|
-          [key, key.to_s, key.to_s.intern].each do |key|
-            throw 'opt', opts[key] if opts.has_key?(key)
-          end
-        end
-        default
-      end
-    end
-#--}}}
-  end
-  module_function :getopts
-
-  def relay src, dst = nil, t = nil
-#--{{{
-    send_dst =
-      if dst.respond_to?(:call)
-        lambda{|buf| dst.call(buf)}
-      elsif dst.respond_to?(:<<)
-        lambda{|buf| dst << buf }
-      else
-        lambda{|buf| buf }
-      end
-
-    unless src.nil?
-      if src.respond_to? :gets
-        while buf = to(t){ src.gets }
-          send_dst[buf]
-        end
-
-      elsif src.respond_to? :each
-        q = Queue.new
-        th = nil
-
-        timer_set = lambda do |t|
-          th = new_thread{ to(t){ q.pop } }
-        end
-
-        timer_cancel = lambda do |t|
-          th.kill if th rescue nil
-        end
-
-        timer_set[t]
-        begin
-          src.each do |buf|
-            timer_cancel[t]
-            send_dst[buf]
-            timer_set[t]
-          end
-        ensure
-          timer_cancel[t]
-        end
-
-      elsif src.respond_to? :read
-        buf = to(t){ src.read }
-        send_dst[buf]
-
-      else
-        buf = to(t){ src.to_s }
-        send_dst[buf]
-      end
-    end
-#--}}}
-  end
-  module_function :relay
-
-  def spawn arg, *argv 
-#--{{{
-    argv.unshift(arg)
-    opts = ((argv.size > 1 and Hash === argv.last) ? argv.pop : {})
-    argv.flatten!
-    cmd = argv.join(' ')
-
-
-    getopt = getopts opts
-
-    ignore_exit_failure = getopt[ 'ignore_exit_failure', getopt['quiet', false] ]
-    ignore_exec_failure = getopt[ 'ignore_exec_failure', !getopt['raise', true] ]
-    exitstatus = getopt[ %w( exitstatus exit_status status ) ]
-    stdin = getopt[ %w( stdin in i 0 ) << 0 ]
-    stdout = getopt[ %w( stdout out o 1 ) << 1 ]
-    stderr = getopt[ %w( stderr err e 2 ) << 2 ]
-    pid = getopt[ 'pid' ]
-    timeout = getopt[ %w( timeout spawn_timeout ) ]
-    stdin_timeout = getopt[ %w( stdin_timeout ) ]
-    stdout_timeout = getopt[ %w( stdout_timeout io_timeout ) ]
-    stderr_timeout = getopt[ %w( stderr_timeout ) ]
-    status = getopt[ %w( status ) ]
-    cwd = getopt[ %w( cwd dir ) ]
-
-    exitstatus =
-      case exitstatus
-        when TrueClass, FalseClass
-          ignore_exit_failure = true if exitstatus
-          [0]
-        else
-          [*(exitstatus || 0)].map{|i| Integer i}
-      end
-
-    stdin ||= '' if stdin_timeout
-    stdout ||= '' if stdout_timeout
-    stderr ||= '' if stderr_timeout
-
-    started = false
-
-    status =
-      begin
-        chdir(cwd) do
-          Timeout::timeout(timeout) do
-            popen4(*argv) do |c, i, o, e|
-              started = true
-
-              %w( replace pid= << push update ).each do |msg|
-                break(pid.send(msg, c)) if pid.respond_to? msg 
-              end
-
-              te = ThreadEnsemble.new c
-
-              te.add_thread(i, stdin) do |i, stdin|
-                relay stdin, i, stdin_timeout
-                i.close rescue nil
-              end
-
-              te.add_thread(o, stdout) do |o, stdout|
-                relay o, stdout, stdout_timeout
-              end
-
-              te.add_thread(e, stderr) do |o, stderr|
-                relay e, stderr, stderr_timeout
-              end
-
-              te.run
-            end
-          end
-        end
-      rescue
-        raise unless(not started and ignore_exec_failure)
-      end
-
-    raise SpawnError.new(cmd, status) unless
-      (ignore_exit_failure or (status.nil? and ignore_exec_failure) or exitstatus.include?(status.exitstatus))
-
-    status
-#--}}}
-  end
-  module_function :spawn
-
-  def chdir cwd, &block
-    return(block.call Dir.pwd) unless cwd
-    Dir.chdir cwd, &block
-  end
-  module_function :chdir
-
-  def background arg, *argv 
-#--{{{
-    require 'thread'
-    q = Queue.new
-    opts = { 'pid' => q, :pid => q }
-    case argv.last
-      when Hash
-        argv.last.update opts
-      else
-        argv.push opts
-    end
-    thread = Thread.new(arg, argv){|arg, argv| spawn arg, *argv}
-    sc = class << thread; self; end
-    sc.module_eval {
-      define_method(:pid){ @pid ||= q.pop }
-      define_method(:spawn_status){ @spawn_status ||= value }
-      define_method(:exitstatus){ @exitstatus ||= spawn_status.exitstatus }
-    }
-    thread
-#--}}}
-  end
-  alias bg background
-  module_function :background
-  module_function :bg
-
-  def maim pid, opts = {}
-#--{{{
-    getopt = getopts opts
-    sigs = getopt[ 'signals', %w(SIGTERM SIGQUIT SIGKILL) ]
-    suspend = getopt[ 'suspend', 4 ]
-    pid = Integer pid
-    existed = false
-    sigs.each do |sig|
-      begin
-        Process.kill sig, pid
-        existed = true 
-      rescue Errno::ESRCH
-        return(existed ? nil : true)
-      end
-      return true unless alive? pid
-      sleep suspend
-      return true unless alive? pid
-    end
-    return(not alive?(pid)) 
-#--}}}
-  end
-  module_function :maim
-
-  def alive pid
-#--{{{
-    pid = Integer pid
-    begin
-      Process.kill 0, pid
-      true
-    rescue Errno::ESRCH
-      false
-    end
-#--}}}
-  end
-  alias alive? alive
-  module_function :alive
-  module_function :'alive?'
-#--}}}
-end
-
-def open4(*cmd, &b) cmd.size == 0 ? Open4 : Open4::popen4(*cmd, &b) end

data/lib/vendor/thor/CHANGELOG.rdoc

@@ -1,89 +0,0 @@
-== 0.13, released 2010-02-03
-
-* Several bug fixes
-* Decoupled Thor::Group and Thor, so it's easier to vendor
-* Added check_unknown_options! in case you want error messages to be raised in valid switches.
-* run(command) should return the results of command
-
-== 0.12, released 2010-01-02
-
-* Methods generated by attr_* are automatically not marked as tasks
-* inject_into_file does not add the same content twice, unless :force is set
-* Removed rr in favor to rspec mock framework
-* Improved output for thor -T
-* [#7] Do not force white color on status
-* [#8] Yield a block with the filename on directory
-
-== 0.11, released 2009-07-01
-
-* Added a rake compatibility layer. It allows you to use spec and rdoc tasks on
-  Thor classes.
-
-* BACKWARDS INCOMPATIBLE: aliases are not generated automatically anymore
-  since it wrong behavior to the invocation system.
-
-* thor help now show information about any class/task. All those calls are
-  possible:
-  
-    thor help describe
-    thor help describe:amazing
-
-  Or even with default namespaces:
-
-    thor help :spec
-
-* Thor::Runner now invokes the default task if none is supplied:
-
-    thor describe # invokes the default task, usually help
-
-* Thor::Runner now works with mappings:
-
-    thor describe -h
-
-* Added some documentation and code refactoring.
-
-== 0.9.8, released 2008-10-20
-
-* Fixed some tiny issues that were introduced lately.
-
-== 0.9.7, released 2008-10-13
-
-* Setting global method options on the initialize method works as expected:
-  All other tasks will accept these global options in addition to their own.
-* Added 'group' notion to Thor task sets (class Thor); by default all tasks
-  are in the 'standard' group. Running 'thor -T' will only show the standard
-  tasks - adding --all will show all tasks. You can also filter on a specific
-  group using the --group option: thor -T --group advanced
-  
-== 0.9.6, released 2008-09-13
-
-* Generic improvements
-
-== 0.9.5, released 2008-08-27
-
-* Improve Windows compatibility
-* Update (incorrect) README and task.thor sample file
-* Options hash is now frozen (once returned)
-* Allow magic predicates on options object. For instance: `options.force?`
-* Add support for :numeric type
-* BACKWARDS INCOMPATIBLE: Refactor Thor::Options. You cannot access shorthand forms in options hash anymore (for instance, options[:f])
-* Allow specifying optional args with default values: method_options(:user => "mislav")
-* Don't write options for nil or false values. This allows, for example, turning color off when running specs.
-* Exit with the status of the spec command to help CI stuff out some.
-
-== 0.9.4, released 2008-08-13
-
-* Try to add Windows compatibility.
-* BACKWARDS INCOMPATIBLE: options hash is now accessed as a property in your class and is not passed as last argument anymore
-* Allow options at the beginning of the argument list as well as the end.
-* Make options available with symbol keys in addition to string keys.
-* Allow true to be passed to Thor#method_options to denote a boolean option.
-* If loading a thor file fails, don't give up, just print a warning and keep going.
-* Make sure that we re-raise errors if they happened further down the pipe than we care about.
-* Only delete the old file on updating when the installation of the new one is a success
-* Make it Ruby 1.8.5 compatible.
-* Don't raise an error if a boolean switch is defined multiple times.
-* Thor::Options now doesn't parse through things that look like options but aren't.
-* Add URI detection to install task, and make sure we don't append ".thor" to URIs
-* Add rake2thor to the gem binfiles.
-* Make sure local Thorfiles override system-wide ones.

data/lib/vendor/thor/LICENSE

@@ -1,20 +0,0 @@
-Copyright (c) 2008 Yehuda Katz
-
-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.