fix OSRTP option for rtpengine-ng-client

Change-Id: Ie012469aed4919c3e006aee215f63ed6fbd3fa34
changes/08/39708/1
Richard Fuchs 6 years ago
parent abe7caf066
commit bbdedc5899

@ -73,7 +73,7 @@ GetOptions(
'db-id=i' => \$options{'db-id'},
'T38=s@' => \$options{'T.38'},
'code=s' => \$options{'code'},
'OSRTP' => \$options{'OSRTP'},
'OSRTP=s@' => \$options{'OSRTP'},
) or die;
my $cmd = shift(@ARGV) or die;
@ -86,13 +86,13 @@ for my $x (split(/,/, 'from-tag,to-tag,call-id,transport protocol,media address,
for my $x (split(/,/, 'TOS,delete-delay')) {
defined($options{$x}) and $packet{$x} = $options{$x};
}
for my $x (split(/,/, 'trust address,symmetric,asymmetric,unidirectional,force,strict source,media handover,sip source address,reset,port latching,no rtcp attribute,full rtcp attribute,loop protect,record call,always transcode,all,pad crypto,generate mid,fragment,original sendrecv,OSRTP')) {
for my $x (split(/,/, 'trust address,symmetric,asymmetric,unidirectional,force,strict source,media handover,sip source address,reset,port latching,no rtcp attribute,full rtcp attribute,loop protect,record call,always transcode,all,pad crypto,generate mid,fragment,original sendrecv')) {
defined($options{$x}) and push(@{$packet{flags}}, $x);
}
for my $x (split(/,/, 'origin,session connection')) {
defined($options{'replace-' . $x}) and push(@{$packet{replace}}, $x);
}
for my $x (split(/,/, 'rtcp-mux,SDES,supports,T.38')) {
for my $x (split(/,/, 'rtcp-mux,SDES,supports,T.38,OSRTP')) {
$packet{$x} = $options{$x}
if defined($options{$x}) && ref($options{$x}) eq 'ARRAY';
}

Loading…
Cancel
Save