input.c 103 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
3
 *****************************************************************************
4
 * Copyright (C) 1998-2007 the VideoLAN team
5
 * $Id$
6
 *
7
 * Authors: Christophe Massiot <massiot@via.ecp.fr>
8
 *          Laurent Aimar <fenrir@via.ecp.fr>
9 10 11 12 13
 *
 * This program is free software; you can redistribute it and/or modify
 * it under the terms of the GNU General Public License as published by
 * the Free Software Foundation; either version 2 of the License, or
 * (at your option) any later version.
14
 *
15 16
 * This program is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
17 18
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 * GNU General Public License for more details.
19
 *
20 21
 * You should have received a copy of the GNU General Public License
 * along with this program; if not, write to the Free Software
Antoine Cellerier's avatar
Antoine Cellerier committed
22
 * Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston MA 02110-1301, USA.
23
 *****************************************************************************/
Michel Kaempf's avatar
Michel Kaempf committed
24

25
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
26
 * Preamble
27
 *****************************************************************************/
28 29 30 31
#ifdef HAVE_CONFIG_H
# include "config.h"
#endif

32
#include <vlc_common.h>
Sam Hocevar's avatar
 
Sam Hocevar committed
33

34
#include <ctype.h>
Christophe Mutricy's avatar
Christophe Mutricy committed
35
#include <limits.h>
36
#include <assert.h>
37

38
#include "input_internal.h"
39
#include "es_out.h"
40
#include "access.h"
41
#include "demux.h"
42
#include "stream.h"
43

Clément Stenac's avatar
Clément Stenac committed
44 45
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
Sam Hocevar's avatar
 
Sam Hocevar committed
46

Clément Stenac's avatar
Clément Stenac committed
47 48 49
#include <vlc_interface.h>
#include <vlc_url.h>
#include <vlc_charset.h>
50
#include <vlc_strings.h>
51

52 53 54 55
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

56
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
57
 * Local prototypes
58
 *****************************************************************************/
59 60
static void Destructor( input_thread_t * p_input );

61 62
static  void* Run            ( vlc_object_t *p_this );
static  void* RunAndDestroy  ( vlc_object_t *p_this );
63

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
64
static input_thread_t * Create  ( vlc_object_t *, input_item_t *,
65
                                  const char *, bool, sout_instance_t * );
66
static  int             Init    ( input_thread_t *p_input );
67
static void             WaitDie   ( input_thread_t *p_input );
68 69
static void             End     ( input_thread_t *p_input );
static void             MainLoop( input_thread_t *p_input );
70

71
static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
72
static void       ControlReduce( input_thread_t * );
73
static bool Control( input_thread_t *, int, vlc_value_t );
74

75 76
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
77

78
static void UpdateItemLength( input_thread_t *, int64_t i_length );
79

80
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
81 82

static input_source_t *InputSourceNew( input_thread_t *);
Laurent Aimar's avatar
 
Laurent Aimar committed
83
static int  InputSourceInit( input_thread_t *, input_source_t *,
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
84
                             const char *, const char *psz_forced_demux );
85
static void InputSourceClean( input_source_t * );
86 87
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
88 89
static void SlaveDemux( input_thread_t *p_input );
static void SlaveSeek( input_thread_t *p_input );
90

91 92
static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta );
static void InputUpdateMeta( input_thread_t *p_input, vlc_meta_t *p_meta );
93 94
static char *InputGetExtraFiles( input_thread_t *p_input,
                                 const char *psz_access, const char *psz_path );
95

96
static void DemuxMeta( input_thread_t *p_input, vlc_meta_t *p_meta, demux_t *p_demux );
97
static void AccessMeta( input_thread_t * p_input, vlc_meta_t *p_meta );
98 99 100
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

101 102
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );

103
/*****************************************************************************
104 105
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
106 107 108 109 110 111 112 113 114 115
 *
 * Variables for _public_ use:
 * * Get and Set:
 *  - state
 *  - rate,rate-slower, rate-faster
 *  - position, position-offset
 *  - time, time-offset
 *  - title,title-next,title-prev
 *  - chapter,chapter-next, chapter-prev
 *  - program, audio-es, video-es, spu-es
116
 *  - audio-delay, spu-delay
117 118 119 120
 *  - bookmark
 * * Get only:
 *  - length
 *  - bookmarks
121 122
 *  - seekable (if you can seek, it doesn't say if 'bar display' has be shown
 *    or not, for that check position != 0.0)
123
 *  - can-pause
124
 *  - can-record (if a stream can be recorded while playing)
125
 *  - teletext-es to get the index of spu track that is teletext --1 if no teletext)
126
 * * For intf callback upon changes:
127
 *  - intf-change
128
 *  - intf-change-vout for when a vout is created or destroyed
129
 *  - rate-change for when playback rate changes
130
 *  - stats-change for when statistics are updated
131 132
 * TODO explain when Callback is called
 * TODO complete this list (?)
133
 *****************************************************************************/
134
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
135
                               const char *psz_header, bool b_quick,
136
                               sout_instance_t *p_sout )
Michel Kaempf's avatar
Michel Kaempf committed
137
{
138
    static const char input_name[] = "input";
139
    input_thread_t *p_input = NULL;                 /* thread descriptor */
140 141
    vlc_value_t val;
    int i;
142

143
    /* Allocate descriptor */
144 145
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
146
    if( p_input == NULL )
147
        return NULL;
148 149 150 151 152 153

    /* Construct a nice name for the input timer */
    char psz_timer_name[255];
    char * psz_name = input_item_GetName( p_item );
    snprintf( psz_timer_name, sizeof(psz_timer_name),
              "input launching for '%s'", psz_name );
154 155 156

    msg_Dbg( p_input, "Creating an input for '%s'", psz_name);

157 158 159 160 161 162 163
    free( psz_name );

    /* Start a timer to mesure how long it takes
     * to launch an input */
    stats_TimerStart( p_input, psz_timer_name,
        STATS_TIMER_INPUT_LAUNCHING );

164 165 166
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
167 168 169

    /* One "randomly" selected input thread is responsible for computing
     * the global stats. Check if there is already someone doing this */
170
    if( p_input->p_libvlc->p_stats && !b_quick )
171
    {
172
        libvlc_priv_t *p_private = libvlc_priv( p_input->p_libvlc );
173
        vlc_mutex_lock( &p_input->p_libvlc->p_stats->lock );
174 175
        if( p_private->p_stats_computer == NULL )
            p_private->p_stats_computer = p_input;
176
        vlc_mutex_unlock( &p_input->p_libvlc->p_stats->lock );
177 178
    }

179
    p_input->b_preparsing = b_quick;
180
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
181

182
    /* Init events */
183 184 185
    vlc_event_manager_t * p_em = &p_input->p->event_manager;
    vlc_event_manager_init_with_vlc_object( p_em, p_input );
    vlc_event_manager_register_event_type( p_em, vlc_InputStateChanged );
186
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
187

188
    /* Init Common fields */
189 190
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
191
    p_input->p->i_start = 0;
192
    p_input->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
193
    p_input->p->i_stop  = 0;
194
    p_input->p->i_run  = 0;
Clément Stenac's avatar
Clément Stenac committed
195 196 197
    p_input->p->i_title = 0;
    p_input->p->title   = NULL;
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
198
    p_input->i_state = INIT_S;
Clément Stenac's avatar
Clément Stenac committed
199
    p_input->p->i_rate  = INPUT_RATE_DEFAULT;
200
    p_input->p->b_recording = false;
201 202
    TAB_INIT( p_input->p->i_bookmark, p_input->p->bookmark );
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
Clément Stenac's avatar
Clément Stenac committed
203 204
    p_input->p->p_es_out = NULL;
    p_input->p->p_sout  = NULL;
205
    p_input->p->b_out_pace_control = false;
206 207 208
    p_input->i_pts_delay = 0;

    /* Init Input fields */
Pierre's avatar
Pierre committed
209
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
210 211 212 213
    p_input->p->input.p_item = p_item;
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
214
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
215 216 217
    p_input->p->input.i_title  = 0;
    p_input->p->input.title    = NULL;
    p_input->p->input.i_title_offset = p_input->p->input.i_seekpoint_offset = 0;
218 219 220 221
    p_input->p->input.b_can_pace_control = true;
    p_input->p->input.b_can_rate_control = true;
    p_input->p->input.b_rescale_ts = true;
    p_input->p->input.b_eof = false;
Clément Stenac's avatar
Clément Stenac committed
222 223
    p_input->p->input.i_cr_average = 0;

224
    vlc_mutex_lock( &p_item->lock );
225 226

    if( !p_item->p_stats )
227 228
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
229

230
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
231 232
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
233

234
    /* Init control buffer */
235
    vlc_mutex_init( &p_input->p->lock_control );
236
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
237
    p_input->p->i_control = 0;
238

Gildas Bazin's avatar
 
Gildas Bazin committed
239
    /* Parse input options */
240
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
241
    assert( (int)p_item->optflagc == p_item->i_options );
242
    for( i = 0; i < p_item->i_options; i++ )
243 244
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
245
    vlc_mutex_unlock( &p_item->lock );
Gildas Bazin's avatar
 
Gildas Bazin committed
246

247 248
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
249

250
    /* Create Objects variables for public Get and Set */
251
    input_ControlVarInit( p_input );
252

253
    /* */
Clément Stenac's avatar
Clément Stenac committed
254
    p_input->p->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
255

256
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
257
    {
258 259
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
260
        {
261 262 263 264
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
            psz_parser = val.psz_string;
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
265
            {
266
                 seekpoint_t *p_seekpoint;
267 268 269 270 271 272 273 274
                 char backup;
                 psz_start++;
                 psz_end = strchr( psz_start, '}' );
                 if( !psz_end ) break;
                 psz_parser = psz_end + 1;
                 backup = *psz_parser;
                 *psz_parser = 0;
                 *psz_end = ',';
275 276

                 p_seekpoint = vlc_seekpoint_New();
277 278 279 280 281
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
282
                         p_seekpoint->psz_name = strdup(psz_start + 5);
283 284 285 286 287 288 289
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
290 291
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
292 293
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
294
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
295
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
296 297 298 299 300
                                  p_seekpoint->psz_name, p_seekpoint->i_byte_offset,
                                  p_seekpoint->i_time_offset );
                input_Control( p_input, INPUT_ADD_BOOKMARK, p_seekpoint );
                vlc_seekpoint_Delete( p_seekpoint );
                *psz_parser = backup;
Gildas Bazin's avatar
Gildas Bazin committed
301
            }
302
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
303 304 305
        }
    }

306
    /* Remove 'Now playing' info as it is probably outdated */
307
    input_item_SetNowPlaying( p_item, NULL );
308

309 310 311 312
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

313 314 315 316
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

317
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
318
    vlc_mutex_init( &p_input->p->counters.counters_lock );
319

320 321 322
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

323 324 325
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

326 327 328
    return p_input;
}

329 330 331 332
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
333
{
334 335 336 337 338 339
#ifndef NDEBUG
    char * psz_name = input_item_GetName( p_input->p->input.p_item );
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

340 341
    vlc_event_manager_fini( &p_input->p->event_manager );

342 343
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
344
#ifdef ENABLE_SOUT
345 346
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
347
#endif
Pierre's avatar
Pierre committed
348 349
    vlc_gc_decref( p_input->p->input.p_item );

350 351
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

352
    vlc_cond_destroy( &p_input->p->wait_control );
353 354
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
355
}
356

357
/**
358 359
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
360 361 362 363 364 365 366
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \return a pointer to the spawned input thread
 */
input_thread_t *__input_CreateThread( vlc_object_t *p_parent,
                                      input_item_t *p_item )
367
{
368
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
369 370
}

371 372 373 374
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
375
{
376
    input_thread_t *p_input;
377

378
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
379 380 381
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
382
    /* Create thread and wait for its readiness. */
383
    if( vlc_thread_create( p_input, "input", Run,
384
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
385
    {
386
        input_ChangeState( p_input, ERROR_S );
387
        msg_Err( p_input, "cannot create input thread" );
388 389
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
390
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
391
    }
392

393
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
394 395
}

396
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
397
 * Initialize an input thread and run it. This thread will clean after itself,
398 399 400 401 402
 * you can forget about it. It can work either in blocking or non-blocking mode
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \param b_block should we block until read is finished ?
403
 * \return an error code, VLC_SUCCESS on success
404
 */
405
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
406
                   bool b_block )
407
{
408
    input_thread_t *p_input;
409

410
    p_input = Create( p_parent, p_item, NULL, false, NULL );
411
    if( !p_input )
412 413
        return VLC_EGENERIC;

414
    if( b_block )
415
    {
416
        RunAndDestroy( VLC_OBJECT(p_input) );
Clément Stenac's avatar
Clément Stenac committed
417
        return VLC_SUCCESS;
418
    }
419
    else
420
    {
421
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
422
                               VLC_THREAD_PRIORITY_INPUT, false ) )
423
        {
424
            input_ChangeState( p_input, ERROR_S );
425
            msg_Err( p_input, "cannot create input thread" );
426
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
427
            return VLC_EGENERIC;
428
        }
429
    }
430
    return VLC_SUCCESS;
431
}
432

433 434 435 436 437 438 439 440 441 442
/**
 * Initialize an input and initialize it to preparse the item
 * This function is blocking. It will only accept to parse files
 *
 * \param p_parent a vlc_object_t
 * \param p_item an input item
 * \return VLC_SUCCESS or an error
 */
int __input_Preparse( vlc_object_t *p_parent, input_item_t *p_item )
{
443
    input_thread_t *p_input;
444

445
    /* Allocate descriptor */
446
    p_input = Create( p_parent, p_item, NULL, true, NULL );
447 448 449
    if( !p_input )
        return VLC_EGENERIC;

450 451
    if( !Init( p_input ) )
        End( p_input );
452

453 454
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
455 456 457 458

    return VLC_SUCCESS;
}

459 460 461 462 463
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
464
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
465
{
466 467
    vlc_list_t *p_list;
    int i;
468 469 470 471 472 473

    if( p_obj->i_object_type == VLC_OBJECT_VOUT ||
        p_obj->i_object_type == VLC_OBJECT_AOUT ||
        p_obj == VLC_OBJECT(p_input->p->p_sout) )
        return;

474
    vlc_object_kill( p_obj );
475

476
    p_list = vlc_list_children( p_obj );
477
    for( i = 0; i < p_list->i_count; i++ )
478
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
479
    vlc_list_release( p_list );
480 481 482 483 484 485
}
void input_StopThread( input_thread_t *p_input )
{
    /* Set die for input and ALL of this childrens (even (grand-)grand-childrens)
     * It is needed here even if it is done in INPUT_CONTROL_SET_DIE handler to
     * unlock the control loop */
486
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
487

488
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
Sam Hocevar's avatar
 
Sam Hocevar committed
489 490
}

491 492
sout_instance_t * input_DetachSout( input_thread_t *p_input )
{
493 494 495 496
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
497 498
}

499
/*****************************************************************************
500
 * Run: main thread loop
501 502
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
503
 *****************************************************************************/
504
static void* Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
505
{
506
    input_thread_t *p_input = (input_thread_t *)p_this;
507
    const int canc = vlc_savecancel();
508

509
    if( Init( p_input ) )
Sam Hocevar's avatar
 
Sam Hocevar committed
510 511
    {
        /* If we failed, wait before we are killed, and exit */
512
        WaitDie( p_input );
513
        goto exit;
Sam Hocevar's avatar
 
Sam Hocevar committed
514
    }
Michel Kaempf's avatar
Michel Kaempf committed
515

516 517
    MainLoop( p_input );

518
    /* Wait until we are asked to die */
519
    if( !p_input->b_die )
520
        WaitDie( p_input );
521 522 523

    /* Clean up */
    End( p_input );
524 525 526

exit:
    p_input->b_dead = true;
527
    vlc_restorecancel( canc );
528
    return NULL;
529 530 531
}

/*****************************************************************************
532
 * RunAndDestroy: main thread loop
533 534 535
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
536
static void* RunAndDestroy( vlc_object_t *p_this )
537
{
538
    input_thread_t *p_input = (input_thread_t *)p_this;
539
    const int canc = vlc_savecancel();
540

541
    if( Init( p_input ) )
542
        goto exit;
543 544 545 546 547 548

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

549
exit:
550
    /* Release memory */
551
    vlc_object_release( p_input );
552 553
    vlc_restorecancel( canc );
    return NULL;
554 555 556 557 558
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
559 560 561 562 563 564

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, mtime_t *pi_start_mdate )
565
{
566
    int i_ret;
567

568
    *pb_changed = false;
569

570 571 572 573 574 575 576
    if( ( p_input->p->i_stop > 0 && p_input->i_time >= p_input->p->i_stop ) ||
        ( p_input->p->i_run > 0 && *pi_start_mdate+p_input->p->i_run < mdate() ) )
        i_ret = 0; /* EOF */
    else
        i_ret = p_input->p->input.p_demux->pf_demux(p_input->p->input.p_demux);

    if( i_ret > 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
577
    {
578 579 580 581 582 583 584 585 586 587 588 589 590 591 592
        /* TODO */
        if( p_input->p->input.b_title_demux &&
            p_input->p->input.p_demux->info.i_update )
        {
            i_ret = UpdateFromDemux( p_input );
            *pb_changed = true;
        }
        else if( !p_input->p->input.b_title_demux &&
                  p_input->p->input.p_access &&
                  p_input->p->input.p_access->info.i_update )
        {
            i_ret = UpdateFromAccess( p_input );
            *pb_changed = true;
        }
    }
593

594 595 596 597 598 599
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
600
        {
601 602 603 604 605 606 607 608
            /* End of file - we do not set b_die because only the
             * playlist is allowed to do so. */
            msg_Dbg( p_input, "EOF reached" );
            p_input->p->input.b_eof = true;
        }
        else
        {
            vlc_value_t val;
609

610 611 612
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
613
            {
614 615
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
616
            }
617

618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 633
            /* Seek to start title/seekpoint */
            val.i_int = p_input->p->input.i_title_start -
                p_input->p->input.i_title_offset;
            if( val.i_int < 0 || val.i_int >= p_input->p->input.i_title )
                val.i_int = 0;
            input_ControlPush( p_input,
                               INPUT_CONTROL_SET_TITLE, &val );

            val.i_int = p_input->p->input.i_seekpoint_start -
                p_input->p->input.i_seekpoint_offset;
            if( val.i_int > 0 /* TODO: check upper boundary */ )
                input_ControlPush( p_input,
                                   INPUT_CONTROL_SET_SEEKPOINT, &val );

            /* Seek to start position */
            if( p_input->p->i_start > 0 )
634
            {
635 636 637
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
638
            }
639
            else
640
            {
641 642 643
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
644
            }
645

646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712 713 714
            /* */
            *pi_start_mdate = mdate();
        }
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
        SlaveDemux( p_input );
    }
}

/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
    vlc_value_t val;
    double f_pos;
    int64_t i_time, i_length;

    /* update input status variables */
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_POSITION, &f_pos ) )
    {
        val.f_float = (float)f_pos;
        var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_TIME, &i_time ) )
    {
        p_input->i_time = i_time;
        val.i_time = i_time;
        var_Change( p_input, "time", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_LENGTH, &i_length ) )
    {
        vlc_value_t old_val;
        var_Get( p_input, "length", &old_val );
        val.i_time = i_length;
        var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );

        if( old_val.i_time != val.i_time )
        {
            UpdateItemLength( p_input, i_length );
        }
    }

    var_SetBool( p_input, "intf-change", true );
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
    stats_ComputeInputStats( p_input, p_input->p->input.p_item->p_stats );
    /* Are we the thread responsible for computing global stats ? */
    if( libvlc_priv( p_input->p_libvlc )->p_stats_computer == p_input )
    {
        stats_ComputeGlobalStats( p_input->p_libvlc,
                                  p_input->p_libvlc->p_stats );
    }
715
    var_SetBool( p_input, "stats-change", true );
716 717 718 719 720 721 722 723 724
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
725 726
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
727 728 729 730 731 732 733 734 735

    /* Start the timer */
    stats_TimerStop( p_input, STATS_TIMER_INPUT_LAUNCHING );

    while( !p_input->b_die && !p_input->b_error && !p_input->p->input.b_eof )
    {
        bool b_force_update;
        int i_type;
        vlc_value_t val;
736
        mtime_t i_current;
737
        mtime_t i_deadline;
738
        mtime_t i_wakeup;
739
        bool b_paused;
740

741 742
        /* Demux data */
        b_force_update = false;
743
        i_wakeup = 0;
744 745 746
        /* FIXME if p_input->i_state == PAUSE_S the access/access_demux
         * is paused -> this may cause problem with some of them
         * The same problem can be seen when seeking while paused */
747
        input_EsOutLock( p_input->p->p_es_out );
748 749
        b_paused = p_input->i_state == PAUSE_S &&
                   !input_EsOutIsBuffering( p_input->p->p_es_out );
750
        input_EsOutUnlock( p_input->p->p_es_out );
751 752

        if( !b_paused )
753
        {
754
            MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
755 756

            input_EsOutLock( p_input->p->p_es_out );
757
            i_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
758
            input_EsOutUnlock( p_input->p->p_es_out );
759
        }
760 761

        /* */
762 763
        do {
            i_deadline = i_wakeup;
764
            if( b_paused )
765 766 767 768 769 770 771 772
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
            vlc_mutex_lock( &p_input->p->lock_control );
            ControlReduce( p_input );
            while( !ControlPopNoLock( p_input, &i_type, &val, i_deadline ) )
            {
                msg_Dbg( p_input, "control type=%d", i_type );
773

774 775 776 777
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
778

779 780 781 782 783 784 785 786 787 788 789 790 791
            /* Update interface and statistics */
            i_current = mdate();
            if( i_intf_update < i_current || b_force_update )
            {
                MainLoopInterface( p_input );
                i_intf_update = i_current + INT64_C(250000);
                b_force_update = false;
            }
            if( i_statistic_update < i_current )
            {
                MainLoopStatistic( p_input );
                i_statistic_update = i_current + INT64_C(1000000);
            }
792 793 794 795

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
796
                input_EsOutLock( p_input->p->p_es_out );
797 798 799
                mtime_t i_new_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
                if( !i_new_wakeup )
                    i_wakeup = 0;
800
                input_EsOutUnlock( p_input->p->p_es_out );
801
            }
802
        } while( i_current < i_wakeup );
803
    }
804 805 806 807

    if( !p_input->b_eof && !p_input->b_error && p_input->p->input.b_eof )
    {
        /* We have finish to demux data but not to play them */
808
        while( vlc_object_alive( p_input ) )
809
        {
810 811 812 813 814
            input_EsOutLock( p_input->p->p_es_out );
            bool b_empty = input_EsOutDecodersIsEmpty( p_input->p->p_es_out );
            input_EsOutUnlock( p_input->p->p_es_out );

            if( b_empty )
815 816 817 818 819 820 821 822 823 824
                break;

            msg_Dbg( p_input, "waiting decoder fifos to empty" );

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
        input_ChangeState( p_input, END_S );
    }
825 826
}

827
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
828
{
829
    if( p_input->b_preparsing ) return;
830

831 832 833
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
834
    if( libvlc_stats( p_input ) )
835 836 837 838 839 840 841 842 843 844 845 846 847 848 849 850 851 852 853 854
    {
        INIT_COUNTER( read_bytes, INTEGER, COUNTER );
        INIT_COUNTER( read_packets, INTEGER, COUNTER );
        INIT_COUNTER( demux_read, INTEGER, COUNTER );
        INIT_COUNTER( input_bitrate, FLOAT, DERIVATIVE );
        INIT_COUNTER( demux_bitrate, FLOAT, DERIVATIVE );
        INIT_COUNTER( played_abuffers, INTEGER, COUNTER );
        INIT_COUNTER( lost_abuffers, INTEGER, COUNTER );
        INIT_COUNTER( displayed_pictures, INTEGER, COUNTER );
        INIT_COUNTER( lost_pictures, INTEGER, COUNTER );
        INIT_COUNTER( decoded_audio, INTEGER, COUNTER );
        INIT_COUNTER( decoded_video, INTEGER, COUNTER );
        INIT_COUNTER( decoded_sub, INTEGER, COUNTER );
        p_input->p->counters.p_sout_send_bitrate = NULL;
        p_input->p->counters.p_sout_sent_packets = NULL;
        p_input->p->counters.p_sout_sent_bytes = NULL;
        if( p_input->p->counters.p_demux_bitrate )
            p_input->p->counters.p_demux_bitrate->update_interval = 1000000;
        if( p_input->p->counters.p_input_bitrate )
            p_input->p->counters.p_input_bitrate->update_interval = 1000000;
855
    }
856
}
857

858
#ifdef ENABLE_SOUT
859 860 861 862 863 864 865 866 867
static int InitSout( input_thread_t * p_input )
{
    char *psz;

    if( p_input->b_preparsing ) return VLC_SUCCESS;

    /* Find a usable sout and attach it to p_input */
    psz = var_GetNonEmptyString( p_input, "sout" );
    if( psz && strncasecmp( p_input->p->input.p_item->psz_uri, "vlc:", 4 ) )
868
    {
869 870
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
871
        {
872
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
873
            {
874
                msg_Dbg( p_input, "destroying unusable sout" );
875

876 877
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
878
            }
879
        }
880

881 882 883 884 885 886 887 888 889 890 891 892 893
        if( p_input->p->p_sout )
        {
            /* Reuse it */
            msg_Dbg( p_input, "sout keep: reusing sout" );
            msg_Dbg( p_input, "sout keep: you probably want to use "
                              "gather stream_out" );
            vlc_object_attach( p_input->p->p_sout, p_input );
        }
        else
        {
            /* Create a new one */
            p_input->p->p_sout = sout_NewInstance( p_input, psz );
            if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
894
            {
895 896 897 898 899
                input_ChangeState( p_input, ERROR_S );
                msg_Err( p_input, "cannot start stream output instance, " \
                                  "aborting" );
                free( psz );
                return VLC_EGENERIC;
Clément Stenac's avatar
Clément Stenac committed
900
            }
901
        }
902
        if( libvlc_stats( p_input ) )
903
        {
904
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
905
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
906 907 908 909
            INIT_COUNTER( sout_send_bitrate, FLOAT, DERIVATIVE );
            if( p_input->p->counters.p_sout_send_bitrate )
                 p_input->p->counters.p_sout_send_bitrate->update_interval =
                         1000000;
910
        }
911
    }
912
    else if( p_input->p->p_sout )
913
    {
914 915 916 917
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
918
    }
919
    free( psz );
920

921 922
    return VLC_SUCCESS;
}
923
#endif
924

925 926 927
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
928

929
    if( p_input->b_preparsing ) return;
930

931 932 933 934 935 936 937 938 939 940 941 942 943 944 945 946 947 948 949 950 951 952 953 954
    /* Create global title (from master) */
    p_input->p->i_title = p_input->p->input.i_title;
    p_input->p->title   = p_input->p->input.title;
    p_input->p->i_title_offset = p_input->p->input.i_title_offset;
    p_input->p->i_seekpoint_offset = p_input->p->input.i_seekpoint_offset;
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
        input_ControlVarTitle( p_input, 0 );
    }

    /* Global flag */
    p_input->b_can_pace_control = p_input->p->input.b_can_pace_control;
    p_input->p->b_can_pause        = p_input->p->input.b_can_pause;
    p_input->p->b_can_rate_control = p_input->p->input.b_can_rate_control;

    /* Fix pts delay */
    if( p_input->i_pts_delay < 0 )
        p_input->i_pts_delay = 0;

    /* If the desynchronisation requested by the user is < 0, we need to
     * cache more data. */
    var_Get( p_input, "audio-desync", &val );
955 956
    if( val.i_int < 0 )
        p_input->i_pts_delay -= (val.i_int * 1000);
957 958 959 960 961 962

    /* Update cr_average depending on the caching */
    p_input->p->input.i_cr_average *= (10 * p_input->i_pts_delay / 200000);
    p_input->p->input.i_cr_average /= 10;
    if( p_input->p->input.i_cr_average < 10 ) p_input->p->input.i_cr_average = 10;
}
Gildas Bazin's avatar
 
Gildas Bazin committed
963

964 965 966 967
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
968
    int i_delay;
969 970
    char *psz;
    char *psz_subtitle;
971
    int64_t i_length;
972

973 974 975
    /* Start title/chapter */

    if( p_input->b_preparsing )
976
    {
977 978
        p_input->p->i_start = 0;
        return;
979
    }
980 981 982 983 984 985 986 987 988 989 990 991

    val.i_int = p_input->p->input.i_title_start -
                p_input->p->input.i_title_offset;
    if( val.i_int > 0 && val.i_int < p_input->p->input.i_title )
        input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
    val.i_int = p_input->p->input.i_seekpoint_start -
                p_input->p->input.i_seekpoint_offset;
    if( val.i_int > 0 /* TODO: check upper boundary */ )
        input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );

    /* Start time*/
    /* Set start time */
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
992 993 994
    p_input->p->i_start = INT64_C(1000000) * var_GetInteger( p_input, "start-time" );
    p_input->p->i_stop  = INT64_C(1000000) * var_GetInteger( p_input, "stop-time" );
    p_input->p->i_run   = INT64_C(1000000) * var_GetInteger( p_input, "run-time" );
995
    i_length = var_GetTime( p_input, "length" );
996
    if( p_input->p->i_run < 0 )
997
    {
998 999
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run