diff options
Diffstat (limited to 'xpp/utils/zt_registration')
| -rwxr-xr-x | xpp/utils/zt_registration | 25 |
1 files changed, 10 insertions, 15 deletions
diff --git a/xpp/utils/zt_registration b/xpp/utils/zt_registration index 1b26f74..3bdc642 100755 --- a/xpp/utils/zt_registration +++ b/xpp/utils/zt_registration @@ -42,11 +42,15 @@ sub myprintf { my @spans = Zaptel::spans; -foreach my $xbus (Zaptel::Xpp::xbuses('SORT_SERIAL')) { - myprintf "%-10s\t%s\t%s\n", $xbus->name, $xbus->serial, $xbus->connector; +foreach my $xbus (Zaptel::Xpp::xbuses('SORT_CONNECTOR')) { + myprintf "%-10s\t%s\t%s\n", $xbus->name, $xbus->label, $xbus->connector; next unless $xbus->status eq 'CONNECTED'; foreach my $xpd ($xbus->xpds()) { my $prev = $xpd->zt_registration($on); + if(!defined($prev)) { # Failure + printf "%s: Failed %s\n", $xpd->fqn, $!; + next; + } myprintf "\t%-10s: ", $xpd->fqn; if(!defined($on)) { # Query only my ($span) = grep { $_->name eq $xpd->fqn } @spans; @@ -54,10 +58,6 @@ foreach my $xbus (Zaptel::Xpp::xbuses('SORT_SERIAL')) { myprintf "%s %s\n", state2str($prev), $spanstr ; next; } - if(!defined($prev)) { # Failure - printf "Failed %s\n", $!; - next; - } myprintf "%3s ==> %3s\n", state2str($prev), state2str($on); } } @@ -74,12 +74,11 @@ zt_registration [on|off] =head1 DESCRIPTION -Without parameters, show all connected XPDs sorted by serial number and -physical connector order. Each one is show to be unregistered (off), or -registered to a specific zaptel span (the span number is shown). +Without parameters, show all connected XPDs sorted by physical connector order. +Each one is show to be unregistered (off), or registered to a specific zaptel +span (the span number is shown). -All registerations/deregisterations are sorted by serial number and -(lacking that) physical connector string. +All registerations/deregisterations are sorted by physical connector string. Span registration should generally always succeed. Span unregistration may fail if channels from the span are in use by e.g. asterisk. In such a case @@ -111,10 +110,6 @@ Astribanks: XBUS-01/XPD-20: on Span 9 XBUS-01/XPD-30: on Span 10 -In this example the XBUS-02 has an empty serial number and thus -becomes the first Astribank. The other two are sorted according to their -serial numbers. - =head1 FILES =over |