campfire-bot 0.1.0 → 1.0.0

data/plugins/fail.rb

@@ -1,16 +0,0 @@
-require 'open-uri'
-require 'hpricot'
-require 'tempfile'
-
-class Fail < CampfireBot::Plugin
-  on_command 'fail', :fail
-  
-  def fail(msg)
-    # Scrape random fail
-    fail = (Hpricot(open('http://failblog.org/?random#top'))/'div.entry img').first
-
-    msg.speak(fail['src'])
-  rescue => e
-    msg.speak e
-  end
-end

data/plugins/figlet.rb

@@ -1,10 +0,0 @@
-require "#{BOT_ROOT}/vendor/escape/escape"
-
-class Fun < CampfireBot::Plugin
-  on_command    'figlet', :figlet
-  
-  def figlet(msg)
-    output = `#{Escape.shell_command(['figlet', '--', msg[:message]])}`
-    msg.paste output
-  end
-end

data/plugins/fun.rb

@@ -1,95 +0,0 @@
-class Fun < CampfireBot::Plugin
-  on_command    'say',              :say
-  on_message    Regexp.new("^#{bot.config['nickname']},\\s+(should|can|will|shall) (i|he|she|we|they) do it\\?", Regexp::IGNORECASE), :do_or_do_not
-  on_message    Regexp.new("^(good morning|morning|m0ink|hello|hi|hey|whassup|what's up|yo|hola|ola|'sup|sup)(,)*\\s*(#{bot.config['nickname']}).*$", Regexp::IGNORECASE), :greet
-  on_message  /(how's it|how are|how're) (ya |you )*(going|doing|doin).*/, :howareya
-  on_command    "blame", :blame
-  on_command    "trout", :trout
-  on_command    "slap", :trout
-  on_command    "troutslap", :trout
-  # on_speaker    'Tim R.',           :agree_with_tim
-  # on_message    /undo it/i,         :do_it
-  # on_message    /(^|\s)do it/i,     :undo_it
-  # at_time       1.minute.from_now,  :do_it
-
-  def initialize
-    @last_agreed = 20.minutes.ago
-    @log = Logging.logger["CampfireBot::Plugin::Fun"]
-  end
-  
-  def say(m)
-    m.speak(m[:message])
-  end
-  
-  def do_it(m = nil)
-    m.speak('Do it!')
-  end
-  
-  def undo_it(m)
-    m.speak('Undo it!')
-  end
-  
-  def do_or_do_not(m)
-    responses = ['Do it!', 'Don\'t do it!', 'Undo it!']
-    m.speak(responses.choice)
-  end
-  
-  def agree_with_tim(m)
-    m.speak('I agree with Tim.') unless @last_agreed > 15.minutes.ago
-    @last_agreed = Time.now
-  end
-  
-  def greet(m)
-    messages = ['Howdy', 'Wassup', 'Greets', 'Hello', 'Hey there', "It's a", 'Good day']
-    m.speak("#{messages.choice} #{m[:person].split(' ')[0]}")
-  end
-  
-  def howareya(m)
-    messages = ["just great", "peachy", "mas o menos", 
-    	 "you know how it is", "eh, ok", "pretty good. how about you?"]
-    m.speak(messages[rand(messages.size)])
-  end
-  
-  def blame(m)
-    # TODO: capture user-submitted entries to a yaml file and regurgitate them
-    # TODO: put all the default ones in a separate yaml
-    if m[:message].strip.length > 0
-      blamed = m[:message].strip
-    else
-      users = m[:room].users.delete_if {|u| u[:name] == bot.campfire.me[:name]}.map {|u| u[:name]}
-      others = ["nobody", "my", "Microsoft", "Steve Jobs", "the terrorists", "your", 
-                "Project Management", "Development", "Management", "Corporate", "Cartman", "the user", 
-                "the liberal media", "Wall Street"]
-      
-      # mostly blame the other users
-      if rand(10) >= 2
-        blamed = users.choice
-      else 
-        blamed = others.choice
-      end
-      
-    end
-    
-    case blamed
-    when "nobody"
-      blamestring = "It's nobody's fault"
-    when "your", "my"
-      blamestring = "It's all #{blamed} fault"
-    else
-      blamestring = "It's all #{blamed}'s fault"
-      blamestring = "It's all #{blamed}' fault" if blamed[-1].chr == "s"
-    end
-   
-    m.speak blamestring
-  end
-  
-  def trout(m)
-    if m[:message].strip.length > 0
-      selected_user_name = m[:message].strip
-    else
-      users = m[:room].users.map{|u| u[:name] }
-      selected_user_name = users.choice
-    end
-    m.speak("#{m[:person]} slaps #{selected_user_name} #{["upside the head", "in the face", "on the rear", "where it counts", "in the knees", "ineffectually", "in the elbow", "on the funny bone", "in the ear", "on the nose", "in the teeth"].choice} with a #{%w(good-sized large decaying moldy spiked sabre-toothed surprised disappointed dramatic enraged rabid bug-eyed rotten foul-smelling demonic cluestick-holding).choice} trout")
-  end
-end

data/plugins/garfield.rb

@@ -1,43 +0,0 @@
-require 'open-uri'
-require 'hpricot'
-require 'tempfile'
-
-class Garfield < CampfireBot::Plugin
-  BASE_URL    = 'http://images.ucomics.com/comics/ga'
-  START_DATE  = Date.parse('1978-06-19')
-  END_DATE    = Date.today
-  
-  on_command 'garfield', :garfield
-  
-  def garfield(msg)    
-    comic = case msg[:message].split(/\s+/)[0]
-    when 'random'
-      fetch_random
-    when /d+/
-      fetch_comic(msg[:message].split(/\s+/)[0])
-    else
-      fetch_random
-    end
-    
-    msg.speak(comic)
-  end
-  
-  private
-  
-  def fetch_random
-    fetch_comic(rand(number_of_comics))
-  end
-  
-  def fetch_comic(id = nil)
-    date = id_to_date(id)
-    "#{BASE_URL}/#{date.strftime('%Y')}/ga#{date.strftime('%y%m%d')}.gif"
-  end
-  
-  def id_to_date(id)
-    (START_DATE + id.days).to_date
-  end
-  
-  def number_of_comics
-    (END_DATE - START_DATE).to_i
-  end
-end

data/plugins/generic_search.rb

@@ -1,66 +0,0 @@
-require 'cgi'
-require 'net/http'
-
-#
-# Search sites like Google and Wikipedia
-#
-# You configure the command name and URL pattern.  Given a search
-# term, it attempts to respond with the URL of the first search
-# result.  It does so by simply inserting the term into the URL at the
-# '%s'.  If the url redirects, it responds with the redirect target
-# instead, so you get a hint about what you'll see.  Otherwise, you
-# get just the expanded url pattern.
-#
-# This is useful for a wide range of sites.  Sample config:
-#
-# generic_search_commands:
-#   wikipedia: "http://en.wikipedia.org/wiki/Special:Search?search=%s&go=Go"
-#   google: "http://www.google.com/search?hl=en&q=%s&btnI=I'm+Feeling+Lucky&aq=f&oq="
-#   php: "http://us3.php.net/manual-lookup.php?pattern=%s&lang=en"
-#   letmegooglethatforyou: "http://letmegooglethatforyou.com/?q=%s"
-#
-# Note that the last site never redirects, which is fine.
-#
-class GenericSearch < CampfireBot::Plugin
-  attr_reader :commands
-
-  def initialize
-    @commands = bot.config["generic_search_commands"] || {}
-    commands.each { |c, s|
-      method = "do_#{c}_command".to_sym
-      self.class.send(:define_method, method) {|msg|
-        msg.speak(http_peek(sprintf(s, CGI.escape(msg[:message]))))
-      }
-      self.class.on_command(c, method)
-    }
-  end
-
-  protected
-
-  # Follow the url just enough to see if it redirects.  If so,
-  # return the redirect.  Otherwise, return the original.
-  def http_peek(url)
-    uri = URI.parse url
-    http = Net::HTTP.new(uri.host, uri.port)
-
-    # Unfortunately the net/http(s) API can't seem to do this for us,
-    # even if we require net/https from the beginning (ruby 1.8)
-    if uri.scheme == "https"
-      require 'net/https'
-      http.use_ssl = true
-      http.verify_mode = OpenSSL::SSL::VERIFY_NONE
-    end
-
-    res = http.start { |http|
-      req = Net::HTTP::Get.new uri.request_uri
-      #req.basic_auth u, p
-      response = http.request req
-    }
-    case res
-    when Net::HTTPRedirection
-      uri.merge res.header['Location']
-    else # Net::HTTPSuccess or error
-      url
-    end
-  end
-end

data/plugins/help.rb

@@ -1,13 +0,0 @@
-# Rudimentary help system. Worth exploring further, though I am not sure how much access to the
-# rest of the sytem plugins should be allowed. Should they only be allowed to operate in their own
-# sandbox, or reach into the list of registered plugins like this one does?
-
-class Help < CampfireBot::Plugin
-  on_command 'help', :help
-
-  def help(msg)
-    commands = CampfireBot::Plugin.registered_commands.map { |command| command.matcher.to_s + " " }
-    msg.speak("To address me, type \"#{bot.config['nickname']},\" and a command, or just !command. \n
-    Available commands: #{commands}")
-  end
-end

data/plugins/infobot.rb

@@ -1,58 +0,0 @@
-require 'yaml'
-
-class Infobot < CampfireBot::Plugin
-  
-  Infobot::DEFINE_REGEXP = /(no, )*(.+) is ([^\?]+)(?!\?)$/
-  Infobot::RESPOND_REGEXP = /(what's|what is|who is|who's|where|where's|how's|how is) ([^\?]+)(?=\?)*/
-  
-  # if BOT_ENVIRONMENT == 'development'
-    on_message Regexp.new("^#{bot.config['nickname']},\\s+#{RESPOND_REGEXP.source}", Regexp::IGNORECASE), :respond
-    on_message Regexp.new("^#{bot.config['nickname']},\\s+#{DEFINE_REGEXP.source}", Regexp::IGNORECASE), :define
-    on_command 'reload_facts', :reload
-  # end
-  
-  def initialize
-    # puts "entering initialize()"
-    
-  end
-  
-  def respond(msg)
-    # puts "entering respond()"
-    @facts = init()
-    puts msg[:message]
-    puts msg[:message] =~ RESPOND_REGEXP # Regexp.new("^#{Bot.instance.config['nickname']},\\s+#{RESPOND_REGEXP.source}", Regexp::IGNORECASE)
-    puts $1, $2, $3
-    if !@facts.has_key?($2.downcase)
-      msg.speak("Sorry, I don't know what #{$2} is.")
-    else
-      fact = @facts[$2.downcase]
-      msg.speak("#{msg[:person].split(" ")[0]}, #{$2} is #{fact}.")
-    end
-  end
-  
-  def define(msg)
-    # puts 'entering define()'
-    @facts = init()
-    # puts @facts
-    # puts msg[:message]
-    puts msg[:message] =~ Regexp.new("^#{bot.config['nickname']},\\s+#{DEFINE_REGEXP.source}", Regexp::IGNORECASE)
-    # puts @define_regexp
-    # puts $1, $2, $3
-    @facts[$2.downcase] = $3
-    msg.speak("Okay, #{$2} is now #{$3}")
-    File.open(File.join(File.dirname(__FILE__), 'infobot.yml'), 'w') do |out|
-      YAML.dump(@facts, out)
-    end
-  end
-  
-  def init
-    # puts "entering init()"
-    YAML::load(File.read(File.join(BOT_ROOT, 'tmp', 'infobot.yml')))
-  end
-  
-  def reload(msg)
-    @facts = init()
-    msg.speak("ok, reloaded #{@facts.size} facts")
-  end
-  
-end

data/plugins/insult.rb

@@ -1,87 +0,0 @@
-class Insult < CampfireBot::Plugin
-  
-  on_command 'insult', :insult
-  
-  def insult(msg)
-    adj1 = adjective()
-    adj2 = adjective()
-    amount = amount()
-    noun = noun()
-    article = "a"
-    article = "an" if (adj1[0] =~ /^[aeiou]/)
-    out = "#{msg[:message]}, you are nothing but a #{adj1} #{amount} of #{adj2} #{noun}"
- 
- 
-    msg.speak(out)
-  end
- 
-  
-  private
-  
-  def adjective()
-    adjectives = %w(acidic antique contemptible culturally-unsound despicable evil fermented
-    festering foul fulminating humid impure inept inferior industrial
-    left-over low-quality malodorous off-color penguin-molesting
-    petrified pointy-nosed salty sausage-snorfling tastless tempestuous
-    tepid tofu-nibbling unintelligent unoriginal uninspiring weasel-smelling
-    wretched spam-sucking egg-sucking decayed halfbaked infected squishy
-    porous pickled coughed-up thick vapid hacked-up
-    unmuzzled bawdy vain lumpish churlish fobbing rank craven puking
-    jarring fly-bitten pox-marked fen-sucked spongy droning gleeking warped
-    currish milk-livered surly mammering ill-borne beef-witted tickle-brained
-    half-faced headless wayward rump-fed onion-eyed beslubbering villainous
-    lewd-minded cockered full-gorged rude-snouted crook-pated pribbling
-    dread-bolted fool-born puny fawning sheep-biting dankish goatish
-    weather-bitten knotty-pated malt-wormy saucyspleened motley-mind
-    it-fowling vassal-willed loggerheaded clapper-clawed frothy ruttish
-    clouted common-kissing pignutted folly-fallen plume-plucked flap-mouthed
-    swag-bellied dizzy-eyed gorbellied weedy reeky measled spur-galled mangled
-    impertinent bootless toad-spotted hasty-witted horn-beat yeasty
-    imp-bladdereddle-headed boil-brained tottering hedge-born hugger-muggered 
-    elf-skinned
-    
-    artless bawdy beslubbering bootless churlish cockered clouted craven currish dankish
-    dissembling droning errant fawning fobbing froward gleeking goatish gorbellied
-    impertinent infectious jarring loggerheaded lumpish mammering mangled mewling paunchy
-    pribbling puking puny quailing rank reeky roguish ruttish saucy spleeny spongy surly
-    tottering unmuzzled vain venomed villainous warped wayward weedy yeasty base-court
-    bat-fowling beef-witted beetle-headed boil-brained clapper-clawed clay-brained
-    common-kissing crook-pated dismal-dreaming dizzy-eyed doghearted dread-bolted
-    earth-vexing elf-skinned fat-kidneyed flap-mouthed fly-bitten folly-fallen fool-born
-    full-gorged guts-griping half-faced hasty-witted hedge-born hell-hated idle-headed
-    ill-breeding ill-nurtured knotty-pated milk-livered motley-minded onion-eyed
-    plume-plucked pottle-deep pox-marked reeling-ripe rough-hewn rude-growing rump-fed
-    shard-borne sheep-biting spur-galled swag-bellied tardy-gaited tickle-brained
-    toad-spotted urchin-snouted weather-bitten)
-    
-    adjectives[rand(adjectives.size)]
-    
-  end
-  
-  def amount()
-    amounts = %w(accumulation bucket coagulation enema-bucketful gob half-mouthful
-     heap mass mound petrification pile puddle stack thimbleful tongueful
-     ooze quart bag plate ass-full assload load)
-     
-     amounts[rand(amounts.size)]
-    
-  end
-
-  def noun()
-    nouns = %w(bat|toenails bug|spit cat|hair chicken|piss dog|vomit dung
-    fat-woman's|stomach-bile fish|heads guano gunk pond|scum rat|retch
-    red|dye|number-9 Sun|IPC|manuals waffle-house|grits yoo-hoo
-    dog|balls seagull|puke cat|bladders pus urine|samples
-    squirrel|guts snake|rectums snake|bait buzzard|gizzards
-    cat-hair-balls rat-farts pods armadillo|snouts entrails
-    snake|snot eel|ooze slurpee-backwash toxic|waste Stimpy-drool
-    poopy poop craptacular|carpet|droppings cold|sores warts)
-    
-    nouns[rand(nouns.size)].gsub("|", " ")
-    
-    
-  end
-
-end
-
-

data/plugins/jira.rb

@@ -1,197 +0,0 @@
-require 'open-uri'
-require 'hpricot'
-require 'tempfile'
-require 'rexml/document'
-##
-# JIRA plugin
-# 
-# checks JIRA for new issues and posts them to the room
-# 
-# in your config.yml you can either specify a single URL or a list of URLs, e.g.
-# 
-#   jira_url: http://your_jira_url
-#   # OR
-#   jira_url: 
-#     - http://your_jira_url
-#     - http://your_jira_url2
-# 
-
-
-class Jira < CampfireBot::Plugin
-  
-  at_interval 3.minutes, :check_jira
-  on_command 'checkjira', :checkjira_command
-  on_command 'jira', :checkjira_command
-  
-  def initialize
-    # log "initializing... "
-    @data_file  = File.join(BOT_ROOT, 'tmp', "jira-#{BOT_ENVIRONMENT}.yml")
-    @cached_ids = YAML::load(File.read(@data_file)) || {}
-    @last_checked = @cached_ids[:last_checked] || 10.minutes.ago
-    @log = Logging.logger["CampfireBot::Plugin::Jira"]
-  end
-
-  # respond to checkjira command-- same as interval except we answer with 'no issues found' if there are no issues
-  def checkjira_command(msg)
-    begin
-      msg.speak "no new issues since I last checked #{@lastlast} ago" if !check_jira(msg)
-    rescue 
-      msg.speak "sorry, we had trouble connecting to JIRA."
-    end
-  end
-  
-  def check_jira(msg)
-    
-    saw_an_issue = false
-    old_cache = Marshal::load(Marshal.dump(@cached_ids)) # since ruby doesn't have deep copy
-    
-    
-    @lastlast = time_ago_in_words(@last_checked)
-    @last_checked = Time.now
-    
-
-    tix = fetch_jira_url
-    raise if tix.nil?
-      
-    tix.each do |ticket|
-      if seen?(ticket, old_cache)
-        saw_an_issue = true
-
-        @cached_ids = update_cache(ticket, @cached_ids) 
-        
-  
-        messagetext = "#{ticket[:type]} - #{ticket[:title]} - #{ticket[:link]} - reported by #{ticket[:reporter]} - #{ticket[:priority]}"
-        msg.speak(messagetext)
-        msg.play("vuvuzela") if ticket[:priority] == "Blocker"
-        @log.info messagetext
-          
-      end
-    end
-
-    flush_cache(@cached_ids)
-    @log.info "no new issues." if !saw_an_issue
-  
-    saw_an_issue
-  end
-  
-  protected
-  
-  # fetch jira url and return a list of ticket Hashes
-  def fetch_jira_url()
-    
-    jiraconfig = bot.config['jira_url']
-    
-    if jiraconfig.is_a?(Array)
-      searchurls = jiraconfig 
-    else 
-      searchurls = [jiraconfig]
-    end
-    
-    tix = []
-      
-    searchurls.each do |searchurl|
-      begin
-        @log.info "checking jira for new issues... #{searchurl}"
-        xmldata = open(searchurl).read
-        doc = REXML::Document.new(xmldata)
-        raise Exception.new("response had no content") if doc.nil?
-        doc.elements.inject('rss/channel/item', tix) do |tix, element|
-          tix.push(parse_ticket_info(element))
-        end
-      rescue Exception => e
-        @log.error "error connecting to jira: #{e.message}"
-        # @log.error "#{e.backtrace}"
-      end
-    end
-    return tix
-  end
-  
-  # extract ticket hash from individual xml element
-  def parse_ticket_info(xml_element)
-    id = xml_element.elements['key'].text rescue ""
-    id, spacekey = split_spacekey_and_id(id) rescue ""
-    
-    link = xml_element.elements['link'].text rescue ""
-    title = xml_element.elements['title'].text rescue ""
-    reporter = xml_element.elements['reporter'].text rescue ""
-    type = xml_element.elements['type'].text rescue ""
-    priority = xml_element.elements['priority'].text rescue ""
-    
-    return {
-      :spacekey => spacekey,
-      :id => id,
-      :link => link,
-      :title => title,
-      :reporter => reporter,
-      :type => type,
-      :priority => priority
-    }
-  end
-  
-  # extract the spacekey and id from the ticket id
-  def split_spacekey_and_id(key)
-    spacekey = key.scan(/^([A-Z]+)/).to_s
-    id = key.scan(/([0-9]+)$/)[0].to_s.to_i
-    return id, spacekey
-  end
-  
-  # has this ticket been seen before this run?
-  def seen?(ticket, old_cache)
-    !old_cache.key?(ticket[:spacekey]) or old_cache[ticket[:spacekey]] < ticket[:id]
-  end
-  
-  # only update the cached highest ID if it is in fact the highest ID
-  def update_cache(ticket, cache)
-    cache[ticket[:spacekey]] = ticket[:id] if seen?(ticket, cache)
-    cache
-  end
-
-  # write the cache to disk
-  def flush_cache(cache)
-    cache[:last_checked] = @last_checked
-    File.open(@data_file, 'w') do |out|
-      YAML.dump(cache, out)
-    end
-  end
-  
-  
-  # 
-  # time/utility functions
-  # 
-  
-  
-  def time_ago_in_words(from_time, include_seconds = false)
-    distance_of_time_in_words(from_time, Time.now, include_seconds)
-  end
-  
-  def distance_of_time_in_words(from_time, to_time = 0, include_seconds = false)
-    from_time = from_time.to_time if from_time.respond_to?(:to_time)
-    to_time = to_time.to_time if to_time.respond_to?(:to_time)
-    distance_in_minutes = (((to_time - from_time).abs)/60).round
-    distance_in_seconds = ((to_time - from_time).abs).round
-
-    case distance_in_minutes
-      when 0..1
-        return (distance_in_minutes == 0) ? 'less than a minute' : '1 minute' unless include_seconds
-        case distance_in_seconds
-          when 0..4   then 'less than 5 seconds'
-          when 5..9   then 'less than 10 seconds'
-          when 10..19 then 'less than 20 seconds'
-          when 20..39 then 'half a minute'
-          when 40..59 then 'less than a minute'
-          else             '1 minute'
-        end
-
-        when 2..44           then "#{distance_in_minutes} minutes"
-        when 45..89          then 'about 1 hour'
-        when 90..1439        then "about #{(distance_in_minutes.to_f / 60.0).round} hours"
-        when 1440..2879      then '1 day'
-        when 2880..43199     then "#{(distance_in_minutes / 1440).round} days"
-        when 43200..86399    then 'about 1 month'
-        when 86400..525599   then "#{(distance_in_minutes / 43200).round} months"
-        when 525600..1051199 then 'about 1 year'
-        else                      "over #{(distance_in_minutes / 525600).round} years"
-    end
-  end
-  
-end