Merge pull request #413 from philippe44/bitrate

fix bitrate with icy data
LMS-Community · Sep 4, 2020 · edbf8a2 · edbf8a2
2 parents 5eb63f9 + 888e7ab
commit edbf8a2
Showing 1 changed file with 11 additions and 9 deletions.
diff --git a/Slim/Player/Protocols/HTTP.pm b/Slim/Player/Protocols/HTTP.pm
@@ -549,6 +549,12 @@ sub parseDirectHeaders {
 		($oggType) = $url->content_type =~ /(ogf|ogg|ops)/;
 		$url = $url->url;
 	}
+
+	my $song = ${*$self}{'song'} if blessed $self;
+
+	if (!$song && $client->controller()->songStreamController()) {
+		$song = $client->controller()->songStreamController()->song();
+	}
 
 	my ($title, $bitrate, $metaint, $redir, $contentType, $length, $body);
 	my ($rangeLength, $startOffset);
@@ -567,9 +573,11 @@ sub parseDirectHeaders {
 			$title = Slim::Utils::Unicode::utf8decode_guess($1);
 		}
 
-		elsif ($header =~ /^(?:icy-br|x-audiocast-bitrate):\s*(.+)/i) {
-			$bitrate = $1;
-			$bitrate *= 1000 if $bitrate < 1000;
+		elsif ($header =~ /^(?:icy-br|x-audiocast-bitrate):\s*(.+)/i) 
+			if ($song && !$song->bitrate) {
+				$bitrate = $1;
+				$bitrate *= 1000 if $bitrate < 8000;
+			}	
 		}
 
 		elsif ($header =~ /^icy-metaint:\s*(.+)/i) {
@@ -606,12 +614,6 @@ sub parseDirectHeaders {
 		$length = $rangeLength;
 	}
 
-	my $song = ${*self}{'song'} if blessed $self;
-
-	if (!$song && $client->controller()->songStreamController()) {
-		$song = $client->controller()->songStreamController()->song();
-	}
-
 	if ($song && $length) {
 		my $seekdata = $song->seekdata();