]> git.sesse.net Git - vlc/blob - modules/demux/live555.cpp
Rewrite of live555 demux (TODO: RTPInfo support)
[vlc] / modules / demux / live555.cpp
1 /*****************************************************************************
2  * live555.cpp : LIVE555 Streaming Media support.
3  *****************************************************************************
4  * Copyright (C) 2003-2007 the VideoLAN team
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  *
11  * This program is free software; you can redistribute it and/or modify
12  * it under the terms of the GNU General Public License as published by
13  * the Free Software Foundation; either version 2 of the License, or
14  * (at your option) any later version.
15  *
16  * This program is distributed in the hope that it will be useful,
17  * but WITHOUT ANY WARRANTY; without even the implied warranty of
18  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
19  * GNU General Public License for more details.
20  *
21  * You should have received a copy of the GNU General Public License
22  * along with this program; if not, write to the Free Software
23  * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
24  *****************************************************************************/
25
26 /*****************************************************************************
27  * Preamble
28  *****************************************************************************/
29
30 #include <vlc/vlc.h>
31 #include <stdlib.h>                                      /* malloc(), free() */
32 #include <string.h>
33
34 #include <vlc_demux.h>
35 #include <vlc_interface.h>
36 #include <vlc_network.h>
37
38 #include <iostream>
39
40 #if defined( WIN32 )
41 #   include <winsock2.h>
42 #endif
43
44 #include "BasicUsageEnvironment.hh"
45 #include "GroupsockHelper.hh"
46 #include "liveMedia.hh"
47
48 extern "C" {
49 #include "../access/mms/asf.h"  /* Who said ugly ? */
50 }
51
52 using namespace std;
53
54 /*****************************************************************************
55  * Module descriptor
56  *****************************************************************************/
57 static int  Open ( vlc_object_t * );
58 static void Close( vlc_object_t * );
59
60 #define CACHING_TEXT N_("Caching value (ms)")
61 #define CACHING_LONGTEXT N_( \
62     "Allows you to modify the default caching value for RTSP streams. This " \
63     "value should be set in millisecond units." )
64
65 #define KASENNA_TEXT N_( "Kasenna RTSP dialect")
66 #define KASENNA_LONGTEXT N_( "Kasenna servers use an old and unstandard " \
67     "dialect of RTSP. When you set this parameter, VLC will try this dialect "\
68     "for communication. In this mode you cannot connect to normal RTSP servers." )
69
70 #define USER_TEXT N_("RTSP user name")
71 #define USER_LONGTEXT N_("Allows you to modify the user name that will " \
72     "be used for authenticating the connection.")
73 #define PASS_TEXT N_("RTSP password")
74 #define PASS_LONGTEXT N_("Allows you to modify the password that will be " \
75     "used for the connection.")
76
77 vlc_module_begin();
78     set_description( _("RTP/RTSP/SDP demuxer (using Live555)" ) );
79     set_capability( "demux2", 50 );
80     set_shortname( "RTP/RTSP");
81     set_callbacks( Open, Close );
82     add_shortcut( "live" );
83     add_shortcut( "livedotcom" );
84     set_category( CAT_INPUT );
85     set_subcategory( SUBCAT_INPUT_DEMUX );
86
87     add_submodule();
88         set_description( _("RTSP/RTP access and demux") );
89         add_shortcut( "rtsp" );
90         add_shortcut( "sdp" );
91         set_capability( "access_demux", 0 );
92         set_callbacks( Open, Close );
93         add_bool( "rtsp-tcp", 0, NULL,
94                   N_("Use RTP over RTSP (TCP)"),
95                   N_("Use RTP over RTSP (TCP)"), VLC_TRUE );
96         add_integer( "rtp-client-port", -1, NULL,
97                   N_("Client port"),
98                   N_("Port to use for the RTP source of the session"), VLC_TRUE );
99         add_bool( "rtsp-http", 0, NULL,
100                   N_("Tunnel RTSP and RTP over HTTP"),
101                   N_("Tunnel RTSP and RTP over HTTP"), VLC_TRUE );
102         add_integer( "rtsp-http-port", 80, NULL,
103                   N_("HTTP tunnel port"),
104                   N_("Port to use for tunneling the RTSP/RTP over HTTP."),
105                   VLC_TRUE );
106         add_integer("rtsp-caching", 4 * DEFAULT_PTS_DELAY / 1000, NULL,
107                     CACHING_TEXT, CACHING_LONGTEXT, VLC_TRUE );
108         add_bool(   "rtsp-kasenna", VLC_FALSE, NULL, KASENNA_TEXT,
109                     KASENNA_LONGTEXT, VLC_TRUE );
110         add_string( "rtsp-user", NULL, NULL, USER_TEXT,
111                     USER_LONGTEXT, VLC_TRUE );
112         add_string( "rtsp-pwd", NULL, NULL, PASS_TEXT,
113                     PASS_LONGTEXT, VLC_TRUE );
114 vlc_module_end();
115
116
117 /*****************************************************************************
118  * Local prototypes
119  *****************************************************************************/
120
121 typedef struct
122 {
123     demux_t         *p_demux;
124     MediaSubsession *sub;
125
126     es_format_t     fmt;
127     es_out_id_t     *p_es;
128
129     vlc_bool_t      b_muxed;
130     vlc_bool_t      b_quicktime;
131     vlc_bool_t      b_asf;
132     stream_t        *p_out_muxed;    /* for muxed stream */
133
134     uint8_t         *p_buffer;
135     unsigned int    i_buffer;
136
137     vlc_bool_t      b_rtcp_sync;
138     char            waiting;
139     int64_t         i_pts;
140     u_int32_t       i_start_seq;
141
142 } live_track_t;
143
144 struct timeout_thread_t
145 {
146     VLC_COMMON_MEMBERS
147
148     int64_t      i_remain;
149     demux_sys_t  *p_sys;
150 };
151
152 struct demux_sys_t
153 {
154     char            *p_sdp;    /* XXX mallocated */
155     char            *psz_path; /* URL-encoded path */
156
157     MediaSession     *ms;
158     TaskScheduler    *scheduler;
159     UsageEnvironment *env ;
160     RTSPClient       *rtsp;
161
162     /* */
163     int              i_track;
164     live_track_t     **track;   /* XXX mallocated */
165
166     /* Weird formats */
167     asf_header_t     asfh;
168     stream_t         *p_out_asf;
169     vlc_bool_t       b_real;
170
171     /* */
172     int64_t          i_pcr; /* The clock */
173     int64_t          i_npt; /* The current time in the stream */
174     int64_t          i_npt_length;
175     int64_t          i_npt_start;
176
177     /* timeout thread information */
178     int              i_timeout;     /* session timeout value in seconds */
179     vlc_bool_t       b_timeout_call;/* mark to send an RTSP call to prevent server timeout */
180     timeout_thread_t *p_timeout;    /* the actual thread that makes sure we don't timeout */
181
182     /* */
183     vlc_bool_t       b_multicast;   /* true if one of the tracks is multicasted */
184     vlc_bool_t       b_no_data;     /* true if we never receive any data */
185     int              i_no_data_ti;  /* consecutive number of TaskInterrupt */
186
187     char             event;
188 };
189
190 static int Demux  ( demux_t * );
191 static int Control( demux_t *, int, va_list );
192
193 static int Connect      ( demux_t * );
194 static int SessionsSetup( demux_t * );
195 static int Play         ( demux_t *);
196 static int ParseASF     ( demux_t * );
197 static int RollOverTcp  ( demux_t * );
198
199 static void StreamRead  ( void *, unsigned int, unsigned int,
200                           struct timeval, unsigned int );
201 static void StreamClose ( void * );
202 static void TaskInterrupt( void * );
203
204 static void TimeoutPrevention( timeout_thread_t * );
205
206 static unsigned char* parseH264ConfigStr( char const* configStr,
207                                           unsigned int& configSize );
208
209 /*****************************************************************************
210  * DemuxOpen:
211  *****************************************************************************/
212 static int  Open ( vlc_object_t *p_this )
213 {
214     demux_t     *p_demux = (demux_t*)p_this;
215     demux_sys_t *p_sys = NULL;
216
217     MediaSubsessionIterator *iter   = NULL;
218     MediaSubsession         *sub    = NULL;
219     int i, i_return;
220
221     if( p_demux->s )
222     {
223         /* See if it looks like a SDP
224            v, o, s fields are mandatory and in this order */
225         uint8_t *p_peek;
226         if( stream_Peek( p_demux->s, &p_peek, 7 ) < 7 ) return VLC_EGENERIC;
227
228         if( memcmp( (char*)p_peek, "v=0\r\n", 5 ) &&
229             memcmp( (char*)p_peek, "v=0\n", 4 ) &&
230             ( p_peek[0] < 'a' || p_peek[0] > 'z' || p_peek[1] != '=' ) )
231         {
232             return VLC_EGENERIC;
233         }
234     }
235     else
236     {
237         var_Create( p_demux, "rtsp-caching", VLC_VAR_INTEGER|VLC_VAR_DOINHERIT );
238     }
239
240     p_demux->pf_demux  = Demux;
241     p_demux->pf_control= Control;
242     p_demux->p_sys     = p_sys = (demux_sys_t*)malloc( sizeof( demux_sys_t ) );
243     if( !p_sys ) return VLC_ENOMEM;
244
245     p_sys->p_sdp = NULL;
246     p_sys->scheduler = NULL;
247     p_sys->env = NULL;
248     p_sys->ms = NULL;
249     p_sys->rtsp = NULL;
250     p_sys->i_track = 0;
251     p_sys->track   = NULL;
252     p_sys->i_pcr = 0;
253     p_sys->i_npt = 0;
254     p_sys->i_npt_start = 0;
255     p_sys->i_npt_length = 0;
256     p_sys->p_out_asf = NULL;
257     p_sys->b_no_data = VLC_TRUE;
258     p_sys->i_no_data_ti = 0;
259     p_sys->p_timeout = NULL;
260     p_sys->i_timeout = 0;
261     p_sys->b_timeout_call = VLC_FALSE;
262     p_sys->b_multicast = VLC_FALSE;
263     p_sys->b_real = VLC_FALSE;
264     p_sys->psz_path = strdup( p_demux->psz_path );
265
266     if( ( p_sys->scheduler = BasicTaskScheduler::createNew() ) == NULL )
267     {
268         msg_Err( p_demux, "BasicTaskScheduler::createNew failed" );
269         goto error;
270     }
271     if( !( p_sys->env = BasicUsageEnvironment::createNew(*p_sys->scheduler) ) )
272     {
273         msg_Err( p_demux, "BasicUsageEnvironment::createNew failed" );
274         goto error;
275     }
276
277     if( strcasecmp( p_demux->psz_access, "sdp" ) )
278     {
279         char *p = p_sys->psz_path;
280         while( (p = strchr( p, ' ' )) != NULL ) *p = '+';
281     }
282
283     if( p_demux->s != NULL )
284     {
285         /* Gather the complete sdp file */
286         int     i_sdp       = 0;
287         int     i_sdp_max   = 1000;
288         uint8_t *p_sdp      = (uint8_t*) malloc( i_sdp_max );
289
290         for( ;; )
291         {
292             int i_read = stream_Read( p_demux->s, &p_sdp[i_sdp],
293                                       i_sdp_max - i_sdp - 1 );
294
295             if( i_read < 0 )
296             {
297                 msg_Err( p_demux, "failed to read SDP" );
298                 free( p_sys );
299                 return VLC_EGENERIC;
300             }
301
302             i_sdp += i_read;
303
304             if( i_read < i_sdp_max - i_sdp - 1 )
305             {
306                 p_sdp[i_sdp] = '\0';
307                 break;
308             }
309
310             i_sdp_max += 1000;
311             p_sdp = (uint8_t*)realloc( p_sdp, i_sdp_max );
312         }
313         p_sys->p_sdp = (char*)p_sdp;
314     }
315     else if( p_demux->s == NULL && !strcasecmp( p_demux->psz_access, "sdp" ) )
316     {
317         /* sdp:// link from SAP */
318         p_sys->p_sdp = strdup( p_sys->psz_path );
319     }
320     else if( ( i_return = Connect( p_demux ) ) != VLC_SUCCESS )
321     {
322         msg_Err( p_demux, "Failed to connect with rtsp://%s", p_sys->psz_path );
323         goto error;
324     }
325
326     if( p_sys->p_sdp == NULL )
327     {
328         msg_Err( p_demux, "Failed to retrieve the RTSP Session Description" );
329         goto error;
330     }
331
332     if( ( i_return = SessionsSetup( p_demux ) ) != VLC_SUCCESS )
333     {
334         msg_Err( p_demux, "Nothing to play for rtsp://%s", p_sys->psz_path );
335         goto error;
336     }
337
338     if( p_sys->b_real ) goto error;
339
340     if( ( i_return = Play( p_demux ) ) != VLC_SUCCESS )
341         goto error;
342
343     if( p_sys->p_out_asf && ParseASF( p_demux ) )
344     {
345         msg_Err( p_demux, "cannot find a usable asf header" );
346         /* TODO Clean tracks */
347         goto error;
348     }
349
350     if( p_sys->i_track <= 0 )
351         goto error;
352
353     return VLC_SUCCESS;
354
355 error:
356     for( i = 0; i < p_sys->i_track; i++ )
357     {
358         live_track_t *tk = p_sys->track[i];
359
360         if( tk->b_muxed ) stream_DemuxDelete( tk->p_out_muxed );
361         free( tk->p_buffer );
362         free( tk );
363     }
364
365     if( p_sys->i_track ) free( p_sys->track );
366     if( p_sys->p_out_asf ) stream_DemuxDelete( p_sys->p_out_asf );
367     if( p_sys->rtsp && p_sys->ms ) p_sys->rtsp->teardownMediaSession( *p_sys->ms );
368     if( p_sys->ms ) Medium::close( p_sys->ms );
369     if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
370     if( p_sys->env ) p_sys->env->reclaim();
371     if( p_sys->p_timeout )
372     {
373         p_sys->p_timeout->b_die = VLC_TRUE;
374         vlc_thread_join( p_sys->p_timeout );
375         vlc_object_detach( p_sys->p_timeout );
376         vlc_object_destroy( p_sys->p_timeout );
377     }
378     if( p_sys->scheduler ) delete p_sys->scheduler;
379     if( p_sys->p_sdp ) free( p_sys->p_sdp );
380     if( p_sys->psz_path ) free( p_sys->psz_path );
381
382     free( p_sys );
383     return VLC_EGENERIC;
384 }
385
386 /*****************************************************************************
387  * DemuxClose:
388  *****************************************************************************/
389 static void Close( vlc_object_t *p_this )
390 {
391     demux_t *p_demux = (demux_t*)p_this;
392     demux_sys_t *p_sys = p_demux->p_sys;
393     int i;
394
395     for( i = 0; i < p_sys->i_track; i++ )
396     {
397         live_track_t *tk = p_sys->track[i];
398
399         if( tk->b_muxed ) stream_DemuxDelete( tk->p_out_muxed );
400         free( tk->p_buffer );
401         free( tk );
402     }
403
404     if( p_sys->i_track ) free( p_sys->track );
405     if( p_sys->p_out_asf ) stream_DemuxDelete( p_sys->p_out_asf );
406     if( p_sys->rtsp && p_sys->ms ) p_sys->rtsp->teardownMediaSession( *p_sys->ms );
407     if( p_sys->ms ) Medium::close( p_sys->ms );
408     if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
409     if( p_sys->env ) p_sys->env->reclaim();
410     if( p_sys->p_timeout )
411     {
412         p_sys->p_timeout->b_die = VLC_TRUE;
413         vlc_thread_join( p_sys->p_timeout );
414         vlc_object_detach( p_sys->p_timeout );
415         vlc_object_destroy( p_sys->p_timeout );
416     }
417     if( p_sys->scheduler ) delete p_sys->scheduler;
418     if( p_sys->p_sdp ) free( p_sys->p_sdp );
419     if( p_sys->psz_path ) free( p_sys->psz_path );
420
421     free( p_sys );
422 }
423
424 /*****************************************************************************
425  * Connect: connects to the RTSP server to setup the session DESCRIBE
426  *****************************************************************************/
427 static int Connect( demux_t *p_demux )
428 {
429     demux_sys_t *p_sys = p_demux->p_sys;
430     Authenticator authenticator;
431
432     char *psz_user    = NULL;
433     char *psz_pwd     = NULL;
434     char *psz_url     = NULL;
435     char *psz_options = NULL;
436     char *p_sdp       = NULL;
437     int  i_http_port  = 0;
438     int  i_ret        = VLC_SUCCESS;
439
440 createnew:
441     if( var_CreateGetBool( p_demux, "rtsp-http" ) )
442         i_http_port = var_CreateGetInteger( p_demux, "rtsp-http-port" );
443
444     if( ( p_sys->rtsp = RTSPClient::createNew(*p_sys->env, 1 /*verbose*/,
445           "VLC media player", i_http_port ) ) == NULL )
446     {
447         msg_Err( p_demux, "RTSPClient::createNew failed (%s)",
448                  p_sys->env->getResultMsg() );
449         return VLC_EGENERIC;
450     }
451     psz_url = (char*)malloc( strlen( p_sys->psz_path ) + 8 );
452     sprintf( psz_url, "rtsp://%s", p_sys->psz_path );
453
454     psz_options = p_sys->rtsp->sendOptionsCmd( psz_url );
455     if( psz_options ) delete [] psz_options;
456
457     psz_user = var_CreateGetString( p_demux, "rtsp-user" );
458     psz_pwd  = var_CreateGetString( p_demux, "rtsp-pwd" );
459
460 describe:
461     authenticator.setUsernameAndPassword( (const char*)psz_user, (const char*)psz_pwd );
462     p_sdp = p_sys->rtsp->describeURL( psz_url,
463                 &authenticator, var_CreateGetBool( p_demux, "rtsp-kasenna" ) );
464
465     if( psz_user ) free( psz_user );
466     if( psz_pwd ) free( psz_pwd );
467
468     if( p_sdp == NULL )
469     {
470         /* failure occurred */
471         int i_code = 0;
472         const char *psz_error = p_sys->env->getResultMsg();
473
474         msg_Dbg( p_demux, "DESCRIBE failed with %d: %s", i_code, psz_error );
475         sscanf( psz_error, "%*sRTSP/%*s%3u", &i_code );
476
477         if( i_code == 401 )
478         {
479             char *psz_login = NULL; char *psz_password = NULL;
480             msg_Dbg( p_demux, "authentication failed" );
481
482             i_ret = intf_UserLoginPassword( p_demux, _("RTSP authentication"),
483                            _("Please enter a valid login name and a password."),
484                                                    &psz_login, &psz_password );
485             if( i_ret == DIALOG_OK_YES )
486             {
487                msg_Dbg( p_demux, "retrying with user=%s, pwd=%s",
488                            psz_login, psz_password );
489                if( psz_login ) psz_user = psz_login;
490                if( psz_password ) psz_pwd = psz_password;
491                goto describe;
492             }
493             if( psz_login ) free( psz_login );
494             if( psz_password ) free( psz_password );
495         }
496         else if( !var_CreateGetBool( p_demux, "rtsp-http" ) )
497         {
498             /* Perhaps a firewall is being annoying. Try HTTP tunneling mode */
499             vlc_value_t val;
500             val.b_bool = VLC_TRUE;
501             msg_Dbg( p_demux, "we will now try HTTP tunneling mode" );
502             var_Set( p_demux, "rtsp-http", val );
503             if( psz_url ) free( psz_url );
504             if( p_sys->rtsp ) RTSPClient::close( p_sys->rtsp );
505             goto createnew;
506         }
507         i_ret = VLC_EGENERIC;
508     }
509     if( psz_url ) free( psz_url );
510
511     /* malloc-ated copy */
512     if( p_sys->p_sdp ) free( p_sys->p_sdp );
513     if( p_sdp ) p_sys->p_sdp = strdup( (char*)p_sdp );
514     delete[] p_sdp;
515
516     return i_ret;
517 }
518
519 /*****************************************************************************
520  * Connect: prepares the subsessions and does the SETUP
521  *****************************************************************************/
522 static int SessionsSetup( demux_t *p_demux )
523 {
524     demux_sys_t             *p_sys  = p_demux->p_sys;
525     MediaSubsessionIterator *iter   = NULL;
526     MediaSubsession         *sub    = NULL;
527
528     vlc_bool_t     b_rtsp_tcp = VLC_FALSE;
529     int            i_client_port;
530     int            i_return = VLC_SUCCESS;
531     unsigned int   i_buffer = 0;
532     unsigned const thresh = 200000; /* RTP reorder threshold .2 second (default .1) */
533
534     b_rtsp_tcp    = var_CreateGetBool( p_demux, "rtsp-tcp" );
535     i_client_port = var_CreateGetInteger( p_demux, "rtp-client-port" );
536
537     /* Create the session from the SDP */
538     if( !( p_sys->ms = MediaSession::createNew( *p_sys->env, p_sys->p_sdp ) ) )
539     {
540         msg_Err( p_demux, "Could not create the RTSP Session: %s",
541             p_sys->env->getResultMsg() );
542         return VLC_EGENERIC;
543     }
544
545     /* Initialise each media subsession */
546     iter = new MediaSubsessionIterator( *p_sys->ms );
547     while( ( sub = iter->next() ) != NULL )
548     {
549         Boolean bInit;
550         live_track_t *tk;
551
552         /* Value taken from mplayer */
553         if( !strcmp( sub->mediumName(), "audio" ) )
554             i_buffer = 100000;
555         else if( !strcmp( sub->mediumName(), "video" ) )
556             i_buffer = 2000000;
557         else continue;
558
559         if( i_client_port != -1 )
560         {
561             sub->setClientPortNum( i_client_port );
562             i_client_port += 2;
563         }
564
565         if( strcasestr( sub->codecName(), "REAL" ) )
566         {
567             msg_Info( p_demux, "real codec detected, using real-RTSP instead" );
568             p_sys->b_real = VLC_TRUE; /* This is a problem, we'll handle it later */
569             continue;
570         }
571
572         if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
573             bInit = sub->initiate( 4 ); /* Constant ? */
574         else
575             bInit = sub->initiate();
576
577         if( !bInit )
578         {
579             msg_Warn( p_demux, "RTP subsession '%s/%s' failed (%s)",
580                       sub->mediumName(), sub->codecName(),
581                       p_sys->env->getResultMsg() );
582         }
583         else
584         {
585             if( sub->rtpSource() != NULL )
586             {
587                 int fd = sub->rtpSource()->RTPgs()->socketNum();
588
589                 /* Increase the buffer size */
590                 if( i_buffer > 0 )
591                     increaseReceiveBufferTo( *p_sys->env, fd, i_buffer );
592
593                 /* Increase the RTP reorder timebuffer just a bit */
594                 sub->rtpSource()->setPacketReorderingThresholdTime(thresh);
595             }
596             msg_Dbg( p_demux, "RTP subsession '%s/%s'", sub->mediumName(),
597                      sub->codecName() );
598
599             /* Issue the SETUP */
600             if( p_sys->rtsp )
601             {
602                 if( !( p_sys->rtsp->setupMediaSubsession( *sub, False,
603                                                    b_rtsp_tcp ? True : False ) ) )
604                 {
605                     msg_Err( p_demux, "SETUP of'%s/%s' failed %s", sub->mediumName(),
606                              sub->codecName(), p_sys->env->getResultMsg() );
607                     continue;
608                 }
609             }
610
611             /* Check if we will receive data from this subsession for this track */
612             if( sub->readSource() == NULL ) continue;
613             if( !p_sys->b_multicast )
614             {
615                 /* Check, because we need diff. rollover behaviour for multicast */
616                 p_sys->b_multicast = IsMulticastAddress( sub->connectionEndpointAddress() );
617             }
618
619             tk = (live_track_t*)malloc( sizeof( live_track_t ) );
620             tk->p_demux     = p_demux;
621             tk->sub         = sub;
622             tk->p_es        = NULL;
623             tk->b_quicktime = VLC_FALSE;
624             tk->b_asf       = VLC_FALSE;
625             tk->b_muxed     = VLC_FALSE;
626             tk->p_out_muxed = NULL;
627             tk->waiting     = 0;
628             tk->b_rtcp_sync = VLC_FALSE;
629             tk->i_pts       = 0;
630             tk->i_buffer    = 65536;
631             tk->p_buffer    = (uint8_t *)malloc( 65536 );
632
633             /* Value taken from mplayer */
634             if( !strcmp( sub->mediumName(), "audio" ) )
635             {
636                 es_format_Init( &tk->fmt, AUDIO_ES, VLC_FOURCC('u','n','d','f') );
637                 tk->fmt.audio.i_channels = sub->numChannels();
638                 tk->fmt.audio.i_rate = sub->rtpTimestampFrequency();
639
640                 if( !strcmp( sub->codecName(), "MPA" ) ||
641                     !strcmp( sub->codecName(), "MPA-ROBUST" ) ||
642                     !strcmp( sub->codecName(), "X-MP3-DRAFT-00" ) )
643                 {
644                     tk->fmt.i_codec = VLC_FOURCC( 'm', 'p', 'g', 'a' );
645                     tk->fmt.audio.i_rate = 0;
646                 }
647                 else if( !strcmp( sub->codecName(), "AC3" ) )
648                 {
649                     tk->fmt.i_codec = VLC_FOURCC( 'a', '5', '2', ' ' );
650                     tk->fmt.audio.i_rate = 0;
651                 }
652                 else if( !strcmp( sub->codecName(), "L16" ) )
653                 {
654                     tk->fmt.i_codec = VLC_FOURCC( 't', 'w', 'o', 's' );
655                     tk->fmt.audio.i_bitspersample = 16;
656                 }
657                 else if( !strcmp( sub->codecName(), "L8" ) )
658                 {
659                     tk->fmt.i_codec = VLC_FOURCC( 'a', 'r', 'a', 'w' );
660                     tk->fmt.audio.i_bitspersample = 8;
661                 }
662                 else if( !strcmp( sub->codecName(), "PCMU" ) )
663                 {
664                     tk->fmt.i_codec = VLC_FOURCC( 'u', 'l', 'a', 'w' );
665                 }
666                 else if( !strcmp( sub->codecName(), "PCMA" ) )
667                 {
668                     tk->fmt.i_codec = VLC_FOURCC( 'a', 'l', 'a', 'w' );
669                 }
670                 else if( !strncmp( sub->codecName(), "G726", 4 ) )
671                 {
672                     tk->fmt.i_codec = VLC_FOURCC( 'g', '7', '2', '6' ); 
673                     tk->fmt.audio.i_rate = 8000;
674                     tk->fmt.audio.i_channels = 1;
675                     if( !strcmp( sub->codecName()+5, "40" ) )
676                         tk->fmt.i_bitrate = 40000;
677                     else if( !strcmp( sub->codecName()+5, "32" ) )
678                         tk->fmt.i_bitrate = 32000;
679                     else if( !strcmp( sub->codecName()+5, "24" ) )
680                         tk->fmt.i_bitrate = 24000;
681                     else if( !strcmp( sub->codecName()+5, "16" ) )
682                         tk->fmt.i_bitrate = 16000;
683                 }
684                 else if( !strcmp( sub->codecName(), "AMR" ) )
685                 {
686                     tk->fmt.i_codec = VLC_FOURCC( 's', 'a', 'm', 'r' );
687                 }
688                 else if( !strcmp( sub->codecName(), "AMR-WB" ) )
689                 {
690                     tk->fmt.i_codec = VLC_FOURCC( 's', 'a', 'w', 'b' );
691                 }
692                 else if( !strcmp( sub->codecName(), "MP4A-LATM" ) )
693                 {
694                     unsigned int i_extra;
695                     uint8_t      *p_extra;
696
697                     tk->fmt.i_codec = VLC_FOURCC( 'm', 'p', '4', 'a' );
698
699                     if( ( p_extra = parseStreamMuxConfigStr( sub->fmtp_config(),
700                                                              i_extra ) ) )
701                     {
702                         tk->fmt.i_extra = i_extra;
703                         tk->fmt.p_extra = malloc( i_extra );
704                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
705                         delete[] p_extra;
706                     }
707                     /* Because the "faad" decoder does not handle the LATM data length field
708                        at the start of each returned LATM frame, tell the RTP source to omit it. */
709                     ((MPEG4LATMAudioRTPSource*)sub->rtpSource())->omitLATMDataLengthField();
710                 }
711                 else if( !strcmp( sub->codecName(), "MPEG4-GENERIC" ) )
712                 {
713                     unsigned int i_extra;
714                     uint8_t      *p_extra;
715
716                     tk->fmt.i_codec = VLC_FOURCC( 'm', 'p', '4', 'a' );
717
718                     if( ( p_extra = parseGeneralConfigStr( sub->fmtp_config(),
719                                                            i_extra ) ) )
720                     {
721                         tk->fmt.i_extra = i_extra;
722                         tk->fmt.p_extra = malloc( i_extra );
723                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
724                         delete[] p_extra;
725                     }
726                 }
727                 else if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
728                 {
729                     tk->b_asf = VLC_TRUE;
730                     if( p_sys->p_out_asf == NULL )
731                         p_sys->p_out_asf = stream_DemuxNew( p_demux, "asf",
732                                                             p_demux->out );
733                 }
734                 else if( !strcmp( sub->codecName(), "X-QT" ) ||
735                          !strcmp( sub->codecName(), "X-QUICKTIME" ) )
736                 {
737                     tk->b_quicktime = VLC_TRUE;
738                 }
739             }
740             else if( !strcmp( sub->mediumName(), "video" ) )
741             {
742                 es_format_Init( &tk->fmt, VIDEO_ES, VLC_FOURCC('u','n','d','f') );
743                 if( !strcmp( sub->codecName(), "MPV" ) )
744                 {
745                     tk->fmt.i_codec = VLC_FOURCC( 'm', 'p', 'g', 'v' );
746                 }
747                 else if( !strcmp( sub->codecName(), "H263" ) ||
748                          !strcmp( sub->codecName(), "H263-1998" ) ||
749                          !strcmp( sub->codecName(), "H263-2000" ) )
750                 {
751                     tk->fmt.i_codec = VLC_FOURCC( 'H', '2', '6', '3' );
752                 }
753                 else if( !strcmp( sub->codecName(), "H261" ) )
754                 {
755                     tk->fmt.i_codec = VLC_FOURCC( 'H', '2', '6', '1' );
756                 }
757                 else if( !strcmp( sub->codecName(), "H264" ) )
758                 {
759                     unsigned int i_extra = 0;
760                     uint8_t      *p_extra = NULL;
761
762                     tk->fmt.i_codec = VLC_FOURCC( 'h', '2', '6', '4' );
763                     tk->fmt.b_packetized = VLC_FALSE;
764
765                     if((p_extra=parseH264ConfigStr( sub->fmtp_spropparametersets(),
766                                                     i_extra ) ) )
767                     {
768                         tk->fmt.i_extra = i_extra;
769                         tk->fmt.p_extra = malloc( i_extra );
770                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
771
772                         delete[] p_extra;
773                     }
774                 }
775                 else if( !strcmp( sub->codecName(), "JPEG" ) )
776                 {
777                     tk->fmt.i_codec = VLC_FOURCC( 'M', 'J', 'P', 'G' );
778                 }
779                 else if( !strcmp( sub->codecName(), "MP4V-ES" ) )
780                 {
781                     unsigned int i_extra;
782                     uint8_t      *p_extra;
783
784                     tk->fmt.i_codec = VLC_FOURCC( 'm', 'p', '4', 'v' );
785
786                     if( ( p_extra = parseGeneralConfigStr( sub->fmtp_config(),
787                                                            i_extra ) ) )
788                     {
789                         tk->fmt.i_extra = i_extra;
790                         tk->fmt.p_extra = malloc( i_extra );
791                         memcpy( tk->fmt.p_extra, p_extra, i_extra );
792                         delete[] p_extra;
793                     }
794                 }
795                 else if( !strcmp( sub->codecName(), "X-QT" ) ||
796                          !strcmp( sub->codecName(), "X-QUICKTIME" ) ||
797                          !strcmp( sub->codecName(), "X-QDM" ) ||
798                          !strcmp( sub->codecName(), "X-SV3V-ES" )  ||
799                          !strcmp( sub->codecName(), "X-SORENSONVIDEO" ) )
800                 {
801                     tk->b_quicktime = VLC_TRUE;
802                 }
803                 else if( !strcmp( sub->codecName(), "MP2T" ) )
804                 {
805                     tk->b_muxed = VLC_TRUE;
806                     tk->p_out_muxed = stream_DemuxNew( p_demux, "ts", p_demux->out );
807                 }
808                 else if( !strcmp( sub->codecName(), "MP2P" ) ||
809                          !strcmp( sub->codecName(), "MP1S" ) )
810                 {
811                     tk->b_muxed = VLC_TRUE;
812                     tk->p_out_muxed = stream_DemuxNew( p_demux, "ps",
813                                                        p_demux->out );
814                 }
815                 else if( !strcmp( sub->codecName(), "X-ASF-PF" ) )
816                 {
817                     tk->b_asf = VLC_TRUE;
818                     if( p_sys->p_out_asf == NULL )
819                         p_sys->p_out_asf = stream_DemuxNew( p_demux, "asf",
820                                                             p_demux->out );;
821                 }
822             }
823
824             if( !tk->b_quicktime && !tk->b_muxed && !tk->b_asf )
825             {
826                 tk->p_es = es_out_Add( p_demux->out, &tk->fmt );
827             }
828
829             if( sub->rtcpInstance() != NULL )
830             {
831                 sub->rtcpInstance()->setByeHandler( StreamClose, tk );
832             }
833
834             if( tk->p_es || tk->b_quicktime || tk->b_muxed || tk->b_asf )
835             {
836                 /* Append */
837                 p_sys->track = (live_track_t**)realloc( p_sys->track, sizeof( live_track_t ) * ( p_sys->i_track + 1 ) );
838                 p_sys->track[p_sys->i_track++] = tk;
839             }
840             else
841             {
842                 /* BUG ??? */
843                 msg_Err( p_demux, "unusable RTSP track. this should not happen" );
844                 free( tk );
845             }
846         }
847     }
848     delete iter;
849     if( p_sys->i_track <= 0 ) i_return = VLC_EGENERIC;
850
851     /* Retrieve the starttime if possible */
852     p_sys->i_npt_start = (int64_t)( p_sys->ms->playStartTime() * (double)1000000.0 );
853     if( p_sys->i_npt_start < 0 )
854         p_sys->i_npt_start = -1;
855
856     /* Retrieve the duration if possible */
857     p_sys->i_npt_length = (int64_t)( p_sys->ms->playEndTime() * (double)1000000.0 );
858     if( p_sys->i_npt_length < 0 )
859         p_sys->i_npt_length = -1;
860
861     msg_Dbg( p_demux, "setup start: %lld stop:%lld", p_sys->i_npt_start, p_sys->i_npt_length );
862     return i_return;
863 }
864
865 /*****************************************************************************
866  * Play: starts the actual playback of the stream
867  *****************************************************************************/
868 static int Play( demux_t *p_demux )
869 {
870     demux_sys_t *p_sys = p_demux->p_sys;
871     int i;
872
873     if( p_sys->rtsp )
874     {
875         /* The PLAY */
876         if( !p_sys->rtsp->playMediaSession( *p_sys->ms, p_sys->i_npt_start, -1, 1 ) )
877         {
878             msg_Err( p_demux, "RTSP PLAY failed %s", p_sys->env->getResultMsg() );
879             return VLC_EGENERIC;
880         }
881
882         /* Retrieve the timeout value and set up a timeout prevention thread */
883         p_sys->i_timeout = p_sys->rtsp->sessionTimeoutParameter();
884         if( p_sys->i_timeout > 0 && !p_sys->p_timeout )
885         {
886             msg_Dbg( p_demux, "We have a timeout of %d seconds",  p_sys->i_timeout );
887             p_sys->p_timeout = (timeout_thread_t *)vlc_object_create( p_demux, sizeof(timeout_thread_t) );
888             p_sys->p_timeout->p_sys = p_demux->p_sys; /* lol, object recursion :D */
889             if( vlc_thread_create( p_sys->p_timeout, "liveMedia-timeout", TimeoutPrevention,
890                                    VLC_THREAD_PRIORITY_LOW, VLC_TRUE ) )
891             {
892                 msg_Err( p_demux, "cannot spawn liveMedia timeout thread" );
893                 vlc_object_destroy( p_sys->p_timeout );
894             }
895             msg_Dbg( p_demux, "spawned timeout thread" );
896             vlc_object_attach( p_sys->p_timeout, p_demux );
897         }
898     }
899     p_sys->i_pcr = 0;
900
901 #if 0
902     /* TODO */
903     for( i = 0; i < p_sys->i_track; i++ )
904     {
905         //p_sys->track[i]->i_pts = 0;
906         p_sys->track[i]->i_start_seq = (int)p_sys->track[i]->sub->rtpInfo.seqNum;
907         msg_Dbg( p_demux, "set startseq: %u", p_sys->track[i]->i_start_seq );
908     }
909 #endif
910
911     /* Retrieve the starttime if possible */
912     p_sys->i_npt_start = (int64_t)( p_sys->ms->playStartTime() * (double)1000000.0 );
913     if( p_sys->i_npt_start < 0 )
914     {
915         p_sys->i_npt_start = -1;
916         p_sys->i_npt = 0;
917     }
918     else
919         p_sys->i_npt = p_sys->i_npt_start;
920
921     /* Retrieve the duration if possible */
922     p_sys->i_npt_length = (int64_t)( p_sys->ms->playEndTime() * (double)1000000.0 );
923     if( p_sys->i_npt_length < 0 )
924         p_sys->i_npt_length = -1;
925
926     msg_Dbg( p_demux, "play start: %lld stop:%lld", p_sys->i_npt_start, p_sys->i_npt_length );
927     return VLC_SUCCESS;
928 }
929
930
931 /*****************************************************************************
932  * Demux:
933  *****************************************************************************/
934 static int Demux( demux_t *p_demux )
935 {
936     demux_sys_t    *p_sys = p_demux->p_sys;
937     TaskToken      task;
938
939     vlc_bool_t      b_send_pcr = VLC_TRUE;
940     int64_t         i_pcr = 0;
941     int             i;
942
943     /* Check if we need to send the server a Keep-A-Live signal */
944     if( p_sys->b_timeout_call && p_sys->rtsp && p_sys->ms )
945     {
946         char *psz_bye = NULL;
947         p_sys->rtsp->getMediaSessionParameter( *p_sys->ms, NULL, psz_bye );
948         p_sys->b_timeout_call = VLC_FALSE;
949     }
950
951
952     for( i = 0; i < p_sys->i_track; i++ )
953     {
954         live_track_t *tk = p_sys->track[i];
955
956         if( tk->b_asf || tk->b_muxed )
957             b_send_pcr = VLC_FALSE;
958 #if 0
959         if( i_pcr == 0 )
960         {
961             i_pcr = tk->i_pts;
962         }
963         else if( tk->i_pts != 0 && i_pcr > tk->i_pts )
964         {
965             i_pcr = tk->i_pts ;
966         }
967 #endif
968     }
969     if( p_sys->i_pcr > 0 )
970     {
971         if( b_send_pcr )
972             es_out_Control( p_demux->out, ES_OUT_SET_PCR, p_sys->i_pcr );
973     }
974
975     /* First warn we want to read data */
976     p_sys->event = 0;
977     for( i = 0; i < p_sys->i_track; i++ )
978     {
979         live_track_t *tk = p_sys->track[i];
980
981         if( tk->waiting == 0 )
982         {
983             tk->waiting = 1;
984             tk->sub->readSource()->getNextFrame( tk->p_buffer, tk->i_buffer,
985                                           StreamRead, tk, StreamClose, tk );
986         }
987     }
988     /* Create a task that will be called if we wait more than 300ms */
989     task = p_sys->scheduler->scheduleDelayedTask( 300000, TaskInterrupt, p_demux );
990
991     /* Do the read */
992     p_sys->scheduler->doEventLoop( &p_sys->event );
993
994     /* remove the task */
995     p_sys->scheduler->unscheduleDelayedTask( task );
996
997     /* Check for gap in pts value */
998     for( i = 0; i < p_sys->i_track; i++ )
999     {
1000         live_track_t *tk = p_sys->track[i];
1001
1002         if( !tk->b_muxed && !tk->b_rtcp_sync &&
1003             tk->sub->rtpSource() && tk->sub->rtpSource()->hasBeenSynchronizedUsingRTCP() )
1004         {
1005             msg_Dbg( p_demux, "tk->rtpSource->hasBeenSynchronizedUsingRTCP()" );
1006
1007             es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1008             tk->b_rtcp_sync = VLC_TRUE;
1009 #if 0
1010             /* reset PCR */
1011             tk->i_pts = 0;
1012             p_sys->i_pcr = 0;
1013             i_pcr = 0;
1014 #endif
1015         }
1016     }
1017
1018     if( p_sys->b_multicast && p_sys->b_no_data && p_sys->i_no_data_ti > 120 )
1019     {
1020         /* FIXME Make this configurable
1021         msg_Err( p_demux, "no multicast data received in 36s, aborting" );
1022         return 0;
1023         */
1024     }
1025     else if( !p_sys->b_multicast && p_sys->b_no_data && p_sys->i_no_data_ti > 34 )
1026     {
1027         vlc_bool_t b_rtsp_tcp = var_GetBool( p_demux, "rtsp-tcp" );
1028
1029         if( !b_rtsp_tcp && p_sys->rtsp && p_sys->ms )
1030         {
1031             msg_Warn( p_demux, "no data received in 10s. Switching to TCP" );
1032             if( RollOverTcp( p_demux ) )
1033             {
1034                 msg_Err( p_demux, "TCP rollover failed, aborting" );
1035                 return 0;
1036             }
1037         }
1038         else if( p_sys->i_no_data_ti > 34 )
1039         {
1040             msg_Err( p_demux, "no data received in 10s, aborting" );
1041             return 0;
1042         }
1043     }
1044     else if( !p_sys->b_multicast && p_sys->b_no_data && p_sys->i_no_data_ti > 34 )
1045     {
1046         /* EOF ? */
1047         msg_Warn( p_demux, "no data received in 10s, eof ?" );
1048         return 0;
1049     }
1050     return p_demux->b_error ? 0 : 1;
1051 }
1052
1053 /*****************************************************************************
1054  * Control:
1055  *****************************************************************************/
1056 static int Control( demux_t *p_demux, int i_query, va_list args )
1057 {
1058     demux_sys_t *p_sys = p_demux->p_sys;
1059     int64_t *pi64;
1060     double  *pf, f;
1061     vlc_bool_t *pb, b_bool;
1062
1063     switch( i_query )
1064     {
1065         case DEMUX_GET_TIME:
1066             pi64 = (int64_t*)va_arg( args, int64_t * );
1067             if( p_sys->i_npt > 0 )
1068             {
1069                 *pi64 = p_sys->i_npt;
1070                 return VLC_SUCCESS;
1071             }
1072             return VLC_EGENERIC;
1073
1074         case DEMUX_GET_LENGTH:
1075             pi64 = (int64_t*)va_arg( args, int64_t * );
1076             if( p_sys->i_npt_length > 0 )
1077             {
1078                 *pi64 = p_sys->i_npt_length;
1079                 return VLC_SUCCESS;
1080             }
1081             return VLC_EGENERIC;
1082
1083         case DEMUX_GET_POSITION:
1084             pf = (double*)va_arg( args, double* );
1085             if( p_sys->i_npt_length > 0 && p_sys->i_npt > 0 )
1086             {
1087                 *pf = (double)p_sys->i_npt / (double)p_sys->i_npt_length;
1088                 return VLC_SUCCESS;
1089             }
1090             return VLC_EGENERIC;
1091
1092         case DEMUX_SET_POSITION:
1093         {
1094             float time;
1095
1096             f = (double)va_arg( args, double );
1097             if( p_sys->rtsp && p_sys->i_npt_length > 0 )
1098             {
1099                 int i;
1100                 time = f * (double)p_sys->i_npt_length / 1000000.0;   /* in second */
1101                 if( !p_sys->rtsp->playMediaSession( *p_sys->ms, time, -1, 1 ) )
1102                 {
1103                     msg_Err( p_demux, "PLAY failed %s",
1104                         p_sys->env->getResultMsg() );
1105                     return VLC_EGENERIC;
1106                 }
1107                 es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1108                 p_sys->i_pcr = 0;
1109 #if 0
1110                 /* Retrieve RTP-Info values */
1111                 for( i = 0; i < p_sys->i_track; i++ )
1112                 {
1113                     //p_sys->track[i]->i_pts = 0;
1114                     p_sys->track[i]->i_start_seq = p_sys->track[i]->sub->rtpInfo.seqNum;
1115                     msg_Dbg( p_demux, "set pos startseq: %u", p_sys->track[i]->i_start_seq );
1116                 }
1117 #endif
1118                 /* Retrieve the starttime if possible */
1119                 p_sys->i_npt_start = (int64_t)( p_sys->ms->playStartTime() * (double)1000000.0 );
1120                 if( p_sys->i_npt_start < 0 )
1121                 {
1122                     p_sys->i_npt_start = -1;
1123                     p_sys->i_npt = 0;
1124                 }
1125                 else
1126                     p_sys->i_npt = p_sys->i_npt_start;
1127
1128                 /* Retrieve the duration if possible */
1129                 p_sys->i_npt_length = (int64_t)( p_sys->ms->playEndTime() * (double)1000000.0 );
1130                 if( p_sys->i_npt_length < 0 )
1131                     p_sys->i_npt_length = -1;
1132
1133                 msg_Dbg( p_demux, "seek start: %lld stop:%lld", p_sys->i_npt_start, p_sys->i_npt_length );
1134                 return VLC_SUCCESS;
1135             }
1136             return VLC_EGENERIC;
1137         }
1138         /* Special for access_demux */
1139         case DEMUX_CAN_PAUSE:
1140             pb = (vlc_bool_t*)va_arg( args, vlc_bool_t * );
1141             if( p_sys->rtsp && p_sys->i_npt_length )
1142                 /* Not always true, but will be handled in SET_PAUSE_STATE */
1143                 *pb = VLC_TRUE;
1144             else
1145                 *pb = VLC_FALSE;
1146             return VLC_SUCCESS;
1147
1148         case DEMUX_CAN_CONTROL_PACE:
1149             pb = (vlc_bool_t*)va_arg( args, vlc_bool_t * );
1150
1151 #if 1       /* Disable for now until we have a clock synchro algo
1152              * which works with something else than MPEG over UDP */
1153             *pb = VLC_FALSE;
1154 #else
1155             *pb = VLC_TRUE;
1156 #endif
1157             return VLC_SUCCESS;
1158
1159         case DEMUX_SET_PAUSE_STATE:
1160         {
1161             double d_npt = (double) p_sys->i_npt / I64C(1000000);
1162             int i;
1163
1164             b_bool = (vlc_bool_t)va_arg( args, vlc_bool_t );
1165             if( p_sys->rtsp == NULL )
1166                 return VLC_EGENERIC;
1167
1168             /* FIXME */
1169             if( ( b_bool && !p_sys->rtsp->pauseMediaSession( *p_sys->ms ) ) ||
1170                     ( !b_bool && !p_sys->rtsp->playMediaSession( *p_sys->ms,
1171                       d_npt > 0 ? d_npt : -1 ) ) )
1172             {
1173                     msg_Err( p_demux, "PLAY or PAUSE failed %s", p_sys->env->getResultMsg() );
1174                     return VLC_EGENERIC;
1175             }
1176             es_out_Control( p_demux->out, ES_OUT_RESET_PCR );
1177             p_sys->i_pcr = 0;
1178 #if 0
1179             for( i = 0; i < p_sys->i_track; i++ )
1180             {
1181                 //p_sys->track[i]->i_pts = 0;
1182                 p_sys->track[i]->i_start_seq = p_sys->track[i]->sub->rtpInfo.seqNum;
1183                 msg_Dbg( p_demux, "set pause startseq: %u", p_sys->track[i]->i_start_seq );
1184             }
1185 #endif
1186
1187             /* Retrieve the starttime if possible */
1188             p_sys->i_npt_start = (int64_t)( p_sys->ms->playStartTime() * (double)1000000.0 );
1189             if( p_sys->i_npt_start < 0 )
1190             {
1191                 p_sys->i_npt_start = -1;
1192                 p_sys->i_npt = 0;
1193             }
1194             else
1195                 p_sys->i_npt = p_sys->i_npt_start;
1196
1197             /* Retrieve the duration if possible */
1198             p_sys->i_npt_length = (int64_t)( p_sys->ms->playEndTime() * (double)1000000.0 );
1199             if( p_sys->i_npt_length < 0 )
1200                 p_sys->i_npt_length = -1;
1201
1202             msg_Dbg( p_demux, "pause start: %lld stop:%lld", p_sys->i_npt_start, p_sys->i_npt_length );
1203             return VLC_SUCCESS;
1204         }
1205         case DEMUX_GET_TITLE_INFO:
1206         case DEMUX_SET_TITLE:
1207         case DEMUX_SET_SEEKPOINT:
1208             return VLC_EGENERIC;
1209
1210         case DEMUX_GET_PTS_DELAY:
1211             pi64 = (int64_t*)va_arg( args, int64_t * );
1212             *pi64 = (int64_t)var_GetInteger( p_demux, "rtsp-caching" ) * 1000;
1213             return VLC_SUCCESS;
1214
1215         default:
1216             return VLC_EGENERIC;
1217     }
1218 }
1219
1220 /*****************************************************************************
1221  * RollOverTcp: reopen the rtsp into TCP mode
1222  * XXX: ugly, a lot of code are duplicated from Open()
1223  * This should REALLY be fixed
1224  *****************************************************************************/
1225 static int RollOverTcp( demux_t *p_demux )
1226 {
1227     demux_sys_t *p_sys = p_demux->p_sys;
1228     int i, i_return;
1229
1230     var_SetBool( p_demux, "rtsp-tcp", VLC_TRUE );
1231
1232     /* We close the old RTSP session */
1233     for( i = 0; i < p_sys->i_track; i++ )
1234     {
1235         live_track_t *tk = p_sys->track[i];
1236
1237         if( tk->b_muxed ) stream_DemuxDelete( tk->p_out_muxed );
1238         free( tk->p_buffer );
1239         free( tk );
1240     }
1241     if( p_sys->i_track ) free( p_sys->track );
1242     if( p_sys->p_out_asf ) stream_DemuxDelete( p_sys->p_out_asf );
1243
1244     p_sys->rtsp->teardownMediaSession( *p_sys->ms );
1245     Medium::close( p_sys->ms );
1246     RTSPClient::close( p_sys->rtsp );
1247
1248     p_sys->ms = NULL;
1249     p_sys->rtsp = NULL;
1250     p_sys->track = NULL;
1251     p_sys->i_track = 0;
1252
1253     /* Reopen rtsp client */
1254     if( p_demux->s != NULL && ( i_return = Connect( p_demux ) ) != VLC_SUCCESS )
1255     {
1256         msg_Err( p_demux, "Failed to connect with rtsp://%s", p_sys->psz_path );
1257         goto error;
1258     }
1259
1260     if( p_sys->p_sdp == NULL )
1261     {
1262         msg_Err( p_demux, "Failed to retrieve the RTSP Session Description" );
1263         goto error;
1264     }
1265
1266     if( ( i_return = SessionsSetup( p_demux ) ) != VLC_SUCCESS )
1267     {
1268         msg_Err( p_demux, "Nothing to play for rtsp://%s", p_sys->psz_path );
1269         goto error;
1270     }
1271
1272     if( ( i_return = Play( p_demux ) ) != VLC_SUCCESS )
1273         goto error;
1274
1275     return VLC_SUCCESS;
1276
1277 error:
1278     return VLC_EGENERIC;
1279 }
1280
1281
1282 /*****************************************************************************
1283  *
1284  *****************************************************************************/
1285 static void StreamRead( void *p_private, unsigned int i_size,
1286                         unsigned int i_truncated_bytes, struct timeval pts,
1287                         unsigned int duration )
1288 {
1289     live_track_t   *tk = (live_track_t*)p_private;
1290     demux_t        *p_demux = tk->p_demux;
1291     demux_sys_t    *p_sys = p_demux->p_sys;
1292     block_t        *p_block;
1293
1294     msg_Dbg( p_demux, "pts: %d", pts.tv_sec );
1295
1296     int64_t i_pts = (uint64_t)pts.tv_sec * UI64C(1000000) +
1297         (uint64_t)pts.tv_usec;
1298
1299     /* XXX Beurk beurk beurk Avoid having negative value XXX */
1300     i_pts &= UI64C(0x00ffffffffffffff);
1301
1302     if( tk->b_quicktime && tk->p_es == NULL )
1303     {
1304         QuickTimeGenericRTPSource *qtRTPSource =
1305             (QuickTimeGenericRTPSource*)tk->sub->rtpSource();
1306         QuickTimeGenericRTPSource::QTState &qtState = qtRTPSource->qtState;
1307         uint8_t *sdAtom = (uint8_t*)&qtState.sdAtom[4];
1308
1309         if( tk->fmt.i_cat == VIDEO_ES ) {
1310             if( qtState.sdAtomSize < 16 + 32 )
1311             {
1312                 /* invalid */
1313                 p_sys->event = 0xff;
1314                 tk->waiting = 0;
1315                 return;
1316             }
1317             tk->fmt.i_codec = VLC_FOURCC(sdAtom[0],sdAtom[1],sdAtom[2],sdAtom[3]);
1318             tk->fmt.video.i_width  = (sdAtom[28] << 8) | sdAtom[29];
1319             tk->fmt.video.i_height = (sdAtom[30] << 8) | sdAtom[31];
1320
1321             if( tk->fmt.i_codec == VLC_FOURCC('a', 'v', 'c', '1') )
1322             {
1323                 uint8_t *pos = (uint8_t*)qtRTPSource->qtState.sdAtom + 86;
1324                 uint8_t *endpos = (uint8_t*)qtRTPSource->qtState.sdAtom
1325                                   + qtRTPSource->qtState.sdAtomSize;
1326                 while (pos+8 < endpos) {
1327                     unsigned atomLength = pos[0]<<24 | pos[1]<<16 | pos[2]<<8 | pos[3];
1328                     if( atomLength == 0 || atomLength > endpos-pos) break;
1329                     if( memcmp(pos+4, "avcC", 4) == 0 &&
1330                         atomLength > 8 &&
1331                         atomLength <= INT_MAX )
1332                     {
1333                         tk->fmt.i_extra = atomLength-8;
1334                         tk->fmt.p_extra = malloc( tk->fmt.i_extra );
1335                         memcpy(tk->fmt.p_extra, pos+8, atomLength-8);
1336                         break;
1337                     }
1338                     pos += atomLength;
1339                 }
1340             }
1341             else
1342             {
1343                 tk->fmt.i_extra        = qtState.sdAtomSize - 16;
1344                 tk->fmt.p_extra        = malloc( tk->fmt.i_extra );
1345                 memcpy( tk->fmt.p_extra, &sdAtom[12], tk->fmt.i_extra );
1346             }
1347         }
1348         else {
1349             if( qtState.sdAtomSize < 4 )
1350             {
1351                 /* invalid */
1352                 p_sys->event = 0xff;
1353                 tk->waiting = 0;
1354                 return;
1355             }
1356             tk->fmt.i_codec = VLC_FOURCC(sdAtom[0],sdAtom[1],sdAtom[2],sdAtom[3]);
1357         }
1358         tk->p_es = es_out_Add( p_demux->out, &tk->fmt );
1359     }
1360
1361 #if 0
1362     fprintf( stderr, "StreamRead size=%d pts=%lld\n",
1363              i_size,
1364              pts.tv_sec * 1000000LL + pts.tv_usec );
1365 #endif
1366
1367     /* grow buffer if it looks like buffer is too small, but don't eat
1368      * up all the memory on strange streams */
1369     if( i_truncated_bytes > 0 && tk->i_buffer < 2000000 )
1370     {
1371         void *p_tmp;
1372         msg_Dbg( p_demux, "lost %d bytes", i_truncated_bytes );
1373         msg_Dbg( p_demux, "increasing buffer size to %d", tk->i_buffer * 2 );
1374         tk->i_buffer *= 2;
1375         p_tmp = realloc( tk->p_buffer, tk->i_buffer );
1376         if( p_tmp == NULL )
1377         {
1378             msg_Warn( p_demux, "realloc failed" );
1379         }
1380         else
1381         {
1382             tk->p_buffer = (uint8_t*)p_tmp;
1383         }
1384     }
1385     if( i_size > tk->i_buffer )
1386     {
1387         msg_Warn( p_demux, "buffer overflow" );
1388     }
1389     /* FIXME could i_size be > buffer size ? */
1390     if( tk->fmt.i_codec == VLC_FOURCC('s','a','m','r') ||
1391         tk->fmt.i_codec == VLC_FOURCC('s','a','w','b') )
1392     {
1393         AMRAudioSource *amrSource = (AMRAudioSource*)tk->sub->readSource();
1394
1395         p_block = block_New( p_demux, i_size + 1 );
1396         p_block->p_buffer[0] = amrSource->lastFrameHeader();
1397         memcpy( p_block->p_buffer + 1, tk->p_buffer, i_size );
1398     }
1399     else if( tk->fmt.i_codec == VLC_FOURCC('H','2','6','1') )
1400     {
1401 #if LIVEMEDIA_LIBRARY_VERSION_INT >= 1081468800
1402         H261VideoRTPSource *h261Source = (H261VideoRTPSource*)tk->sub->rtpSource();
1403         uint32_t header = h261Source->lastSpecialHeader();
1404 #else
1405         uint32_t header = 0;
1406         msg_Warn( p_demux, "need livemedia library >= \"2004.04.09\"" );
1407 #endif
1408         p_block = block_New( p_demux, i_size + 4 );
1409         memcpy( p_block->p_buffer, &header, 4 );
1410         memcpy( p_block->p_buffer + 4, tk->p_buffer, i_size );
1411
1412         if( tk->sub->rtpSource()->curPacketMarkerBit() )
1413             p_block->i_flags |= BLOCK_FLAG_END_OF_FRAME;
1414     }
1415     else if( tk->fmt.i_codec == VLC_FOURCC('h','2','6','4') )
1416     {
1417         if( (tk->p_buffer[0] & 0x1f) >= 24 )
1418             msg_Warn( p_demux, "unsupported NAL type for H264" );
1419
1420         /* Normal NAL type */
1421         p_block = block_New( p_demux, i_size + 4 );
1422         p_block->p_buffer[0] = 0x00;
1423         p_block->p_buffer[1] = 0x00;
1424         p_block->p_buffer[2] = 0x00;
1425         p_block->p_buffer[3] = 0x01;
1426         memcpy( &p_block->p_buffer[4], tk->p_buffer, i_size );
1427     }
1428     else if( tk->b_asf )
1429     {
1430         int i_copy = __MIN( p_sys->asfh.i_min_data_packet_size, (int)i_size );
1431         p_block = block_New( p_demux, p_sys->asfh.i_min_data_packet_size );
1432
1433         memcpy( p_block->p_buffer, tk->p_buffer, i_copy );
1434     }
1435     else
1436     {
1437         p_block = block_New( p_demux, i_size );
1438         memcpy( p_block->p_buffer, tk->p_buffer, i_size );
1439     }
1440
1441     /* Update NPT */
1442     //msg_Dbg( p_demux, "current %d, start_seq %u", (int)tk->sub->rtpSource()->curPacketRTPSeqNum(), tk->i_start_seq );
1443     if( (tk->fmt.i_cat == VIDEO_ES) && (p_sys->i_pcr < i_pts) &&
1444         (i_pts > 0) && (p_sys->i_pcr > 0) )
1445     {
1446         p_sys->i_npt += __MAX( 0, i_pts - p_sys->i_pcr );
1447         p_sys->i_pcr = i_pts;
1448         msg_Dbg( p_demux, "npt update" );
1449     }
1450     else if( (tk->fmt.i_cat == VIDEO_ES) && (p_sys->i_pcr < i_pts) )
1451     {
1452         p_sys->i_pcr = i_pts;
1453     }
1454     msg_Dbg( p_demux, "npt %lld", p_sys->i_npt );
1455
1456     if( (i_pts != tk->i_pts) && (!tk->b_muxed) )
1457     {
1458         p_block->i_dts = ( tk->fmt.i_cat == VIDEO_ES ) ? 0 : i_pts;
1459         p_block->i_pts = i_pts;
1460     }
1461
1462     if( tk->b_muxed )
1463     {
1464         stream_DemuxSend( tk->p_out_muxed, p_block );
1465     }
1466     else if( tk->b_asf )
1467     {
1468         stream_DemuxSend( p_sys->p_out_asf, p_block );
1469     }
1470     else
1471     {
1472         es_out_Send( p_demux->out, tk->p_es, p_block );
1473     }
1474
1475     /* warn that's ok */
1476     p_sys->event = 0xff;
1477
1478     /* we have read data */
1479     tk->waiting = 0;
1480     p_demux->p_sys->b_no_data = VLC_FALSE;
1481     p_demux->p_sys->i_no_data_ti = 0;
1482
1483     if( i_pts > 0 && !tk->b_muxed )
1484     {
1485         tk->i_pts = i_pts;
1486     }
1487 }
1488
1489 /*****************************************************************************
1490  *
1491  *****************************************************************************/
1492 static void StreamClose( void *p_private )
1493 {
1494     live_track_t   *tk = (live_track_t*)p_private;
1495     demux_t        *p_demux = tk->p_demux;
1496     demux_sys_t    *p_sys = p_demux->p_sys;
1497
1498     msg_Dbg( p_demux, "StreamClose" );
1499
1500     p_sys->event = 0xff;
1501     p_demux->b_error = VLC_TRUE;
1502 }
1503
1504
1505 /*****************************************************************************
1506  *
1507  *****************************************************************************/
1508 static void TaskInterrupt( void *p_private )
1509 {
1510     demux_t *p_demux = (demux_t*)p_private;
1511
1512     p_demux->p_sys->i_no_data_ti++;
1513
1514     /* Avoid lock */
1515     p_demux->p_sys->event = 0xff;
1516 }
1517
1518 /*****************************************************************************
1519  *  
1520  *****************************************************************************/
1521 static void TimeoutPrevention( timeout_thread_t *p_timeout )
1522 {
1523     p_timeout->b_die = VLC_FALSE;
1524     p_timeout->i_remain = (int64_t)p_timeout->p_sys->i_timeout -2;
1525     p_timeout->i_remain *= 1000000;
1526
1527     vlc_thread_ready( p_timeout );
1528
1529     /* Avoid lock */
1530     while( !p_timeout->b_die )
1531     {
1532         if( p_timeout->i_remain <= 0 )
1533         {
1534             p_timeout->i_remain = (int64_t)p_timeout->p_sys->i_timeout -2;
1535             p_timeout->i_remain *= 1000000;
1536             p_timeout->p_sys->b_timeout_call = VLC_TRUE;
1537             msg_Dbg( p_timeout, "reset the timeout timer" );
1538         }
1539         p_timeout->i_remain -= 200000;
1540         msleep( 200000 ); /* 200 ms */
1541     }
1542 }
1543
1544 /*****************************************************************************
1545  *
1546  *****************************************************************************/
1547 static int b64_decode( char *dest, char *src );
1548
1549 static int ParseASF( demux_t *p_demux )
1550 {
1551     demux_sys_t    *p_sys = p_demux->p_sys;
1552
1553     const char *psz_marker = "a=pgmpu:data:application/vnd.ms.wms-hdr.asfv1;base64,";
1554     char *psz_asf = strcasestr( p_sys->p_sdp, psz_marker );
1555     char *psz_end;
1556     block_t *p_header;
1557
1558     /* Parse the asf header */
1559     if( psz_asf == NULL )
1560         return VLC_EGENERIC;
1561
1562     psz_asf += strlen( psz_marker );
1563     psz_asf = strdup( psz_asf );    /* Duplicate it */
1564     psz_end = strchr( psz_asf, '\n' );
1565
1566     while( psz_end > psz_asf && ( *psz_end == '\n' || *psz_end == '\r' ) )
1567         *psz_end-- = '\0';
1568
1569     if( psz_asf >= psz_end )
1570     {
1571         free( psz_asf );
1572         return VLC_EGENERIC;
1573     }
1574
1575     /* Always smaller */
1576     p_header = block_New( p_demux, psz_end - psz_asf );
1577     p_header->i_buffer = b64_decode( (char*)p_header->p_buffer, psz_asf );
1578     //msg_Dbg( p_demux, "Size=%d Hdrb64=%s", p_header->i_buffer, psz_asf );
1579     if( p_header->i_buffer <= 0 )
1580     {
1581         free( psz_asf );
1582         return VLC_EGENERIC;
1583     }
1584
1585     /* Parse it to get packet size */
1586     E_(asf_HeaderParse)( &p_sys->asfh, p_header->p_buffer, p_header->i_buffer );
1587
1588     /* Send it to demuxer */
1589     stream_DemuxSend( p_sys->p_out_asf, p_header );
1590
1591     free( psz_asf );
1592     return VLC_SUCCESS;
1593 }
1594
1595
1596 static unsigned char* parseH264ConfigStr( char const* configStr,
1597                                           unsigned int& configSize )
1598 {
1599     char *dup, *psz;
1600     int i, i_records = 1;
1601
1602     if( configSize )
1603     configSize = 0;
1604
1605     if( configStr == NULL || *configStr == '\0' )
1606         return NULL;
1607
1608     psz = dup = strdup( configStr );
1609
1610     /* Count the number of comma's */
1611     for( psz = dup; *psz != '\0'; ++psz )
1612     {
1613         if( *psz == ',')
1614         {
1615             ++i_records;
1616             *psz = '\0';
1617         }
1618     }
1619
1620     unsigned char *cfg = new unsigned char[5 * strlen(dup)];
1621     psz = dup;
1622     for( i = 0; i < i_records; i++ )
1623     {
1624         cfg[configSize++] = 0x00;
1625         cfg[configSize++] = 0x00;
1626         cfg[configSize++] = 0x00;
1627         cfg[configSize++] = 0x01;
1628
1629         configSize += b64_decode( (char*)&cfg[configSize], psz );
1630         psz += strlen(psz)+1;
1631     }
1632
1633     if( dup ) free( dup );
1634     return cfg;
1635 }
1636
1637 /*char b64[] = "ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/";*/
1638 static int b64_decode( char *dest, char *src )
1639 {
1640     const char *dest_start = dest;
1641     int  i_level;
1642     int  last = 0;
1643     int  b64[256] = {
1644         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* 00-0F */
1645         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* 10-1F */
1646         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,62,-1,-1,-1,63,  /* 20-2F */
1647         52,53,54,55,56,57,58,59,60,61,-1,-1,-1,-1,-1,-1,  /* 30-3F */
1648         -1, 0, 1, 2, 3, 4, 5, 6, 7, 8, 9,10,11,12,13,14,  /* 40-4F */
1649         15,16,17,18,19,20,21,22,23,24,25,-1,-1,-1,-1,-1,  /* 50-5F */
1650         -1,26,27,28,29,30,31,32,33,34,35,36,37,38,39,40,  /* 60-6F */
1651         41,42,43,44,45,46,47,48,49,50,51,-1,-1,-1,-1,-1,  /* 70-7F */
1652         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* 80-8F */
1653         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* 90-9F */
1654         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* A0-AF */
1655         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* B0-BF */
1656         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* C0-CF */
1657         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* D0-DF */
1658         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,  /* E0-EF */
1659         -1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1,-1   /* F0-FF */
1660         };
1661
1662     for( i_level = 0; *src != '\0'; src++ )
1663     {
1664         int  c;
1665
1666         c = b64[(unsigned int)*src];
1667         if( c == -1 )
1668         {
1669             continue;
1670         }
1671
1672         switch( i_level )
1673         {
1674             case 0:
1675                 i_level++;
1676                 break;
1677             case 1:
1678                 *dest++ = ( last << 2 ) | ( ( c >> 4)&0x03 );
1679                 i_level++;
1680                 break;
1681             case 2:
1682                 *dest++ = ( ( last << 4 )&0xf0 ) | ( ( c >> 2 )&0x0f );
1683                 i_level++;
1684                 break;
1685             case 3:
1686                 *dest++ = ( ( last &0x03 ) << 6 ) | c;
1687                 i_level = 0;
1688         }
1689         last = c;
1690     }
1691
1692     *dest = '\0';
1693
1694     return dest - dest_start;
1695 }