/**
* Test parsing of various SDP messages from various vendors
*/
int test_sdp_parse(void)
{
struct sdp_session *sess = NULL;
struct sdp_media *audio;
struct mbuf *mb;
struct sa laddr;
uint32_t i;
int err;
mb = mbuf_alloc(2048);
if (!mb)
return ENOMEM;
sa_init(&laddr, AF_INET);
for (i=0; i<ARRAY_SIZE(msgs); i++) {
sess = mem_deref(sess);
err = sdp_session_alloc(&sess, &laddr);
if (err)
goto out;
err = sdp_media_add(&audio, sess, sdp_media_audio, 5004,
sdp_proto_rtpavp);
if (err)
goto out;
err = sdp_format_add(NULL, audio, false, ref_pt, ref_cname,
ref_srate, 1, NULL, NULL, NULL, false,
NULL);
if (err)
goto out;
err = sdp_format_add(NULL, audio, false, "8", "PCMA", 8000, 1,
NULL, NULL, NULL, false, NULL);
if (err)
goto out;
mbuf_rewind(mb);
(void)mbuf_write_str(mb, msgs[i]);
mb->pos = 0;
err = sdp_decode(sess, mb, true);
if (err)
goto out;
}
out:
mem_deref(sess);
mem_deref(mb);
return err;
}
static int add_telev_codec(struct audio *a)
{
struct sdp_media *m = stream_sdpmedia(audio_strm(a));
struct sdp_format *sf;
int err;
/* Use payload-type 101 if available, for CiscoGW interop */
err = sdp_format_add(&sf, m, false, (!sdp_media_lformat(m, 101)) ? "101" : NULL, telev_rtpfmt, TELEV_SRATE, 1, NULL, NULL, NULL, false, "0-15");
if (err) return err;
a->rx.pt_tel = sf->pt;
return err;
}
static int add_audio_codec(struct audio *a, struct sdp_media *m,
struct aucodec *ac)
{
if (!in_range(&a->cfg.srate, ac->srate)) {
DEBUG_INFO("skip codec with %uHz (audio range %uHz - %uHz)\n", ac->srate, a->cfg.srate.min, a->cfg.srate.max);
return 0;
}
if (!in_range(&a->cfg.channels, ac->ch)) {
DEBUG_INFO("skip codec with %uch (audio range %uch-%uch)\n", ac->ch, a->cfg.channels.min, a->cfg.channels.max);
return 0;
}
return sdp_format_add(NULL, m, false, ac->pt, ac->name, ac->srate, ac->ch, ac->fmtp_ench, ac->fmtp_cmph, ac, false, "%s", ac->fmtp);
}
static int oa_addmedia(struct oa *oa, bool local,
const char *mname, uint16_t port, const char *transp,
enum sdp_dir dir, uint32_t ncodec, ...)
{
struct sdp_media *m;
va_list ap;
int err;
err = oa_init(oa);
if (err)
return err;
err = sdp_media_add(&m, local ? oa->alice : oa->bob,
mname, port, transp);
if (err)
return err;
sdp_media_set_ldir(m, dir);
va_start(ap, ncodec);
while (ncodec--) {
const char *id = va_arg(ap, char *);
const char *cname = va_arg(ap, char *);
int srate = va_arg(ap, int);
err = sdp_format_add(NULL, m, false, id, cname, srate, 1,
NULL, NULL, NULL, false, NULL);
if (err)
break;
}
va_end(ap);
return err;
}
int main(int argc, char *argv[])
{
struct sa nsv[16];
struct dnsc *dnsc = NULL;
struct sa laddr;
uint32_t nsc;
int err; /* errno return values */
/* enable coredumps to aid debugging */
(void)sys_coredump_set(true);
/* initialize libre state */
err = libre_init();
if (err) {
re_fprintf(stderr, "re init failed: %s\n", strerror(err));
goto out;
}
nsc = ARRAY_SIZE(nsv);
/* fetch list of DNS server IP addresses */
err = dns_srv_get(NULL, 0, nsv, &nsc);
if (err) {
re_fprintf(stderr, "unable to get dns servers: %s\n",
strerror(err));
goto out;
}
/* create DNS client */
err = dnsc_alloc(&dnsc, NULL, nsv, nsc);
if (err) {
re_fprintf(stderr, "unable to create dns client: %s\n",
strerror(err));
goto out;
}
/* create SIP stack instance */
err = sip_alloc(&sip, dnsc, 32, 32, 32,
"ua demo v" VERSION " (" ARCH "/" OS ")",
exit_handler, NULL);
if (err) {
re_fprintf(stderr, "sip error: %s\n", strerror(err));
goto out;
}
/* fetch local IP address */
err = net_default_source_addr_get(AF_INET, &laddr);
if (err) {
re_fprintf(stderr, "local address error: %s\n", strerror(err));
goto out;
}
/* listen on random port */
sa_set_port(&laddr, 0);
/* add supported SIP transports */
err |= sip_transp_add(sip, SIP_TRANSP_UDP, &laddr);
err |= sip_transp_add(sip, SIP_TRANSP_TCP, &laddr);
if (err) {
re_fprintf(stderr, "transport error: %s\n", strerror(err));
goto out;
}
/* create SIP session socket */
err = sipsess_listen(&sess_sock, sip, 32, connect_handler, NULL);
if (err) {
re_fprintf(stderr, "session listen error: %s\n",
strerror(err));
goto out;
}
/* create the RTP/RTCP socket */
err = rtp_listen(&rtp, IPPROTO_UDP, &laddr, 10000, 30000, true,
rtp_handler, rtcp_handler, NULL);
if (err) {
re_fprintf(stderr, "rtp listen error: %m\n", err);
goto out;
}
re_printf("local RTP port is %u\n", sa_port(rtp_local(rtp)));
/* create SDP session */
err = sdp_session_alloc(&sdp, &laddr);
if (err) {
re_fprintf(stderr, "sdp session error: %s\n", strerror(err));
goto out;
}
/* add audio sdp media, using port from RTP socket */
err = sdp_media_add(&sdp_media, sdp, "audio",
sa_port(rtp_local(rtp)), "RTP/AVP");
if (err) {
re_fprintf(stderr, "sdp media error: %s\n", strerror(err));
goto out;
}
/* add G.711 sdp media format */
err = sdp_format_add(NULL, sdp_media, false, "0", "PCMU", 8000, 1,
NULL, NULL, NULL, false, NULL);
if (err) {
re_fprintf(stderr, "sdp format error: %s\n", strerror(err));
goto out;
}
/* invite provided URI */
if (argc > 1) {
struct mbuf *mb;
/* create SDP offer */
err = sdp_encode(&mb, sdp, true);
if (err) {
re_fprintf(stderr, "sdp encode error: %s\n",
strerror(err));
goto out;
}
err = sipsess_connect(&sess, sess_sock, argv[1], name,
uri, name,
NULL, 0, "application/sdp", mb,
auth_handler, NULL, false,
offer_handler, answer_handler,
progress_handler, establish_handler,
NULL, NULL, close_handler, NULL, NULL);
mem_deref(mb); /* free SDP buffer */
if (err) {
re_fprintf(stderr, "session connect error: %s\n",
strerror(err));
goto out;
}
re_printf("inviting <%s>...\n", argv[1]);
}
else {
err = sipreg_register(®, sip, registrar, uri, uri, 60, name,
NULL, 0, 0, auth_handler, NULL, false,
register_handler, NULL, NULL, NULL);
if (err) {
re_fprintf(stderr, "register error: %s\n",
strerror(err));
goto out;
}
re_printf("registering <%s>...\n", uri);
}
/* main loop */
err = re_main(signal_handler);
out:
/* clean up/free all state */
mem_deref(sdp); /* will also free sdp_media */
mem_deref(rtp);
mem_deref(sess_sock);
mem_deref(sip);
mem_deref(dnsc);
/* free librar state */
libre_close();
/* check for memory leaks */
tmr_debug();
mem_debug();
return err;
}
int bfcp_alloc(struct bfcp **bfcpp, struct sdp_session *sdp_sess,
const char *proto, bool offerer,
const struct mnat *mnat, struct mnat_sess *mnat_sess)
{
struct bfcp *bfcp;
struct sa laddr;
enum bfcp_transp transp;
int err;
if (!bfcpp || !sdp_sess)
return EINVAL;
transp = str2tp(proto);
bfcp = mem_zalloc(sizeof(*bfcp), destructor);
if (!bfcp)
return ENOMEM;
bfcp->active = offerer;
sa_init(&laddr, AF_INET);
err = bfcp_listen(&bfcp->conn, transp, &laddr, uag_tls(),
bfcp_msg_handler, bfcp);
if (err)
goto out;
err = sdp_media_add(&bfcp->sdpm, sdp_sess, "application",
sa_port(&laddr), bfcp_sdp_transp(transp));
if (err)
goto out;
err = sdp_format_add(NULL, bfcp->sdpm, false, "*", NULL,
0, 0, NULL, NULL, NULL, false, NULL);
if (err)
goto out;
err |= sdp_media_set_lattr(bfcp->sdpm, true, "floorctrl", "c-s");
err |= sdp_media_set_lattr(bfcp->sdpm, true, "setup",
bfcp->active ? "active" : "actpass");
if (bfcp->active) {
err |= sdp_media_set_lattr(bfcp->sdpm, true,
"connection", "new");
}
else {
bfcp->lconfid = 1000 + (rand_u16() & 0xf);
bfcp->luserid = 1 + (rand_u16() & 0x7);
err |= sdp_media_set_lattr(bfcp->sdpm, true, "confid",
"%u", bfcp->lconfid);
err |= sdp_media_set_lattr(bfcp->sdpm, true, "userid",
"%u", bfcp->luserid);
}
if (err)
goto out;
if (mnat) {
info("bfcp: enabled medianat '%s' on UDP socket\n", mnat->id);
err = mnat->mediah(&bfcp->mnat_st, mnat_sess, IPPROTO_UDP,
bfcp_sock(bfcp->conn), NULL, bfcp->sdpm);
if (err)
goto out;
}
info("bfcp: %s BFCP agent protocol '%s' on port %d\n",
bfcp->active ? "Active" : "Passive",
proto, sa_port(&laddr));
out:
if (err)
mem_deref(bfcp);
else
*bfcpp = bfcp;
return err;
}
/** Test BFCP in SDP -- RFC 4583 */
int test_sdp_bfcp(void)
{
static const char *msg_offer =
"v=0\r\n"
"o=alice 2890844526 2890844526 IN IP4 1.2.3.4\r\n"
"s=-\r\n"
"c=IN IP4 1.2.3.4\r\n"
"t=0 0\r\n"
"m=application 50000 TCP/BFCP *\r\n"
"a=sendrecv\r\n"
"a=setup:passive\r\n"
"a=connection:new\r\n"
"a=floorctrl:s-only\r\n"
"a=confid:4321\r\n"
"a=userid:1234\r\n"
"a=floorid:1 m-stream:10\r\n"
"a=floorid:2 m-stream:11\r\n"
"m=audio 50002 RTP/AVP 0\r\n"
"a=sendrecv\r\n"
"a=label:10\r\n"
"m=video 50004 RTP/AVP 31\r\n"
"a=sendrecv\r\n"
"a=label:11\r\n"
;
struct sdp_session *alice = NULL, *bob = NULL;
struct sdp_media *bfcp, *audio, *video;
struct mbuf *mbo = NULL, *mba = NULL;
struct sa laddr;
int err;
/* create sessions */
(void)sa_set_str(&laddr, "1.2.3.4", 0);
err = sdp_session_alloc(&alice, &laddr);
if (err)
goto out;
err = sdp_media_add(&bfcp, alice, "application", 50000, "TCP/BFCP");
if (err)
goto out;
err |= sdp_media_set_lattr(bfcp, true, "setup", "passive");
err |= sdp_media_set_lattr(bfcp, true, "connection", "new");
err |= sdp_media_set_lattr(bfcp, true, "floorctrl", "s-only");
err |= sdp_media_set_lattr(bfcp, true, "confid", "4321");
err |= sdp_media_set_lattr(bfcp, true, "userid", "1234");
err |= sdp_media_set_lattr(bfcp, false, "floorid", "1 m-stream:10");
sdp_media_del_lattr(bfcp, "floorid"); /* test attr delete */
err |= sdp_media_set_lattr(bfcp, false, "floorid", "1 m-stream:10");
err |= sdp_media_set_lattr(bfcp, false, "floorid", "2 m-stream:11");
if (err)
goto out;
err = sdp_media_add(&audio, alice, "audio", 50002, "RTP/AVP");
if (err)
goto out;
err = sdp_media_add(&video, alice, "video", 50004, "RTP/AVP");
if (err)
goto out;
err |= sdp_media_set_lattr(audio, true, "label", "10");
err |= sdp_media_set_lattr(video, true, "label", "11");
if (err)
goto out;
err = sdp_format_add(NULL, bfcp, false, "*", NULL, 0, 0,
NULL, NULL, NULL, false, NULL);
err |= sdp_format_add(NULL, audio, false, "0", NULL, 0, 0,
NULL, NULL, NULL, false, NULL);
err |= sdp_format_add(NULL, video, false, "31", NULL, 0, 0,
NULL, NULL, NULL, false, NULL);
if (err)
goto out;
/* create and send offer, compare offer */
err = sdp_encode(&mbo, alice, true);
if (err)
goto out;
if (!sdp_cmp(mbo, msg_offer)) {
DEBUG_WARNING("offer failed:\n%b", mbo->buf, mbo->end);
err = EBADMSG;
goto out;
}
out:
mem_deref(alice);
mem_deref(bob);
mem_deref(mbo);
mem_deref(mba);
return err;
}
int test_sdp_all(void)
{
struct sdp_session *sess = NULL;
struct sdp_media *audio = NULL;
struct mbuf *desc = NULL;
struct sa ref;
const struct sdp_format *rc = NULL, *sc;
struct sa laddr;
int err;
(void)sa_set_str(&laddr, ref_host, 0);
err = sdp_session_alloc(&sess, &laddr);
if (err)
goto out;
err = sdp_media_add(&audio, sess, sdp_media_audio, 5004,
sdp_proto_rtpavp);
if (err)
goto out;
err = sdp_format_add(NULL, audio, false, ref_pt, ref_cname,
ref_srate, 1, NULL, NULL, NULL, false, NULL);
err |= sdp_format_add(NULL, audio, false, "110", cname_speex,
16000, 2, NULL, NULL, NULL, false, NULL);
if (err)
goto out;
/* find codec - expected */
sc = sdp_media_format(audio, true, NULL, 0, "PCMU", 8000, 1);
if (!sc) {
DEBUG_WARNING("codec not found\n");
err = ENOENT;
goto out;
}
sc = sdp_media_format(audio, true, NULL, 110, "Speex", 16000, 2);
if (!sc) {
DEBUG_WARNING("codec not found: speex\n");
err = ENOENT;
goto out;
}
/* find codec - not expected */
sc = sdp_media_format(audio, true, NULL, -1, "Speex", 8000, 1);
if (sc) {
DEBUG_WARNING("unexpected codec found\n");
err = EINVAL;
goto out;
}
err = sdp_encode(&desc, sess, true);
if (err)
goto out;
if (!sdp_cmp(desc, ref_msg)) {
DEBUG_WARNING("ref: %s\n", ref_msg);
DEBUG_WARNING("sdp: %b\n", desc->buf, desc->end);
err = EBADMSG;
goto out;
}
err = sdp_decode(sess, desc, false);
if (err)
goto out;
rc = sdp_media_rformat(audio, NULL);
if (!rc) {
err = ENOENT;
goto out;
}
err = sa_set_str(&ref, ref_host, ref_port);
if (err)
goto out;
err = EINVAL;
if (!sa_cmp(sdp_media_raddr(audio), &ref, SA_ALL))
goto out;
if (!rc)
goto out;
if (0 != strcmp(rc->id, ref_pt))
goto out;
if (0 != strcmp(ref_cname, rc->name))
goto out;
if (rc->srate != ref_srate)
goto out;
err = 0;
out:
mem_deref(audio);
mem_deref(sess);
mem_deref(desc);
return err;
}