|
|
|
@ -7,6 +7,7 @@ use NGCP::Rtpclient::SRTP; |
|
|
|
use NGCP::Rtpengine::AutoTest; |
|
|
|
use Test::More; |
|
|
|
use POSIX; |
|
|
|
use JSON; |
|
|
|
|
|
|
|
|
|
|
|
autotest_start(qw(--config-file=none -t -1 -i 203.0.113.1 -i 2001:db8:4321::1 |
|
|
|
@ -3353,5 +3354,20 @@ is($port_d, $port_dx, "same port"); |
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
if ($ENV{RTPENGINE_EXTENDED_TESTS}) { |
|
|
|
|
|
|
|
$resp = rtpe_req('cli', 'cli', { body => 'list jsonstats' } ); |
|
|
|
$resp = decode_json($resp->{response}); |
|
|
|
|
|
|
|
is($resp->{interfaces}[0]{name}, 'default', 'intf found'); |
|
|
|
is($resp->{interfaces}[0]{address}, '203.0.113.1', 'address found'); |
|
|
|
is($resp->{interfaces}[0]{ports}{used}, 192, 'port usage'); |
|
|
|
is($resp->{interfaces}[1]{name}, 'default', 'intf found'); |
|
|
|
is($resp->{interfaces}[1]{address}, '2001:db8:4321::1', 'address found'); |
|
|
|
is($resp->{interfaces}[1]{ports}{used}, 4, 'port usage'); |
|
|
|
|
|
|
|
} |
|
|
|
|
|
|
|
|
|
|
|
#done_testing;NGCP::Rtpengine::AutoTest::terminate('f00');exit; |
|
|
|
done_testing(); |