git.sesse.net Git - vlc/blob - modules/access/live555.cpp

   1 /*****************************************************************************
   2  * live555.cpp : LIVE555 Streaming Media support.
   3  *****************************************************************************
   4  * Copyright (C) 2003-2007 VLC authors and VideoLAN
   5  * $Id$
   6  *
   7  * Authors: Laurent Aimar <fenrir@via.ecp.fr>
   8  *          Derk-Jan Hartman <hartman at videolan. org>
   9  *          Derk-Jan Hartman <djhartman at m2x .dot. nl> for M2X
  10  *          Sébastien Escudier <sebastien-devel celeos eu>
  11  *
  12  * This program is free software; you can redistribute it and/or modify it
  13  * under the terms of the GNU Lesser General Public License as published by
  14  * the Free Software Foundation; either version 2.1 of the License, or
  15  * (at your option) any later version.
  16  *
  17  * This program is distributed in the hope that it will be useful,
  18  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  19  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  20  * GNU Lesser General Public License for more details.
  21  *
  22  * You should have received a copy of the GNU Lesser General Public License
  23  * along with this program; if not, write to the Free Software Foundation,
  24  * Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
  25  *****************************************************************************/
  26
  27 /*****************************************************************************
  28  * Preamble
  29  *****************************************************************************/
  30
  31 /* For inttypes.h
  32  * Note: config.h may include inttypes.h, so make sure we define this option
  33  * early enough. */
  34 #define __STDC_CONSTANT_MACROS 1
  35 #define __STDC_LIMIT_MACROS 1
  36
  37 #ifdef HAVE_CONFIG_H
  38 # include "config.h"
  39 #endif
  40
  41 #include <inttypes.h>
  42
  43 #include <vlc_common.h>
  44 #include <vlc_plugin.h>
  45 #include <vlc_input.h>
  46 #include <vlc_demux.h>
  47 #include <vlc_dialog.h>
  48 #include <vlc_url.h>
  49 #include <vlc_strings.h>
  50
  51 #include <limits.h>
  52 #include <assert.h>
  53
  54
  55 #if defined( WIN32 )
  56 #   include <winsock2.h>
  57 #endif
  58
  59 #include <UsageEnvironment.hh>
  60 #include <BasicUsageEnvironment.hh>
  61 #include <GroupsockHelper.hh>
  62 #include <liveMedia.hh>
  63 #include <liveMedia_version.hh>
  64
  65 extern "C" {
  66 #include "../access/mms/asf.h"  /* Who said ugly ? */
  67 }
  68
  69 using namespace std;
  70
  71 /*****************************************************************************
  72  * Module descriptor
  73  *****************************************************************************/
  74 static int  Open ( vlc_object_t * );
  75 static void Close( vlc_object_t * );
  76
  77 #define KASENNA_TEXT N_( "Kasenna RTSP dialect")
  78 #define KASENNA_LONGTEXT N_( "Kasenna servers use an old and nonstandard " \
  79     "dialect of RTSP. With this parameter VLC will try this dialect, but "\
  80     "then it cannot connect to normal RTSP servers." )
  81
  82 #define WMSERVER_TEXT N_("WMServer RTSP dialect")
  83 #define WMSERVER_LONGTEXT N_("WMServer uses a nonstandard dialect " \
  84     "of RTSP. Selecting this parameter will tell VLC to assume some " \
  85     "options contrary to RFC 2326 guidelines.")
  86
  87 #define USER_TEXT N_("RTSP user name")
  88 #define USER_LONGTEXT N_("Sets the username for the connection, " \
  89     "if no username or password are set in the url.")
  90 #define PASS_TEXT N_("RTSP password")
  91 #define PASS_LONGTEXT N_("Sets the password for the connection, " \
  92     "if no username or password are set in the url.")
  93 #define FRAME_BUFFER_SIZE_TEXT N_("RTSP frame buffer size")
  94 #define FRAME_BUFFER_SIZE_LONGTEXT N_("RTSP start frame buffer size of the video " \
  95     "track, can be increased in case of broken pictures due " \
  96     "to too small buffer.")
  97 #define DEFAULT_FRAME_BUFFER_SIZE 100000
  98
  99 vlc_module_begin ()
 100     set_description( N_("RTP/RTSP/SDP demuxer (using Live555)" ) )
 101     set_capability( "demux", 50 )
 102     set_shortname( "RTP/RTSP")
 103     set_callbacks( Open, Close )
 104     add_shortcut( "live", "livedotcom" )
 105     set_category( CAT_INPUT )
 106     set_subcategory( SUBCAT_INPUT_DEMUX )
 107
 108     add_submodule ()
 109         set_description( N_("RTSP/RTP access and demux") )
 110         add_shortcut( "rtsp", "pnm", "live", "livedotcom" )
 111         set_capability( "access_demux", 0 )
 112         set_callbacks( Open, Close )
 113         add_bool( "rtsp-tcp", false,
 114                   N_("Use RTP over RTSP (TCP)"),
 115                   N_("Use RTP over RTSP (TCP)"), true )
 116             change_safe()
 117         add_integer( "rtp-client-port", -1,
 118                   N_("Client port"),
 119                   N_("Port to use for the RTP source of the session"), true )
 120         add_bool( "rtsp-mcast", false,
 121                   N_("Force multicast RTP via RTSP"),
 122                   N_("Force multicast RTP via RTSP"), true )
 123             change_safe()
 124         add_bool( "rtsp-http", false,
 125                   N_("Tunnel RTSP and RTP over HTTP"),
 126                   N_("Tunnel RTSP and RTP over HTTP"), true )
 127             change_safe()
 128         add_integer( "rtsp-http-port", 80,
 129                   N_("HTTP tunnel port"),
 130                   N_("Port to use for tunneling the RTSP/RTP over HTTP."),
 131                   true )
 132         add_bool(   "rtsp-kasenna", false, KASENNA_TEXT,
 133                     KASENNA_LONGTEXT, true )
 134             change_safe()
 135         add_bool(   "rtsp-wmserver", false, WMSERVER_TEXT,
 136                     WMSERVER_LONGTEXT, true)
 137             change_safe()
 138         add_string( "rtsp-user", NULL, USER_TEXT,
 139                     USER_LONGTEXT, true )
 140             change_safe()
 141         add_password( "rtsp-pwd", NULL, PASS_TEXT,
 142                       PASS_LONGTEXT, true )
 143         add_integer( "rtsp-frame-buffer-size", DEFAULT_FRAME_BUFFER_SIZE,
 144                      FRAME_BUFFER_SIZE_TEXT, FRAME_BUFFER_SIZE_LONGTEXT,
 145                      true )
 146 vlc_module_end ()
 147
 148
 149 /*****************************************************************************
 150  * Local prototypes
 151  *****************************************************************************/
 152
 153 typedef struct
 154 {
 155     demux_t         *p_demux;
 156     MediaSubsession *sub;
 157
 158     es_format_t     fmt;
 159     es_out_id_t     *p_es;
 160
 161     bool            b_muxed;
 162     bool            b_quicktime;
 163     bool            b_asf;
 164     block_t         *p_asf_block;
 165     bool            b_discard_trunc;
 166     stream_t        *p_out_muxed;    /* for muxed stream */
 167
 168     uint8_t         *p_buffer;
 169     unsigned int    i_buffer;
 170
 171     bool            b_rtcp_sync;
 172     char            waiting;
 173     int64_t         i_pts;
 174     double          f_npt;
 175
 176     bool            b_selected;
 177
 178 } live_track_t;
 179
 180 struct timeout_thread_t
 181 {
 182     demux_sys_t  *p_sys;
 183     vlc_thread_t handle;
 184     bool         b_handle_keep_alive;
 185 };
 186
 187 class RTSPClientVlc;
 188
 189 struct demux_sys_t
 190 {
 191     char            *p_sdp;    /* XXX mallocated */
 192     char            *psz_path; /* URL-encoded path */
 193     vlc_url_t       url;
 194
 195     MediaSession     *ms;
 196     TaskScheduler    *scheduler;
 197     UsageEnvironment *env ;
 198     RTSPClientVlc    *rtsp;
 199
 200     /* */
 201     int              i_track;
 202     live_track_t     **track;
 203
 204     /* Weird formats */
 205     asf_header_t     asfh;
 206     stream_t         *p_out_asf;
 207     bool             b_real;
 208
 209     /* */
 210     int64_t          i_pcr; /* The clock */
 211     double           f_npt;
 212     double           f_npt_length;
 213     double           f_npt_start;
 214
 215     /* timeout thread information */
 216     int              i_timeout;     /* session timeout value in seconds */
 217     bool             b_timeout_call;/* mark to send an RTSP call to prevent server timeout */
 218     timeout_thread_t *p_timeout;    /* the actual thread that makes sure we don't timeout */
 219
 220     /* */
 221     bool             b_force_mcast;
 222     bool             b_multicast;   /* if one of the tracks is multicasted */
 223     bool             b_no_data;     /* if we never received any data */
 224     int              i_no_data_ti;  /* consecutive number of TaskInterrupt */
 225
 226     char             event_rtsp;
 227     char             event_data;
 228
 229     bool             b_get_param;   /* Does the server support GET_PARAMETER */
 230     bool             b_paused;      /* Are we paused? */
 231     bool             b_error;
 232     int              i_live555_ret; /* live555 callback return code */
 233
 234     float            f_seek_request;/* In case we receive a seek request while paused*/
 235 };
 236
 237
 238 class RTSPClientVlc : public RTSPClient
 239 {
 240 public:
 241     RTSPClientVlc( UsageEnvironment& env, char const* rtspURL, int verbosityLevel,
 242                    char const* applicationName, portNumBits tunnelOverHTTPPortNum,
 243                    demux_sys_t *p_sys) :
 244                    RTSPClient( env, rtspURL, verbosityLevel, applicationName,
 245                    tunnelOverHTTPPortNum )
 246     {
 247         this->p_sys = p_sys;
 248     }
 249     demux_sys_t *p_sys;
 250 };
 251
 252 static int Demux  ( demux_t * );
 253 static int Control( demux_t *, int, va_list );
 254
 255 static int Connect      ( demux_t * );
 256 static int SessionsSetup( demux_t * );
 257 static int Play         ( demux_t *);
 258 static int ParseASF     ( demux_t * );
 259 static int RollOverTcp  ( demux_t * );
 260
 261 static void StreamRead  ( void *, unsigned int, unsigned int,
 262                           struct timeval, unsigned int );
 263 static void StreamClose ( void * );
 264 static void TaskInterruptData( void * );
 265 static void TaskInterruptRTSP( void * );
 266
 267 static void* TimeoutPrevention( void * );
 268
 269 static unsigned char* parseH264ConfigStr( char const* configStr,
 270                                           unsigned int& configSize );
 271
 272 /*****************************************************************************
 273  * DemuxOpen:
 274  *****************************************************************************/
 275 static int  Open ( vlc_object_t *p_this )
 276 {
 277     demux_t     *p_demux = (demux_t*)p_this;
 278     demux_sys_t *p_sys = NULL;
 279
 280     int i_return;
 281     int i_error = VLC_EGENERIC;
 282
 283     if( p_demux->s )
 284     {
 285         /* See if it looks like a SDP
 286            v, o, s fields are mandatory and in this order */
 287         const uint8_t *p_peek;
 288         if( stream_Peek( p_demux->s, &p_peek, 7 ) < 7 ) return VLC_EGENERIC;
 289
 290         if( memcmp( p_peek, "v=0\r\n", 5 ) &&
 291             memcmp( p_peek, "v=0\n", 4 ) &&
 292             ( p_peek[0] < 'a' || p_peek[0] > 'z' || p_peek[1] != '=' ) )
 293         {
 294             return VLC_EGENERIC;
 295         }
 296     }
 297
 298     p_demux->pf_demux  = Demux;
 299     p_demux->pf_control= Control;
 300     p_demux->p_sys     = p_sys = (demux_sys_t*)calloc( 1, sizeof( demux_sys_t ) );
 301     if( !p_sys ) return VLC_ENOMEM;
 302
 303     msg_Dbg( p_demux, "version "LIVEMEDIA_LIBRARY_VERSION_STRING );
 304
 305     TAB_INIT( p_sys->i_track, p_sys->track );
 306     p_sys->f_npt = 0.;
 307     p_sys->f_npt_start = 0.;
 308     p_sys->f_npt_length = 0.;
 309     p_sys->b_no_data = true;
 310     p_sys->psz_path = strdup( p_demux->psz_location );
 311     p_sys->b_force_mcast = var_InheritBool( p_demux, "rtsp-mcast" );
 312     p_sys->f_seek_request = -1;
 313
 314     /* parse URL for rtsp://[user:[passwd]@]serverip:port/options */
 315     vlc_UrlParse( &p_sys->url, p_sys->psz_path, 0 );
 316
 317     if( ( p_sys->scheduler = BasicTaskScheduler::createNew() ) == NULL )
 318     {
 319         msg_Err( p_demux, "BasicTaskScheduler::createNew failed" );
 320         goto error;
 321     }
 322     if( !( p_sys->env = BasicUsageEnvironment::createNew(*p_sys->scheduler) ) )
 323     {
 324         msg_Err( p_demux, "BasicUsageEnvironment::createNew failed" );
 325         goto error;
 326     }
 327
 328     if( strcasecmp( p_demux->psz_access, "sdp" ) )
 329     {
 330         char *p = p_sys->psz_path;
 331         while( (p = strchr( p, ' ' )) != NULL ) *p = '+';
 332     }
 333
 334     if( p_demux->s != NULL )
 335     {
 336         /* Gather the complete sdp file */
 337         int     i_sdp       = 0;
 338         int     i_sdp_max   = 1000;
 339         uint8_t *p_sdp      = (uint8_t*) malloc( i_sdp_max );
 340
 341         if( !p_sdp )
 342         {
 343             i_error = VLC_ENOMEM;
 344             goto error;
 345         }
 346
 347         for( ;; )
 348         {
 349             int i_read = stream_Read( p_demux->s, &p_sdp[i_sdp],
 350                                       i_sdp_max - i_sdp - 1 );
 351
 352             if( !vlc_object_alive (p_demux) )
 353             {
 354                 free( p_sdp );
 355                 goto error;
 356             }
 357
 358             if( i_read < 0 )
 359             {
 360                 msg_Err( p_demux, "failed to read SDP" );
 361                 free( p_sdp );
 362                 goto error;
 363             }
 364
 365             i_sdp += i_read;
 366
 367             if( i_read < i_sdp_max - i_sdp - 1 )
 368             {
 369                 p_sdp[i_sdp] = '\0';
 370                 break;
 371             }
 372
 373             i_sdp_max += 1000;
 374             p_sdp = (uint8_t*)xrealloc( p_sdp, i_sdp_max );
 375         }
 376         p_sys->p_sdp = (char*)p_sdp;
 377     }
 378     else if( ( i_return = Connect( p_demux ) ) != VLC_SUCCESS )
 379     {
 380         msg_Err( p_demux, "Failed to connect with rtsp://%s", p_sys->psz_path );
 381         goto error;
 382     }
 383
 384     if( p_sys->p_sdp == NULL )
 385     {
 386         msg_Err( p_demux, "Failed to retrieve the RTSP Session Description" );
 387         i_error = VLC_ENOMEM;
 388         goto error;
 389     }
 390
 391     if( ( i_return = SessionsSetup( p_demux ) ) != VLC_SUCCESS )
 392     {
 393         msg_Err( p_demux, "Nothing to play for rtsp://%s", p_sys->psz_path );
 394         goto error;
 395     }
 396
 397     if( p_sys->b_real ) goto error;
 398
 399     if( ( i_return = Play( p_demux ) ) != VLC_SUCCESS )
 400         goto error;
 401
 402     if( p_sys->p_out_asf && ParseASF( p_demux ) )
 403     {
 404         msg_Err( p_demux, "cannot find a usable asf header" );
 405         /* TODO Clean tracks */
 406         goto error;
 407     }
 408
 409     if( p_sys->i_track <= 0 )
 410         goto error;
 411
 412     return VLC_SUCCESS;
 413
 414 error:
 415     Close( p_this );
 416     return i_error;
 417 }
 418
 419 /*****************************************************************************
 420  * DemuxClose:
 421  *****************************************************************************/
 422 static void Close( vlc_object_t *p_this )
 423 {
 424     demux_t *p_demux = (demux_t*)p_this;
 425     demux_sys_t *p_sys = p_demux->p_sys;
 426
 427     if( p_sys->p_timeout )
 428     {
 429         vlc_cancel( p_sys->p_timeout->handle );
 430         vlc_join( p_sys->p_timeout->handle, NULL );
 431         free( p_sys->p_timeout );
 432     }
 433
 434     if( p_sys->rtsp && p_sys->ms ) p_sys->rtsp->sendTeardownCommand( *p_sys->ms, NULL );
 435     if( p_sys->ms ) Medium::close( p_sys->ms );
 436     if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
 437     if( p_sys->env ) p_sys->env->reclaim();
 438
 439     for( int i = 0; i < p_sys->i_track; i++ )
 440     {
 441         live_track_t *tk = p_sys->track[i];
 442
 443         if( tk->b_muxed ) stream_Delete( tk->p_out_muxed );
 444         es_format_Clean( &tk->fmt );
 445         free( tk->p_buffer );
 446         free( tk );
 447     }
 448     TAB_CLEAN( p_sys->i_track, p_sys->track );
 449     if( p_sys->p_out_asf ) stream_Delete( p_sys->p_out_asf );
 450     delete p_sys->scheduler;
 451     free( p_sys->p_sdp );
 452     free( p_sys->psz_path );
 453
 454     vlc_UrlClean( &p_sys->url );
 455
 456     free( p_sys );
 457 }
 458
 459 static inline const char *strempty( const char *s ) { return s?s:""; }
 460 static inline Boolean toBool( bool b ) { return b?True:False; } // silly, no?
 461
 462 static void default_live555_callback( RTSPClient* client, int result_code, char* result_string )
 463 {
 464     RTSPClientVlc *client_vlc = static_cast<RTSPClientVlc *> ( client );
 465     demux_sys_t *p_sys = client_vlc->p_sys;
 466     delete []result_string;
 467     p_sys->i_live555_ret = result_code;
 468     p_sys->b_error = p_sys->i_live555_ret != 0;
 469     p_sys->event_rtsp = 1;
 470 }
 471
 472 /* return true if the RTSP command succeeded */
 473 static bool wait_Live555_response( demux_t *p_demux, int i_timeout = 0 /* ms */ )
 474 {
 475     TaskToken task;
 476     demux_sys_t * p_sys = p_demux->p_sys;
 477     p_sys->event_rtsp = 0;
 478     if( i_timeout > 0 )
 479     {
 480         /* Create a task that will be called if we wait more than timeout ms */
 481         task = p_sys->scheduler->scheduleDelayedTask( i_timeout*1000,
 482                                                       TaskInterruptRTSP,
 483                                                       p_demux );
 484     }
 485     p_sys->event_rtsp = 0;
 486     p_sys->b_error = true;
 487     p_sys->i_live555_ret = 0;
 488     p_sys->scheduler->doEventLoop( &p_sys->event_rtsp );
 489     //here, if b_error is true and i_live555_ret = 0 we didn't receive a response
 490     if( i_timeout > 0 )
 491     {
 492         /* remove the task */
 493         p_sys->scheduler->unscheduleDelayedTask( task );
 494     }
 495     return !p_sys->b_error;
 496 }
 497
 498 static void continueAfterDESCRIBE( RTSPClient* client, int result_code,
 499                                    char* result_string )
 500 {
 501     RTSPClientVlc *client_vlc = static_cast<RTSPClientVlc *> ( client );
 502     demux_sys_t *p_sys = client_vlc->p_sys;
 503     p_sys->i_live555_ret = result_code;
 504     if ( result_code == 0 )
 505     {
 506         char* sdpDescription = result_string;
 507         free( p_sys->p_sdp );
 508         p_sys->p_sdp = NULL;
 509         if( sdpDescription )
 510         {
 511             p_sys->p_sdp = strdup( sdpDescription );
 512             p_sys->b_error = false;
 513         }
 514     }
 515     else
 516         p_sys->b_error = true;
 517     delete[] result_string;
 518     p_sys->event_rtsp = 1;
 519 }
 520
 521 static void continueAfterOPTIONS( RTSPClient* client, int result_code,
 522                                   char* result_string )
 523 {
 524     RTSPClientVlc *client_vlc = static_cast<RTSPClientVlc *> (client);
 525     demux_sys_t *p_sys = client_vlc->p_sys;
 526     p_sys->b_get_param =
 527       // If OPTIONS fails, assume GET_PARAMETER is not supported but
 528       // still continue on with the stream.  Some servers (foscam)
 529       // return 501/not implemented for OPTIONS.
 530       result_code == 0
 531       && result_string != NULL
 532       && strstr( result_string, "GET_PARAMETER" ) != NULL;
 533     client->sendDescribeCommand( continueAfterDESCRIBE );
 534     delete[] result_string;
 535 }
 536
 537 /*****************************************************************************
 538  * Connect: connects to the RTSP server to setup the session DESCRIBE
 539  *****************************************************************************/
 540 static int Connect( demux_t *p_demux )
 541 {
 542     demux_sys_t *p_sys = p_demux->p_sys;
 543     Authenticator authenticator;
 544     char *psz_user    = NULL;
 545     char *psz_pwd     = NULL;
 546     char *psz_url     = NULL;
 547     int  i_http_port  = 0;
 548     int  i_ret        = VLC_SUCCESS;
 549     const int i_timeout = var_InheritInteger( p_demux, "ipv4-timeout" );
 550
 551     /* Get the user name and password */
 552     if( p_sys->url.psz_username || p_sys->url.psz_password )
 553     {
 554         /* Create the URL by stripping away the username/password part */
 555         if( p_sys->url.i_port == 0 )
 556             p_sys->url.i_port = 554;
 557         if( asprintf( &psz_url, "rtsp://%s:%d%s",
 558                       strempty( p_sys->url.psz_host ),
 559                       p_sys->url.i_port,
 560                       strempty( p_sys->url.psz_path ) ) == -1 )
 561             return VLC_ENOMEM;
 562
 563         psz_user = strdup( strempty( p_sys->url.psz_username ) );
 564         psz_pwd  = strdup( strempty( p_sys->url.psz_password ) );
 565     }
 566     else
 567     {
 568         if( asprintf( &psz_url, "rtsp://%s", p_sys->psz_path ) == -1 )
 569             return VLC_ENOMEM;
 570
 571         psz_user = var_InheritString( p_demux, "rtsp-user" );
 572         psz_pwd  = var_InheritString( p_demux, "rtsp-pwd" );
 573     }
 574
 575 createnew:
 576     if( !vlc_object_alive (p_demux) )
 577     {
 578         i_ret = VLC_EGENERIC;
 579         goto bailout;
 580     }
 581
 582     if( var_CreateGetBool( p_demux, "rtsp-http" ) )
 583         i_http_port = var_InheritInteger( p_demux, "rtsp-http-port" );
 584
 585     p_sys->rtsp = new RTSPClientVlc( *p_sys->env, psz_url,
 586                                      var_InheritInteger( p_demux, "verbose" ) > 1 ? 1 : 0,
 587                                      "LibVLC/"VERSION, i_http_port, p_sys );
 588     if( !p_sys->rtsp )
 589     {
 590         msg_Err( p_demux, "RTSPClient::createNew failed (%s)",
 591                  p_sys->env->getResultMsg() );
 592         i_ret = VLC_EGENERIC;
 593         goto bailout;
 594     }
 595
 596     /* Kasenna enables KeepAlive by analysing the User-Agent string.
 597      * Appending _KA to the string should be enough to enable this feature,
 598      * however, there is a bug where the _KA doesn't get parsed from the
 599      * default User-Agent as created by VLC/Live555 code. This is probably due
 600      * to spaces in the string or the string being too long. Here we override
 601      * the default string with a more compact version.
 602      */
 603     if( var_InheritBool( p_demux, "rtsp-kasenna" ))
 604     {
 605         p_sys->rtsp->setUserAgentString( "VLC_MEDIA_PLAYER_KA" );
 606     }
 607
 608 describe:
 609     authenticator.setUsernameAndPassword( psz_user, psz_pwd );
 610
 611     p_sys->rtsp->sendOptionsCommand( &continueAfterOPTIONS, &authenticator );
 612
 613     if( !wait_Live555_response( p_demux, i_timeout ) )
 614     {
 615         int i_code = p_sys->i_live555_ret;
 616         if( i_code == 401 )
 617         {
 618             msg_Dbg( p_demux, "authentication failed" );
 619
 620             free( psz_user );
 621             free( psz_pwd );
 622             dialog_Login( p_demux, &psz_user, &psz_pwd,
 623                           _("RTSP authentication"), "%s",
 624                         _("Please enter a valid login name and a password.") );
 625             if( psz_user != NULL && psz_pwd != NULL )
 626             {
 627                 msg_Dbg( p_demux, "retrying with user=%s", psz_user );
 628                 goto describe;
 629             }
 630         }
 631         else if( i_code > 0 && i_code != 404 && !var_GetBool( p_demux, "rtsp-http" ) )
 632         {
 633             /* Perhaps a firewall is being annoying. Try HTTP tunneling mode */
 634             msg_Dbg( p_demux, "we will now try HTTP tunneling mode" );
 635             var_SetBool( p_demux, "rtsp-http", true );
 636             if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
 637             p_sys->rtsp = NULL;
 638             goto createnew;
 639         }
 640         else
 641         {
 642             if( i_code == 0 )
 643                 msg_Dbg( p_demux, "connection timeout" );
 644             else
 645             {
 646                 msg_Dbg( p_demux, "connection error %d", i_code );
 647                 if( i_code == 403 )
 648                     dialog_Fatal( p_demux, _("RTSP connection failed"),
 649                                   _("Access to the stream is denied by the server configuration.") );
 650             }
 651             if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
 652             p_sys->rtsp = NULL;
 653         }
 654         i_ret = VLC_EGENERIC;
 655     }
 656
 657 bailout:
 658     /* malloc-ated copy */
 659     free( psz_url );
 660     free( psz_user );
 661     free( psz_pwd );
 662
 663     return i_ret;
 664 }
 665
 666 /*****************************************************************************
 667  * SessionsSetup: prepares the subsessions and does the SETUP
 668  *****************************************************************************/
 669 static int SessionsSetup( demux_t *p_demux )
 670 {
 671     demux_sys_t             *p_sys  = p_demux->p_sys;
 672     MediaSubsessionIterator *iter   = NULL;
 673     MediaSubsession         *sub    = NULL;
 674
 675     bool           b_rtsp_tcp;
 676     int            i_client_port;
 677     int            i_return = VLC_SUCCESS;
 678     unsigned int   i_receive_buffer = 0;
 679     int            i_frame_buffer = DEFAULT_FRAME_BUFFER_SIZE;
 680     unsigned const thresh = 200000; /* RTP reorder threshold .2 second (default .1) */
 681
 682     b_rtsp_tcp    = var_CreateGetBool( p_demux, "rtsp-tcp" ) ||
 683                     var_GetBool( p_demux, "rtsp-http" );
 684     i_client_port = var_InheritInteger( p_demux, "rtp-client-port" );
 685
 686
 687     /* Create the session from the SDP */
 688     if( !( p_sys->ms = MediaSession::createNew( *p_sys->env, p_sys->p_sdp ) ) )
 689     {
 690         msg_Err( p_demux, "Could not create the RTSP Session: %s",
 691             p_sys->env->getResultMsg() );
 692         return VLC_EGENERIC;
 693     }
 694
 695     /* Initialise each media subsession */
 696     iter = new MediaSubsessionIterator( *p_sys->ms );
 697     while( ( sub = iter->next() ) != NULL )
 698     {
 699         Boolean bInit;
 700         live_track_t *tk;
 701
 702         if( !vlc_object_alive (p_demux) )
 703         {
 704             delete iter;
 705             return VLC_EGENERIC;
 706         }
 707
 708         /* Value taken from mplayer */
 709         if( !strcmp( sub->mediumName(), "audio" ) )
 710             i_receive_buffer = 100000;
 711         else if( !strcmp( sub->mediumName(), "video" ) )
 712         {
 713             int i_var_buf_size = var_InheritInteger( p_demux, "rtsp-frame-buffer-size" );
 714             if( i_var_buf_size > 0 )
 715                 i_frame_buffer = i_var_buf_size;
 716             i_receive_buffer = 2000000;
 717         }
 718         else if( !strcmp( sub->mediumName(), "text" ) )
 719             ;
 720         else continue;
 721
 722         if( i_client_port != -1 )
 723         {
 724             sub->setClientPortNum( i_client_port );
 725             i_client_port += 2;
 726         }
 727
 728         if( strcasestr( sub->codecName(), "REAL" ) )
 729         {
 730             msg_Info( p_demux, "real codec detected, using real-RTSP instead" );
 731             p_sys->b_real = true; /* This is a problem, we'll handle it later */
 732             continue;
 733         }
 734
 735         if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
 736             bInit = sub->initiate( 0 );
 737         else
 738             bInit = sub->initiate();
 739
 740         if( !bInit )
 741         {
 742             msg_Warn( p_demux, "RTP subsession '%s/%s' failed (%s)",
 743                       sub->mediumName(), sub->codecName(),
 744                       p_sys->env->getResultMsg() );
 745         }
 746         else
 747         {
 748             if( sub->rtpSource() != NULL )
 749             {
 750                 int fd = sub->rtpSource()->RTPgs()->socketNum();
 751
 752                 /* Increase the buffer size */
 753                 if( i_receive_buffer > 0 )
 754                     increaseReceiveBufferTo( *p_sys->env, fd, i_receive_buffer );
 755
 756                 /* Increase the RTP reorder timebuffer just a bit */
 757                 sub->rtpSource()->setPacketReorderingThresholdTime(thresh);
 758             }
 759             msg_Dbg( p_demux, "RTP subsession '%s/%s'", sub->mediumName(),
 760                      sub->codecName() );
 761
 762             /* Issue the SETUP */
 763             if( p_sys->rtsp )
 764             {
 765                 p_sys->rtsp->sendSetupCommand( *sub, default_live555_callback, False,
 766                                                toBool( b_rtsp_tcp ),
 767                                                toBool( p_sys->b_force_mcast && !b_rtsp_tcp ) );
 768                 if( !wait_Live555_response( p_demux ) )
 769                 {
 770                     /* if we get an unsupported transport error, toggle TCP
 771                      * use and try again */
 772                     if( p_sys->i_live555_ret == 461 )
 773                         p_sys->rtsp->sendSetupCommand( *sub, default_live555_callback, False,
 774                                                        !toBool( b_rtsp_tcp ), False );
 775                     if( p_sys->i_live555_ret != 461 || !wait_Live555_response( p_demux ) )
 776                     {
 777                         msg_Err( p_demux, "SETUP of'%s/%s' failed %s",
 778                                  sub->mediumName(), sub->codecName(),
 779                                  p_sys->env->getResultMsg() );
 780                         continue;
 781                     }
 782                     else
 783                     {
 784                         var_SetBool( p_demux, "rtsp-tcp", true );
 785                         b_rtsp_tcp = true;
 786                     }
 787                 }
 788             }
 789
 790             /* Check if we will receive data from this subsession for
 791              * this track */
 792             if( sub->readSource() == NULL ) continue;
 793             if( !p_sys->b_multicast )
 794             {
 795                 /* We need different rollover behaviour for multicast */
 796                 p_sys->b_multicast = IsMulticastAddress( sub->connectionEndpointAddress() );
 797             }
 798
 799             tk = (live_track_t*)malloc( sizeof( live_track_t ) );
 800             if( !tk )
 801             {
 802                 delete iter;
 803                 return VLC_ENOMEM;
 804             }
 805             tk->p_demux     = p_demux;
 806             tk->sub         = sub;
 807             tk->p_es        = NULL;
 808             tk->b_quicktime = false;
 809             tk->b_asf       = false;
 810             tk->p_asf_block = NULL;
 811             tk->b_muxed     = false;
 812             tk->b_discard_trunc = false;
 813             tk->p_out_muxed = NULL;
 814             tk->waiting     = 0;
 815             tk->b_rtcp_sync = false;
 816             tk->i_pts       = VLC_TS_INVALID;
 817             tk->f_npt       = 0.;
 818             tk->b_selected  = true;
 819             tk->i_buffer    = i_frame_buffer;
 820             tk->p_buffer    = (uint8_t *)malloc( i_frame_buffer );
 821
 822             if( !tk->p_buffer )
 823             {
 824                 free( tk );
 825                 delete iter;
 826                 return VLC_ENOMEM;
 827             }
 828
 829             /* Value taken from mplayer */
 830             if( !strcmp( sub->mediumName(), "audio" ) )
 831             {
 832                 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('u','n','d','f') );
 833                 tk->fmt.audio.i_channels = sub->numChannels();
 834                 tk->fmt.audio.i_rate = sub->rtpTimestampFrequency();
 835
 836                 if( !strcmp( sub->codecName(), "MPA" ) ||
 837                     !strcmp( sub->codecName(), "MPA-ROBUST" ) ||
 838                     !strcmp( sub->codecName(), "X-MP3-DRAFT-00" ) )
 839                 {
 840                     tk->fmt.i_codec = VLC_CODEC_MPGA;
 841                     tk->fmt.audio.i_rate = 0;
 842                 }
 843                 else if( !strcmp( sub->codecName(), "AC3" ) )
 844                 {
 845                     tk->fmt.i_codec = VLC_CODEC_A52;
 846                     tk->fmt.audio.i_rate = 0;
 847                 }
 848                 else if( !strcmp( sub->codecName(), "L16" ) )
 849                 {
 850                     tk->fmt.i_codec = VLC_CODEC_S16B;
 851                     tk->fmt.audio.i_bitspersample = 16;
 852                 }
 853                 else if( !strcmp( sub->codecName(), "L20" ) )
 854                 {
 855                     tk->fmt.i_codec = VLC_CODEC_S20B;
 856                     tk->fmt.audio.i_bitspersample = 20;
 857                 }
 858                 else if( !strcmp( sub->codecName(), "L24" ) )
 859                 {
 860                     tk->fmt.i_codec = VLC_CODEC_S24B;
 861                     tk->fmt.audio.i_bitspersample = 24;
 862                 }
 863                 else if( !strcmp( sub->codecName(), "L8" ) )
 864                 {
 865                     tk->fmt.i_codec = VLC_CODEC_U8;
 866                     tk->fmt.audio.i_bitspersample = 8;
 867                 }
 868                 else if( !strcmp( sub->codecName(), "DAT12" ) )
 869                 {
 870                     tk->fmt.i_codec = VLC_CODEC_DAT12;
 871                     tk->fmt.audio.i_bitspersample = 12;
 872                 }
 873                 else if( !strcmp( sub->codecName(), "PCMU" ) )
 874                 {
 875                     tk->fmt.i_codec = VLC_CODEC_MULAW;
 876                     tk->fmt.audio.i_bitspersample = 8;
 877                 }
 878                 else if( !strcmp( sub->codecName(), "PCMA" ) )
 879                 {
 880                     tk->fmt.i_codec = VLC_CODEC_ALAW;
 881                     tk->fmt.audio.i_bitspersample = 8;
 882                 }
 883                 else if( !strncmp( sub->codecName(), "G726", 4 ) )
 884                 {
 885                     tk->fmt.i_codec = VLC_CODEC_ADPCM_G726;
 886                     tk->fmt.audio.i_rate = 8000;
 887                     tk->fmt.audio.i_channels = 1;
 888                     if( !strcmp( sub->codecName()+5, "40" ) )
 889                         tk->fmt.i_bitrate = 40000;
 890                     else if( !strcmp( sub->codecName()+5, "32" ) )
 891                         tk->fmt.i_bitrate = 32000;
 892                     else if( !strcmp( sub->codecName()+5, "24" ) )
 893                         tk->fmt.i_bitrate = 24000;
 894                     else if( !strcmp( sub->codecName()+5, "16" ) )
 895                         tk->fmt.i_bitrate = 16000;
 896                 }
 897                 else if( !strcmp( sub->codecName(), "AMR" ) )
 898                 {
 899                     tk->fmt.i_codec = VLC_CODEC_AMR_NB;
 900                 }
 901                 else if( !strcmp( sub->codecName(), "AMR-WB" ) )
 902                 {
 903                     tk->fmt.i_codec = VLC_CODEC_AMR_WB;
 904                 }
 905                 else if( !strcmp( sub->codecName(), "MP4A-LATM" ) )
 906                 {
 907                     unsigned int i_extra;
 908                     uint8_t      *p_extra;
 909
 910                     tk->fmt.i_codec = VLC_CODEC_MP4A;
 911
 912                     if( ( p_extra = parseStreamMuxConfigStr( sub->fmtp_config(),
 913                                                              i_extra ) ) )
 914                     {
 915                         tk->fmt.i_extra = i_extra;
 916                         tk->fmt.p_extra = xmalloc( i_extra );
 917                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
 918                         delete[] p_extra;
 919                     }
 920                     /* Because the "faad" decoder does not handle the LATM
 921                      * data length field at the start of each returned LATM
 922                      * frame, tell the RTP source to omit. */
 923                     ((MPEG4LATMAudioRTPSource*)sub->rtpSource())->omitLATMDataLengthField();
 924                 }
 925                 else if( !strcmp( sub->codecName(), "MPEG4-GENERIC" ) )
 926                 {
 927                     unsigned int i_extra;
 928                     uint8_t      *p_extra;
 929
 930                     tk->fmt.i_codec = VLC_CODEC_MP4A;
 931
 932                     if( ( p_extra = parseGeneralConfigStr( sub->fmtp_config(),
 933                                                            i_extra ) ) )
 934                     {
 935                         tk->fmt.i_extra = i_extra;
 936                         tk->fmt.p_extra = xmalloc( i_extra );
 937                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
 938                         delete[] p_extra;
 939                     }
 940                 }
 941                 else if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
 942                 {
 943                     tk->b_asf = true;
 944                     if( p_sys->p_out_asf == NULL )
 945                         p_sys->p_out_asf = stream_DemuxNew( p_demux, "asf",
 946                                                             p_demux->out );
 947                 }
 948                 else if( !strcmp( sub->codecName(), "X-QT" ) ||
 949                          !strcmp( sub->codecName(), "X-QUICKTIME" ) )
 950                 {
 951                     tk->b_quicktime = true;
 952                 }
 953                 else if( !strcmp( sub->codecName(), "SPEEX" ) )
 954                 {
 955                     tk->fmt.i_codec = VLC_FOURCC( 's', 'p', 'x', 'r' );
 956                     if ( tk->fmt.audio.i_rate == 0 )
 957                     {
 958                         msg_Warn( p_demux,"Using 8kHz as default sample rate." );
 959                         tk->fmt.audio.i_rate = 8000;
 960                     }
 961                 }
 962             }
 963             else if( !strcmp( sub->mediumName(), "video" ) )
 964             {
 965                 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('u','n','d','f') );
 966                 if( !strcmp( sub->codecName(), "MPV" ) )
 967                 {
 968                     tk->fmt.i_codec = VLC_CODEC_MPGV;
 969                     tk->fmt.b_packetized = false;
 970                 }
 971                 else if( !strcmp( sub->codecName(), "H263" ) ||
 972                          !strcmp( sub->codecName(), "H263-1998" ) ||
 973                          !strcmp( sub->codecName(), "H263-2000" ) )
 974                 {
 975                     tk->fmt.i_codec = VLC_CODEC_H263;
 976                 }
 977                 else if( !strcmp( sub->codecName(), "H261" ) )
 978                 {
 979                     tk->fmt.i_codec = VLC_CODEC_H261;
 980                 }
 981                 else if( !strcmp( sub->codecName(), "H264" ) )
 982                 {
 983                     unsigned int i_extra = 0;
 984                     uint8_t      *p_extra = NULL;
 985
 986                     tk->fmt.i_codec = VLC_CODEC_H264;
 987                     tk->fmt.b_packetized = false;
 988
 989                     if((p_extra=parseH264ConfigStr( sub->fmtp_spropparametersets(),
 990                                                     i_extra ) ) )
 991                     {
 992                         tk->fmt.i_extra = i_extra;
 993                         tk->fmt.p_extra = xmalloc( i_extra );
 994                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
 995
 996                         delete[] p_extra;
 997                     }
 998                 }
 999                 else if( !strcmp( sub->codecName(), "JPEG" ) )
1000                 {
1001                     tk->fmt.i_codec = VLC_CODEC_MJPG;
1002                 }
1003                 else if( !strcmp( sub->codecName(), "MP4V-ES" ) )
1004                 {
1005                     unsigned int i_extra;
1006                     uint8_t      *p_extra;
1007
1008                     tk->fmt.i_codec = VLC_CODEC_MP4V;
1009
1010                     if( ( p_extra = parseGeneralConfigStr( sub->fmtp_config(),
1011                                                            i_extra ) ) )
1012                     {
1013                         tk->fmt.i_extra = i_extra;
1014                         tk->fmt.p_extra = xmalloc( i_extra );
1015                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
1016                         delete[] p_extra;
1017                     }
1018                 }
1019                 else if( !strcmp( sub->codecName(), "X-QT" ) ||
1020                          !strcmp( sub->codecName(), "X-QUICKTIME" ) ||
1021                          !strcmp( sub->codecName(), "X-QDM" ) ||
1022                          !strcmp( sub->codecName(), "X-SV3V-ES" )  ||
1023                          !strcmp( sub->codecName(), "X-SORENSONVIDEO" ) )
1024                 {
1025                     tk->b_quicktime = true;
1026                 }
1027                 else if( !strcmp( sub->codecName(), "MP2T" ) )
1028                 {
1029                     tk->b_muxed = true;
1030                     tk->p_out_muxed = stream_DemuxNew( p_demux, "ts", p_demux->out );
1031                 }
1032                 else if( !strcmp( sub->codecName(), "MP2P" ) ||
1033                          !strcmp( sub->codecName(), "MP1S" ) )
1034                 {
1035                     tk->b_muxed = true;
1036                     tk->p_out_muxed = stream_DemuxNew( p_demux, "ps",
1037                                                        p_demux->out );
1038                 }
1039                 else if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
1040                 {
1041                     tk->b_asf = true;
1042                     if( p_sys->p_out_asf == NULL )
1043                         p_sys->p_out_asf = stream_DemuxNew( p_demux, "asf",
1044                                                             p_demux->out );;
1045                 }
1046                 else if( !strcmp( sub->codecName(), "DV" ) )
1047                 {
1048                     tk->b_muxed = true;
1049                     tk->b_discard_trunc = true;
1050                     tk->p_out_muxed = stream_DemuxNew( p_demux, "rawdv",
1051                                                        p_demux->out );
1052                 }
1053             }
1054             else if( !strcmp( sub->mediumName(), "text" ) )
1055             {
1056                 es_format_Init( &tk->fmt, SPU_ES, VLC_FOURCC('u','n','d','f') );
1057
1058                 if( !strcmp( sub->codecName(), "T140" ) )
1059                 {
1060                     tk->fmt.i_codec = VLC_CODEC_ITU_T140;
1061                 }
1062             }
1063
1064             if( !tk->b_quicktime && !tk->b_muxed && !tk->b_asf )
1065             {
1066                 tk->p_es = es_out_Add( p_demux->out, &tk->fmt );
1067             }
1068
1069             if( sub->rtcpInstance() != NULL )
1070             {
1071                 sub->rtcpInstance()->setByeHandler( StreamClose, tk );
1072             }
1073
1074             if( tk->p_es || tk->b_quicktime || ( tk->b_muxed && tk->p_out_muxed ) ||
1075                 ( tk->b_asf && p_sys->p_out_asf ) )
1076             {
1077                 TAB_APPEND_CAST( (live_track_t **), p_sys->i_track, p_sys->track, tk );
1078             }
1079             else
1080             {
1081                 /* BUG ??? */
1082                 msg_Err( p_demux, "unusable RTSP track. this should not happen" );
1083                 es_format_Clean( &tk->fmt );
1084                 free( tk );
1085             }
1086         }
1087     }
1088     delete iter;
1089     if( p_sys->i_track <= 0 ) i_return = VLC_EGENERIC;
1090
1091     /* Retrieve the starttime if possible */
1092     p_sys->f_npt_start = p_sys->ms->playStartTime();
1093
1094     /* Retrieve the duration if possible */
1095     p_sys->f_npt_length = p_sys->ms->playEndTime();
1096
1097     /* */
1098     msg_Dbg( p_demux, "setup start: %f stop:%f", p_sys->f_npt_start, p_sys->f_npt_length );
1099
1100     /* */
1101     p_sys->b_no_data = true;
1102     p_sys->i_no_data_ti = 0;
1103
1104     return i_return;
1105 }
1106
1107 /*****************************************************************************
1108  * Play: starts the actual playback of the stream
1109  *****************************************************************************/
1110 static int Play( demux_t *p_demux )
1111 {
1112     demux_sys_t *p_sys = p_demux->p_sys;
1113
1114     if( p_sys->rtsp )
1115     {
1116         /* The PLAY */
1117         p_sys->rtsp->sendPlayCommand( *p_sys->ms, default_live555_callback, p_sys->f_npt_start, -1, 1 );
1118
1119         if( !wait_Live555_response(p_demux) )
1120         {
1121             msg_Err( p_demux, "RTSP PLAY failed %s", p_sys->env->getResultMsg() );
1122             return VLC_EGENERIC;
1123         }
1124
1125         /* Retrieve the timeout value and set up a timeout prevention thread */
1126         p_sys->i_timeout = p_sys->rtsp->sessionTimeoutParameter();
1127         if( p_sys->i_timeout <= 0 )
1128             p_sys->i_timeout = 60; /* default value from RFC2326 */
1129
1130         /* start timeout-thread only if GET_PARAMETER is supported by the server */
1131         if( !p_sys->p_timeout && p_sys->b_get_param )
1132         {
1133             msg_Dbg( p_demux, "We have a timeout of %d seconds",  p_sys->i_timeout );
1134             p_sys->p_timeout = (timeout_thread_t *)malloc( sizeof(timeout_thread_t) );
1135             if( p_sys->p_timeout )
1136             {
1137                 memset( p_sys->p_timeout, 0, sizeof(timeout_thread_t) );
1138                 p_sys->p_timeout->p_sys = p_demux->p_sys; /* lol, object recursion :D */
1139                 if( vlc_clone( &p_sys->p_timeout->handle,  TimeoutPrevention,
1140                                p_sys->p_timeout, VLC_THREAD_PRIORITY_LOW ) )
1141                 {
1142                     msg_Err( p_demux, "cannot spawn liveMedia timeout thread" );
1143                     free( p_sys->p_timeout );
1144                     p_sys->p_timeout = NULL;
1145                 }
1146                 else
1147                     msg_Dbg( p_demux, "spawned timeout thread" );
1148             }
1149             else
1150                 msg_Err( p_demux, "cannot spawn liveMedia timeout thread" );
1151         }
1152     }
1153     p_sys->i_pcr = 0;
1154
1155     /* Retrieve the starttime if possible */
1156     p_sys->f_npt_start = p_sys->ms->playStartTime();
1157     if( p_sys->ms->playEndTime() > 0 )
1158         p_sys->f_npt_length = p_sys->ms->playEndTime();
1159
1160     msg_Dbg( p_demux, "play start: %f stop:%f", p_sys->f_npt_start, p_sys->f_npt_length );
1161     return VLC_SUCCESS;
1162 }
1163
1164
1165 /*****************************************************************************
1166  * Demux:
1167  *****************************************************************************/
1168 static int Demux( demux_t *p_demux )
1169 {
1170     demux_sys_t    *p_sys = p_demux->p_sys;
1171     TaskToken      task;
1172
1173     bool            b_send_pcr = true;
1174     int64_t         i_pcr = 0;
1175     int             i;
1176
1177     /* Check if we need to send the server a Keep-A-Live signal */
1178     if( p_sys->b_timeout_call && p_sys->rtsp && p_sys->ms )
1179     {
1180         char *psz_bye = NULL;
1181         p_sys->rtsp->sendGetParameterCommand( *p_sys->ms, NULL, psz_bye );
1182         p_sys->b_timeout_call = false;
1183     }
1184
1185     for( i = 0; i < p_sys->i_track; i++ )
1186     {
1187         live_track_t *tk = p_sys->track[i];
1188
1189         if( tk->p_es )
1190         {
1191             bool b;
1192             es_out_Control( p_demux->out, ES_OUT_GET_ES_STATE, tk->p_es, &b );
1193             if( !b && tk->b_selected )
1194             {
1195                 tk->b_selected = false;
1196                 p_sys->rtsp->sendTeardownCommand( *tk->sub, NULL );
1197             }
1198             else if( b && !tk->b_selected)
1199             {
1200                 bool b_rtsp_tcp = var_GetBool( p_demux, "rtsp-tcp" ) ||
1201                                   var_GetBool( p_demux, "rtsp-http" );
1202                 p_sys->rtsp->sendSetupCommand( *tk->sub, default_live555_callback, False,
1203                                                toBool( b_rtsp_tcp ),
1204                                                toBool( p_sys->b_force_mcast && !b_rtsp_tcp ) );
1205                 if( !wait_Live555_response( p_demux ) )
1206                 {
1207                     msg_Err( p_demux, "SETUP of'%s/%s' failed %s",
1208                              tk->sub->mediumName(), tk->sub->codecName(),
1209                              p_sys->env->getResultMsg() );
1210                 }
1211                 else
1212                 {
1213                     p_sys->rtsp->sendPlayCommand( *tk->sub, default_live555_callback, -1, -1, p_sys->ms->scale() );
1214                     if( !wait_Live555_response(p_demux) )
1215                     {
1216                         msg_Err( p_demux, "RTSP PLAY failed %s", p_sys->env->getResultMsg() );
1217                         p_sys->rtsp->sendTeardownCommand( *tk->sub, NULL );
1218                     }
1219                     else
1220                         tk->b_selected = true;
1221                 }
1222                 if( !tk->b_selected )
1223                     es_out_Control( p_demux->out, ES_OUT_SET_ES_STATE, tk->p_es, false );
1224             }
1225         }
1226
1227         if( tk->b_asf || tk->b_muxed )
1228             b_send_pcr = false;
1229 #if 0
1230         if( i_pcr == 0 )
1231         {
1232             i_pcr = tk->i_pts;
1233         }
1234         else if( tk->i_pts != 0 && i_pcr > tk->i_pts )
1235         {
1236             i_pcr = tk->i_pts ;
1237         }
1238 #endif
1239     }
1240     if( p_sys->i_pcr > 0 )
1241     {
1242         if( b_send_pcr )
1243             es_out_Control( p_demux->out, ES_OUT_SET_PCR, 1 + p_sys->i_pcr );
1244     }
1245
1246     /* First warn we want to read data */
1247     p_sys->event_data = 0;
1248     for( i = 0; i < p_sys->i_track; i++ )
1249     {
1250         live_track_t *tk = p_sys->track[i];
1251
1252         if( tk->waiting == 0 )
1253         {
1254             tk->waiting = 1;
1255             tk->sub->readSource()->getNextFrame( tk->p_buffer, tk->i_buffer,
1256                                           StreamRead, tk, StreamClose, tk );
1257         }
1258     }
1259     /* Create a task that will be called if we wait more than 300ms */
1260     task = p_sys->scheduler->scheduleDelayedTask( 300000, TaskInterruptData, p_demux );
1261
1262     /* Do the read */
1263     p_sys->scheduler->doEventLoop( &p_sys->event_data );
1264
1265     /* remove the task */
1266     p_sys->scheduler->unscheduleDelayedTask( task );
1267
1268     /* Check for gap in pts value */
1269     for( i = 0; i < p_sys->i_track; i++ )
1270     {
1271         live_track_t *tk = p_sys->track[i];
1272
1273         if( !tk->b_muxed && !tk->b_rtcp_sync &&
1274             tk->sub->rtpSource() && tk->sub->rtpSource()->hasBeenSynchronizedUsingRTCP() )
1275         {
1276             msg_Dbg( p_demux, "tk->rtpSource->hasBeenSynchronizedUsingRTCP()" );
1277
1278             es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1279             tk->b_rtcp_sync = true;
1280             /* reset PCR */
1281             tk->i_pts = VLC_TS_INVALID;
1282             tk->f_npt = 0.;
1283             p_sys->i_pcr = 0;
1284             p_sys->f_npt = 0.;
1285             i_pcr = 0;
1286         }
1287     }
1288
1289     if( p_sys->b_multicast && p_sys->b_no_data &&
1290         ( p_sys->i_no_data_ti > 120 ) )
1291     {
1292         /* FIXME Make this configurable
1293         msg_Err( p_demux, "no multicast data received in 36s, aborting" );
1294         return 0;
1295         */
1296     }
1297     else if( !p_sys->b_multicast && !p_sys->b_paused &&
1298               p_sys->b_no_data && ( p_sys->i_no_data_ti > 34 ) )
1299     {
1300         bool b_rtsp_tcp = var_GetBool( p_demux, "rtsp-tcp" ) ||
1301                                 var_GetBool( p_demux, "rtsp-http" );
1302
1303         if( !b_rtsp_tcp && p_sys->rtsp && p_sys->ms )
1304         {
1305             msg_Warn( p_demux, "no data received in 10s. Switching to TCP" );
1306             if( RollOverTcp( p_demux ) )
1307             {
1308                 msg_Err( p_demux, "TCP rollover failed, aborting" );
1309                 return 0;
1310             }
1311             return 1;
1312         }
1313         msg_Err( p_demux, "no data received in 10s, aborting" );
1314         return 0;
1315     }
1316     else if( !p_sys->b_multicast && !p_sys->b_paused &&
1317              ( p_sys->i_no_data_ti > 34 ) )
1318     {
1319         /* EOF ? */
1320         msg_Warn( p_demux, "no data received in 10s, eof ?" );
1321         return 0;
1322     }
1323     return p_sys->b_error ? 0 : 1;
1324 }
1325
1326 /*****************************************************************************
1327  * Control:
1328  *****************************************************************************/
1329 static int Control( demux_t *p_demux, int i_query, va_list args )
1330 {
1331     demux_sys_t *p_sys = p_demux->p_sys;
1332     int64_t *pi64, i64;
1333     double  *pf, f;
1334     bool *pb, *pb2;
1335     int *pi_int;
1336
1337     switch( i_query )
1338     {
1339         case DEMUX_GET_TIME:
1340             pi64 = (int64_t*)va_arg( args, int64_t * );
1341             if( p_sys->f_npt > 0 )
1342             {
1343                 *pi64 = (int64_t)(p_sys->f_npt * 1000000.);
1344                 return VLC_SUCCESS;
1345             }
1346             return VLC_EGENERIC;
1347
1348         case DEMUX_GET_LENGTH:
1349             pi64 = (int64_t*)va_arg( args, int64_t * );
1350             if( p_sys->f_npt_length > 0 )
1351             {
1352                 double d_length = p_sys->f_npt_length * 1000000.0;
1353                 if( d_length >= INT64_MAX )
1354                     *pi64 = INT64_MAX;
1355                 else
1356                     *pi64 = (int64_t)d_length;
1357                 return VLC_SUCCESS;
1358             }
1359             return VLC_EGENERIC;
1360
1361         case DEMUX_GET_POSITION:
1362             pf = (double*)va_arg( args, double* );
1363             if( (p_sys->f_npt_length > 0) && (p_sys->f_npt > 0) )
1364             {
1365                 *pf = p_sys->f_npt / p_sys->f_npt_length;
1366                 return VLC_SUCCESS;
1367             }
1368             return VLC_EGENERIC;
1369
1370         case DEMUX_SET_POSITION:
1371         case DEMUX_SET_TIME:
1372             if( p_sys->rtsp && (p_sys->f_npt_length > 0) )
1373             {
1374                 int i;
1375                 float time;
1376
1377                 if( (i_query == DEMUX_SET_TIME) && (p_sys->f_npt > 0) )
1378                 {
1379                     i64 = (int64_t)va_arg( args, int64_t );
1380                     time = (float)(i64 / 1000000.0); /* in second */
1381                 }
1382                 else if( i_query == DEMUX_SET_TIME )
1383                     return VLC_EGENERIC;
1384                 else
1385                 {
1386                     f = (double)va_arg( args, double );
1387                     time = f * p_sys->f_npt_length;   /* in second */
1388                 }
1389
1390                 if( p_sys->b_paused )
1391                 {
1392                     p_sys->f_seek_request = time;
1393                     return VLC_SUCCESS;
1394                 }
1395
1396                 p_sys->rtsp->sendPauseCommand( *p_sys->ms, default_live555_callback );
1397
1398                 if( !wait_Live555_response( p_demux ) )
1399                 {
1400                     msg_Err( p_demux, "PAUSE before seek failed %s",
1401                         p_sys->env->getResultMsg() );
1402                     return VLC_EGENERIC;
1403                 }
1404
1405                 p_sys->rtsp->sendPlayCommand( *p_sys->ms, default_live555_callback, time, -1, 1 );
1406
1407                 if( !wait_Live555_response( p_demux ) )
1408                 {
1409                     msg_Err( p_demux, "seek PLAY failed %s",
1410                         p_sys->env->getResultMsg() );
1411                     return VLC_EGENERIC;
1412                 }
1413                 p_sys->i_pcr = 0;
1414
1415                 for( i = 0; i < p_sys->i_track; i++ )
1416                 {
1417                     p_sys->track[i]->b_rtcp_sync = false;
1418                     p_sys->track[i]->i_pts = VLC_TS_INVALID;
1419                 }
1420
1421                 /* Retrieve the starttime if possible */
1422                 p_sys->f_npt = p_sys->f_npt_start = p_sys->ms->playStartTime();
1423
1424                 /* Retrieve the duration if possible */
1425                 if( p_sys->ms->playEndTime() > 0 )
1426                     p_sys->f_npt_length = p_sys->ms->playEndTime();
1427
1428                 msg_Dbg( p_demux, "seek start: %f stop:%f", p_sys->f_npt_start, p_sys->f_npt_length );
1429                 return VLC_SUCCESS;
1430             }
1431             return VLC_EGENERIC;
1432
1433         /* Special for access_demux */
1434         case DEMUX_CAN_PAUSE:
1435         case DEMUX_CAN_SEEK:
1436             pb = (bool*)va_arg( args, bool * );
1437             if( p_sys->rtsp && p_sys->f_npt_length > 0 )
1438                 /* Not always true, but will be handled in SET_PAUSE_STATE */
1439                 *pb = true;
1440             else
1441                 *pb = false;
1442             return VLC_SUCCESS;
1443
1444         case DEMUX_CAN_CONTROL_PACE:
1445             pb = (bool*)va_arg( args, bool * );
1446
1447 #if 1       /* Disable for now until we have a clock synchro algo
1448              * which works with something else than MPEG over UDP */
1449             *pb = false;
1450 #else
1451             *pb = true;
1452 #endif
1453             return VLC_SUCCESS;
1454
1455         case DEMUX_CAN_CONTROL_RATE:
1456             pb = (bool*)va_arg( args, bool * );
1457             pb2 = (bool*)va_arg( args, bool * );
1458
1459             *pb = (p_sys->rtsp != NULL) &&
1460                     (p_sys->f_npt_length > 0) &&
1461                     ( !var_GetBool( p_demux, "rtsp-kasenna" ) ||
1462                       !var_GetBool( p_demux, "rtsp-wmserver" ) );
1463             *pb2 = false;
1464             return VLC_SUCCESS;
1465
1466         case DEMUX_SET_RATE:
1467         {
1468             double f_scale, f_old_scale;
1469
1470             if( !p_sys->rtsp || (p_sys->f_npt_length <= 0) ||
1471                 var_GetBool( p_demux, "rtsp-kasenna" ) ||
1472                 var_GetBool( p_demux, "rtsp-wmserver" ) )
1473                 return VLC_EGENERIC;
1474
1475             /* According to RFC 2326 p56 chapter 12.35 a RTSP server that
1476              * supports Scale:
1477              *
1478              * "[...] should try to approximate the viewing rate, but
1479              *  may restrict the range of scale values that it supports.
1480              *  The response MUST contain the actual scale value chosen
1481              *  by the server."
1482              *
1483              * Scale = 1 indicates normal play
1484              * Scale > 1 indicates fast forward
1485              * Scale < 1 && Scale > 0 indicates slow motion
1486              * Scale < 0 value indicates rewind
1487              */
1488
1489             pi_int = (int*)va_arg( args, int * );
1490             f_scale = (double)INPUT_RATE_DEFAULT / (*pi_int);
1491             f_old_scale = p_sys->ms->scale();
1492
1493             /* Passing -1 for the start and end time will mean liveMedia won't
1494              * create a Range: section for the RTSP message. The server should
1495              * pick up from the current position */
1496             p_sys->rtsp->sendPlayCommand( *p_sys->ms, default_live555_callback, -1, -1, f_scale );
1497
1498             if( !wait_Live555_response( p_demux ) )
1499             {
1500                 msg_Err( p_demux, "PLAY with Scale %0.2f failed %s", f_scale,
1501                         p_sys->env->getResultMsg() );
1502                 return VLC_EGENERIC;
1503             }
1504
1505             if( p_sys->ms->scale() == f_old_scale )
1506             {
1507                 msg_Err( p_demux, "no scale change using old Scale %0.2f",
1508                           p_sys->ms->scale() );
1509                 return VLC_EGENERIC;
1510             }
1511
1512             /* ReSync the stream */
1513             p_sys->f_npt_start = 0;
1514             p_sys->i_pcr = 0;
1515             p_sys->f_npt = 0.0;
1516
1517             *pi_int = (int)( INPUT_RATE_DEFAULT / p_sys->ms->scale() );
1518             msg_Dbg( p_demux, "PLAY with new Scale %0.2f (%d)", p_sys->ms->scale(), (*pi_int) );
1519             return VLC_SUCCESS;
1520         }
1521
1522         case DEMUX_SET_PAUSE_STATE:
1523         {
1524             bool b_pause = (bool)va_arg( args, int );
1525             if( p_sys->rtsp == NULL )
1526                 return VLC_EGENERIC;
1527
1528             if( b_pause == p_sys->b_paused )
1529                 return VLC_SUCCESS;
1530             if( b_pause )
1531                 p_sys->rtsp->sendPauseCommand( *p_sys->ms, default_live555_callback );
1532             else
1533                 p_sys->rtsp->sendPlayCommand( *p_sys->ms, default_live555_callback, p_sys->f_seek_request,
1534                                               -1.0f, p_sys->ms->scale() );
1535
1536             if( !wait_Live555_response( p_demux ) )
1537             {
1538                 msg_Err( p_demux, "PLAY or PAUSE failed %s", p_sys->env->getResultMsg() );
1539                 return VLC_EGENERIC;
1540             }
1541             p_sys->f_seek_request = -1;
1542             p_sys->b_paused = b_pause;
1543
1544             /* When we Pause, we'll need the TimeoutPrevention thread to
1545              * handle sending the "Keep Alive" message to the server.
1546              * Unfortunately Live555 isn't thread safe and so can't
1547              * do this normally while the main Demux thread is handling
1548              * a live stream. We end up with the Timeout thread blocking
1549              * waiting for a response from the server. So when we PAUSE
1550              * we set a flag that the TimeoutPrevention function will check
1551              * and if it's set, it will trigger the GET_PARAMETER message */
1552             if( p_sys->b_paused && p_sys->p_timeout != NULL )
1553                 p_sys->p_timeout->b_handle_keep_alive = true;
1554             else if( !p_sys->b_paused && p_sys->p_timeout != NULL )
1555                 p_sys->p_timeout->b_handle_keep_alive = false;
1556
1557             if( !p_sys->b_paused )
1558             {
1559                 for( int i = 0; i < p_sys->i_track; i++ )
1560                 {
1561                     live_track_t *tk = p_sys->track[i];
1562                     tk->b_rtcp_sync = false;
1563                     tk->i_pts = VLC_TS_INVALID;
1564                     p_sys->i_pcr = 0;
1565                     es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1566                 }
1567             }
1568
1569             /* Reset data received counter */
1570             p_sys->i_no_data_ti = 0;
1571
1572             /* Retrieve the starttime if possible */
1573             p_sys->f_npt_start = p_sys->ms->playStartTime();
1574
1575             /* Retrieve the duration if possible */
1576             if( p_sys->ms->playEndTime() )
1577                 p_sys->f_npt_length = p_sys->ms->playEndTime();
1578
1579             msg_Dbg( p_demux, "pause start: %f stop:%f", p_sys->f_npt_start, p_sys->f_npt_length );
1580             return VLC_SUCCESS;
1581         }
1582         case DEMUX_GET_TITLE_INFO:
1583         case DEMUX_SET_TITLE:
1584         case DEMUX_SET_SEEKPOINT:
1585             return VLC_EGENERIC;
1586
1587         case DEMUX_GET_PTS_DELAY:
1588             pi64 = (int64_t*)va_arg( args, int64_t * );
1589             *pi64 = INT64_C(1000)
1590                   * var_InheritInteger( p_demux, "network-caching" );
1591             return VLC_SUCCESS;
1592
1593         default:
1594             return VLC_EGENERIC;
1595     }
1596 }
1597
1598 /*****************************************************************************
1599  * RollOverTcp: reopen the rtsp into TCP mode
1600  * XXX: ugly, a lot of code are duplicated from Open()
1601  * This should REALLY be fixed
1602  *****************************************************************************/
1603 static int RollOverTcp( demux_t *p_demux )
1604 {
1605     demux_sys_t *p_sys = p_demux->p_sys;
1606     int i, i_return;
1607
1608     var_SetBool( p_demux, "rtsp-tcp", true );
1609
1610     /* We close the old RTSP session */
1611     p_sys->rtsp->sendTeardownCommand( *p_sys->ms, NULL );
1612     Medium::close( p_sys->ms );
1613     RTSPClient::close( p_sys->rtsp );
1614
1615     for( i = 0; i < p_sys->i_track; i++ )
1616     {
1617         live_track_t *tk = p_sys->track[i];
1618
1619         if( tk->b_muxed ) stream_Delete( tk->p_out_muxed );
1620         if( tk->p_es ) es_out_Del( p_demux->out, tk->p_es );
1621         if( tk->p_asf_block ) block_Release( tk->p_asf_block );
1622         es_format_Clean( &tk->fmt );
1623         free( tk->p_buffer );
1624         free( tk );
1625     }
1626     TAB_CLEAN( p_sys->i_track, p_sys->track );
1627     if( p_sys->p_out_asf ) stream_Delete( p_sys->p_out_asf );
1628
1629     p_sys->ms = NULL;
1630     p_sys->rtsp = NULL;
1631     p_sys->b_no_data = true;
1632     p_sys->i_no_data_ti = 0;
1633     p_sys->p_out_asf = NULL;
1634
1635     /* Reopen rtsp client */
1636     if( ( i_return = Connect( p_demux ) ) != VLC_SUCCESS )
1637     {
1638         msg_Err( p_demux, "Failed to connect with rtsp://%s",
1639                  p_sys->psz_path );
1640         goto error;
1641     }
1642
1643     if( p_sys->p_sdp == NULL )
1644     {
1645         msg_Err( p_demux, "Failed to retrieve the RTSP Session Description" );
1646         goto error;
1647     }
1648
1649     if( ( i_return = SessionsSetup( p_demux ) ) != VLC_SUCCESS )
1650     {
1651         msg_Err( p_demux, "Nothing to play for rtsp://%s", p_sys->psz_path );
1652         goto error;
1653     }
1654
1655     if( ( i_return = Play( p_demux ) ) != VLC_SUCCESS )
1656         goto error;
1657
1658     return VLC_SUCCESS;
1659
1660 error:
1661     return VLC_EGENERIC;
1662 }
1663
1664
1665 /*****************************************************************************
1666  *
1667  *****************************************************************************/
1668 static block_t *StreamParseAsf( demux_t *p_demux, live_track_t *tk,
1669                                 bool b_marker,
1670                                 const uint8_t *p_data, unsigned i_size )
1671 {
1672     const unsigned i_packet_size = p_demux->p_sys->asfh.i_min_data_packet_size;
1673     block_t *p_list = NULL;
1674
1675     while( i_size >= 4 )
1676     {
1677         unsigned i_flags = p_data[0];
1678         unsigned i_length_offset = (p_data[1] << 16) |
1679                                    (p_data[2] <<  8) |
1680                                    (p_data[3]      );
1681         bool b_length = i_flags & 0x40;
1682         bool b_relative_ts = i_flags & 0x20;
1683         bool b_duration = i_flags & 0x10;
1684         bool b_location_id = i_flags & 0x08;
1685
1686         //msg_Dbg( p_demux, "ASF: marker=%d size=%d : %c=%d id=%d",
1687         //         b_marker, i_size, b_length ? 'L' : 'O', i_length_offset );
1688         unsigned i_header_size = 4;
1689         if( b_relative_ts )
1690             i_header_size += 4;
1691         if( b_duration )
1692             i_header_size += 4;
1693         if( b_location_id )
1694             i_header_size += 4;
1695
1696         if( i_header_size > i_size )
1697         {
1698             msg_Warn( p_demux, "Invalid header size" );
1699             break;
1700         }
1701
1702         /* XXX
1703          * When b_length is true, the streams I found do not seems to respect
1704          * the documentation.
1705          * From them, I have failed to find which choice between '__MIN()' or
1706          * 'i_length_offset - i_header_size' is the right one.
1707          */
1708         unsigned i_payload;
1709         if( b_length )
1710             i_payload = __MIN( i_length_offset, i_size - i_header_size);
1711         else
1712             i_payload = i_size - i_header_size;
1713
1714         if( !tk->p_asf_block )
1715         {
1716             tk->p_asf_block = block_Alloc( i_packet_size );
1717             if( !tk->p_asf_block )
1718                 break;
1719             tk->p_asf_block->i_buffer = 0;
1720         }
1721         unsigned i_offset  = b_length ? 0 : i_length_offset;
1722         if( i_offset == tk->p_asf_block->i_buffer && i_offset + i_payload <= i_packet_size )
1723         {
1724             memcpy( &tk->p_asf_block->p_buffer[i_offset], &p_data[i_header_size], i_payload );
1725             tk->p_asf_block->i_buffer += i_payload;
1726             if( b_marker )
1727             {
1728                 /* We have a complete packet */
1729                 tk->p_asf_block->i_buffer = i_packet_size;
1730                 block_ChainAppend( &p_list, tk->p_asf_block );
1731                 tk->p_asf_block = NULL;
1732             }
1733         }
1734         else
1735         {
1736             /* Reset on broken stream */
1737             msg_Err( p_demux, "Broken packet detected (%d vs %zu or %d + %d vs %d)",
1738                      i_offset, tk->p_asf_block->i_buffer, i_offset, i_payload, i_packet_size);
1739             tk->p_asf_block->i_buffer = 0;
1740         }
1741
1742         /* */
1743         p_data += i_header_size + i_payload;
1744         i_size -= i_header_size + i_payload;
1745     }
1746     return p_list;
1747 }
1748
1749 /*****************************************************************************
1750  *
1751  *****************************************************************************/
1752 static void StreamRead( void *p_private, unsigned int i_size,
1753                         unsigned int i_truncated_bytes, struct timeval pts,
1754                         unsigned int duration )
1755 {
1756     VLC_UNUSED( duration );
1757
1758     live_track_t   *tk = (live_track_t*)p_private;
1759     demux_t        *p_demux = tk->p_demux;
1760     demux_sys_t    *p_sys = p_demux->p_sys;
1761     block_t        *p_block;
1762
1763     //msg_Dbg( p_demux, "pts: %d", pts.tv_sec );
1764
1765     int64_t i_pts = (int64_t)pts.tv_sec * INT64_C(1000000) +
1766         (int64_t)pts.tv_usec;
1767
1768     /* XXX Beurk beurk beurk Avoid having negative value XXX */
1769     i_pts &= INT64_C(0x00ffffffffffffff);
1770
1771     /* Retrieve NPT for this pts */
1772     tk->f_npt = tk->sub->getNormalPlayTime(pts);
1773
1774     if( tk->b_quicktime && tk->p_es == NULL )
1775     {
1776         QuickTimeGenericRTPSource *qtRTPSource =
1777             (QuickTimeGenericRTPSource*)tk->sub->rtpSource();
1778         QuickTimeGenericRTPSource::QTState &qtState = qtRTPSource->qtState;
1779         uint8_t *sdAtom = (uint8_t*)&qtState.sdAtom[4];
1780
1781         /* Get codec informations from the quicktime atoms :
1782          * http://developer.apple.com/quicktime/icefloe/dispatch026.html */
1783         if( tk->fmt.i_cat == VIDEO_ES ) {
1784             if( qtState.sdAtomSize < 16 + 32 )
1785             {
1786                 /* invalid */
1787                 p_sys->event_data = 0xff;
1788                 tk->waiting = 0;
1789                 return;
1790             }
1791             tk->fmt.i_codec = VLC_FOURCC(sdAtom[0],sdAtom[1],sdAtom[2],sdAtom[3]);
1792             tk->fmt.video.i_width  = (sdAtom[28] << 8) | sdAtom[29];
1793             tk->fmt.video.i_height = (sdAtom[30] << 8) | sdAtom[31];
1794
1795             if( tk->fmt.i_codec == VLC_FOURCC('a', 'v', 'c', '1') )
1796             {
1797                 uint8_t *pos = (uint8_t*)qtRTPSource->qtState.sdAtom + 86;
1798                 uint8_t *endpos = (uint8_t*)qtRTPSource->qtState.sdAtom
1799                                   + qtRTPSource->qtState.sdAtomSize;
1800                 while (pos+8 < endpos) {
1801                     unsigned int atomLength = pos[0]<<24 | pos[1]<<16 | pos[2]<<8 | pos[3];
1802                     if( atomLength == 0 || atomLength > (unsigned int)(endpos-pos)) break;
1803                     if( memcmp(pos+4, "avcC", 4) == 0 &&
1804                         atomLength > 8 &&
1805                         atomLength <= INT_MAX )
1806                     {
1807                         tk->fmt.i_extra = atomLength-8;
1808                         tk->fmt.p_extra = xmalloc( tk->fmt.i_extra );
1809                         memcpy(tk->fmt.p_extra, pos+8, atomLength-8);
1810                         break;
1811                     }
1812                     pos += atomLength;
1813                 }
1814             }
1815             else
1816             {
1817                 tk->fmt.i_extra        = qtState.sdAtomSize - 16;
1818                 tk->fmt.p_extra        = xmalloc( tk->fmt.i_extra );
1819                 memcpy( tk->fmt.p_extra, &sdAtom[12], tk->fmt.i_extra );
1820             }
1821         }
1822         else {
1823             if( qtState.sdAtomSize < 24 )
1824             {
1825                 /* invalid */
1826                 p_sys->event_data = 0xff;
1827                 tk->waiting = 0;
1828                 return;
1829             }
1830             tk->fmt.i_codec = VLC_FOURCC(sdAtom[0],sdAtom[1],sdAtom[2],sdAtom[3]);
1831             tk->fmt.audio.i_bitspersample = (sdAtom[22] << 8) | sdAtom[23];
1832         }
1833         tk->p_es = es_out_Add( p_demux->out, &tk->fmt );
1834     }
1835
1836 #if 0
1837     fprintf( stderr, "StreamRead size=%d pts=%lld\n",
1838              i_size,
1839              pts.tv_sec * 1000000LL + pts.tv_usec );
1840 #endif
1841
1842     /* grow buffer if it looks like buffer is too small, but don't eat
1843      * up all the memory on strange streams */
1844     if( i_truncated_bytes > 0 )
1845     {
1846         if( tk->i_buffer < 2000000 )
1847         {
1848             void *p_tmp;
1849             msg_Dbg( p_demux, "lost %d bytes", i_truncated_bytes );
1850             msg_Dbg( p_demux, "increasing buffer size to %d", tk->i_buffer * 2 );
1851             p_tmp = realloc( tk->p_buffer, tk->i_buffer * 2 );
1852             if( p_tmp == NULL )
1853             {
1854                 msg_Warn( p_demux, "realloc failed" );
1855             }
1856             else
1857             {
1858                 tk->p_buffer = (uint8_t*)p_tmp;
1859                 tk->i_buffer *= 2;
1860             }
1861         }
1862
1863         if( tk->b_discard_trunc )
1864         {
1865             p_sys->event_data = 0xff;
1866             tk->waiting = 0;
1867             return;
1868         }
1869     }
1870
1871     assert( i_size <= tk->i_buffer );
1872
1873     if( tk->fmt.i_codec == VLC_CODEC_AMR_NB ||
1874         tk->fmt.i_codec == VLC_CODEC_AMR_WB )
1875     {
1876         AMRAudioSource *amrSource = (AMRAudioSource*)tk->sub->readSource();
1877
1878         p_block = block_Alloc( i_size + 1 );
1879         p_block->p_buffer[0] = amrSource->lastFrameHeader();
1880         memcpy( p_block->p_buffer + 1, tk->p_buffer, i_size );
1881     }
1882     else if( tk->fmt.i_codec == VLC_CODEC_H261 )
1883     {
1884         H261VideoRTPSource *h261Source = (H261VideoRTPSource*)tk->sub->rtpSource();
1885         uint32_t header = h261Source->lastSpecialHeader();
1886         p_block = block_Alloc( i_size + 4 );
1887         memcpy( p_block->p_buffer, &header, 4 );
1888         memcpy( p_block->p_buffer + 4, tk->p_buffer, i_size );
1889
1890         if( tk->sub->rtpSource()->curPacketMarkerBit() )
1891             p_block->i_flags |= BLOCK_FLAG_END_OF_FRAME;
1892     }
1893     else if( tk->fmt.i_codec == VLC_CODEC_H264 )
1894     {
1895         if( (tk->p_buffer[0] & 0x1f) >= 24 )
1896             msg_Warn( p_demux, "unsupported NAL type for H264" );
1897
1898         /* Normal NAL type */
1899         p_block = block_Alloc( i_size + 4 );
1900         p_block->p_buffer[0] = 0x00;
1901         p_block->p_buffer[1] = 0x00;
1902         p_block->p_buffer[2] = 0x00;
1903         p_block->p_buffer[3] = 0x01;
1904         memcpy( &p_block->p_buffer[4], tk->p_buffer, i_size );
1905     }
1906     else if( tk->b_asf )
1907     {
1908         p_block = StreamParseAsf( p_demux, tk,
1909                                   tk->sub->rtpSource()->curPacketMarkerBit(),
1910                                   tk->p_buffer, i_size );
1911     }
1912     else
1913     {
1914         p_block = block_Alloc( i_size );
1915         memcpy( p_block->p_buffer, tk->p_buffer, i_size );
1916     }
1917
1918     if( p_sys->i_pcr < i_pts )
1919     {
1920         p_sys->i_pcr = i_pts;
1921     }
1922
1923     /* Update our global npt value */
1924     if( tk->f_npt > 0 &&
1925         ( tk->f_npt < p_sys->f_npt_length || p_sys->f_npt_length <= 0 ) )
1926         p_sys->f_npt = tk->f_npt;
1927
1928     if( p_block )
1929     {
1930         if( !tk->b_muxed && !tk->b_asf )
1931         {
1932             if( i_pts != tk->i_pts )
1933                 p_block->i_pts = VLC_TS_0 + i_pts;
1934             /*FIXME: for h264 you should check that packetization-mode=1 in sdp-file */
1935             p_block->i_dts = ( tk->fmt.i_codec == VLC_CODEC_MPGV ) ? VLC_TS_INVALID : (VLC_TS_0 + i_pts);
1936         }
1937
1938         if( tk->b_muxed )
1939             stream_DemuxSend( tk->p_out_muxed, p_block );
1940         else if( tk->b_asf )
1941             stream_DemuxSend( p_sys->p_out_asf, p_block );
1942         else
1943             es_out_Send( p_demux->out, tk->p_es, p_block );
1944     }
1945
1946     /* warn that's ok */
1947     p_sys->event_data = 0xff;
1948
1949     /* we have read data */
1950     tk->waiting = 0;
1951     p_demux->p_sys->b_no_data = false;
1952     p_demux->p_sys->i_no_data_ti = 0;
1953
1954     if( i_pts > 0 && !tk->b_muxed )
1955     {
1956         tk->i_pts = i_pts;
1957     }
1958 }
1959
1960 /*****************************************************************************
1961  *
1962  *****************************************************************************/
1963 static void StreamClose( void *p_private )
1964 {
1965     live_track_t   *tk = (live_track_t*)p_private;
1966     demux_t        *p_demux = tk->p_demux;
1967     demux_sys_t    *p_sys = p_demux->p_sys;
1968     tk->b_selected = false;
1969     p_sys->event_rtsp = 0xff;
1970     p_sys->event_data = 0xff;
1971
1972     if( tk->p_es )
1973         es_out_Control( p_demux->out, ES_OUT_SET_ES_STATE, tk->p_es, false );
1974
1975     int nb_tracks = 0;
1976     for( int i = 0; i < p_sys->i_track; i++ )
1977     {
1978         if( p_sys->track[i]->b_selected )
1979             nb_tracks++;
1980     }
1981     msg_Dbg( p_demux, "RTSP track Close, %d track remaining", nb_tracks );
1982     if( !nb_tracks )
1983         p_sys->b_error = true;
1984 }
1985
1986
1987 /*****************************************************************************
1988  *
1989  *****************************************************************************/
1990 static void TaskInterruptRTSP( void *p_private )
1991 {
1992     demux_t *p_demux = (demux_t*)p_private;
1993
1994     /* Avoid lock */
1995     p_demux->p_sys->event_rtsp = 0xff;
1996 }
1997
1998 static void TaskInterruptData( void *p_private )
1999 {
2000     demux_t *p_demux = (demux_t*)p_private;
2001
2002     p_demux->p_sys->i_no_data_ti++;
2003
2004     /* Avoid lock */
2005     p_demux->p_sys->event_data = 0xff;
2006 }
2007
2008 /*****************************************************************************
2009  *
2010  *****************************************************************************/
2011 VLC_NORETURN
2012 static void* TimeoutPrevention( void *p_data )
2013 {
2014     timeout_thread_t *p_timeout = (timeout_thread_t *)p_data;
2015
2016     for( ;; )
2017     {
2018         /* Voodoo (= no) thread safety here! *Ahem* */
2019         if( p_timeout->b_handle_keep_alive )
2020         {
2021             char *psz_bye = NULL;
2022             int canc = vlc_savecancel ();
2023
2024             p_timeout->p_sys->rtsp->sendGetParameterCommand( *p_timeout->p_sys->ms, NULL, psz_bye );
2025             vlc_restorecancel (canc);
2026         }
2027         p_timeout->p_sys->b_timeout_call = !p_timeout->b_handle_keep_alive;
2028
2029         msleep (((int64_t)p_timeout->p_sys->i_timeout - 2) * CLOCK_FREQ);
2030     }
2031     assert(0); /* dead code */
2032 }
2033
2034 /*****************************************************************************
2035  *
2036  *****************************************************************************/
2037 static int ParseASF( demux_t *p_demux )
2038 {
2039     demux_sys_t    *p_sys = p_demux->p_sys;
2040
2041     const char *psz_marker = "a=pgmpu:data:application/vnd.ms.wms-hdr.asfv1;base64,";
2042     char *psz_asf = strcasestr( p_sys->p_sdp, psz_marker );
2043     char *psz_end;
2044     block_t *p_header;
2045
2046     /* Parse the asf header */
2047     if( psz_asf == NULL )
2048         return VLC_EGENERIC;
2049
2050     psz_asf += strlen( psz_marker );
2051     psz_asf = strdup( psz_asf );    /* Duplicate it */
2052     psz_end = strchr( psz_asf, '\n' );
2053
2054     while( psz_end > psz_asf && ( *psz_end == '\n' || *psz_end == '\r' ) )
2055         *psz_end-- = '\0';
2056
2057     if( psz_asf >= psz_end )
2058     {
2059         free( psz_asf );
2060         return VLC_EGENERIC;
2061     }
2062
2063     /* Always smaller */
2064     p_header = block_Alloc( psz_end - psz_asf );
2065     p_header->i_buffer = vlc_b64_decode_binary_to_buffer( p_header->p_buffer,
2066                                                p_header->i_buffer, psz_asf );
2067     //msg_Dbg( p_demux, "Size=%d Hdrb64=%s", p_header->i_buffer, psz_asf );
2068     if( p_header->i_buffer <= 0 )
2069     {
2070         free( psz_asf );
2071         return VLC_EGENERIC;
2072     }
2073
2074     /* Parse it to get packet size */
2075     asf_HeaderParse( &p_sys->asfh, p_header->p_buffer, p_header->i_buffer );
2076
2077     /* Send it to demuxer */
2078     stream_DemuxSend( p_sys->p_out_asf, p_header );
2079
2080     free( psz_asf );
2081     return VLC_SUCCESS;
2082 }
2083
2084
2085 static unsigned char* parseH264ConfigStr( char const* configStr,
2086                                           unsigned int& configSize )
2087 {
2088     char *dup, *psz;
2089     size_t i_records = 1;
2090
2091     configSize = 0;
2092
2093     if( configStr == NULL || *configStr == '\0' )
2094         return NULL;
2095
2096     psz = dup = strdup( configStr );
2097
2098     /* Count the number of commas */
2099     for( psz = dup; *psz != '\0'; ++psz )
2100     {
2101         if( *psz == ',')
2102         {
2103             ++i_records;
2104             *psz = '\0';
2105         }
2106     }
2107
2108     size_t configMax = 5*strlen(dup);
2109     unsigned char *cfg = new unsigned char[configMax];
2110     psz = dup;
2111     for( size_t i = 0; i < i_records; ++i )
2112     {
2113         cfg[configSize++] = 0x00;
2114         cfg[configSize++] = 0x00;
2115         cfg[configSize++] = 0x00;
2116         cfg[configSize++] = 0x01;
2117
2118         configSize += vlc_b64_decode_binary_to_buffer( cfg+configSize,
2119                                           configMax-configSize, psz );
2120         psz += strlen(psz)+1;
2121     }
2122
2123     free( dup );
2124     return cfg;
2125 }