# Below is an example of how to get the top fans for a track.
# 
#   track = Rockstar::Track.new('Carrie Underwood', 'Before He Cheats')
#   puts 'Fans'
#   puts "=" * 4
#   track.fans.each { |u| puts u.username }
#   
# Which would output something like:
# 
#   track = Rockstar::Track.new('Carrie Underwood', 'Before He Cheats')
#   puts 'Fans'
#   puts "=" * 4
#   track.fans.each { |u| puts "(#{u.weight}) #{u.username}" }
# 
#   Fans
#   ====
#   (69163) PimpinRose
#   (7225) selene204
#   (7000) CelestiaLegends
#   (6817) muehllr
#   (5387) Mudley
#   (5368) ilovejohnny1984
#   (5232) MeganIAD
#   (5132) Veric
#   (5097) aeVnar
#   (3390) kristaaan
#   (3239) kelseaowns
#   (2780) syndication
#   (2735) mkumm
#   (2706) Kimmybeebee
#   (2648) skorpcroze
#   (2549) mistergreg
#   (2449) mlmjcace
#   (2302) tiNEey
#   (2169) ajsbabiegirl
module Rockstar
  class Track < Base
    attr_accessor :artist, :artist_mbid, :name, :mbid, :playcount, :rank, :url
    attr_accessor :streamable, :album, :album_mbid, :date, :date_uts
    
    # only seems to be used on top tracks for tag
    attr_accessor :count, :thumbnail, :image, :images
    
    # for weekly top tracks
    attr_accessor :chartposition
    
    class << self
      def new_from_xml(xml, doc=nil)
        artist          = (xml).at(:artist)['name']               if (xml).at(:artist) && !(xml).at(:artist)['name'].nil?
        artist          = (xml).at(:artist).at(:name).inner_html  if artist.nil? && (xml).at(:artist) && (xml).at(:artist).at(:name)
        artist          = (xml).at(:artist).inner_html            if artist.nil? && (xml).at(:artist)
        artist          = doc.root['artist']                      if artist.nil? && doc.root['artist']
        name            = (xml).at(:name).inner_html              if (xml).at(:name)
        name            = xml['name']                             if name.nil? && xml['name']
        t               = Track.new(artist, name)
        t.artist_mbid   = (xml).at(:artist)['mbid']               if (xml).at(:artist) && (xml).at(:artist)['mbid']
        t.artist_mbid   = (xml).at(:artist).at(:mbid).inner_html  if t.artist_mbid.nil? && (xml).at(:artist) && (xml).at(:artist).at(:mbid)
        t.mbid          = (xml).at(:mbid).inner_html              if (xml).at(:mbid)
        t.playcount     = (xml).at(:playcount).inner_html         if (xml).at(:playcount)
        t.chartposition = t.rank = xml['rank']                    if xml['rank']
        t.url           = Base.fix_url((xml).at(:url).inner_html) if (xml).at(:url)
        t.streamable    = (xml).at(:track)['streamable']          if (xml).at(:track) && (xml).at(:track)['streamable']
        t.streamable    = (xml).at(:streamable).inner_html == '1' ? 'yes' : 'no' if t.streamable.nil? && (xml).at(:streamable)
        
        t.count         = xml['count']                            if xml['count']
        t.album         = (xml).at(:album).inner_html             if (xml).at(:album)
        t.album_mbid    = (xml).at(:album)['mbid']                if (xml).at(:album) && (xml).at(:album)['mbid']
        t.date          = Time.parse((xml).at(:date).inner_html)  if (xml).at(:date)
        t.date_uts      = (xml).at(:date)['uts']                  if (xml).at(:date) && (xml).at(:date)['uts']
        
        t.images = {}
        (xml/'image').each {|image|
          t.images[image['size']] = image.inner_html
        }
        
        t.thumbnail = t.images['small']
        t.image     = t.images['medium']
        t
      end
    end
    
    def initialize(artist, name)
      raise ArgumentError, "Artist is required" if artist.blank?
      raise ArgumentError, "Name is required" if name.blank?
      @artist = artist
      @name = name
    end
        
    def fans(force=false)
      get_instance("track.getTopFans", :fans, :user, {:track => @name, :artist => @artist}, force)
    end
    
    def tags(force=false)
      get_instance("track.getTopTags", :tags, :tag, {:track => @name, :artist => @artist}, force)
    end
    
    # The session_key is returned by auth.session.key
    def love(session_key)
      doc = Hpricot::XML(self.class.connection.post("track.love", true, {:track => @name, :artist => @artist, :sk => session_key}))
      doc.at("lfm")["status"]
    end
  end
end