protolink 0.2.7 → 0.2.8

data/example/linkbot/plugins/jason.rb

@@ -0,0 +1,73 @@
+require 'active_support'
+
+class Jason < Linkbot::Plugin
+  Linkbot::Plugin.register('jason', self,
+    {
+      :message => {:regex => Regexp.new('(?:!randomlink|!jason)(?: (\d+))?'), :handler => :on_message, :help => :help},
+      :"direct-message" => {:regex => Regexp.new('(?:!randomlink|!jason)(?: (\d+))?'), :handler => :on_message, :help => :help}
+    }
+  )
+  
+  def self.on_message(message, matches) 
+    times = matches[0]
+        reddits = {
+          "/r/pics/" => 10,
+          "/r/comics/" => 10,
+          "/r/wallpaper/" => 10,
+          "/r/gonewild/" => 2,
+          "/r/funny/" => 10,
+          "/r/fffffffuuuuuuuuuuuu/" => 10,
+          "/r/reddit.com/" => 10,
+        	"/r/WTF/" => 10,
+        	"/r/bestof/" => 10,
+        	"/r/videos/" => 10,
+        	"/r/aww" => 10,
+        }
+ 
+        # Build out a weighted range
+        total_value = reddits.values.reduce(:+)
+        last_end = 0.0
+        
+        reddits.each do |k,v|
+          reddits[k] = [last_end, last_end + (v.to_f / total_value)*100]
+          last_end += (v.to_f / total_value) * 100
+        end
+        
+        times = times ? times.to_i : 1
+        times = times <= 5 ? times : 5 
+ 
+        messages = []
+              
+        1.upto(times) do
+          
+          # Brute force this mother
+          subreddit = nil
+          val = rand(100000)/1000.0
+          reddits.each {|k,v|
+            if val >= v[0] && val <= v[1]
+              subreddit = "http://reddit.com#{k}.json"
+              break
+            end
+          }
+                  
+          puts subreddit
+          doc = ActiveSupport::JSON.decode(open(subreddit, "Cookie" => "reddit_session=8390507%2C2011-03-22T07%3A06%3A44%2C2516dcc69a22ad297b9900cbde147b365203bbbb").read)
+          
+          url = doc["data"]["children"][rand(doc["data"]["children"].length)]["data"]["url"]
+          
+          # Check if it's an imgur link without an image extension
+          if url =~ /http:\/\/(www\.)?imgur\.com/ && !['jpg','png','gif'].include?(url.split('.').last)
+            # Fetch the imgur page and pull out the image
+            doc = Hpricot(open(url).read)
+            url = doc.search("img")[1]['src']
+          end
+          
+          messages << url
+        end
+        return messages.join("\n")
+  end
+  
+  def self.help
+    "!randomlink - return a random link"
+  end
+end

data/example/linkbot/plugins/karma.rb.inactive

@@ -0,0 +1,75 @@
+class Karma < Linkbot::Plugin
+  Linkbot::Plugin.register('karma', self,
+    {
+      :star => {:handler => :on_starred},
+      :unstar => {:handler => :on_unstarred}
+    }
+  )
+  
+  #TODO
+  #def self.on_starred(message, matches)
+  #  starred_user = msg['star']['message']['user']
+  #  starred_message = msg['star']['message']['message']
+  #  karma = self.get_karma(starred_user)
+  #  msg = ""
+  #  if user['id'] == starred_user['id']
+  #    Linkbot.db.execute("update karma set karma = #{karma - 5} where user_id = '#{starred_user['id']}'")
+  #    msg = "You can't vote for yourself. Lose 5 karma."
+  #  else
+  #    Linkbot.db.execute("update karma set karma = #{karma + 5} where user_id = '#{starred_user['id']}'")
+  #    starred_username = Linkbot.db.execute("select username from users where user_id = '#{starred_user['id']}'")[0][0]
+  #    username = Linkbot.db.execute("select username from users where user_id = '#{user['id']}'")[0][0]
+  #  end
+  #  msg
+  #end
+  
+  #TODO
+  #def self.on_unstarred(text, matches)
+  #  starred_user = msg['star']['message']['user']
+  #  starred_message = msg['star']['message']['message']
+  #  karma = self.get_karma(starred_user)
+  #  msg = ""
+  #  if user['id'] == starred_user['id']
+  #    Linkbot.db.execute("update karma set karma = #{karma - 20} where user_id = '#{starred_user['id']}'")
+  #    msg = "That was incredibly stupid. Lose 20 karma."
+  #  else
+  #    Linkbot.db.execute("update karma set karma = #{karma - 5} where user_id = '#{starred_user['id']}'")
+  #    starred_username = Linkbot.db.execute("select username from users where user_id = '#{starred_user['id']}'")[0][0]
+  #    username = Linkbot.db.execute("select username from users where user_id = '#{user['id']}'")[0][0]
+  #  end
+  #  msg
+  #end
+  
+  def self.on_newlink(message, url)
+    karma = self.get_karma(message.user_id)
+    Linkbot.db.execute("update karma set karma = #{karma + 1} where user_id = '#{message.user_id}'")
+  end
+  
+  def self.on_dupe(message, url, duped_user, duped_timestamp)
+    karma = self.get_karma(message.user_id)
+    Linkbot.db.execute("update karma set karma = #{karma - 5} where user_id = '#{message.user_id}'")
+    "Removed 5 karma"
+  end
+  
+  def self.get_karma(user_id)
+    karma = 0
+    # Create the user's info, if it does not exist
+    rows = Linkbot.db.execute("select * from users where user_id = '#{user_id}'")
+    if rows.empty?
+      #linkbot should ensure creating a user... bail out here if it hasn't
+      raise "could not find user #{user_id}"
+    end
+
+    rows = Linkbot.db.execute("select user_id,karma from karma where user_id = '#{user_id}'")
+    if rows.empty?
+      Linkbot.db.execute("insert into karma (user_id,karma) values ('#{user_id}', 0)")
+    else
+      karma = rows[0][1]
+    end
+    return karma
+  end
+  
+  if Linkbot.db.table_info('karma').empty?
+    Linkbot.db.execute('CREATE TABLE karma (user_id INTEGER, karma INTEGER)');
+  end
+end

data/example/linkbot/plugins/last.rb

@@ -0,0 +1,40 @@
+class Last < Linkbot::Plugin
+    def self.on_message(message, match)
+      count = match[0] || 5
+      rows = nil
+      mess = ""
+      if match[1]
+        rows = Linkbot.db.execute("select l.url,l.dt from links l, users u where u.username='#{match[1]}' and u.user_id = l.user_id order by l.dt desc limit #{count}")
+        i = 1
+        if rows.length > 0
+          rows.each {|row| mess = mess + "#{i}. #{row[0]} (#{::Util.ago_in_words(Time.now, Time.at(row[1]))})\n"; i = i + 1}
+        else
+          mess = "No links from user '#{match[1]}'"
+        end
+      else
+        rows = Linkbot.db.execute("select l.url,l.dt,u.username,u.showname from links l, users u where l.user_id = u.user_id order by l.dt desc limit #{count}")
+        i = 1
+        if rows.length > 0
+          rows.each {|row| 
+            username = (row[3].nil? || row[3] == '') ? row[2] : row[3]
+            mess = mess + "#{i}. #{row[0]} (#{username} #{::Linkbot::Util.ago_in_words(Time.now, Time.at(row[1]))})\n"; i = i + 1
+          }
+        else
+          mess = "No links"
+        end
+      end
+      mess
+
+    end
+
+    def self.help
+      "!last (num) (nick) - Displays the last links provided by users. (num) is optional and defaults to 5; (nick) is optional and returns only links from the specified user."
+    end
+
+    Linkbot::Plugin.register('last', self,
+      {
+        :message => {:regex => /!last(?: (\d+))?(?: (.*))?/, :handler => :on_message, :help => :help},
+        :"direct-message" => {:regex => /!last(?: (\d+))?(?: (.*))?/, :handler => :on_message, :help => :help}
+      }
+    )
+end

data/example/linkbot/plugins/links.rb.inactive

@@ -0,0 +1,41 @@
+class Linkbot
+  class Dupe    
+    Linkbot::Plugin.register('links', self,
+      {
+        :message => {:regex => Regexp.new('(?i)\b((?:[a-z][\w-]+:(?:/{1,3}|[a-z0-9%])|www\d{0,3}[.]|[a-z0-9.\-]+[.][a-z]{2,4}/)(?:[^\s()<>]+|\(([^\s()<>]+|(\([^\s()<>]+\)))*\))+(?:\(([^\s()<>]+|(\([^\s()<>]+\)))*\)|[^\s`!()\[\]{};:\'".,<>?«»“”‘’]))'), 
+                    :handler => :on_message}
+      }
+    )
+  
+    def self.on_message(message, matches)
+      url = matches[0]
+      
+      messages = []
+      rows = Linkbot.db.execute("select username, dt from links, users where links.user_id=users.user_id and url = '#{url}'")
+      if rows.empty?
+        Linkbot::Plugin.plugins.each {|k,v|
+          messages << v[:ptr].on_newlink(message, url).join("\n") if(v[:ptr].respond_to?(:on_newlink)) 
+        }
+        # Add the link to the dupe table
+        Linkbot.db.execute("insert into links (user_id, dt, url) VALUES ('#{message.user_id}', '#{Time.now}', '#{url}')")
+      else
+        Linkbot::Plugin.plugins.each {|k,v|
+          messages << v[:ptr].on_dupe(message, url, rows[0][0], rows[0][1]) if(v[:ptr].respond_to?(:on_dupe)) 
+        }
+      end  
+      messages.join("\n")
+    end
+  
+    if Linkbot.db.table_info('users').empty?
+      Linkbot.db.execute('CREATE TABLE users (user_id INTEGER, username TEXT, showname TEXT)')
+    end
+    if Linkbot.db.table_info('links').empty?
+      Linkbot.db.execute('CREATE TABLE links (user_id INTEGER, dt DATETIME, url TEXT)');
+    end
+
+    if Linkbot.db.table_info('trans').empty?
+      Linkbot.db.execute('CREATE TABLE trans (user_id INTEGER, karma INTEGER, trans TEXT)');
+    end
+    
+  end
+end

data/example/linkbot/plugins/log.rb

@@ -0,0 +1,17 @@
+class MessageLog < Linkbot::Plugin
+  Linkbot::Plugin.register('log', self,
+    {
+      :message => {:handler => :on_message}
+    }
+  )
+  
+  def self.on_message(message, matches)
+    # Pop off a message if we've reached our max
+    if @@message_log.length >= 100
+      @@message_log.pop
+    end
+    
+    @@message_log.unshift(message)
+    ""
+  end
+end

data/example/linkbot/plugins/okay.rb

@@ -0,0 +1,11 @@
+class Okay < Linkbot::Plugin
+    def self.on_message(message, matches)
+      "http://i.imgur.com/p7uaa.jpg"
+    end
+
+    Linkbot::Plugin.register('okay', self,
+      {
+        :message => {:regex => /okay\./i, :handler => :on_message}
+      }
+    )
+end

data/example/linkbot/plugins/onion.rb

@@ -0,0 +1,19 @@
+require 'active_support'
+
+class Onion < Linkbot::Plugin
+  Linkbot::Plugin.register('onion', self,
+    {
+      :message => {:regex => Regexp.new('!onion'), :handler => :on_message, :help => :help},
+      :"direct-message" => {:regex => Regexp.new('!onion'), :handler => :on_message, :help => :help}
+    }
+  )
+  
+  def self.on_message(message, matches) 
+    links = Hpricot(open('http://feeds.theonion.com/theonion/daily')).search('feedburner:origlink').collect{|l| l.html}
+    links[rand(links.length)]
+  end
+  
+  def self.help
+    "!onion - return an onion link from the RSS feed"
+  end
+end

data/example/linkbot/plugins/popcorn.rb

@@ -0,0 +1,32 @@
+class Popcorn < Linkbot::Plugin
+    def self.on_message(message, matches)
+      quotes = ['http://i.imgur.com/qlRu3.gif',
+                'http://i.imgur.com/DDMBW.gif',
+                'http://i.imgur.com/SbyLU.gif',
+                'http://i.imgur.com/y8F8s.gif',
+                'http://i.imgur.com/lozGr.gif',
+                'http://i.imgur.com/YG6vv.gif',
+                'http://i.imgur.com/IUoJx.gif',
+                'http://i.imgur.com/lae9h.gif',
+                'http://www.strangecosmos.com/images/content/167278.gif',
+                'http://i.imgur.com/enRL0.gif',
+                'http://i.imgur.com/QfkRE.gif',
+                'http://i.imgur.com/kXfy9.gif',
+                'http://i.imgur.com/ZDdhJ.gif',
+                'http://www.threadbombing.com/data/media/2/scarjo_popcorn.gif'
+	]
+      quotes[rand(quotes.length)]
+    end
+
+    def self.help
+      "!popcorn - Everyone loves popcorn"
+    end
+
+    
+    Linkbot::Plugin.register('popcorn', self,
+      {
+        :message => {:regex => /!popcorn/, :handler => :on_message, :help => :help},
+        :"direct-message" => {:regex => /!popcorn/, :handler => :on_message, :help => :help}
+      }
+    )
+end

data/example/linkbot/plugins/qwantz.rb

@@ -0,0 +1,29 @@
+class Qwantz < Linkbot::Plugin
+    Linkbot::Plugin.register('qwantz', self,
+      {
+        :message => {:regex => /!qwantz/, :handler => :on_message, :help => :help},
+        :"direct-message" => {:regex => /!qwantz/, :handler => :on_message, :help => :help}
+      }
+    )
+  
+    def self.on_message(message, matches)
+        doc = Hpricot(open('http://qwantz.com/index.php'))
+        link = doc.search("div.randomquote a")[1]
+        doc = Hpricot(open(link['href']))
+        img = doc.search('img.comic')
+        "#{link.inner_html.strip}\n#{img.first['src']}"
+    end
+    
+    def self.help
+      helpers = [
+      "HILARIOUS OUTTAKES COMICS",
+      "PHILOSOPHY COMICS",
+      "UNINFORMED OPINIONS ABOUT ARCHAEOLOGY COMICS",
+      "COMICS WITH NON-TWIST ENDINGS",
+      "COMICS FROM THE FUTURE",
+      "ENTHUSIASTIC USE OF OUTDATED CATCH-PHRASES COMICS",
+      "BAD DECISIONS COMICS"
+      ]
+      "!qwantz - #{helpers[rand(helpers.length)]}"
+    end
+end

data/example/linkbot/plugins/search.rb

@@ -0,0 +1,32 @@
+class Search < Linkbot::Plugin
+  Linkbot::Plugin.register('search', self,
+    {
+      :message => {:regex => Regexp.new('!search (.*)'), :handler => :on_message, :help => :help}
+    }
+  )
+  
+  def self.on_message(message, matches)
+    search = matches[0]
+    rows = nil
+    mess = ""
+    rows = Linkbot.db.execute('select l.url,u.username,l.dt,u.showname from links l, users u where l.url like ? and l.user_id = u.user_id order by l.dt desc limit 10', "%#{search}%")
+    i = 1
+    if rows.length > 0
+      rows.each {|row|
+        username = (row[3].nil? || row[3] == '') ? row[1] : row[3]
+        mess = mess + "#{i}. #{row[0]} (#{username} #{::Util.ago_in_words(Time.now, Time.at(row[2]))})\n"; i = i + 1
+      }
+    else
+      mess = "No links"
+    end
+    
+    # Take the karma hit
+    karma = Linkbot.db.execute("select karma from karma where user_id=#{user['id']}")[0][0] - 1
+    Linkbot.db.execute("update karma set karma=#{karma} where user_id=#{user['id']}")
+    mess
+  end
+  
+  def self.help
+    "!search query - search for links that you think should be dupes"
+  end
+end

data/example/linkbot/plugins/shutup.rb

@@ -0,0 +1,11 @@
+class Shutup < Linkbot::Plugin
+    def self.on_message(message, matches)
+      "No, YOU #{matches[0]}"
+    end
+
+    Linkbot::Plugin.register('shutup', self,
+      {
+        :message => {:regex => /(.*), linkbot/, :handler => :on_message}
+      }
+    )
+end

data/example/linkbot/plugins/slap.rb

@@ -0,0 +1,15 @@
+class Slap < Linkbot::Plugin
+  Linkbot::Plugin.register('slapper', self,
+    {
+      :message => {:regex => /\/slap(?: (@[\w\s]+))?/, :handler => :on_message, :help => :help}
+    }
+  )
+  
+  def self.on_message(message, matches)
+    "#{message.user_name} slaps #{matches[0]} around a bit with a large trout"
+  end
+  
+  def self.help
+    "/slap [username] - Flashback to the halcyon days of the 1990s when hammer pants were all the rage"
+  end
+end

data/example/linkbot/plugins/snap.rb

@@ -0,0 +1,18 @@
+class Snap < Linkbot::Plugin
+    def self.on_message(message, matches)
+      snaps = [	"http://i52.tinypic.com/302melk.gif",
+      		"http://www.youtube.com/watch?v=qL3TWooBGrI",
+      		"http://i51.tinypic.com/2roj8k0.jpg",
+      		"http://i3.photobucket.com/albums/y79/IJG/oh_snap.gif",
+      		"http://webimages.stephen-wright.net/house-ohsnap.gif",
+      		"http://www.gifsoup.com/webroot/animatedgifs/108696_o.gif"
+            ]
+      snaps[rand(snaps.length)]
+    end
+
+    Linkbot::Plugin.register('snap', self,
+      {
+        :message => {:regex => /SNAP\!/, :handler => :on_message}
+      }
+    )
+end

data/example/linkbot/plugins/stab.rb

@@ -0,0 +1,12 @@
+class Stab < Linkbot::Plugin
+  Linkbot::Plugin.register('stab', self,
+    {
+      :message => {:regex => /\/stab(?: ([\w\s]+))?/, :handler => :on_message}
+    }
+  )
+  
+  def self.on_message(message, matches)
+    name = matches[0] || "everyone in the face"
+    "#{message.user_name} stabs #{name}"
+  end
+end

data/example/linkbot/plugins/store.rb

@@ -0,0 +1,71 @@
+class Store < Linkbot::Plugin
+    def self.on_message(message, matches)
+      mymsg = nil
+      
+      if matches[0] && matches[0].length > 0
+        args = matches[0].split(" ")
+        command = args.shift
+        
+        Linkbot::Plugin.plugins.each {|k,v|
+          if v[:handlers][:"linkbot-store"] && v[:handlers][:"linkbot-store"][:regex] && v[:handlers][:"linkbot-store"][:regex].match(command)
+            cost = v[:ptr].respond_to?(:cost) ? v[:ptr].send(:cost).to_i : 0
+            if check_karma(user, cost)
+              begin
+                mymsg = v[:ptr].send(v[:handlers][:"linkbot-store"][:handler], user, args).join("\n")
+                deduct_karma(user, cost)
+              rescue StoreError
+                mymsg = $!.message
+              end
+            else
+              mymsg = "Not enough karma"
+            end
+          end 
+        }
+      end
+      
+      
+      if mymsg.nil?
+        # Build out the menu
+        mymsg = [
+          "Karma Store",
+          "-----------",
+          "Buy some stuff with karma. To buy, just use the !store command, followed by the appropriate stuff.",
+          ""
+        ]
+        
+        num = 1
+        Linkbot::Plugin.plugins.each {|k,v|
+          if v[:handlers][:"linkbot-store"] && v[:ptr].respond_to?(:cost) && v[:ptr].respond_to?(:advertisement)
+            mymsg << "#{num}. [COST #{v[:ptr].send(:cost)}] #{v[:ptr].send(:advertisement)}"
+            num += 1
+          end 
+        }
+        
+        mymsg = mymsg.join("\n")
+      end
+      mymsg
+    end
+    
+    def self.check_karma(user, cost)
+      karma = Linkbot.db.execute("select karma from karma where user_id=#{user['id']}")[0][0]
+      karma > cost
+    end
+    
+    def self.deduct_karma(user, cost)
+      karma = Linkbot.db.execute("select karma from karma where user_id=#{user['id']}")[0][0] - cost
+      Linkbot.db.execute("update karma set karma=#{karma} where user_id=#{user['id']}")
+    end
+    
+    def self.help
+      "!store - Buy some shit"
+    end
+    
+    Linkbot::Plugin.register('store', self,
+      {
+        :"direct-message" => {:regex => /!store(.*)/, :handler => :on_message, :help => :help},
+      }
+    )
+end
+
+class StoreError < StandardError
+end