avio: add avio_tell macro as a replacement for url_ftell
[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/parseutils.h"
25 #include "libavcodec/xiph.h"
26 #include "avformat.h"
27 #include "internal.h"
28 #include "avc.h"
29 #include "rtp.h"
30 #if CONFIG_NETWORK
31 #include "network.h"
32 #endif
33
34 #if CONFIG_RTP_MUXER
35 #define MAX_EXTRADATA_SIZE ((INT_MAX - 10) / 2)
36
37 struct sdp_session_level {
38     int sdp_version;      /**< protocol version (currently 0) */
39     int id;               /**< session ID */
40     int version;          /**< session version */
41     int start_time;       /**< session start time (NTP time, in seconds),
42                                or 0 in case of permanent session */
43     int end_time;         /**< session end time (NTP time, in seconds),
44                                or 0 if the session is not bounded */
45     int ttl;              /**< TTL, in case of multicast stream */
46     const char *user;     /**< username of the session's creator */
47     const char *src_addr; /**< IP address of the machine from which the session was created */
48     const char *src_type; /**< address type of src_addr */
49     const char *dst_addr; /**< destination IP address (can be multicast) */
50     const char *dst_type; /**< destination IP address type */
51     const char *name;     /**< session name (can be an empty string) */
52 };
53
54 static void sdp_write_address(char *buff, int size, const char *dest_addr,
55                               const char *dest_type, int ttl)
56 {
57     if (dest_addr) {
58         if (!dest_type)
59             dest_type = "IP4";
60         if (ttl > 0 && !strcmp(dest_type, "IP4")) {
61             /* The TTL should only be specified for IPv4 multicast addresses,
62              * not for IPv6. */
63             av_strlcatf(buff, size, "c=IN %s %s/%d\r\n", dest_type, dest_addr, ttl);
64         } else {
65             av_strlcatf(buff, size, "c=IN %s %s\r\n", dest_type, dest_addr);
66         }
67     }
68 }
69
70 static void sdp_write_header(char *buff, int size, struct sdp_session_level *s)
71 {
72     av_strlcatf(buff, size, "v=%d\r\n"
73                             "o=- %d %d IN %s %s\r\n"
74                             "s=%s\r\n",
75                             s->sdp_version,
76                             s->id, s->version, s->src_type, s->src_addr,
77                             s->name);
78     sdp_write_address(buff, size, s->dst_addr, s->dst_type, s->ttl);
79     av_strlcatf(buff, size, "t=%d %d\r\n"
80                             "a=tool:libavformat " AV_STRINGIFY(LIBAVFORMAT_VERSION) "\r\n",
81                             s->start_time, s->end_time);
82 }
83
84 #if CONFIG_NETWORK
85 static int resolve_destination(char *dest_addr, int size, char *type,
86                                int type_size)
87 {
88     struct addrinfo hints, *ai;
89     int is_multicast;
90
91     av_strlcpy(type, "IP4", type_size);
92     if (!dest_addr[0])
93         return 0;
94
95     /* Resolve the destination, since it must be written
96      * as a numeric IP address in the SDP. */
97
98     memset(&hints, 0, sizeof(hints));
99     if (getaddrinfo(dest_addr, NULL, &hints, &ai))
100         return 0;
101     getnameinfo(ai->ai_addr, ai->ai_addrlen, dest_addr, size,
102                 NULL, 0, NI_NUMERICHOST);
103 #ifdef AF_INET6
104     if (ai->ai_family == AF_INET6)
105         av_strlcpy(type, "IP6", type_size);
106 #endif
107     is_multicast = ff_is_multicast_address(ai->ai_addr);
108     freeaddrinfo(ai);
109     return is_multicast;
110 }
111 #else
112 static int resolve_destination(char *dest_addr, int size, char *type,
113                                int type_size)
114 {
115     return 0;
116 }
117 #endif
118
119 static int sdp_get_address(char *dest_addr, int size, int *ttl, const char *url)
120 {
121     int port;
122     const char *p;
123     char proto[32];
124
125     av_url_split(proto, sizeof(proto), NULL, 0, dest_addr, size, &port, NULL, 0, url);
126
127     *ttl = 0;
128
129     if (strcmp(proto, "rtp")) {
130         /* The url isn't for the actual rtp sessions,
131          * don't parse out anything else than the destination.
132          */
133         return 0;
134     }
135
136     p = strchr(url, '?');
137     if (p) {
138         char buff[64];
139
140         if (av_find_info_tag(buff, sizeof(buff), "ttl", p)) {
141             *ttl = strtol(buff, NULL, 10);
142         } else {
143             *ttl = 5;
144         }
145     }
146
147     return port;
148 }
149
150 #define MAX_PSET_SIZE 1024
151 static char *extradata2psets(AVCodecContext *c)
152 {
153     char *psets, *p;
154     const uint8_t *r;
155     const char *pset_string = "; sprop-parameter-sets=";
156
157     if (c->extradata_size > MAX_EXTRADATA_SIZE) {
158         av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
159
160         return NULL;
161     }
162     if (c->extradata[0] == 1) {
163         uint8_t *dummy_p;
164         int dummy_int;
165         AVBitStreamFilterContext *bsfc= av_bitstream_filter_init("h264_mp4toannexb");
166
167         if (!bsfc) {
168             av_log(c, AV_LOG_ERROR, "Cannot open the h264_mp4toannexb BSF!\n");
169
170             return NULL;
171         }
172         av_bitstream_filter_filter(bsfc, c, NULL, &dummy_p, &dummy_int, NULL, 0, 0);
173         av_bitstream_filter_close(bsfc);
174     }
175
176     psets = av_mallocz(MAX_PSET_SIZE);
177     if (psets == NULL) {
178         av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the parameter sets.\n");
179         return NULL;
180     }
181     memcpy(psets, pset_string, strlen(pset_string));
182     p = psets + strlen(pset_string);
183     r = ff_avc_find_startcode(c->extradata, c->extradata + c->extradata_size);
184     while (r < c->extradata + c->extradata_size) {
185         const uint8_t *r1;
186         uint8_t nal_type;
187
188         while (!*(r++));
189         nal_type = *r & 0x1f;
190         r1 = ff_avc_find_startcode(r, c->extradata + c->extradata_size);
191         if (nal_type != 7 && nal_type != 8) { /* Only output SPS and PPS */
192             r = r1;
193             continue;
194         }
195         if (p != (psets + strlen(pset_string))) {
196             *p = ',';
197             p++;
198         }
199         if (av_base64_encode(p, MAX_PSET_SIZE - (p - psets), r, r1 - r) == NULL) {
200             av_log(c, AV_LOG_ERROR, "Cannot Base64-encode %td %td!\n", MAX_PSET_SIZE - (p - psets), r1 - r);
201             av_free(psets);
202
203             return NULL;
204         }
205         p += strlen(p);
206         r = r1;
207     }
208
209     return psets;
210 }
211
212 static char *extradata2config(AVCodecContext *c)
213 {
214     char *config;
215
216     if (c->extradata_size > MAX_EXTRADATA_SIZE) {
217         av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
218
219         return NULL;
220     }
221     config = av_malloc(10 + c->extradata_size * 2);
222     if (config == NULL) {
223         av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the config info.\n");
224         return NULL;
225     }
226     memcpy(config, "; config=", 9);
227     ff_data_to_hex(config + 9, c->extradata, c->extradata_size, 0);
228     config[9 + c->extradata_size * 2] = 0;
229
230     return config;
231 }
232
233 static char *xiph_extradata2config(AVCodecContext *c)
234 {
235     char *config, *encoded_config;
236     uint8_t *header_start[3];
237     int headers_len, header_len[3], config_len;
238     int first_header_size;
239
240     switch (c->codec_id) {
241     case CODEC_ID_THEORA:
242         first_header_size = 42;
243         break;
244     case CODEC_ID_VORBIS:
245         first_header_size = 30;
246         break;
247     default:
248         av_log(c, AV_LOG_ERROR, "Unsupported Xiph codec ID\n");
249         return NULL;
250     }
251
252     if (ff_split_xiph_headers(c->extradata, c->extradata_size,
253                               first_header_size, header_start,
254                               header_len) < 0) {
255         av_log(c, AV_LOG_ERROR, "Extradata corrupt.\n");
256         return NULL;
257     }
258
259     headers_len = header_len[0] + header_len[2];
260     config_len = 4 +          // count
261                  3 +          // ident
262                  2 +          // packet size
263                  1 +          // header count
264                  2 +          // header size
265                  headers_len; // and the rest
266
267     config = av_malloc(config_len);
268     if (!config)
269         goto xiph_fail;
270
271     encoded_config = av_malloc(AV_BASE64_SIZE(config_len));
272     if (!encoded_config) {
273         av_free(config);
274         goto xiph_fail;
275     }
276
277     config[0] = config[1] = config[2] = 0;
278     config[3] = 1;
279     config[4] = (RTP_XIPH_IDENT >> 16) & 0xff;
280     config[5] = (RTP_XIPH_IDENT >>  8) & 0xff;
281     config[6] = (RTP_XIPH_IDENT      ) & 0xff;
282     config[7] = (headers_len >> 8) & 0xff;
283     config[8] = headers_len & 0xff;
284     config[9] = 2;
285     config[10] = header_len[0];
286     config[11] = 0; // size of comment header; nonexistent
287     memcpy(config + 12, header_start[0], header_len[0]);
288     memcpy(config + 12 + header_len[0], header_start[2], header_len[2]);
289
290     av_base64_encode(encoded_config, AV_BASE64_SIZE(config_len),
291                      config, config_len);
292     av_free(config);
293
294     return encoded_config;
295
296 xiph_fail:
297     av_log(c, AV_LOG_ERROR,
298            "Not enough memory for configuration string\n");
299     return NULL;
300 }
301
302 static char *sdp_write_media_attributes(char *buff, int size, AVCodecContext *c, int payload_type)
303 {
304     char *config = NULL;
305
306     switch (c->codec_id) {
307         case CODEC_ID_H264:
308             if (c->extradata_size) {
309                 config = extradata2psets(c);
310             }
311             av_strlcatf(buff, size, "a=rtpmap:%d H264/90000\r\n"
312                                     "a=fmtp:%d packetization-mode=1%s\r\n",
313                                      payload_type,
314                                      payload_type, config ? config : "");
315             break;
316         case CODEC_ID_H263:
317         case CODEC_ID_H263P:
318             /* a=framesize is required by 3GPP TS 26.234 (PSS). It
319              * actually specifies the maximum video size, but we only know
320              * the current size. This is required for playback on Android
321              * stagefright and on Samsung bada. */
322             av_strlcatf(buff, size, "a=rtpmap:%d H263-2000/90000\r\n"
323                                     "a=framesize:%d %d-%d\r\n",
324                                     payload_type,
325                                     payload_type, c->width, c->height);
326             break;
327         case CODEC_ID_MPEG4:
328             if (c->extradata_size) {
329                 config = extradata2config(c);
330             }
331             av_strlcatf(buff, size, "a=rtpmap:%d MP4V-ES/90000\r\n"
332                                     "a=fmtp:%d profile-level-id=1%s\r\n",
333                                      payload_type,
334                                      payload_type, config ? config : "");
335             break;
336         case CODEC_ID_AAC:
337             if (c->extradata_size) {
338                 config = extradata2config(c);
339             } else {
340                 /* FIXME: maybe we can forge config information based on the
341                  *        codec parameters...
342                  */
343                 av_log(c, AV_LOG_ERROR, "AAC with no global headers is currently not supported.\n");
344                 return NULL;
345             }
346             if (config == NULL) {
347                 return NULL;
348             }
349             av_strlcatf(buff, size, "a=rtpmap:%d MPEG4-GENERIC/%d/%d\r\n"
350                                     "a=fmtp:%d profile-level-id=1;"
351                                     "mode=AAC-hbr;sizelength=13;indexlength=3;"
352                                     "indexdeltalength=3%s\r\n",
353                                      payload_type, c->sample_rate, c->channels,
354                                      payload_type, config);
355             break;
356         case CODEC_ID_PCM_S16BE:
357             if (payload_type >= RTP_PT_PRIVATE)
358                 av_strlcatf(buff, size, "a=rtpmap:%d L16/%d/%d\r\n",
359                                          payload_type,
360                                          c->sample_rate, c->channels);
361             break;
362         case CODEC_ID_PCM_MULAW:
363             if (payload_type >= RTP_PT_PRIVATE)
364                 av_strlcatf(buff, size, "a=rtpmap:%d PCMU/%d/%d\r\n",
365                                          payload_type,
366                                          c->sample_rate, c->channels);
367             break;
368         case CODEC_ID_PCM_ALAW:
369             if (payload_type >= RTP_PT_PRIVATE)
370                 av_strlcatf(buff, size, "a=rtpmap:%d PCMA/%d/%d\r\n",
371                                          payload_type,
372                                          c->sample_rate, c->channels);
373             break;
374         case CODEC_ID_AMR_NB:
375             av_strlcatf(buff, size, "a=rtpmap:%d AMR/%d/%d\r\n"
376                                     "a=fmtp:%d octet-align=1\r\n",
377                                      payload_type, c->sample_rate, c->channels,
378                                      payload_type);
379             break;
380         case CODEC_ID_AMR_WB:
381             av_strlcatf(buff, size, "a=rtpmap:%d AMR-WB/%d/%d\r\n"
382                                     "a=fmtp:%d octet-align=1\r\n",
383                                      payload_type, c->sample_rate, c->channels,
384                                      payload_type);
385             break;
386         case CODEC_ID_VORBIS:
387             if (c->extradata_size)
388                 config = xiph_extradata2config(c);
389             else
390                 av_log(c, AV_LOG_ERROR, "Vorbis configuration info missing\n");
391             if (!config)
392                 return NULL;
393
394             av_strlcatf(buff, size, "a=rtpmap:%d vorbis/%d/%d\r\n"
395                                     "a=fmtp:%d configuration=%s\r\n",
396                                     payload_type, c->sample_rate, c->channels,
397                                     payload_type, config);
398             break;
399         case CODEC_ID_THEORA: {
400             const char *pix_fmt;
401             if (c->extradata_size)
402                 config = xiph_extradata2config(c);
403             else
404                 av_log(c, AV_LOG_ERROR, "Theora configuation info missing\n");
405             if (!config)
406                 return NULL;
407
408             switch (c->pix_fmt) {
409             case PIX_FMT_YUV420P:
410                 pix_fmt = "YCbCr-4:2:0";
411                 break;
412             case PIX_FMT_YUV422P:
413                 pix_fmt = "YCbCr-4:2:2";
414                 break;
415             case PIX_FMT_YUV444P:
416                 pix_fmt = "YCbCr-4:4:4";
417                 break;
418             default:
419                 av_log(c, AV_LOG_ERROR, "Unsupported pixel format.\n");
420                 return NULL;
421             }
422
423             av_strlcatf(buff, size, "a=rtpmap:%d theora/90000\r\n"
424                                     "a=fmtp:%d delivery-method=inline; "
425                                     "width=%d; height=%d; sampling=%s; "
426                                     "configuration=%s\r\n",
427                                     payload_type, payload_type,
428                                     c->width, c->height, pix_fmt, config);
429             break;
430         }
431         case CODEC_ID_VP8:
432             av_strlcatf(buff, size, "a=rtpmap:%d VP8/90000\r\n",
433                                      payload_type);
434             break;
435         case CODEC_ID_ADPCM_G722:
436             if (payload_type >= RTP_PT_PRIVATE)
437                 av_strlcatf(buff, size, "a=rtpmap:%d G722/%d/%d\r\n",
438                                          payload_type,
439                                          8000, c->channels);
440             break;
441         default:
442             /* Nothing special to do here... */
443             break;
444     }
445
446     av_free(config);
447
448     return buff;
449 }
450
451 void ff_sdp_write_media(char *buff, int size, AVCodecContext *c, const char *dest_addr, const char *dest_type, int port, int ttl)
452 {
453     const char *type;
454     int payload_type;
455
456     payload_type = ff_rtp_get_payload_type(c);
457     if (payload_type < 0) {
458         payload_type = RTP_PT_PRIVATE + (c->codec_type == AVMEDIA_TYPE_AUDIO);
459     }
460
461     switch (c->codec_type) {
462         case AVMEDIA_TYPE_VIDEO   : type = "video"      ; break;
463         case AVMEDIA_TYPE_AUDIO   : type = "audio"      ; break;
464         case AVMEDIA_TYPE_SUBTITLE: type = "text"       ; break;
465         default                 : type = "application"; break;
466     }
467
468     av_strlcatf(buff, size, "m=%s %d RTP/AVP %d\r\n", type, port, payload_type);
469     sdp_write_address(buff, size, dest_addr, dest_type, ttl);
470     if (c->bit_rate) {
471         av_strlcatf(buff, size, "b=AS:%d\r\n", c->bit_rate / 1000);
472     }
473
474     sdp_write_media_attributes(buff, size, c, payload_type);
475 }
476
477 int avf_sdp_create(AVFormatContext *ac[], int n_files, char *buff, int size)
478 {
479     AVMetadataTag *title = av_metadata_get(ac[0]->metadata, "title", NULL, 0);
480     struct sdp_session_level s;
481     int i, j, port, ttl, is_multicast;
482     char dst[32], dst_type[5];
483
484     memset(buff, 0, size);
485     memset(&s, 0, sizeof(struct sdp_session_level));
486     s.user = "-";
487     s.src_addr = "127.0.0.1";    /* FIXME: Properly set this */
488     s.src_type = "IP4";
489     s.name = title ? title->value : "No Name";
490
491     port = 0;
492     ttl = 0;
493     if (n_files == 1) {
494         port = sdp_get_address(dst, sizeof(dst), &ttl, ac[0]->filename);
495         is_multicast = resolve_destination(dst, sizeof(dst), dst_type,
496                                            sizeof(dst_type));
497         if (!is_multicast)
498             ttl = 0;
499         if (dst[0]) {
500             s.dst_addr = dst;
501             s.dst_type = dst_type;
502             s.ttl = ttl;
503             if (!strcmp(dst_type, "IP6")) {
504                 s.src_addr = "::1";
505                 s.src_type = "IP6";
506             }
507         }
508     }
509     sdp_write_header(buff, size, &s);
510
511     dst[0] = 0;
512     for (i = 0; i < n_files; i++) {
513         if (n_files != 1) {
514             port = sdp_get_address(dst, sizeof(dst), &ttl, ac[i]->filename);
515             is_multicast = resolve_destination(dst, sizeof(dst), dst_type,
516                                                sizeof(dst_type));
517             if (!is_multicast)
518                 ttl = 0;
519         }
520         for (j = 0; j < ac[i]->nb_streams; j++) {
521             ff_sdp_write_media(buff, size,
522                                   ac[i]->streams[j]->codec, dst[0] ? dst : NULL,
523                                   dst_type, (port > 0) ? port + j * 2 : 0, ttl);
524             if (port <= 0) {
525                 av_strlcatf(buff, size,
526                                    "a=control:streamid=%d\r\n", i + j);
527             }
528         }
529     }
530
531     return 0;
532 }
533 #else
534 int avf_sdp_create(AVFormatContext *ac[], int n_files, char *buff, int size)
535 {
536     return AVERROR(ENOSYS);
537 }
538
539 void ff_sdp_write_media(char *buff, int size, AVCodecContext *c, const char *dest_addr, const char *dest_type, int port, int ttl)
540 {
541 }
542 #endif