X-Git-Url: https://git.netwichtig.de/gitweb/?a=blobdiff_plain;f=data%2Frbot%2Fplugins%2Fimdb.rb;h=0f5c6024b6306ddcd73079500208dde7a02dbf55;hb=a5ba341ceac6a73b690c2d84001766b75bcb249f;hp=8c46f3fe24fae918000cbbd5fab0130e51a5296c;hpb=37c38bb9571052b75ede02602e568754c5ff8158;p=user%2Fhenk%2Fcode%2Fruby%2Frbot.git diff --git a/data/rbot/plugins/imdb.rb b/data/rbot/plugins/imdb.rb index 8c46f3fe..0f5c6024 100644 --- a/data/rbot/plugins/imdb.rb +++ b/data/rbot/plugins/imdb.rb @@ -11,17 +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>/ - CREDIT_NAME_MATCH = /#{NAME_MATCH}<\/td>]+> \.\.\. <\/td>]+>(.+?)<\/td>/ + 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 @@ -32,8 +33,12 @@ class Imdb end def search(rawstr, rawopts={}) + # 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'] + str << "&site=aka" if @bot.config['imdb.aka'] opts = rawopts.dup opts[:type] = :both unless opts[:type] return do_search(str, opts) @@ -54,6 +59,9 @@ class Imdb matcher = MATCHER[opts[:type]] 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'] @@ -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) @@ -124,6 +132,8 @@ class Imdb 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,13 +146,17 @@ 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.ircify_html @@ -155,33 +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] + "%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(". ") @@ -205,9 +226,10 @@ 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] @@ -280,7 +302,7 @@ class Imdb return nil end - def year_movies(urls, years_txt_org) + 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?$/) @@ -297,8 +319,8 @@ class Imdb } end - urls.map { |url| - info = info_name(url, :movies_by_year => true) + urls.map { |u| + info = info_name(u, :movies_by_year => true) debug info.inspect @@ -321,16 +343,32 @@ class Imdb 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_array << "#{$1} (#{$2})" + role = $1 + extra = "(#{$2.ircify_html})" else - role_array << txt + 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.last << " " + comm.ircify_html if comm + role_array << [role, extra] } + next if role_req and role_array.empty? - roles = role_array.join(', ') - movies << [roles, title].join(": ") + 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? @@ -342,14 +380,18 @@ class Imdb 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| - valid << [url, name.ircify_html, role.ircify_html] if name_urls.include?(url) + 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] @@ -362,31 +404,70 @@ class Imdb 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") - BotConfig.register BotConfigBooleanValue.new('imdb.tv_series_in_movies', + 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 @@ -406,7 +487,7 @@ class ImdbPlugin < Plugin 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(" | ") @@ -415,11 +496,22 @@ class ImdbPlugin < Plugin 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') + # 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 @@ -427,7 +519,7 @@ class ImdbPlugin < Plugin return end - movie_urls = i.year_movies(name_urls, years) + movie_urls = i.year_movies(name_urls, years, role) debug movie_urls.inspect debug movie_urls[0][1] @@ -444,17 +536,23 @@ class ImdbPlugin < Plugin # Find the character played by :who in :movie # def character(m, params) - who = params[:who].to_s movie = params[:movie].to_s - - name_urls = i.search(who, :type => :name) - unless name_urls - m.reply "nothing found about #{who}, sorry" + movie_urls = i.search(movie, :type => :title) + unless movie_urls + m.reply "movie #{who} not found, sorry" return end - movie_urls = i.search(movie, :type => :title) - unless movie_urls + 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 @@ -484,8 +582,8 @@ end plugin = ImdbPlugin.new plugin.map "imdb [:type] *what", :requirements => { :type => /name|title/ }, :defaults => { :type => 'both' } -plugin.map "movies :prefix *who in [the] :years", :requirements => { :prefix => /with|by|from/, :years => /'?\d+s?/ } -plugin.map "character [played] by *who in *movie" -plugin.map "character of *who in *movie" +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