Merge remote-tracking branch 'qatar/master'
[ffmpeg.git] / libavformat / sdp.c
1 /*
2  * copyright (c) 2007 Luca Abeni
3  *
4  * This file is part of FFmpeg.
5  *
6  * FFmpeg is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU Lesser General Public
8  * License as published by the Free Software Foundation; either
9  * version 2.1 of the License, or (at your option) any later version.
10  *
11  * FFmpeg is distributed in the hope that it will be useful,
12  * but WITHOUT ANY WARRANTY; without even the implied warranty of
13  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14  * Lesser General Public License for more details.
15  *
16  * You should have received a copy of the GNU Lesser General Public
17  * License along with FFmpeg; if not, write to the Free Software
18  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
19  */
20
21 #include <string.h>
22 #include "libavutil/avstring.h"
23 #include "libavutil/base64.h"
24 #include "libavutil/dict.h"
25 #include "libavutil/parseutils.h"
26 #include "libavcodec/xiph.h"
27 #include "libavcodec/mpeg4audio.h"
28 #include "avformat.h"
29 #include "internal.h"
30 #include "avc.h"
31 #include "rtp.h"
32 #if CONFIG_NETWORK
33 #include "network.h"
34 #endif
35
36 #if CONFIG_RTP_MUXER
37 #define MAX_EXTRADATA_SIZE ((INT_MAX - 10) / 2)
38
39 struct sdp_session_level {
40     int sdp_version;      /**< protocol version (currently 0) */
41     int id;               /**< session ID */
42     int version;          /**< session version */
43     int start_time;       /**< session start time (NTP time, in seconds),
44                                or 0 in case of permanent session */
45     int end_time;         /**< session end time (NTP time, in seconds),
46                                or 0 if the session is not bounded */
47     int ttl;              /**< TTL, in case of multicast stream */
48     const char *user;     /**< username of the session's creator */
49     const char *src_addr; /**< IP address of the machine from which the session was created */
50     const char *src_type; /**< address type of src_addr */
51     const char *dst_addr; /**< destination IP address (can be multicast) */
52     const char *dst_type; /**< destination IP address type */
53     const char *name;     /**< session name (can be an empty string) */
54 };
55
56 static void sdp_write_address(char *buff, int size, const char *dest_addr,
57                               const char *dest_type, int ttl)
58 {
59     if (dest_addr) {
60         if (!dest_type)
61             dest_type = "IP4";
62         if (ttl > 0 && !strcmp(dest_type, "IP4")) {
63             /* The TTL should only be specified for IPv4 multicast addresses,
64              * not for IPv6. */
65             av_strlcatf(buff, size, "c=IN %s %s/%d\r\n", dest_type, dest_addr, ttl);
66         } else {
67             av_strlcatf(buff, size, "c=IN %s %s\r\n", dest_type, dest_addr);
68         }
69     }
70 }
71
72 static void sdp_write_header(char *buff, int size, struct sdp_session_level *s)
73 {
74     av_strlcatf(buff, size, "v=%d\r\n"
75                             "o=- %d %d IN %s %s\r\n"
76                             "s=%s\r\n",
77                             s->sdp_version,
78                             s->id, s->version, s->src_type, s->src_addr,
79                             s->name);
80     sdp_write_address(buff, size, s->dst_addr, s->dst_type, s->ttl);
81     av_strlcatf(buff, size, "t=%d %d\r\n"
82                             "a=tool:libavformat " AV_STRINGIFY(LIBAVFORMAT_VERSION) "\r\n",
83                             s->start_time, s->end_time);
84 }
85
86 #if CONFIG_NETWORK
87 static int resolve_destination(char *dest_addr, int size, char *type,
88                                int type_size)
89 {
90     struct addrinfo hints, *ai;
91     int is_multicast;
92
93     av_strlcpy(type, "IP4", type_size);
94     if (!dest_addr[0])
95         return 0;
96
97     /* Resolve the destination, since it must be written
98      * as a numeric IP address in the SDP. */
99
100     memset(&hints, 0, sizeof(hints));
101     if (getaddrinfo(dest_addr, NULL, &hints, &ai))
102         return 0;
103     getnameinfo(ai->ai_addr, ai->ai_addrlen, dest_addr, size,
104                 NULL, 0, NI_NUMERICHOST);
105 #ifdef AF_INET6
106     if (ai->ai_family == AF_INET6)
107         av_strlcpy(type, "IP6", type_size);
108 #endif
109     is_multicast = ff_is_multicast_address(ai->ai_addr);
110     freeaddrinfo(ai);
111     return is_multicast;
112 }
113 #else
114 static int resolve_destination(char *dest_addr, int size, char *type,
115                                int type_size)
116 {
117     return 0;
118 }
119 #endif
120
121 static int sdp_get_address(char *dest_addr, int size, int *ttl, const char *url)
122 {
123     int port;
124     const char *p;
125     char proto[32];
126
127     av_url_split(proto, sizeof(proto), NULL, 0, dest_addr, size, &port, NULL, 0, url);
128
129     *ttl = 0;
130
131     if (strcmp(proto, "rtp")) {
132         /* The url isn't for the actual rtp sessions,
133          * don't parse out anything else than the destination.
134          */
135         return 0;
136     }
137
138     p = strchr(url, '?');
139     if (p) {
140         char buff[64];
141
142         if (av_find_info_tag(buff, sizeof(buff), "ttl", p)) {
143             *ttl = strtol(buff, NULL, 10);
144         } else {
145             *ttl = 5;
146         }
147     }
148
149     return port;
150 }
151
152 #define MAX_PSET_SIZE 1024
153 static char *extradata2psets(AVCodecContext *c)
154 {
155     char *psets, *p;
156     const uint8_t *r;
157     const char *pset_string = "; sprop-parameter-sets=";
158
159     if (c->extradata_size > MAX_EXTRADATA_SIZE) {
160         av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
161
162         return NULL;
163     }
164     if (c->extradata[0] == 1) {
165         uint8_t *dummy_p;
166         int dummy_int;
167         AVBitStreamFilterContext *bsfc= av_bitstream_filter_init("h264_mp4toannexb");
168
169         if (!bsfc) {
170             av_log(c, AV_LOG_ERROR, "Cannot open the h264_mp4toannexb BSF!\n");
171
172             return NULL;
173         }
174         av_bitstream_filter_filter(bsfc, c, NULL, &dummy_p, &dummy_int, NULL, 0, 0);
175         av_bitstream_filter_close(bsfc);
176     }
177
178     psets = av_mallocz(MAX_PSET_SIZE);
179     if (psets == NULL) {
180         av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the parameter sets.\n");
181         return NULL;
182     }
183     memcpy(psets, pset_string, strlen(pset_string));
184     p = psets + strlen(pset_string);
185     r = ff_avc_find_startcode(c->extradata, c->extradata + c->extradata_size);
186     while (r < c->extradata + c->extradata_size) {
187         const uint8_t *r1;
188         uint8_t nal_type;
189
190         while (!*(r++));
191         nal_type = *r & 0x1f;
192         r1 = ff_avc_find_startcode(r, c->extradata + c->extradata_size);
193         if (nal_type != 7 && nal_type != 8) { /* Only output SPS and PPS */
194             r = r1;
195             continue;
196         }
197         if (p != (psets + strlen(pset_string))) {
198             *p = ',';
199             p++;
200         }
201         if (av_base64_encode(p, MAX_PSET_SIZE - (p - psets), r, r1 - r) == NULL) {
202             av_log(c, AV_LOG_ERROR, "Cannot Base64-encode %td %td!\n", MAX_PSET_SIZE - (p - psets), r1 - r);
203             av_free(psets);
204
205             return NULL;
206         }
207         p += strlen(p);
208         r = r1;
209     }
210
211     return psets;
212 }
213
214 static char *extradata2config(AVCodecContext *c)
215 {
216     char *config;
217
218     if (c->extradata_size > MAX_EXTRADATA_SIZE) {
219         av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
220
221         return NULL;
222     }
223     config = av_malloc(10 + c->extradata_size * 2);
224     if (config == NULL) {
225         av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the config info.\n");
226         return NULL;
227     }
228     memcpy(config, "; config=", 9);
229     ff_data_to_hex(config + 9, c->extradata, c->extradata_size, 0);
230     config[9 + c->extradata_size * 2] = 0;
231
232     return config;
233 }
234
235 static char *xiph_extradata2config(AVCodecContext *c)
236 {
237     char *config, *encoded_config;
238     uint8_t *header_start[3];
239     int headers_len, header_len[3], config_len;
240     int first_header_size;
241
242     switch (c->codec_id) {
243     case CODEC_ID_THEORA:
244         first_header_size = 42;
245         break;
246     case CODEC_ID_VORBIS:
247         first_header_size = 30;
248         break;
249     default:
250         av_log(c, AV_LOG_ERROR, "Unsupported Xiph codec ID\n");
251         return NULL;
252     }
253
254     if (ff_split_xiph_headers(c->extradata, c->extradata_size,
255                               first_header_size, header_start,
256                               header_len) < 0) {
257         av_log(c, AV_LOG_ERROR, "Extradata corrupt.\n");
258         return NULL;
259     }
260
261     headers_len = header_len[0] + header_len[2];
262     config_len = 4 +          // count
263                  3 +          // ident
264                  2 +          // packet size
265                  1 +          // header count
266                  2 +          // header size
267                  headers_len; // and the rest
268
269     config = av_malloc(config_len);
270     if (!config)
271         goto xiph_fail;
272
273     encoded_config = av_malloc(AV_BASE64_SIZE(config_len));
274     if (!encoded_config) {
275         av_free(config);
276         goto xiph_fail;
277     }
278
279     config[0] = config[1] = config[2] = 0;
280     config[3] = 1;
281     config[4] = (RTP_XIPH_IDENT >> 16) & 0xff;
282     config[5] = (RTP_XIPH_IDENT >>  8) & 0xff;
283     config[6] = (RTP_XIPH_IDENT      ) & 0xff;
284     config[7] = (headers_len >> 8) & 0xff;
285     config[8] = headers_len & 0xff;
286     config[9] = 2;
287     config[10] = header_len[0];
288     config[11] = 0; // size of comment header; nonexistent
289     memcpy(config + 12, header_start[0], header_len[0]);
290     memcpy(config + 12 + header_len[0], header_start[2], header_len[2]);
291
292     av_base64_encode(encoded_config, AV_BASE64_SIZE(config_len),
293                      config, config_len);
294     av_free(config);
295
296     return encoded_config;
297
298 xiph_fail:
299     av_log(c, AV_LOG_ERROR,
300            "Not enough memory for configuration string\n");
301     return NULL;
302 }
303
304 static int latm_context2profilelevel(AVCodecContext *c) {
305     /* MP4A-LATM
306      * The RTP payload format specification is described in RFC 3016
307      * The encoding specifications are provided in ISO/IEC 14496-3 */
308
309     int profile_level = 0x2B;
310
311     /* TODO: AAC Profile only supports AAC LC Object Type.
312      * Different Object Types should implement different Profile Levels */
313
314     if (c->sample_rate <= 24000) {
315         if (c->channels <= 2)
316             profile_level = 0x28; // AAC Profile, Level 1
317     } else if (c->sample_rate <= 48000) {
318         if (c->channels <= 2) {
319             profile_level = 0x29; // AAC Profile, Level 2
320         } else if (c->channels <= 5) {
321             profile_level = 0x2A; // AAC Profile, Level 4
322         }
323     } else if (c->sample_rate <= 96000) {
324         if (c->channels <= 5) {
325             profile_level = 0x2B; // AAC Profile, Level 5
326         }
327     }
328
329     return profile_level;
330 }
331
332 static char *latm_context2config(AVCodecContext *c) {
333     /* MP4A-LATM
334      * The RTP payload format specification is described in RFC 3016
335      * The encoding specifications are provided in ISO/IEC 14496-3 */
336
337     uint8_t config_byte[6];
338     int rate_index;
339     char *config;
340
341     for (rate_index = 0; rate_index < 16; rate_index++)
342         if (ff_mpeg4audio_sample_rates[rate_index] == c->sample_rate)
343             break;
344     if (rate_index == 16) {
345         av_log(c, AV_LOG_ERROR, "Unsupported sample rate\n");
346         return NULL;
347     }
348
349     config_byte[0] = 0x40;
350     config_byte[1] = 0;
351     config_byte[2] = 0x20 | rate_index;
352     config_byte[3] = c->channels << 4;
353     config_byte[4] = 0x3f;
354     config_byte[5] = 0xc0;
355
356     config = av_malloc(6*2+1);
357     if (!config) {
358         av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the config info.\n");
359         return NULL;
360     }
361     ff_data_to_hex(config, config_byte, 6, 1);
362     config[12] = 0;
363
364     return config;
365 }
366
367 static char *sdp_write_media_attributes(char *buff, int size, AVCodecContext *c, int payload_type, int flags)
368 {
369     char *config = NULL;
370
371     switch (c->codec_id) {
372         case CODEC_ID_H264:
373             if (c->extradata_size) {
374                 config = extradata2psets(c);
375             }
376             av_strlcatf(buff, size, "a=rtpmap:%d H264/90000\r\n"
377                                     "a=fmtp:%d packetization-mode=1%s\r\n",
378                                      payload_type,
379                                      payload_type, config ? config : "");
380             break;
381         case CODEC_ID_H263:
382         case CODEC_ID_H263P:
383             /* a=framesize is required by 3GPP TS 26.234 (PSS). It
384              * actually specifies the maximum video size, but we only know
385              * the current size. This is required for playback on Android
386              * stagefright and on Samsung bada. */
387             av_strlcatf(buff, size, "a=rtpmap:%d H263-2000/90000\r\n"
388                                     "a=framesize:%d %d-%d\r\n",
389                                     payload_type,
390                                     payload_type, c->width, c->height);
391             break;
392         case CODEC_ID_MPEG4:
393             if (c->extradata_size) {
394                 config = extradata2config(c);
395             }
396             av_strlcatf(buff, size, "a=rtpmap:%d MP4V-ES/90000\r\n"
397                                     "a=fmtp:%d profile-level-id=1%s\r\n",
398                                      payload_type,
399                                      payload_type, config ? config : "");
400             break;
401         case CODEC_ID_AAC:
402             if (flags & AVFMT_FLAG_MP4A_LATM) {
403                 config = latm_context2config(c);
404                 if (!config)
405                     return NULL;
406                 av_strlcatf(buff, size, "a=rtpmap:%d MP4A-LATM/%d/%d\r\n"
407                                         "a=fmtp:%d profile-level-id=%d;cpresent=0;config=%s\r\n",
408                                          payload_type, c->sample_rate, c->channels,
409                                          payload_type, latm_context2profilelevel(c), config);
410             } else {
411                 if (c->extradata_size) {
412                     config = extradata2config(c);
413                 } else {
414                     /* FIXME: maybe we can forge config information based on the
415                      *        codec parameters...
416                      */
417                     av_log(c, AV_LOG_ERROR, "AAC with no global headers is currently not supported.\n");
418                     return NULL;
419                 }
420                 if (config == NULL) {
421                     return NULL;
422                 }
423                 av_strlcatf(buff, size, "a=rtpmap:%d MPEG4-GENERIC/%d/%d\r\n"
424                                         "a=fmtp:%d profile-level-id=1;"
425                                         "mode=AAC-hbr;sizelength=13;indexlength=3;"
426                                         "indexdeltalength=3%s\r\n",
427                                          payload_type, c->sample_rate, c->channels,
428                                          payload_type, config);
429             }
430             break;
431         case CODEC_ID_PCM_S16BE:
432             if (payload_type >= RTP_PT_PRIVATE)
433                 av_strlcatf(buff, size, "a=rtpmap:%d L16/%d/%d\r\n",
434                                          payload_type,
435                                          c->sample_rate, c->channels);
436             break;
437         case CODEC_ID_PCM_MULAW:
438             if (payload_type >= RTP_PT_PRIVATE)
439                 av_strlcatf(buff, size, "a=rtpmap:%d PCMU/%d/%d\r\n",
440                                          payload_type,
441                                          c->sample_rate, c->channels);
442             break;
443         case CODEC_ID_PCM_ALAW:
444             if (payload_type >= RTP_PT_PRIVATE)
445                 av_strlcatf(buff, size, "a=rtpmap:%d PCMA/%d/%d\r\n",
446                                          payload_type,
447                                          c->sample_rate, c->channels);
448             break;
449         case CODEC_ID_AMR_NB:
450             av_strlcatf(buff, size, "a=rtpmap:%d AMR/%d/%d\r\n"
451                                     "a=fmtp:%d octet-align=1\r\n",
452                                      payload_type, c->sample_rate, c->channels,
453                                      payload_type);
454             break;
455         case CODEC_ID_AMR_WB:
456             av_strlcatf(buff, size, "a=rtpmap:%d AMR-WB/%d/%d\r\n"
457                                     "a=fmtp:%d octet-align=1\r\n",
458                                      payload_type, c->sample_rate, c->channels,
459                                      payload_type);
460             break;
461         case CODEC_ID_VORBIS:
462             if (c->extradata_size)
463                 config = xiph_extradata2config(c);
464             else
465                 av_log(c, AV_LOG_ERROR, "Vorbis configuration info missing\n");
466             if (!config)
467                 return NULL;
468
469             av_strlcatf(buff, size, "a=rtpmap:%d vorbis/%d/%d\r\n"
470                                     "a=fmtp:%d configuration=%s\r\n",
471                                     payload_type, c->sample_rate, c->channels,
472                                     payload_type, config);
473             break;
474         case CODEC_ID_THEORA: {
475             const char *pix_fmt;
476             if (c->extradata_size)
477                 config = xiph_extradata2config(c);
478             else
479                 av_log(c, AV_LOG_ERROR, "Theora configuation info missing\n");
480             if (!config)
481                 return NULL;
482
483             switch (c->pix_fmt) {
484             case PIX_FMT_YUV420P:
485                 pix_fmt = "YCbCr-4:2:0";
486                 break;
487             case PIX_FMT_YUV422P:
488                 pix_fmt = "YCbCr-4:2:2";
489                 break;
490             case PIX_FMT_YUV444P:
491                 pix_fmt = "YCbCr-4:4:4";
492                 break;
493             default:
494                 av_log(c, AV_LOG_ERROR, "Unsupported pixel format.\n");
495                 return NULL;
496             }
497
498             av_strlcatf(buff, size, "a=rtpmap:%d theora/90000\r\n"
499                                     "a=fmtp:%d delivery-method=inline; "
500                                     "width=%d; height=%d; sampling=%s; "
501                                     "configuration=%s\r\n",
502                                     payload_type, payload_type,
503                                     c->width, c->height, pix_fmt, config);
504             break;
505         }
506         case CODEC_ID_VP8:
507             av_strlcatf(buff, size, "a=rtpmap:%d VP8/90000\r\n",
508                                      payload_type);
509             break;
510         case CODEC_ID_ADPCM_G722:
511             if (payload_type >= RTP_PT_PRIVATE)
512                 av_strlcatf(buff, size, "a=rtpmap:%d G722/%d/%d\r\n",
513                                          payload_type,
514                                          8000, c->channels);
515             break;
516         default:
517             /* Nothing special to do here... */
518             break;
519     }
520
521     av_free(config);
522
523     return buff;
524 }
525
526 void ff_sdp_write_media(char *buff, int size, AVCodecContext *c, const char *dest_addr, const char *dest_type, int port, int ttl, int flags)
527 {
528     const char *type;
529     int payload_type;
530
531     payload_type = ff_rtp_get_payload_type(c);
532     if (payload_type < 0) {
533         payload_type = RTP_PT_PRIVATE + (c->codec_type == AVMEDIA_TYPE_AUDIO);
534     }
535
536     switch (c->codec_type) {
537         case AVMEDIA_TYPE_VIDEO   : type = "video"      ; break;
538         case AVMEDIA_TYPE_AUDIO   : type = "audio"      ; break;
539         case AVMEDIA_TYPE_SUBTITLE: type = "text"       ; break;
540         default                 : type = "application"; break;
541     }
542
543     av_strlcatf(buff, size, "m=%s %d RTP/AVP %d\r\n", type, port, payload_type);
544     sdp_write_address(buff, size, dest_addr, dest_type, ttl);
545     if (c->bit_rate) {
546         av_strlcatf(buff, size, "b=AS:%d\r\n", c->bit_rate / 1000);
547     }
548
549     sdp_write_media_attributes(buff, size, c, payload_type, flags);
550 }
551
552 int av_sdp_create(AVFormatContext *ac[], int n_files, char *buf, int size)
553 {
554     AVDictionaryEntry *title = av_dict_get(ac[0]->metadata, "title", NULL, 0);
555     struct sdp_session_level s;
556     int i, j, port, ttl, is_multicast;
557     char dst[32], dst_type[5];
558
559     memset(buf, 0, size);
560     memset(&s, 0, sizeof(struct sdp_session_level));
561     s.user = "-";
562     s.src_addr = "127.0.0.1";    /* FIXME: Properly set this */
563     s.src_type = "IP4";
564     s.name = title ? title->value : "No Name";
565
566     port = 0;
567     ttl = 0;
568     if (n_files == 1) {
569         port = sdp_get_address(dst, sizeof(dst), &ttl, ac[0]->filename);
570         is_multicast = resolve_destination(dst, sizeof(dst), dst_type,
571                                            sizeof(dst_type));
572         if (!is_multicast)
573             ttl = 0;
574         if (dst[0]) {
575             s.dst_addr = dst;
576             s.dst_type = dst_type;
577             s.ttl = ttl;
578             if (!strcmp(dst_type, "IP6")) {
579                 s.src_addr = "::1";
580                 s.src_type = "IP6";
581             }
582         }
583     }
584     sdp_write_header(buf, size, &s);
585
586     dst[0] = 0;
587     for (i = 0; i < n_files; i++) {
588         if (n_files != 1) {
589             port = sdp_get_address(dst, sizeof(dst), &ttl, ac[i]->filename);
590             is_multicast = resolve_destination(dst, sizeof(dst), dst_type,
591                                                sizeof(dst_type));
592             if (!is_multicast)
593                 ttl = 0;
594         }
595         for (j = 0; j < ac[i]->nb_streams; j++) {
596             ff_sdp_write_media(buf, size,
597                                   ac[i]->streams[j]->codec, dst[0] ? dst : NULL,
598                                   dst_type, (port > 0) ? port + j * 2 : 0, ttl,
599                                   ac[i]->flags);
600             if (port <= 0) {
601                 av_strlcatf(buf, size,
602                                    "a=control:streamid=%d\r\n", i + j);
603             }
604         }
605     }
606
607     return 0;
608 }
609 #else
610 int av_sdp_create(AVFormatContext *ac[], int n_files, char *buf, int size)
611 {
612     return AVERROR(ENOSYS);
613 }
614
615 void ff_sdp_write_media(char *buff, int size, AVCodecContext *c, const char *dest_addr, const char *dest_type, int port, int ttl, int flags)
616 {
617 }
618 #endif
619
620 #if FF_API_SDP_CREATE
621 int avf_sdp_create(AVFormatContext *ac[], int n_files, char *buff, int size)
622 {
623     return av_sdp_create(ac, n_files, buff, size);
624 }
625 #endif