rbot 0.9.9 → 0.9.10

data/data/rbot/plugins/rubyurl.rb

@@ -0,0 +1,39 @@
+require "rubygems"
+require "shorturl"
+
+class RubyURL < Plugin
+
+  # return a help string when the bot is asked for help on this plugin
+  def help(plugin, topic="")
+    return "rubyurl <your long url>"
+  end
+
+  # reply to a private message that we've registered for
+  def privmsg(m)
+
+    # m.params contains the rest of the message, m.plugin contains the first
+    # word (useful because it's possible to register for multiple commands)
+    unless(m.params)
+      m.reply "incorrect usage. " + help(m.plugin)
+    end
+
+    # TODO: might want to add a check here to validate the url
+    # if they call 'rubyurl help' backwards, don't return a lame link
+
+    if (m.params == "help")
+      m.reply "Try again. Correct usage is: " + help(m.plugin)
+      return false
+    end
+
+    # call the ShortURL library with the value of the url
+    url = ShortURL.shorten(m.params)
+
+
+    m.reply "Your RubyURL: #{url}"
+
+  end
+end
+
+# create an instance of the RubyURL class and register it as a plugin
+rubyurl = RubyURL.new
+rubyurl.register("rubyurl")

data/data/rbot/plugins/seen.rb

@@ -21,6 +21,7 @@ class SeenPlugin < Plugin
   end
 
   def listen(m)
+    return if m.sourcenick.nil?
     # keep database up to date with who last said what
     if m.kind_of?(PrivMessage)
       return if m.private?
@@ -78,7 +79,7 @@ class SeenPlugin < Plugin
     when "JOIN"
       ret += "joining #{saw.where}"
     when "QUIT"
-      ret += "quiting IRC (#{saw.message})"
+      ret += "quitting IRC (#{saw.message})"
     when "TOPIC"
       ret += "changing the topic of #{saw.where} to #{saw.message}"
     end

data/data/rbot/plugins/slashdot.rb

@@ -21,11 +21,11 @@ class SlashdotPlugin < Plugin
       m.reply "search for #{search} failed"
       return
     end
-    puts xml.inspect
+    debug xml.inspect
     begin
       doc = Document.new xml
     rescue REXML::ParseException => e
-      puts e
+      warning e.inspect
       m.reply "couldn't parse output XML: #{e.class}"
       return
     end
@@ -33,7 +33,7 @@ class SlashdotPlugin < Plugin
       m.reply "search for #{search} failed"
       return
     end
-    puts doc.inspect
+    debug doc.inspect
     max = 8 if max > 8
     done = 0
     doc.elements.each("*/item") {|e|
@@ -50,9 +50,9 @@ class SlashdotPlugin < Plugin
   end
   
   def slashdot(m, params)
-    puts params.inspect
+    debug params.inspect
     max = params[:limit].to_i
-    puts "max is #{max}"
+    debug "max is #{max}"
     xml = @bot.httputil.get(URI.parse("http://slashdot.org/slashdot.xml"))
     unless xml
       m.reply "slashdot news parse failed"

data/data/rbot/plugins/spell.rb

@@ -14,18 +14,23 @@ class SpellPlugin < Plugin
       p.each_line {|l|
         if(l =~ /^\*/)
           m.reply "#{m.params} may be spelled correctly"
+          p.close
           return
         elsif(l =~ /^\s*&.*: (.*)$/)
           m.reply "#{m.params}: #$1"
+          p.close
           return
         elsif(l =~ /^\s*\+ (.*)$/)
           m.reply "#{m.params} is presumably derived from " + $1.downcase
+          p.close
           return
         elsif(l =~ /^\s*#/)
           m.reply "#{m.params}: no suggestions"
+          p.close
           return
         end
       }
+      p.close
     else
       m.reply "couldn't exec ispell :("
       return

data/data/rbot/plugins/theyfightcrime.rb

@@ -0,0 +1,121 @@
+HE = [
+
+    ['a superhumanly strong','an underprivileged','a globe-trotting','an impetuous','a shy','a suave','a notorious','a one-legged','an all-American','a short-sighted','an otherworldly','a hate-fuelled','a scrappy','an unconventional','a jaded','a leather-clad','a fiendish','a Nobel prize-winning','a suicidal','a maverick','a bookish','an old-fashioned','a witless','a lounge-singing','a war-weary','a scarfaced','a gun-slinging','an obese','a time-tossed','a benighted','an uncontrollable','an immortal','an oversexed','a world-famous','an ungodly','a fast talking','a deeply religious','a lonely','a sword-wielding','a genetically engineered'],
+    
+    ['white trash','zombie','shark-wrestling','playboy','guitar-strumming','Jewish',
+    'sweet-toothed','bohemian','crooked','chivalrous','moralistic','amnesiac','devious','drug-addicted',
+    'voodoo','Catholic','overambitious','coffee-fuelled','pirate','misogynist','skateboarding',
+    'arachnophobic','Amish','small-town','Republican','one-eyed','gay','guerilla','vegetarian',
+    'dishevelled','alcoholic','flyboy','ninja','albino','hunchbacked','neurotic','umbrella-wielding',
+    'native American','soccer-playing','day-dreaming'],
+    
+    ['grifter','stage actor','paramedic','gentleman spy','jungle king','hairdresser',
+    'photographer','ex-con','vagrant','filmmaker','werewolf','senator','romance novelist','shaman','cop',
+    'rock star','farmboy','cat burglar','cowboy','cyborg','inventor','assassin','boxer','dog-catcher',
+    'master criminal','gangster','firefighter','househusband','dwarf','librarian','paranormal investigator',
+    'Green Beret','waffle chef','vampire hunter','messiah','astronaut','sorceror','card sharp','matador',
+    'barbarian'],
+    
+    ['with a robot buddy named Sparky.','whom everyone believes is mad.','gone bad.',
+    'with a mysterious suitcase handcuffed to his arm.','living undercover at Ringling Bros. Circus.',
+    'searching for his wife''s true killer.','who dotes on his loving old ma.','looking for ''the Big One.''',
+    'who knows the secret of the alien invasion.','on the edge.','on a mission from God.','with a secret.',
+    'in drag.','plagued by the memory of his family''s brutal murder.','looking for a cure to the poison coursing through his veins.',
+    'moving from town to town, helping folk in trouble.',
+    'who must take medication to keep him sane.','who hangs with the wrong crowd.',
+    'possessed of the uncanny powers of an insect.','with a winning smile and a way with the ladies.',
+    'fleeing from a secret government programme.','from the ''hood.','haunted by an iconic dead American confidante.',
+    'with a passion for fast cars.','trapped in a world he never made.','in a wheelchair.',
+    'on the hunt for the last specimen of a great and near-mythical creature.','on the run.',
+    'for the 21st century.','who hides his scarred face behind a mask.','on the wrong side of the law.',
+    'with no name.','from the Mississippi delta.','with acid for blood.','with nothing left to lose.',
+    'haunted by memories of ''Nam.','on a search for his missing sister.','on his last day in the job.',
+    'from a doomed world.','who believes he can never love again.']
+
+]
+
+SHE = [
+
+    ['a radical','a green-fingered','a tortured','a time-travelling','a vivacious',
+    'a scantily clad','a mistrustful','a violent','a transdimensional','a strong-willed','a ditzy','a man-hating',
+    'a high-kicking','a blind','an elegant','a supernatural','a foxy','a bloodthirsty','a cynical','a beautiful',
+    'a plucky','a sarcastic','a psychotic','a hard-bitten','a manipulative','an orphaned','a cosmopolitan',
+    'a chain-smoking','a cold-hearted','a warm-hearted','a sharp-shooting','an enchanted','a wealthy','a pregnant',
+    'a mentally unstable','a virginal','a brilliant','a disco-crazy','a provocative','an artistic'],
+    
+    ['tempestuous', 'Buddhist', 'foul-mouthed', 'nymphomaniac', 'green-skinned', 'impetuous', 'African-American','punk','hypochondriac','junkie','blonde','goth','insomniac','gypsy','mutant','renegade', 'tomboy','French-Canadian','motormouth','belly-dancing','communist','hip-hop','thirtysomething',
+    'cigar-chomping','extravagent','out-of-work','Bolivian','mute','cat-loving','snooty','wisecracking',
+    'red-headed','winged','kleptomaniac','antique-collecting','psychic','gold-digging','bisexual','paranoid',
+    'streetsmart'],
+    
+    ['archaeologist','pearl diver','mechanic','detective','hooker','femme fatale',
+    'former first lady','barmaid','fairy princess','magician''s assistant','schoolgirl','college professor',
+    'angel','bounty hunter','opera singer','cab driver','soap star','doctor','politician','lawyer','nun',
+    'snake charmer','journalist','bodyguard','vampire','stripper','Valkyrie','wrestler','mermaid','single mother',
+    'safe cracker','traffic cop','research scientist','queen of the dead','Hell''s Angel','museum curator',
+    'advertising executive','widow','mercenary','socialite'],
+    
+    ['on her way to prison for a murder she didn''t commit.','trying to make a difference in a man''s world.',
+    'with the soul of a mighty warrior.','looking for love in all the wrong places.','with an MBA from Harvard.',
+    'who hides her beauty behind a pair of thick-framed spectacles.','with the power to see death.',
+    'descended from a line of powerful witches.','from a family of eight older brothers.','with a flame-thrower.',
+    'with her own daytime radio talk show.','living on borrowed time.','who can talk to animals.',
+    'prone to fits of savage, blood-crazed rage.','who don''t take no shit from nobody.','with a knack for trouble.',
+    'who believes she is the reincarnation of an ancient Egyptian queen.','fleeing from a Satanic cult.',
+    'on the trail of a serial killer.','with a birthmark shaped like Liberty''s torch.',
+    'in the witness protection scheme.','from out of town.','from aristocratic European stock.',
+    'living homeless in New York''s sewers.','with only herself to blame.','from beyond the grave',
+    'married to the Mob.','from the wrong side of the tracks.','from a secret island of warrior women.',
+    'from Mars.','with someone else''s memories.','from a different time and place.','operating on the wrong side of the law.',
+    'who inherited a spooky stately manor from her late maiden aunt.','who dreams of becoming Elvis.',
+    'with a song in her heart and a spring in her step.','in the wrong place at the wrong time.',
+    'with an incredible destiny.','with the power to bend men''s minds.','with an evil twin sister.']
+
+]
+
+TITLE = [
+
+    ['FATAL', 'PRIMAL', 'BASIC', 'LETHAL',
+    'FINAL', 'CLEAR', 'DIRTY', 'RED', 'FOREIGN', 'PRIMARY', 'EXECUTIVE',
+    'BLOOD', 'HARD', 'STEEL', 'TERMINAL', 'HOT', 'COLD', 'TOTAL', 'PROGNOSIS:',
+    'BURNING', 'FAST', 'PAINFUL', 'MISSION:', 'DEADLY', 'PARTIAL',
+    'RAGING', 'CORDIAL'],
+    
+    ['DECISION', 'INCISION', 'CONCLUSION',
+    'CONCUSSION', 'HEAT', 'FIRE', 'RECOIL', 'INSTINCT', 'DESIRE', 'WEAPON',
+    'BADGE', 'DEED', 'JUSTICE', 'HEAT', 'VENGEANCE', 'RECESSION', 'COMBUSTION',
+    'JUDGEMENT', 'WARNING', 'AWAKENING', 'JURISDICTION', 'BASIS', 'FINDINGS',
+    'INJECTION', 'REJECTION', 'REMISSION', 'DIGESTION', 'IDENTITY',
+    'DISPERSION'],
+    
+    ['II','III','IV','V','VI','VII','VIII','IX','X','XI','XII','XIII','XIV','XV','XVI','XVII','XVIII','XIX']
+
+]
+
+class TheyFightCrime < Plugin
+    def help(plugin, topic="")
+        "movieplot => generate a random movie scenario. movietitle => generate a random movie title."
+    end
+    
+    def get_random_things(thing_array)
+        thing_array.map { |things| things[rand(things.length)] }
+    end
+    
+    def do_movieplot(m, params)
+        he_things = get_random_things(HE)
+        she_things = get_random_things(SHE)
+        m.reply "Summary: He's #{he_things.join " "} She's #{she_things.join " "} They fight crime."
+    end
+
+    def do_movietitle(m, params)
+        title_things = get_random_things(TITLE)
+        m.reply "Title: #{title_things.join " "}"
+    end
+end
+
+plugin = TheyFightCrime.new
+plugin.map 'movieplot', :action => 'do_movieplot'
+plugin.map 'movietitle', :action => 'do_movietitle'
+
+
+

data/data/rbot/plugins/threat.rb

@@ -0,0 +1,55 @@
+# Security threat level plugin for rbot
+# by Robin Kearney (robin@riviera.org.uk)
+#
+# inspired by elliots fascination with the us
+# threat level.
+#
+# again a dirty hack but it works, just...
+#
+
+require 'uri/common'
+
+class ThreatPlugin < Plugin
+
+  def help(plugin, topic="")
+    "threat => prints out the current threat level as reported by http://www.dhs.gov/"
+  end
+
+  def privmsg(m)
+	color = ""
+    red = "\x0304" # severe
+	orange = "\x0307" # high
+	yellow = "\x0308" # elevated
+	blue = "\x0312" # guarded
+	green = "\x0303" # low
+	black = "\x0301" # default
+
+	page = @bot.httputil.get URI.parse("http://www.dhs.gov/dhspublic/")
+	if page =~ / <img.*dhs\/images\/dhs-advisory-(.*).gif.*/
+      state = $1
+    end
+    case state
+      when "severe"
+		color = red
+      when "high"
+		color = orange
+      when "elevated"
+		color = yellow
+      when "guarded"
+		color = blue
+      when "low"
+		color = green
+	else
+	  color = black
+	end
+
+	m.reply color + "Today " + m.sourcenick + " the threat level is " + state.capitalize
+
+	return
+  end
+
+end
+plugin = ThreatPlugin.new
+plugin.register("threat")
+
+

data/data/rbot/plugins/tinyurl.rb

@@ -0,0 +1,39 @@
+require "rubygems"
+require "shorturl"
+
+class TinyURL < Plugin
+  include WWW
+
+  # return a help string when the bot is asked for help on this plugin
+  def help(plugin, topic="")
+    return "tinyurl <your long url>"
+  end
+
+  # reply to a private message that we've registered for
+  def privmsg(m)
+
+    # m.params contains the rest of the message, m.plugin contains the first
+    # word (useful because it's possible to register for multiple commands)
+    unless(m.params)
+      m.reply "incorrect usage. " + help(m.plugin)
+    end
+
+    # TODO: might want to add a check here to validate the url
+    # if they call 'rubyurl help' backwards, don't return a lame link
+
+    if (m.params == "help")
+      m.reply "Try again. Correct usage is: " + help(m.plugin)
+      return false
+    end
+
+    # call the ShortURL library with the value of the url
+    url = ShortURL.shorten(m.params, :tinyurl)
+
+    m.reply "tinyurl: #{url}"
+
+  end
+end
+
+# create an instance of the RubyURL class and register it as a plugin
+tinyurl = TinyURL.new
+tinyurl.register("tinyurl")

data/data/rbot/plugins/topic.rb

@@ -0,0 +1,204 @@
+# Author: Giuseppe "Oblomov" Bilotta <giuseppe.bilotta@gmail.com>
+# Add a bunch of topic manipulation features
+
+class TopicPlugin < Plugin
+  def initialize
+    super
+    @separator = "|" # default separator
+  end
+
+  def help(plugin, topic="")
+    case plugin
+    when "topic"
+      case topic
+      when "add"
+        return "topic add <text> => add <text> at the end the topic"
+      when "prepend"
+        return "topic prepend <text> => add <text> at the beginning of the topic"
+      when "addat"
+        return "topic addat <num> <text> => add <text> at position <num> of the topic"
+      when "del", "delete"
+        return "topic del <num> => remove section <num> from the topic"
+      when "replace"
+        return "topic replace <num> <text> => Replaces section <num> with <text>"
+      when "sep", "separator"
+        return "topic sep(arator) [<text>] => get or set the topic section separator"
+      when "learn"
+        return "topic learn => remembers the topic for later"
+      when "restore"
+        return "topic restore => resets the topic to the latest remembered one"
+      when "clear"
+        return "topic clear => clears the topic"
+      when "set"
+        return "topic set <text> => sets the topic to <text>"
+      else
+        return "topic add(at)|prepend|del(ete)|replace|sep(arator)|learn|restore|clear|set: " + \
+               "manipulate the topic of the current channel; use topic <#channel> <command> " + \
+               "for private addressing"
+      end
+    end
+  end
+
+  def handletopic(m, param)
+    return unless m.kind_of?(PrivMessage)
+    if m.public?
+      ch = m.channel.downcase
+    else
+      ch = param[:channel].downcase
+    end
+    cmd = param[:command]
+    txt = param[:text].join(" ")
+
+    unless @bot.channels.has_key?(ch)
+      m.reply "I am not in channel #{ch}"
+      return
+    end
+
+    case cmd
+    when /^a(dd|ppend)$/
+      topicappend(m, ch, txt)
+    when 'prepend'
+      topicprepend(m, ch, txt)
+    when 'addat'
+      if txt =~ /\s*(-?\d+)\s+(.*)\s*/
+        num = $1.to_i - 1
+        num += 1 if num < 0
+        txt = $2
+        topicaddat(m, ch, num, txt)
+      end
+    when /^del(ete)?$/
+      if txt =~ /\s*(-?\d+)\s*/
+        num=$1.to_i - 1
+        num += 1 if num < 0
+        topicdel(m, ch, num)
+      end
+    when 'set'
+      topicset(m, ch, txt)
+    when 'clear'
+      topicset(m, ch, '')
+    when /^sep(arator)?$/
+      topicsep(m, ch, txt)
+    when 'learn'
+      learntopic(m, ch)
+    when 'replace'
+      if txt =~ /\s*(-?\d+)\s+(.*)\s*/
+        num = $1.to_i - 1
+        num += 1 if num < 0
+        txt = $2
+        replacetopic(m, ch, num, txt)
+      end
+    when 'restore'
+      restoretopic(m, ch)
+    else
+      m.reply 'unknown command'
+    end
+  end
+
+  def topicsep(m, ch, txt)
+    if txt
+      sep = txt.strip
+      if sep != ""
+        setsep(ch, sep)
+      end
+    end
+    m.reply "Topic separator set to #{getsep(ch)}"
+  end
+
+  def setsep(ch, sep)
+    if @registry.has_key?(ch)
+      data = @registry[ch]
+    else
+      data = Hash.new
+    end
+
+    oldsep = getsep(ch)
+    topic = @bot.channels[ch].topic.to_s
+    topicarray = topic.split(/\s+#{Regexp.escape(oldsep)}\s*/)
+
+    if sep != oldsep and topicarray.length > 0
+      newtopic = topicarray.join(" #{sep} ")
+      @bot.topic ch, newtopic
+    end
+
+    data[:separator] = sep
+    @registry[ch] = data
+  end
+
+  def getsep(ch)
+    if @registry.has_key?(ch)
+      if @registry[ch].has_key?(:separator)
+        return @registry[ch][:separator]
+      end
+    end
+    return @separator
+  end
+
+  def topicaddat(m, channel, num, txt)
+    sep = getsep(channel)
+    topic = @bot.channels[channel].topic.to_s
+    topicarray = topic.split(/\s+#{Regexp.escape(sep)}\s*/)
+    topicarray.insert(num, txt)
+    newtopic = topicarray.join(" #{sep} ")
+    @bot.topic channel, newtopic
+  end
+
+  def topicappend(m, ch, txt)
+    topicaddat(m, ch, -1, txt)
+  end
+
+  def topicprepend(m, ch, txt)
+    topicaddat(m, ch, 0, txt)
+  end
+
+  def topicdel(m, channel, num)
+    sep = getsep(channel)
+    topic = @bot.channels[channel].topic.to_s
+    topicarray = topic.split(/\s+#{Regexp.escape(sep)}\s*/)
+    topicarray.delete_at(num)
+    newtopic = topicarray.join(" #{sep} ")
+    @bot.topic channel, newtopic
+  end
+
+  def learntopic(m, channel)
+    return if !@bot.auth.allow?("learntopic", m.source, m.replyto)
+    topic = @bot.channels[channel].topic.to_s
+    if @registry.has_key?(channel)
+      data = @registry[channel]
+    else
+      data = Hash.new
+    end
+    data[:topic] = topic
+    @registry[channel] = data
+    m.okay
+  end
+
+  def replacetopic(m, channel, num, txt)
+    return if !@bot.auth.allow?("topic", m.source, m.replyto)
+    sep = getsep(channel)
+    topic = @bot.channels[channel].topic.to_s
+    topicarray = topic.split(/\s+#{Regexp.escape(sep)}\s*/)
+    topicarray[num] = txt
+    newtopic = topicarray.join(" #{sep} ")
+    @bot.topic channel, newtopic
+  end
+  
+  def restoretopic(m, channel)
+    return if !@bot.auth.allow?("restoretopic", m.source, m.replyto)
+    if @registry.has_key?(channel) && @registry[channel].has_key?(:topic)
+      topic = @registry[channel][:topic]
+      @bot.topic channel, topic
+    else
+      m.reply "I don't remember any topic for this channel"
+    end
+  end
+
+  def topicset(m, channel, text)
+    return if !@bot.auth.allow?("topic", m.source, m.replyto)
+    @bot.topic channel, text
+  end
+
+end
+plugin = TopicPlugin.new
+plugin.map 'topic :command *text', :action => 'handletopic', :public => true, :private => false
+plugin.map 'topic :channel :command *text', :action => 'handletopic', :public => false, :private => true
+