dahdi_genconf: Do not fail if pinned/assigned span utilities were not installed. v2.8.0-rc2 v2.8.0-rc3 v2.8.0-rc4
authorShaun Ruffell <sruffell@digium.com>
Thu, 14 Nov 2013 18:19:45 +0000 (12:19 -0600)
committerShaun Ruffell <sruffell@digium.com>
Fri, 22 Nov 2013 17:12:12 +0000 (11:12 -0600)
If you installed dahdi tools and did not specify DAHDI_PINNED=yes on the
makefile, when you run dahdi_genconf you would get an error like the following:

  # dahdi_genconf
  sh: span_types: command not found
  Command failed (status=32512): 'span_types dumpconfig > /etc/dahdi/span-types.conf' at ...

This change allows the generator for span-types.conf and span-assignements.conf
check for the existence of the utilities before attempting to call them.

Signed-off-by: Shaun Ruffell <sruffell@digium.com>

xpp/perl_modules/Dahdi/Config/Gen/Pinnedspans.pm
xpp/perl_modules/Dahdi/Config/Gen/Spantypes.pm

index 8eaf72d..67b8547 100644 (file)
@@ -23,6 +23,12 @@ sub generate($$$) {
        my $gconfig = $self->{GCONFIG};
        my $genopts = $self->{GENOPTS};
        my @spans = @_;
+
+       # If the span_types utilities were not installed we do not want to run
+       # this generator or report any errors.
+       system "which span_assignments > /dev/null 2>&1";
+       return if $?;
+
        warn "Empty configuration -- no spans\n" unless @spans;
        rename "$file", "$file.bak"
                or $! == 2      # ENOENT (No dependency on Errno.pm)
index 1a31a62..9ef31ae 100644 (file)
@@ -23,6 +23,12 @@ sub generate($$$) {
        my $gconfig = $self->{GCONFIG};
        my $genopts = $self->{GENOPTS};
        my @spans = @_;
+
+       # If the span_types utilities were not installed we do not want to run
+       # this generator or report any errors.
+       system "which span_types > /dev/null 2>&1";
+       return if $?;
+
        warn "Empty configuration -- no spans\n" unless @spans;
        rename "$file", "$file.bak"
                or $! == 2      # ENOENT (No dependency on Errno.pm)