libavformat/tcp.c

   1 /*
   2  * TCP protocol
   3  * Copyright (c) 2002 Fabrice Bellard.
   4  *
   5  * This file is part of FFmpeg.
   6  *
   7  * FFmpeg is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * FFmpeg is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with FFmpeg; if not, write to the Free Software
  19  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
  20  */
  21 #include "avformat.h"
  22 #include <unistd.h>
  23 #include <sys/types.h>
  24 #include <sys/socket.h>
  25 #include <netinet/in.h>
  26 #include <arpa/inet.h>
  27 #include <netdb.h>
  28 #include <sys/time.h>
  29 #include <fcntl.h>
  30
  31 typedef struct TCPContext {
  32     int fd;
  33 } TCPContext;
  34
  35 /* resolve host with also IP address parsing */
  36 int resolve_host(struct in_addr *sin_addr, const char *hostname)
  37 {
  38     struct hostent *hp;
  39
  40     if ((inet_aton(hostname, sin_addr)) == 0) {
  41         hp = gethostbyname(hostname);
  42         if (!hp)
  43             return -1;
  44         memcpy (sin_addr, hp->h_addr, sizeof(struct in_addr));
  45     }
  46     return 0;
  47 }
  48
  49 /* return non zero if error */
  50 static int tcp_open(URLContext *h, const char *uri, int flags)
  51 {
  52     struct sockaddr_in dest_addr;
  53     char hostname[1024], *q;
  54     int port, fd = -1;
  55     TCPContext *s = NULL;
  56     fd_set wfds;
  57     int fd_max, ret;
  58     struct timeval tv;
  59     socklen_t optlen;
  60     char proto[1024],path[1024],tmp[1024];  // PETR: protocol and path strings
  61
  62     url_split(proto, sizeof(proto), NULL, 0, hostname, sizeof(hostname),
  63       &port, path, sizeof(path), uri);  // PETR: use url_split
  64     if (strcmp(proto,"tcp")) goto fail; // PETR: check protocol
  65     if ((q = strchr(hostname,'@'))) { strcpy(tmp,q+1); strcpy(hostname,tmp); } // PETR: take only the part after '@' for tcp protocol
  66
  67     s = av_malloc(sizeof(TCPContext));
  68     if (!s)
  69         return -ENOMEM;
  70     h->priv_data = s;
  71
  72     if (port <= 0 || port >= 65536)
  73         goto fail;
  74
  75     dest_addr.sin_family = AF_INET;
  76     dest_addr.sin_port = htons(port);
  77     if (resolve_host(&dest_addr.sin_addr, hostname) < 0)
  78         goto fail;
  79
  80     fd = socket(PF_INET, SOCK_STREAM, 0);
  81     if (fd < 0)
  82         goto fail;
  83     fcntl(fd, F_SETFL, O_NONBLOCK);
  84
  85  redo:
  86     ret = connect(fd, (struct sockaddr *)&dest_addr,
  87                   sizeof(dest_addr));
  88     if (ret < 0) {
  89         if (errno == EINTR)
  90             goto redo;
  91         if (errno != EINPROGRESS)
  92             goto fail;
  93
  94         /* wait until we are connected or until abort */
  95         for(;;) {
  96             if (url_interrupt_cb()) {
  97                 ret = -EINTR;
  98                 goto fail1;
  99             }
 100             fd_max = fd;
 101             FD_ZERO(&wfds);
 102             FD_SET(fd, &wfds);
 103             tv.tv_sec = 0;
 104             tv.tv_usec = 100 * 1000;
 105             ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
 106             if (ret > 0 && FD_ISSET(fd, &wfds))
 107                 break;
 108         }
 109
 110         /* test error */
 111         optlen = sizeof(ret);
 112         getsockopt (fd, SOL_SOCKET, SO_ERROR, &ret, &optlen);
 113         if (ret != 0)
 114             goto fail;
 115     }
 116     s->fd = fd;
 117     return 0;
 118
 119  fail:
 120     ret = AVERROR_IO;
 121  fail1:
 122     if (fd >= 0)
 123         closesocket(fd);
 124     av_free(s);
 125     return ret;
 126 }
 127
 128 static int tcp_read(URLContext *h, uint8_t *buf, int size)
 129 {
 130     TCPContext *s = h->priv_data;
 131     int len, fd_max, ret;
 132     fd_set rfds;
 133     struct timeval tv;
 134
 135     for (;;) {
 136         if (url_interrupt_cb())
 137             return -EINTR;
 138         fd_max = s->fd;
 139         FD_ZERO(&rfds);
 140         FD_SET(s->fd, &rfds);
 141         tv.tv_sec = 0;
 142         tv.tv_usec = 100 * 1000;
 143         ret = select(fd_max + 1, &rfds, NULL, NULL, &tv);
 144         if (ret > 0 && FD_ISSET(s->fd, &rfds)) {
 145             len = recv(s->fd, buf, size, 0);
 146             if (len < 0) {
 147                 if (errno != EINTR && errno != EAGAIN)
 148 #ifdef __BEOS__
 149                     return errno;
 150 #else
 151                     return -errno;
 152 #endif
 153             } else return len;
 154         } else if (ret < 0) {
 155             return -1;
 156         }
 157     }
 158 }
 159
 160 static int tcp_write(URLContext *h, uint8_t *buf, int size)
 161 {
 162     TCPContext *s = h->priv_data;
 163     int ret, size1, fd_max, len;
 164     fd_set wfds;
 165     struct timeval tv;
 166
 167     size1 = size;
 168     while (size > 0) {
 169         if (url_interrupt_cb())
 170             return -EINTR;
 171         fd_max = s->fd;
 172         FD_ZERO(&wfds);
 173         FD_SET(s->fd, &wfds);
 174         tv.tv_sec = 0;
 175         tv.tv_usec = 100 * 1000;
 176         ret = select(fd_max + 1, NULL, &wfds, NULL, &tv);
 177         if (ret > 0 && FD_ISSET(s->fd, &wfds)) {
 178             len = send(s->fd, buf, size, 0);
 179             if (len < 0) {
 180                 if (errno != EINTR && errno != EAGAIN) {
 181 #ifdef __BEOS__
 182                     return errno;
 183 #else
 184                     return -errno;
 185 #endif
 186                 }
 187                 continue;
 188             }
 189             size -= len;
 190             buf += len;
 191         } else if (ret < 0) {
 192             return -1;
 193         }
 194     }
 195     return size1 - size;
 196 }
 197
 198 static int tcp_close(URLContext *h)
 199 {
 200     TCPContext *s = h->priv_data;
 201     closesocket(s->fd);
 202     av_free(s);
 203     return 0;
 204 }
 205
 206 URLProtocol tcp_protocol = {
 207     "tcp",
 208     tcp_open,
 209     tcp_read,
 210     tcp_write,
 211     NULL, /* seek */
 212     tcp_close,
 213 };