-# IMDB plugin for RubyBot
-# (c) 2005 Arnaud Cornet <arnaud.cornet@gmail.com>
-# Licensed under MIT License.
+#-- vim:sw=2:et
+#++
+#
+# :title: IMDB plugin for rbot
+#
+# Author:: Arnaud Cornet <arnaud.cornet@gmail.com>
+# Author:: Giuseppe "Oblomov" Bilotta <giuseppe.bilotta@gmail.com>
+#
+# Copyright:: (C) 2005 Arnaud Cornet
+# Copyright:: (C) 2007 Giuseppe Bilotta
+#
+# License:: MIT license
-require 'net/http'
-require 'cgi'
require 'uri/common'
class Imdb
+ IMDB = "http://us.imdb.com"
+ TITLE_OR_NAME_MATCH = /<a href="(\/(?:title|name)\/(?:tt|nm)[0-9]+\/?)[^"]*"(?:[^>]*)>([^<]*)<\/a>/
+ TITLE_MATCH = /<a href="(\/title\/tt[0-9]+\/?)[^"]*"(?:[^>]*)>([^<]*)<\/a>/
+ NAME_MATCH = /<a href="(\/name\/nm[0-9]+\/?)[^"]*"(?:[^>]*)>([^<]*)<\/a>/
+
def initialize(bot)
@bot = bot
end
def search(rawstr)
- str = URI.escape(rawstr)
- @http = @bot.httputil.get_proxy(URI.parse("http://us.imdb.com/find?q=#{str}"))
- @http.start
+ str = URI.escape(rawstr) << ";site=aka"
+ return do_search(str)
+ end
+
+ def do_search(str)
+ resp = nil
begin
- resp, data = @http.get("/find?q=#{str}", "User-Agent" => "Mozilla/5.0")
- rescue Net::ProtoRetriableError => detail
- head = detail.data
- if head.code == "301" or head.code == "302"
- return head['location'].gsub(/http:\/\/us.imdb.com/, "").gsub(/\?.*/, "")
- end
+ resp = @bot.httputil.get_response(IMDB + "/find?q=#{str}",
+ :max_redir => -1)
+ rescue Exception => e
+ error e.message
+ warning e.backtrace.join("\n")
+ return nil
end
+
if resp.code == "200"
- m = /<a href="(\/title\/tt[0-9]+\/?)[^"]*"(:?[^>]*)>([^<]*)<\/a>/.match(resp.body)
- if m
- url = m[1]
- title = m[2]
- return url
+ m = []
+ m << TITLE_OR_NAME_MATCH.match(resp.body) if @bot.config['imdb.popular']
+ if resp.body.match(/\(Exact Matches\)<\/b>/) and @bot.config['imdb.exact']
+ m << TITLE_OR_NAME_MATCH.match($')
+ end
+ m.compact!
+ unless m.empty?
+ return m.map { |mm|
+ mm[1]
+ }.uniq
end
elsif resp.code == "302"
- return resp['location'].gsub(/http:\/\/us.imdb.com/, "").gsub(/\?.*/, "")
+ debug "automatic redirection"
+ new_loc = resp['location'].gsub(IMDB, "")
+ if new_loc.match(/\/find\?q=(.*)/)
+ return do_search($1)
+ else
+ return [new_loc.gsub(/\?.*/, "")]
+ end
end
return nil
end
def info(rawstr)
- sr = search(rawstr)
- if !sr
+ urls = search(rawstr)
+ debug urls
+ if urls.nil_or_empty?
debug "IMDB: search returned NIL"
return nil
end
- resp, data = @http.get(sr, "User-Agent" =>
- "Mozilla/5.0 (compatible; Konqueror/3.1; Linux)")
+ results = []
+ urls.each { |sr|
+ type = sr.match(/^\/([^\/]+)\//)[1].downcase.intern rescue nil
+ case type
+ when :title
+ results << info_title(sr)
+ when :name
+ results << info_name(sr)
+ else
+ results << "#{sr}"
+ end
+ }
+ return results
+ end
+
+ def grab_info(info, body)
+ /<div class="info">\s+<h5>#{info}:<\/h5>\s+(.*?)<\/div>/mi.match(body)[1] rescue nil
+ end
+
+ def info_title(sr)
+ resp = nil
+ begin
+ resp = @bot.httputil.get_response(IMDB + sr, :max_redir => -1)
+ rescue Exception => e
+ error e.message
+ warning e.backtrace.join("\n")
+ return nil
+ end
+
+ info = []
+
if resp.code == "200"
m = /<title>([^<]*)<\/title>/.match(resp.body)
return nil if !m
- title = CGI.unescapeHTML(m[1])
+ title_date = m[1]
+ title, date, extra = title_date.scan(/^(.*)\((\d\d\d\d(?:[IV]+)?)\)\s*(.+)?$/).first
+ title.strip!
- m = /<b>([0-9.]+)\/10<\/b> \(([0-9,]+) votes?\)/.match(resp.body)
- return nil if !m
- score = m[1]
- votes = m[2]
+ dir = nil
+ data = grab_info(/Directors?/, resp.body)
+ if data
+ dir = data.scan(NAME_MATCH).map { |url, name|
+ name
+ }.join(', ')
+ end
+
+ country = nil
+ data = grab_info(/Country/, resp.body)
+ if data
+ country = data.ircify_html
+ end
+
+ info << [title, "(#{country}, #{date})", extra, dir ? "[#{dir}]" : nil, ": http://us.imdb.com#{sr}"].compact.join(" ")
+
+ ratings = "no votes"
+ m = /<b>([0-9.]+)\/10<\/b>\n?\r?\s+<small>\(<a href="ratings">([0-9,]+) votes?<\/a>\)<\/small>/.match(resp.body)
+ if m
+ ratings = "#{m[1]}/10 (#{m[2]} voters)"
+ end
genre = Array.new
resp.body.scan(/<a href="\/Sections\/Genres\/[^\/]+\/">([^<]+)<\/a>/) do |gnr|
genre << gnr
end
- return ["http://us.imdb.com" + sr, title, score, votes,
- genre]
+
+ plot = nil
+ data = grab_info(/Plot (?:Outline|Summary)/, resp.body)
+ if data
+ plot = "Plot: " + data.ircify_html.gsub(/\s+more$/,'')
+ end
+
+ info << ["Ratings: " << ratings, "Genre: " << genre.join('/') , plot].compact.join(". ")
+
+ return info
+ end
+ return nil
+ end
+
+ def info_name(sr)
+ resp = nil
+ begin
+ resp = @bot.httputil.get_response(IMDB + sr, :max_redir => -1)
+ rescue Exception => e
+ error e.message
+ warning e.backtrace.join("\n")
+ return nil
+ end
+
+ info = []
+
+ if resp.code == "200"
+ m = /<title>([^<]*)<\/title>/.match(resp.body)
+ return nil if !m
+ name = m[1]
+
+ info << "#{name} : http://us.imdb.com#{sr}"
+
+ birth = nil
+ data = grab_info("Date of Birth", resp.body)
+ if data
+ birth = "Birth: #{data.ircify_html.gsub(/\s+more$/,'')}"
+ end
+
+ death = nil
+ data = grab_info("Date of Death", resp.body)
+ if data
+ death = "Death: #{data.ircify_html.gsub(/\s+more$/,'')}"
+ end
+
+ info << [birth, death].compact.join('. ') if birth or death
+
+ movies = {}
+
+ filmorate = nil
+ begin
+ filmorate = @bot.httputil.get(IMDB + sr + "filmorate")
+ rescue Exception
+ end
+
+ if filmorate
+ filmorate.scan(/<div class="filmo">.*?<a href="\/title.*?<\/div>/m) { |str|
+ what = str.match(/<a name="[^"]+">([^<]+)<\/a>/)[1] rescue nil
+ next unless what
+ movies[what] = str.scan(TITLE_MATCH)[0..2].map { |url, tit|
+ tit
+ }
+ }
+ end
+
+ preferred = ['Actor', 'Director']
+ if resp.body.match(/Jump to filmography as: (.*?)<\/div>/)
+ txt = $1
+ preferred = txt.scan(/<a[^>]+>([^<]+)<\/a>/)[0..2].map { |pref|
+ pref.first
+ }
+ end
+
+ unless movies.empty?
+ all_keys = movies.keys.sort
+ debug all_keys.inspect
+ keys = []
+ preferred.each { |key|
+ keys << key if all_keys.include? key
+ }
+ keys = all_keys if keys.empty?
+ ar = []
+ keys.each { |key|
+ ar << key.dup
+ ar.last << ": " + movies[key].join('; ')
+ }
+ info << ar.join('. ')
+ end
+ return info
+
end
return nil
end
end
class ImdbPlugin < Plugin
+ BotConfig.register BotConfigBooleanValue.new('imdb.popular',
+ :default => true,
+ :desc => "Display info on popular IMDB entries matching the request closely")
+ BotConfig.register BotConfigBooleanValue.new('imdb.exact',
+ :default => true,
+ :desc => "Display info on IMDB entries matching the request exactly")
+
def help(plugin, topic="")
"imdb <string> => search http://www.imdb.org for <string>"
end
m.reply "Nothing found for #{what}"
return nil
end
- m.reply "#{info[1]} : #{info[0]}"
- m.reply "Ratings: #{info[2]}/10 (#{info[3]} voters). Genre: #{info[4].join('/')}"
+ if info.length == 1
+ m.reply Utils.decode_html_entities info.first.join("\n")
+ else
+ m.reply info.map { |i|
+ Utils.decode_html_entities i.join(" | ")
+ }.join("\n")
+ end
end
end
projects / user / henk / code / ruby / rbot.git / blobdiff