summaryrefslogtreecommitdiff
path: root/data/rbot/plugins/grouphug.rb
blob: bf246b4c7f7fa23b3911dbf4169b4c01d59071a5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
#-- vim:sw=2:et
#++
#
# :title: Grouphug Plugin for rbot
#
# Author:: Mark Kretschmann <markey@web.de>
# Copyright:: (C) 2005 Mark Kretschmann
# License:: GPL v2

class GrouphugPlugin < Plugin
  def help( plugin, topic="" )
    return "Grouphug plugin. Confess! Usage: 'confess' for random confession, 'confess <number>' for specific one."
  end

  def confess(m, params)
    opts = { :cache => false }
    path = "random"
    if params[:num]
      path = "confessions/#{params[:num]}"
      opts.delete(:cache)
    end

    begin
      data = @bot.httputil.get("http://grouphug.us/#{path}", opts)

      reg = Regexp.new('(<td class="conf-text")(.*?)(<p>)(.*?)(</p>)',
                       Regexp::MULTILINE)
      confession = reg.match( data )[4].ircify_html
      confession = "no confession ##{params[:num]} found" if confession.empty? and params[:num]

      m.reply confession
    rescue
      m.reply "failed to connect to grouphug.us"
    end
  end
end


plugin = GrouphugPlugin.new

plugin.map "grouphug [:num]",
  :thread => true, :action => :confess, :requirements => { :num => /\d+/ }
plugin.map "confess [:num]",
  :thread => true, :action => :confess, :requirements => { :num => /\d+/ }