Browse Source

TT#98901 use correct DTMF codec context

Change-Id: Idf66a2528d06830247e71038a9616726afd588c4
pull/1164/head
Richard Fuchs 5 years ago
parent
commit
0898923c38
2 changed files with 140 additions and 3 deletions
  1. +13
    -3
      daemon/codec.c
  2. +127
    -0
      t/auto-daemon-tests-dtx.pl

+ 13
- 3
daemon/codec.c View File

@ -184,6 +184,7 @@ static int __buffer_dtx(struct dtx_buffer *dtxb, struct codec_ssrc_handler *ch,
struct transcode_packet *packet, struct media_packet *mp,
int (*func)(struct codec_ssrc_handler *ch, struct transcode_packet *packet,
struct media_packet *mp));
static struct codec_handler *__decoder_handler(struct codec_handler *h, struct media_packet *mp);
static struct codec_handler codec_handler_stub_ssrc = {
@ -1935,11 +1936,16 @@ static int packet_dtmf_fwd(struct codec_ssrc_handler *ch, struct transcode_packe
struct media_packet *mp)
{
int payload_type = -1; // take from handler's output config
struct codec_ssrc_handler *output_ch = NULL;
struct codec_ssrc_handler *decoder_ch = NULL;
if (ch->handler->dtmf_scaler) {
// this is actually a DTMF -> PCM handler
// grab our underlying PCM transcoder
struct codec_ssrc_handler *output_ch = __output_ssrc_handler(ch, mp);
struct codec_handler *decoder_handler = __decoder_handler(ch->handler, mp);
decoder_ch = get_ssrc(mp->ssrc_in->parent->h.ssrc,
decoder_handler->ssrc_hash);
output_ch = __output_ssrc_handler(decoder_ch, mp);
if (G_UNLIKELY(!ch->encoder || !output_ch->encoder))
goto skip;
@ -1983,10 +1989,14 @@ static int packet_dtmf_fwd(struct codec_ssrc_handler *ch, struct transcode_packe
ch->last_dtmf_event_ts = duration;
}
payload_type = ch->handler->dtmf_payload_type;
obj_put(&output_ch->h);
}
skip:;
skip:
if (output_ch)
obj_put(&output_ch->h);
if (decoder_ch)
obj_put(&decoder_ch->h);
char *buf = malloc(packet->payload->len + sizeof(struct rtp_header) + RTP_BUFFER_TAIL_ROOM);
memcpy(buf + sizeof(struct rtp_header), packet->payload->s, packet->payload->len);
if (packet->ignore_seq) // inject original seq


+ 127
- 0
t/auto-daemon-tests-dtx.pl View File

@ -306,4 +306,131 @@ rcv($sock_b, $port_a, rtpm(9, 9, 1600, $ssrc, "\xfb\xb8\xde\xde\x71\xb6\xfb\xdf\
rtpe_req('delete', 'AMR w DTMF', { 'from-tag' => ft() });
($sock_a, $sock_b) = new_call([qw(198.51.100.10 4042)], [qw(198.51.100.10 4044)]);
($port_a) = offer('AMR w reverse DTMF',
{
codec => {
mask => ['all'],
transcode => [
'AMR-WB/16000/1///mode-set--0,1,2;mode-change-period--2;mode-change-capability--2/dtx--1',
'PCMA',
'telephone-event'
],
} }, <<SDP);
v=0
o=- 1545997027 1 IN IP4 198.51.100.10
s=tester
t=0 0
m=audio 4042 RTP/AVP 9 8 101
c=IN IP4 198.51.100.10
a=rtpmap:9 G722/8000
a=rtpmap:8 PCMA/8000
a=rtpmap:101 telephone-event/8000
a=fmtp:101 0-16
a=rtcp-mux
a=silenceSupp:off - - - -
a=ptime:20
----------------------------------
v=0
o=- 1545997027 1 IN IP4 198.51.100.10
s=tester
t=0 0
m=audio PORT RTP/AVP 96 8 101 97
c=IN IP4 203.0.113.1
a=silenceSupp:off - - - -
a=rtpmap:96 AMR-WB/16000
a=fmtp:96 mode-set=0,1,2;mode-change-period=2;mode-change-capability=2
a=rtpmap:8 PCMA/8000
a=rtpmap:101 telephone-event/8000
a=fmtp:101 0-16
a=rtpmap:97 telephone-event/16000
a=fmtp:97 0-15
a=sendrecv
a=rtcp:PORT
a=rtcp-mux
a=ptime:20
SDP
($port_b) = answer('AMR w reverse DTMF',
{ flags => [] }, <<SDP);
v=0
o=- 1545997027 1 IN IP4 198.51.100.10
s=tester
t=0 0
m=audio 4044 RTP/AVP 96 97
c=IN IP4 198.51.100.10
a=ptime:20
a=rtpmap:96 AMR-WB/16000
a=fmtp:96 mode-set=0,1,2; mode-change-period=2; mode-change-capability=2
a=rtpmap:97 telephone-event/16000
a=fmtp:97 0-15
--------------------------------------
v=0
o=- 1545997027 1 IN IP4 198.51.100.10
s=tester
t=0 0
m=audio PORT RTP/AVP 9 8 101
c=IN IP4 203.0.113.1
a=rtpmap:9 G722/8000
a=rtpmap:8 PCMA/8000
a=rtpmap:101 telephone-event/8000
a=fmtp:101 0-16
a=sendrecv
a=rtcp:PORT
a=ptime:20
SDP
snd($sock_b, $port_a, rtp(96 | 0x80, 4662, 3784304100, 0x5678, "\x21\x6c\xc3\x07\x29\x9b\x71\x04\x34\x59\x59\x10\x17\x8f\x1d\x62\x3e\x91\x85\xb7\x78\xa6\xfa\xf3\x48\x98\x5d\x66\x8a\x92\x65\x0a\xcd"));
Time::HiRes::usleep(9000);
($ssrc) = rcv($sock_a, $port_b, rtpm(9, 4662, 3784304100, -1, "\xfa\xfa\xfa\xfa\xfa\xfa\x7a\x9e\xb4\xb7\xb7\xba\xde\x7a\xb7\xf7\xf4\xf4\xb7\xf7\xfa\x5e\xb7\xf8\xf7\xfa\xfa\xf4\x9e\xf4\x78\xf8\xb7\x75\x73\xb8\x9e\x78\xb3\xf8\xfa\xba\xf8\x78\xdc\xf8\x78\xf8\xb5\xf8\x78\xf7\xba\xde\xf7\xf8\xba\x74\x38\xf4\xb8\xf5\xdc\xf5\xf8\x73\xfa\xb5\xfa\xde\xf8\xf5\x73\xf6\x9f\xf6\xfb\x9f\xf6\xf6\x76\xfb\x9f\xf2\xf6\xdd\x79\xb6\xf9\xfb\x74\x7b\x9f\xb6\x78\xfb\xb6\xf8\x78\x9f\xf8\x7b\x76\xb8\xf6\x5f\xf6\xbb\xfb\xfb\x78\xb8\x5c\xf5\xde\xf3\xf8\xf6\xb6\x7b\x5a\xb2\xf6\xdd\xb9\xf9\x74\x5f\xb1\xdf\x76\x9d\xf6\xf9\xfb\xf6\xf9\xf9\x7b\x7b\x9f\xfb\xdf\x32\xb4\x9d\x5d\xf3\xf9\xfb\xfb\x5f\xf9\xf9\xbb\x78\xf8\xf8\x7b\xfb"));
Time::HiRes::usleep(9000);
snd($sock_b, $port_a, rtp(96, 4663, 3784304420, 0x5678, "\xf1\x70\xcc\x2c\xb0\xbe\x3c\x2b\x21\x51\x80\x0c\x35\xf1\xf0\xef\xf5\x4c\x56\xe1\xad\x13\x8f\x83\x6a\xad\x1f\x1a\xec\x90\x25\x17\x36"));
Time::HiRes::usleep(9000);
rcv($sock_a, $port_b, rtpm(9, 4663, 3784304260, $ssrc, "\xba\xfa\xf8\x7a\xf8\xf8\xb5\xb8\x5c\x5c\xb3\xba\x78\xfa\xb8\x5e\xde\xf1\x5e\xf3\xde\x6f\xf9\x9a\x7b\xfb\xb8\xf8\xbb\x76\x78\xda\xf6\xf6\xbb\xdc\xfb\x34\xda\xf9\xf4\xf4\xf6\xfb\x5d\xdd\xfb\xdf\xb4\xf2\x79\xdf\xb9\xf9\x9f\xf4\x74\x79\xb9\xb8\x7b\x5f\xb8\xfb\xfb\x38\xde\xf3\xdc\xfb\x78\xb5\xf8\xfb\xf5\xfb\x78\x78\xb5\xdc\x7a\xb8\xf8\xf8\xde\xb5\x73\x7a\xde\xba\xf8\xf5\x9e\x73\xf6\x7b\x78\x9f\xf8\xf8\xde\xf5\xf3\x7b\xfb\x9f\xf8\xba\x78\x9e\x73\xf8\xde\x7a\x7a\xb5\xde\xb3\x5f\xb6\xf6\x78\xd8\xf8\xf4\xf8\xfb\xfb\x78\x9c\xfa\x5e\xb3\xbb\xf8\xf3\x9f\x7b\x5c\xf8\xb3\xf8\xf8\x38\xf6\xdc\xfb\xdf\xf5\xf4\xf8\x76\xbb\xdf\xdc\xf6\xf8\x7b\xf8\xfa"));
Time::HiRes::usleep(9000);
snd($sock_b, $port_a, rtp(96, 4664, 3784304740, 0x5678, "\x24\xc0\x00\x00\x00\x00\xa0"));
Time::HiRes::usleep(9000);
rcv($sock_a, $port_b, rtpm(9, 4664, 3784304420, $ssrc, "\xde\xf8\xba\xf8\xf8\xfa\xf8\xb7\xf8\x38\x0e\x21\x89\x20\x9a\xf1\x21\x33\x10\x8c\xb8\x33\x92\x30\xea\x1c\xbc\xdb\x4e\xf7\x31\xd9\x59\xbe\x3c\x78\xf7\xf4\x3b\x90\x8d\x3b\xf7\x6e\x5c\xf9\x5e\xcf\x77\xb1\x2c\xfb\x4e\xde\x7b\x53\xb6\xbd\x34\x7f\xd5\xf5\x39\xf5\xda\xf6\x77\x9d\x1d\x57\xea\x17\xd8\xf4\x9e\xdb\x1d\xfa\x57\x39\xfb\xd5\xf4\xfe\x56\xed\x1c\x99\xd1\xfb\x6e\x76\x6f\xf5\x70\x98\x99\x17\xdb\xee\x75\x77\x10\xdb\xb1\x9d\x73\xd5\x35\x1e\xd9\x53\xd8\xf0\xef\xf4\x37\x99\xd2\xfa\x31\x55\x72\x5a\xb4\xf3\x5d\xf8\x5a\x36\x53\xbb\xb6\x5e\xf0\xd4\x58\xdb\xdf\x3b\x31\x79\x99\x58\x18\xd7\xb7\x58\x37\xf2\x77\xb4\xfd\x7f\xd4\x7a\xf6\xef\xd8\x3c"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4665, 3784304580, $ssrc, "\x70\xd5\x39\xdc\x98\xb7\xfc\xf0\xdd\x70\xfe\x2d\xd2\xd4\xb8\x7c\x55\xee\xd9\x7d\xf5\x6f\x9a\x9e\x37\x11\xfc\xdf\xf0\x5a\xfb\xce\xff\x31\xd5\x3f\xfe\x95\xf2\x78\xf4\x6e\x75\x78\x9e\x50\xd0\xbd\x73\xec\xb8\x14\xda\xbd\xd0\xfc\x2f\x7d\xf6\x36\x59\xb4\xb7\x7f\xfa\xd4\xd8\xd7\x4f\xdb\x2d\xd9\xfb\x2d\xd9\xd4\xb8\x35\xf8\x59\x3b\xf4\x51\x94\xdc\x3b\x73\xbc\xd2\x3f\xdf\x4f\xd3\x79\xda\x3c\x5d\xdb\x34\x71\xf1\xf2\x59\x97\x71\xda\xbe\x37\x1a\xdc\xf1\xb0\x37\x7f\x5d\x6c\xdc\x7f\xbd\xf1\xfb\xdd\x53\x16\x56\x37\xb8\x7a\xf8\x74\xf4\xb5\x73\x73\xd6\xb9\x79\xd8\x36\x5e\x6c\x33\x9d\x93\xd2\xde\x2d\x7f\xf8\xd1\x7c\x73\xfd\x8f\x6e\xf9\xd3\x5b\xb2\x75"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4666, 3784304740, $ssrc, "\xd5\x1c\x75\x96\xf4\xf0\x2b\xde\xba\x9f\x7f\x5b\x58\xfd\x73\xdf\x9a\xaf\x3c\x77\x73\xf5\x51\xce\x76\x70\xbb\x57\x99\x7e\x5b\xba\xde\xf1\x2b\x5f\x58\x71\x56\xd9\xd3\x3d\x95\xfc\xd8\xde\xf9\x70\x2d\xb9\x78\x9f\x5f\xd5\x56\xb9\xf2\x1e\xf6\x1a\x7a\xb4\x5b\x75\xdd\x7a\x5a\xd2\xb8\x73\x34\x70\x34\xb5\xf5\xf0\x6e\xdb\xd5\x70\x9f\x7a\xf7\x14\x50\x74\x8f\xfe\x55\xd4\xd5\x3e\x3b\xf6\xd9\x7c\xbe\xd7\x1f\xdc\xb0\x6a\x58\x71\xef\x7a\xbc\x7e\xee\xf7\x3a\xb6\xdd\xf8\x17\x52\x16\xbe\xb5\x74\x0e\x7d\xed\xba\xf6\x70\x5e\x58\xbf\xfe\xef\x1d\x9b\xd4\xfd\xdd\xfd\xdb\x1d\x2c\xd7\xde\xd0\x6f\xcf\xf5\x70\xd6\x38\x77\xb3\x3b\x5d\x17\x75\x58\x55\x94\xde\xfb"));
Time::HiRes::usleep(9000);
snd($sock_b, $port_a, rtp(96, 4665, 3784305700, 0x5678, "\xf4\xfb\xff\xef\x7c\x3c\x91"));
Time::HiRes::usleep(9000);
rcv($sock_a, $port_b, rtpm(9, 4667, 3784304900, $ssrc, "\x17\xb0\xf1\x58\xd7\x76\xd8\x5c\xbd\x3f\x15\xd7\x56\xd4\x5d\x96\x37\x52\xdb\xd5\xec\xb1\x73\x3e\x6e\xbb\x70\xde\x5a\xd8\x9a\xb7\x5b\xbf\xdf\x7c\x2d\x72\xdf\xfb\xec\x59\xba\x7b\xef\xbf\x1c\xfa\xee\x76\xd6\x71\x35\x2b\xfa\xbc\x56\x75\xdf\x50\x7b\x52\x74\xde\x5c\xd0\xb8\xae\x37\x5c\x9a\xb1\xde\xb1\xfe\x56\xd5\x36\x75\xb3\x7b\x1e\xd8\xd1\xdf\x5c\xfb\x4e\xdc\xd0\x73\xfc\x3b\xd7\xb8\xbe\x9f\x7f\xd1\xec\xd8\xcf\x36\xd7\xb4\x37\x2e\x7d\xfd\x54\x7f\xf2\xd7\xf2\x1c\xf4\xfa\x76\x36\xdd\xb5\x2c\xf8\xfa\xd6\x79\xb0\x76\xf7\x58\x14\x3e\x7b\x9a\x73\x9f\xb4\x7f\x57\x3b\xff\x74\xd5\xae\x4d\x59\xf7\x32\x55\xb6\xf7\x3b\x6e\x39\x5f\xda\xea\x71\x6e\x70"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4668, 3784305060, $ssrc, "\x7e\xdc\xfb\xb7\x36\x30\xb8\xfc\xcf\x7e\xff\xef\xdf\xfe\xdf\x7b\x3f\xd8\xd9\x5c\x5d\xd9\xdf\xdd\xfe\xde\xfe\x7e\xdf\xfe\xdb\x1d\x59\xde\x5b\x1c\xde\xda\x5c\xdd\xde\xdf\x57\x3d\x9b\xdf\x9d\x5c\x5f\xff\xfc\xd7\xb8\xdf\x36\xd8\x5c\xfc\xfa\xbf\x59\x7d\xff\x1a\xdf\x5c\xfd\xff\x59\xbf\xd6\xf3\xd4\xf4\x3e\xbb\xd8\x9e\x7f\xdc\xf9\x7c\x39\x7b\x55\x78\xd9\xba\xda\x18\xbc\xda\xea\xdc\x14\x5d\xf5\x7f\x5c\xb1\xde\x59\x76\x75\xb2\xd6\xb2\xdd\x5e\x77\xb4\xbf\x77\xb8\xfb\x79\x7a\x79\xde\x56\xdd\xb7\xf2\xdd\xb5\x76\xfb\xf5\x55\x5f\x78\xb1\x59\x98\xf1\xec\xd9\xbb\xd5\x7f\xbb\x31\xdb\x3b\x9d\x79\xf3\x5c\xef\xda\xf8\xd4\x7e\xdc\x59\xee\xf7\x9c\x7e\xbd"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4669, 3784305220, $ssrc, "\x7c\x19\xf4\xf4\xdf\x7d\x79\xbe\x95\x5e\xeb\xdf\x35\x77\xf6\xfa\xfa\xfb\xfe\xf7\xfd\xfb\xfb\xf9\xf8\xba\xf9\x7b\xf9\xfa\xf8\xfa\xfa\xf9\xfc\xf9\xfa\xf9\x7c\x77\xbf\xdf\xb9\xf7\xba\xfc\xfd\xf9\x3c\xbd\xfd\xf7\x9e\x7c\xfd\x7c\xf8\xfa\xf9\xde\x74\xbe\xfe\x9f\xf7\xdd\xfc\x78\x77\xfe\xba\xfb\xf6\xb9\xdc\xf7\xfa\x37\xdf\xfc\xfc\x9c\xf2\xdf\x76\xf8\xf9\xf3\x9c\xf9\xdf\xf4\x9b\x75\xf8\xf4\xdf\x7c\xb1\xbe\x9f\x5d\xf1\xfb\x7b\x7e\xbb\xdc\x9e\x75\xf9\xfe\x7a\xb7\xde\x7c\xde\xda\xfe\xbe\xf3\xde\xde\x7e\xfa\xb5\x73\xbe\x98\xde\x73\x7a\xfa\x74\xbc\xfc\x9c\xfa\x5e\x72\xf7\xfa\xda\xfe\xfe\xba\xf7\xf8\x9c\x5f\xdf\xdc\x5e\xfb\xf0\x9f\xb8\xf3\x5e\x5f"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4670, 3784305380, $ssrc, "\xfa\x78\xde\xb7\xb2\xf6\xf5\xfa\x35\xfc\xd9\xf5\xdb\xf7\xba\x7c\xf8\xdf\xf3\xfe\xdf\xf8\xfa\xfa\x7a\xf6\xdf\xba\xfb\xb9\xfb\xfb\xf9\x5f\x79\xb9\xb9\xb7\xbb\xf9\xf9\x79\x76\xfb\xdf\xbb\xf6\xfb\xdf\x74\xf9\xf6\xf9\xb9\xfb\xbb\xf8\xf8\x76\xdf\xb6\xfb\x9f\xf4\xf4\x73\x5d\xb9\xf9\xdf\xf6\xfb\xf3\xfb\x5f\xbb\xb9\xf9\xf6\xf9\xf9\xf6\x5f\xf8\xb4\xf8\xf8\xfb\xfb\xf8\x5c\xb6\xbb\xb8\xb8\xfa\xf8\x5e\xf5\xf8\xb8\xfa\xf8\xfa\x7a\xd9\xb1\xde\xf5\xb5\xf8\x75\xfb\xb8\xde\xfa\xfa\x78\xf5\xde\xb3\xde\xf8\xb8\xf5\xf5\xde\x71\xfb\xbb\xb8\xf8\xf8\x5c\xf3\x9f\xf6\xf6\xda\xf8\xb8\x76\xf6\x9f\xf8\xf8\xdf\xf6\x74\xfb\xdf\xbb\xf8\xfb\xb8\xfa\xde\xf5\x75\xf8"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4671, 3784305540, $ssrc, "\xba\xba\xf8\xde\xf3\xf8\x5e\xf5\xb8\xf8\xb5\xf8\xf8\xf5\xde\xb5\x78\xb5\xf8\xfa\xf8\xfa\x5e\xf3\xba\xfa\xb8\xde\xf5\x5e\xf3\xf5\xf8\xf8\x9e\xf5\xfa\xf8\x9e\x75\xb1\xfb\xfb\x9c\x5e\xf8\xba\xf5\x71\xf8\xdf\xdf\xf8\x9e\xf5\x75\xb4\xf4\xfb\x78\xd6\xb8\xf6\xf6\xf6\x9f\x79\x9d\xdf\xf4\x76\xf3\x9a\x76\xb7\xdf\xdf\x7b\xf9\xfb\xf6\xb9\xf6\xdd\x5d\xf6\xf9\xdf\xf3\xb6\xdf\x79\xb9\xfb\xdf\xb3\xf9\xf9\xfb\xdf\xf9\xb9\x7b\xfb\xb8\x7b\xbb\xdf\xfb\xf4\xbb\x7b\xfb\xfa\x57\xb6\xf6\xfb\xfb\xb6\x5f\xda\xf6\xf8\xb8\xf8\xf6\x5f\x78\x9f\xf8\xb8\xf5\xf4\x78\xfb\xbb\x5e\xba\xde\xf3\x78\xf8\xf5\xf8\xba\xfa\xde\x75\x75\xb3\xfb\xbb\xdf\xf8\xf8\x7a\xf8\xfa\xb8"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4672, 3784305700, $ssrc, "\xde\xf5\xba\x7a\xf8\xba\xf8\xdb\x73\xba\xf8\x78\xf5\xba\xdc\xf5\xfa\x7a\xf5\xba\xde\xfa\xf8\xb8\xf7\x7a\xfa\xd8\xb5\xf8\xf8\xf4\xf8\xb3\x7a\x9c\x7a\xde\xf5\xfa\xb3\xf8\xfa\x5c\xde\xf5\x75\xb5\xb5\xf1\x76\xdf\x9f\xf6\xdc\x7b\xb8\x76\xdf\xbb\xfb\x7b\xde\xf3\xf6\xdc\xb8\xfb\xfb\x9c\x75\xb6\x5f\xdf\xf2\xf8\xdc\xf8\xb4\xfb\xda\x74\xfb\x9f\xb8\x76\xf6\xdf\xf8\xb6\x7b\x9c\x5f\xf4\xfb\xfb\xf6\xdf\xf8\xdc\xf5\xb4\xf8\xf6\xdf\xfb\xfb\x9c\xf8\xf8\xb3\xdf\xb8\x75\xf6\xbb\x7b\xde\xb8\xf8\x7a\xf8\xfa\xf8\x9e\x75\xb8\xde\x71\xf3\xfb\xd7\xf8\xb8\xf6\xf6\xdc\x76\xbb\xdc\xbb\x7b\xf8\x9f\x7a\xf1\xfb\xdf\xdf\xf8\xb3\x7b\xb4\x7b\xd8\xfb\xb8\xfb\xf6\x78"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4673, 3784305860, $ssrc, "\xf2\xdc\xfb\x9c\xfb\xb6\x76\xf4\x76\x9d\xfb\xd6\x5f\xb6\xf1\xf5\x7b\xbb\xda\xdf\x77\xb7\x77\xf9\xf7\xd9\xb9\xf9\xdd\x77\xf9\xb3\x5b\xf7\x9f\xdd\xf3\x5d\xf7\xdb\xf6\xbb\xde\xb7\x5f\xf7\x5f\xf9\xb9\xf7\xf7\xda\xfa\x7b\xfb\xdf\xb6\xf6\xbb\xdf\xf9\xfb\x5f\xf9\xf3\xb9\xfb\xdf\xfb\xbb\x5f\xb5\xf5\xf9\xf9\xdf\xbb\x7b\xbb\xf9\x7b\xb9\xdf\xf8\x74\xb9\xf8\xfb\xf8\x5c\xb4\xfb\x7b\xf8\x9f\xf5\xf8\xf4\xfb\x7b\xf5\xdf\xb8\xf8\xb5\xf8\x75\xf5\x5f\xb6\xf8\xb8\xfa\xfa\xfa\x7a\xde\xf5\xb8\xf5\xb8\xf5\x5e\xf8\xb5\xfa\x73\xdf\xb5\xfb\x7a\x99\xfb\x6f\xdf\xf9\xb8\xf8\x5c\xfb\xf6\xbb\xf8\xdf\xf6\xfb\xdc\x75\xb8\xf6\xbb\xdf\xde\xf5\x78\xb8\xf5\xf5\xb8\xf8"));
Time::HiRes::usleep(19000);
rcv($sock_a, $port_b, rtpm(9, 4674, 3784306020, $ssrc, "\xf8\x7a\x5c\xb8\xf5\xb3\xfb\xfb\xfa\x57\xf8\xbb\xf6\xf2\xf8\x76\xd5\xdf\xb6\xf9\xf3\xb7\x79\x99\xdd\x79\xf9\xb9\xf1\x77\xdf\x9d\x7b\xdb\xdf\xf3\xb9\xf9\x79\xfb\x9d\xda\x75\xbb\xf7\xfb\xf9\x5d\x9a\xf7\x5f\xf5\xb7\xf9\x79\x9d\xfb\x58\xf9\xf3\xb9\xf3\xdb\xf7\x5b\xf9\xf9\xb7\xfb\xfb\xb7\x5b\xf9\xfb\xf7\xfb\xbb\xf9\xdf\xfb\xf9\xf9\xbb\xf9\xfb\xdf\xfb\xb9\x76\xdf\xbb\xfb\xdf\xf8\xb8\x76\xb8\xf8\xfb\xdc\xf6\xdc\x7b\xb8\xf5\xb6\x7b\x9f\xdc\xf3\xfb\x7b\x9f\xf6\xfb\xd8\xfb\x76\xf8\x9c\x78\xb8\xfa\xfa\xfa\xf8\xde\xf8\x75\xba\xfa\xb8\xfa\xba\xde\x72\x5e\xf8\xb3\xfa\xde\xb8\x78\xdc\x78\xb0\xf8\x7a\xba\xdc\x5c\xf7\xf5\xf8\xf3\xba\xdc\x7a\x9e\xf8"));
Time::HiRes::usleep(9000);
# new SSRC, reset seq/TS
snd($sock_b, $port_a, rtp(96, 1, 960, 0x6543, "\xf0\x44\x08\x00\x08\x47\x2d\x75\x44\x75\xc7\x54\x58\x1c\x08\x04\x00\x34"));
Time::HiRes::usleep(9000);
($ssrc) = rcv($sock_a, $port_b, rtpm(9, 1, 960, -1, "\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xde\x74\xb7\xb7\xb7\xb4\xb7\xfa\xde\xf4\xfa\x5e\xb4\xf2\xb8\xf8\xf8\xb5\xf8\xf5\x7a\xfa\xfa\x9e\xf4\xf7\xf8\xf8\xba\xf7\xde\x5e\xb4\xf7\xf5\xb8\xf3\xfa\xde\xf5\xf8\xb3\xf8\xf3\x78\xf8\xbb\xdf\xb6\xf8\xfb\xf8\xfa\xf8\xfa\xde\xf5\xba\x78\xb3\xfa\xfa\xde\xde\xaf\xfb\xf8\xf6\xfb\xf8\xdc\xf6\xb8\x74\x9c\xf6\xb2\xdf\xf6\xbb\xf8\xf8\xfb\xf4\xf8\xfb\xfb\x9f\x74\x9f\xf8\xf8\xf5\xf8\xba\x75\xdf\xf5\xf6\xbb\x7b\xb8\xf5\xfb\xba\xdc\xf3\xfb\x5f\xbb\xf5\xfb\xf8\xb8\x5e\xf5\xf3\xdf\xf8\xb4\xf8\xfb\xdc\xdc\xf8\xf5\xb5\x74\xbb\xfb\xba\x7a\xba\xde\x75\xfa\xfa\xf8\xfa\xfa\x9e\xf8\xfa\xf7\xfa\xf7\xde\xf4\xb5\x7a"));
Time::HiRes::usleep(9000);
# DTMF
snd($sock_b, $port_a, rtp(97, 2, 1280, 0x6543, "\x01\x07\x01\x40"));
Time::HiRes::usleep(9000);
rcv($sock_a, $port_b, rtpm(101, 2, 1120, $ssrc, "\x01\x07\x00\xa0"));
rtpe_req('delete', 'AMR w reverse DTMF', { 'from-tag' => ft() });
done_testing();

Loading…
Cancel
Save