diff options
author | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-09-27 15:01:20 +0000 |
---|---|---|
committer | Tzafrir Cohen <tzafrir.cohen@xorcom.com> | 2009-09-27 15:01:20 +0000 |
commit | eb06c1715a94dc137f37e602d231e4a9b87883d7 (patch) | |
tree | c0b8e329531214d455749781884e4bf415fffd49 /xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm | |
parent | 5e7248ff7599594067bfd731a8e4fa8cd71dc0ce (diff) |
dahdi_perl: improved config generation for T1 CAS
A few extra options for a CAS span signalling.
xpp rev: 7343, 7346, 7369
git-svn-id: http://svn.asterisk.org/svn/dahdi/tools/trunk@7224 a0bf4364-ded3-4de4-8d8a-66a801d63aff
Diffstat (limited to 'xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm')
-rw-r--r-- | xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm b/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm index caa7607..613566a 100644 --- a/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm +++ b/xpp/perl_modules/Dahdi/Config/Gen/Chandahdi.pm @@ -94,6 +94,12 @@ sub gen_cas($$$) { # Fake type for signalling my $faketype = ($termtype eq 'TE') ? 'FXO' : 'FXS'; my $sig = $gconfig->{'chan_dahdi_signalling'}{$faketype}; + my $em_signalling = $gconfig->{'em_signalling'}; + if ($em_signalling ne 'none') { + $sig = $em_signalling; + # FIXME: but we don't handle E1 yet + $sig = 'em_e1' if $span->proto eq 'E1'; + } my @to_reset = qw/context group/; my $chans = Dahdi::Config::Gen::chan_range($span->chans()); $group .= "," . (10 + $num); # Invent unique group per span |