share/lua/meta/01_musicbrainz.lua

   1 --[[
   2  Gets an artwork from amazon
   3
   4  $Id$
   5  Copyright © 2007 the VideoLAN team
   6
   7  This program is free software; you can redistribute it and/or modify
   8  it under the terms of the GNU General Public License as published by
   9  the Free Software Foundation; either version 2 of the License, or
  10  (at your option) any later version.
  11
  12  This program is distributed in the hope that it will be useful,
  13  but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  15  GNU General Public License for more details.
  16
  17  You should have received a copy of the GNU General Public License
  18  along with this program; if not, write to the Free Software
  19  Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  20 --]]
  21
  22 -- Return the artwork
  23 function fetch_art()
  24     local query
  25     if vlc.artist and vlc.album then
  26         query = "http://musicbrainz.org/ws/1/release/?type=xml&artist="..vlc.strings.encode_uri_component(vlc.artist).."&title="..vlc.strings.encode_uri_component(vlc.album)
  27     else
  28         return nil
  29     end
  30
  31     local l = vlc.object.libvlc()
  32     local t = vlc.var.get( l, "musicbrainz-previousdate" )
  33     if t ~= nil then
  34         if t + 1000000. > vlc.misc.mdate() then
  35             vlc.msg.warn( "We must wait 1 second between requests unless we want to be blacklisted from the musicbrainz server." )
  36             vlc.misc.mwait( t + 1000000. )
  37         end
  38         vlc.var.set( l, "musicbrainz-previousdate", vlc.misc.mdate() )
  39     else
  40         vlc.var.create( l, "musicbrainz-previousdate", vlc.misc.mdate() )
  41     end
  42     l = nil
  43     vlc.msg.dbg( query )
  44     local s = vlc.stream( query )
  45     local page = s:read( 65653 )
  46
  47     -- FIXME: multiple results may be available
  48     _,_,asin = string.find( page, "<asin>(.-)</asin>" )
  49     if asin ~= page then
  50         return "http://images.amazon.com/images/P/"..asin..".01._SCLZZZZZZZ_.jpg"
  51     else
  52         return nil
  53     end
  54 end