diff --git a/t/Makefile b/t/Makefile index d82c86436..8c95348ab 100644 --- a/t/Makefile +++ b/t/Makefile @@ -106,7 +106,7 @@ include ../lib/common.Makefile daemon-tests-intfs daemon-tests-stats daemon-tests-delay-buffer daemon-tests-delay-timing \ daemon-tests-evs daemon-tests-player-cache daemon-tests-redis daemon-tests-redis-json \ daemon-tests-measure-rtp daemon-tests-mos-legacy daemon-tests-mos-fullband daemon-tests-config-file \ - daemon-tests-templ-def daemon-tests-templ-def-offer + daemon-tests-templ-def daemon-tests-templ-def-offer daemon-tests-t38 TESTS= test-bitstr aes-crypt aead-aes-crypt test-const_str_hash.strhash ifeq ($(with_transcoding),yes) @@ -237,6 +237,10 @@ daemon-tests-templ-def-offer: daemon-test-deps daemon-tests-templ-def: daemon-test-deps ./auto-test-helper "$@" perl -I../perl auto-daemon-tests-templ-def.pl +daemon-tests-t38: daemon-test-deps spandsp_recv_fax_pcm spandsp_recv_fax_t38 \ + spandsp_send_fax_pcm spandsp_send_fax_t38 + ./auto-test-helper "$@" perl -I../perl auto-daemon-tests-t38.pl + test-bitstr: test-bitstr.o test-mix-buffer: test-mix-buffer.o $(COMMONOBJS) mix_buffer.o ssrc.o rtp.o crypto.o helpers.o \ diff --git a/t/auto-daemon-tests-t38.pl b/t/auto-daemon-tests-t38.pl index 5fe59d34f..63772290a 100755 --- a/t/auto-daemon-tests-t38.pl +++ b/t/auto-daemon-tests-t38.pl @@ -14,7 +14,7 @@ autotest_start(qw(--config-file=none -t -1 -i 203.0.113.1 -i 2001:db8:4321::1 or die; -my ($sock_a, $sock_b, $port_a, $port_b, $ssrc, $resp, $srtp_ctx_a, $srtp_ctx_b, @ret1, @ret2); +my ($sock_a, $sock_b, $port_a, $port_b, $resp, $srtp_ctx_a, $srtp_ctx_b, @ret1, @ret2); @@ -66,6 +66,7 @@ sub t38_gw_test { my $sqo = 1000; my $tso = 3000; my $ts = -1; + my $ssrc = -1; my $rev = $opts{reverse} // 0; my $pcm_sock = $rev ? $sock_a : $sock_b; @@ -362,11 +363,6 @@ t38_gw_test('T.38 after re-invite', -done_testing(); -exit; - - - ($sock_a, $sock_b) = new_call([qw(198.51.100.1 4016)], [qw(198.51.100.3 4018)]); ($port_a) = offer('plain T.38, reverse invite', { 'T.38' => [ 'force' ], ICE => 'remove', @@ -683,4 +679,5 @@ t38_gw_test('FEC span 5', +#done_testing;NGCP::Rtpengine::AutoTest::terminate('f00');exit; done_testing();