summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--xpp/perl_modules/Dahdi/Chans.pm3
-rw-r--r--xpp/perl_modules/Dahdi/Span.pm3
2 files changed, 5 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
diff --git a/xpp/perl_modules/Dahdi/Span.pm b/xpp/perl_modules/Dahdi/Span.pm
index 9c11fde..bd5eeee 100644
--- a/xpp/perl_modules/Dahdi/Span.pm
+++ b/xpp/perl_modules/Dahdi/Span.pm
@@ -147,6 +147,9 @@ my @pri_strings = (
'Wildcard TE121', # wcte12xp
'Wildcard TE122', # wcte12xp
'T[24]XXP \(PCI\) Card ', # wct4xxp
+ 'R[24]T1 \(PCI\) Card', # rxt1
+ 'Rhino R1T1 (E1)/PRA Card', # r1t1
+ 'Rhino R1T1 (T1)/PRI Card', # r1t1
);
our $DAHDI_BRI_NET = 'bri_net';