diff options
author | Andy Wingo <wingo@pobox.com> | 2002-05-13 18:08:33 +0000 |
---|---|---|
committer | Andy Wingo <wingo@pobox.com> | 2002-05-13 18:08:33 +0000 |
commit | 19a8820683a410362b32cc6f4e48ee369a68502a (patch) | |
tree | 14e8502c518618958eb53d32a506f9af8766eb26 | |
parent | 565a15aacbae9316183ec6b1edb8887ab4b13e2f (diff) |
update to new jack api
Original commit message from CVS:
update to new jack api
-rw-r--r-- | configure.ac | 2 | ||||
-rwxr-xr-x | tools/gst-inspect-check | 73 |
2 files changed, 1 insertions, 74 deletions
diff --git a/configure.ac b/configure.ac index 6f3b50c4..cfc3bd96 100644 --- a/configure.ac +++ b/configure.ac @@ -455,7 +455,7 @@ GST_CHECK_FEATURE(HTTP, [http plugins], gsthttpsrc, [ dnl *** Jack *** translit(dnm, m, l) AM_CONDITIONAL(USE_JACK, true) -GST_CHECK_FEATURE(JACK, Jack, jack, [ +GST_CHECK_FEATURE(JACK, Jack, jack > 0.29.0, [ PKG_CHECK_MODULES(JACK, jack, HAVE_JACK="yes", HAVE_JACK="no") AC_SUBST(JACK_CFLAGS) AC_SUBST(JACK_LIBS) diff --git a/tools/gst-inspect-check b/tools/gst-inspect-check deleted file mode 100755 index 8f16ee77..00000000 --- a/tools/gst-inspect-check +++ /dev/null @@ -1,73 +0,0 @@ -#!/usr/bin/perl -w - -# checks all built plugins by running gst-inspect on each element -# and checking for warnings on stderr - -### packages - -use File::Basename; - -my $num_warnings = 0; - -sub check_all_elements -{ - #send stderr to /dev/null - my $command = "gst-inspect 2>/dev/null"; - my @lines = `$command`; - - while ($_ = shift(@lines)){ - my @matches = m/^\w+\s+element:\s+(\w+):/g; - if(@matches){ - check_element($matches[0]); - } - } - if ($num_warnings > 0){ - print("there are $num_warnings warnings to be fixed\n"); - return -1; - } - return 0; -} - -sub check_element($) -{ - my ($element) = @_; - print "running inspect on $element\n"; - - # capture stderr, send stdout to /dev/null - my $command = "gst-inspect $element 2>&1 1>/dev/null"; - - my @lines = `$command`; - - while ($_ = shift(@lines)){ - # ignore INFO lines, they are ok - if (! /INFO/){ - print $_; - - # do this to ignore empty lines - if (length > 1){ - $num_warnings++; - } - } - } - system("gst-inspect $element 2>/dev/null 1>/dev/null"); - if ($? != 0){ - my $exit_value = $? >> 8; - my $signal_num = $? & 127; - my $dumped_core = $? & 128; - if ($exit_value){ - print("error value on exit: $exit_value\n"); - } - if ($signal_num){ - print("signal caused exit: $signal_num\n"); - } - if ($dumped_core){ - print("dumped core: $dumped_core\n"); - } - $num_warnings++ - } -} - -### main - -exit check_all_elements (); - |