input.c 92.2 KB
Newer Older
1 2
/*****************************************************************************
 * input.c: input thread
3
 *****************************************************************************
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
4
 * Copyright (C) 1998-2007 VLC authors and VideoLAN
5
 * $Id$
6
 *
7
 * Authors: Christophe Massiot <massiot@via.ecp.fr>
8
 *          Laurent Aimar <fenrir@via.ecp.fr>
9
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
10 11 12
 * This program is free software; you can redistribute it and/or modify it
 * under the terms of the GNU Lesser General Public License as published by
 * the Free Software Foundation; either version 2.1 of the License, or
13
 * (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
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
17 18
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
 * GNU Lesser General Public License for more details.
19
 *
Jean-Baptiste Kempf's avatar
LGPL  
Jean-Baptiste Kempf committed
20 21 22
 * You should have received a copy of the GNU Lesser General Public License
 * along with this program; if not, write to the Free Software 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

Christophe Mutricy's avatar
Christophe Mutricy committed
34
#include <limits.h>
35
#include <assert.h>
36
#include <math.h>
37
#include <sys/stat.h>
38

39
#include "input_internal.h"
40
#include "event.h"
41
#include "es_out.h"
42
#include "es_out_timeshift.h"
43
#include "demux.h"
44
#include "item.h"
45
#include "resource.h"
46

Clément Stenac's avatar
Clément Stenac committed
47
#include <vlc_sout.h>
48
#include <vlc_dialog.h>
Clément Stenac's avatar
Clément Stenac committed
49 50
#include <vlc_url.h>
#include <vlc_charset.h>
51
#include <vlc_fs.h>
52
#include <vlc_strings.h>
53
#include <vlc_modules.h>
54

55
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
56
 * Local prototypes
57
 *****************************************************************************/
58 59
static  void *Run( void * );
static  void *Preparse( void * );
60

Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
61
static input_thread_t * Create  ( vlc_object_t *, input_item_t *,
62
                                  const char *, bool, input_resource_t * );
63
static  int             Init    ( input_thread_t *p_input );
64
static void             End     ( input_thread_t *p_input );
65
static void             MainLoop( input_thread_t *p_input, bool b_interactive );
66

67
static inline int ControlPop( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline, bool b_postpone_seek );
68
static void       ControlRelease( int i_type, vlc_value_t val );
69
static bool       ControlIsSeekRequest( int i_type );
70
static bool       Control( input_thread_t *, int, vlc_value_t );
71
static void       ControlPause( input_thread_t *, mtime_t );
72

73 74
static int  UpdateTitleSeekpointFromDemux( input_thread_t * );
static void UpdateGenericFromDemux( input_thread_t * );
75
static void UpdateTitleListfromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
76

77
static void MRLSections( const char *, int *, int *, int *, int *);
78

79 80 81 82
static input_source_t *InputSourceNew( input_thread_t *, const char *,
                                       const char *psz_forced_demux,
                                       bool b_in_can_fail );
static void InputSourceDestroy( input_source_t * );
Laurent Aimar's avatar
Laurent Aimar committed
83 84
static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );

85 86
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
87
static void SlaveDemux( input_thread_t *p_input );
88
static void SlaveSeek( input_thread_t *p_input );
89

90
static void InputMetaUser( input_thread_t *p_input, vlc_meta_t *p_meta );
91
static void InputUpdateMeta( input_thread_t *p_input, demux_t *p_demux );
92 93 94
static void InputGetExtraFiles( input_thread_t *p_input,
                                int *pi_list, char ***pppsz_list,
                                const char *psz_access, const char *psz_path );
95

96 97
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment, demux_t ***ppp_attachment_demux,
                              int i_new, input_attachment_t **pp_new, demux_t *p_demux );
98

99 100 101
enum {
    SUB_NOFLAG = 0x00,
    SUB_FORCED = 0x01,
102
    SUB_CANFAIL = 0x02,
103
};
104

105 106
static void input_SubtitleAdd( input_thread_t *, const char *, unsigned );
static void input_SubtitleFileAdd( input_thread_t *, char *, unsigned );
107 108
static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */

109
#undef input_Create
110 111 112 113 114 115 116 117 118 119 120 121
/**
 * Create a new input_thread_t.
 *
 * You need to call input_Start on it when you are done
 * adding callback on the variables/events you want to monitor.
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \param psz_log an optional prefix for this input logs
 * \param p_resource an optional input ressource
 * \return a pointer to the spawned input thread
 */
122 123 124
input_thread_t *input_Create( vlc_object_t *p_parent,
                              input_item_t *p_item,
                              const char *psz_log, input_resource_t *p_resource )
125 126 127 128
{
    return Create( p_parent, p_item, psz_log, false, p_resource );
}

129
#undef input_Read
130
/**
131
 * Initialize an input thread and run it until it stops by itself.
132 133 134 135 136
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \return an error code, VLC_SUCCESS on success
 */
137
int input_Read( vlc_object_t *p_parent, input_item_t *p_item )
138
{
139
    input_thread_t *p_input = Create( p_parent, p_item, NULL, false, NULL );
140 141 142
    if( !p_input )
        return VLC_EGENERIC;

143 144
    if( !Init( p_input ) )
    {
145
        MainLoop( p_input, false );
146 147 148 149
        End( p_input );
    }

    vlc_object_release( p_input );
150 151 152
    return VLC_SUCCESS;
}

153 154 155 156 157 158
input_thread_t *input_CreatePreparser( vlc_object_t *parent,
                                       input_item_t *item )
{
    return Create( parent, item, NULL, true, NULL );
}

159 160 161 162 163 164 165 166 167
/**
 * Start a input_thread_t created by input_Create.
 *
 * You must not start an already running input_thread_t.
 *
 * \param the input thread to start
 */
int input_Start( input_thread_t *p_input )
{
168 169 170 171 172
    void *(*func)(void *) = Run;

    if( p_input->b_preparsing )
        func = Preparse;

173
    assert( !p_input->p->is_running );
174
    /* Create thread and wait for its readiness. */
175 176
    p_input->p->is_running = !vlc_clone( &p_input->p->thread, func, p_input,
                                         VLC_THREAD_PRIORITY_INPUT );
177
    if( !p_input->p->is_running )
178 179 180 181 182 183 184 185 186 187 188 189 190
    {
        input_ChangeState( p_input, ERROR_S );
        msg_Err( p_input, "cannot create input thread" );
        return VLC_EGENERIC;
    }
    return VLC_SUCCESS;
}

/**
 * Request a running input thread to stop and die
 *
 * \param p_input the input thread to stop
 */
191
void input_Stop( input_thread_t *p_input )
192
{
193 194 195 196 197 198 199 200 201 202 203 204 205
    input_thread_private_t *sys = p_input->p;

    vlc_mutex_lock( &sys->lock_control );
    /* Discard all pending controls */
    for( int i = 0; i < sys->i_control; i++ )
    {
        input_control_t *ctrl = &sys->control[i];
        ControlRelease( ctrl->i_type, ctrl->val );
    }
    sys->i_control = 0;
    sys->is_stopped = true;
    vlc_cond_signal( &sys->wait_control );
    vlc_mutex_unlock( &sys->lock_control );
206
    vlc_interrupt_kill( &sys->interrupt );
207 208
}

Laurent Aimar's avatar
Laurent Aimar committed
209 210 211 212 213
/**
 * Close an input
 *
 * It does not call input_Stop itself.
 */
214
void input_Close( input_thread_t *p_input )
Laurent Aimar's avatar
Laurent Aimar committed
215
{
216 217
    if( p_input->p->is_running )
        vlc_join( p_input->p->thread, NULL );
218
    vlc_interrupt_deinit( &p_input->p->interrupt );
219
    vlc_object_release( p_input );
Laurent Aimar's avatar
Laurent Aimar committed
220 221
}

222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void input_Destructor( vlc_object_t *obj )
{
    input_thread_t *p_input = (input_thread_t *)obj;
#ifndef NDEBUG
    char * psz_name = input_item_GetName( p_input->p->p_item );
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

    if( p_input->p->p_es_out_display )
        es_out_Delete( p_input->p->p_es_out_display );

    if( p_input->p->p_resource )
        input_resource_Release( p_input->p->p_resource );
    if( p_input->p->p_resource_private )
        input_resource_Release( p_input->p->p_resource_private );

    vlc_gc_decref( p_input->p->p_item );

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

    for( int i = 0; i < p_input->p->i_control; i++ )
    {
        input_control_t *p_ctrl = &p_input->p->control[i];
        ControlRelease( p_ctrl->i_type, p_ctrl->val );
    }

    vlc_cond_destroy( &p_input->p->wait_control );
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
}

257 258 259 260 261 262 263 264 265 266 267 268
/**
 * Get the item from an input thread
 * FIXME it does not increase ref count of the item.
 * if it is used after p_input is destroyed nothing prevent it from
 * being freed.
 */
input_item_t *input_GetItem( input_thread_t *p_input )
{
    assert( p_input && p_input->p );
    return p_input->p->p_item;
}

269
/*****************************************************************************
270 271
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
272
 *
Laurent Aimar's avatar
Laurent Aimar committed
273
 * XXX Do not forget to update vlc_input.h if you add new variables.
274
 *****************************************************************************/
275
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
276
                               const char *psz_header, bool b_quick,
277
                               input_resource_t *p_resource )
Michel Kaempf's avatar
Michel Kaempf committed
278
{
279
    input_thread_t *p_input = NULL;                 /* thread descriptor */
280

281
    /* Allocate descriptor */
282
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ), "input" );
283
    if( p_input == NULL )
284
        return NULL;
285 286 287 288 289 290

    /* 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 );
291 292 293

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

294 295
    free( psz_name );

296 297
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
298 299
    {
        vlc_object_release( p_input );
300
        return NULL;
301
    }
302

303
    /* Parse input options */
304
    input_item_ApplyOptions( VLC_OBJECT(p_input), p_item );
305

306
    p_input->b_preparsing = b_quick;
307
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
308

309
    /* Init Common fields */
310
    p_input->p->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
311
    p_input->p->i_start = 0;
Laurent Aimar's avatar
Laurent Aimar committed
312
    p_input->p->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
313 314
    p_input->p->i_stop  = 0;
    p_input->p->i_title = 0;
315
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
316
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
Laurent Aimar's avatar
Laurent Aimar committed
317
    p_input->p->i_state = INIT_S;
318 319
    p_input->p->is_running = false;
    p_input->p->is_stopped = false;
320
    p_input->p->b_recording = false;
321
    p_input->p->i_rate = INPUT_RATE_DEFAULT;
322 323
    memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
    TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
324
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
325
    p_input->p->attachment_demux = NULL;
326
    p_input->p->p_sout   = NULL;
327
    p_input->p->b_out_pace_control = false;
328

Pierre's avatar
Pierre committed
329
    vlc_gc_incref( p_item ); /* Released in Destructor() */
330 331 332
    p_input->p->p_item = p_item;

    /* Init Input fields */
333
    p_input->p->master = NULL;
334
    vlc_mutex_lock( &p_item->lock );
335 336

    if( !p_item->p_stats )
337
        p_item->p_stats = stats_NewInputStats( p_input );
338 339 340 341 342 343 344 345 346 347 348 349 350 351 352 353 354 355 356 357

    /* setup the preparse depth of the item
     * if we are preparsing, use the i_preparse_depth of the parent item */
    if( !p_input->b_preparsing )
    {
        char *psz_rec = var_InheritString( p_parent, "recursive" );

        if( psz_rec != NULL )
        {
            if ( !strcasecmp( psz_rec, "none" ) )
                p_item->i_preparse_depth = 0;
            else if ( !strcasecmp( psz_rec, "collapse" ) )
                p_item->i_preparse_depth = 1;
            else
                p_item->i_preparse_depth = -1; /* default is expand */
            free (psz_rec);
        } else
            p_item->i_preparse_depth = -1;
    }

358
    vlc_mutex_unlock( &p_item->lock );
359

360
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
361 362
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
363

364
    /* */
365
    if( p_resource )
366 367
    {
        p_input->p->p_resource_private = NULL;
368
        p_input->p->p_resource = input_resource_Hold( p_resource );
369
    }
370
    else
371 372
    {
        p_input->p->p_resource_private = input_resource_New( VLC_OBJECT( p_input ) );
373
        p_input->p->p_resource = input_resource_Hold( p_input->p->p_resource_private );
374
    }
375
    input_resource_SetInput( p_input->p->p_resource, p_input );
376

377
    /* Init control buffer */
378
    vlc_mutex_init( &p_input->p->lock_control );
379
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
380
    p_input->p->i_control = 0;
381
    vlc_interrupt_init(&p_input->p->interrupt);
382

383 384
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
385

386
    /* Create Objects variables for public Get and Set */
387
    input_ControlVarInit( p_input );
388

389
    /* */
390
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
391
    {
392 393
        char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
        if( psz_bookmarks )
Gildas Bazin's avatar
Gildas Bazin committed
394
        {
395 396
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
397
            psz_parser = psz_bookmarks;
398
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
399
            {
400
                 seekpoint_t *p_seekpoint;
401 402 403 404 405 406 407 408
                 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 = ',';
409 410

                 p_seekpoint = vlc_seekpoint_New();
411 412 413 414 415
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
416
                         p_seekpoint->psz_name = strdup(psz_start + 5);
417 418 419
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
420
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
Ilkka Ollakka's avatar
Ilkka Ollakka committed
421
                                                        CLOCK_FREQ;
422 423
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
424
                }
425 426
                msg_Dbg( p_input, "adding bookmark: %s, time=%"PRId64,
                                  p_seekpoint->psz_name,
427 428 429 430
                                  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
431
            }
432
            free( psz_bookmarks );
Gildas Bazin's avatar
Gildas Bazin committed
433 434 435
        }
    }

436
    /* Remove 'Now playing' info as it is probably outdated */
437
    input_item_SetNowPlaying( p_item, NULL );
438
    input_item_SetESNowPlaying( p_item, NULL );
439
    input_SendEventMeta( p_input );
440

441 442 443 444
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

445 446 447 448
    /* Make sure the interaction option is honored */
    if( !var_InheritBool( p_input, "interact" ) )
        p_input->i_flags |= OBJECT_FLAGS_NOINTERACT;

449
    /* */
450
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
451
    vlc_mutex_init( &p_input->p->counters.counters_lock );
452

453 454 455
    p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
    p_input->p->p_es_out = NULL;

456
    /* Set the destructor when we are sure we are initialized */
457
    vlc_object_set_destructor( p_input, input_Destructor );
458

459 460 461
    return p_input;
}

462
/*****************************************************************************
463
 * Run: main thread loop
464 465
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
466
 *****************************************************************************/
467
static void *Run( void *obj )
Michel Kaempf's avatar
Michel Kaempf committed
468
{
469
    input_thread_t *p_input = (input_thread_t *)obj;
470

471 472
    vlc_interrupt_set(&p_input->p->interrupt);

473 474 475
    if( !Init( p_input ) )
    {
        MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
476

477 478 479
        /* Clean up */
        End( p_input );
    }
480

481
    input_SendEventDead( p_input );
482
    return NULL;
483 484
}

485 486 487 488 489 490 491 492 493 494 495 496 497 498 499 500 501 502 503 504 505 506 507 508 509
static void *Preparse( void *obj )
{
    input_thread_t *p_input = (input_thread_t *)obj;

    vlc_interrupt_set(&p_input->p->interrupt);

    if( !Init( p_input ) )
    {   /* if the demux is a playlist, call Mainloop that will call
         * demux_Demux in order to fetch sub items */
        bool b_is_playlist = false;

        if ( input_item_ShouldPreparseSubItems( p_input->p->p_item )
          && demux_Control( p_input->p->master->p_demux,
                            DEMUX_IS_PLAYLIST,
                            &b_is_playlist ) )
            b_is_playlist = false;
        if( b_is_playlist )
            MainLoop( p_input, false );
        End( p_input );
    }

    input_SendEventDead( p_input );
    return NULL;
}

510 511 512 513 514 515 516 517 518 519 520
bool input_Stopped( input_thread_t *input )
{
    input_thread_private_t *sys = input->p;
    bool ret;

    vlc_mutex_lock( &sys->lock_control );
    ret = sys->is_stopped;
    vlc_mutex_unlock( &sys->lock_control );
    return ret;
}

521 522 523
/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
524 525 526 527 528

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
529
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed )
530
{
531
    int i_ret;
532

533
    *pb_changed = false;
534

535
    if( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop )
536 537
        i_ret = 0; /* EOF */
    else
538
        i_ret = demux_Demux( p_input->p->master->p_demux );
539 540

    if( i_ret > 0 )
541
    {
542
        if( p_input->p->master->p_demux->info.i_update )
543
        {
544
            if( p_input->p->master->p_demux->info.i_update & INPUT_UPDATE_TITLE_LIST )
545 546
            {
                UpdateTitleListfromDemux( p_input );
547
                p_input->p->master->p_demux->info.i_update &= ~INPUT_UPDATE_TITLE_LIST;
548
            }
549
            if( p_input->p->master->b_title_demux )
550 551 552 553 554
            {
                i_ret = UpdateTitleSeekpointFromDemux( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromDemux( p_input );
555 556
        }
    }
557

558 559
    if( i_ret == 0 )    /* EOF */
    {
560
        msg_Dbg( p_input, "EOF reached" );
561
        p_input->p->master->b_eof = true;
562
        es_out_Eos(p_input->p->p_es_out);
563 564 565 566 567 568 569
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
570
        SlaveDemux( p_input );
571 572
}

573
static int MainLoopTryRepeat( input_thread_t *p_input )
574 575
{
    int i_repeat = var_GetInteger( p_input, "input-repeat" );
576
    if( i_repeat <= 0 )
577 578 579 580 581 582 583 584 585 586 587 588
        return VLC_EGENERIC;

    vlc_value_t val;

    msg_Dbg( p_input, "repeating the same input (%d)", i_repeat );
    if( i_repeat > 0 )
    {
        i_repeat--;
        var_SetInteger( p_input, "input-repeat", i_repeat );
    }

    /* Seek to start title/seekpoint */
589 590 591
    val.i_int = p_input->p->master->i_title_start -
        p_input->p->master->i_title_offset;
    if( val.i_int < 0 || val.i_int >= p_input->p->master->i_title )
592 593 594 595
        val.i_int = 0;
    input_ControlPush( p_input,
                       INPUT_CONTROL_SET_TITLE, &val );

596 597
    val.i_int = p_input->p->master->i_seekpoint_start -
        p_input->p->master->i_seekpoint_offset;
598 599 600 601 602 603 604
    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 )
    {
605
        val.i_int = p_input->p->i_start;
606 607 608 609
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
    }
    else
    {
610
        val.f_float = 0.f;
611 612 613 614 615 616
        input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
    }

    return VLC_SUCCESS;
}

617
/**
618
 * Update timing infos and statistics.
619
 */
620
static void MainLoopStatistics( input_thread_t *p_input )
621
{
622 623 624
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
625 626

    /* update input status variables */
627
    if( demux_Control( p_input->p->master->p_demux,
628 629
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
630

631
    if( demux_Control( p_input->p->master->p_demux,
632 633
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
Laurent Aimar's avatar
Laurent Aimar committed
634
    p_input->p->i_time = i_time;
635

636
    if( demux_Control( p_input->p->master->p_demux,
637 638
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
639

640
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
641 642 643 644 645

    /* update current bookmark */
    vlc_mutex_lock( &p_input->p->p_item->lock );
    p_input->p->bookmark.i_time_offset = i_time;
    vlc_mutex_unlock( &p_input->p->p_item->lock );
646

647
    stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
648
    input_SendEventStatistics( p_input );
649 650 651 652 653 654
}

/**
 * MainLoop
 * The main input loop.
 */
655
static void MainLoop( input_thread_t *p_input, bool b_interactive )
656
{
657
    mtime_t i_intf_update = 0;
658
    mtime_t i_last_seek_mdate = 0;
659 660

    if( b_interactive && var_InheritBool( p_input, "start-paused" ) )
661
        ControlPause( p_input, mdate() );
662

663
    bool b_pause_after_eof = b_interactive &&
664
                             var_InheritBool( p_input, "play-and-pause" );
665

666
    while( !input_Stopped( p_input ) && p_input->p->i_state != ERROR_S )
667
    {
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
668
        mtime_t i_wakeup = -1;
669
        bool b_paused = p_input->p->i_state == PAUSE_S;
Laurent Aimar's avatar
Laurent Aimar committed
670
        /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
671 672
         * is paused -> this may cause problem with some of them
         * The same problem can be seen when seeking while paused */
673
        if( b_paused )
674 675
            b_paused = !es_out_GetBuffering( p_input->p->p_es_out )
                    || p_input->p->master->b_eof;
676 677

        if( !b_paused )
678
        {
679
            if( !p_input->p->master->b_eof )
680
            {
681
                bool b_force_update = false;
682

683
                MainLoopDemux( p_input, &b_force_update );
684

685 686
                if( p_input->p->master->p_demux->pf_demux != NULL )
                    i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
687 688
                if( b_force_update )
                    i_intf_update = 0;
689
            }
690
            else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
691 692 693 694
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
695 696 697
            /* Pause after eof only if the input is pausable.
             * This way we won't trigger timeshifting for nothing */
            else if( b_pause_after_eof && p_input->p->b_can_pause )
698
            {
699 700
                vlc_value_t val = { .i_int = PAUSE_S };

701 702 703 704 705
                msg_Dbg( p_input, "pausing at EOF (pause after each)");
                Control( p_input, INPUT_CONTROL_SET_STATE, val );

                b_paused = true;
            }
706 707
            else
            {
708
                if( MainLoopTryRepeat( p_input ) )
709
                    break;
710
            }
711 712 713 714 715 716 717 718

            /* Update interface and statistics */
            mtime_t now = mdate();
            if( now >= i_intf_update )
            {
                MainLoopStatistics( p_input );
                i_intf_update = now + INT64_C(250000);
            }
719
        }
720

721 722 723
        /* Handle control */
        for( ;; )
        {
724
            mtime_t i_deadline = i_wakeup;
725 726 727 728

            /* Postpone seeking until ES buffering is complete or at most
             * 125 ms. */
            bool b_postpone = es_out_GetBuffering( p_input->p->p_es_out )
729
                            && !p_input->p->master->b_eof;
730
            if( b_postpone )
731
            {
732 733 734 735
                mtime_t now = mdate();

                /* Recheck ES buffer level every 20 ms when seeking */
                if( now < i_last_seek_mdate + INT64_C(125000)
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
736
                 && (i_deadline < 0 || i_deadline > now + INT64_C(20000)) )
737 738 739 740
                    i_deadline = now + INT64_C(20000);
                else
                    b_postpone = false;
            }
741

742 743
            int i_type;
            vlc_value_t val;
744

745 746 747 748 749 750
            if( ControlPop( p_input, &i_type, &val, i_deadline, b_postpone ) )
            {
                if( b_postpone )
                    continue;
                break; /* Wake-up time reached */
            }
751

752
#ifndef NDEBUG
753
            msg_Dbg( p_input, "control type=%d", i_type );
754
#endif
755 756 757 758 759
            if( Control( p_input, i_type, val ) )
            {
                if( ControlIsSeekRequest( i_type ) )
                    i_last_seek_mdate = mdate();
                i_intf_update = 0;
760
            }
761

762
            /* Update the wakeup time */
763
            if( i_wakeup != 0 )
764
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
765
        }
766
    }
767 768
}

769
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
770
{
771
    if( p_input->b_preparsing ) return;
772

773
    /* Prepare statistics */
774 775
#define INIT_COUNTER( c, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( STATS_##compute);
776
    if( libvlc_stats( p_input ) )
777
    {
778 779 780 781 782 783 784 785 786 787 788 789 790 791
        INIT_COUNTER( read_bytes, COUNTER );
        INIT_COUNTER( read_packets, COUNTER );
        INIT_COUNTER( demux_read, COUNTER );
        INIT_COUNTER( input_bitrate, DERIVATIVE );
        INIT_COUNTER( demux_bitrate, DERIVATIVE );
        INIT_COUNTER( demux_corrupted, COUNTER );
        INIT_COUNTER( demux_discontinuity, COUNTER );
        INIT_COUNTER( played_abuffers, COUNTER );
        INIT_COUNTER( lost_abuffers, COUNTER );
        INIT_COUNTER( displayed_pictures, COUNTER );
        INIT_COUNTER( lost_pictures, COUNTER );
        INIT_COUNTER( decoded_audio, COUNTER );
        INIT_COUNTER( decoded_video, COUNTER );
        INIT_COUNTER( decoded_sub, COUNTER );
792 793 794
        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;
795
    }
796
}
797

798
#ifdef ENABLE_SOUT
799 800
static int InitSout( input_thread_t * p_input )
{
801 802
    if( p_input->b_preparsing )
        return VLC_SUCCESS;
803 804

    /* Find a usable sout and attach it to p_input */
805
    char *psz = var_GetNonEmptyString( p_input, "sout" );
806
    if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
807
    {
808
        p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
809
        if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
810
        {
811 812 813 814 815
            input_ChangeState( p_input, ERROR_S );
            msg_Err( p_input, "cannot start stream output instance, " \
                              "aborting" );
            free( psz );
            return VLC_EGENERIC;
816
        }
817
        if( libvlc_stats( p_input ) )
818
        {
819 820 821
            INIT_COUNTER( sout_sent_packets, COUNTER );
            INIT_COUNTER( sout_sent_bytes, COUNTER );
            INIT_COUNTER( sout_send_bitrate, DERIVATIVE );
822
        }
823
    }
824
    else
825
    {
826
        input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
827
    }
828
    free( psz );
829

830 831
    return VLC_SUCCESS;
}
832
#endif
833

834 835
static void InitTitle( input_thread_t * p_input )
{
836
    input_source_t *p_master = p_input->p->master;
837

Laurent Aimar's avatar
Laurent Aimar committed
838 839
    if( p_input->b_preparsing )
        return;
840

841
    vlc_mutex_lock( &p_input->p->p_item->lock );
842
    /* Create global title (from master) */
Laurent Aimar's avatar
Laurent Aimar committed
843 844 845 846
    p_input->p->i_title = p_master->i_title;
    p_input->p->title   = p_master->title;
    p_input->p->i_title_offset = p_master->i_title_offset;
    p_input->p->i_seekpoint_offset = p_master->i_seekpoint_offset;
847 848 849 850
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
851
        input_SendEventTitle( p_input, 0 );
852 853 854
    }

    /* Global flag */
855
    p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
Laurent Aimar's avatar
Laurent Aimar committed
856 857
    p_input->p->b_can_pause        = p_master->b_can_pause;
    p_input->p->b_can_rate_control = p_master->b_can_rate_control;
858
    vlc_mutex_unlock( &p_input->p->p_item->lock );
859
}
860

861 862 863
static void StartTitle( input_thread_t * p_input )
{
    vlc_value_t val;
864

865
    /* Start title/chapter */
866 867 868
    val.i_int = p_input->p->master->i_title_start -
                p_input->p->master->i_title_offset;
    if( val.i_int > 0 && val.i_int < p_input->p->master->i_title )
869
        input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
Laurent Aimar's avatar
Laurent Aimar committed
870

871 872
    val.i_int = p_input->p->master->i_seekpoint_start -
                p_input->p->master->i_seekpoint_offset;
873 874 875
    if( val.i_int > 0 /* TODO: check upper boundary */ )
        input_ControlPush( p_input, INPUT_CONTROL_SET_SEEKPOINT, &val );

Laurent Aimar's avatar
Laurent Aimar committed
876
    /* Start/stop/run time */
877
    p_input->p->i_start = llroundf(1000000.f
878
                                     * var_GetFloat( p_input, "start-time" ));
879
    p_input->p->i_stop  = llroundf(1000000.f
880
                                     * var_GetFloat( p_input, "stop-time" ));
881
    if( p_input->p->i_stop <= 0 )
882
    {
883 884 885 886 887 888 889 890 891
        p_input->p->i_stop = llroundf(1000000.f
                                     * var_GetFloat( p_input, "run-time" ));
        if( p_input->p->i_stop < 0 )
        {
            msg_Warn( p_input, "invalid run-time ignored" );
            p_input->p->i_stop = 0;
        }
        else
            p_input->p->i_stop += p_input->p->i_start;
Rafaël Carré's avatar
Rafaël Carré committed
892
    }
893

894
    if( p_input->p->i_start > 0 )
895
    {
896
        vlc_value_t s;
897

898
        msg_Dbg( p_input, "starting at time: %ds",
Ilkka Ollakka's avatar
Ilkka Ollakka committed
899
                 (int)( p_input->p->i_start / CLOCK_FREQ ) );
900

901
        s.i_int = p_input->p->i_start;
902
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
903 904 905 906 907 908
    }
    if( p_input->p->i_stop > 0 && p_input->p->i_stop <= p_input->p->i_start )
    {
        msg_Warn( p_input, "invalid stop-time ignored" );
        p_input->p->i_stop = 0;
    }
909
    p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
Laurent Aimar's avatar
Laurent Aimar committed
910
}
911

Laurent Aimar's avatar
Laurent Aimar committed
912 913
static void LoadSubtitles( input_thread_t *p_input )
{
914 915
    /* Load subtitles */
    /* Get fps and set it if not already set */
916
    const float f_fps = p_input->p->master->f_fps;
917
    if( f_fps > 1.f )
918 919 920
    {
        var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
        var_SetFloat( p_input, "sub-original-fps", f_fps );
921

922
        float f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
923
        if( f_requested_fps != f_fps )
924
        {
925 926 927
            var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
                                            VLC_VAR_DOINHERIT );
            var_SetFloat( p_input, "sub-fps", f_requested_fps );
928
        }
929
    }