summaryrefslogtreecommitdiff
path: root/xpp/perl_modules/Dahdi/Chans.pm
diff options
context:
space:
mode:
authorTzafrir Cohen <tzafrir.cohen@xorcom.com>2009-05-13 10:37:08 +0000
committerTzafrir Cohen <tzafrir.cohen@xorcom.com>2009-05-13 10:37:08 +0000
commit3339baf7557607ab7714654bc64a439d84e75ccb (patch)
tree8847538f10c5383e9d5ade0ecafeebaf383c513a /xpp/perl_modules/Dahdi/Chans.pm
parent79a9a0a13bdddf555b40d21a9d2814f043471c36 (diff)
dahdi-perl: Patterns for Rhino E1/T1 cards.
git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@6613 a0bf4364-ded3-4de4-8d8a-66a801d63aff
Diffstat (limited to 'xpp/perl_modules/Dahdi/Chans.pm')
-rw-r--r--xpp/perl_modules/Dahdi/Chans.pm3
1 files changed, 2 insertions, 1 deletions
diff --git a/xpp/perl_modules/Dahdi/Chans.pm b/xpp/perl_modules/Dahdi/Chans.pm
index 6f2dc62..531eb8b 100644
--- a/xpp/perl_modules/Dahdi/Chans.pm
+++ b/xpp/perl_modules/Dahdi/Chans.pm
@@ -142,13 +142,14 @@ sub new($$$$$$) {
$type = "FXO"; # likely Rhino
} elsif ($fqn =~ m{---/.*}) {
$type = "EMPTY"; # likely Rhino, empty slot.
- } elsif ($fqn =~ m{\b(TE[24]|WCT1|Tor2|TorISA|WP[TE]1|cwain[12])/.*}) {
+ } elsif ($fqn =~ m{\b(TE[24]|WCT1|Tor2|TorISA|WP[TE]1|cwain[12]|R[124]T1)/.*}) {
# TE[24]: Digium wct4xxp
# WCT1: Digium single span card drivers?
# Tor2: Tor PCI cards
# TorISA: ISA ones (still used?)
# WP[TE]1: Sangoma. TODO: this one tells us if it is TE or NT.
# cwain: Junghanns E1 card.
+ # R[124]: Rhino r1t1/rxt1 cards
$type = "PRI";
} elsif ($fqn =~ m{\b(B4|ZTHFC\d*|ztqoz\d*)/.*}) {
# B4: The Digium wcb4xxp DAHDI driver