# License:: GPL v2
class GrouphugPlugin < Plugin
+ START = '<div id="main"'
REG = Regexp.new('<div class="content">\s*<p>(.*?)</p>\s+</div>', Regexp::MULTILINE)
REGPOST = Regexp.new('title>(.*?) \| Group Hug')
def initialize
super
@confessions = Array.new
+ @bot.register_filter(:grouphug, :htmlinfo) { |s| grouphug_filter(s) }
end
def help( plugin, topic="" )
- return _("Grouphug plugin. Confess! Usage: 'confess' for random confession, 'confess <number>' for specific one, 'confess <confession>' to share your own confession, but you must have create auth. Confessions must be at least 10 words.")
+ return _("Grouphug plugin. Confess! Usage: 'confess' for random confession, 'confess <number>' for specific one, 'confess <confession>' to share your own confession. Confessions must be at least 10 words.")
end
def post_confession(m, params)
end
end
+ def get_confessions(html)
+ return [] unless html
+ start = html.index(START)
+ res = html[start, html.length - start].scan(REG)
+ return [] unless res
+ return res.map { |quote|
+ quote[0].ircify_html
+ }
+ end
def confess(m, params)
opts = { :cache => false }
path = "confessions/#{params[:num]}"
opts.delete(:cache)
data = @bot.httputil.get("http://grouphug.us/#{path}", opts)
-
- res = data.scan(REG)
- confession = res[0][0].ircify_html
- confession = "no confession ##{params[:num]} found" if confession.empty? and params[:num]
- m.reply confession
+ confessions = get_confessions(data)
+ if confessions.length > 1
+ warn "more than one confession found!"
+ warn confessions
+ end
+ confessions << "no confession ##{params[:num]} found" if confessions.empty?
+ m.reply confessions.first
else # Cache random confessions
if @confessions.empty?
data = @bot.httputil.get("http://grouphug.us/#{path}", opts)
- res = data.scan(REG)
- res.each do |quote|
- @confessions << quote[0].ircify_html
- end
+ @confessions.replace get_confessions(data)
end
- confession = @confessions.pop
- m.reply confession
+ @confessions << "no confessions found!" if @confessions.empty?
+ m.reply @confessions.pop
end
- rescue
+ rescue Exception => e
+ error e
m.reply "failed to connect to grouphug.us"
end
end
+
+ def grouphug_filter(s)
+ # check if we like the location of the page
+ loc = Utils.check_location(s, %r{http://(?:.*\.)?grouphug\.us})
+ return unless loc
+ # check if there are any conefssions
+ confessions = get_confessions(s[:text])
+ return if confessions.empty?
+ title = s[:text].ircify_html_title
+ # return the first confession
+ return {
+ :title => title,
+ :content => confessions.first,
+ :grouphug_confessions => confessions
+ }
+ end
+
end