diff options
| author | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-09-29 19:12:22 +0000 |
|---|---|---|
| committer | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-09-29 19:12:22 +0000 |
| commit | 4ff5de4408fedfedda9535fc3e662c78ab090862 (patch) | |
| tree | 4f746f9f33d57fef4bf9c98c43be2a3afff26571 | |
| parent | d08068ae36a21fe4bd0c31d01ca8ef5b8f3d5a7d (diff) | |
xpp: use xpd sysfs attr. timing_priority to set NT/TE
git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@7253 a0bf4364-ded3-4de4-8d8a-66a801d63aff
| -rw-r--r-- | xpp/perl_modules/Dahdi/Xpp/Xpd.pm | 12 |
1 files changed, 11 insertions, 1 deletions
diff --git a/xpp/perl_modules/Dahdi/Xpp/Xpd.pm b/xpp/perl_modules/Dahdi/Xpp/Xpd.pm index 5cf6f96..b438b3b 100644 --- a/xpp/perl_modules/Dahdi/Xpp/Xpd.pm +++ b/xpp/perl_modules/Dahdi/Xpp/Xpd.pm @@ -300,14 +300,24 @@ sub new($$$$$) { $self->{CHANNELS} = @offhook; my $type = $self->xpd_getattr('type'); my $span = $self->xpd_getattr('span'); + my $timing_priority = $self->xpd_getattr('timing_priority'); $self->{SPANNO} = $span; $self->{TYPE} = $type; + $self->{TIMING_PRIORITY} = $timing_priority; if($type =~ /BRI_(NT|TE)/) { $self->{IS_BRI} = 1; $self->{TERMTYPE} = $1; $self->{DCHAN_HARDHDLC} = $self->xpd_driver_getattr('dchan_hardhdlc'); + } elsif($type =~ /[ETJ]1/) { + $self->{IS_PRI} = 1; + # older drivers may not have 'timing_priority' + # attribute. Preserve original behaviour: + if(defined($timing_priority) && ($timing_priority == 0)) { + $self->{TERMTYPE} = 'NT'; + } else { + $self->{TERMTYPE} = 'TE'; + } } - $self->{IS_PRI} = ($type =~ /[ETJ]1/); $self->{IS_DIGITAL} = ( $self->{IS_BRI} || $self->{IS_PRI} ); Dahdi::Xpp::Line->create_all($self, $procdir); return $self; |