diff --git a/t/auto-daemon-tests-create.pl b/t/auto-daemon-tests-create.pl index ea86d22f3..1bef22d0c 100755 --- a/t/auto-daemon-tests-create.pl +++ b/t/auto-daemon-tests-create.pl @@ -33,505 +33,6 @@ is length($wav_file), 1644, 'embedded binary wav file'; if ($extended_tests) { -($sock_a) = new_call([qw(198.51.100.4 4110)]); - -($cid, $ft, $port_a) = create('early media', { - 'audio player' => 'force', -}, < $ft, - flags => ['early media'], -}, < { offer => ['G722'] }, - 'audio player' => 'force', - 'call-id' => cid(), -}, < $ft, -}, < ft(), - 'to-tag' => $ft, - flags => [qw,directional,], -}); - -# player not active yet (no media) -rcv_no($sock_a); -rcv_no($sock_b); -rcv_no($sock_c); - -# add media to start player -snd($sock_a, $port_b, rtp (0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv_no($sock_a); -rcv_no($sock_b); -($seq, $ts, $ssrc) = rcv($sock_c, $port_c, rtpm(9 | 0x80, -1, -1, -1, "\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\x2a\x84\x20\x84\x20\x84\x04\x8e\x16\x9d\x5d\xfe\xdb\xd8\xd1\xd3\xd9\xd9\x9b\xdc\xd9\xd7\xd7\xd8\xd6\xd9\xda\xdb\xd9\xd7\xda\xd7\x9a\xd9\xd8\xd8\xd6\xd9\xd7\xda\xd9\xd9\xd9\xd6\xda\xd7\xda\xda\xd9\xd9\xd6\xda\xd7\xdb\xda\xda\xd9\xd7\xdb\xd8\xd6\xda\xdb\xdb\xd8\xd6\xda\xd8\xd6\xdb\xdb\xdc\xd3\xdf\xd9\xd6\xd9\xd9\xdc\xd2\xde\xda\xd7\xdc\xd5\xdd\xd4\xd8\xd9\xd6\xdf\xd7\xdf\xd8\xd4\xd9\xd7\xff\xd3\xfc\xda\xd6\xda\xd7\xfd\xd3\xfd\xda\xd7\xdc\xd3\xfa\xd3\xfd\xda\xd8\xd8\xd3\xf7\xd1")); - -# untriggered media -rcv($sock_c, $port_c, rtpm(9, $seq + 1, $ts + 160, $ssrc, "\xde\xde\xdb\xdb\xd6\xfb\xd2\xdf\xfe\xd6\xdb\xdb\xfc\xd4\xd6\xf9\xd7\xdc\xd5\xff\xd7\xdb\xfd\xd8\x96\x1e\x98\x39\x86\x20\xb4\x08\xbc\x31\xbc\xda\xec\xf0\x50\xd3\xf1\x7b\xdc\xf5\xf2\xd7\xd7\xfb\xff\xf8\xf6\xf6\xdb\xd8\xda\xf9\xf9\xb6\x77\x9c\xd9\xd8\xdf\xf6\xf9\xf4\xbb\x58\x99\xdd\xfc\xf6\xfb\xb8\x7f\xda\xde\xdf\xb7\xfe\xfa\xfb\xdc\x9c\x5b\xb5\xfe\xff\xf9\xfc\xbd\x5a\xfa\xfd\xff\xbc\xf9\xfc\xde\xbd\x7c\xfc\xfd\xfb\xbf\xdf\xfc\xbb\x5e\xfd\xbb\x7f\x9f\x7c\xf9\xfe\xde\xfa\xfd\xff\xdf\xfa\xfc\xff\xbf\xff\xfc\xfe\xbf\xff\xfd\xfd\xbd\xfd\xfd\xbd\x7d\xfd\xbd\xfd\xfd\xbd\xfd\x7d\xbd\xfd\x7d\xfd\xbd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd")); - -# catch up to delay caused by rcv_no above -rcv($sock_c, $port_c, rtpm(9, $seq + 2, $ts + 320, $ssrc, "\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfb\xde\xf3\xdc\xf8\xfb\xde\xf1\xde\xf6\xde\xf5\xfa\xdc\xf8\xfb\xdf\xf5\xfa\xf8\xf9\xfb\xdf\xf7\xdf\xf6\xfb\xf7\xfb\xfb\xf9\xdf\xf7\xdf\xf5\xf7\xf9\xf7\xf9\xf9\xdf\xf7\xf9\xf9\xfb\xfb\xf9\xfb\xdf\xf3\xfb\xfb\xfb\xfb\xfb\xdf\xf3\xdf\xf6\xf9\xf9\xfb\xfb\xf9\xfb\xdf\xf3\xfb\xfb\xfb\xfb\xfb\xdf\xf2\xfb\xdf\xf6\xf9\xf9\xdf\xf4\xf6\xdf\xf6\xf9\xf6\xdf\xf9\xf9\xdf\xf4\xf8\xf8\xfb\xfb\xf6\xfb\xfb\xfb\xfb\xf8\xfa\xfa\xf8\xf8\xfa\xde\xf1\xfa\xf8\xf8\xfa\xde\xf3\xfa\xf5\xfa\xde\xf3\xdf\xf3\xfb\xf8\xf8\xdf\xf6\xdf\xf4\xfb")); -rcv($sock_c, $port_c, rtpm(9, $seq + 3, $ts + 480, $ssrc, "\xfb\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xfa\xf8\xf8\xfa\xde\xf2\xf8\xf8\xde\xf4\xf5\xfa\xde\xf1\xf5\xfa\xde\xf5\xf8\xfa\xf5\xf8\xfa\xde\xf5\xf5\xf8\xfa\xde\xf3\xf8\xf8\xf8\xde\xf5\xf8\xf8\xf5\xf8\xfa\xde\xf5\xf5\xf8\xfa\xfa\xfa\xfa\xf7\xf8\xfa\xdb\xf3\xfa\xf8\xf8\xfa\xde\xf8\xf5\xf5\xf8\xfa\xde\xf8\xfa\xf7\xf2\xfa\xde\xfa\xde\xf5\xf5\xf3\xf8\xde\xfa\xdc\xf8\xf5\xf1\xf6\xda\xf2\xda\xfb\xf9\xf4\xf4\xdf\xf4\xdf\xfb\xfb\xf6\xf6\xfb\xf9\xdf\xfb\xfb\xf8\xf6\xfb\xf8\xfb\xdc\xf8\xf8\xf8\xf5\xf5\xf8\xdc\xfa\xde\xf3\xf8\xf6\xf8\xf8\xde\xde\xf3\xf8\xf8\xf6\xf8\xfb\xd9\xf6\xfb\xf8\xf6\xdf\xf4\xdf\xf8\xf8\xf8\xf5\xf8\xf8\xfa\xfa\xde\xf5\xf5\xfa\xfa\xf3")); -rcv($sock_c, $port_c, rtpm(9, $seq + 4, $ts + 640, $ssrc, "\xfb\xd7\xf4\xf6\xdf\xf6\xf6\xf6\xda\xf6\xf9\xdf\xf6\xf9\xf3\xdb\xf5\xf9\xdf\xf7\xf9\xf3\xdb\xf7\xdd\xdf\xf7\xf7\xf7\xdb\xf6\xfb\xdb\xf6\xf8\xf5\xde\xf6\xfa\xde\xf7\xdf\xf3\xfa\xfa\xfa\xdf\xf6\xdf\xf4\xf8\xf9\xf9\xfb\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf8\xf8\xfb\xfb\xf8\xf8\xfa\xde\xf3\xf8\xf8\xfa\xde\xf3\xdf\xf4\xf8\xf8\xf8\xde\xf3\xfb\xf8\xf8\xfb\xfa\xde\xf3\xf8\xf8\xfb\xde\xf3\xfb\xf8\xf8\xfa\xde\xf8\xf5\xf5\xf8\xfa\xde\xf8\xfa\xf8\xf3\xfa\xfa\xdc\xfa\xde\xf1\xf3\xfb\xfb\xdc\xfa\xd9\xf4\xf2\xdf\xf2\xfb\xdd\xdd\xf8\xf4\xf8\xf4\xf6\xdd\xdf\xf6\xfb\xf8\xf6\xf9\xf8\xdc\xfb\xfb\xf8\xf4\xf8\xf8\xdf\xf5\xf8\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 5, $ts + 800, $ssrc, "\xfa\xf8\xf5\xde\xf5\xf8\xfa\xde\xf1\xf6\xda\xf2\xdf\xf4\xdf\xf4\xf6\xdf\xf4\xfb\xfb\xfb\xf8\xf8\xdf\xf6\xf8\xf6\xfb\xf8\xfb\xdc\xf8\xf8\xf5\xf6\xdf\xf6\xdf\xf6\xf8\xf6\xfb\xfb\xfb\xdf\xf5\xf8\xf8\xf8\xf8\xfa\xde\xf1\xf8\xfa\xde\xf1\xfb\xdf\xf3\xf8\xfb\xdf\xf4\xfb\xfb\xf6\xf8\xfb\xdc\xf8\xf8\xf8\xf5\xf5\xfa\xd9\xf8\xfa\xfa\xf5\xf3\xdf\xf8\xdf\xf8\xf8\xf5\xf1\xfb\xdc\xdf\xf8\xf8\xf5\xf1\xf6\xda\xf9\xdf\xf8\xf6\xf4\xf2\xdd\xdf\xfb\xdd\xf6\xf6\xf3\xf9\xdf\xf9\xdd\xdf\xf3\xf3\xf9\xfb\xdd\xdf\xfb\xf9\xf4\xf6\xf9\xf9\xdd\xdf\xf6\xf9\xf6\xf9\xf4\xdd\xdd\xf9\xf9\xf9\xf6\xf9\xf6\xda\xf6\xfb\xfb\xf9\xf6\xfb\xdd\xf8\xf8\xfb\xdf\xf0\xf6\xda\xf4")); -rcv($sock_c, $port_c, rtpm(9, $seq + 6, $ts + 960, $ssrc, "\xf9\xdf\xfb\xf9\xf2\xdd\xf9\xf9\xdf\xf9\xfb\xf6\xf8\xf8\xfb\xdc\xf8\xfb\xf8\xf5\xf8\xf5\xdf\xf4\xfb\xf8\xf8\xde\xf3\xdf\xf4\xfb\xfb\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xde\xf1\xf8\xfa\xdc\xf3\xf5\xdf\xfa\xf8\xf1\xdf\xf6\xdf\xf4\xfb\xdc\xf6\xdf\xf4\xfb\xf8\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xde\xf3\xf8\xf8\xde\xf3\xfa\xfa\xfa\xf5\xf8\xdc\xfa\xf8\xf5\xfa\xf8\xf5\xde\xfa\xf8\xf5\xf8\xfa\xfa\xde\xf2\xfa\xf8\xf8\xfa\xde\xf4\xf5\xf8\xfa\xde\xf2\xde\xf5\xf5\xf5\xde\xde\xef\xdf\xf8\xf6\xf4\xdf\xdf\xf2\xfb\xdf\xf4\xf6\xdf\xfb\xf9\xf4\xdd\xfb\xf6\xfb\xfb\xfb\xf8\xfb\xdc\xf6\xdf\xf4\xf6\xfb\xf8\xdf\xf6\xdc\xf8\xf6\xf8\xf8\xfa\xde\xf5\xf8\xfa\xf8\xf3\xdf\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 7, $ts + 1120, $ssrc, "\xf8\xf8\xde\xf8\xf1\xfa\xfa\xf5\xf8\xd9\xfa\xfa\xf8\xf5\xf5\xf8\xde\xf5\xfa\xd9\xf3\xf6\xfb\xdc\xf8\xf6\xda\xf0\xf9\xf6\xdd\xfb\xf9\xfb\xfb\xfb\xf6\xdf\xf4\xdf\xf6\xf6\xf9\xf6\xda\xf6\xfb\xf9\xf6\xfb\xf6\xdd\xfb\xdf\xf6\xf4\xf9\xf6\xda\xf6\xfb\xfb\xf6\xf9\xf9\xdd\xfb\xfb\xfb\xf6\xf8\xf6\xda\xf4\xfb\xdf\xf1\xf6\xdf\xf6\xf9\xf9\xdd\xfb\xf6\xf9\xf6\xdf\xf4\xfb\xdd\xf6\xf9\xf6\xdf\xf4\xfb\xdf\xf4\xfb\xf9\xf9\xfb\xfb\xfb\xf8\xf8\xfb\xdf\xf1\xf8\xf8\xfb\xdf\xf6\xdf\xf2\xf6\xf6\xfb\xdd\xdf\xdf\xf4\xf2\xf6\xfb\xdf\xf9\xda\xf9\xf6\xf3\xf7\xfb\xdf\xfb\xda\xf6\xf5\xf3\xdf\xfb\xf9\xdd\xdf\xf7\xf5\xf7\xfb\xfb\xdf\xfb\xdf\xf4\xf7\xf9\xf9\xdf\xf9")); -rcv($sock_c, $port_c, rtpm(9, $seq + 8, $ts + 1280, $ssrc, "\xdf\xf6\xf6\xf6\xf9\xdf\xfb\xdd\xf9\xf6\xf6\xf6\xdf\xf9\xdf\xfb\xf9\xf6\xf6\xf9\xfb\xdd\xfb\xfb\xfb\xf8\xf6\xfb\xdf\xf4\xf8\xdf\xf8\xf6\xf8\xfb\xdf\xf3\xfb\xdf\xf4\xf4\xfb\xda\xf4\xf8\xdf\xf6\xf6\xf6\xdf\xf9\xdf\xfb\xfb\xf6\xf4\xf8\xdf\xfb\xdf\xf6\xf6\xf6\xf8\xdf\xfb\xdc\xf8\xf6\xf6\xf8\xfb\xdc\xfb\xfa\xf8\xf5\xf8\xfa\xde\xf1\xf6\xdc\xf8\xf8\xfa\xde\xf3\xf4\xf8\xdf\xf8\xfb\xde\xf3\xf6\xf6\xfb\xdf\xf8\xdc\xfb\xf8\xf3\xf6\xf8\xfb\xda\xf8\xfb\xf8\xf4\xf6\xfb\xdc\xfb\xdf\xf4\xf6\xfb\xfb\xdf\xf4\xfb\xdc\xf5\xf6\xf8\xfb\xfb\xfa\xde\xf5\xf5\xfb\xfa\xf8\xf5\xfa\xdc\xf5\xf5\xfb\xde\xf1\xf4\xdf\xf8\xf8\xfb\xdf\xf3\xf6\xf8\xfb\xdf\xf6\xdf\xf6")); -rcv($sock_c, $port_c, rtpm(9, $seq + 9, $ts + 1440, $ssrc, "\xf6\xf8\xfb\xdc\xf8\xfb\xfb\xf5\xf6\xfb\xfb\xfb\xde\xf3\xfb\xdf\xf2\xf6\xfb\xda\xf8\xf8\xfb\xf8\xf4\xf6\xdc\xfb\xfb\xfb\xfb\xf8\xf5\xfb\xdc\xf5\xf6\xdf\xf6\xf4\xf6\xdc\xdf\xf6\xdf\xf4\xf6\xf6\xfb\xda\xf9\xdf\xf4\xf4\xf4\xf9\xdd\xdf\xfb\xfb\xf6\xf2\xf6\xdf\xdf\xfb\xdd\xf6\xf9\xf4\xf9\xdf\xf9\xfb\xfb\xf8\xf6\xf8\xfb\xdc\xf8\xfb\xfa\xf5\xf3\xdf\xf6\xfb\xfb\xdf\xf6\xfb\xdf\xf4\xf8\xfb\xdf\xf3\xf8\xfb\xfb\xf8\xf8\xde\xf5\xf8\xf8\xf8\xf8\xf8\xfa\xde\xf1\xfa\xfa\xfa\xf8\xf8\xde\xf3\xfa\xf8\xf8\xf8\xde\xf5\xf8\xf5\xfa\xf8\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 10, $ts + 1600, $ssrc, "\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xde\xee\xd6\xef\xda\xf2\xda\xf9\xf1\xd9\xf3\xd6\xef\xd9\xde\xef\xd7\xf1\xdc\xf8\xfa\xda\xef\xd5\xf8\xf9\xfc\xfe\xdd\xf2\xd9\xfe\xfb\xfb\xdf\xf8\xf3\xd8\xdc\xf9\xf6\xdb\xf5\xf3\xd9\xdb\xf5\xf8\xdd\xf8\xf2\xdb\xdf\xf6\xfe\xdf\xf7\xf8\xfe\xd9\xf8\xf9\xfc\xf9\xf9\xfc\xdb\xf6\xfc\xfa\xfe\xfa\xfc\xdb\xf6\xfa\xf8\xfe\xfe\xfc\xda\xf6\xfa\xf8\xf8\xdf\xf5\xdc")); -rcv($sock_c, $port_c, rtpm(9, $seq + 11, $ts + 1760, $ssrc, "\xfb\xdf\xf1\xf8\xdf\xf8\xdf\xf6\xfb\xf8\xf7\xda\xfa\xde\xf6\xf8\xf6\xfa\xdd\xdd\xdb\xf3\xf6\xf6\xf6\xdf\xde\xdc\xfa\xf8\xf3\xf8\xfb\xd9\xdc\xfb\xdf\xf0\xf3\xfc\xdc\xdc\xfb\xda\xf5\xf2\xf8\xfe\xdc\xfb\xd9\xfb\xf5\xf6\xfb\xde\xfa\xdc\xfa\xf9\xf4\xf9\xfb\xdf\xf7\xdd\xf9\xf7\xfb\xdf\xf5\xf7\xda\xf9\xf6\xf9\xdf\xf6\xf7\xda\xf9\xf7\xdf\xf9\xf7\xf7\xda\xfa\xfb\xdf\xf6\xf6\xf6\xdc\xdb\xf6\xfb\xfb\xf7\xfa\xfb\xdb\xf6\xfa\xf9\xf9\xf9\xf9\xdd\xf9\xf7\xf7\xf7\xdf\xfb\xdd\xf9\xfb\xf5\xf5\xf9\xdf\xfb\xfb\xf9\xf9\xf6\xf9\xfb\xdf\xf6\xf9\xf9\xf9\xf9\xfb\xdf\xf4\xf6\xf9\xf9\xfb\xdf\xf8\xf8\xf6\xf8\xf6\xfb\xdf\xf8\xfb\xf8\xf5\xf6\xdf\xf6\xdf\xf6\xfb")); -rcv($sock_c, $port_c, rtpm(9, $seq + 12, $ts + 1920, $ssrc, "\xf6\xf6\xdf\xf6\xdc\xf8\xf8\xf6\xf8\xf8\xf8\xdf\xf8\xf8\xf5\xf5\xf8\xfa\xd9\xf5\xfb\xfb\xf5\xf6\xdc\xdf\xf4\xf8\xf8\xf8\xf3\xdf\xf8\xfb\xf8\xfa\xde\xef\xfb\xfb\xfb\xfb\xdf\xfb\xf6\xf6\xfb\xfb\xfb\xdc\xfa\xfa\xf5\xf3\xdf\xf4\xdf\xf8\xdf\xf6\xf2\xf8\xfb\xdf\xf6\xdc\xfb\xf6\xf6\xf8\xfb\xdf\xf8\xfb\xfb\xf5\xf4\xfb\xdc\xf8\xfa\xde\xf3\xf4\xf8\xdf\xf6\xf8\xdc\xfb\xf3\xf6\xdc\xf6\xf8\xdc\xdc\xf4\xf2\xdf\xf1\xf9\xdd\xdd\xdf\xf3\xf9\xf6\xfb\xdf\xf6\xdd\xf9\xfb\xfb\xf9\xf8\xf8\xfb\xdf\xf2\xfb\xdf\xf4\xfb\xdc\xfb\xf8\xf6\xfb\xf8\xf8\xdf\xf8\xfa\xf5\xf5\xf8\xfa\xdc\xf5\xf5\xf8\xfa\xde\xef\xf8\xf8\xdc\xfb\xfb\xfb\xf6\xf6\xfb\xdc\xfb\xdf\xf1\xf8")); - -# push media -snd($sock_a, $port_b, rtp (0, 1002, 3320, 0x1234, "\x44" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1002, 3320, 0x1234, "\x44" x 160)); -snd($sock_b, $port_a, rtp (0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_c, $port_c, rtpm(9, $seq + 13, $ts + 2080, $ssrc, "\xfb\xf8\xf8\xfa\xdc\xf5\xf5\xf8\xf8\xf8\xf5\xfa\xd9\xf5\xf8\xfb\xde\xef\xf6\xdf\xf6\xdd\xfb\xfb\xf4\xf4\xfb\xdd\xfb\xfb\xf8\xf6\xf8\xf6\xdc\xfb\xfb\xf8\xf6\xdf\x28\x84\x20\x84\x20\x84\x04\xbd\x35\xb7\x9f\xf9\x5c\x8e\x16\xbb\x3b\xbd\xfc\x37\x8d\x27\x9c\x11\xba\x1f\xb8\x5c\x75\xf6\x59\xda\x7e\xdf\xfc\x78\x75\xfd\xdb\x5f\xdf\x7e\xff\xf9\x79\xdf\xdf\x5f\xfe\xdd\xff\xfa\x7e\xdd\xdd\xdf\xff\xde\xfd\xfc\xfd\xde\xdd\xde\xfe\xdc\xdd\xfd\x9f\x7f\xdb\xfd\xde\xde\x9f\xfe\xdc\xdb\xfd\xde\xdd\xdd\x9d\xde\xdd\xdd\xdd\xdd\xdd\xdd\xdd\x9c\xdc\xdb\xfd\xde\xdd\xdc\xdb\xfd\xdb\xfe\xdb\xfe\xdc\xd9\xde\xde\xdf\xfe\xda\xdf\xff\xda\xde\xde\xff\xdc\xd9\xff")); - -rtpe_req('delete', 'delete'); - - - - -($sock_a, $sock_b, $sock_c) = new_call([qw(198.51.100.4 4078)], [qw(198.51.100.4 4080)], [qw(198.51.100.4 4082)]); - -($port_a) = offer('mixed sub manual', { }, < { offer => ['G722'] }, - 'call-id' => cid(), -}, < $ft, -}, < ft(), - 'to-tag' => $ft, - flags => [qw,directional,], - 'audio player' => 'force', -}); - -# player not active yet (no media) -rcv_no($sock_a); -rcv_no($sock_b); -rcv_no($sock_c); - -# add media to start player -snd($sock_a, $port_b, rtp (0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv_no($sock_a); -rcv_no($sock_b); -($seq, $ts, $ssrc) = rcv($sock_c, $port_c, rtpm(9 | 0x80, -1, -1, -1, "\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\x2a\x84\x20\x84\x20\x84\x04\x8e\x16\x9d\x5d\xfe\xdb\xd8\xd1\xd3\xd9\xd9\x9b\xdc\xd9\xd7\xd7\xd8\xd6\xd9\xda\xdb\xd9\xd7\xda\xd7\x9a\xd9\xd8\xd8\xd6\xd9\xd7\xda\xd9\xd9\xd9\xd6\xda\xd7\xda\xda\xd9\xd9\xd6\xda\xd7\xdb\xda\xda\xd9\xd7\xdb\xd8\xd6\xda\xdb\xdb\xd8\xd6\xda\xd8\xd6\xdb\xdb\xdc\xd3\xdf\xd9\xd6\xd9\xd9\xdc\xd2\xde\xda\xd7\xdc\xd5\xdd\xd4\xd8\xd9\xd6\xdf\xd7\xdf\xd8\xd4\xd9\xd7\xff\xd3\xfc\xda\xd6\xda\xd7\xfd\xd3\xfd\xda\xd7\xdc\xd3\xfa\xd3\xfd\xda\xd8\xd8\xd3\xf7\xd1")); - -# untriggered media -rcv($sock_c, $port_c, rtpm(9, $seq + 1, $ts + 160, $ssrc, "\xde\xde\xdb\xdb\xd6\xfb\xd2\xdf\xfe\xd6\xdb\xdb\xfc\xd4\xd6\xf9\xd7\xdc\xd5\xff\xd7\xdb\xfd\xd8\x96\x1e\x98\x39\x86\x20\xb4\x08\xbc\x31\xbc\xda\xec\xf0\x50\xd3\xf1\x7b\xdc\xf5\xf2\xd7\xd7\xfb\xff\xf8\xf6\xf6\xdb\xd8\xda\xf9\xf9\xb6\x77\x9c\xd9\xd8\xdf\xf6\xf9\xf4\xbb\x58\x99\xdd\xfc\xf6\xfb\xb8\x7f\xda\xde\xdf\xb7\xfe\xfa\xfb\xdc\x9c\x5b\xb5\xfe\xff\xf9\xfc\xbd\x5a\xfa\xfd\xff\xbc\xf9\xfc\xde\xbd\x7c\xfc\xfd\xfb\xbf\xdf\xfc\xbb\x5e\xfd\xbb\x7f\x9f\x7c\xf9\xfe\xde\xfa\xfd\xff\xdf\xfa\xfc\xff\xbf\xff\xfc\xfe\xbf\xff\xfd\xfd\xbd\xfd\xfd\xbd\x7d\xfd\xbd\xfd\xfd\xbd\xfd\x7d\xbd\xfd\x7d\xfd\xbd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfd")); - -# catch up to delay caused by rcv_no above -rcv($sock_c, $port_c, rtpm(9, $seq + 2, $ts + 320, $ssrc, "\xfd\xfd\xfd\xfd\xfd\xfd\xfd\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfc\xfb\xde\xf3\xdc\xf8\xfb\xde\xf1\xde\xf6\xde\xf5\xfa\xdc\xf8\xfb\xdf\xf5\xfa\xf8\xf9\xfb\xdf\xf7\xdf\xf6\xfb\xf7\xfb\xfb\xf9\xdf\xf7\xdf\xf5\xf7\xf9\xf7\xf9\xf9\xdf\xf7\xf9\xf9\xfb\xfb\xf9\xfb\xdf\xf3\xfb\xfb\xfb\xfb\xfb\xdf\xf3\xdf\xf6\xf9\xf9\xfb\xfb\xf9\xfb\xdf\xf3\xfb\xfb\xfb\xfb\xfb\xdf\xf2\xfb\xdf\xf6\xf9\xf9\xdf\xf4\xf6\xdf\xf6\xf9\xf6\xdf\xf9\xf9\xdf\xf4\xf8\xf8\xfb\xfb\xf6\xfb\xfb\xfb\xfb\xf8\xfa\xfa\xf8\xf8\xfa\xde\xf1\xfa\xf8\xf8\xfa\xde\xf3\xfa\xf5\xfa\xde\xf3\xdf\xf3\xfb\xf8\xf8\xdf\xf6\xdf\xf4\xfb")); -rcv($sock_c, $port_c, rtpm(9, $seq + 3, $ts + 480, $ssrc, "\xfb\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xfa\xf8\xf8\xfa\xde\xf2\xf8\xf8\xde\xf4\xf5\xfa\xde\xf1\xf5\xfa\xde\xf5\xf8\xfa\xf5\xf8\xfa\xde\xf5\xf5\xf8\xfa\xde\xf3\xf8\xf8\xf8\xde\xf5\xf8\xf8\xf5\xf8\xfa\xde\xf5\xf5\xf8\xfa\xfa\xfa\xfa\xf7\xf8\xfa\xdb\xf3\xfa\xf8\xf8\xfa\xde\xf8\xf5\xf5\xf8\xfa\xde\xf8\xfa\xf7\xf2\xfa\xde\xfa\xde\xf5\xf5\xf3\xf8\xde\xfa\xdc\xf8\xf5\xf1\xf6\xda\xf2\xda\xfb\xf9\xf4\xf4\xdf\xf4\xdf\xfb\xfb\xf6\xf6\xfb\xf9\xdf\xfb\xfb\xf8\xf6\xfb\xf8\xfb\xdc\xf8\xf8\xf8\xf5\xf5\xf8\xdc\xfa\xde\xf3\xf8\xf6\xf8\xf8\xde\xde\xf3\xf8\xf8\xf6\xf8\xfb\xd9\xf6\xfb\xf8\xf6\xdf\xf4\xdf\xf8\xf8\xf8\xf5\xf8\xf8\xfa\xfa\xde\xf5\xf5\xfa\xfa\xf3")); -rcv($sock_c, $port_c, rtpm(9, $seq + 4, $ts + 640, $ssrc, "\xfb\xd7\xf4\xf6\xdf\xf6\xf6\xf6\xda\xf6\xf9\xdf\xf6\xf9\xf3\xdb\xf5\xf9\xdf\xf7\xf9\xf3\xdb\xf7\xdd\xdf\xf7\xf7\xf7\xdb\xf6\xfb\xdb\xf6\xf8\xf5\xde\xf6\xfa\xde\xf7\xdf\xf3\xfa\xfa\xfa\xdf\xf6\xdf\xf4\xf8\xf9\xf9\xfb\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf9\xf9\xfb\xfb\xf8\xf8\xfb\xfb\xf8\xf8\xfa\xde\xf3\xf8\xf8\xfa\xde\xf3\xdf\xf4\xf8\xf8\xf8\xde\xf3\xfb\xf8\xf8\xfb\xfa\xde\xf3\xf8\xf8\xfb\xde\xf3\xfb\xf8\xf8\xfa\xde\xf8\xf5\xf5\xf8\xfa\xde\xf8\xfa\xf8\xf3\xfa\xfa\xdc\xfa\xde\xf1\xf3\xfb\xfb\xdc\xfa\xd9\xf4\xf2\xdf\xf2\xfb\xdd\xdd\xf8\xf4\xf8\xf4\xf6\xdd\xdf\xf6\xfb\xf8\xf6\xf9\xf8\xdc\xfb\xfb\xf8\xf4\xf8\xf8\xdf\xf5\xf8\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 5, $ts + 800, $ssrc, "\xfa\xf8\xf5\xde\xf5\xf8\xfa\xde\xf1\xf6\xda\xf2\xdf\xf4\xdf\xf4\xf6\xdf\xf4\xfb\xfb\xfb\xf8\xf8\xdf\xf6\xf8\xf6\xfb\xf8\xfb\xdc\xf8\xf8\xf5\xf6\xdf\xf6\xdf\xf6\xf8\xf6\xfb\xfb\xfb\xdf\xf5\xf8\xf8\xf8\xf8\xfa\xde\xf1\xf8\xfa\xde\xf1\xfb\xdf\xf3\xf8\xfb\xdf\xf4\xfb\xfb\xf6\xf8\xfb\xdc\xf8\xf8\xf8\xf5\xf5\xfa\xd9\xf8\xfa\xfa\xf5\xf3\xdf\xf8\xdf\xf8\xf8\xf5\xf1\xfb\xdc\xdf\xf8\xf8\xf5\xf1\xf6\xda\xf9\xdf\xf8\xf6\xf4\xf2\xdd\xdf\xfb\xdd\xf6\xf6\xf3\xf9\xdf\xf9\xdd\xdf\xf3\xf3\xf9\xfb\xdd\xdf\xfb\xf9\xf4\xf6\xf9\xf9\xdd\xdf\xf6\xf9\xf6\xf9\xf4\xdd\xdd\xf9\xf9\xf9\xf6\xf9\xf6\xda\xf6\xfb\xfb\xf9\xf6\xfb\xdd\xf8\xf8\xfb\xdf\xf0\xf6\xda\xf4")); -rcv($sock_c, $port_c, rtpm(9, $seq + 6, $ts + 960, $ssrc, "\xf9\xdf\xfb\xf9\xf2\xdd\xf9\xf9\xdf\xf9\xfb\xf6\xf8\xf8\xfb\xdc\xf8\xfb\xf8\xf5\xf8\xf5\xdf\xf4\xfb\xf8\xf8\xde\xf3\xdf\xf4\xfb\xfb\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xde\xf1\xf8\xfa\xdc\xf3\xf5\xdf\xfa\xf8\xf1\xdf\xf6\xdf\xf4\xfb\xdc\xf6\xdf\xf4\xfb\xf8\xf8\xfa\xfa\xfa\xf8\xf8\xfa\xde\xf3\xf8\xf8\xde\xf3\xfa\xfa\xfa\xf5\xf8\xdc\xfa\xf8\xf5\xfa\xf8\xf5\xde\xfa\xf8\xf5\xf8\xfa\xfa\xde\xf2\xfa\xf8\xf8\xfa\xde\xf4\xf5\xf8\xfa\xde\xf2\xde\xf5\xf5\xf5\xde\xde\xef\xdf\xf8\xf6\xf4\xdf\xdf\xf2\xfb\xdf\xf4\xf6\xdf\xfb\xf9\xf4\xdd\xfb\xf6\xfb\xfb\xfb\xf8\xfb\xdc\xf6\xdf\xf4\xf6\xfb\xf8\xdf\xf6\xdc\xf8\xf6\xf8\xf8\xfa\xde\xf5\xf8\xfa\xf8\xf3\xdf\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 7, $ts + 1120, $ssrc, "\xf8\xf8\xde\xf8\xf1\xfa\xfa\xf5\xf8\xd9\xfa\xfa\xf8\xf5\xf5\xf8\xde\xf5\xfa\xd9\xf3\xf6\xfb\xdc\xf8\xf6\xda\xf0\xf9\xf6\xdd\xfb\xf9\xfb\xfb\xfb\xf6\xdf\xf4\xdf\xf6\xf6\xf9\xf6\xda\xf6\xfb\xf9\xf6\xfb\xf6\xdd\xfb\xdf\xf6\xf4\xf9\xf6\xda\xf6\xfb\xfb\xf6\xf9\xf9\xdd\xfb\xfb\xfb\xf6\xf8\xf6\xda\xf4\xfb\xdf\xf1\xf6\xdf\xf6\xf9\xf9\xdd\xfb\xf6\xf9\xf6\xdf\xf4\xfb\xdd\xf6\xf9\xf6\xdf\xf4\xfb\xdf\xf4\xfb\xf9\xf9\xfb\xfb\xfb\xf8\xf8\xfb\xdf\xf1\xf8\xf8\xfb\xdf\xf6\xdf\xf2\xf6\xf6\xfb\xdd\xdf\xdf\xf4\xf2\xf6\xfb\xdf\xf9\xda\xf9\xf6\xf3\xf7\xfb\xdf\xfb\xda\xf6\xf5\xf3\xdf\xfb\xf9\xdd\xdf\xf7\xf5\xf7\xfb\xfb\xdf\xfb\xdf\xf4\xf7\xf9\xf9\xdf\xf9")); -rcv($sock_c, $port_c, rtpm(9, $seq + 8, $ts + 1280, $ssrc, "\xdf\xf6\xf6\xf6\xf9\xdf\xfb\xdd\xf9\xf6\xf6\xf6\xdf\xf9\xdf\xfb\xf9\xf6\xf6\xf9\xfb\xdd\xfb\xfb\xfb\xf8\xf6\xfb\xdf\xf4\xf8\xdf\xf8\xf6\xf8\xfb\xdf\xf3\xfb\xdf\xf4\xf4\xfb\xda\xf4\xf8\xdf\xf6\xf6\xf6\xdf\xf9\xdf\xfb\xfb\xf6\xf4\xf8\xdf\xfb\xdf\xf6\xf6\xf6\xf8\xdf\xfb\xdc\xf8\xf6\xf6\xf8\xfb\xdc\xfb\xfa\xf8\xf5\xf8\xfa\xde\xf1\xf6\xdc\xf8\xf8\xfa\xde\xf3\xf4\xf8\xdf\xf8\xfb\xde\xf3\xf6\xf6\xfb\xdf\xf8\xdc\xfb\xf8\xf3\xf6\xf8\xfb\xda\xf8\xfb\xf8\xf4\xf6\xfb\xdc\xfb\xdf\xf4\xf6\xfb\xfb\xdf\xf4\xfb\xdc\xf5\xf6\xf8\xfb\xfb\xfa\xde\xf5\xf5\xfb\xfa\xf8\xf5\xfa\xdc\xf5\xf5\xfb\xde\xf1\xf4\xdf\xf8\xf8\xfb\xdf\xf3\xf6\xf8\xfb\xdf\xf6\xdf\xf6")); -rcv($sock_c, $port_c, rtpm(9, $seq + 9, $ts + 1440, $ssrc, "\xf6\xf8\xfb\xdc\xf8\xfb\xfb\xf5\xf6\xfb\xfb\xfb\xde\xf3\xfb\xdf\xf2\xf6\xfb\xda\xf8\xf8\xfb\xf8\xf4\xf6\xdc\xfb\xfb\xfb\xfb\xf8\xf5\xfb\xdc\xf5\xf6\xdf\xf6\xf4\xf6\xdc\xdf\xf6\xdf\xf4\xf6\xf6\xfb\xda\xf9\xdf\xf4\xf4\xf4\xf9\xdd\xdf\xfb\xfb\xf6\xf2\xf6\xdf\xdf\xfb\xdd\xf6\xf9\xf4\xf9\xdf\xf9\xfb\xfb\xf8\xf6\xf8\xfb\xdc\xf8\xfb\xfa\xf5\xf3\xdf\xf6\xfb\xfb\xdf\xf6\xfb\xdf\xf4\xf8\xfb\xdf\xf3\xf8\xfb\xfb\xf8\xf8\xde\xf5\xf8\xf8\xf8\xf8\xf8\xfa\xde\xf1\xfa\xfa\xfa\xf8\xf8\xde\xf3\xfa\xf8\xf8\xf8\xde\xf5\xf8\xf5\xfa\xf8\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa")); -rcv($sock_c, $port_c, rtpm(9, $seq + 10, $ts + 1600, $ssrc, "\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xfa\xde\xee\xd6\xef\xda\xf2\xda\xf9\xf1\xd9\xf3\xd6\xef\xd9\xde\xef\xd7\xf1\xdc\xf8\xfa\xda\xef\xd5\xf8\xf9\xfc\xfe\xdd\xf2\xd9\xfe\xfb\xfb\xdf\xf8\xf3\xd8\xdc\xf9\xf6\xdb\xf5\xf3\xd9\xdb\xf5\xf8\xdd\xf8\xf2\xdb\xdf\xf6\xfe\xdf\xf7\xf8\xfe\xd9\xf8\xf9\xfc\xf9\xf9\xfc\xdb\xf6\xfc\xfa\xfe\xfa\xfc\xdb\xf6\xfa\xf8\xfe\xfe\xfc\xda\xf6\xfa\xf8\xf8\xdf\xf5\xdc")); -rcv($sock_c, $port_c, rtpm(9, $seq + 11, $ts + 1760, $ssrc, "\xfb\xdf\xf1\xf8\xdf\xf8\xdf\xf6\xfb\xf8\xf7\xda\xfa\xde\xf6\xf8\xf6\xfa\xdd\xdd\xdb\xf3\xf6\xf6\xf6\xdf\xde\xdc\xfa\xf8\xf3\xf8\xfb\xd9\xdc\xfb\xdf\xf0\xf3\xfc\xdc\xdc\xfb\xda\xf5\xf2\xf8\xfe\xdc\xfb\xd9\xfb\xf5\xf6\xfb\xde\xfa\xdc\xfa\xf9\xf4\xf9\xfb\xdf\xf7\xdd\xf9\xf7\xfb\xdf\xf5\xf7\xda\xf9\xf6\xf9\xdf\xf6\xf7\xda\xf9\xf7\xdf\xf9\xf7\xf7\xda\xfa\xfb\xdf\xf6\xf6\xf6\xdc\xdb\xf6\xfb\xfb\xf7\xfa\xfb\xdb\xf6\xfa\xf9\xf9\xf9\xf9\xdd\xf9\xf7\xf7\xf7\xdf\xfb\xdd\xf9\xfb\xf5\xf5\xf9\xdf\xfb\xfb\xf9\xf9\xf6\xf9\xfb\xdf\xf6\xf9\xf9\xf9\xf9\xfb\xdf\xf4\xf6\xf9\xf9\xfb\xdf\xf8\xf8\xf6\xf8\xf6\xfb\xdf\xf8\xfb\xf8\xf5\xf6\xdf\xf6\xdf\xf6\xfb")); -rcv($sock_c, $port_c, rtpm(9, $seq + 12, $ts + 1920, $ssrc, "\xf6\xf6\xdf\xf6\xdc\xf8\xf8\xf6\xf8\xf8\xf8\xdf\xf8\xf8\xf5\xf5\xf8\xfa\xd9\xf5\xfb\xfb\xf5\xf6\xdc\xdf\xf4\xf8\xf8\xf8\xf3\xdf\xf8\xfb\xf8\xfa\xde\xef\xfb\xfb\xfb\xfb\xdf\xfb\xf6\xf6\xfb\xfb\xfb\xdc\xfa\xfa\xf5\xf3\xdf\xf4\xdf\xf8\xdf\xf6\xf2\xf8\xfb\xdf\xf6\xdc\xfb\xf6\xf6\xf8\xfb\xdf\xf8\xfb\xfb\xf5\xf4\xfb\xdc\xf8\xfa\xde\xf3\xf4\xf8\xdf\xf6\xf8\xdc\xfb\xf3\xf6\xdc\xf6\xf8\xdc\xdc\xf4\xf2\xdf\xf1\xf9\xdd\xdd\xdf\xf3\xf9\xf6\xfb\xdf\xf6\xdd\xf9\xfb\xfb\xf9\xf8\xf8\xfb\xdf\xf2\xfb\xdf\xf4\xfb\xdc\xfb\xf8\xf6\xfb\xf8\xf8\xdf\xf8\xfa\xf5\xf5\xf8\xfa\xdc\xf5\xf5\xf8\xfa\xde\xef\xf8\xf8\xdc\xfb\xfb\xfb\xf6\xf6\xfb\xdc\xfb\xdf\xf1\xf8")); - -# push media -snd($sock_a, $port_b, rtp (0, 1002, 3320, 0x1234, "\x44" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1002, 3320, 0x1234, "\x44" x 160)); -snd($sock_b, $port_a, rtp (0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_c, $port_c, rtpm(9, $seq + 13, $ts + 2080, $ssrc, "\xfb\xf8\xf8\xfa\xdc\xf5\xf5\xf8\xf8\xf8\xf5\xfa\xd9\xf5\xf8\xfb\xde\xef\xf6\xdf\xf6\xdd\xfb\xfb\xf4\xf4\xfb\xdd\xfb\xfb\xf8\xf6\xf8\xf6\xdc\xfb\xfb\xf8\xf6\xdf\x28\x84\x20\x84\x20\x84\x04\xbd\x35\xb7\x9f\xf9\x5c\x8e\x16\xbb\x3b\xbd\xfc\x37\x8d\x27\x9c\x11\xba\x1f\xb8\x5c\x75\xf6\x59\xda\x7e\xdf\xfc\x78\x75\xfd\xdb\x5f\xdf\x7e\xff\xf9\x79\xdf\xdf\x5f\xfe\xdd\xff\xfa\x7e\xdd\xdd\xdf\xff\xde\xfd\xfc\xfd\xde\xdd\xde\xfe\xdc\xdd\xfd\x9f\x7f\xdb\xfd\xde\xde\x9f\xfe\xdc\xdb\xfd\xde\xdd\xdd\x9d\xde\xdd\xdd\xdd\xdd\xdd\xdd\xdd\x9c\xdc\xdb\xfd\xde\xdd\xdc\xdb\xfd\xdb\xfe\xdb\xfe\xdc\xd9\xde\xde\xdf\xfe\xda\xdf\xff\xda\xde\xde\xff\xdc\xd9\xff")); - -rtpe_req('delete', 'delete'); - - - - -($sock_a, $sock_b, $sock_c) = new_call([qw(198.51.100.4 4090)], [qw(198.51.100.4 4092)], [qw(198.51.100.4 4094)]); - -($port_a) = offer('mixed sub manual PCM', { }, < 'force', - 'call-id' => cid(), -}, < $ft, 'audio player' => 'force', }, < ft(), - 'to-tag' => $ft, - flags => [qw,directional,], - 'audio player' => 'force', -}); - -# player not active yet (no media) -rcv_no($sock_a); -rcv_no($sock_b); -rcv_no($sock_c); - -# add media to start player -snd($sock_a, $port_b, rtp (0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1001, 3160, 0x1234, "\x11" x 160)); -rcv_no($sock_a); -rcv_no($sock_b); -($seq, $ts, $ssrc) = rcv($sock_c, $port_c, rtpm(0 | 0x80, -1, -1, -1, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11")); - -# untriggered media -rcv($sock_c, $port_c, rtpm(0, $seq + 1, $ts + 160, $ssrc, "\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\x11\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); - -# catch up to the delay caused by rcv_no above -rcv($sock_c, $port_c, rtpm(0, $seq + 2, $ts + 320, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 3, $ts + 480, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 4, $ts + 640, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 5, $ts + 800, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 6, $ts + 960, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 7, $ts + 1120, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 8, $ts + 1280, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 9, $ts + 1440, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 10, $ts + 1600, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 11, $ts + 1760, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); -rcv($sock_c, $port_c, rtpm(0, $seq + 12, $ts + 1920, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff")); - -# push media -snd($sock_a, $port_b, rtp (0, 1002, 3320, 0x1234, "\x44" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1002, 3320, 0x1234, "\x44" x 160)); -snd($sock_b, $port_a, rtp (0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8001, 10160, 0x2d8c, "\x55" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 13, $ts + 2080, $ssrc, "\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\xff\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44")); - -snd($sock_a, $port_b, rtp (0, 1003, 3480, 0x1234, "\x77" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1003, 3480, 0x1234, "\x77" x 160)); -snd($sock_b, $port_a, rtp (0, 8002, 10320, 0x2d8c, "\x99" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8002, 10320, 0x2d8c, "\x99" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 14, $ts + 2240, $ssrc, "\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x44\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77")); - -# connect in B side -rtpe_req('connect', 'mixed sub manual PCM', { - 'from-tag' => tt(), - 'to-tag' => $ft, - flags => [qw,directional,], - 'audio player' => 'force', -}); - -snd($sock_a, $port_b, rtp (0, 1004, 3640, 0x1234, "\xbb" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1004, 3640, 0x1234, "\xbb" x 160)); -snd($sock_b, $port_a, rtp (0, 8003, 10480, 0x2d8c, "\x99" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8003, 10480, 0x2d8c, "\x99" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 15, $ts + 2400, $ssrc, "\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x77\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94")); - -snd($sock_a, $port_b, rtp (0, 1005, 3800, 0x1234, "\xcc" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1005, 3800, 0x1234, "\xcc" x 160)); -snd($sock_b, $port_a, rtp (0, 8004, 10640, 0x2d8c, "\x99" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8004, 10640, 0x2d8c, "\x99" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 16, $ts + 2560, $ssrc, "\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x94\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97")); - -snd($sock_a, $port_b, rtp (0, 1006, 3960, 0x1234, "\x44" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1006, 3960, 0x1234, "\x44" x 160)); -snd($sock_b, $port_a, rtp (0, 8005, 10800, 0x2d8c, "\x99" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8005, 10800, 0x2d8c, "\x99" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 17, $ts + 2720, $ssrc, "\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x97\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c")); - -snd($sock_a, $port_b, rtp (0, 1007, 4120, 0x1234, "\x11" x 160)); -rcv($sock_b, $port_a, rtpm(0, 1007, 4120, 0x1234, "\x11" x 160)); -snd($sock_b, $port_a, rtp (0, 8006, 10960, 0x2d8c, "\x99" x 160)); -rcv($sock_a, $port_b, rtpm(0, 8006, 10960, 0x2d8c, "\x99" x 160)); -rcv($sock_c, $port_c, rtpm(0, $seq + 18, $ts + 2880, $ssrc, "\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x9c\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f\x2f")); - - -rtpe_req('delete', 'delete'); - - - ($sock_a, $sock_b) = new_call([qw(198.51.100.10 4070)], [qw(198.51.100.10 4072)]); ($port_a) = offer('extended connect w "all" bidirectional', { }, <