muzang-plugins 1.0.0

data/.gitignore

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

data/Gemfile

@@ -0,0 +1,4 @@
+source 'http://rubygems.org'
+
+# Specify your gem's dependencies in muzang-plugins.gemspec
+gemspec

data/Rakefile

@@ -0,0 +1,11 @@
+#!/usr/bin/env rake
+require "bundler/gem_tasks"
+
+require 'rspec/core'
+require 'rspec/core/rake_task'
+RSpec::Core::RakeTask.new(:spec) do |spec|
+  spec.rspec_opts = ['-fd -c']
+  spec.pattern = FileList['spec/**/*_spec.rb']
+end
+
+task :default => :spec

data/lib/muzang-plugins.rb

@@ -0,0 +1,11 @@
+require 'muzang-plugins/version'
+require 'muzang-plugins/helpers'
+
+autoload :Eval,         'muzang-plugins/muzang-eval'
+autoload :LiveReload,   'muzang-plugins/muzang-livereload'
+autoload :Meme,         'muzang-plugins/muzang-meme'
+autoload :Motd,         'muzang-plugins/muzang-motd'
+autoload :NerdPursuit,  'muzang-plugins/muzang-nerdpursuit'
+autoload :PlusOne,      'muzang-plugins/muzang-plusone'
+autoload :Reddit,       'muzang-plugins/muzang-reddit'
+autoload :RubyGems,     'muzang-plugins/muzang-rubygems'

data/lib/muzang-plugins/helpers.rb

@@ -0,0 +1,39 @@
+module Muzang
+  module Plugins
+    module Helpers
+      DEFAULT_MATCH_OPTIONS = { position: 1 }
+
+      def on_channel?(message)
+        message.channel
+      end
+
+      def match?(message, options = {})
+        options = DEFAULT_MATCH_OPTIONS.merge(options)
+        message.message.match(options[:regexp]) ? message.message.match(options[:regexp])[options[:position]] : false
+      end
+
+      def on_join?(connection, message)
+        message.command == :join && message.nick == connection.nick
+      end
+
+      def create_database(file, container, variable)
+        unless File.exist?(@config = ENV["HOME"] + "/.muzang")
+          FileUtils.mkdir @config
+        end
+
+        unless File.exist? @config + "/#{file}"
+          db = YAML.dump container
+          File.open(@config + "/#{file}", "w"){|f| f.write(db)}
+        end
+
+        send(:"#{variable}=", YAML.load(File.open(@config + "/#{file}", "r").read))
+
+        unless self.respond_to?(:save)
+          self.class.send(:define_method, :save) do
+            File.open(@config + "/#{file}", "w"){|f| f.write YAML.dump(send(variable))}
+          end
+        end
+      end
+    end
+  end
+end

data/lib/muzang-plugins/muzang-eval.rb

@@ -0,0 +1,51 @@
+module Safe; end
+class << Safe
+   def safe(code, sandbox=nil)
+     error = nil
+
+     begin
+       $-w = nil
+       sandbox ||= Object.new.taint
+       yield(sandbox) if block_given?
+
+       $SAFE = 5
+       value = eval(code, sandbox.send(:binding))
+       result = Marshal.load(Marshal.dump(value))
+     rescue Exception => error
+       error = Marshal.load(Marshal.dump(error))
+     end
+
+     return result, error
+   end
+end
+
+def safe(*args, &block)
+  unless args.first =~ /EM|EventMachine/
+    Safe::safe(*args, &block)
+  end
+end
+
+class Eval
+  include Muzang::Plugins::Helpers
+
+  def initialize(bot)
+    @bot = bot
+  end
+
+  def call(connection, message)
+    if on_channel?(message)
+      if match?(message, :regexp => /^\% (.*)/, :position => 1)
+        operation = proc do
+          safe(message.message.match(/^\% (.*)/)[1])
+        end
+        callback = proc do |tuple|
+          result, error = tuple
+          connection.msg(message.channel, "#{result}") if result
+          connection.msg(message.channel, "Error: #{error}") if error
+        end
+        EM.defer(operation, callback)
+      end
+    end
+  end
+end
+

data/lib/muzang-plugins/muzang-livereload.rb

@@ -0,0 +1,19 @@
+class LiveReload
+  include Muzang::Plugins::Helpers
+
+  def initialize(bot)
+    @bot = bot
+  end
+
+  def call(connection, message)
+    if on_channel?(message)
+      if match?(message, :regexp => /^!reload$/, :position => 0)
+        @bot.plugins.each do |plugin, instance|
+          Kernel.load("muzang-plugins/muzang-#{plugin.to_s.downcase}.rb")
+          instance = plugin.new(@bot)
+          connection.msg(message.channel, "Reloading: #{plugin}")
+        end
+      end
+    end
+  end
+end

data/lib/muzang-plugins/muzang-meme.rb

@@ -0,0 +1,51 @@
+require "em-http-request"
+require "json"
+
+class Meme
+  include Muzang::Plugins::Helpers
+
+  MEMES = {
+    "idont" =>  { :image_id => 2485, :generator => 74 },
+    "yuno"  =>  { :image_id => 166088, :generator => 2 },
+    "orly"  =>  { :image_id => 117049, :generator => 920 },
+    "suc"   =>  { :image_id => 1031, :generator => 121 },
+    "all"   =>  { :image_id => 1121885, :generator => 6013 }
+  }
+
+  def initialize(bot)
+    @bot = bot
+  end
+
+  def call(connection, message)
+    message.message.match(/^meme$/) do
+      connection.msg("#{@bot.channels.first}", "Type 'meme [name of meme] \"Text0\" \"Text1\"'")
+      connection.msg("#{@bot.channels.first}", "Available memes: #{MEMES.keys.join(" ")}")
+    end
+    message.message.match(/^meme (.*?) "(.*?)"( "(.*?)")?$/) do |m|
+      if meme_ids = MEMES[m[1]]
+        @generator = meme_ids[:generator]
+        @image_id  = meme_ids[:image_id]
+      else
+        return nil
+      end
+
+      @text0 = m[2]
+      @text1 = m[4]
+
+      http = EventMachine::HttpRequest.new('http://version1.api.memegenerator.net/Instance_Create')
+             .get(:query => {:username => 'drug-bot',
+                             :password => 'drug-bot',
+                             :languageCode => 'en',
+                             :generatorID => @generator,
+                             :imageID => @image_id,
+                             :text0 => @text0,
+                             :text1 => @text1})
+
+      http.callback {
+        meme = JSON.parse(http.response)
+        url = "http://version1.api.memegenerator.net#{meme['result']['instanceImageUrl']}"
+        connection.msg("#{@bot.channels.first}", "Meme: #{url}")
+      }
+    end
+  end
+end

data/lib/muzang-plugins/muzang-motd.rb

@@ -0,0 +1,21 @@
+require 'muzang/version'
+
+class Motd
+  include Muzang::Plugins::Helpers
+
+  def initialize(bot)
+    @bot = bot
+  end
+
+  def call(connection, message)
+    if on_join?(connection, message)
+      connection.msg(message.channel, "DRUG-bot | Version: #{Muzang::VERSION} | Plugins: #{plugins}")
+    end
+  end
+
+  def plugins
+    list = ""
+    @bot.plugins.each{|plugin, instance| list << "*#{plugin}* "}
+    list
+  end
+end

data/lib/muzang-plugins/muzang-nerdpursuit.rb

@@ -0,0 +1,95 @@
+require "json"
+
+class NerdPursuit
+  include Muzang::Plugins::Helpers
+
+  attr_accessor :questions, :quiz_time
+
+  def initialize(bot)
+    @bot = bot
+    @quiz_time = false
+    @answers = {}
+    create_database("nerd_pursuit.yml", Array.new, :questions)
+  end
+
+  def all_questions
+    names = Dir["#{File.dirname(__FILE__)}/muzang-nerdpursuit/questions/**/*.json"]
+  end
+
+  def quiz!(&block)
+    @quiz_time = true
+    current_question # load current question
+  end
+
+  def end_quiz!
+    @quiz_time = false
+    @current_question = nil
+  end
+
+  def current_question
+    if @current_question
+      @current_question
+    else
+      begin
+        sample_question = (all_questions - questions).sample
+        questions << sample_question
+        save
+        @current_question = ::JSON.parse(File.open(sample_question).read)["question"]
+      end while(!valid?(@current_question))
+    end
+
+    @current_question
+  end
+
+  def valid?(question)
+    if question
+      question["category"] and question["text"] and question["right_answer"]
+    else
+      false
+    end
+  end
+
+  def find_winner
+    @winner = @answers.reject do |_, answer|
+      answer[:answer] != current_question["right_answer"][1..1]
+    end.sort_by do |_,answer|
+      answer[:time]
+    end
+  end
+
+  def period(time)
+    time # need for speed up tests
+  end
+
+  def call(connection, message)
+    if on_channel?(message)
+      if match?(message, :regexp => /^!quiz$/, :position => 0)
+        quiz!
+        connection.msg(message.channel, "Quiz time!")
+        EM.add_timer(period(1)) { connection.msg(message.channel, "Category: #{current_question["category"]}") }
+        EM.add_timer(period(2)) { connection.msg(message.channel, "Question: #{current_question["text"]}") }
+        4.times do |time|
+          EM.add_timer(period(2+time+1)) { connection.msg(message.channel, "Answer #{time+1}: #{current_question["a#{time+1}"]}") }
+        end
+        EM.add_timer(period(40)) do
+          connection.msg(message.channel, "Right answer: #{current_question["right_answer"][1..1]}")
+          @winner = find_winner
+          if @winner.first && @winner.first.first
+            connection.msg(message.channel, "The winner is... #{@winner.first.first}")
+          end
+          @answers = {}
+          @winner = nil
+          end_quiz!
+        end
+      end
+
+      if(answer = match?(message, :regexp => /\d/, :position => 0))
+        if @quiz_time
+          unless @answers[message.nick]
+            @answers[message.nick] = { :answer => answer, :time => Time.now }
+          end
+        end
+      end
+    end
+  end
+end

data/lib/muzang-plugins/muzang-nerdpursuit/questions/algorithms/fastes_sorting_algorithm.json

@@ -0,0 +1,14 @@
+{ "question" : {
+    "id": "",
+    "category": "algorithms",
+    "nerd_level": 3,
+    "text":"Which one is the fastest sorting algorithm?",
+    "a1": "Selection Sort",
+    "a2": "Quick Sort",
+    "a3": "Bubble Sort",
+    "a4": "All the same",
+    "right_answer":"a2",
+    "created_at": "2011-06-20",
+    "created_by": "eray"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/algorithms/run_time_of_bst.json

@@ -0,0 +1,14 @@
+{ "question" : {
+    "id": "",
+    "category": "algorithms",
+    "nerd_level": 2,
+    "text": "What's the average run time of a search in a Binary Search Tree?",
+    "a1": "O(n)",
+    "a2": "O(n log n)",
+    "a3": "O(log n)",
+    "a4": "O(1)",
+    "right_answer":"a3",
+    "created_at": "2011-06-20",
+    "created_by": "eray"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/bash/last_cmd_sub.json

@@ -0,0 +1,13 @@
+{ "question" : {
+    "id": "",
+    "category": "bash",
+    "nerd_level": 2,
+    "text":"How to call the last command after substituting some text?",
+    "a1": "^old_substring^new_substring^",
+    "a2": "/old_substring/new_substring/",
+    "a3": "sbl 'old_substring/new_substring'",
+    "right_answer": "a1",
+    "created_at": "2011-06-06",
+    "created_by": "mkorfmann"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/bash/last_directory.json

@@ -0,0 +1,14 @@
+{ "question" : {
+    "id": "",
+    "category": "bash",
+    "nerd_level": 3,
+    "text": "How to switch back to the previous directory?",
+    "a1": "cd ...",
+    "a2": "cd -P",
+    "a3": "cd -last",
+    "a4": "cd -",
+    "right_answer": "a4",
+    "created_at": "2011-06-25",
+    "created_by": "swilke"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/bash/prefix_last_command.json

@@ -0,0 +1,13 @@
+{ "question" : {
+    "id": "",
+    "category": "bash",
+    "nerd_level": 2,
+    "text":"How to prefix the last command with for example 'sudo'?",
+    "a1": "sudo ^",
+    "a2": "sudo $LAST_COMMAND",
+    "a3": "sudo !!",
+    "right_answer": "a3",
+    "created_at": "2011-06-06",
+    "created_by": "mkorfmann"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/couchdb/new_database.json

@@ -0,0 +1,10 @@
+{ "question" : {
+    "id": "",
+    "category": "couchdb",
+    "nerd_level": 2,
+    "text":"How to create a couchdb collection called 'nerds' with curl",
+    "a1": "curl -X PUT http://localhost:5984/nerds",
+    "created_at": "2011-06-21",
+    "created_by": "kangguru"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/css/attribute_selectors.json

@@ -0,0 +1,14 @@
+{ "question" : {
+    "id": "",
+    "category": "css",
+    "nerd_level": 4,
+    "text":"How would you style all links to PDF files via CSS?",
+    "a1": "[href*=.pdf]",
+    "a2": "[href?=.pdf]",
+    "a3": "[href$=.pdf]",
+    "a4": "[href^=.pdf]",
+    "right_answer":"a3",
+    "created_at": "2011-06-07",
+    "created_by": "Philipp"
+  }
+}

data/lib/muzang-plugins/muzang-nerdpursuit/questions/css/background_image.json

@@ -0,0 +1,15 @@
+{
+  "question": {
+    "id": "",
+    "category": "css",
+    "nerd_level": 3,
+    "text": "Why it's better to use <img.. /> tag instead of background whenever it's possible?",
+    "a1": "Easier to manage images in dev mode.",
+    "a2": "Actually it's not. Better to use bg images.",
+    "a3": "Background images are not printable.",
+    "a4": "<img> tag's are easier to style as a inline elements.",
+    "right_answer":"a3",
+    "created_at": "2011-06-08",
+    "created_by": "Barto"
+  }
+}