meimei 0.1.2 → 0.3.0

data/plugins/ranking.rb

@@ -0,0 +1,422 @@
+define_plugin("!ranking") do |msg|
+  reply "No more rankings until the corporatocracy is overthrown in the United States of America."
+if false
+
+  blue = "\00311"
+  red = "\00307"
+  normal = "\00316"
+
+  imouto = "sora
+kirino
+ui
+nazuna
+kotomi
+satsuki
+erika
+mikan
+kurokoneko
+miya
+chika
+itsuki
+imouto-san"
+
+  rankers = "evirus
+albert
+divine
+nakar
+halotron
+cortana"
+
+  rankings = "anime 2k10
+music 2k10
+imouto
+music 2k9
+touhou
+anime 2k11
+eromanga 2k9
+eromanga all
+artists
+games
+rankers"
+
+  artists = "naruko hanaharu
+happoubi jin
+hijiri rei
+misaki kurehito
+kuroya shinobu
+inoue kiyoshirou
+nekoi mie
+sameda koban
+yamatogawa
+shiwasu no okina
+gumma
+ino
+nishieda
+nakajima yuka
+royal koyonagi
+ishikei
+takamichi
+toshiaki kaneko
+takemura sesshu
+cuvie
+inuburo
+inazuma
+bolze
+inu
+amano ameno
+bosshi
+raita
+jingrock
+kizuki aruchu
+otsuka kotora
+da hootch
+sanbun kyouden
+tsukino jyogi
+bow ditama"
+
+  music_2010 = "basia bulat - heart of my own
+zola jesus - stridulum
+tallest man on earth - wild hunt
+yeasayer - odd blood
+beach house - teen dream
+ra ra riot - the orchard
+the-dream - love king
+sound horizon - marchen
+girl talk - all day
+first aid kit - big black & the blue
+band of horses - infinite arms
+broken social scene - forgiveness rock record
+das racist - sit down man
+dessa - badly broken code
+of montreal - false priest
+el ten eleven - still like a secret
+titus andronicus - monitor
+joanna newsom - have one on me
+janelle monae - archandroid
+robyn - body talk
+drake - thank me later
+corinne bailey rae - the sea
+arcade fire - the suburbs
+black keys - brothers
+vampire weekend - contra
+big boi - sir lucious left foot
+matthew dear - black city
+holy fuck - latin
+four tet - there is love
+ariel pink - before today
+hot chip - one life stand
+erykah badu - new amerykah part two
+twin shadow - forget
+sade - soldier of love
+jenny and johnny - i'm having fun now
+lcd soundsystem - this is happening
+walkmen - lisbon
+girls - broken dreams club
+kid cudi - man on the moon ii
+rick ross - teflon don
+spoon - transference
+abe vigoda - crush
+midlake - courage of others
+halcali - tokyo groove
+fresh and onlys - play it strange
+delorean - subiza
+magnetic fields - realism
+blitzen trapper - destroyer of the void
+deerhunter - halcyon digest
+ted leo - brutalist bricks
+broken bells - broken bells
+mountain man - made the harbor
+no age - everything in between
+emeralds - does it look like i'm here
+pernice brothers - goodbye killer
+los campesinos - romance is boring
+kylesa - spiral shadow
+miniature tigers - forest
+antony & the johnsons - swanlights
+avey tare - down there
+tyler the creator - bastard
+belle & sebastian - write about love
+forest swords - dagger paths
+teddybears - devil's music
+new pornographers - together
+best coast - best coast"
+
+  music_2009 = "neko case - middle cyclone
+grizzly bear - veckatimest
+phoenix - wolfgang amadeus mozart
+avett brothers - i and love and you
+animal collective - merriweather
+the xx - xx
+dj quick & kurupt - blaqkout
+bear in heaven - beast rest
+wild beasts - two dancers
+telekinesis - telekinesis
+antlers - hospice
+kid cudi - man on the moon
+atlas sound - logos
+data - skywriter
+raekwon - only built 4 cuban linx pt ii
+future of the left - travels
+jj - jj no 2
+mf doom - born like this
+clientele - bonfires
+fever ray - fever ray
+neon indian - psychic chasms
+taken by trees - east of eden
+girls - album
+place to bury strangers - exploding head
+mount eerie - wind's poem
+antony - crying light
+bill callahan - sometimes i wish
+dirty projectors - bitte orca
+camera obscura - my maudlin career
+yo la tengo - popular songs"
+
+  anime_2011 = "#{blue}level e
+#{blue}madoka magica
+#{blue}yumekui merry
+#{blue}mitsudomoe 2
+#{blue}fractale
+#{blue}star driver
+#{normal}-- MANABI LINE --
+#{blue}toaru majutsu no index 2
+#{blue}gosick
+#{blue}kore wa zombie
+#{blue}infinite stratos
+#{blue}cardfight vanguard
+#{normal}-- FUCKIN DROPPED --
+#{blue}rio rainbow gate
+#{blue}oniichan no koto
+#{blue}freezing
+#{blue}hourou musuko
+#{blue}dragon crisis"
+
+  anime_2010 = "k-on!!
+ore no imouto
+break blade
+seitokai yakuin domo
+seikon no qwaser
+shinryaku ika musume
+tatami galaxy
+baka to test
+milky holmes
+yosuga no sora
+shiki
+panty & stocking
+otome youkai zakuro
+kuragehime*
+sora no otoshimono forte
+soredemo machi*
+star driver
+strike witches 2
+shin koihime musou otome tairan
+amagami ss
+durarara
+railgun
+golgo 13
+cobra
+saraiya goyou
+fortune arterial
+highschool of the dead
+hanamaru youchien
+mitsudomoe
+asobi ni iku yo
+sora no woto
+kuroshitsuji ii
+toaru majutsu no index ii
+hidamari sketch 3
+shukufuku no campanella
+giant killing
+working!!
+katanagatari
+heartcatch precure
+bakuman
+rainbow
+super robot wars og the inspector
+arakawa under the bridge
+b gata h kei
+ichiban ushiro no daimaou
+ookami-san to shichinin
+chu-bra
+angel beats
+ladies versus butlers
+mm!
+motto toloveru
+vampire bund
+densetsu no yuusha
+heroman
+ikkitousen xx
+seikimatsu occult gakuin
+ookami kakushi"
+
+  touhou = "sanae
+yukari
+hisou tensoku
+yuyuko
+kanako
+flandre
+tenko
+kaguya
+eirin
+patche
+reisen
+suika
+suwako
+alice
+sakuya
+kogasa
+tewi
+byakuren
+reimu
+nue
+remilia
+marisa
+satori
+shikieiki
+koishi
+daiyousei
+cirno
+mokou
+keine
+akyu
+utsuho
+aya
+mima
+star
+luna
+sunny
+momiji
+yuka
+meiling
+iku
+elly
+yumeko
+rumia
+youmu
+hina
+hatate
+nazrin
+chiyuri
+minoriko
+shizuha
+yugi
+yorihime
+toyohime
+komachi
+murasa
+mystia
+koakuma
+nitori
+orin
+rinnosuke
+unzan
+ran
+myon
+yamame
+wriggle
+chen
+medicine
+shinki
+rikako
+lily white
+reisen ii
+parsee
+ichirin
+lily black
+letty
+shou
+tokiko
+lunasa
+merlin
+lyrica
+kisume
+namazu
+buront"
+
+  eromanga_2009 = "yamatogawa - tayutayu
+shiwasu no okina - jc ecchi
+f4u - konya no sikorsky
+maguro teikoku - island ingyaku no shou
+arima zin - muchipuri"
+
+  eromanga_all = "yukimi - birthday
+hanaharu - shoujo material
+yamatogawa - tayutayu
+gumma - giri giri sisters
+maruta - kimi no suki na onnanoko no katachi
+sameda koban - beastie girls
+f4u - konya no sikorsky
+inuburo - inumimi zukan
+maguro teikoku - island ingyaku no shou
+nylon - nylon 100%
+cuvie - hoshigari
+inu - hatsu inu
+sekiya asami - your dog
+koume keito - pollinic girls
+arima zin - muchipuri"
+
+  case msg
+  when /imouto/
+    s = imouto
+
+  when /anime 2k10/, /anime 2010/
+    s = anime_2010
+
+  when /anime 2k11/, /anime 2011/, /anime/
+    s = anime_2011
+
+  when /touhou/
+    s = touhou
+
+  when /eromanga all/
+    s = eromanga_all
+
+  when /eromanga 2k9/
+    s = eromanga_2009
+
+  when /music 2k10/, /music 2010/
+    s = music_2010
+
+  when /music 2k9/, /music 2009/
+    s = music_2009
+
+  when /rankers/
+    s = rankers
+
+  when /rankings/
+    s = rankings
+
+  when /artists/
+    s = artists
+
+  else
+    s = rankings
+  end
+
+  s = s.split(/\n/)
+  lines = []
+  line = ""
+
+  while true
+    x = s.shift
+
+    if x.nil?
+      lines << line unless line == ""
+      break
+    else
+      line << "#{x} > "
+      if line.size > 400
+        lines << line
+        line = ""
+      end
+    end
+  end
+  
+  lines[-1].gsub!(/ > $/, "")
+
+  lines.each do |l|
+    reply l
+    sleep 1
+  end
+end
+end

data/plugins/reload.rb

@@ -0,0 +1,3 @@
+define_plugin("!reload") do |msg|
+  load_plugins()
+end

data/plugins/retard.rb

@@ -0,0 +1,4 @@
+define_plugin("retard") do |msg|
+  next unless msg =~ /^you're a retard, (.+)$/i
+  reply "Marude hakuchi da na, #{$1}-san.", false
+end

data/plugins/rs.rb

@@ -0,0 +1,8 @@
+require 'timeout'
+require 'net/http'
+require 'cgi'
+
+define_plugin("!rs") do |msg|
+  query = msg
+  reply "http://rs.4chan.org/?s=" + URI.escape(query, /[^a-zA-Z0-9_-]/)
+end

data/plugins/shiningfinger.rb

@@ -0,0 +1,9 @@
+define_plugin("shining finger") do |msg|
+  next unless msg =~ /ore no kono te ga hikatte unaru/i
+
+  reply "Omae o taose to kagayaki sakebu!", false
+  sleep 1
+  reply "HISSATSU!", false
+  sleep 1
+  reply "SHIIIIIINNNIIIIIIIINNNNNGGGGG FIIIIINNNNNGGGAAAAAAAA!!!!!!!", false
+end

data/plugins/shuffle.rb

@@ -0,0 +1,3 @@
+define_plugin("!shuffle") do |msg|
+  reply msg.split(/,\s*/).sort {rand <=> rand}.join(", ")
+end

data/plugins/sugei_inaka.rb

@@ -0,0 +1,4 @@
+define_plugin("sugei inaka") do |msg|
+  next unless msg =~ /\bsugei inaka\b/i
+  reply "sugei~", false
+end

data/plugins/suki_dakara.rb

@@ -0,0 +1,4 @@
+define_plugin("suki dakara") do |msg|
+  next unless msg =~ /^(.+?) suki dakara$/ && @current_from != "meimei"
+  reply "KONO #{$1.upcase.strip} GA SUKI DAKARA!!!", false
+end

data/plugins/ts.rb

@@ -0,0 +1,25 @@
+require 'cgi'
+require 'rubygems'
+require 'json'
+
+define_plugin("!ts") do |msg|
+  Net::HTTP.start("search.twitter.com", 80) do |http|
+    resp = http.get("/search.json?rpp=3&q=" + CGI.escape(msg), {"User-Agent" => "meimei"})
+
+    if resp.content_type == "application/json"
+      results = JSON.parse(resp.body)["results"].map {|x|
+        x["from_user"] + ": " + CGI.unescapeHTML(x["text"])
+      }
+
+      if results.empty?
+        reply "No matches"
+      else
+        results[0, 3].each do |result|
+          reply result
+        end
+      end
+    else
+      reply "Twitter is overloaded"
+    end
+  end
+end

data/plugins/tsundere.rb

@@ -0,0 +1,5 @@
+define_plugin("tsundere") do |msg|
+  next unless msg =~ /don'?t get the wrong idea/i
+  next unless msg =~ /it'?s not like/i
+  reply "so tsundere <3"
+end

data/plugins/tt.rb

@@ -0,0 +1,50 @@
+require 'timeout'
+require 'net/http'
+require 'cgi'
+
+define_plugin("!tt") do |msg|
+  begin
+    query = msg
+
+    if query =~ /^(anime|hentai|raw|music|manga|drama)/i
+      type = $1.capitalize
+      query = query.gsub(/^\S+ /, "")
+    else
+      type = nil
+    end
+
+    re_query = Regexp.new(Regexp.escape(query).gsub(/\\ /, ".+?"), Regexp::IGNORECASE)
+    cgi_query = query.gsub(/ /, "+")
+    Net::HTTP.start("www.tokyotosho.info", 80) do |http|
+      resp = http.post("/search.php", "terms=#{cgi_query}")
+      results = resp.body[/<table class="listing">(.+?)<\/table>/m, 1]
+      rows = results.scan(/<tr.+?<\/tr>/m)
+      matches = []
+      if rows.any?
+        rows[1..-1].each do |row|
+          if type == nil || row =~ /alt="#{type}"/
+              row =~ /<a rel="nofollow" type="application\/x-bittorrent" href="(.+?)">(.+?)<\/a>/
+            url = CGI.unescapeHTML($1.to_s)
+            desc = $2.to_s
+            
+            if desc =~ re_query
+              matches << [desc, url]
+            end
+          end
+        end
+      end
+      
+      if matches.any?
+        matches[0, 3].each do |m|
+          reply "\00311#{m[0]}: \00307#{m[1]}"
+        end
+      else
+        reply "No matches for #{query}"
+      end
+    end
+  rescue Timeout::Error
+    reply "time out"
+  rescue Exception => e
+    reply e.to_s
+  end
+end

data/plugins/ttt.rb

@@ -0,0 +1,5 @@
+require 'cgi'
+
+define_plugin("!ttt") do |msg|
+  reply "http://www.tokyotosho.info/search.php?terms=" + CGI.escape(msg)
+end

data/plugins/uptime.rb

@@ -0,0 +1,20 @@
+require 'rubygems'
+require 'net/ssh'
+
+define_plugin("!uptime") do |msg|
+  sonohara = `uptime`.strip
+  hijiribe = nil
+  dbserver = nil
+
+  Net::SSH.start("hijiribe", "albert") do |ssh|
+    hijiribe = ssh.exec!("uptime").strip
+  end
+
+  Net::SSH.start("dbserver", "albert") do |ssh|
+    dbserver = ssh.exec!("uptime").strip
+  end
+
+  reply "sonohara: #{sonohara}"
+  reply "hijiribe: #{hijiribe}"
+  reply "dbserver: #{dbserver}"
+end

data/plugins/wawawa.rb

@@ -0,0 +1,5 @@
+define_plugin("wawawa") do |msg|
+  if msg =~ /\bWA\s*WA\s*WA\b/i
+    reply "wasuremono~", false
+  end
+end

data/plugins/weather.rb

@@ -0,0 +1,39 @@
+define_plugin("!weather") do |msg|
+  query = msg
+
+  if query.any?
+    begin
+      Net::HTTP.start("www.google.com", 80) do |http|
+        resp = http.get("/search?num=1&q=weather+for+" + URI.escape(query, /[^a-zA-Z0-9]/))
+        if resp.body =~ /<table class="ts std">.+?<b>Weather<\/b> for <b>(.+?)<\/b>/m
+
+          result = "Weather for " + $1 + ": "
+
+          if resp.body =~ />Current: <b>(.+?)</m
+            result = result + $1 + ", "
+          end
+
+          if resp.body =~ /<div style="font-size:140%"><b>(.+?)<\/b>/m
+            result = result + $1 + ", "
+          end
+
+          if resp.body =~ />(Wind: .+?)</m
+            result = result + $1 + ", "
+          end
+
+          if resp.body =~ />(Humidity: .+?)</m
+            result = result + $1
+          end
+
+          reply result
+        else
+          reply "Google doesn't seem to know"
+        end
+      end
+    rescue Timeout
+      reply "timeout"
+    rescue Exception => e
+      reply e.to_s
+    end
+  end
+end

data/test/helper.rb

@@ -0,0 +1,18 @@
+require 'rubygems'
+require 'bundler'
+begin
+  Bundler.setup(:default, :development)
+rescue Bundler::BundlerError => e
+  $stderr.puts e.message
+  $stderr.puts "Run `bundle install` to install missing gems"
+  exit e.status_code
+end
+require 'test/unit'
+require 'shoulda'
+
+$LOAD_PATH.unshift(File.join(File.dirname(__FILE__), '..', 'lib'))
+$LOAD_PATH.unshift(File.dirname(__FILE__))
+require 'meimei'
+
+class Test::Unit::TestCase
+end

data/test/test_meimei.rb

@@ -0,0 +1,7 @@
+require 'helper'
+
+class TestMeimei < Test::Unit::TestCase
+  should "probably rename this file and start testing for real" do
+    flunk "hey buddy, you should probably rename this file and start testing for real"
+  end
+end