[Slim-Checkins] r10187 - /trunk/server/Slim/Utils/Scanner.pm

[andy at svn.slimdevices.com]

Author: andy
Date: Wed Oct  4 12:08:31 2006
New Revision: 10187

URL: http://svn.slimdevices.com?rev=10187&view=rev
Log:
Avoid sending bad URLs through scanWMAStream

Modified:
    trunk/server/Slim/Utils/Scanner.pm

Modified: trunk/server/Slim/Utils/Scanner.pm
URL: http://svn.slimdevices.com/trunk/server/Slim/Utils/Scanner.pm?rev=10187&r1=10186&r2=10187&view=diff
==============================================================================
--- trunk/server/Slim/Utils/Scanner.pm (original)
+++ trunk/server/Slim/Utils/Scanner.pm Wed Oct  4 12:08:31 2006
@@ -920,6 +920,14 @@
 sub scanWMAStream {
 	my $args = shift;
 	
+	# Make sure we don't send any bad URLs through
+	$args->{'url'} = 'httpt://wm-live.abacast.com/arabian_radio-dubai92-24';
+	if ( $args->{'url'} !~ /^http:/ ) {
+		my $error = 'Invalid URL: ' . $args->{'url'};
+		scanWMAStreamError( undef, $error, $args );
+		return;
+	}
+	
 	my $request = HTTP::Request->new( GET => $args->{'url'} );
 	
 	addWMAHeaders( $request );