input.c 104 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>
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 "event.h"
40
#include "es_out.h"
41
#include "es_out_timeshift.h"
42
#include "access.h"
43
#include "demux.h"
44
#include "stream.h"
45

Clément Stenac's avatar
Clément Stenac committed
46 47
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
48

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

54 55 56 57
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

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

63 64
static  void *Run            ( vlc_object_t *p_this );
static  void *RunAndDestroy  ( vlc_object_t *p_this );
65

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

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

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

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

static input_source_t *InputSourceNew( input_thread_t *);
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
static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */

105
/*****************************************************************************
106 107
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
108
 *
Laurent Aimar's avatar
Laurent Aimar committed
109
 * XXX Do not forget to update vlc_input.h if you add new variables.
110
 *****************************************************************************/
111
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
112
                               const char *psz_header, bool b_quick,
113
                               sout_instance_t *p_sout )
Michel Kaempf's avatar
Michel Kaempf committed
114
{
115
    static const char input_name[] = "input";
116
    input_thread_t *p_input = NULL;                 /* thread descriptor */
117 118
    vlc_value_t val;
    int i;
119

120
    /* Allocate descriptor */
121 122
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
123
    if( p_input == NULL )
124
        return NULL;
125 126 127 128 129 130

    /* 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 );
131 132 133

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

134 135 136 137 138 139 140
    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 );

141 142 143
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
144 145 146

    /* One "randomly" selected input thread is responsible for computing
     * the global stats. Check if there is already someone doing this */
147
    if( p_input->p_libvlc->p_stats && !b_quick )
148
    {
149
        libvlc_priv_t *p_private = libvlc_priv( p_input->p_libvlc );
150
        vlc_mutex_lock( &p_input->p_libvlc->p_stats->lock );
151 152
        if( p_private->p_stats_computer == NULL )
            p_private->p_stats_computer = p_input;
153
        vlc_mutex_unlock( &p_input->p_libvlc->p_stats->lock );
154 155
    }

156
    p_input->b_preparsing = b_quick;
157
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
158

159
    /* Init events */
160 161 162
    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 );
163
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
164

165
    /* Init Common fields */
166 167
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
168
    p_input->p->i_start = 0;
169
    p_input->i_time     = 0;
Clément Stenac's avatar
Clément Stenac committed
170
    p_input->p->i_stop  = 0;
171
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
172
    p_input->p->i_title = 0;
173
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
174
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
175
    p_input->i_state = INIT_S;
176
    p_input->p->i_rate = INPUT_RATE_DEFAULT;
177
    p_input->p->b_recording = false;
178 179
    TAB_INIT( p_input->p->i_bookmark, p_input->p->bookmark );
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
180 181
    p_input->p->p_es_out_display = NULL;
    p_input->p->p_es_out = NULL;
182
    p_input->p->p_sout   = NULL;
183
    p_input->p->b_out_pace_control = false;
184 185 186
    p_input->i_pts_delay = 0;

    /* Init Input fields */
Pierre's avatar
Pierre committed
187
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
188 189 190 191
    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;
192
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
193 194 195
    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;
196 197 198 199
    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
200 201
    p_input->p->input.i_cr_average = 0;

202
    vlc_mutex_lock( &p_item->lock );
203 204

    if( !p_item->p_stats )
205 206
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
207

208
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
209 210
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
211

212
    /* Init control buffer */
213
    vlc_mutex_init( &p_input->p->lock_control );
214
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
215
    p_input->p->i_control = 0;
216

217
    /* Parse input options */
218
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
219
    assert( (int)p_item->optflagc == p_item->i_options );
220
    for( i = 0; i < p_item->i_options; i++ )
221 222
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
223
    vlc_mutex_unlock( &p_item->lock );
224

225 226
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
227

228
    /* Create Objects variables for public Get and Set */
229
    input_ControlVarInit( p_input );
230

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

234
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
235
    {
236 237
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
238
        {
239 240 241 242
            /* 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
243
            {
244
                 seekpoint_t *p_seekpoint;
245 246 247 248 249 250 251 252
                 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 = ',';
253 254

                 p_seekpoint = vlc_seekpoint_New();
255 256 257 258 259
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
260
                         p_seekpoint->psz_name = strdup(psz_start + 5);
261 262 263 264 265 266 267
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
268 269
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
270 271
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
272
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
273
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
274 275 276 277 278
                                  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
279
            }
280
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
281 282 283
        }
    }

284
    /* Remove 'Now playing' info as it is probably outdated */
285
    input_item_SetNowPlaying( p_item, NULL );
286
    input_SendEventMeta( p_input );
287

288 289 290 291
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

292 293 294 295
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

296
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
297
    vlc_mutex_init( &p_input->p->counters.counters_lock );
298

299 300 301
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

302 303 304
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

305 306 307
    return p_input;
}

308 309 310 311
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
312
{
313 314 315 316 317 318
#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

319 320
    vlc_event_manager_fini( &p_input->p->event_manager );

321 322
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
323
#ifdef ENABLE_SOUT
324 325
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
326
#endif
Pierre's avatar
Pierre committed
327 328
    vlc_gc_decref( p_input->p->input.p_item );

329 330
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

331
    vlc_cond_destroy( &p_input->p->wait_control );
332 333
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
334
}
335

336
/**
337 338
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
339 340 341 342 343 344 345
 *
 * \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 )
346
{
347
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
348 349
}

350 351 352 353
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
354
{
355
    input_thread_t *p_input;
356

357
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
358 359 360
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
361
    /* Create thread and wait for its readiness. */
362
    if( vlc_thread_create( p_input, "input", Run,
363
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
364
    {
365
        input_ChangeState( p_input, ERROR_S );
366
        msg_Err( p_input, "cannot create input thread" );
367 368
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
369
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
370
    }
371

372
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
373 374
}

375
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
376
 * Initialize an input thread and run it. This thread will clean after itself,
377 378 379 380 381
 * 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 ?
382
 * \return an error code, VLC_SUCCESS on success
383
 */
384
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
385
                   bool b_block )
386
{
387
    input_thread_t *p_input;
388

389
    p_input = Create( p_parent, p_item, NULL, false, NULL );
390
    if( !p_input )
391 392
        return VLC_EGENERIC;

393
    if( b_block )
394
    {
395
        RunAndDestroy( VLC_OBJECT(p_input) );
Clément Stenac's avatar
Clément Stenac committed
396
        return VLC_SUCCESS;
397
    }
398
    else
399
    {
400
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
401
                               VLC_THREAD_PRIORITY_INPUT, false ) )
402
        {
403
            input_ChangeState( p_input, ERROR_S );
404
            msg_Err( p_input, "cannot create input thread" );
405
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
406
            return VLC_EGENERIC;
407
        }
408
    }
409
    return VLC_SUCCESS;
410
}
411

412 413 414 415 416 417 418 419 420 421
/**
 * 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 )
{
422
    input_thread_t *p_input;
423

424
    /* Allocate descriptor */
425
    p_input = Create( p_parent, p_item, NULL, true, NULL );
426 427 428
    if( !p_input )
        return VLC_EGENERIC;

429 430
    if( !Init( p_input ) )
        End( p_input );
431

432 433
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
434 435 436 437

    return VLC_SUCCESS;
}

438 439 440 441 442
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
443
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
444
{
445 446
    vlc_list_t *p_list;
    int i;
447 448 449 450 451 452

    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;

453
    vlc_object_kill( p_obj );
454

455
    p_list = vlc_list_children( p_obj );
456
    for( i = 0; i < p_list->i_count; i++ )
457
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
458
    vlc_list_release( p_list );
459 460 461 462 463 464
}
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 */
465
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
466

467
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
468 469
}

470
sout_instance_t *input_DetachSout( input_thread_t *p_input )
471
{
472
    assert( p_input->b_dead );
473 474 475 476
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
477 478
}

479
/*****************************************************************************
480
 * Run: main thread loop
481 482
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
483
 *****************************************************************************/
484
static void *Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
485
{
486
    input_thread_t *p_input = (input_thread_t *)p_this;
487
    const int canc = vlc_savecancel();
488

489
    if( Init( p_input ) )
490 491
    {
        /* If we failed, wait before we are killed, and exit */
492
        WaitDie( p_input );
493
        goto exit;
494
    }
Michel Kaempf's avatar
Michel Kaempf committed
495

496 497
    MainLoop( p_input );

498
    /* Wait until we are asked to die */
499
    if( !p_input->b_die )
500
        WaitDie( p_input );
501 502 503

    /* Clean up */
    End( p_input );
504 505 506

exit:
    p_input->b_dead = true;
507
    vlc_restorecancel( canc );
508
    return NULL;
509 510 511
}

/*****************************************************************************
512
 * RunAndDestroy: main thread loop
513 514 515
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
516
static void *RunAndDestroy( vlc_object_t *p_this )
517
{
518
    input_thread_t *p_input = (input_thread_t *)p_this;
519
    const int canc = vlc_savecancel();
520

521
    if( Init( p_input ) )
522
        goto exit;
523 524 525 526 527 528

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

529
exit:
530
    /* Release memory */
531
    vlc_object_release( p_input );
532 533
    vlc_restorecancel( canc );
    return NULL;
534 535 536 537 538
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
539 540 541 542 543 544

/**
 * 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 )
545
{
546
    int i_ret;
547

548
    *pb_changed = false;
549

550 551 552 553 554 555 556
    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 )
557
    {
558 559 560 561 562 563 564 565 566 567 568 569 570 571 572
        /* 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;
        }
    }
573

574 575 576 577 578 579
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
580
        {
581 582 583 584 585 586 587 588
            /* 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;
589

590 591 592
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
593
            {
594 595
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
596
            }
597

598 599 600 601 602 603 604 605 606 607 608 609 610 611 612 613
            /* 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 )
614
            {
615 616 617
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
618
            }
619
            else
620
            {
621 622 623
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
624
            }
625

626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646
            /* */
            *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 )
{
647 648 649
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
650 651

    /* update input status variables */
652
    if( demux_Control( p_input->p->input.p_demux,
653 654
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
655

656
    if( demux_Control( p_input->p->input.p_demux,
657 658
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
659 660

    if( demux_Control( p_input->p->input.p_demux,
661 662
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
663

664
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
665 666 667 668 669 670 671 672 673 674 675 676 677 678 679
}

/**
 * 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 );
    }
680
    input_SendEventStatistics( p_input );
681 682 683 684 685 686 687 688 689
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
690 691
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
692 693 694 695

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

696
    while( vlc_object_alive( p_input ) && !p_input->b_error )
697 698 699 700
    {
        bool b_force_update;
        int i_type;
        vlc_value_t val;
701
        mtime_t i_current;
702
        mtime_t i_deadline;
703
        mtime_t i_wakeup;
704
        bool b_paused;
705

706 707
        /* Demux data */
        b_force_update = false;
708
        i_wakeup = 0;
709 710 711
        /* 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 */
712
        b_paused = p_input->i_state == PAUSE_S &&
713
                   !es_out_GetBuffering( p_input->p->p_es_out );
714 715

        if( !b_paused )
716
        {
717 718 719
            if( !p_input->p->input.b_eof )
            {
                MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
720

721 722 723 724 725 726 727 728 729 730 731
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
            else if( !p_input->b_eof && !es_out_GetEmpty( p_input->p->p_es_out ) )
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
            else
            {
                break;
            }
732
        }
733 734

        /* */
735 736
        do {
            i_deadline = i_wakeup;
737
            if( b_paused )
738 739 740 741 742 743 744 745
                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 );
746

747 748 749 750
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
751

752 753 754 755 756 757 758 759 760 761 762 763 764
            /* 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);
            }
765 766 767 768

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
769
                mtime_t i_new_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
770 771 772
                if( !i_new_wakeup )
                    i_wakeup = 0;
            }
773
        } while( i_current < i_wakeup );
774
    }
775

776
    if( !p_input->b_error )
777
        input_ChangeState( p_input, END_S );
778 779
}

780
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
781
{
782
    if( p_input->b_preparsing ) return;
783

784 785 786
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
787
    if( libvlc_stats( p_input ) )
788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806 807
    {
        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;
808
    }
809
}
810

811
#ifdef ENABLE_SOUT
812 813 814 815 816 817 818 819 820
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 ) )
821
    {
822 823
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
824
        {
825
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
826
            {
827
                msg_Dbg( p_input, "destroying unusable sout" );
828

829 830
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
831
            }
832
        }
833

834 835 836 837 838 839 840 841 842 843 844 845 846
        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
847
            {
848 849 850 851 852
                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
853
            }
854
        }
855
        if( libvlc_stats( p_input ) )
856
        {
857
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
858
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
859 860 861 862
            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;
863
        }
864
    }
865
    else if( p_input->p->p_sout )
866
    {
867 868 869 870
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
871
    }
872
    free( psz );
873

874 875
    return VLC_SUCCESS;
}
876
#endif
877

878 879 880
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
881

882
    if( p_input->b_preparsing ) return;
883

884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903 904 905 906 907
    /* 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 );
908 909
    if( val.i_int < 0 )
        p_input->i_pts_delay -= (val.i_int * 1000);
910 911 912 913 914 915

    /* 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;
}
916

917 918 919 920
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
921
    int i_delay;
922 923
    char *psz;
    char *psz_subtitle;
924
    int64_t i_length;
925

926 927 928
    /* Start title/chapter */

    if( p_input->b_preparsing )
929
    {
930 931
        p_input->p->i_start = 0;
        return;
932
    }
933 934 935 936 937 938 939 940 941 942 943 944

    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
945 946 947
    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" );
948
    i_length = var_GetTime( p_input, "length" );
949
    if( p_input->p->i_run < 0 )
950
    {
951 952
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
953
    }
954

955
    if( p_input->p->i_start > 0 )
956
    {
Antoine Lejeune's avatar