/usr/share/amsn/plugins/music/infogmusicbrowser is in amsn-data 0.98.9-1.
This file is owned by root:root, with mode 0o755.
The actual contents of the file can be viewed below.
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 | #!/usr/bin/perl
use warnings;
use strict;
use Net::DBus;
my $bus = Net::DBus->session;
my $service = $bus->get_service('org.gmusicbrowser');
my $object = $service->get_object('/org/gmusicbrowser', 'org.gmusicbrowser');
my $status= $object->Playing ? 'playing' : '';
print "$status\n";
my $info= $object->CurrentSong;
$info->{pathfile}= $info->{path} ? $info->{path}.'/'.$info->{file} : '';
$info->{album_picture}||= '';
$info->{album_picture}='' if $info->{album_picture}=~m/flac$|mp3$/i;
print "$info->{$_}\n" for qw/title artist pathfile album_picture album/;
|