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 "avformat.h"
25#include "internal.h"
26#include "avc.h"
27#include "rtp.h"
28#if CONFIG_NETWORK
29#include "network.h"
30#endif
31
32#if CONFIG_RTP_MUXER
33#define MAX_EXTRADATA_SIZE ((INT_MAX - 10) / 2)
34
35struct sdp_session_level {
36    int sdp_version;      /**< protocol version (currently 0) */
37    int id;               /**< session ID */
38    int version;          /**< session version */
39    int start_time;       /**< session start time (NTP time, in seconds),
40                               or 0 in case of permanent session */
41    int end_time;         /**< session end time (NTP time, in seconds),
42                               or 0 if the session is not bounded */
43    int ttl;              /**< TTL, in case of multicast stream */
44    const char *user;     /**< username of the session's creator */
45    const char *src_addr; /**< IP address of the machine from which the session was created */
46    const char *dst_addr; /**< destination IP address (can be multicast) */
47    const char *name;     /**< session name (can be an empty string) */
48};
49
50static void sdp_write_address(char *buff, int size, const char *dest_addr, int ttl)
51{
52    if (dest_addr) {
53        if (ttl > 0) {
54            av_strlcatf(buff, size, "c=IN IP4 %s/%d\r\n", dest_addr, ttl);
55        } else {
56            av_strlcatf(buff, size, "c=IN IP4 %s\r\n", dest_addr);
57        }
58    }
59}
60
61static void sdp_write_header(char *buff, int size, struct sdp_session_level *s)
62{
63    av_strlcatf(buff, size, "v=%d\r\n"
64                            "o=- %d %d IN IP4 %s\r\n"
65                            "s=%s\r\n",
66                            s->sdp_version,
67                            s->id, s->version, s->src_addr,
68                            s->name);
69    sdp_write_address(buff, size, s->dst_addr, s->ttl);
70    av_strlcatf(buff, size, "t=%d %d\r\n"
71                            "a=tool:libavformat " AV_STRINGIFY(LIBAVFORMAT_VERSION) "\r\n",
72                            s->start_time, s->end_time);
73}
74
75#if CONFIG_NETWORK
76static void resolve_destination(char *dest_addr, int size)
77{
78    struct addrinfo hints, *ai, *cur;
79
80    if (!dest_addr[0])
81        return;
82
83    /* Resolve the destination, since it must be written
84     * as a numeric IP address in the SDP. */
85
86    memset(&hints, 0, sizeof(hints));
87    /* We only support IPv4 addresses in the SDP at the moment. */
88    hints.ai_family = AF_INET;
89    if (getaddrinfo(dest_addr, NULL, &hints, &ai))
90        return;
91    for (cur = ai; cur; cur = cur->ai_next) {
92        if (cur->ai_family == AF_INET) {
93            getnameinfo(cur->ai_addr, cur->ai_addrlen, dest_addr, size,
94                        NULL, 0, NI_NUMERICHOST);
95            break;
96        }
97    }
98    freeaddrinfo(ai);
99}
100#else
101static void resolve_destination(char *dest_addr, int size)
102{
103}
104#endif
105
106static int sdp_get_address(char *dest_addr, int size, int *ttl, const char *url)
107{
108    int port;
109    const char *p;
110    char proto[32];
111
112    ff_url_split(proto, sizeof(proto), NULL, 0, dest_addr, size, &port, NULL, 0, url);
113
114    *ttl = 0;
115
116    if (strcmp(proto, "rtp")) {
117        /* The url isn't for the actual rtp sessions,
118         * don't parse out anything else than the destination.
119         */
120        return 0;
121    }
122
123    p = strchr(url, '?');
124    if (p) {
125        char buff[64];
126        int is_multicast = find_info_tag(buff, sizeof(buff), "multicast", p);
127
128        if (is_multicast) {
129            if (find_info_tag(buff, sizeof(buff), "ttl", p)) {
130                *ttl = strtol(buff, NULL, 10);
131            } else {
132                *ttl = 5;
133            }
134        }
135    }
136
137    return port;
138}
139
140#define MAX_PSET_SIZE 1024
141static char *extradata2psets(AVCodecContext *c)
142{
143    char *psets, *p;
144    const uint8_t *r;
145    const char *pset_string = "; sprop-parameter-sets=";
146
147    if (c->extradata_size > MAX_EXTRADATA_SIZE) {
148        av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
149
150        return NULL;
151    }
152
153    psets = av_mallocz(MAX_PSET_SIZE);
154    if (psets == NULL) {
155        av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the parameter sets.\n");
156        return NULL;
157    }
158    memcpy(psets, pset_string, strlen(pset_string));
159    p = psets + strlen(pset_string);
160    r = ff_avc_find_startcode(c->extradata, c->extradata + c->extradata_size);
161    while (r < c->extradata + c->extradata_size) {
162        const uint8_t *r1;
163        uint8_t nal_type;
164
165        while (!*(r++));
166        nal_type = *r & 0x1f;
167        r1 = ff_avc_find_startcode(r, c->extradata + c->extradata_size);
168        if (nal_type != 7 && nal_type != 8) { /* Only output SPS and PPS */
169            r = r1;
170            continue;
171        }
172        if (p != (psets + strlen(pset_string))) {
173            *p = ',';
174            p++;
175        }
176        if (av_base64_encode(p, MAX_PSET_SIZE - (p - psets), r, r1 - r) == NULL) {
177            av_log(c, AV_LOG_ERROR, "Cannot Base64-encode %td %td!\n", MAX_PSET_SIZE - (p - psets), r1 - r);
178            av_free(psets);
179
180            return NULL;
181        }
182        p += strlen(p);
183        r = r1;
184    }
185
186    return psets;
187}
188
189static char *extradata2config(AVCodecContext *c)
190{
191    char *config;
192
193    if (c->extradata_size > MAX_EXTRADATA_SIZE) {
194        av_log(c, AV_LOG_ERROR, "Too much extradata!\n");
195
196        return NULL;
197    }
198    config = av_malloc(10 + c->extradata_size * 2);
199    if (config == NULL) {
200        av_log(c, AV_LOG_ERROR, "Cannot allocate memory for the config info.\n");
201        return NULL;
202    }
203    memcpy(config, "; config=", 9);
204    ff_data_to_hex(config + 9, c->extradata, c->extradata_size, 0);
205    config[9 + c->extradata_size * 2] = 0;
206
207    return config;
208}
209
210static char *sdp_write_media_attributes(char *buff, int size, AVCodecContext *c, int payload_type)
211{
212    char *config = NULL;
213
214    switch (c->codec_id) {
215        case CODEC_ID_H264:
216            if (c->extradata_size) {
217                config = extradata2psets(c);
218            }
219            av_strlcatf(buff, size, "a=rtpmap:%d H264/90000\r\n"
220                                    "a=fmtp:%d packetization-mode=1%s\r\n",
221                                     payload_type,
222                                     payload_type, config ? config : "");
223            break;
224        case CODEC_ID_H263:
225        case CODEC_ID_H263P:
226            av_strlcatf(buff, size, "a=rtpmap:%d H263-2000/90000\r\n", payload_type);
227            break;
228        case CODEC_ID_MPEG4:
229            if (c->extradata_size) {
230                config = extradata2config(c);
231            }
232            av_strlcatf(buff, size, "a=rtpmap:%d MP4V-ES/90000\r\n"
233                                    "a=fmtp:%d profile-level-id=1%s\r\n",
234                                     payload_type,
235                                     payload_type, config ? config : "");
236            break;
237        case CODEC_ID_AAC:
238            if (c->extradata_size) {
239                config = extradata2config(c);
240            } else {
241                /* FIXME: maybe we can forge config information based on the
242                 *        codec parameters...
243                 */
244                av_log(c, AV_LOG_ERROR, "AAC with no global headers is currently not supported.\n");
245                return NULL;
246            }
247            if (config == NULL) {
248                return NULL;
249            }
250            av_strlcatf(buff, size, "a=rtpmap:%d MPEG4-GENERIC/%d/%d\r\n"
251                                    "a=fmtp:%d profile-level-id=1;"
252                                    "mode=AAC-hbr;sizelength=13;indexlength=3;"
253                                    "indexdeltalength=3%s\r\n",
254                                     payload_type, c->sample_rate, c->channels,
255                                     payload_type, config);
256            break;
257        case CODEC_ID_PCM_S16BE:
258            if (payload_type >= RTP_PT_PRIVATE)
259                av_strlcatf(buff, size, "a=rtpmap:%d L16/%d/%d\r\n",
260                                         payload_type,
261                                         c->sample_rate, c->channels);
262            break;
263        case CODEC_ID_PCM_MULAW:
264            if (payload_type >= RTP_PT_PRIVATE)
265                av_strlcatf(buff, size, "a=rtpmap:%d PCMU/%d/%d\r\n",
266                                         payload_type,
267                                         c->sample_rate, c->channels);
268            break;
269        case CODEC_ID_PCM_ALAW:
270            if (payload_type >= RTP_PT_PRIVATE)
271                av_strlcatf(buff, size, "a=rtpmap:%d PCMA/%d/%d\r\n",
272                                         payload_type,
273                                         c->sample_rate, c->channels);
274            break;
275        case CODEC_ID_AMR_NB:
276            av_strlcatf(buff, size, "a=rtpmap:%d AMR/%d/%d\r\n"
277                                    "a=fmtp:%d octet-align=1\r\n",
278                                     payload_type, c->sample_rate, c->channels,
279                                     payload_type);
280            break;
281        case CODEC_ID_AMR_WB:
282            av_strlcatf(buff, size, "a=rtpmap:%d AMR-WB/%d/%d\r\n"
283                                    "a=fmtp:%d octet-align=1\r\n",
284                                     payload_type, c->sample_rate, c->channels,
285                                     payload_type);
286            break;
287        default:
288            /* Nothing special to do here... */
289            break;
290    }
291
292    av_free(config);
293
294    return buff;
295}
296
297void ff_sdp_write_media(char *buff, int size, AVCodecContext *c, const char *dest_addr, int port, int ttl)
298{
299    const char *type;
300    int payload_type;
301
302    payload_type = ff_rtp_get_payload_type(c);
303    if (payload_type < 0) {
304        payload_type = RTP_PT_PRIVATE + (c->codec_type == AVMEDIA_TYPE_AUDIO);
305    }
306
307    switch (c->codec_type) {
308        case AVMEDIA_TYPE_VIDEO   : type = "video"      ; break;
309        case AVMEDIA_TYPE_AUDIO   : type = "audio"      ; break;
310        case AVMEDIA_TYPE_SUBTITLE: type = "text"       ; break;
311        default                 : type = "application"; break;
312    }
313
314    av_strlcatf(buff, size, "m=%s %d RTP/AVP %d\r\n", type, port, payload_type);
315    sdp_write_address(buff, size, dest_addr, ttl);
316    if (c->bit_rate) {
317        av_strlcatf(buff, size, "b=AS:%d\r\n", c->bit_rate / 1000);
318    }
319
320    sdp_write_media_attributes(buff, size, c, payload_type);
321}
322
323int avf_sdp_create(AVFormatContext *ac[], int n_files, char *buff, int size)
324{
325    AVMetadataTag *title = av_metadata_get(ac[0]->metadata, "title", NULL, 0);
326    struct sdp_session_level s;
327    int i, j, port, ttl;
328    char dst[32];
329
330    memset(buff, 0, size);
331    memset(&s, 0, sizeof(struct sdp_session_level));
332    s.user = "-";
333    s.src_addr = "127.0.0.1";    /* FIXME: Properly set this */
334    s.name = title ? title->value : "No Name";
335
336    port = 0;
337    ttl = 0;
338    if (n_files == 1) {
339        port = sdp_get_address(dst, sizeof(dst), &ttl, ac[0]->filename);
340        resolve_destination(dst, sizeof(dst));
341        if (dst[0]) {
342            s.dst_addr = dst;
343            s.ttl = ttl;
344        }
345    }
346    sdp_write_header(buff, size, &s);
347
348    dst[0] = 0;
349    for (i = 0; i < n_files; i++) {
350        if (n_files != 1) {
351            port = sdp_get_address(dst, sizeof(dst), &ttl, ac[i]->filename);
352            resolve_destination(dst, sizeof(dst));
353        }
354        for (j = 0; j < ac[i]->nb_streams; j++) {
355            ff_sdp_write_media(buff, size,
356                                  ac[i]->streams[j]->codec, dst[0] ? dst : NULL,
357                                  (port > 0) ? port + j * 2 : 0, ttl);
358            if (port <= 0) {
359                av_strlcatf(buff, size,
360                                   "a=control:streamid=%d\r\n", i + j);
361            }
362        }
363    }
364
365    return 0;
366}
367#else
368int avf_sdp_create(AVFormatContext *ac[], int n_files, char *buff, int size)
369{
370    return AVERROR(ENOSYS);
371}
372
373void ff_sdp_write_media(char *buff, int size, AVCodecContext *c,
374                        const char *dest_addr, int port, int ttl)
375{
376}
377#endif
378