synfig-core/trunk/src/modules/mod_libavcodec/libavformat/rtpproto.c

   1 /*
   2  * RTP network protocol
   3  * Copyright (c) 2002 Fabrice Bellard.
   4  *
   5  * This library is free software; you can redistribute it and/or
   6  * modify it under the terms of the GNU Lesser General Public
   7  * License as published by the Free Software Foundation; either
   8  * version 2 of the License, or (at your option) any later version.
   9  *
  10  * This library is distributed in the hope that it will be useful,
  11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  13  * Lesser General Public License for more details.
  14  *
  15  * You should have received a copy of the GNU Lesser General Public
  16  * License along with this library; if not, write to the Free Software
  17  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  18  */
  19 #include "avformat.h"
  20
  21 #include <unistd.h>
  22 #include <stdarg.h>
  23 #include <sys/types.h>
  24 #include <sys/socket.h>
  25 #include <netinet/in.h>
  26 #ifndef __BEOS__
  27 # include <arpa/inet.h>
  28 #else
  29 # include "barpainet.h"
  30 #endif
  31 #include <netdb.h>
  32 #include <fcntl.h>
  33
  34 #define RTP_TX_BUF_SIZE  (64 * 1024)
  35 #define RTP_RX_BUF_SIZE  (128 * 1024)
  36
  37 typedef struct RTPContext {
  38     URLContext *rtp_hd, *rtcp_hd;
  39     int rtp_fd, rtcp_fd;
  40 } RTPContext;
  41
  42 /**
  43  * If no filename is given to av_open_input_file because you want to
  44  * get the local port first, then you must call this function to set
  45  * the remote server address.
  46  *
  47  * @param s1 media file context
  48  * @param uri of the remote server
  49  * @return zero if no error.
  50  */
  51 int rtp_set_remote_url(URLContext *h, const char *uri)
  52 {
  53     RTPContext *s = h->priv_data;
  54     char hostname[256];
  55     int port;
  56
  57     char buf[1024];
  58     char path[1024];
  59
  60     url_split(NULL, 0, hostname, sizeof(hostname), &port,
  61               path, sizeof(path), uri);
  62
  63     snprintf(buf, sizeof(buf), "udp://%s:%d%s", hostname, port, path);
  64     udp_set_remote_url(s->rtp_hd, buf);
  65
  66     snprintf(buf, sizeof(buf), "udp://%s:%d%s", hostname, port + 1, path);
  67     udp_set_remote_url(s->rtcp_hd, buf);
  68     return 0;
  69 }
  70
  71
  72 /* add option to url of the form:
  73    "http://host:port/path?option1=val1&option2=val2... */
  74 static void url_add_option(char *buf, int buf_size, const char *fmt, ...)
  75 {
  76     char buf1[1024];
  77     va_list ap;
  78
  79     va_start(ap, fmt);
  80     if (strchr(buf, '?'))
  81         pstrcat(buf, buf_size, "&");
  82     else
  83         pstrcat(buf, buf_size, "?");
  84     vsnprintf(buf1, sizeof(buf1), fmt, ap);
  85     pstrcat(buf, buf_size, buf1);
  86     va_end(ap);
  87 }
  88
  89 static void build_udp_url(char *buf, int buf_size,
  90                           const char *hostname, int port,
  91                           int local_port, int multicast, int ttl)
  92 {
  93     snprintf(buf, buf_size, "udp://%s:%d", hostname, port);
  94     if (local_port >= 0)
  95         url_add_option(buf, buf_size, "localport=%d", local_port);
  96     if (multicast)
  97         url_add_option(buf, buf_size, "multicast=1", multicast);
  98     if (ttl >= 0)
  99         url_add_option(buf, buf_size, "ttl=%d", ttl);
 100 }
 101
 102 /*
 103  * url syntax: rtp://host:port[?option=val...]
 104  * option: 'multicast=1' : enable multicast
 105  *         'ttl=n'       : set the ttl value (for multicast only)
 106  *         'localport=n' : set the local port to n
 107  *
 108  */
 109 static int rtp_open(URLContext *h, const char *uri, int flags)
 110 {
 111     RTPContext *s;
 112     int port, is_output, is_multicast, ttl, local_port;
 113     char hostname[256];
 114     char buf[1024];
 115     char path[1024];
 116     const char *p;
 117
 118     is_output = (flags & URL_WRONLY);
 119
 120     s = av_mallocz(sizeof(RTPContext));
 121     if (!s)
 122         return -ENOMEM;
 123     h->priv_data = s;
 124
 125     url_split(NULL, 0, hostname, sizeof(hostname), &port,
 126               path, sizeof(path), uri);
 127     /* extract parameters */
 128     is_multicast = 0;
 129     ttl = -1;
 130     local_port = -1;
 131     p = strchr(uri, '?');
 132     if (p) {
 133         is_multicast = find_info_tag(buf, sizeof(buf), "multicast", p);
 134         if (find_info_tag(buf, sizeof(buf), "ttl", p)) {
 135             ttl = strtol(buf, NULL, 10);
 136         }
 137         if (find_info_tag(buf, sizeof(buf), "localport", p)) {
 138             local_port = strtol(buf, NULL, 10);
 139         }
 140     }
 141
 142     build_udp_url(buf, sizeof(buf),
 143                   hostname, port, local_port, is_multicast, ttl);
 144     if (url_open(&s->rtp_hd, buf, flags) < 0)
 145         goto fail;
 146     local_port = udp_get_local_port(s->rtp_hd);
 147     /* XXX: need to open another connexion if the port is not even */
 148
 149     /* well, should suppress localport in path */
 150
 151     build_udp_url(buf, sizeof(buf),
 152                   hostname, port + 1, local_port + 1, is_multicast, ttl);
 153     if (url_open(&s->rtcp_hd, buf, flags) < 0)
 154         goto fail;
 155
 156     /* just to ease handle access. XXX: need to suppress direct handle
 157        access */
 158     s->rtp_fd = udp_get_file_handle(s->rtp_hd);
 159     s->rtcp_fd = udp_get_file_handle(s->rtcp_hd);
 160
 161     h->max_packet_size = url_get_max_packet_size(s->rtp_hd);
 162     h->is_streamed = 1;
 163     return 0;
 164
 165  fail:
 166     if (s->rtp_hd)
 167         url_close(s->rtp_hd);
 168     if (s->rtcp_hd)
 169         url_close(s->rtcp_hd);
 170     av_free(s);
 171     return -EIO;
 172 }
 173
 174 static int rtp_read(URLContext *h, uint8_t *buf, int size)
 175 {
 176     RTPContext *s = h->priv_data;
 177     struct sockaddr_in from;
 178     int from_len, len, fd_max, n;
 179     fd_set rfds;
 180 #if 0
 181     for(;;) {
 182         from_len = sizeof(from);
 183         len = recvfrom (s->rtp_fd, buf, size, 0,
 184                         (struct sockaddr *)&from, &from_len);
 185         if (len < 0) {
 186             if (errno == EAGAIN || errno == EINTR)
 187                 continue;
 188             return -EIO;
 189         }
 190         break;
 191     }
 192 #else
 193     for(;;) {
 194         /* build fdset to listen to RTP and RTCP packets */
 195         FD_ZERO(&rfds);
 196         fd_max = s->rtp_fd;
 197         FD_SET(s->rtp_fd, &rfds);
 198         if (s->rtcp_fd > fd_max)
 199             fd_max = s->rtcp_fd;
 200         FD_SET(s->rtcp_fd, &rfds);
 201         n = select(fd_max + 1, &rfds, NULL, NULL, NULL);
 202         if (n > 0) {
 203             /* first try RTCP */
 204             if (FD_ISSET(s->rtcp_fd, &rfds)) {
 205                 from_len = sizeof(from);
 206                 len = recvfrom (s->rtcp_fd, buf, size, 0,
 207                                 (struct sockaddr *)&from, &from_len);
 208                 if (len < 0) {
 209                     if (errno == EAGAIN || errno == EINTR)
 210                         continue;
 211                     return -EIO;
 212                 }
 213                 break;
 214             }
 215             /* then RTP */
 216             if (FD_ISSET(s->rtp_fd, &rfds)) {
 217                 from_len = sizeof(from);
 218                 len = recvfrom (s->rtp_fd, buf, size, 0,
 219                                 (struct sockaddr *)&from, &from_len);
 220                 if (len < 0) {
 221                     if (errno == EAGAIN || errno == EINTR)
 222                         continue;
 223                     return -EIO;
 224                 }
 225                 break;
 226             }
 227         }
 228     }
 229 #endif
 230     return len;
 231 }
 232
 233 static int rtp_write(URLContext *h, uint8_t *buf, int size)
 234 {
 235     RTPContext *s = h->priv_data;
 236     int ret;
 237     URLContext *hd;
 238
 239     if (buf[1] >= 200 && buf[1] <= 204) {
 240         /* RTCP payload type */
 241         hd = s->rtcp_hd;
 242     } else {
 243         /* RTP payload type */
 244         hd = s->rtp_hd;
 245     }
 246
 247     ret = url_write(hd, buf, size);
 248 #if 0
 249     {
 250         struct timespec ts;
 251         ts.tv_sec = 0;
 252         ts.tv_nsec = 10 * 1000000;
 253         nanosleep(&ts, NULL);
 254     }
 255 #endif
 256     return ret;
 257 }
 258
 259 static int rtp_close(URLContext *h)
 260 {
 261     RTPContext *s = h->priv_data;
 262
 263     url_close(s->rtp_hd);
 264     url_close(s->rtcp_hd);
 265     av_free(s);
 266     return 0;
 267 }
 268
 269 /**
 270  * Return the local port used by the RTP connexion
 271  * @param s1 media file context
 272  * @return the local port number
 273  */
 274 int rtp_get_local_port(URLContext *h)
 275 {
 276     RTPContext *s = h->priv_data;
 277     return udp_get_local_port(s->rtp_hd);
 278 }
 279
 280 /**
 281  * Return the rtp and rtcp file handles for select() usage to wait for several RTP
 282  * streams at the same time.
 283  * @param h media file context
 284  */
 285 void rtp_get_file_handles(URLContext *h, int *prtp_fd, int *prtcp_fd)
 286 {
 287     RTPContext *s = h->priv_data;
 288
 289     *prtp_fd = s->rtp_fd;
 290     *prtcp_fd = s->rtcp_fd;
 291 }
 292
 293 URLProtocol rtp_protocol = {
 294     "rtp",
 295     rtp_open,
 296     rtp_read,
 297     rtp_write,
 298     NULL, /* seek */
 299     rtp_close,
 300 };