mitten 0.0.5 → 0.0.6

data/plugins/codepad.rb

@@ -1,63 +0,0 @@
-require 'mechanize'
-require 'nokogiri'
-
-class CodePad < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @agent = Mechanize.new
-    proxy = ENV['https_proxy'] || ENV['http_proxy']
-    if proxy
-      proxy = URI.parse(proxy)
-      @agent.set_proxy(proxy.host, proxy.port)
-    end
-    @prefixes = ['C', 'Haskell', 'Lua', 'OCaml', 'PHP', 'Perl', 'Python', 'Ruby', 'Scheme']
-  end
-
-  def on_privmsg(prefix, channel, message)
-    @language, @code = nil, nil
-    @prefixes.select do |item|
-      if message =~ Regexp.new("^#{item}:(.+)$")
-        @language = item
-        @code = $1.gsub('\\', '').strip
-      end
-    end
-
-    unless @language == nil
-      notice(channel, @language)
-      notice(channel, run_code)
-    end
-  end
-
-  private
-
-  def run_code
-    output = nil
-
-    begin
-      @agent.get('http://codepad.org/') do |run_page|
-        result = run_page.form_with(:action => '/') do |f|
-          f.radiobutton_with(:value => @language).check
-          f.code = code_prefix(@language) + @code
-        end.submit
-        doc = Nokogiri::HTML(result.body)
-        output = (doc/'pre').last.text
-      end
-      output
-    rescue Exception
-      'なんかだめー／(^o^)＼'
-    end
-  end
-
-  def code_prefix(language)
-    prefix = ''
-    case language
-    when 'C'
-      prefix = "#include <stdio.h>\n"
-    when 'PHP'
-      prefix = "<?php \n"
-    else
-      prefix
-    end
-  end
-end

data/plugins/fortune.rb

@@ -1,40 +0,0 @@
-require 'open-uri'
-require 'nokogiri'
-
-class Fortune < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @sex = {
-      :male   => 'http://legacy.fortune.yahoo.co.jp/fortune/bin/omikuji?sex=m',
-      :female => 'http://legacy.fortune.yahoo.co.jp/fortune/bin/omikuji?sex=f'
-    }
-    @prefix = @config['prefix'] || 'おみくじ'
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^#{@prefix}/
-      notice(channel, read_fortune)
-    end
-  end
-
-  private
-
-  def read_fortune
-    html = Nokogiri::HTML(open(@sex.values.choice).read)
-    fortunes = {}
-    message  = ''
-
-    (html/'table/tr/td').each do |content|
-      if content.inner_text =~ /^今日のあなたの(.+?)は(.+?)。/
-        fortunes[$1] = $2
-      end
-    end
-
-    fortunes.reverse_each do |genre, fortune|
-      message << "#{genre}：#{fortune}　"
-    end
-    "今日のあなたは #{message}こんな感じだよ♪"
-  end
-end

data/plugins/gasoline.rb

@@ -1,46 +0,0 @@
-require 'open-uri'
-require 'nokogiri'
-
-class Gasoline < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @suffix = @config['suffix'] || 'ガソリンいくら'
-    @base_uri = 'http://gogo.gs'
-    @rank_uri = @base_uri + '/rank/result/?pref=47&ws=&p_mode=0&mm=0&service%5B3%5D=3&desd=0&x=24&y=17'
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^#{@suffix}$/
-      gasoline_ranking.each do |gs|
-        notice(channel, gs) 
-      end
-    end
-  end
-
-  private
-
-  def gasoline_ranking
-    ranking = []
-
-    begin
-      lists = Nokogiri::HTML(open(@rank_uri).read, nil, 'EUC-JP')/'.tableType02'/'tr'
-      lists[2..6].each do |line|
-        next unless line.at('td[@colspan="5"]').nil?
-
-        rank    = line.at('.crownBig001').text
-        price   = line.at('.priceLevelBig5').text
-        station = line.at('strong').text
-        address = line.at('small').text
-        detail  = URI.short(@base_uri + line.at('strong/a').attributes['href'])
-
-        ranking << "#{rank}位 #{price}円 #{station} #{address} (#{detail})"
-      end
-    rescue Exception => e
-      ranking << 'こわれたっ／(^o^)＼'
-    end
-
-    ranking
-  end
-end

data/plugins/gmail.rb

@@ -1,64 +0,0 @@
-require 'net/https'
-require 'sdbm'
-require 'nokogiri'
-
-=begin
-
- ex. environment.yaml
-
-  Gmail:
-    sleep: 60
-    channel: '#Mitten@freenode'
-    account: 'account'
-    password: 'password'
-
-=end
-class Gmail < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @account  = @config['account']
-    @password = @config['password']
-
-    proxy = ENV['https_proxy'] || ENV['http_proxy']
-    if proxy
-      @https = Net::HTTP::Proxy(URI.parse(proxy).host, URI.parse(proxy).port).new('mail.google.com', 443)
-    else 
-      @https = Net::HTTP.new('mail.google.com', 443)
-    end
-  end
-
-  def before_hook
-    login
-  end
-
-  def login
-    @https.use_ssl = true
-    @https.verify_mode = OpenSSL::SSL::VERIFY_NONE
-    @request = Net::HTTP::Get.new('/mail/feed/atom')
-    @request.basic_auth(@account, @password)
-  end
-
-  def main
-    begin
-      db = SDBM.open("/tmp/gmail_#{@account}.db")
-      mail_list = Nokogiri::XML(@https.request(@request).body)
-      (mail_list/'entry').each do |entry|
-        id = entry.at('id').content
-        unless db.include? id
-          db[id] = '1'
-          title = entry.at('title').text
-          name  = entry.at('name').text
-          link  = entry.at('link')['href']
-
-          @channels.each do |channel|
-            notice(channel, "Gmail: (#{name}) #{title} #{URI.short(link)}")
-            sleep 5
-          end
-        end
-      end
-    ensure
-      db.close
-    end
-  end
-end

data/plugins/google_profile.rb

@@ -1,37 +0,0 @@
-require 'nokogiri'
-
-class GoogleProfile < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @suffix = @config['suffix'] || 'のプロフィールが知りたい'
-    @limit  = @config['limit'] || 3
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^(.+?)#{@suffix}/
-      get_profile($1).each { |profile| notice(channel, profile) }
-    end
-  end
-
-  private
-
-  def get_profile(target)
-    profiles = []
-    uri = URI.escape("http://www.google.com/profiles?q=#{target}")
-    result = Nokogiri::HTML(Kconv.toutf8(open(uri).read))/'div.profile-result'
-
-    unless result.count == 0
-      result[0...@limit].each do |profile|
-        detail = profile.at('div.profile-result-text-block').text
-        uri = URI.short("http://www.google.com#{profile.at('a')['href']}")
-
-        profiles << "#{detail} (#{uri})"
-      end
-    else
-      profiles << 'そんな人いにゃい o(>_<)o'
-    end
-    profiles
-  end
-end

data/plugins/google_transit.rb

@@ -1,56 +0,0 @@
-require 'open-uri'
-require 'nokogiri'
-
-class GoogleTransit < Mitten::Plugin
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^(.+)から(.+)(へ|まで|に)行.+/
-      search_route($1, $2).each { |route| notice(channel, route) }
-    end
-  end
-
-  private
-
-  def search_route(search_from, search_to)
-    from  = URI.escape(search_from.toutf8)
-    to    = URI.escape(search_to.toutf8)
-    query = "http://maps.google.co.jp/maps?f=q&source=s_q&hl=ja&geocode=&q=from%3A+#{from}+to%3A+#{to}"
-
-    begin
-      html = Nokogiri::HTML(open(query).read)
-      route = html/'#transit_route_0'
-
-      unless route.empty?
-        start_place = (html/'#ddw_addr_area_0/#sxaddr/div.sa').text.toutf8
-        end_place   = (html/'#ddw_addr_area_1/#sxaddr/div.sa').text.toutf8
-        time = (html/'#transit_route_0').search('span.ts_jtime').text.toutf8
-        cost = (html/'#transit_route_0').search('span.ts_routecost').text.toutf8
-
-        messages = ["#{start_place} から #{end_place} へ行くにはね，"]
-        messages << "だいたい #{time} で #{cost} ぐらいかかるみたい！"
-
-        (route/'table.ts_step').each_with_index do |step, counter|
-          counter += 1
-          longline = (step/'span.longline').text.toutf8
-          action   = (step/'span.action').text.toutf8
-
-          unless longline.empty?
-            locations = step/'span.location'
-
-            messages << "#{counter} : #{action} で「#{longline}」に乗る"
-            messages << "　　[発] #{locations[0].text.toutf8}"
-            messages << "　　[着] #{locations[1].text.toutf8}"
-          else
-            location = (step/'span.location').text.toutf8
-            messages << "#{counter} : #{location} #{action}"
-          end
-        end
-        messages << "詳しくはここ見てね♪ (#{URI.short(query)})"
-      else
-        '／(^o^)＼ 迷子！'
-      end
-    rescue Exception
-      '／(^o^)＼ 迷子！'
-    end
-  end
-end

data/plugins/google_weather.rb

@@ -1,34 +0,0 @@
-require 'nokogiri'
-
-class GoogleWeather < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @suffix = @config['suffix'] || 'の天気教えて'
-    @indexes = {'今日の' => 0, '明日の' => 1, '明後日の' => 2, '明々後日の' => 3}
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^(.+?の|)(.+?)#{@suffix}/
-      option = '今日の'
-      option = $1 unless $1 == ''
-      keyword = $2
-
-      notice(channel, get_weather(keyword, option))
-    end
-  end
-
-  private
-
-  def get_weather(keyword, option)
-    uri = URI.escape("http://www.google.co.jp/search?q=#{keyword}+週間天気")
-    html = Nokogiri::HTML(Kconv.toutf8(open(uri).read))
-
-    city = (html/'h3.r/b').first.text
-    weather = ((html/'div[@align="center"]')/'img')[@indexes[option]]['title']  
-    temperature = ((html/'div[@align="center"]')/'nobr')[@indexes[option]].text
-
-    "#{option}#{city}の天気は #{weather} だよっ [#{temperature}] (#{URI.short(uri)})"
-  end
-end

data/plugins/holoscope.rb

@@ -1,63 +0,0 @@
-require 'nkf'
-
-require 'open-uri'
-require 'nokogiri'
-
-class Holoscope < Mitten::Plugin
-  def initialize(*args)
-    super
-    @suffix = @config['suffix'] || 'の運勢教えて'
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^(.+)#{@suffix}$/
-      result = search_sign($1)
-
-      if result == nil
-        notice(channel, '／(^o^)＼ わかにゃいっ') 
-      else 
-        notice(channel, result) 
-      end
-    end
-  end
-
-  private
-
-  def search_sign(sign)
-    ranking = get_ranking 'http://fortune.yahoo.co.jp/12astro/ranking.html'
-    result = ''
-
-    ranking.each do |rank|
-      if rank[:name].to_s == sign
-        result = "#{rank[:name]} #{rank[:rank]} #{rank[:desc]}！だよ♪  (#{rank[:link]})"
-      end
-    end
-    result
-  end
-
-  def get_ranking(uri)
-    begin
-      doc = Nokogiri::HTML(open(uri).read)
-
-      names = doc/'td/p/img'
-      ranks = doc/'td/img'
-      descs = doc/'p.ft01/a'
-
-      ranking = []
-      names.each_with_index do |name, desc_counter|
-        rank_counter = desc_counter + 1
-        ranking << {
-          :name => name.attributes['alt'],
-          :rank => ranks[rank_counter].attributes['alt'],
-          :desc => descs[desc_counter].text,
-          :link => descs[desc_counter].attributes['href']
-        }
-      end
-
-      ranking
-    rescue
-      '／(^o^)＼ こわれたっ'
-    end
-  end
-end

data/plugins/loo_holoscope.rb

@@ -1,51 +0,0 @@
-require 'nkf'
-
-require 'open-uri'
-require 'nokogiri'
-
-class LooHoloscope < Mitten::Plugin
-  def initialize(*args)
-    super
-
-    @suffix = @config['suffix'] || 'の運勢教えて'
-    @signs = {
-      'おひつじ座' => 'http://lou5.jp/uranai/aries/',
-      'おうし座'   => 'http://lou5.jp/uranai/taurus/',
-      'ふたご座'   => 'http://lou5.jp/uranai/gemini/',
-      'かに座'     => 'http://lou5.jp/uranai/cancer/',
-      'しし座'     => 'http://lou5.jp/uranai/leo/',
-      'おとめ座'   => 'http://lou5.jp/uranai/virgo/',
-      'てんびん座' => 'http://lou5.jp/uranai/libra/',
-      'さそり座'   => 'http://lou5.jp/uranai/scorpio/',
-      'いて座'     => 'http://lou5.jp/uranai/sagittarius/',
-      'やぎ座'     => 'http://lou5.jp/uranai/capricorn/',
-      'みずがめ座' => 'http://lou5.jp/uranai/aquarius/',
-      'うお座'     => 'http://lou5.jp/uranai/pisces/',
-    }
-  end
-
-  def on_privmsg(prefix, channel, message)
-    case message
-    when /^(.+)#{@suffix}$/
-      result = get_result(@signs[$1])
-
-      if result == nil
-        notice(channel, '／(^o^)＼ わかにゃいっ') 
-      else 
-        notice(channel, result) 
-      end
-    end
-  end
-
-  private
-
-  def get_result(uri)
-    begin
-      doc = Nokogiri::HTML(open(uri).read)
-
-      loo = (doc/'div.box-inner/p').first.text.gsub("\n", '') + ' ってルーさんが言ってたよ♪'
-    rescue Exception => e
-      e.to_s
-    end
-  end
-end