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