mattmueller-twibot 0.1.7.1

data/test/test_config.rb

@@ -0,0 +1,89 @@
+require File.expand_path(File.join(File.dirname(__FILE__), 'test_helper')) unless defined?(Twibot)
+require 'stringio'
+
+class TestConfig < Test::Unit::TestCase
+  should "default configuration be a hash" do
+    assert_not_nil Twibot::Config::DEFAULT
+    assert Twibot::Config::DEFAULT.is_a?(Hash)
+  end
+
+  should "initialize with no options" do
+    assert_hashes_equal({}, Twibot::Config.new.settings)
+  end
+
+  should "return config from add" do
+    config = Twibot::Config.new
+    assert_equal config, config.add(Twibot::Config.new)
+  end
+
+  should "alias add to <<" do
+    config = Twibot::Config.new
+    assert config.respond_to?(:<<)
+    assert config << Twibot::Config.new
+  end
+
+  should "mirror method_missing as config getters" do
+    config = Twibot::Config.default << Twibot::Config.new
+    assert_equal Twibot::Config::DEFAULT[:min_interval], config.min_interval
+    assert_equal Twibot::Config::DEFAULT[:login], config.login
+  end
+
+  should "mirror missing methods as config setters" do
+    config = Twibot::Config.default << Twibot::Config.new
+    assert_equal Twibot::Config::DEFAULT[:min_interval], config.min_interval
+
+    val = config.min_interval
+    config.min_interval = val + 5
+    assert_not_equal Twibot::Config::DEFAULT[:min_interval], config.min_interval
+    assert_equal val + 5, config.min_interval
+  end
+
+  should "not override default hash" do
+    config = Twibot::Config.default
+    hash = Twibot::Config::DEFAULT
+
+    config.min_interval = 0
+    config.max_interval = 0
+
+    assert_hashes_not_equal Twibot::Config::DEFAULT, config.to_hash
+    assert_hashes_equal hash, Twibot::Config::DEFAULT
+  end
+
+  should "return merged configuration from to_hash" do
+    config = Twibot::Config.new
+    config.min_interval = 10
+    config.max_interval = 10
+
+    config2 = Twibot::Config.new({})
+    config2.min_interval = 1
+    config << config2
+    options = config.to_hash
+
+    assert_equal 10, options[:max_interval]
+    assert_equal 1, options[:min_interval]
+  end
+end
+
+class TestCliConfig < Test::Unit::TestCase
+  should "configure from options" do
+    config = Twibot::CliConfig.new %w{--min-interval 10 --max-interval 15}
+    assert_equal 10, config.min_interval
+    assert_equal 15, config.max_interval
+  end
+end
+
+class TestFileConfig < Test::Unit::TestCase
+  should "subclass config for file config" do
+    assert Twibot::FileConfig.new(StringIO.new).is_a?(Twibot::Config)
+  end
+
+  should "read settings from stream" do
+    config = Twibot::FileConfig.new(StringIO.new <<-YAML)
+min_interval: 10
+max_interval: 20
+    YAML
+
+    assert_equal 10, config.min_interval
+    assert_equal 20, config.max_interval
+  end
+end

data/test/test_handler.rb

@@ -0,0 +1,191 @@
+require File.expand_path(File.join(File.dirname(__FILE__), 'test_helper')) unless defined?(Twibot)
+
+class TestHandler < Test::Unit::TestCase
+  context "pattern writer" do
+    should "abort on empty values" do
+      handler = Twibot::Handler.new
+
+      handler.pattern = nil
+      assert_nil handler.instance_eval { @options[:pattern] }
+      assert_nil handler.instance_eval { @options[:tokens] }
+
+      handler.pattern = ""
+      assert_nil handler.instance_eval { @options[:pattern] }
+      assert_nil handler.instance_eval { @options[:tokens] }
+    end
+
+    should "turn regular pattern into regex" do
+      handler = Twibot::Handler.new
+      handler.pattern = "command"
+
+      assert_equal(/command(\s.+)?/, handler.instance_eval { @options[:pattern] })
+      assert_equal 0, handler.instance_eval { @options[:tokens] }.length
+    end
+
+    should "convert single named switch to regex" do
+      handler = Twibot::Handler.new
+      handler.pattern = ":command"
+
+      assert_equal(/([^\s]+)(\s.+)?/, handler.instance_eval { @options[:pattern] })
+      assert_equal 1, handler.instance_eval { @options[:tokens] }.length
+      assert_equal :command, handler.instance_eval { @options[:tokens].first }
+    end
+
+    should "convert several named switches to regexen" do
+      handler = Twibot::Handler.new
+      handler.pattern = ":command fixed_word :subcommand"
+
+      assert_equal(/([^\s]+) fixed_word ([^\s]+)(\s.+)?/, handler.instance_eval { @options[:pattern] })
+      assert_equal 2, handler.instance_eval { @options[:tokens] }.length
+      assert_equal :command, handler.instance_eval { @options[:tokens].first }
+      assert_equal :subcommand, handler.instance_eval { @options[:tokens][1] }
+    end
+
+    should "convert several named switches to regexen specified by options" do
+      handler = Twibot::Handler.new(":time :hour", :hour => /\d\d/)
+
+      assert_equal(/([^\s]+) ((?-mix:\d\d))(\s.+)?/, handler.instance_eval { @options[:pattern] })
+      assert_equal 2, handler.instance_eval { @options[:tokens] }.length
+      assert_equal :time, handler.instance_eval { @options[:tokens].first }
+      assert_equal :hour, handler.instance_eval { @options[:tokens][1] }
+    end
+  end
+
+  should "recognize empty pattern" do
+    handler = Twibot::Handler.new
+    message = twitter_message "cjno", "A twitter direct message"
+
+    assert handler.recognize?(message)
+  end
+
+  should "recognize empty pattern and allowed user" do
+    handler = Twibot::Handler.new "", :from => "cjno"
+    message = twitter_message "cjno", "A twitter direct message"
+    assert handler.recognize?(message)
+
+    handler = Twibot::Handler.new "", :from => ["cjno", "irbno"]
+    assert handler.recognize?(message)
+  end
+
+  should "not recognize empty pattern and disallowed user" do
+    handler = Twibot::Handler.new "", :from => "irbno"
+    message = twitter_message "cjno", "A twitter direct message"
+    assert !handler.recognize?(message)
+
+    handler = Twibot::Handler.new "", :from => ["irbno", "satan"]
+    assert !handler.recognize?(message)
+  end
+
+  should "recognize fixed pattern and no user" do
+    handler = Twibot::Handler.new "time"
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+
+  should "recognize dynamic pattern and no user" do
+    handler = Twibot::Handler.new "time :city :country"
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+
+  should "not recognize dynamic pattern and no user" do
+    handler = Twibot::Handler.new "time :city :country"
+    message = twitter_message "cjno", "oslo norway what is the time?"
+    assert !handler.recognize?(message)
+  end
+
+  should "recognize fixed pattern and user" do
+    handler = Twibot::Handler.new "time", :from => ["cjno", "irbno"]
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+
+  should "recognize dynamic pattern and user" do
+    handler = Twibot::Handler.new "time :city :country", :from => ["cjno", "irbno"]
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+
+  should "not recognize dynamic pattern and user" do
+    handler = Twibot::Handler.new "time :city :country", :from => ["cjno", "irbno"]
+    message = twitter_message "dude", "time oslo norway"
+    assert !handler.recognize?(message)
+  end
+
+  should "recognize symbol users" do
+    handler = Twibot::Handler.new "time :city :country", :from => [:cjno, :irbno]
+    message = twitter_message "dude", "time oslo norway"
+    assert !handler.recognize?(message)
+
+    message = twitter_message("cjno", "time oslo norway")
+    assert handler.recognize?(message)
+  end
+
+  should "recognize tweets from allowed users" do
+    handler = Twibot::Handler.new :from => [:cjno, :irbno]
+    message = tweet "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+  
+  should "recognize tweets from allowed users with capital screen names" do
+    handler = Twibot::Handler.new :from => [:cjno, :irbno]
+    message = tweet "Cjno", "time oslo norway"
+    assert handler.recognize?(message)
+  end
+
+  should "accept options as only argument" do
+    handler = Twibot::Handler.new :from => :cjno
+    assert_equal(:cjno, handler.instance_eval { @options[:from] })
+    assert_nil handler.instance_eval { @options[:pattern] }
+  end
+
+  should "provide parameters in params hash" do
+    handler = Twibot::Handler.new("time :city :country", :from => ["cjno", "irbno"]) do |message, params|
+      assert_equal "oslo", params[:city]
+      assert_equal "norway", params[:country]
+    end
+
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+    handler.dispatch(message)
+  end
+
+  should "call constructor block from handle" do
+    handler = Twibot::Handler.new("time :city :country", :from => ["cjno", "irbno"]) do |message, params|
+      raise "Boom!"
+    end
+
+    assert_raise(RuntimeError) do
+      handler.handle(nil, nil)
+    end
+  end
+
+  should "recognize regular expressions" do
+    handler = Twibot::Handler.new /(?:what|where) is (.*)/i
+    message = twitter_message "dude", "Where is this shit?"
+    assert handler.recognize?(message)
+
+    message = twitter_message "dude", "How is this shit?"
+    assert !handler.recognize?(message)
+  end
+
+  should "recognize regular expressions from specific users" do
+    handler = Twibot::Handler.new /(?:what|where) is (.*)/i, :from => "cjno"
+    message = twitter_message "dude", "Where is this shit?"
+    assert !handler.recognize?(message)
+
+    message = twitter_message "cjno", "Where is this shit?"
+    assert handler.recognize?(message)
+  end
+
+  should "provide parameters as arrays when matching regular expressions" do
+    handler = Twibot::Handler.new(/time ([^\s]*) ([^\s]*)/) do |message, params|
+      assert_equal "oslo", params[0]
+      assert_equal "norway", params[1]
+    end
+
+    message = twitter_message "cjno", "time oslo norway"
+    assert handler.recognize?(message)
+    handler.dispatch(message)
+  end
+end

data/test/test_hash.rb

@@ -0,0 +1,34 @@
+require File.expand_path(File.join(File.dirname(__FILE__), 'test_helper')) unless defined?(Twibot)
+
+class TestHash < Test::Unit::TestCase
+  should "convert string keys to symbols" do
+    hash = { "one" => 1, "two" => 2 }
+    hash.symbolize_keys!
+
+    assert_equal 1, hash[:one]
+    assert_equal 2, hash[:two]
+    assert_nil hash["one"]
+    assert_nil hash["two"]
+  end
+
+  should "convert string keys and preserve symbol keys" do
+    hash = { "one" => 1, :two => 2 }
+    hash.symbolize_keys!
+
+    assert_equal 1, hash[:one]
+    assert_equal 2, hash[:two]
+    assert_nil hash["one"]
+    assert_nil hash["two"]
+  end
+
+  should "convert hashes recursively" do
+    hash = { "one" => 1, :two => { "three" => 3, "four" => 4 } }
+    hash.symbolize_keys!
+
+    assert_equal 1, hash[:one]
+    assert_equal 3, hash[:two][:three]
+    assert_equal 4, hash[:two][:four]
+    assert_nil hash["one"]
+    assert_nil hash["two"]
+  end
+end

data/test/test_helper.rb

@@ -0,0 +1,44 @@
+require 'rubygems'
+require 'test/unit'
+require 'shoulda'
+require 'mocha'
+require File.join(File.dirname(__FILE__), '..', 'lib', 'twibot')
+
+module Test::Unit::Assertions
+  def assert_hashes_equal(expected, actual, message = nil)
+    full_message = build_message(message, <<EOT, expected.inspect, actual.inspect)
+<?> expected but was
+<?>.
+EOT
+    assert_block(full_message) do
+      break false if expected.keys.length != actual.keys.length
+      expected.keys.all? { |k| expected[k] == actual[k] }
+    end
+  end
+
+  def assert_hashes_not_equal(expected, actual, message = nil)
+    full_message = build_message(message, <<EOT, expected.inspect, actual.inspect)
+<?> expected but was
+<?>.
+EOT
+    assert_block(full_message) do
+      break false if expected.keys.length != actual.keys.length
+      expected.keys.any? { |k| expected[k] != actual[k] }
+    end
+  end
+end
+
+def twitter_message(from, text)
+  Twitter::Message.new(:id => 1,
+                       :sender => Twitter::User.new(:screen_name => from),
+                       :text => text,
+                       :recipient => "twibot",
+                       :created_at => Time.now)
+end
+
+def tweet(from, text)
+  Twitter::Status.new(:id => 1,
+                      :text => text,
+                      :user => Twitter::User.new(:screen_name => from),
+                      :created_at => Time.now)
+end

data/test/test_twibot.rb

@@ -0,0 +1 @@
+require File.expand_path(File.join(File.dirname(__FILE__), 'test_helper')) unless defined?(Twibot)

data/twibot.gemspec

@@ -0,0 +1,38 @@
+# -*- encoding: utf-8 -*-
+
+Gem::Specification.new do |s|
+  s.name = %q{twibot}
+  s.version = "0.1.7.1"
+
+  s.required_rubygems_version = Gem::Requirement.new(">= 0") if s.respond_to? :required_rubygems_version=
+  s.authors = ["Christian Johansen"]
+  s.date = %q{2009-04-13}
+  s.description = %q{Twibot (pronounced like "Abbot"), is a Ruby microframework for creating Twitter bots, heavily inspired by Sinatra.}
+  s.email = %q{christian@cjohansen.no}
+  s.extra_rdoc_files = ["History.txt", "Readme.rdoc"]
+  s.files = ["History.txt", "Rakefile", "Readme.rdoc", "lib/hash.rb", "lib/twibot.rb", "lib/twibot/bot.rb", "lib/twibot/config.rb", "lib/twibot/handlers.rb", "lib/twibot/macros.rb", "lib/twibot/tweets.rb", "test/test_bot.rb", "test/test_config.rb", "test/test_handler.rb", "test/test_hash.rb", "test/test_helper.rb", "test/test_twibot.rb", "twibot.gemspec"]
+  s.has_rdoc = true
+  s.homepage = %q{http://github.com/mattmueller/twibot/}
+  s.rdoc_options = ["--main", "Readme.rdoc"]
+  s.require_paths = ["lib"]
+  s.rubyforge_project = %q{twibot}
+  s.rubygems_version = %q{1.3.1}
+  s.summary = %q{Twibot (pronounced like "Abbot"), is a Ruby microframework for creating Twitter bots, heavily inspired by Sinatra}
+  s.test_files = ["test/test_helper.rb", "test/test_config.rb", "test/test_hash.rb", "test/test_twibot.rb", "test/test_bot.rb", "test/test_handler.rb"]
+
+  if s.respond_to? :specification_version then
+    current_version = Gem::Specification::CURRENT_SPECIFICATION_VERSION
+    s.specification_version = 2
+
+    if Gem::Version.new(Gem::RubyGemsVersion) >= Gem::Version.new('1.2.0') then
+      s.add_runtime_dependency(%q<twitter4r>, [">= 0.3.1"])
+      s.add_development_dependency(%q<bones>, [">= 2.4.0"])
+    else
+      s.add_dependency(%q<twitter4r>, [">= 0.3.1"])
+      s.add_dependency(%q<bones>, [">= 2.4.0"])
+    end
+  else
+    s.add_dependency(%q<twitter4r>, [">= 0.3.1"])
+    s.add_dependency(%q<bones>, [">= 2.4.0"])
+  end
+end

metadata

@@ -0,0 +1,96 @@
+--- !ruby/object:Gem::Specification 
+name: mattmueller-twibot
+version: !ruby/object:Gem::Version 
+  version: 0.1.7.1
+platform: ruby
+authors: 
+- Christian Johansen
+autorequire: 
+bindir: bin
+cert_chain: []
+
+date: 2009-04-13 00:00:00 -07:00
+default_executable: 
+dependencies: 
+- !ruby/object:Gem::Dependency 
+  name: twitter4r
+  type: :runtime
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 0.3.1
+    version: 
+- !ruby/object:Gem::Dependency 
+  name: bones
+  type: :development
+  version_requirement: 
+  version_requirements: !ruby/object:Gem::Requirement 
+    requirements: 
+    - - ">="
+      - !ruby/object:Gem::Version 
+        version: 2.4.0
+    version: 
+description: Twibot (pronounced like "Abbot"), is a Ruby microframework for creating Twitter bots, heavily inspired by Sinatra.
+email: christian@cjohansen.no
+executables: []
+
+extensions: []
+
+extra_rdoc_files: 
+- History.txt
+- Readme.rdoc
+files: 
+- History.txt
+- Rakefile
+- Readme.rdoc
+- lib/hash.rb
+- lib/twibot.rb
+- lib/twibot/bot.rb
+- lib/twibot/config.rb
+- lib/twibot/handlers.rb
+- lib/twibot/macros.rb
+- lib/twibot/tweets.rb
+- test/test_bot.rb
+- test/test_config.rb
+- test/test_handler.rb
+- test/test_hash.rb
+- test/test_helper.rb
+- test/test_twibot.rb
+- twibot.gemspec
+has_rdoc: true
+homepage: http://github.com/mattmueller/twibot/
+licenses: 
+post_install_message: 
+rdoc_options: 
+- --main
+- Readme.rdoc
+require_paths: 
+- lib
+required_ruby_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements: 
+  - - ">="
+    - !ruby/object:Gem::Version 
+      version: "0"
+  version: 
+requirements: []
+
+rubyforge_project: twibot
+rubygems_version: 1.3.5
+signing_key: 
+specification_version: 2
+summary: Twibot (pronounced like "Abbot"), is a Ruby microframework for creating Twitter bots, heavily inspired by Sinatra
+test_files: 
+- test/test_helper.rb
+- test/test_config.rb
+- test/test_hash.rb
+- test/test_twibot.rb
+- test/test_bot.rb
+- test/test_handler.rb