X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=data%2Frbot%2Fplugins%2Fimdb.rb;h=0f5c6024b6306ddcd73079500208dde7a02dbf55;hb=a5ba341ceac6a73b690c2d84001766b75bcb249f;hp=df746b851721e4bbf781fe25baf6658d230bb383;hpb=a7d50aeb63957485de7d423a4b2cc73f5cbe435a;p=user%2Fhenk%2Fcode%2Fruby%2Frbot.git diff --git a/data/rbot/plugins/imdb.rb b/data/rbot/plugins/imdb.rb index df746b85..0f5c6024 100644 --- a/data/rbot/plugins/imdb.rb +++ b/data/rbot/plugins/imdb.rb @@ -11,16 +11,18 @@ # # License:: MIT license -require 'uri/common' - class Imdb - IMDB = "http://us.imdb.com" - TITLE_OR_NAME_MATCH = /]*)>([^<]*)<\/a>/ - TITLE_MATCH = /]*)>([^<]*)<\/a>/ - NAME_MATCH = /]*)>([^<]*)<\/a>/ + IMDB = "https://www.imdb.com" + TITLE_OR_NAME_MATCH = /]*)>([^<]*)<\/a>/ + TITLE_MATCH = /]*)>([^<]*)<\/a>/ + NAME_MATCH = /]*)>([^<]*)<\/a>/ + CHAR_MATCH = /]*)>([^<]*)<\/a>/ + CREDIT_NAME_MATCH = /#{NAME_MATCH}\s*<\/td>\s*]+>\s*\.\.\.\s*<\/td>\s*]+>\s*(.+?)\s*<\/td>/m FINAL_ARTICLE_MATCH = /, ([A-Z]\S{0,2})$/ + DESC_MATCH = // MATCHER = { + :character => CHAR_MATCH, :title => TITLE_MATCH, :name => NAME_MATCH, :both => TITLE_OR_NAME_MATCH @@ -31,8 +33,12 @@ class Imdb end def search(rawstr, rawopts={}) - str = URI.escape(rawstr) - str << ";site=aka" if @bot.config['imdb.aka'] + # allow the user to search directly for (movie) IDs + if rawstr.match /$tt\d+^/ then + return ["/movie/#{rawstr}/"] + end + str = CGI.escape(rawstr) + str << "&site=aka" if @bot.config['imdb.aka'] opts = rawopts.dup opts[:type] = :both unless opts[:type] return do_search(str, opts) @@ -51,9 +57,11 @@ class Imdb matcher = MATCHER[opts[:type]] - debug matcher.inspect if resp.code == "200" + if opts[:all] + return resp.body.scan(matcher).map { |m| m.first }.compact.uniq + end m = [] m << matcher.match(resp.body) if @bot.config['imdb.popular'] if resp.body.match(/\(Exact Matches\)<\/b>/) and @bot.config['imdb.exact'] @@ -90,9 +98,9 @@ class Imdb type = sr.match(/^\/([^\/]+)\//)[1].downcase.intern rescue nil case type when :title - results << info_title(sr) + results << info_title(sr, opts) when :name - results << info_name(sr) + results << info_name(sr, opts) else results << "#{sr}" end @@ -101,7 +109,7 @@ class Imdb end def grab_info(info, body) - /
\s+
#{info}:<\/h5>\s+(.*?)<\/div>/mi.match(body)[1] rescue nil + /
\s*\s*#{info}:\s*<\/h[45]>\s*(.*?)<\/div>/mi.match(body)[1] rescue nil end def fix_article(org_tit) @@ -121,9 +129,11 @@ class Imdb return title end - def info_title(sr) + def info_title(sr, opts={}) resp = nil begin + # movie urls without tailing / trigger a redirect + sr += '/' if sr[-1,1] != '/' resp = @bot.httputil.get_response(IMDB + sr, :max_redir => -1) rescue Exception => e error e.message @@ -136,16 +146,20 @@ class Imdb if resp.code == "200" m = /([^<]*)<\/title>/.match(resp.body) return nil if !m - title_date = m[1] - pre_title, date, extra = title_date.scan(/^(.*)\((\d\d\d\d(?:\/[IV]+)?)\)\s*(.+)?$/).first + title_date = m[1].ircify_html + debug title_date + # note that the date dash for series is a - (ndash), not a - (minus sign) + # also, the second date, if missing, is an no-break space + pre_title, extra, date, junk = title_date.scan(/^(.*)\((.+?\s+)?(\d\d\d\d(?:–(?:\d\d\d\d| )?)?(?:\/[IV]+)?)\)\s*(.+)?$/).first + extra.strip! if extra pre_title.strip! - title = fix_article(pre_title.ircify_html) + title = fix_article(pre_title) dir = nil - data = grab_info(/Directors?/, resp.body) + data = grab_info(/(?:Director|Creator)s?/, resp.body) if data dir = data.scan(NAME_MATCH).map { |url, name| - name + name.ircify_html }.join(', ') end @@ -155,24 +169,40 @@ class Imdb country = data.ircify_html.gsub(' / ','/') end - info << [title, "(#{country}, #{date})", extra, dir ? "[#{dir}]" : nil, ": http://us.imdb.com#{sr}"].compact.join(" ") + info << [title, "(#{country}, #{date})", extra, dir ? "[#{dir}]" : nil, opts[:nourl] ? nil : ": http://www.imdb.com#{sr}"].compact.join(" ") + + return info if opts[:title_only] + + if opts[:characters] + info << resp.body.scan(CREDIT_NAME_MATCH).map { |url, name, role| + "%s: %s" % [name, role.ircify_html] + }.join('; ') + return info + end 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)" + # parse imdb rating value: + if resp.body.match(/itemprop="ratingValue">([^<]+)</) + ratings = "#{$1}/10" + end + # parse imdb rating count: + if resp.body.match(/itemprop="ratingCount">([^<]+)</) + ratings += " (#{$1} voters)" end genre = Array.new - resp.body.scan(/<a href="\/Sections\/Genres\/[^\/]+\/">([^<]+)<\/a>/) do |gnr| - genre << gnr + resp.body.scan(/<a\s+href="\/genre\/[^\?]+\?[^"]+"\s+>([^<]+)<\/a>/) do |gnr| + genre << gnr.first.strip end - plot = nil - data = grab_info(/Plot (?:Outline|Summary)/, resp.body) - if data - plot = "Plot: " + data.ircify_html.gsub(/\s+more$/,'') - end + plot = resp.body.match(DESC_MATCH)[3] rescue nil + # TODO option to extract the long storyline + # data = resp.body.match(/<h2>Storyline<\/h2>\s+/m).post_match.match(/<\/p>/).pre_match rescue nil + # if data + # data.sub!(/<em class="nobr">Written by.*$/m, '') + # plot = data.ircify_html.gsub(/\s+more\s*$/,'').gsub(/\s+Full summary » \| Full synopsis »\s*$/,'') + # end + plot = "Plot: #{plot}" if plot info << ["Ratings: " << ratings, "Genre: " << genre.join('/') , plot].compact.join(". ") @@ -181,7 +211,7 @@ class Imdb return nil end - def info_name(sr) + def info_name(sr, opts={}) resp = nil begin resp = @bot.httputil.get_response(IMDB + sr, :max_redir => -1) @@ -196,9 +226,20 @@ class Imdb if resp.code == "200" m = /<title>([^<]*)<\/title>/.match(resp.body) return nil if !m - name = m[1] + name = m[1].sub(/ - IMDb/, '') - info << "#{name} : http://us.imdb.com#{sr}" + info << name + info.last << " : http://www.imdb.com#{sr}" unless opts[:nourl] + + return info if opts[:name_only] + + if opts[:movies_by_year] + filmoyear = @bot.httputil.get(IMDB + sr + "filmoyear") + if filmoyear + info << filmoyear.scan(/#{TITLE_MATCH} \((\d\d\d\d)\)[^\[\n]*((?:\s+\[[^\]]+\](?:\s+\([^\[<]+\))*)+)\s+</) + end + return info + end birth = nil data = grab_info("Date of Birth", resp.body) @@ -260,45 +301,289 @@ class Imdb end return nil end + + def year_movies(urls, years_txt_org, role_req) + years_txt = years_txt_org.dup + years_txt.sub!(/^'/,'') + years_txt = "9#{years_txt}" if years_txt.match(/^\d\ds?$/) + years_txt = "1#{years_txt}" if years_txt.match(/^\d\d\ds?$/) + + years = [] + case years_txt + when /^\d\d\d\d$/ + years << years_txt + when /^(\d\d\d\d)s$/ + base = $1.to_i + base.upto(base+9) { |year| + years << year.to_s + } + end + + urls.map { |u| + info = info_name(u, :movies_by_year => true) + + debug info.inspect + + name_url = info.first + data = info[1] + + movies = [] + # Sort by pre-title putting movies before TV series + data.sort { |a, b| + aclip = a[1][0,5] + bclip = b[1][0,5] + quot = '"' + (aclip == quot ? 1 : -1) <=> (bclip == quot ? 1 : -1) + }.each { |url, pre_title, year, pre_roles| + next unless years.include?(year) + title = fix_article(pre_title.ircify_html) + if title[0] == ?" and not @bot.config['imdb.tv_series_in_movies'] + next + end + title << " (#{year})" unless years.length == 1 + role_array = [] + pre_roles.strip.scan(/\[([^\]]+)\]((?:\s+\([^\[]+\))+)?/) { |txt, comm| + role = nil + extra = nil + if txt.match(/^(.*)\s+\.\.\.\.\s+(.*)$/) + role = $1 + extra = "(#{$2.ircify_html})" + else + role = txt + end + next if role_req and not role.match(/^#{role_req}/i) + if comm + extra ||= "" + extra += comm.ircify_html if comm + end + role_array << [role, extra] + } + next if role_req and role_array.empty? + + roles = role_array.map { |ar| + if role_req + ar[1] # works for us both if it's nil and if it's something + else + ar.compact.join(" ") + end + }.compact.join(', ') + roles = nil if roles.empty? + movies << [roles, title].compact.join(": ") + } + + if movies.empty? + [name_url, nil] + else + [name_url, movies.join(" | ")] + end + } + end + + def name_in_movie(name_urls, movie_urls) + debug name_urls + info = [] + movie_urls.each { |movie| + title_info = info_title(movie, :title_only => true) + valid = [] + + data = @bot.httputil.get(IMDB + movie + "fullcredits") + data.scan(CREDIT_NAME_MATCH).each { |url, name, role_data| + ch_url, role = role_data.scan(CHAR_MATCH).first + debug [ch_url, role] + wanted = name_urls.include?(url) || name_urls.include?(ch_url) + valid << [url, name.ircify_html, role.ircify_html] if wanted + } + valid.each { |url, name, role| + info << "%s : %s was %s in %s" % [name, IMDB + url, role, title_info] + } + } + return info + end + + end class ImdbPlugin < Plugin - BotConfig.register BotConfigBooleanValue.new('imdb.aka', + Config.register Config::BooleanValue.new('imdb.aka', :default => true, :desc => "Look for IMDB matches also in translated titles and other 'also known as' information") - BotConfig.register BotConfigBooleanValue.new('imdb.popular', + Config.register Config::BooleanValue.new('imdb.popular', :default => true, :desc => "Display info on popular IMDB entries matching the request closely") - BotConfig.register BotConfigBooleanValue.new('imdb.exact', + Config.register Config::BooleanValue.new('imdb.exact', :default => true, :desc => "Display info on IMDB entries matching the request exactly") - BotConfig.register BotConfigBooleanValue.new('imdb.fix_article', + Config.register Config::BooleanValue.new('imdb.fix_article', :default => false, :desc => "Try to detect an article placed at the end and move it in front of the title") + Config.register Config::BooleanValue.new('imdb.tv_series_in_movies', + :default => false, + :desc => "Whether searching movies by person/year should also return TV series") def help(plugin, topic="") - "imdb <string> => search http://www.imdb.org for <string>: prefix <string> with 'name' or 'title' if you only want to search for people or films respectively, e.g.: imdb name ed wood" + case plugin + when "movies" + "movies by <who> in <years> [as <role>] => display the movies in the <years> where which <who> was <role>; <role> can be one of actor, actress, director or anything: if it's omitted, the role is defined by the prefix: \"movies by ...\" implies director, \"movies with ...\" implies actor or actress; the years can be specified as \"in the 60s\" or as \"in 1953\"" + when /characters?/ + "character played by <who> in <movie> => show the character played by <who> in movie <movie>. characters in <movie> => show the actors and characters in movie <movie>" + else + "imdb <string> => search http://www.imdb.org for <string>: prefix <string> with 'name' or 'title' if you only want to search for people or films respectively, e.g.: imdb name ed wood. see also movies and characters" + end + end + + attr_reader :i + + TITLE_URL = %r{^http://(?:[^.]+\.)?imdb.com(/title/tt\d+/)} + NAME_URL = %r{^http://(?:[^.]+\.)?imdb.com(/name/nm\d+/)} + def imdb_filter(s) + loc = Utils.check_location(s, TITLE_URL) + if loc + sr = loc.first.match(TITLE_URL)[1] + extra = $2 # nothign for the time being, could be fullcredits or whatever + res = i.info_title(sr, :nourl => true, :characters => (extra == 'fullcredits')) + debug res + if res + return {:title => res.first, :content => res.last} + else + return nil + end + end + loc = Utils.check_location(s, NAME_URL) + if loc + sr = loc.first.match(NAME_URL)[1] + extra = $2 # nothing for the time being, could be filmoyear or whatever + res = i.info_name(sr, :nourl => true, :movies_by_year => (extra == 'filmoyear')) + debug res + if res + name = res.shift + return {:title => name, :content => res.join(". ")} + else + return nil + end + end + return nil end + def initialize + super + @i = Imdb.new(@bot) + @bot.register_filter(:imdb, :htmlinfo) { |s| imdb_filter(s) } + end + + # Find a person or movie on IMDB. A :type (name/title, default both) can be + # specified to limit the search to either. + # def imdb(m, params) - what = params[:what].to_s - type = params[:type].intern - i = Imdb.new(@bot) - info = i.info(what, :type => type) - if !info - m.reply "Nothing found for #{what}" - return nil + if params[:movie] + movie = params[:movie].to_s + info = i.info(movie, :type => :title, :characters => true) + else + what = params[:what].to_s + type = params[:type].intern + info = i.info(what, :type => type) + if !info + m.reply "nothing found for #{what}" + return nil + end end if info.length == 1 - m.reply Utils.decode_html_entities info.first.join("\n") + m.reply Utils.decode_html_entities(info.first.join("\n")) + else + m.reply info.map { |si| + Utils.decode_html_entities si.join(" | ") + }.join("\n") + end + end + + # Find the movies with a participation of :who in the year :year + # TODO: allow year to be either a year or a decade ('[in the] 1960s') + # + def movies(m, params) + who = params[:who].to_s + years = params[:years] + role = params[:role] + if role and role.downcase == 'anything' + role = nil + elsif not role + case params[:prefix].intern + when :with + role = /actor|actress/i + when :by + role = 'director' + end + end + + name_urls = i.search(who, :type => :name) + unless name_urls + m.reply "nothing found about #{who}, sorry" + return + end + + movie_urls = i.year_movies(name_urls, years, role) + debug movie_urls.inspect + debug movie_urls[0][1] + + if movie_urls.length == 1 and movie_urls[0][1] + m.reply movie_urls.join("\n") else - m.reply info.map { |i| - Utils.decode_html_entities i.join(" | ") + m.reply movie_urls.map { |si| + si[1] = "no movies in #{years}" unless si[1] + Utils.decode_html_entities si.join(" | ") }.join("\n") end end + + # Find the character played by :who in :movie + # + def character(m, params) + movie = params[:movie].to_s + movie_urls = i.search(movie, :type => :title) + unless movie_urls + m.reply "movie #{who} not found, sorry" + return + end + + if params[:actor] + who = params[:actor].to_s + type = :name + else + who = params[:character].to_s + type = :character + end + + name_urls = i.search(who, :type => type, :all => true) + unless name_urls + m.reply "nothing found about #{who}, sorry" + return + end + + info = i.name_in_movie(name_urls, movie_urls) + if info.empty? + m.reply "nothing found about #{who} in #{movie}, sorry" + else + m.reply info.join("\n") + end + end + + # Report the characters in movie :movie + # + def characters(m, params) + movie = params[:movie].to_s + + urls = i.search(movie, :type => :title) + unless urls + m.reply "nothing found about #{movie}" + end + + end + end plugin = ImdbPlugin.new + plugin.map "imdb [:type] *what", :requirements => { :type => /name|title/ }, :defaults => { :type => 'both' } +plugin.map "movies :prefix *who in [the] :years [as :role]", :requirements => { :prefix => /with|by|from/, :years => /'?\d+s?/ } +plugin.map "character [played] by *actor in *movie" +plugin.map "character of *character in *movie" +plugin.map "characters in *movie", :action => :imdb