modules/access/udp.c

   1 /*****************************************************************************
   2  * udp.c: raw UDP input module
   3  *****************************************************************************
   4  * Copyright (C) 2001-2005 the VideoLAN team
   5  * Copyright (C) 2007 Remi Denis-Courmont
   6  * $Id$
   7  *
   8  * Authors: Christophe Massiot <massiot@via.ecp.fr>
   9  *          Tristan Leteurtre <tooney@via.ecp.fr>
  10  *          Laurent Aimar <fenrir@via.ecp.fr>
  11  *          Jean-Paul Saman <jpsaman #_at_# m2x dot nl>
  12  *          Remi Denis-Courmont
  13  *
  14  * Reviewed: 23 October 2003, Jean-Paul Saman <jpsaman _at_ videolan _dot_ org>
  15  *
  16  * This program is free software; you can redistribute it and/or modify
  17  * it under the terms of the GNU General Public License as published by
  18  * the Free Software Foundation; either version 2 of the License, or
  19  * (at your option) any later version.
  20  *
  21  * This program is distributed in the hope that it will be useful,
  22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24  * GNU General Public License for more details.
  25  *
  26  * You should have received a copy of the GNU General Public License along
  27  * with this program; if not, write to the Free Software Foundation, Inc.,
  28  * 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  29  *****************************************************************************/
  30
  31 /*****************************************************************************
  32  * Preamble
  33  *****************************************************************************/
  34
  35 #ifdef HAVE_CONFIG_H
  36 # include "config.h"
  37 #endif
  38
  39 #include <vlc_common.h>
  40 #include <vlc_plugin.h>
  41 #include <vlc_access.h>
  42 #include <vlc_network.h>
  43
  44 #define MTU 65535
  45
  46 /*****************************************************************************
  47  * Module descriptor
  48  *****************************************************************************/
  49 #define CACHING_TEXT N_("Caching value in ms")
  50 #define CACHING_LONGTEXT N_( \
  51     "Caching value for UDP streams. This " \
  52     "value should be set in milliseconds." )
  53
  54 static int  Open ( vlc_object_t * );
  55 static void Close( vlc_object_t * );
  56
  57 vlc_module_begin ()
  58     set_shortname( N_("UDP" ) )
  59     set_description( N_("UDP input") )
  60     set_category( CAT_INPUT )
  61     set_subcategory( SUBCAT_INPUT_ACCESS )
  62
  63     add_integer( "udp-caching", DEFAULT_PTS_DELAY / 1000, CACHING_TEXT,
  64                  CACHING_LONGTEXT, true )
  65         change_safe()
  66
  67     set_capability( "access", 0 )
  68     add_shortcut( "udp", "udpstream", "udp4", "udp6" )
  69
  70     set_callbacks( Open, Close )
  71 vlc_module_end ()
  72
  73 /*****************************************************************************
  74  * Local prototypes
  75  *****************************************************************************/
  76 #define RTP_HEADER_LEN 12
  77
  78 static block_t *BlockUDP( access_t * );
  79 static int Control( access_t *, int, va_list );
  80
  81 /*****************************************************************************
  82  * Open: open the socket
  83  *****************************************************************************/
  84 static int Open( vlc_object_t *p_this )
  85 {
  86     access_t     *p_access = (access_t*)p_this;
  87
  88     char *psz_name = strdup( p_access->psz_location );
  89     char *psz_parser;
  90     const char *psz_server_addr, *psz_bind_addr = "";
  91     int  i_bind_port, i_server_port = 0;
  92     int fam = AF_UNSPEC;
  93     int fd;
  94
  95     /* Set up p_access */
  96     access_InitFields( p_access );
  97     ACCESS_SET_CALLBACKS( NULL, BlockUDP, Control, NULL );
  98
  99     if (strlen (p_access->psz_access) > 0)
 100     {
 101         switch (p_access->psz_access[strlen (p_access->psz_access) - 1])
 102         {
 103             case '4':
 104                 fam = AF_INET;
 105                 break;
 106
 107             case '6':
 108                 fam = AF_INET6;
 109                 break;
 110         }
 111     }
 112
 113     i_bind_port = var_InheritInteger( p_access, "server-port" );
 114
 115     /* Parse psz_name syntax :
 116      * [serveraddr[:serverport]][@[bindaddr]:[bindport]] */
 117     psz_parser = strchr( psz_name, '@' );
 118     if( psz_parser != NULL )
 119     {
 120         /* Found bind address and/or bind port */
 121         *psz_parser++ = '\0';
 122         psz_bind_addr = psz_parser;
 123
 124         if( psz_bind_addr[0] == '[' )
 125             /* skips bracket'd IPv6 address */
 126             psz_parser = strchr( psz_parser, ']' );
 127
 128         if( psz_parser != NULL )
 129         {
 130             psz_parser = strchr( psz_parser, ':' );
 131             if( psz_parser != NULL )
 132             {
 133                 *psz_parser++ = '\0';
 134                 i_bind_port = atoi( psz_parser );
 135             }
 136         }
 137     }
 138
 139     psz_server_addr = psz_name;
 140     psz_parser = ( psz_server_addr[0] == '[' )
 141         ? strchr( psz_name, ']' ) /* skips bracket'd IPv6 address */
 142         : psz_name;
 143
 144     if( psz_parser != NULL )
 145     {
 146         psz_parser = strchr( psz_parser, ':' );
 147         if( psz_parser != NULL )
 148         {
 149             *psz_parser++ = '\0';
 150             i_server_port = atoi( psz_parser );
 151         }
 152     }
 153
 154     msg_Dbg( p_access, "opening server=%s:%d local=%s:%d",
 155              psz_server_addr, i_server_port, psz_bind_addr, i_bind_port );
 156
 157     fd = net_OpenDgram( p_access, psz_bind_addr, i_bind_port,
 158                         psz_server_addr, i_server_port, fam, IPPROTO_UDP );
 159     free (psz_name);
 160     if( fd == -1 )
 161     {
 162         msg_Err( p_access, "cannot open socket" );
 163         return VLC_EGENERIC;
 164     }
 165     p_access->p_sys = (void *)(intptr_t)fd;
 166
 167     /* Update default_pts to a suitable value for udp access */
 168     var_Create( p_access, "udp-caching", VLC_VAR_INTEGER | VLC_VAR_DOINHERIT );
 169     return VLC_SUCCESS;
 170 }
 171
 172 /*****************************************************************************
 173  * Close: free unused data structures
 174  *****************************************************************************/
 175 static void Close( vlc_object_t *p_this )
 176 {
 177     access_t     *p_access = (access_t*)p_this;
 178
 179     net_Close( (intptr_t)p_access->p_sys );
 180 }
 181
 182 /*****************************************************************************
 183  * Control:
 184  *****************************************************************************/
 185 static int Control( access_t *p_access, int i_query, va_list args )
 186 {
 187     bool    *pb_bool;
 188     int64_t *pi_64;
 189
 190     switch( i_query )
 191     {
 192         /* */
 193         case ACCESS_CAN_SEEK:
 194         case ACCESS_CAN_FASTSEEK:
 195         case ACCESS_CAN_PAUSE:
 196         case ACCESS_CAN_CONTROL_PACE:
 197             pb_bool = (bool*)va_arg( args, bool* );
 198             *pb_bool = false;
 199             break;
 200         /* */
 201         case ACCESS_GET_PTS_DELAY:
 202             pi_64 = (int64_t*)va_arg( args, int64_t * );
 203             *pi_64 = var_GetInteger(p_access,"udp-caching") * 1000;
 204             break;
 205
 206         /* */
 207         case ACCESS_SET_PAUSE_STATE:
 208         case ACCESS_GET_TITLE_INFO:
 209         case ACCESS_SET_TITLE:
 210         case ACCESS_SET_SEEKPOINT:
 211         case ACCESS_SET_PRIVATE_ID_STATE:
 212         case ACCESS_GET_CONTENT_TYPE:
 213             return VLC_EGENERIC;
 214
 215         default:
 216             msg_Warn( p_access, "unimplemented query in control" );
 217             return VLC_EGENERIC;
 218
 219     }
 220     return VLC_SUCCESS;
 221 }
 222
 223 /*****************************************************************************
 224  * BlockUDP:
 225  *****************************************************************************/
 226 static block_t *BlockUDP( access_t *p_access )
 227 {
 228     access_sys_t *p_sys = p_access->p_sys;
 229     block_t      *p_block;
 230     ssize_t len;
 231
 232     if( p_access->info.b_eof )
 233         return NULL;
 234
 235     /* Read data */
 236     p_block = block_New( p_access, MTU );
 237     len = net_Read( p_access, (intptr_t)p_sys, NULL,
 238                     p_block->p_buffer, MTU, false );
 239     if( len < 0 )
 240     {
 241         block_Release( p_block );
 242         return NULL;
 243     }
 244
 245     return block_Realloc( p_block, 0, len );
 246 }