daneel 0.0.1 → 0.1

data/.gitignore

@@ -1,18 +1,12 @@
-*.gem
-*.rbc
-.bundle/
-.config/
-.yardoc/
-_yardoc/
-Gemfile.lock
-InstalledFiles
-coverage/
-doc/
-lib/bundler/man/
-pkg/
-rdoc/
-spec/reports/
-test/tmp/
-test/version_tmp/
-tmp/
-vendor/bundle/
+/*.gem
+/.bundle/
+/.env
+/.yardoc/
+/coverage/
+/doc/
+/exec/
+/Gemfile.lock
+/pkg/
+/rdoc/
+/tmp/
+/vendor/bundle/

data/Gemfile

@@ -2,3 +2,11 @@ source 'http://rubygems.org'
 
 # Specify your gem's dependencies in daneel.gemspec
 gemspec
+
+# Override gem dependencies that aren't released yet
+gem 'sinatra', :github => 'sinatra'
+gem 'sparks', :github => 'indirect/sparks', :branch => 'master'
+
+group :development do
+  gem 'pry-debugger'
+end

data/Procfile

@@ -0,0 +1 @@
+web: ruby -Ku -rbundler/setup -Ilib -S ./bin/daneel -v -s -a campfire -n "wes" -f "Wesabot"

data/bin/daneel

@@ -0,0 +1,18 @@
+require 'daneel'
+
+trap(:INT) do
+  puts "Quitting...\n"
+  exit 0
+end
+
+options = Daneel::Options.parse(ARGV)
+options[:logger] = Daneel::Logger.new(STDOUT, options[:verbose])
+
+if options.has_key?(:server)
+  require 'daneel/server'
+  sopts = options.delete(:server)
+  sopts[:logger] = options[:logger]
+  Daneel::Server.new(sopts).run
+end
+
+Daneel::Bot.new(options).run

data/daneel.gemspec

@@ -1,20 +1,27 @@
-# -*- encoding: utf-8 -*-
-require File.expand_path('../lib/daneel/version', __FILE__)
+# encoding: UTF-8
+lib = File.expand_path('../lib', __FILE__)
+$LOAD_PATH.unshift(lib) unless $LOAD_PATH.include?(lib)
+require 'daneel/version'
 
 Gem::Specification.new do |gem|
-  gem.authors       = ["Andre Arko"]
+  gem.name          = "daneel"
+  gem.version       = Daneel::VERSION
+  gem.summary       = %q{A 19,230-year-old robot}
+  gem.description   = %q{Daneel is a chatbot inspired by the late, lamented Wesabot. And also Hubot.}
+  gem.authors       = ["André Arko"]
   gem.email         = ["andre@arko.net"]
-  gem.description   = %q{A 19,230-year-old Campfire bot}
-  gem.summary       = %q{A library and rack app to bot up your Campfire rooms}
   gem.homepage      = "http://github.com/indirect/daneel"
+  gem.license       = "MIT"
 
-  gem.executables   = `git ls-files -- bin/*`.split("\n").map{ |f| File.basename(f) }
-  gem.files         = `git ls-files`.split("\n")
-  gem.test_files    = `git ls-files -- {test,spec,features}/*`.split("\n")
-  gem.name          = "daneel"
+  gem.files         = `git ls-files`.split($/)
+  gem.executables   = gem.files.grep(%r{^bin/}) { |f| File.basename(f) }
+  gem.test_files    = gem.files.grep(%r{^(test|spec|features)/})
   gem.require_paths = ["lib"]
-  gem.version       = Daneel::VERSION
 
-  gem.add_dependency "firering", "~> 1.2.0"
-  gem.add_dependency "activerecord", "~> 3.1.0"
+  gem.add_dependency "sparks", "~> 0.4"
+  gem.add_dependency "sinatra", "~> 1.4.0"
+  gem.add_dependency "puma", "~> 1.6.3"
+
+  gem.add_development_dependency "rake", "~> 10.0"
+  gem.add_development_dependency "bundler", "~> 1.2"
 end

data/lib/daneel.rb

@@ -1,5 +1,7 @@
-require "daneel/version"
+require 'daneel/bot'
+require 'daneel/logger'
+require 'daneel/options'
+require 'daneel/version'
 
 module Daneel
-  # Your code goes here...
 end

data/lib/daneel/adapter.rb

@@ -0,0 +1,37 @@
+require 'daneel/message'
+require 'daneel/plugin'
+require 'daneel/room'
+require 'daneel/user'
+
+module Daneel
+  class Adapter < Plugin
+
+    def run
+      # listen to rooms and dispatch messages to robot.receive
+    end
+
+    def say(room_id, message)
+      # get the message into the room!
+    end
+
+    def announce(message)
+      # say the message into every room the bot is in
+    end
+
+    def me
+      @me ||= User.new(0, "R. Daneel Olivaw").tap do |me|
+        me.short_name = "Daneel"
+        me.initials = "DO"
+      end
+    end
+
+    class << self
+      def named(name)
+        require File.join('daneel/adapters', name.downcase)
+        adapter = Daneel::Adapters.const_get(name.capitalize)
+        adapter || raise("Couldn't find Daneel::Adapters::#{a.capitalize}")
+      end
+    end
+
+  end
+end

data/lib/daneel/adapters/campfire.rb

@@ -0,0 +1,93 @@
+require 'sparks'
+require 'daneel/adapter'
+
+module Daneel
+  class Adapters
+    class Campfire < Daneel::Adapter
+      requires_env %w(CAMPFIRE_SUBDOMAIN CAMPFIRE_API_TOKEN CAMPFIRE_ROOM_IDS)
+
+      def initialize(robot)
+        super
+        domain = ENV['CAMPFIRE_SUBDOMAIN']
+        token  = ENV['CAMPFIRE_API_TOKEN']
+        @fire  = Sparks.new(domain, token, :logger => logger)
+
+        ENV['CAMPFIRE_ROOM_IDS'].split(",").map(&:to_i).map do |id|
+          # Get info about the room state
+          room = Room.new(id, self, @fire.room(id))
+          robot.data.rooms[id] = room
+          # Save the user info for all the users in the room
+          room.data["users"].each do |data|
+            user = User.new(data["id"], data["name"], data)
+            robot.data.users[user.id] = user
+          end
+        end
+      end
+
+      def run
+        @threads ||= []
+        robot.data.rooms.each do |id, room|
+          t = Thread.new { watch_room(room) } until t
+          t.abort_on_exception = true
+          @threads << t
+        end
+        @threads.each{|t| t.join }
+      end
+
+      def say(id, *texts)
+        texts.each do |text|
+          text =~ /\n/ ? @fire.paste(id, text) : @fire.speak(id, text)
+        end
+      end
+
+      def announce(*texts)
+        robot.data.rooms.each do |id, room|
+          say id, *texts
+        end
+      end
+
+      def leave
+        # stop the listening threads
+        @threads.each{|t| t.kill }
+        # leave each room
+        robot.data.rooms.each{|r| @fire.room(r.id).leave }
+      end
+
+      def me
+        @me ||= begin
+          data = @fire.me
+          me = User.new(data["id"], data["name"], data)
+          robot.data.users[me.id] = me
+        end
+      end
+
+    private
+
+      def find_user(id)
+        robot.data.users[id] ||= begin
+          data = @fire.user(id)
+          User.new(data["id"], data["name"], data)
+        end
+      end
+
+      def watch_room(room)
+        @fire.watch(room.id) do |data|
+          next if data["type"] == "TimestampMessage"
+
+          # TODO pass through self-messages, once they are filtered by
+          # the accept? method on scripts
+          next if data["user_id"] == me.id
+
+          text = data["body"]
+          time = Time.parse(data["created_at"]) rescue Time.now
+          type = data["type"].gsub(/Message$/, '').downcase
+          mesg = Message.new(text, time, type)
+          room = robot.data.rooms[data["room_id"]]
+          user = find_user(data["user_id"])
+          robot.receive room, mesg, user
+        end
+      end
+
+    end
+  end
+end

data/lib/daneel/adapters/shell.rb

@@ -0,0 +1,36 @@
+require 'daneel/adapter'
+require 'readline'
+
+module Daneel
+  class Adapters
+    class Shell < Daneel::Adapter
+
+      def initialize(robot)
+        super
+        @room = Room.new("shell", self)
+        @user = User.new(1, ENV['USER'])
+      end
+
+      def run
+        # End the line we were on when we exit
+        trap(:EXIT){ print "\n" }
+
+        while text = Readline.readline("> ", true)
+          next if text.empty?
+          message = Message.new(text, Time.now, "text")
+          robot.receive @room, message, @user
+        end
+      end
+
+      def say(id, *strings)
+        puts *strings
+      end
+
+      def announce(*strings)
+        puts
+        say @room.id, *strings
+      end
+
+    end
+  end
+end

data/lib/daneel/bot.rb

@@ -0,0 +1,89 @@
+require 'daneel/adapter'
+require 'daneel/script'
+require 'daneel/data'
+
+module Daneel
+  class Bot
+    attr_reader :adapter, :data, :full_name, :logger, :name, :scripts
+    attr_accessor :debug_mode
+
+    def initialize(options = {})
+      @logger = options[:logger] || Daneel::Logger.new
+      @name = options[:name] || "daneel"
+      @full_name = options[:full_name] || options[:name] || "R. Daneel Olivaw"
+      @debug_mode = options[:verbose] && options[:adapter] && options[:adapter] != "shell"
+
+      @data = Data.new
+      logger.debug "Data source #{data.class}"
+
+      Script.files.each{|file| try_require file }
+      # TODO add script priorities to replicate this
+      list = Script.list
+      list.push list.delete(Scripts::ImageSearch)
+      list.push list.delete(Scripts::Chatty)
+      @scripts = list.map{|s| s.new(self) }
+      logger.debug "Booted with scripts: #{@scripts.map(&:class).inspect}"
+
+      @adapter = Adapter.named(options[:adapter] || "shell").new(self)
+      logger.debug "Using the #{adapter.class} adapter"
+    end
+
+    def receive(room, message, user)
+      logger.debug "[room #{room.id}] #{user.name}: #{message.text}"
+      message.command = command_from(message.text)
+
+      scripts.each do |script|
+        next unless script.accepts?(room, message, user)
+        script.receive(room, message, user)
+        break if message.done
+      end
+      message
+    rescue => e
+      msg = %|#{e.class}: #{e.message}\n  #{e.backtrace.join("\n  ")}|
+      logger.error msg
+      adapter.announce "crap, something went wrong. :(", msg if @debug_mode
+    end
+
+    def run
+      # TODO add i18n so that people can customize their bot's attitude
+      # http://titusd.co.uk/2010/03/04/i18n-internationalization-without-rails/
+      # TODO add Confabulator processing so the bot can be chatty without being static
+
+      # Heroku cycles every process at least once per day by sending it a TERM
+      trap(:TERM) do
+        @adapter.announce "asked to stop, brb"
+        exit
+      end
+
+      @adapter.announce "hey guys"
+      @adapter.run
+    rescue Interrupt
+      adapter.leave
+    end
+
+    def user
+      @adapter.me
+    end
+
+    def inspect
+      %|#<#{self.class}:#{object_id} @name="#{name}" @adapter=#{adapter.class}>|
+    end
+
+  private
+
+    def command_from(text)
+      return if text.nil? || text.empty?
+      m = text.match(/^@#{name}\s+(.*)/i)
+      m ||= text.match(/^#{name}(?:[,:]\s*|\s+)(.*)/i)
+      m ||= text.match(/^\s*(.*?)(?:,\s*)?\b#{name}[.!?\s]*$/i)
+      m && m[1]
+    end
+
+    def try_require(name)
+      require name
+    rescue Script::DepError => e
+      logger.warn "Couldn't load #{File.basename(name)}: #{e.message}"
+    end
+
+  end
+end

data/lib/daneel/data.rb

@@ -0,0 +1,30 @@
+module Daneel
+  # Non-persistent storage, extend if you want more.
+  class Data
+
+    def initialize
+      @store = {}
+    end
+
+    def save
+      # it's a hash, what do you want?
+    end
+
+    def [](key)
+      @store[key]
+    end
+
+    def []=(key, value)
+      @store[key] = value
+    end
+
+    def users
+      @store["users"] ||= {}
+    end
+
+    def rooms
+      @store["rooms"] ||= {}
+    end
+
+  end
+end

data/lib/daneel/logger.rb

@@ -0,0 +1,19 @@
+require 'logger'
+
+module Daneel
+  class Logger < ::Logger
+
+    def initialize(io = $stdout, verbose = false)
+      super
+      self.level = Logger::INFO unless verbose
+      self.formatter = proc do |severity, datetime, progname, msg|
+        "#{severity} #{msg}\n"
+      end
+    end
+
+    def inspect
+      %|#<#{self.class}:#{object_id} @level=#{level}>|
+    end
+
+  end
+end

data/lib/daneel/message.rb

@@ -0,0 +1,28 @@
+require 'shellwords'
+
+module Daneel
+  class Message
+    attr_reader :command, :done, :room, :text, :time, :type
+    attr_accessor :args
+
+    def initialize(text, time = Time.now, type = :text)
+      @text, @time, @type = text, time, type
+    end
+
+    def command=(text)
+      @command = text
+      @args = text ? Shellwords.split(text) : nil
+    rescue ArgumentError # shellwords didn't like this
+      @args = nil
+    end
+
+    def done!
+      @done = true
+    end
+
+    def inspect
+      "#<#{self.class} #{text.inspect} #{time.inspect} #{type.inspect}>"
+    end
+
+  end
+end

data/lib/daneel/options.rb

@@ -0,0 +1,37 @@
+require 'optparse'
+
+module Daneel
+  module Options
+
+    def self.parse(args)
+      options = {}
+
+      OptionParser.new do |opts|
+        opts.banner = "Usage: daneel [options]"
+
+        opts.on("-v", "--verbose", "Print debugging information") do |v|
+          options[:verbose] = v
+        end
+
+        opts.on("-s", "--server [PORT]", "Run the HTTP server on PORT (default 3333)") do |port|
+          options[:server] = {:port => port}
+        end
+
+        opts.on("-a", "--adapter ADAPTER", "Which interaction adapter to use") do |name|
+          options[:adapter] = name
+        end
+
+        opts.on("-n", "--name NAME", "The name your bot should respond to") do |name|
+          options[:name] = name
+        end
+
+        opts.on("-f", "--full-name FULLNAME", "The name your bot will use to refer to itself") do |name|
+          options[:full_name] = name
+        end
+      end.parse(args)
+
+      return options
+    end
+
+  end
+end

data/lib/daneel/plugin.rb

@@ -0,0 +1,21 @@
+module Daneel
+  class Plugin
+    attr_reader :robot
+
+    def initialize(robot)
+      @robot = robot
+    end
+
+    def logger
+      robot.logger
+    end
+
+    class DepError < LoadError; end
+
+    def self.requires_env(*keys)
+      missing = keys.flatten.select{|k| ENV[k].nil? || ENV[k].empty? }
+      raise DepError, "#{missing.join(',')} must be set" if missing.any?
+    end
+
+  end
+end

data/lib/daneel/room.rb

@@ -0,0 +1,19 @@
+module Daneel
+  class Room
+    attr_reader :id
+    attr_accessor :data
+
+    def initialize(id, adapter, data = nil)
+      @id, @adapter, @data = id, adapter, data
+    end
+
+    def say(*strings)
+      @adapter.say @id, *strings
+    end
+
+    def inspect
+      %|#<#{self.class} @id=#{@id.inspect} @adapter=#{@adapter.class}>|
+    end
+
+  end
+end

data/lib/daneel/script.rb

@@ -0,0 +1,39 @@
+require 'daneel/plugin'
+
+module Daneel
+  class Script < Plugin
+
+    def accepts?(room, message, user)
+      true unless user.id == robot.user.id
+    end
+
+    def receive(room, message, user)
+      # do stuff here!
+    end
+
+    def help
+      # return a hash of commands and descriptions for help listings
+      {}
+    end
+
+    # Track scripts that have loaded so we can use them
+    class << self
+
+      def list
+        @list ||= []
+      end
+
+      def inherited(subclass)
+        list << subclass
+      end
+
+      def files
+        Dir[File.expand_path("../scripts/*.rb", __FILE__)]
+      end
+
+      # TODO accept method for script classes
+      # should handle options like :text, :enter, :leave, :topic, :all
+    end
+
+  end
+end

data/lib/daneel/scripts/chatty.rb

@@ -0,0 +1,106 @@
+require 'daneel/script'
+
+module Daneel
+  module Scripts
+    class Chatty < Daneel::Script
+      # TODO make this script the last-priority script
+      # priority 20
+
+      def receive(room, message, user)
+        # Said to the room in general
+        case message.text
+        when /^(night|good ?night)(,?\s(all|every(body|one)))$/i
+          room.say "goodnight, #{user}"
+        when /^(morning|good ?morning)(,?\s(all|every(body|one)))$/i
+          room.say "good morning, #{user}"
+        end
+
+        # Said directly to the bot
+        case message.command
+        when nil
+          # don't reply to things not addressed to the bot
+        when /^\s*$/
+          # question questioners, exclaim at exclaimers, dot dotters
+          message.text.match(/([?!.])$/)
+          room.say "#{user}#{$1}"
+        when /^(hey|hi|hello|sup|howdy)/i
+          room.say "#{$1} #{user}"
+        when /how are (you|things)|how\'s it (going|hanging)/i
+          room.say [
+            "Oh, you know, the usual.",
+            "can't complain",
+            "alright, how about you?",
+            "people say things, I say things back"
+          ].sample
+        when /(^later|(?:good\s*)?bye)/i
+          room.say("#{$1} #{user}")
+        when /you rock|awesome|cool|nice/i
+          room.say [
+            "Thanks, #{user}, you're pretty cool yourself.",
+            "I try.",
+            "Aw, shucks. Thanks, #{user}."
+          ].sample
+        when /(^|you|still)\s*there/i, /\byt\b/i
+          room.say %w{Yup y}.sample
+        when /wake up|you awake/i
+          room.say("yo")
+        when /thanks|thank you/i
+          room.say ["No problem.", "np", "any time", "that's what I'm here for", "You're welcome."].sample
+        when /^(good\s?night|(?:g')?night)$/i
+          room.say [
+            "see you later, #{user}",
+            "later, #{user}",
+            "night",
+            "goodnight",
+            "bye",
+            "have a good night"
+          ].sample
+        when /^(see you(?: later)?)$/i
+          room.say [
+            "see you later, #{user}",
+            "later, #{user}",
+            "bye",
+            "later",
+            "see ya",
+          ].sample
+        when /^(?:(?:get|grab|fetch|bring) (.*?)|i need|time for)(?: (?:a|some))? coffee$/i
+          person = $1
+          if person =~ /i|me|us/
+            person, do_they = "you", "do you"
+          else
+            do_they = "does #{person}"
+          end
+
+          room.say [
+            "would #{person} like cream or sugar?",
+            "how #{do_they} take it?",
+            "coming right up",
+            "It is by caffeine alone I set my mind in motion",
+            "It is by the beans of Java that thoughts acquire speed",
+            "The hands acquire shakes, the shakes become a warning",
+            "It is by caffeine alone I set my mind in motion"
+          ].sample
+        else
+          room.say [
+            "I have no idea what you're talking about, #{user}.",
+            "eh?",
+            "oh, interesting",
+            "say more, #{user}",
+            "#{user}, you do realize that you're talking to a bot with a very limited vocabulary, don't you?",
+            "Whatever, #{user}.",
+            # TODO implement Bot#other_person
+            # "#{bot.other_person(user)}, tell #{user} to leave me alone.",
+            "Not now, #{user}.",
+            "brb crying",
+            "what do you think, #{user}?",
+            "That's really something.",
+            "but what can I do? I'm just a lowly bot",
+            "I'll get some electrons on that right away",
+            "How do you feel when someone says '#{message.command}' to you, #{user}?"
+          ].sample
+        end
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/echo.rb

@@ -0,0 +1,21 @@
+require 'daneel/script'
+
+module Daneel
+  module Scripts
+    class Echo < Daneel::Script
+
+      def receive(room, message, user)
+        case message.command
+        when /^(?:echo|say)\s(.+)/
+          room.say $1
+          message.done!
+        end
+      end
+
+      def help
+        {"echo TEXT" => "are you copying me? stop copying me!"}
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/help.rb

@@ -0,0 +1,35 @@
+require 'daneel/script'
+
+module Daneel
+  module Scripts
+    class Help < Daneel::Script
+
+      def receive(room, message, user)
+        case message.command
+        when /help$/
+          col = helps.keys.map(&:length).max + 2
+          room.say helps.map{|k,v| "%-#{col}s %s" % [k,v] }.sort.join("\n")
+          message.done!
+        end
+      end
+
+      def help
+        {"help" => "show this help summary"}
+      end
+
+    private
+
+      def helps
+        @helps ||= begin
+          helps = {}
+          robot.scripts.each do |script|
+            helps.merge!(script.help)
+          end
+          logger.debug "Found helps: #{helps.inspect}"
+          helps
+        end
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/image_search.rb

@@ -0,0 +1,50 @@
+require 'cgi'
+require 'net/http/persistent'
+
+module Daneel
+  # You need an Azure Marketplace Bing Search API key. You can sign up for one here:
+  # https://datamarket.azure.com/dataset/bing/search
+  # A free subscription allows 5,000 searches per month.
+  module Scripts
+    class ImageSearch < Daneel::Script
+      requires_env "AZURE_API_KEY"
+
+      def initialize(robot)
+        super
+        @token = ENV['AZURE_API_KEY']
+        @http = Net::HTTP::Persistent.new('daneel')
+      end
+
+      def receive(room, message, user)
+        case message.command
+        when /image me (.*?)/, /^(?:find) (?:me )?(?:a |another )?(?:picture of )?(.*)$/
+          room.say find_image_url_for($1)
+          message.done!
+        end
+      end
+
+      def help
+        {"find a THING" => "scours the internets for a picture of THING to show you"}
+      end
+
+      def find_image_url_for(search)
+        logger.debug "Searching for images of #{search}"
+        query = CGI.escape("'#{search.gsub(/'/, "\\\\'")}'")
+        uri = URI("https://api.datamarket.azure.com/Bing/Search/v1/Composite")
+        uri.query = "Sources=%27image%27&Adult=%27Moderate%27&$format=JSON&Query=#{query}"
+        request = Net::HTTP::Get.new(uri.request_uri)
+        request.basic_auth 'x', @token
+        response = @http.request uri, request
+        logger.debug "GET #{uri}"
+        results = JSON.parse(response.body)["d"]["results"].first["Image"]
+        logger.debug "got back #{results.size} images"
+        # Random image from the first 50 results
+        results.sample["MediaUrl"]
+      rescue => e
+        logger.error "#{e.class}: #{e.message}"
+        room.say "Sorry, something went wrong when I looked for '#{query}'"
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/meme.rb

@@ -0,0 +1,51 @@
+require 'daneel/script'
+
+module Daneel
+  module Scripts
+    class Meme < Daneel::Script
+
+      def receive(room, message, user)
+        case message.text
+        when /^[\:\*\(e]?facepalm[\:\*\)]?|EFACEPALM|:fp|m\($/i
+          room.say [
+            # picard facepalm
+            "https://img.skitch.com/20110224-875h7w1654tgdhgrxm9bikhkwq.jpg",
+            # polar bear facepalm
+            "https://img.skitch.com/20110224-bsd2ds251eit8d3t1y2mkjtfx8.jpg"
+          ].sample
+        when /^[\:\*\(e]?double ?facepalm[\:\*\)]?|:fpfp|m\( m\($/i
+          # picard + riker facepalm
+          room.say "https://img.skitch.com/20110224-ncacgpudhfr2s4te6nswenxaqt.jpg"
+        when /^i see your problem/i
+          # pony mechanic
+          room.say "https://img.skitch.com/20110224-8fmfwdmg6kkrcpijhamhqu7tm6.jpg"
+        when /^works on my machine|womm$/i
+          # works on my machine
+          room.say "https://img.skitch.com/20110224-jrcf6e4gc936a2mxc3mueah2in.png"
+        when /^stacktrace or gtfo|stacktrace or it didn't happen|stacktrace\!$/i
+          # stacktrace or gtfo
+          room.say "https://img.skitch.com/20110224-pqtmiici9wp9nygqi4nw8gs6hg.png"
+        when /^this is sparta\!*$/i
+          # this is sparta
+          room.say "https://img.skitch.com/20110225-k9xpadr2hk37pe5ed4crcqria1.png"
+        when /^i have no idea what i'm doing$/i
+          # I have no idea what I'm doing
+          room.say "https://img.skitch.com/20110304-1tcmatkhapiq6t51wqqq9igat5.jpg"
+        when /^party[?!.]*$/i
+          # party party party party party cat
+          room.say "https://img.skitch.com/20110309-qtd33sy8k5yrdaeqa9e119bwd1.jpg"
+        when /^bomb|system error$/i
+          # sorry, a system error has occurred
+          room.say "https://img.skitch.com/20110312-8g31a37spacdjgatr82g3g98j1.jpg"
+        when /^stop hitting yourself$/i
+          # and the angel said to him, Stop hitting yourself!
+          room.say "https://img.skitch.com/20110316-q7h49p69pjhhyy8756rha2a1jf.jpg"
+        when /^[:*(]php[:*)]$/
+          # PHP: training wheels without the bike
+          room.say "http://tnx.nl/php.jpg"
+        end
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/reload.rb

@@ -0,0 +1,51 @@
+require 'daneel/script'
+require 'pathname'
+
+module Daneel
+  module Scripts
+    class Reload < Daneel::Script
+
+      def receive(room, message, user)
+        case message.command
+        when /^update$/
+          return unless in_git?
+          system("cd #{root} && git pull origin master && bundle install")
+          room.say "updated, brb"
+          restart
+        when /^reload$/
+          room.say "k, brb"
+          restart
+        end
+      end
+
+      def help
+        reload = {"reload" => "restarts and reloads #{robot.name}'s code"}
+        update = {"update" => "updates #{robot.name}'s code from git and restarts"}
+        in_git? ? reload.merge(update) : reload
+      end
+
+    private
+
+      def restart
+        bin = root.join("bin/daneel").realpath.to_s
+        cmd = [Gem.ruby, "-S", bin, *ARGV]
+
+        logger.debug "Reloading: #{cmd.join(' ')}"
+        exec *cmd
+      end
+
+      def root
+        @root ||= begin
+          root = Pathname.new(__FILE__).join("../../../..").expand_path
+          logger.debug "Found root directory #{root}"
+          root
+        end
+      end
+
+      def in_git?
+        @in_git ||= root.join(".git").directory?
+      end
+
+    end
+  end
+end

data/lib/daneel/scripts/vine_search.rb

@@ -0,0 +1,51 @@
+require 'cgi'
+require 'json'
+require 'net/http/persistent'
+
+module Daneel
+  module Scripts
+    class VineSearch < Daneel::Script
+
+      def initialize(robot)
+        super
+        @http = Net::HTTP::Persistent.new('daneel')
+      end
+
+      def receive(room, message, user)
+        case message.command
+        when /vine me (.+)$/, /^(?:find) (?:me )?(?:a |another )?(?:vine of )(.*)$/
+          url = find_vine_url_for($1)
+          if url
+            room.say url
+          else
+            room.say "Sorry, Twitter didn't have any Vines about that."
+          end
+          message.done!
+        end
+      end
+
+      def help
+        {"find a vine of THING" => "shows you a vine that was tweeted mentioning THING"}
+      end
+
+      def find_vine_url_for(search)
+        logger.debug "Searching for a vine of #{search}"
+        uri = URI("http://search.twitter.com/search.json")
+        query = CGI.escape("#{search} source:vine_for_ios")
+        uri.query = "rpp=5&include_entities=true&q=#{query}"
+        request = Net::HTTP::Get.new(uri.request_uri)
+        response = @http.request uri, request
+        logger.debug "GET #{uri}"
+        results = JSON.parse(response.body)["results"]
+        logger.debug "got back #{results.size} vines"
+        return nil if results.empty?
+        # Pull out the Vine display url of a random result
+        results.sample["entities"]["urls"].first["expanded_url"]
+      rescue => e
+        logger.error "#{e.class}: #{e.message}"
+        room.say "Sorry, something went wrong when I looked for '#{query}'"
+      end
+
+    end
+  end
+end

data/lib/daneel/server.rb

@@ -0,0 +1,39 @@
+require 'net/http/persistent'
+require 'daneel'
+
+module Daneel
+  class Server
+    attr_reader :logger
+
+    def initialize(options = {})
+      require 'daneel/web'
+      @logger = options[:logger] || Daneel::Logger.new
+      @options = {:app => Daneel::Web, :server => "puma"}.merge(options)
+      @options[:port] = ENV["PORT"] if ENV["PORT"]
+      # Rack expects the port key to be capitalized. Sad day.
+      @options[:Port] = @options.delete(:port) if @options[:port]
+      logger.debug "Server with options: #{@options}"
+    end
+
+    def run
+      Thread.new { run_server }
+      sleep 0.1 # boot server before allowing possible interaction
+      Thread.new { run_self_ping }
+    end
+
+    def run_server
+      Rack::Server.start(@options)
+    end
+
+    def run_self_ping
+      return unless ENV['HEROKU_URL']
+      uri = URI(ENV['HEROKU_URL'])
+      http = Net::HTTP::Persistent.new 'daneel'
+      loop do
+        http.request uri
+        sleep (60 * 20) # 20m
+      end
+    end
+
+  end
+end

data/lib/daneel/user.rb

@@ -0,0 +1,26 @@
+# encoding: UTF-8
+module Daneel
+  # Represents a generic user. Doesn't have a room, because multiple rooms can
+  # contain the same user. The user's unique identifier is supplied by the
+  # adapter, and only needs to be unique within the context of that adapter.
+  class User
+    attr_reader :id, :name
+    attr_accessor :data, :initials, :short_name
+
+    def initialize(id, name, data = nil)
+      @id, @name, @data = id, name, data
+
+      # First, try to get initials from the upper-case letters
+      @initials = name.gsub(/\P{Upper}/,'')
+      # If that fails, just go with the first letter of each word
+      @initials = name.gsub(/(?<!^|\s)./,'') if @initials.empty?
+      # Short name is just the bit up to the first space
+      @short_name = name.match(/^(\S+)/)[0]
+    end
+
+    def to_s
+      [short_name, short_name.downcase, initials].sample
+    end
+
+  end
+end

data/lib/daneel/version.rb

@@ -1,3 +1,3 @@
 module Daneel
-  VERSION = "0.0.1"
+  VERSION = "0.1"
 end

data/lib/daneel/web.rb

@@ -0,0 +1,12 @@
+require 'sinatra/base'
+module Daneel
+  class Web < Sinatra::Base
+    set :logging, true
+
+    get '/' do
+      content_type "text/plain"
+      "I hope to one day have a positronic brain, like my namesake R. Daneel Olivaw."
+    end
+
+  end
+end

metadata

@@ -1,104 +1,158 @@
---- !ruby/object:Gem::Specification 
+--- !ruby/object:Gem::Specification
 name: daneel
-version: !ruby/object:Gem::Version 
-  hash: 29
-  prerelease: false
-  segments: 
-  - 0
-  - 0
-  - 1
-  version: 0.0.1
+version: !ruby/object:Gem::Version
+  version: '0.1'
+  prerelease: 
 platform: ruby
-authors: 
-- Andre Arko
+authors:
+- André Arko
 autorequire: 
 bindir: bin
 cert_chain: []
-
-date: 2011-11-09 00:00:00 -10:00
-default_executable: 
-dependencies: 
-- !ruby/object:Gem::Dependency 
-  name: firering
+date: 2013-01-28 00:00:00.000000000 Z
+dependencies:
+- !ruby/object:Gem::Dependency
+  name: sparks
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.4'
+  type: :runtime
   prerelease: false
-  requirement: &id001 !ruby/object:Gem::Requirement 
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '0.4'
+- !ruby/object:Gem::Dependency
+  name: sinatra
+  requirement: !ruby/object:Gem::Requirement
     none: false
-    requirements: 
+    requirements:
     - - ~>
-      - !ruby/object:Gem::Version 
-        hash: 31
-        segments: 
-        - 1
-        - 2
-        - 0
-        version: 1.2.0
+      - !ruby/object:Gem::Version
+        version: 1.4.0
   type: :runtime
-  version_requirements: *id001
-- !ruby/object:Gem::Dependency 
-  name: activerecord
   prerelease: false
-  requirement: &id002 !ruby/object:Gem::Requirement 
+  version_requirements: !ruby/object:Gem::Requirement
     none: false
-    requirements: 
+    requirements:
     - - ~>
-      - !ruby/object:Gem::Version 
-        hash: 3
-        segments: 
-        - 3
-        - 1
-        - 0
-        version: 3.1.0
+      - !ruby/object:Gem::Version
+        version: 1.4.0
+- !ruby/object:Gem::Dependency
+  name: puma
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.6.3
   type: :runtime
-  version_requirements: *id002
-description: A 19,230-year-old Campfire bot
-email: 
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: 1.6.3
+- !ruby/object:Gem::Dependency
+  name: rake
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '10.0'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '10.0'
+- !ruby/object:Gem::Dependency
+  name: bundler
+  requirement: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.2'
+  type: :development
+  prerelease: false
+  version_requirements: !ruby/object:Gem::Requirement
+    none: false
+    requirements:
+    - - ~>
+      - !ruby/object:Gem::Version
+        version: '1.2'
+description: Daneel is a chatbot inspired by the late, lamented Wesabot. And also
+  Hubot.
+email:
 - andre@arko.net
-executables: []
-
+executables:
+- daneel
 extensions: []
-
 extra_rdoc_files: []
-
-files: 
+files:
 - .gitignore
 - Gemfile
+- Gemfile.lock
+- Procfile
 - Rakefile
+- bin/daneel
 - daneel.gemspec
 - lib/daneel.rb
+- lib/daneel/adapter.rb
+- lib/daneel/adapters/campfire.rb
+- lib/daneel/adapters/shell.rb
+- lib/daneel/bot.rb
+- lib/daneel/data.rb
+- lib/daneel/logger.rb
+- lib/daneel/message.rb
+- lib/daneel/options.rb
+- lib/daneel/plugin.rb
+- lib/daneel/room.rb
+- lib/daneel/script.rb
+- lib/daneel/scripts/chatty.rb
+- lib/daneel/scripts/echo.rb
+- lib/daneel/scripts/help.rb
+- lib/daneel/scripts/image_search.rb
+- lib/daneel/scripts/meme.rb
+- lib/daneel/scripts/reload.rb
+- lib/daneel/scripts/vine_search.rb
+- lib/daneel/server.rb
+- lib/daneel/user.rb
 - lib/daneel/version.rb
-has_rdoc: true
+- lib/daneel/web.rb
 homepage: http://github.com/indirect/daneel
-licenses: []
-
+licenses:
+- MIT
 post_install_message: 
 rdoc_options: []
-
-require_paths: 
+require_paths:
 - lib
-required_ruby_version: !ruby/object:Gem::Requirement 
+required_ruby_version: !ruby/object:Gem::Requirement
   none: false
-  requirements: 
-  - - ">="
-    - !ruby/object:Gem::Version 
-      hash: 3
-      segments: 
-      - 0
-      version: "0"
-required_rubygems_version: !ruby/object:Gem::Requirement 
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
+required_rubygems_version: !ruby/object:Gem::Requirement
   none: false
-  requirements: 
-  - - ">="
-    - !ruby/object:Gem::Version 
-      hash: 3
-      segments: 
-      - 0
-      version: "0"
+  requirements:
+  - - ! '>='
+    - !ruby/object:Gem::Version
+      version: '0'
 requirements: []
-
 rubyforge_project: 
-rubygems_version: 1.3.7
+rubygems_version: 1.8.24
 signing_key: 
 specification_version: 3
-summary: A library and rack app to bot up your Campfire rooms
+summary: A 19,230-year-old robot
 test_files: []
-