Add VISUALIZER property to ~/.gst: if set, it will cause gst-launch-ext to display a visualiser for audio only formats.

Original commit message from CVS:
Add VISUALIZER property to ~/.gst: if set, it will cause gst-launch-ext
to display a visualiser for audio only formats.
Try "VISUALIZER=goom" ;-)
This commit is contained in:
Richard Boulton 2002-02-05 16:39:43 +00:00
parent 05d71364e4
commit 3f0b94c40e

View file

@ -57,7 +57,13 @@ sub playfile($$)
my ($file, $ext) = @_;
my $pipe;
if ($pipe = $pipes{$ext})
if ($cfg{VISUALIZER} && ($pipe = $pipes{"vis." . $ext}))
{
$command = "gst-launch filesrc location=\"$file\" ! $pipe";
print "Running $command\n";
system ("PATH=\$PATH:".$cfg{CVS_PATH}."/gstreamer/tools $command");
}
elsif ($pipe = $pipes{$ext})
{
$command = "gst-launch filesrc location=\"$file\" ! $pipe";
print "Running $command\n";
@ -75,11 +81,14 @@ read_config ();
%pipes = (
"mp3", "mad ! $cfg{AUDIOSINK}",
"vis.mp3", "mad ! tee silent=true 'tee0.src0!' queue ! { $cfg{VISUALIZER} ! colorspace ! $cfg{VIDEOSINK} } 'tee0.src1!' $cfg{AUDIOSINK}",
"ogg", "vorbisdec ! $cfg{AUDIOSINK}",
"vis.ogg", "vorbisdec ! tee silent=true 'tee0.src0!' queue ! { $cfg{VISUALIZER} ! colorspace ! $cfg{VIDEOSINK} } 'tee0.src1!' $cfg{AUDIOSINK}",
"mpg", "mpegdemux video_00! { queue ! mpeg2dec ! $cfg{VIDEOSINK} } mpegdemux0.audio_00! { queue ! mad ! $cfg{AUDIOSINK} }",
"avi", "avidemux video_00! { queue ! windec ! $cfg{VIDEOSINK} }",
"vob", "mpegdemux video_00! { queue ! mpeg2dec ! $cfg{VIDEOSINK} } mpegdemux0.audio_00! { queue ! a52dec ! $cfg{AUDIOSINK} }",
"wav", "wavparse ! $cfg{AUDIOSINK}",
"vis.wav", "wavparse ! tee silent=true 'tee0.src0!' queue ! { $cfg{VISUALIZER} ! colorspace ! $cfg{VIDEOSINK} } 'tee0.src1!' $cfg{AUDIOSINK}",
);