summaryrefslogtreecommitdiff
path: root/data/rbot/plugins/lastfm.rb
blob: dca347036f493a15b40b3255797d546ae5e9bd05 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
#-- vim:sw=2:et
#++
#
# :title: lastfm plugin for rbot
#
# Author:: Jeremy Voorhis
# Author:: Giuseppe "Oblomov" Bilotta <giuseppe.bilotta@gmail.com>
# Author:: Casey Link <unnamedrambler@gmail.com>
# Author:: Raine Virta <rane@kapsi.fi>
#
# Copyright:: (C) 2005 Jeremy Voorhis
# Copyright:: (C) 2007 Giuseppe Bilotta
# Copyright:: (C) 2008 Casey Link
# Copyright:: (C) 2009 Raine Virta
#
# License:: GPL v2

require 'rexml/document'
require 'cgi'

class ::LastFmEvent
  def initialize(hash)
    @url = hash[:url]
    @date = hash[:date]
    @location = hash[:location]
    @description = hash[:description]
    @attendance = hash[:attendance]

    @artists = hash[:artists]

    if @artists.length > 10 #more than 10 artists and it floods
      diff = @artists.length - 10
      @artist_string = Bold + @artists[0..10].join(', ') + Bold
      @artist_string << _(" and %{n} more...") % {:n => diff}
    else
      @artist_string = Bold + @artists.join(', ') + Bold
    end
  end

  def compact_display
   unless @attendance.zero?
     return "%s %s @ %s (%s attending) %s" % [@date.strftime("%a, %b %d"), @artist_string, @location, @attendance, @url]
   end
   return "%s %s @ %s %s" % [@date.strftime("%a, %b %d"), @artist_string, @location, @url]
  end
  alias :to_s :compact_display

end

define_structure :LastFmVenue, :id, :city, :street, :postal, :country, :name, :url, :lat, :long

class LastFmPlugin < Plugin
  include REXML
  Config.register Config::IntegerValue.new('lastfm.max_events',
    :default => 25, :validate => Proc.new{|v| v > 1},
    :desc => "Maximum number of events to display.")
  Config.register Config::IntegerValue.new('lastfm.default_events',
    :default => 3, :validate => Proc.new{|v| v > 1},
    :desc => "Default number of events to display.")
  Config.register Config::IntegerValue.new('lastfm.max_shouts',
    :default => 5, :validate => Proc.new{|v| v > 1},
    :desc => "Maximum number of user shouts to display.")
  Config.register Config::IntegerValue.new('lastfm.default_shouts',
    :default => 3, :validate => Proc.new{|v| v > 1},
    :desc => "Default number of user shouts to display.")
  Config.register Config::IntegerValue.new('lastfm.max_user_data',
    :default => 25, :validate => Proc.new{|v| v > 1},
    :desc => "Maximum number of user data entries (except events and shouts) to display.")
  Config.register Config::IntegerValue.new('lastfm.default_user_data',
    :default => 10, :validate => Proc.new{|v| v > 1},
    :desc => "Default number of user data entries (except events and shouts) to display.")

  APIKEY = "b25b959554ed76058ac220b7b2e0a026"
  APIURL = "http://ws.audioscrobbler.com/2.0/?api_key=#{APIKEY}&"

  def initialize
    super
    class << @registry
      def store(val)
        val
      end
      def restore(val)
        val
      end
    end
  end

  def help(plugin, topic="")
    period = _(", where <period> can be one of: 3|6|12 months, a year")
    case (topic.intern rescue nil)
    when :event, :events
      _("lastfm [<num>] events in <location> => show information on events in or near <location>. lastfm [<num>] events by <artist/group> => show information on events by <artist/group>. The number of events <num> that can be displayed is optional, defaults to %{d} and cannot be higher than %{m}") % {:d => @bot.config['lastfm.default_events'], :m => @bot.config['lastfm.max_events']}
    when :artist
      _("lastfm artist <name> => show information on artist <name> from last.fm")
    when :album
      _("lastfm album <name> => show information on album <name> from last.fm [not implemented yet]")
    when :track
      _("lastfm track <name> => search tracks matching <name> on last.fm")
    when :now, :np
      _("lastfm now [<nick>] => show the now playing track from last.fm. np [<nick>] does the same.")
    when :set
      _("lastfm set user <user> => associate your current irc nick with a last.fm user. lastfm set verb <present>, <past> => set your preferred now playing/just played verbs. default \"is listening to\" and \"listened to\".")
    when :who
      _("lastfm who [<nick>] => show who <nick> is on last.fm. if <nick> is empty, show who you are on lastfm.")
    when :compare
      _("lastfm compare [<nick1>] <nick2> => show musical taste compatibility between nick1 (or user if omitted) and nick2")
    when :shouts
      _("lastfm shouts [<nick>] => show shouts to <nick>")
    when :friends
      _("lastfm friends [<nick>] => show <nick>'s friends")
    when :neighbors, :neighbours
      _("lastfm neighbors [<nick>] => show people who share similar musical taste as <nick>")
    when :lovedtracks
      _("lastfm loved[tracks] [<nick>] => show tracks that <nick> has loved")
    when :recenttracks, :recentracks
      _("lastfm recent[tracks] [<nick>] => show tracks that <nick> has recently played")
    when :topalbums
      _("lastfm topalbums [<nick>] [over <period>] => show <nick>'s top albums%{p}") % { :p => period }
    when :topartists
      _("lastfm topartists [<nick>] [over <period>] => show <nick>'s top artists%{p}") % { :p => period }
    when :toptracks
      _("lastfm toptracks [<nick>] [over <period>] => show <nick>'s top tracks%{p}") % { :p => period }
    when :weeklyalbumchart
      _("lastfm weeklyalbumchart [<nick>] => show <nick>'s weekly album chart")
    when :weeklyartistchart
      _("lastfm weeklyartistchart [<nick>] => show <nick>'s weekly artist chart")
    when :weeklytrackchart
      _("lastfm weeklyartistchart [<nick>] => show <nick>'s weekly track chart")
    else
      _("last.fm plugin - topics: events, artist, album, track, now, set, who, compare, shouts, friends, neighbors, (loved|recent)tracks, top(albums|tracks|artists), weekly(album|artist|track)chart")
    end
  end

  # TODO allow searching by country etc.
  #
  # Options: name, limit
  def search_venue_by(options)
    params = {}
    params[:venue] = CGI.escape(options[:name])
    options.delete(:name)
    params.merge!(options)

    uri = "#{APIURL}method=venue.search&"
    uri << params.to_a.map {|e| e.join("=")}.join("&")

    xml = @bot.httputil.get_response(uri)
    doc = Document.new xml.body
    results = []

    doc.root.elements.each("results/venuematches/venue") do |v|
      venue = LastFmVenue.new
      venue.id      = v.elements["id"].text.to_i
      venue.url     = v.elements["url"].text
      venue.lat     = v.elements["location/geo:point/geo:lat"].text.to_f
      venue.long    = v.elements["location/geo:point/geo:long"].text.to_f
      venue.name    = v.elements["name"].text
      venue.city    = v.elements["location/city"].text
      venue.street  = v.elements["location/street"].text
      venue.postal  = v.elements["location/postalcode"].text
      venue.country = v.elements["location/country"].text

      results << venue
    end
    results
  end

  def find_events(m, params)
    num = params[:num] || @bot.config['lastfm.default_events']
    num = num.to_i.clip(1, @bot.config['lastfm.max_events'])

    location = params[:location]
    artist = params[:who]
    venue = params[:venue]
    user = resolve_username(m, params[:user])

    if location
      uri = "#{APIURL}method=geo.getevents&location=#{CGI.escape location.to_s}"
      emptymsg = _("no events found in %{location}") % {:location => location.to_s}
    elsif venue
      venues = search_venue_by(:name => venue.to_s, :limit => 1)
      venue  = venues.first
      uri = "#{APIURL}method=venue.getevents&venue=#{venue.id}"
    elsif artist
      uri = "#{APIURL}method=artist.getevents&artist=#{CGI.escape artist.to_s}"
      emptymsg = _("no events found by %{artist}") % {:artist => artist.to_s}
    elsif user
      uri = "#{APIURL}method=user.getevents&user=#{CGI.escape user}"
      emptymsg = _("%{user} is not attending any events") % {:user => user}
    end
    xml = @bot.httputil.get_response(uri)

    doc = Document.new xml.body
    if xml.class == Net::HTTPInternalServerError
      if doc.root and doc.root.attributes["status"] == "failed"
        m.reply doc.root.elements["error"].text
      else
        m.reply _("could not retrieve events")
      end
    end
    disp_events = Array.new
    events = Array.new
    doc.root.elements.each("events/event"){ |e|
      h = {}
      h[:title] = e.elements["title"].text
      venue = e.elements["venue"].elements["name"].text
      city = e.elements["venue"].elements["location"].elements["city"].text
      country =  e.elements["venue"].elements["location"].elements["country"].text
      h[:location] = Underline + venue + Underline + " #{Bold + city + Bold}, #{country}"
      date = e.elements["startDate"].text.split
      h[:date] = Time.utc(date[3].to_i, date[2], date[1].to_i)
      h[:desc] = e.elements["description"].text
      h[:url] = e.elements["url"].text
      h[:attendance] = e.elements["attendance"].text.to_i
      artists = Array.new
      e.elements.each("artists/artist"){ |a|
        artists << a.text
      }
      h[:artists] = artists
      events << LastFmEvent.new(h)
    }
    if events.empty?
      m.reply emptymsg
      return
    end
    events[0...num].each { |event|
      disp_events << event.to_s
    }
    m.reply disp_events.join(' | '), :split_at => /\s+\|\s+/

  end

  def tasteometer(m, params)
    opts = { :cache => false }
    user1 = resolve_username(m, params[:user1])
    user2 = resolve_username(m, params[:user2])
    xml = @bot.httputil.get_response("#{APIURL}method=tasteometer.compare&type1=user&type2=user&value1=#{CGI.escape user1}&value2=#{CGI.escape user2}", opts)
    doc = Document.new xml.body
    unless doc
      m.reply _("last.fm parsing failed")
      return
    end
    if xml.class == Net::HTTPBadRequest
      if doc.root.elements["error"].attributes["code"] == "7" then
        error = doc.root.elements["error"].text
        error.match(/Invalid username: \[(.*)\]/);
        baduser = $1

        m.reply _("%{u} doesn't exist on last.fm") % {:u => baduser}
        return
      else
        m.reply _("error: %{e}") % {:e => doc.root.element["error"].text}
        return
      end
    end
    score = doc.root.elements["comparison/result/score"].text.to_f
    artists = doc.root.get_elements("comparison/result/artists/artist").map { |e| e.elements["name"].text}
    case
      when score >= 0.9
        rating = _("Super")
      when score >= 0.7
        rating = _("Very High")
      when score >= 0.5
        rating = _("High")
      when score >= 0.3
        rating = _("Medium")
      when score >= 0.1
        rating = _("Low")
      else
        rating = _("Very Low")
    end

    reply = _("%{a}'s and %{b}'s musical compatibility rating is %{bold}%{r}%{bold}") % {
      :a => user1,
      :b => user2,
      :r => rating.downcase,
      :bold => Bold
    }

    reply << _(" and music they have in common includes: %{artists}") % {
      :artists => artists.join(", ")
    } unless artists.empty?

    m.reply reply
  end

  def now_playing(m, params)
    opts = { :cache => false }
    user = resolve_username(m, params[:who])
    xml = @bot.httputil.get_response("#{APIURL}method=user.getrecenttracks&user=#{CGI.escape user}", opts)
    doc = Document.new xml.body
    unless doc
      m.reply _("last.fm parsing failed")
      return
    end
    if xml.class == Net::HTTPBadRequest
      if doc.root.elements["error"].text == "Invalid user name supplied" then
        m.reply _("%{user} doesn't exist on last.fm, perhaps they need to: lastfm user <username>") % {
          :user => user
        }
        return
      else
        m.reply _("error: %{e}") % {:e => doc.root.element["error"].text}
        return
      end
    end
    now = artist = track = albumtxt = date = nil
    unless doc.root.elements[1].has_elements?
     m.reply _("%{u} hasn't played anything recently") % {:u => user}
     return
    end
    first = doc.root.elements[1].elements[1]
    now = first.attributes["nowplaying"]
    artist = first.elements["artist"].text
    track = first.elements["name"].text
    albumtxt = first.elements["album"].text
    album = ""
    if albumtxt
      year = get_album(artist, albumtxt)[2]
      album = "[#{albumtxt}, #{year}]" if year
    end
    past = nil
    date = XPath.first(first, "//date")
    if date != nil
      time = date.attributes["uts"]
      past = Time.at(time.to_i)
    end
    if now == "true"
       verb = _("is listening to")
       if @registry.has_key? "#{m.sourcenick}_verb_present"
         verb = @registry["#{m.sourcenick}_verb_present"]
       end
       reply = _("%{u} %{v} \"%{t}\" by %{a} %{b}") % {:u => user, :v => verb, :t => track, :a => artist, :b => album}
    else
      verb = _("listened to")
       if @registry.has_key? "#{m.sourcenick}_verb_past"
         verb = @registry["#{m.sourcenick}_verb_past"]
       end
      ago = Utils.timeago(past)
      reply = _("%{u} %{v} \"%{t}\" by %{a} %{b} %{p}") % {:u => user, :v => verb, :t => track, :a => artist, :b => album, :p => ago}
    end

    reply << _("; see %{uri} for more") % { :uri => "http://www.last.fm/user/#{CGI.escape user}"}
    m.reply reply
  end

  def find_artist(m, params)
    info_xml = @bot.httputil.get("#{APIURL}method=artist.getinfo&artist=#{CGI.escape params[:artist].to_s}")
    unless info_xml
      m.reply _("I had problems getting info for %{a}") % {:a => params[:artist]}
      return
    end
    info_doc = Document.new info_xml
    unless info_doc
      m.reply _("last.fm parsing failed")
      return
    end
    tags_xml = @bot.httputil.get("#{APIURL}method=artist.gettoptags&artist=#{CGI.escape params[:artist].to_s}")
    tags_doc = Document.new tags_xml

    first = info_doc.root.elements["artist"]
    artist = first.elements["name"].text
    url = first.elements["url"].text
    stats = {}
    %w(playcount listeners).each do |e|
      t = first.elements["stats/#{e}"].text
      stats[e.to_sym] = t.gsub(/(\d)(?=(\d\d\d)+(?!\d))/, "\\1,")
    end
    summary = first.elements["bio"].elements["summary"].text
    similar = first.get_elements("similar/artist").map { |a|
      _("%{b}%{a}%{b}") % { :a => a.elements["name"].text, :b => Bold } }
    tags = tags_doc.root.get_elements("toptags/tag")[0..4].map { |t|
      _("%{u}%{t}%{u}") % { :t => t.elements["name"].text, :u => Underline } }
    reply = _("%{b}%{a}%{b} <%{u}> has been played %{b}%{c}%{b} times and is being listened to by %{b}%{l}%{b} people") % {
      :b => Bold, :a => artist, :u => url, :c => stats[:playcount], :l => stats[:listeners] }
    reply << _(". Tagged as: %{t}") % {
      :t => tags.join(", "), :b => Bold } unless tags.empty?
    reply << _(". Similar artists: %{s}") % {
      :s => similar.join(", "), :b => Bold } unless similar.empty?
    m.reply reply
    m.reply summary.ircify_html
  end

  def find_track(m, params)
    track = params[:track].to_s
    xml = @bot.httputil.get("#{APIURL}method=track.search&track=#{CGI.escape track}")
    unless xml
      m.reply _("I had problems getting info for %{a}") % {:a => track}
      return
    end
    debug xml
    doc = Document.new xml
    unless doc
      m.reply _("last.fm parsing failed")
      return
    end
    debug doc.root
    results = doc.root.elements["results/opensearch:totalResults"].text.to_i rescue 0
    if results > 0
      begin
        hits = []
        doc.root.each_element("results/trackmatches/track") do |track|
          hits << _("%{bold}%{t}%{bold} by %{bold}%{a}%{bold} (%{n} listeners)") % {
            :t => track.elements["name"].text,
            :a => track.elements["artist"].text,
            :n => track.elements["listeners"].text,
            :bold => Bold
          }
        end
        m.reply hits.join(' -- '), :split_at => ' -- '
      rescue
        error $!
        m.reply _("last.fm parsing failed")
      end
    else
      m.reply _("track %{a} not found") % {:a => track}
    end
  end

  def get_album(artist, album)
    xml = @bot.httputil.get("#{APIURL}method=album.getinfo&artist=#{CGI.escape artist}&album=#{CGI.escape album}")
    unless xml
      return [_("I had problems getting album info")]
    end
    doc = Document.new xml
    unless doc
      return [_("last.fm parsing failed")]
    end
    album = date = playcount = artist = date = year = nil
    first = doc.root.elements["album"]
    artist = first.elements["artist"].text
    playcount = first.elements["playcount"].text
    album = first.elements["name"].text
    date = first.elements["releasedate"].text
    unless date.strip.length < 2
      year = date.strip.split[2].chop
    end
    result = [artist, album, year, playcount]
    return result
  end

  def find_album(m, params)
    album = get_album(params[:artist].to_s, params[:album].to_s)
    if album.length == 1
      m.reply _("I couldn't locate: \"%{a}\" by %{r}") % {:a => params[:album], :r => params[:artist]}
      return
    end
    year = "(#{album[2]}) " unless album[2] == nil
    m.reply _("the album \"%{a}\" by %{r} %{y}has been played %{c} times") % {:a => album[1], :r => album[0], :y => year, :c => album[3]}
  end

  def set_user(m, params)
    user = params[:who].to_s
    nick = m.sourcenick
    @registry[ nick ] = user
    m.reply _("okay, I'll remember that %{n} is %{u} on last.fm") % {:n => nick, :u => user}
  end

  def set_verb(m, params)
    past = params[:past].to_s
    present = params[:present].to_s
    key = "#{m.sourcenick}_verb_"
    @registry[ "#{key}past" ] = past
    @registry[ "#{key}present" ] = present
    m.reply _("okay, I'll remember that %{n} prefers \"%{r}\" and \"%{p}\"") % {:n => m.sourcenick, :p => past, :r => present}
  end

  def get_user(m, params)
    nick = ""
    if params[:who]
      nick = params[:who].to_s
    else
      nick = m.sourcenick
    end
    if @registry.has_key? nick
      user = @registry[ nick ]
      m.reply _("%{nick} is %{user} on last.fm") % {
        :nick => nick,
        :user => user
      }
    else
      m.reply _("sorry, I don't know who %{n} is on last.fm, perhaps they need to: lastfm set user <username>") % {:n => nick}
    end
  end

  def lastfm(m, params)
    action = case params[:action]
    when "neighbors" then "neighbours"
    when "recentracks", "recent" then "recenttracks"
    when "loved" then "lovedtracks"
    when /^weekly(track|album|artist)s$/
      "weekly#{$1}chart"
    when "events"
      find_events(m, params)
      return
    else
      params[:action]
    end.to_sym

    if action == :shouts
      num = params[:num] || @bot.config['lastfm.default_shouts']
      num = num.to_i.clip(1, @bot.config['lastfm.max_shouts'])
    else
      num = params[:num] || @bot.config['lastfm.default_user_data']
      num = num.to_i.clip(1, @bot.config['lastfm.max_user_data'])
    end

    user = resolve_username(m, params[:user])
    uri = "#{APIURL}method=user.get#{action}&user=#{CGI.escape user}"

    if period = params[:period]
      period_uri = (period.last == "year" ? "12month" : period.first + "month")
      uri << "&period=#{period_uri}"
    end

    begin
      res = @bot.httputil.get_response(uri)
      raise _("no response body") unless res.body
    rescue Exception => e
        m.reply _("I had problems accessing last.fm: %{e}") % {:e => e.message}
        return
    end
    doc = Document.new(res.body)
    unless doc
      m.reply _("last.fm parsing failed")
      return
    end

    case res
    when Net::HTTPBadRequest
      if doc.root and doc.root.attributes["status"] == "failed"
        m.reply "error: " << doc.root.elements["error"].text.downcase
      end
      return
    end

    seemore =  _("; see %{uri} for more")
    case action
    when :friends
      friends = doc.root.get_elements("friends/user").map do |u|
        u.elements["name"].text
      end

      if friends.empty?
        reply = _("%{user} has no friends :(")
      elsif friends.length <= num
        reply = _("%{user} has %{total} friends: %{friends}")
      else
        reply = _("%{user} has %{total} friends, including %{friends}")
        reply << seemore
      end
      m.reply reply % {
        :user => user,
        :total => friends.size,
        :friends => friends.shuffle[0, num].join(", "),
        :uri => "http://www.last.fm/user/#{CGI.escape user}/friends"
      }
    when :lovedtracks
      loved = doc.root.get_elements("lovedtracks/track").map do |track|
        [track.elements["artist/name"].text, track.elements["name"].text].join(" - ")
      end
      loved_prep = loved.shuffle[0, num].to_enum(:each_with_index).collect { |e,i| (i % 2).zero? ? Underline+e+Underline : e }

      if loved.empty?
        reply = _("%{user} has not loved any tracks")
      elsif loved.length <= num
        reply = _("%{user} has loved %{total} tracks: %{tracks}")
      else
        reply = _("%{user} has loved %{total} tracks, including %{tracks}")
        reply << seemore
      end
      m.reply reply % {
          :user => user,
          :total => loved.size,
          :tracks => loved_prep.join(", "),
          :uri => "http://www.last.fm/user/#{CGI.escape user}/library/loved"
        }
    when :neighbours
      nbrs = doc.root.get_elements("neighbours/user").map do |u|
        u.elements["name"].text
      end

      if nbrs.empty?
        reply = _("no one seems to share %{user}'s musical taste")
      elsif nbrs.length <= num
        reply = _("%{user}'s musical neighbours are %{nbrs}")
      else
        reply = _("%{user}'s musical neighbours include %{nbrs}")
        reply << seemore
      end
      m.reply reply % {
          :user  => user,
          :nbrs  => nbrs.shuffle[0, num].join(", "),
          :uri   => "http://www.last.fm/user/#{CGI.escape user}/neighbours"
      }
    when :recenttracks
      tracks = doc.root.get_elements("recenttracks/track").map do |track|
        [track.elements["artist"].text, track.elements["name"].text].join(" - ")
      end

      counts = []
      tracks.each do |track|
        if t = counts.assoc(track)
          counts[counts.rindex(t)] = [track, t[-1] += 1]
        else
          counts << [track, 1]
        end
      end

      tracks_prep = counts[0, num].to_enum(:each_with_index).map do |e,i|
        str = (i % 2).zero? ? Underline+e[0]+Underline : e[0]
        str << " (%{i} times%{m})" % {
          :i => e.last,
          :m => counts.size == 1 ? _(" or more") : nil
        } if e.last > 1
        str
      end

      if tracks.empty?
        m.reply _("%{user} hasn't played anything recently") % { :user => user }
      else
        m.reply _("%{user} has recently played %{tracks}") %
          { :user => user, :tracks => tracks_prep.join(", ") }
      end
    when :shouts
      shouts = doc.root.get_elements("shouts/shout")
      if shouts.empty?
        m.reply _("there are no shouts for %{user}") % { :user => user }
      else
        shouts[0, num].each do |shout|
          m.reply _("<%{author}> %{body}") % {
            :body   => shout.elements["body"].text,
            :author => shout.elements["author"].text,
          }
        end
      end
    when :toptracks, :topalbums, :topartists, :weeklytrackchart, :weeklyalbumchart, :weeklyartistchart
      type  = action.to_s.scan(/track|album|artist/).to_s
      items = doc.root.get_elements("#{action}/#{type}").map do |item|
        case action
        when :weeklytrackchart, :weeklyalbumchart
          format = "%{artist} - %{title} (%{bold}%{plays}%{bold})"
          artist = item.elements["artist"].text
        when :weeklyartistchart, :topartists
          format = "%{artist} (%{bold}%{plays}%{bold})"
          artist = item.elements["name"].text
        when :toptracks, :topalbums
          format = "%{artist} - %{title} (%{bold}%{plays}%{bold})"
          artist = item.elements["artist/name"].text
        end

        _(format) % {
          :artist => artist,
          :title  => item.elements["name"].text,
          :plays  => item.elements["playcount"].text,
          :bold   => Bold
        }
      end
      if items.empty?
        m.reply _("%{user} hasn't played anything in this period of time") % { :user => user }
      else
        m.reply items[0, num].join(", ")
      end
    end
  end

  def resolve_username(m, name)
    name = m.sourcenick if name.nil?
    @registry[name] or name
  end
end

plugin = LastFmPlugin.new
plugin.map 'lastfm [:num] event[s] in *location', :action => :find_events, :requirements => { :num => /\d+/ }, :thread => true
plugin.map 'lastfm [:num] event[s] by *who', :action => :find_events, :requirements => { :num => /\d+/ }, :thread => true
plugin.map 'lastfm [:num] event[s] at *venue', :action => :find_events, :requirements => { :num => /\d+/ }, :thread => true
plugin.map 'lastfm [:num] event[s] [for] *who', :action => :find_events, :requirements => { :num => /\d+/ }, :thread => true
plugin.map 'lastfm artist *artist', :action => :find_artist, :thread => true
plugin.map 'lastfm album *album [by *artist]', :action => :find_album
plugin.map 'lastfm track *track', :action => :find_track, :thread => true
plugin.map 'lastfm set user[name] :who', :action => :set_user, :thread => true
plugin.map 'lastfm set verb *present, *past', :action => :set_verb, :thread => true
plugin.map 'lastfm who [:who]', :action => :get_user, :thread => true
plugin.map 'lastfm compare to :user2', :action => :tasteometer, :thread => true
plugin.map 'lastfm compare [:user1] [to] :user2', :action => :tasteometer, :thread => true
plugin.map "lastfm [user] [:num] :action [:user]", :thread => true,
  :requirements => {
    :action => /^(?:events|shouts|friends|neighbou?rs|loved(?:tracks)?|recent(?:t?racks)?|top(?:album|artist|track)s?|weekly(?:albums?|artists?|tracks?)(?:chart)?)$/,
    :num => /^\d+$/
}
plugin.map 'lastfm [user] [:num] :action [:user] over [*period]', :thread => true,
  :requirements => {
    :action => /^(?:top(?:album|artist|track)s?)$/,
    :period => /^(?:(?:3|6|12) months)|(?:a\s|1\s)?year$/,
    :num => /^\d+$/
}
plugin.map 'lastfm [now] [:who]', :action => :now_playing, :thread => true
plugin.map 'np [:who]', :action => :now_playing, :thread => true