/**
* 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 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 stream_alloc(struct stream **sp, const struct config_avt *cfg,
struct call *call, struct sdp_session *sdp_sess,
const char *name, int label,
const struct mnat *mnat, struct mnat_sess *mnat_sess,
const struct menc *menc, struct menc_sess *menc_sess,
const char *cname,
stream_rtp_h *rtph, stream_rtcp_h *rtcph, void *arg)
{
struct stream *s;
int err;
if (!sp || !cfg || !call || !rtph)
return EINVAL;
s = mem_zalloc(sizeof(*s), stream_destructor);
if (!s)
return ENOMEM;
s->cfg = *cfg;
s->call = call;
s->rtph = rtph;
s->rtcph = rtcph;
s->arg = arg;
s->pseq = -1;
s->rtcp = s->cfg.rtcp_enable;
err = stream_sock_alloc(s, call_af(call));
if (err) {
warning("stream: failed to create socket for media '%s'"
" (%m)\n", name, err);
goto out;
}
err = str_dup(&s->cname, cname);
if (err)
goto out;
/* Jitter buffer */
if (cfg->jbuf_del.min && cfg->jbuf_del.max) {
err = jbuf_alloc(&s->jbuf, cfg->jbuf_del.min,
cfg->jbuf_del.max);
if (err)
goto out;
}
err = sdp_media_add(&s->sdp, sdp_sess, name,
sa_port(rtp_local(s->rtp)),
(menc && menc->sdp_proto) ? menc->sdp_proto :
sdp_proto_rtpavp);
if (err)
goto out;
if (label) {
err |= sdp_media_set_lattr(s->sdp, true,
"label", "%d", label);
}
/* RFC 5506 */
if (s->rtcp)
err |= sdp_media_set_lattr(s->sdp, true, "rtcp-rsize", NULL);
/* RFC 5576 */
if (s->rtcp) {
err |= sdp_media_set_lattr(s->sdp, true,
"ssrc", "%u cname:%s",
rtp_sess_ssrc(s->rtp), cname);
}
/* RFC 5761 */
if (cfg->rtcp_mux)
err |= sdp_media_set_lattr(s->sdp, true, "rtcp-mux", NULL);
if (err)
goto out;
if (mnat) {
err = mnat->mediah(&s->mns, mnat_sess, IPPROTO_UDP,
rtp_sock(s->rtp),
s->rtcp ? rtcp_sock(s->rtp) : NULL,
s->sdp);
if (err)
goto out;
}
if (menc) {
s->menc = menc;
s->mencs = mem_ref(menc_sess);
err = menc->mediah(&s->mes, menc_sess,
s->rtp,
IPPROTO_UDP,
rtp_sock(s->rtp),
s->rtcp ? rtcp_sock(s->rtp) : NULL,
s->sdp);
if (err)
goto out;
}
if (err)
goto out;
s->pt_enc = -1;
metric_init(&s->metric_tx);
metric_init(&s->metric_rx);
list_append(call_streaml(call), &s->le, s);
out:
if (err)
mem_deref(s);
else
*sp = s;
return err;
}
int stream_alloc(struct stream **sp, struct call *call,
struct sdp_session *sdp_sess,
const char *name, int label,
const struct mnat *mnat, struct mnat_sess *mnat_sess,
const struct menc *menc, struct menc_sess *menc_sess,
stream_rtp_h *rtph, stream_rtcp_h *rtcph, void *arg)
{
struct stream *s;
int err;
if (!sp || !call || !rtph)
return EINVAL;
s = mem_zalloc(sizeof(*s), stream_destructor);
if (!s)
return ENOMEM;
MAGIC_INIT(s);
tmr_init(&s->tmr_stats);
s->call = call;
if (!str_casecmp(name, "audio"))
s->type = STREAM_AUDIO;
else if (!str_casecmp(name, "video"))
s->type = STREAM_VIDEO;
else
s->type = STREAM_UNKNOWN;
s->rtph = rtph;
s->rtcph = rtcph;
s->arg = arg;
s->pseq = -1;
s->rtcp = config.avt.rtcp_enable;
err = stream_sock_alloc(s, call_af(call));
if (err)
goto out;
/* Jitter buffer */
if (config.avt.jbuf_del.min && config.avt.jbuf_del.max) {
err = jbuf_alloc(&s->jbuf, config.avt.jbuf_del.min,
config.avt.jbuf_del.max);
if (err)
goto out;
}
err = sdp_media_add(&s->sdp, sdp_sess, name,
sa_port(rtp_local(s->rtp)),
(menc && menc->sdp_proto) ? menc->sdp_proto :
sdp_proto_rtpavp);
if (err)
goto out;
if (label) {
err |= sdp_media_set_lattr(s->sdp, true,
"label", "%d", label);
}
/* RFC 5761 */
if (config.avt.rtcp_mux)
err |= sdp_media_set_lattr(s->sdp, true, "rtcp-mux", NULL);
if (mnat) {
err |= mnat->mediah(&s->mns, mnat_sess, IPPROTO_UDP,
rtp_sock(s->rtp),
(s->rtcp && !config.avt.rtcp_mux)
? rtcp_sock(s->rtp) : NULL,
s->sdp);
}
if (menc) {
s->menc = menc;
s->mencs = mem_ref(menc_sess);
err |= menc->mediah(&s->mes, menc_sess, IPPROTO_UDP,
rtp_sock(s->rtp),
s->rtcp ? rtcp_sock(s->rtp) : NULL,
s->sdp);
}
if (err)
goto out;
s->pt_enc = -1;
list_append(call_streaml(call), &s->le, s);
out:
if (err)
mem_deref(s);
else
*sp = s;
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;
}