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