rbot 0.9.9

data/data/rbot/plugins/fish.rb

@@ -0,0 +1,61 @@
+require 'net/http'
+require 'uri/common'
+Net::HTTP.version_1_2
+
+class BabelPlugin < Plugin
+  def help(plugin, topic="")
+    "translate to <lang> <string> => translate from english to <lang>, translate from <lang> <string> => translate to english from <lang>, translate <fromlang> <tolang> <string> => translate from <fromlang> to <tolang>. Languages: en, fr, de, it, pt, es, nl"
+  end
+  def translate(m, params)
+    langs = ["en", "fr", "de", "it", "pt", "es", "nl"]
+    trans_from = params[:fromlang] ? params[:fromlang] : 'en'
+    trans_to = params[:tolang] ? params[:tolang] : 'en'
+    trans_text = params[:phrase].to_s
+    
+    query = "/babelfish/tr"
+    lang_match = langs.join("|")
+    unless(trans_from =~ /^(#{lang_match})$/ && trans_to =~ /^(#{lang_match})$/)
+      m.reply "invalid language: valid languagess are: #{langs.join(' ')}"
+      return
+    end
+
+    data_text = URI.escape trans_text
+    trans_pair = "#{trans_from}_#{trans_to}"
+    data = "lp=#{trans_pair}&doit=done&intl=1&tt=urltext&urltext=#{data_text}"
+
+    # check cache for previous lookups
+    if @registry.has_key?("#{trans_pair}/#{data_text}")
+      m.reply @registry["#{trans_pair}/#{data_text}"]
+      return
+    end
+
+    http = @bot.httputil.get_proxy(URI.parse("http://babelfish.altavista.com"))
+
+    http.start {|http|
+      resp = http.post(query, data, {"content-type",
+      "application/x-www-form-urlencoded"})
+  
+  if (resp.code == "200")
+    resp.body.each_line do |l|
+      if(l =~ /^\s+<td bgcolor=white class=s><div style=padding:10px;>(.*)<\/div>/)
+        answer = $1
+        # cache the answer
+        if(answer.length > 0)
+          @registry["#{trans_pair}/#{data_text}"] = answer
+        end
+        m.reply answer
+        return
+      end
+    end
+    m.reply "couldn't parse babelfish response html :("
+  else
+    m.reply "couldn't talk to babelfish :("
+  end
+  }
+  end
+end
+plugin = BabelPlugin.new
+plugin.map 'translate to :tolang *phrase'
+plugin.map 'translate from :fromlang *phrase'
+plugin.map 'translate :fromlang :tolang *phrase'
+

data/data/rbot/plugins/fortune.rb

@@ -0,0 +1,22 @@
+class FortunePlugin < Plugin
+  def help(plugin, topic="")
+    "fortune [<module>] => get a (short) fortune, optionally specifying fortune db"
+  end
+  def fortune(m, params)
+    db = params[:db]
+    fortune = nil
+    ["/usr/games/fortune", "/usr/bin/fortune", "/usr/local/bin/fortune"].each {|f|
+      if FileTest.executable? f
+        fortune = f
+        break
+      end
+    }
+    m.reply "fortune binary not found" unless fortune
+    ret = Utils.safe_exec(fortune, "-n", "255", "-s", db)
+    m.reply ret.gsub(/\t/, "  ").split(/\n/).join(" ")
+    return
+  end
+end
+plugin = FortunePlugin.new
+plugin.map 'fortune :db', :defaults => {:db => 'fortunes'},
+                          :requirements => {:db => /^[^-][\w-]+$/}

data/data/rbot/plugins/freshmeat.rb

@@ -0,0 +1,98 @@
+require 'rexml/document'
+require 'uri/common'
+
+class FreshmeatPlugin < Plugin
+  include REXML
+  def help(plugin, topic="")
+    "freshmeat search [<max>=4] <string> => search freshmeat for <string>, freshmeat [<max>=4] => return up to <max> freshmeat headlines"
+  end
+  
+  def search_freshmeat(m, params)
+    max = params[:limit].to_i
+    search = params[:search].to_s
+    max = 8 if max > 8
+    begin
+      xml = @bot.httputil.get(URI.parse("http://freshmeat.net/search-xml/?orderby=locate_projectname_full_DESC&q=#{URI.escape(search)}"))
+    rescue URI::InvalidURIError, URI::BadURIError => e
+      m.reply "illegal search string #{search}"
+      return
+    end
+    unless xml
+      m.reply "search for #{search} failed"
+      return
+    end
+    doc = Document.new xml
+    unless doc
+      m.reply "search for #{search} failed"
+      return
+    end
+    matches = Array.new
+    max_width = 250
+    title_width = 0
+    url_width = 0
+    done = 0
+    doc.elements.each("*/match") {|e|
+      name = e.elements["projectname_short"].text
+      url = "http://freshmeat.net/projects/#{name}/"
+      desc = e.elements["desc_short"].text
+      title = e.elements["projectname_full"].text
+      #title_width = title.length if title.length > title_width
+      url_width = url.length if url.length > url_width
+      matches << [title, url, desc]
+      done += 1
+      break if done >= max
+    }
+    if matches.length == 0
+      m.reply "not found: #{search}"
+    end
+    matches.each {|mat|
+      title = mat[0]
+      url = mat[1]
+      desc = mat[2]
+      desc.gsub!(/(.{#{max_width - 3 - url_width}}).*/, '\1..')
+      reply = sprintf("%s | %s", url.ljust(url_width), desc)
+      m.reply reply
+    }
+  end
+  
+  def freshmeat(m, params)
+    max = params[:limit].to_i
+    max = 8 if max > 8
+    xml = @bot.httputil.get(URI.parse("http://images.feedstermedia.com/feedcache/ostg/freshmeat/fm-releases-global.xml"))
+    unless xml
+      m.reply "freshmeat news parse failed"
+      return
+    end
+    doc = Document.new xml
+    unless doc
+      m.reply "freshmeat news parse failed"
+      return
+    end
+    matches = Array.new
+    max_width = 60
+    title_width = 0
+    done = 0
+    doc.elements.each("*/channel/item") {|e|
+      desc = e.elements["description"].text
+      title = e.elements["title"].text
+      #title.gsub!(/\s+\(.*\)\s*$/, "")
+      title.strip!
+      title_width = title.length if title.length > title_width
+      matches << [title, desc]
+      done += 1
+      break if done >= max
+    }
+    matches.each {|mat|
+      title = mat[0]
+      #desc = mat[1]
+      #desc.gsub!(/(.{#{max_width - 3 - title_width}}).*/, '\1..')
+      #reply = sprintf("%#{title_width}s | %s", title, desc)
+      m.reply title
+    }
+  end
+end
+plugin = FreshmeatPlugin.new
+plugin.map 'freshmeat search :limit *search', :action => 'search_freshmeat',
+            :defaults => {:limit => 4}, :requirements => {:limit => /^\d+$/}
+plugin.map 'freshmeat :limit', :defaults => {:limit => 4}, 
+                               :requirements => {:limit => /^\d+$/}

data/data/rbot/plugins/google.rb

@@ -0,0 +1,51 @@
+require 'net/http'
+require 'uri/common'
+
+Net::HTTP.version_1_2
+
+class GooglePlugin < Plugin
+  def help(plugin, topic="")
+    "search <string> => search google for <string>"
+  end
+  def privmsg(m)
+    unless(m.params && m.params.length > 0)
+      m.reply "incorrect usage: " + help(m.plugin)
+      return
+    end
+    searchfor = URI.escape m.params
+
+    query = "/search?q=#{searchfor}&btnI=I%27m%20feeling%20lucky"
+    result = "not found!"
+
+    proxy_host = nil
+    proxy_port = nil
+
+    if(ENV['http_proxy'])
+      if(ENV['http_proxy'] =~ /^http:\/\/(.+):(\d+)$/)
+        proxy_host = $1
+        proxy_port = $2
+      end
+    end
+
+    http = @bot.httputil.get_proxy(URI.parse("http://www.google.com"))
+
+    begin
+      http.start {|http|
+        resp = http.get(query)
+        if resp.code == "302"
+          result = resp['location']
+        end
+      }
+    rescue => e
+      p e
+      if e.response && e.response['location']
+        result = e.response['location']
+      else
+        result = "error!"
+      end
+    end
+    m.reply "#{m.params}: #{result}"
+  end
+end
+plugin = GooglePlugin.new
+plugin.register("search")

data/data/rbot/plugins/host.rb

@@ -0,0 +1,14 @@
+class HostPlugin < Plugin
+  def help(plugin, topic="")
+    "host <domain> => query nameserver about domain names and zones for <domain>"
+  end
+  def privmsg(m)
+    unless(m.params =~ /^(\w|-|\.)+$/)
+      m.reply "incorrect usage: " + help(m.plugin)
+      return
+    end
+    m.reply Utils.safe_exec("host", m.params)
+  end
+end
+plugin = HostPlugin.new
+plugin.register("host")

data/data/rbot/plugins/httpd.rb.disabled

@@ -0,0 +1,35 @@
+require 'webrick'
+
+class HttpPlugin < Plugin
+  include WEBrick
+
+
+  def initialize
+    super
+    @http_server = HTTPServer.new(
+      :Port => 5555
+    )
+    @http_server.mount_proc("/") { |req, resp|
+      resp['content-type'] = 'text/html'
+      resp.body = "<html><head><title>rbot httpd plugin</title></head><body>"
+      resp.body += "#{@bot.status} <br />"
+      resp.body += "hello from rbot."
+      resp.body += "</body>"
+      raise HTTPStatus::OK
+    }
+    Thread.new {
+      @http_server.start
+    }
+  end
+  def cleanup
+    @http_server.shutdown
+  end
+  def help(plugin, topic="")
+    "no help yet"
+  end
+  def privmsg(m)
+  end
+end
+
+plugin = HttpPlugin.new
+plugin.register("http")

data/data/rbot/plugins/insult.rb

@@ -0,0 +1,258 @@
+class InsultPlugin < Plugin
+
+## insults courtesy of http://insulthost.colorado.edu/
+
+##
+# Adjectives
+##
+@@adj = [
+"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",
+"boil-brained",
+"tottering",
+"hedge-born",
+"hugger-muggered",
+"elf-skinned",
+]
+
+##
+# Amounts 
+##
+@@amt = [
+"accumulation",
+"bucket",
+"coagulation",
+"enema-bucketful",
+"gob",
+"half-mouthful",
+"heap",
+"mass",
+"mound",
+"petrification",
+"pile",
+"puddle",
+"stack",
+"thimbleful",
+"tongueful",
+"ooze",
+"quart",
+"bag",
+"plate",
+"ass-full",
+"assload",
+]
+
+##
+# Objects
+##
+@@noun = [
+"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 assholes",
+"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",
+"jizzum",
+"cold sores",
+"anal warts",
+]
+  
+  def help(plugin, topic="")
+    if(plugin == "insult")
+      return "insult me|<person> => insult you or <person>"
+    elsif(plugin == "msginsult")
+      return "msginsult <nick> => insult <nick> via /msg"
+    else
+      return "insult module topics: msginsult, insult"
+    end
+  end
+  def privmsg(m)
+    suffix=""
+    unless(m.params)
+      m.reply "incorrect usage: " + help(m.plugin)
+      return
+    end
+    msgto = m.channel
+    if(m.plugin =~ /^msginsult$/)
+      prefix = "you are "
+      if (m.params =~ /^#/)
+        prefix += "all "
+      end
+      msgto = m.params
+      suffix = " (from #{m.sourcenick})"
+    elsif(m.params =~ /^me$/)
+      prefix = "you are "
+    else
+      prefix = "#{m.params} is "
+    end
+    insult = generate_insult
+    @bot.say msgto, prefix + insult + suffix
+  end
+  def generate_insult
+    adj = @@adj[rand(@@adj.length)]
+    adj2 = ""
+    loop do
+      adj2 = @@adj[rand(@@adj.length)]
+      break if adj2 != adj
+    end
+    amt = @@amt[rand(@@amt.length)]
+    noun = @@noun[rand(@@noun.length)]
+    start = "a "
+    start = "an " if ['a','e','i','o','u'].include?(adj[0].chr)
+    "#{start}#{adj} #{amt} of #{adj2} #{noun}"
+  end
+end
+plugin = InsultPlugin.new
+plugin.register("insult")
+plugin.register("msginsult")
+