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

   1 /*
   2  * UDP prototype streaming system
   3  * Copyright (c) 2000, 2001, 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 #include <unistd.h>
  21 #include <sys/types.h>
  22 #include <sys/socket.h>
  23 #include <netinet/in.h>
  24 #ifndef __BEOS__
  25 # include <arpa/inet.h>
  26 #else
  27 # include "barpainet.h"
  28 #endif
  29 #include <netdb.h>
  30
  31 typedef struct {
  32     int udp_fd;
  33     int ttl;
  34     int is_multicast;
  35     int local_port;
  36     struct ip_mreq mreq;
  37     struct sockaddr_in dest_addr;
  38 } UDPContext;
  39
  40 #define UDP_TX_BUF_SIZE 32768
  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  * url syntax: udp://host:port[?option=val...]
  48  * option: 'multicast=1' : enable multicast
  49  *         'ttl=n'       : set the ttl value (for multicast only)
  50  *         'localport=n' : set the local port
  51  *         'pkt_size=n'  : set max packet size
  52  *
  53  * @param s1 media file context
  54  * @param uri of the remote server
  55  * @return zero if no error.
  56  */
  57 int udp_set_remote_url(URLContext *h, const char *uri)
  58 {
  59     UDPContext *s = h->priv_data;
  60     char hostname[256];
  61     int port;
  62
  63     url_split(NULL, 0, hostname, sizeof(hostname), &port, NULL, 0, uri);
  64
  65     /* set the destination address */
  66     if (resolve_host(&s->dest_addr.sin_addr, hostname) < 0)
  67         return -EIO;
  68     s->dest_addr.sin_family = AF_INET;
  69     s->dest_addr.sin_port = htons(port);
  70     return 0;
  71 }
  72
  73 /**
  74  * Return the local port used by the UDP connexion
  75  * @param s1 media file context
  76  * @return the local port number
  77  */
  78 int udp_get_local_port(URLContext *h)
  79 {
  80     UDPContext *s = h->priv_data;
  81     return s->local_port;
  82 }
  83
  84 /**
  85  * Return the udp file handle for select() usage to wait for several RTP
  86  * streams at the same time.
  87  * @param h media file context
  88  */
  89 int udp_get_file_handle(URLContext *h)
  90 {
  91     UDPContext *s = h->priv_data;
  92     return s->udp_fd;
  93 }
  94
  95 /* put it in UDP context */
  96 /* return non zero if error */
  97 static int udp_open(URLContext *h, const char *uri, int flags)
  98 {
  99     struct sockaddr_in my_addr, my_addr1;
 100     char hostname[1024];
 101     int port, udp_fd = -1, tmp;
 102     UDPContext *s = NULL;
 103     int is_output, len;
 104     const char *p;
 105     char buf[256];
 106
 107     h->is_streamed = 1;
 108     h->max_packet_size = 1472;
 109
 110     is_output = (flags & URL_WRONLY);
 111
 112     s = av_malloc(sizeof(UDPContext));
 113     if (!s)
 114         return -ENOMEM;
 115
 116     h->priv_data = s;
 117     s->ttl = 16;
 118     s->is_multicast = 0;
 119     s->local_port = 0;
 120     p = strchr(uri, '?');
 121     if (p) {
 122         s->is_multicast = find_info_tag(buf, sizeof(buf), "multicast", p);
 123         if (find_info_tag(buf, sizeof(buf), "ttl", p)) {
 124             s->ttl = strtol(buf, NULL, 10);
 125         }
 126         if (find_info_tag(buf, sizeof(buf), "localport", p)) {
 127             s->local_port = strtol(buf, NULL, 10);
 128         }
 129         if (find_info_tag(buf, sizeof(buf), "pkt_size", p)) {
 130             h->max_packet_size = strtol(buf, NULL, 10);
 131         }
 132     }
 133
 134     /* fill the dest addr */
 135     url_split(NULL, 0, hostname, sizeof(hostname), &port, NULL, 0, uri);
 136
 137     /* XXX: fix url_split */
 138     if (hostname[0] == '\0' || hostname[0] == '?') {
 139         /* only accepts null hostname if input */
 140         if (s->is_multicast || (flags & URL_WRONLY))
 141             goto fail;
 142     } else {
 143         udp_set_remote_url(h, uri);
 144     }
 145
 146     udp_fd = socket(PF_INET, SOCK_DGRAM, 0);
 147     if (udp_fd < 0)
 148         goto fail;
 149
 150     my_addr.sin_family = AF_INET;
 151     my_addr.sin_addr.s_addr = htonl (INADDR_ANY);
 152     if (s->is_multicast && !(h->flags & URL_WRONLY)) {
 153         /* special case: the bind must be done on the multicast address port */
 154         my_addr.sin_port = s->dest_addr.sin_port;
 155     } else {
 156         my_addr.sin_port = htons(s->local_port);
 157     }
 158
 159     /* the bind is needed to give a port to the socket now */
 160     if (bind(udp_fd,(struct sockaddr *)&my_addr, sizeof(my_addr)) < 0)
 161         goto fail;
 162
 163     len = sizeof(my_addr1);
 164     getsockname(udp_fd, (struct sockaddr *)&my_addr1, &len);
 165     s->local_port = ntohs(my_addr1.sin_port);
 166
 167 #ifndef CONFIG_BEOS_NETSERVER
 168     if (s->is_multicast) {
 169         if (h->flags & URL_WRONLY) {
 170             /* output */
 171             if (setsockopt(udp_fd, IPPROTO_IP, IP_MULTICAST_TTL,
 172                            &s->ttl, sizeof(s->ttl)) < 0) {
 173                 perror("IP_MULTICAST_TTL");
 174                 goto fail;
 175             }
 176         } else {
 177             /* input */
 178             memset(&s->mreq, 0, sizeof(s->mreq));
 179             s->mreq.imr_multiaddr = s->dest_addr.sin_addr;
 180             s->mreq.imr_interface.s_addr = htonl (INADDR_ANY);
 181             if (setsockopt(udp_fd, IPPROTO_IP, IP_ADD_MEMBERSHIP,
 182                            &s->mreq, sizeof(s->mreq)) < 0) {
 183                 perror("rtp: IP_ADD_MEMBERSHIP");
 184                 goto fail;
 185             }
 186         }
 187     }
 188 #endif
 189
 190     if (is_output) {
 191         /* limit the tx buf size to limit latency */
 192         tmp = UDP_TX_BUF_SIZE;
 193         if (setsockopt(udp_fd, SOL_SOCKET, SO_SNDBUF, &tmp, sizeof(tmp)) < 0) {
 194             perror("setsockopt sndbuf");
 195             goto fail;
 196         }
 197     }
 198
 199     s->udp_fd = udp_fd;
 200     return 0;
 201  fail:
 202     if (udp_fd >= 0)
 203 #ifdef CONFIG_BEOS_NETSERVER
 204         closesocket(udp_fd);
 205 #else
 206         close(udp_fd);
 207 #endif
 208     av_free(s);
 209     return -EIO;
 210 }
 211
 212 static int udp_read(URLContext *h, uint8_t *buf, int size)
 213 {
 214     UDPContext *s = h->priv_data;
 215     struct sockaddr_in from;
 216     int from_len, len;
 217
 218     for(;;) {
 219         from_len = sizeof(from);
 220         len = recvfrom (s->udp_fd, buf, size, 0,
 221                         (struct sockaddr *)&from, &from_len);
 222         if (len < 0) {
 223             if (errno != EAGAIN && errno != EINTR)
 224                 return -EIO;
 225         } else {
 226             break;
 227         }
 228     }
 229     return len;
 230 }
 231
 232 static int udp_write(URLContext *h, uint8_t *buf, int size)
 233 {
 234     UDPContext *s = h->priv_data;
 235     int ret;
 236
 237     for(;;) {
 238         ret = sendto (s->udp_fd, buf, size, 0,
 239                       (struct sockaddr *) &s->dest_addr,
 240                       sizeof (s->dest_addr));
 241         if (ret < 0) {
 242             if (errno != EINTR && errno != EAGAIN)
 243                 return -EIO;
 244         } else {
 245             break;
 246         }
 247     }
 248     return size;
 249 }
 250
 251 static int udp_close(URLContext *h)
 252 {
 253     UDPContext *s = h->priv_data;
 254
 255 #ifndef CONFIG_BEOS_NETSERVER
 256     if (s->is_multicast && !(h->flags & URL_WRONLY)) {
 257         if (setsockopt(s->udp_fd, IPPROTO_IP, IP_DROP_MEMBERSHIP,
 258                        &s->mreq, sizeof(s->mreq)) < 0) {
 259             perror("IP_DROP_MEMBERSHIP");
 260         }
 261     }
 262     close(s->udp_fd);
 263 #else
 264     closesocket(s->udp_fd);
 265 #endif
 266     av_free(s);
 267     return 0;
 268 }
 269
 270 URLProtocol udp_protocol = {
 271     "udp",
 272     udp_open,
 273     udp_read,
 274     udp_write,
 275     NULL, /* seek */
 276     udp_close,
 277 };