etapper 0.0.0

data/vendor/gems/english-0.3.1/test/fixture/soundex.txt

@@ -0,0 +1,15 @@
+#
+# Test data for soundex algorithm.
+#
+Euler: E460
+Ellery: E460
+Gauss: G200
+Ghosh: G200
+Hilbert: H416
+Heilbronn: H416
+Knuth: K530
+Kant: K530
+Lloyd: L300
+Ladd: L300
+Lukasiewicz: L222
+Lissajous: L222

data/vendor/gems/english-0.3.1/test/test_censor.rb

@@ -0,0 +1,18 @@
+require 'test/unit'
+require 'english/censor'
+
+class TC_String_Censor < Test::Unit::TestCase
+
+  def test_word_filter
+    s = "this is a test"
+    n = s.word_filter{ |w| "#{w}1" }
+    assert_equal( 'this1 is1 a1 test1', n )
+  end
+
+  def test_word_filter!
+    s = "this is a test"
+    s.word_filter!{ |w| "#{w}1" }
+    assert_equal( 'this1 is1 a1 test1', s )
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_double_metaphone.rb

@@ -0,0 +1,23 @@
+require 'english/double_metaphone'
+require 'test/unit'
+
+#require 'fastercsv'
+
+# 1218 tests, 2436 assertions
+
+class TC_DoubleMetaphone < Test::Unit::TestCase
+
+  DIR  = File.dirname(__FILE__)
+  DATA = File.read(File.join(DIR,'fixture/double_metaphone.txt')).split(/\n/)
+
+  DATA.each_with_index do |line, i|
+    row = *line.split(', ')
+    primary, secondary = English::DoubleMetaphone[row[0]]
+
+    define_method("test_#{i}") do
+      assert_equal row[1], primary
+      assert_equal row[2], (secondary.nil?? primary : secondary)
+    end
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_dresner.rb

@@ -0,0 +1,17 @@
+require 'english/dresner'
+
+require 'test/unit'
+
+class TC_String < Test::Unit::TestCase
+
+  def test_dresner
+    # assert_still_legible ;-)
+    assert_nothing_raised { "How are you today?".dresner }
+  end
+
+  def test_dresner
+    # assert_still_legible ;-)
+    assert_nothing_raised { "How are you today?".dresner! }
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_inflect.rb

@@ -0,0 +1,93 @@
+require 'english/inflect'
+require 'test/unit'
+
+class TestInflect < Test::Unit::TestCase
+
+  tests = [
+    [ "Americans", "American" ],
+    [ "analyses", "analysis" ],
+    [ "archives", "archive" ],
+    [ "bays", "bay" ],
+    [ "bureaus", "bureau" ],
+    [ "businesses", "business" ],
+    [ "cacti", "cactus" ],
+    [ "cactuses", "cactus" ],
+    [ "calves", "calf" ],
+    [ "carpets", "carpet" ],
+    [ "chiefs", "chief" ],
+    [ "choruses", "chorus" ],
+    [ "churches", "church" ],
+    [ "companies", "company" ],
+    [ "courses", "course" ],
+    [ "cows", "cow" ],
+    [ "crashes", "crash" ],
+    [ "criteria", "criterion" ],
+    [ "discos", "disco" ],
+    [ "doors", "door" ],
+    [ "factories", "factory" ],
+    [ "farms", "farm" ],
+    [ "farmers", "farmer" ],
+    [ "faxes", "fax" ],
+    [ "firemen", "fireman" ],
+    [ "fish", "fish" ],
+    [ "flowers", "flower" ],
+    [ "forum", "fora" ],
+    [ "forks", "fork" ],
+    [ "foxes", "fox" ],
+    [ "friends", "friend" ],
+    [ "garages", "garage" ],
+    [ "gardens", "garden" ],
+    [ "geese", "goose" ],
+    [ "girls", "girl" ],
+    [ "grown-ups", "grown-up" ],
+    [ "halves", "half" ],
+    [ "heroes", "hero" ],
+    [ "highways", "highway" ],
+    [ "hives", "hive" ],
+    [ "horses", "horse" ],
+    [ "hovercraft", "hovercraft" ],
+    [ "indexes", "index" ],
+    [ "indices", "index" ],
+    [ "kisses", "kiss" ],
+    [ "lives", "life" ],
+    [ "lights", "light" ],
+    [ "loaves", "loaf" ],
+    [ "memos", "memo" ],
+    [ "men", "man" ],
+    [ "mountains", "mountain" ],
+    [ "mice", "mouse" ],
+    [ "ovens", "oven" ],
+    [ "oxen", "ox" ],
+    [ "parties", "party" ],
+    [ "pens", "pen" ],
+    [ "pennies", "penny" ],
+    [ "potatoes", "potato" ],
+    [ "prizes", "prize" ],
+    [ "proofs", "proof" ],
+    [ "scarves", "scarf" ],
+    [ "series", "series" ],
+    [ "staples", "staple" ],
+    [ "statuses", "status" ],
+    [ "stores", "store" ],
+    [ "Swiss", "Swiss" ],
+    [ "tables", "table" ],
+    [ "take-offs", "take-off" ],
+    [ "teachers", "teacher" ],
+    [ "theses", "thesis" ],
+    [ "thieves", "thief" ],
+    [ "tomatoes", "tomato" ],
+    [ "torpedoes", "torpedo" ],
+    [ "videos", "video" ],
+    [ "watches", "watch" ]
+  ]
+
+  tests.each do |(p, s)|
+    define_method("test_singular_of_#{p}") do
+      assert_equal(s, p.singular)
+    end
+
+    define_method("test_plural_of_#{s}") do
+      assert_equal(p, s.plural)
+    end
+  end
+end

data/vendor/gems/english-0.3.1/test/test_levenshtein.rb

@@ -0,0 +1,82 @@
+require 'english/levenshtein'
+
+require 'test/unit'
+
+class TC_Levenshtein < Test::Unit::TestCase
+
+  include English::Levenshtein
+
+  TEST_CASES = {
+    :easy => [
+      ['test', 'test', 0],
+      ['test', 'tent', 1],
+      ['gumbo', 'gambol', 2],
+      ['kitten', 'sitting', 3]
+    ],
+    :empty => [
+      ['foo', '', 3],
+      ['', '', 0],
+      ['a', '', 1]
+    ],
+    :utf8 => [
+      ["f\303\266o", 'foo', 1],
+      ["fran\303\247ais", 'francais', 1],
+      ["fran\303\247ais", "fran\303\246ais", 1],
+      [
+        "\347\247\201\343\201\256\345\220\215\345\211\215\343\201\257"<<
+        "\343\203\235\343\203\274\343\203\253\343\201\247\343\201\231",
+        "\343\201\274\343\201\217\343\201\256\345\220\215\345\211\215\343\201"<<
+        "\257\343\203\235\343\203\274\343\203\253\343\201\247\343\201\231",
+        2
+      ] # Japanese
+    ],
+    :iso_8859_1 => [
+      ["f\366o", 'foo', 1],
+      ["fran\347ais", 'francais', 1],
+      ["fran\347ais", "fran\346ais", 1]
+    ],
+    :edge => [
+      ['a', 'a', 0],
+      ['0123456789', 'abcdefghijklmnopqrstuvwxyz', 26]
+    ]
+  }
+
+  def assert_set(name)
+    TEST_CASES[name].each do |s, t, x|
+      assert_equal x, distance(s, t)
+      assert_equal x, distance(t, s)
+    end
+  end
+
+  def with_kcode(k)
+    old_kcode = $KCODE
+    $KCODE = k
+    yield
+    $KCODE = old_kcode
+  end
+
+  def test_easy_cases
+    assert_set(:easy)
+  end
+
+  def test_empty_cases
+    assert_set(:empty)
+  end
+
+  def test_edge_cases
+    assert_set(:edge)
+  end
+
+  def test_utf8_cases
+    with_kcode('U') do
+      assert_set(:utf8)
+    end
+  end
+
+  def test_iso_8859_1_cases
+    with_kcode('NONE') do
+      assert_set(:iso_8859_1)
+    end
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_metaphone.rb

@@ -0,0 +1,45 @@
+require 'english/metaphone'
+
+require 'test/unit'
+
+class TC_Metaphone < Test::Unit::TestCase
+
+  DIR      = File.dirname(__FILE__)
+
+  DATA     = YAML::load(File.read(File.join(DIR,'fixture/metaphone.txt')))
+  DATA_ALT = YAML::load(File.read(File.join(DIR,'fixture/metaphone_lp.txt')))
+
+  def test_cases
+    DATA.each do |input, expected_output|
+      assert_equal expected_output, English::Metaphone.metaphone(input)
+    end
+  end
+
+  def test_cases_for_alternate_implementation
+    DATA_ALT.each do |input, expected_output|
+      assert_equal expected_output, English::Metaphone.metaphone(input, true)
+    end
+  end
+
+  def test_junk
+    assert_equal English::Metaphone.metaphone('foobar'),
+      English::Metaphone.metaphone('%^@#$^f%^&o%^o@b#a@#r%^^&')
+    assert_equal English::Metaphone.metaphone('foobar', true),
+      English::Metaphone.metaphone('%^@#$^f%^&o%^o@b#a@#r%^^&', true)
+  end
+
+  def test_caps
+    assert_equal English::Metaphone.metaphone('foobar'),
+      English::Metaphone.metaphone('FOOBAR')
+    assert_equal English::Metaphone.metaphone('foobar', true),
+      English::Metaphone.metaphone('FOOBAR', true)
+  end
+
+  def test_string
+    assert_equal 'F BR BS', English::Metaphone.metaphone('foo bar baz')
+    assert_equal 'N WT', English::Metaphone.metaphone('gnu what')
+    assert_equal 'F BR BS', English::Metaphone.metaphone('foo bar baz', true)
+    assert_equal 'N WT', English::Metaphone.metaphone('gnu what', true)
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_porter_stemming.rb

@@ -0,0 +1,22 @@
+require 'english/porter_stemming'
+
+require 'test/unit'
+
+class TC_PorterStemming < Test::Unit::TestCase
+
+  DIR  = File.dirname(__FILE__)
+  DATA_INPUT  = File.read(File.join(DIR,'fixture/porter_stemming_input.txt')).split(/\n/)
+  DATA_OUTPUT = File.read(File.join(DIR,'fixture/porter_stemming_output.txt')).split(/\n/)
+
+  #def slurp(*path)
+  #  File.read(File.join(DIR,*path)).split(/\n/)
+  #end
+
+  def test_cases
+    cases = DATA_INPUT.zip(DATA_OUTPUT)
+    cases.each do |word, expected_output|
+      assert_equal expected_output, English::PorterStemming.stem(word)
+    end
+  end
+
+end

data/vendor/gems/english-0.3.1/test/test_similarity.rb

@@ -0,0 +1,13 @@
+require 'english/similarity'
+require 'test/unit'
+
+class TestSimilarity < Test::Unit::TestCase
+
+  # TODO: Need to test better.
+
+  def test_similarity
+    assert_nothing_raised { "Hello World!".similarity( "helo wrld" ) }
+  end
+
+end
+

data/vendor/gems/english-0.3.1/test/test_soundex.rb

@@ -0,0 +1,25 @@
+require 'english/soundex'
+
+require 'test/unit'
+require 'yaml'
+
+class TC_Soundex < Test::Unit::TestCase
+
+  DIR  = File.dirname(__FILE__)
+  DATA = YAML::load(File.read(File.join(DIR,'fixture/soundex.txt')))
+
+  def test_cases
+    DATA.each do |input, expected_output|
+      assert_equal expected_output, English::Soundex.soundex(input)
+    end
+  end
+
+end
+
+class TC_String_Soundex < Test::Unit::TestCase
+
+  def test_soundex
+    assert_equal("Ruby".soundex, "R100")
+  end
+
+end

data/vendor/gems/soap4r-1.5.8.2/bin/wsdl2ruby.rb

@@ -0,0 +1,137 @@
+#!/usr/bin/env ruby
+
+require 'getoptlong'
+require 'logger'
+require 'wsdl/soap/wsdl2ruby'
+
+
+class WSDL2RubyApp < Logger::Application
+private
+
+  OptSet = [
+    ['--wsdl','-w', GetoptLong::REQUIRED_ARGUMENT],
+    ['--module_path','-m', GetoptLong::REQUIRED_ARGUMENT],
+    ['--type','-t', GetoptLong::REQUIRED_ARGUMENT],
+    ['--classdef','-e', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--mapping_registry','-r', GetoptLong::NO_ARGUMENT],
+    ['--client_skelton','-c', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--servant_skelton','-s', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--cgi_stub','-g', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--servlet_stub','-l', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--standalone_server_stub','-a', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--driver','-d', GetoptLong::OPTIONAL_ARGUMENT],
+    ['--drivername_postfix','-n', GetoptLong::REQUIRED_ARGUMENT],
+    ['--force','-f', GetoptLong::NO_ARGUMENT],
+    ['--quiet','-q', GetoptLong::NO_ARGUMENT],
+  ]
+
+  def initialize
+    super('app')
+    STDERR.sync = true
+    self.level = Logger::FATAL
+  end
+
+  def run
+    @worker = WSDL::SOAP::WSDL2Ruby.new
+    @worker.logger = @log
+    location, opt = parse_opt(GetoptLong.new(*OptSet))
+    usage_exit unless location
+    @worker.location = location
+    if opt['quiet']
+      self.level = Logger::FATAL
+    else
+      self.level = Logger::INFO
+    end
+    @worker.opt.update(opt)
+    @worker.run
+    0
+  end
+
+  def usage_exit
+    puts <<__EOU__
+Usage: #{ $0 } --wsdl wsdl_location [options]
+  wsdl_location: filename or URL
+
+Example:
+  For server side:
+    #{ $0 } --wsdl myapp.wsdl --type server
+  For client side:
+    #{ $0 } --wsdl myapp.wsdl --type client
+
+Options:
+  --wsdl wsdl_location
+  --type server|client
+    --type server implies;
+  	--classdef --mapping_registry --servant_skelton --standalone_server_stub
+    --type client implies;
+     	--classdef --mapping_registry --client_skelton --driver
+  --classdef [filenameprefix]
+  --mapping_registry
+  --client_skelton [servicename]
+  --servant_skelton [porttypename]
+  --cgi_stub [servicename]
+  --servlet_stub [servicename]
+  --standalone_server_stub [servicename]
+  --driver [porttypename]
+  --drivername_postfix driver_classname_postfix
+  --module_path Module::Path::Name
+  --force
+  --quiet
+
+Terminology:
+  Client <-> Driver <-(SOAP)-> Stub <-> Servant
+
+  Driver and Stub: Automatically generated
+  Client and Servant: Skelton generated (you should change)
+__EOU__
+    exit 1
+  end
+
+  def parse_opt(getoptlong)
+    opt = {}
+    wsdl = nil
+    begin
+      getoptlong.each do |name, arg|
+       	case name
+	when "--wsdl"
+	  wsdl = arg
+        when "--module_path"
+          opt['module_path'] = arg
+	when "--type"
+  	  case arg
+  	  when "server"
+  	    opt['classdef'] ||= nil
+  	    opt['mapping_registry'] ||= nil
+  	    opt['servant_skelton'] ||= nil
+  	    opt['standalone_server_stub'] ||= nil
+  	  when "client"
+  	    opt['classdef'] ||= nil
+  	    opt['mapping_registry'] ||= nil
+  	    opt['driver'] ||= nil
+  	    opt['client_skelton'] ||= nil
+  	  else
+  	    raise ArgumentError.new("Unknown type #{ arg }")
+  	  end
+   	when "--classdef", "--mapping_registry",
+            "--client_skelton", "--servant_skelton",
+            "--cgi_stub", "--servlet_stub", "--standalone_server_stub",
+            "--driver"
+  	  opt[name.sub(/^--/, '')] = arg.empty? ? nil : arg
+        when "--drivername_postfix"
+          opt['drivername_postfix'] = arg
+	when "--force"
+	  opt['force'] = true
+        when "--quiet"
+          opt['quiet'] = true
+   	else
+  	  raise ArgumentError.new("Unknown type #{ arg }")
+   	end
+      end
+    rescue
+      usage_exit
+    end
+    return wsdl, opt
+  end
+end
+
+WSDL2RubyApp.new.start