From e2129335868160f3ae9571abd7c2af639f41d28a Mon Sep 17 00:00:00 2001 From: matlantis Date: Wed, 31 Jan 2018 13:46:51 +0100 Subject: [PATCH 1/3] make last.fm available for album cover art search --- plugins/fetch_cover.pm | 15 +++++++++++++++ 1 file changed, 15 insertions(+) diff --git a/plugins/fetch_cover.pm b/plugins/fetch_cover.pm index 88b1a649..acc13a70 100644 --- a/plugins/fetch_cover.pm +++ b/plugins/fetch_cover.pm @@ -37,6 +37,7 @@ my %Sites= album => { googlei => [_"google images","http://images.google.com/images?q=%s&imgsz=medium|large&imgar=ns", \&parse_googlei, GOOGLE_USER_AGENT], googleihi =>[_"google images (hi-res)","http://www.google.com/images?q=%s&imgsz=xlarge|xxlarge&imgar=ns", \&parse_googlei, GOOGLE_USER_AGENT], + lastfm => ['last.fm',"http://www.last.fm/music/%a/%l/+images", \&parse_lastfm], yahoo =>['yahoo',"http://images.search.yahoo.com/search/images?p=%s&o=js", \&parse_yahoo], bing =>['bing',"http://www.bing.com/images/async?q=%s&qft=+filterui:aspect-square", \&parse_bing], ddg => ["DuckDuckGo","https://duckduckgo.com/?q=%s&iax=1&ia=images", \&parse_ddg], @@ -269,6 +270,20 @@ sub parse_freecovers #FIXME could use a XML module #can provide backcover and mo return \@list; } sub parse_lastfm +{ my ($results,$pageurl,$searchcontext)=@_; + $searchcontext->{baseurl}||= $pageurl; + my @list; + while ($results=~m#]+?class="image-list-link"[^<]+]+?src="([^"]+)"#gis) + { my $url=my $pre=$1; + $url=~s#/i/u/avatar170s/#/i/u/#; + $url.='.jpg'; + push @list, {url => $url, previewurl =>$pre,}; + } + my $nexturl; + $nexturl= $searchcontext->{baseurl}.$1 if $results=~m#Next#; + return \@list,$nexturl; +} +sub parse_lastfm_artist { my ($results,$pageurl,$searchcontext)=@_; $searchcontext->{baseurl}||= $pageurl; my @list; From faad261a76169cc7548c6dee46c62409a072ca3b Mon Sep 17 00:00:00 2001 From: matlantis Date: Wed, 31 Jan 2018 13:46:51 +0100 Subject: [PATCH 2/3] remove old code --- plugins/fetch_cover.pm | 14 -------------- 1 file changed, 14 deletions(-) diff --git a/plugins/fetch_cover.pm b/plugins/fetch_cover.pm index acc13a70..783d9c2d 100644 --- a/plugins/fetch_cover.pm +++ b/plugins/fetch_cover.pm @@ -283,20 +283,6 @@ sub parse_lastfm $nexturl= $searchcontext->{baseurl}.$1 if $results=~m#Next#; return \@list,$nexturl; } -sub parse_lastfm_artist -{ my ($results,$pageurl,$searchcontext)=@_; - $searchcontext->{baseurl}||= $pageurl; - my @list; - while ($results=~m#]+?class="image-list-link"[^<]+]+?src="([^"]+)"#gis) - { my $url=my $pre=$1; - $url=~s#/i/u/avatar170s/#/i/u/#; - $url.='.jpg'; - push @list, {url => $url, previewurl =>$pre,}; - } - my $nexturl; - $nexturl= $searchcontext->{baseurl}.$1 if $results=~m#Next#; - return \@list,$nexturl; -} sub parse_sloth { my $result=$_[0]; my @list; From a266721f4955eb13cdc890b9e78e6e669f56ee07 Mon Sep 17 00:00:00 2001 From: matlantis Date: Wed, 31 Jan 2018 14:19:18 +0100 Subject: [PATCH 3/3] indent error --- plugins/fetch_cover.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/plugins/fetch_cover.pm b/plugins/fetch_cover.pm index 783d9c2d..2adb4210 100644 --- a/plugins/fetch_cover.pm +++ b/plugins/fetch_cover.pm @@ -37,7 +37,7 @@ my %Sites= album => { googlei => [_"google images","http://images.google.com/images?q=%s&imgsz=medium|large&imgar=ns", \&parse_googlei, GOOGLE_USER_AGENT], googleihi =>[_"google images (hi-res)","http://www.google.com/images?q=%s&imgsz=xlarge|xxlarge&imgar=ns", \&parse_googlei, GOOGLE_USER_AGENT], - lastfm => ['last.fm',"http://www.last.fm/music/%a/%l/+images", \&parse_lastfm], + lastfm => ['last.fm',"http://www.last.fm/music/%a/%l/+images", \&parse_lastfm], yahoo =>['yahoo',"http://images.search.yahoo.com/search/images?p=%s&o=js", \&parse_yahoo], bing =>['bing',"http://www.bing.com/images/async?q=%s&qft=+filterui:aspect-square", \&parse_bing], ddg => ["DuckDuckGo","https://duckduckgo.com/?q=%s&iax=1&ia=images", \&parse_ddg],