input.c 99.4 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 98
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              const demux_t ***ppp_attachment_demux,
                              int i_new, input_attachment_t **pp_new, const demux_t *p_demux );
99

100 101 102 103
#define SLAVE_ADD_NOFLAG    0
#define SLAVE_ADD_FORCED    (1<<0)
#define SLAVE_ADD_CANFAIL   (1<<1)
#define SLAVE_ADD_SET_TIME  (1<<2)
104

105 106
static int input_SlaveSourceAdd( input_thread_t *, enum slave_type,
                                 const char *, unsigned );
107
static char *input_SubtitleFile2Uri( input_thread_t *, const char * );
108 109
static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */

110
#undef input_Create
111 112 113 114 115 116 117 118 119 120 121 122
/**
 * 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
 */
123 124 125
input_thread_t *input_Create( vlc_object_t *p_parent,
                              input_item_t *p_item,
                              const char *psz_log, input_resource_t *p_resource )
126 127 128 129
{
    return Create( p_parent, p_item, psz_log, false, p_resource );
}

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

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

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

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

160 161 162 163 164 165 166 167 168
/**
 * 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 )
{
169
    input_thread_private_t *priv = input_priv(p_input);
170 171
    void *(*func)(void *) = Run;

172
    if( priv->b_preparsing )
173 174
        func = Preparse;

175
    assert( !priv->is_running );
176
    /* Create thread and wait for its readiness. */
177 178 179
    priv->is_running = !vlc_clone( &priv->thread, func, priv,
                                   VLC_THREAD_PRIORITY_INPUT );
    if( !priv->is_running )
180 181 182 183 184 185 186 187 188 189 190 191 192
    {
        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
 */
193
void input_Stop( input_thread_t *p_input )
194
{
195
    input_thread_private_t *sys = input_priv(p_input);
196 197 198 199 200 201 202 203 204 205 206 207

    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 );
208
    vlc_interrupt_kill( &sys->interrupt );
209 210
}

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

224 225 226 227 228 229
/**
 * 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;
230
    input_thread_private_t *priv = input_priv(p_input);
231
#ifndef NDEBUG
232
    char * psz_name = input_item_GetName( priv->p_item );
233 234 235 236
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

237 238
    if( priv->p_es_out_display )
        es_out_Delete( priv->p_es_out_display );
239

240 241 242 243
    if( priv->p_resource )
        input_resource_Release( priv->p_resource );
    if( priv->p_resource_private )
        input_resource_Release( priv->p_resource_private );
244

245
    vlc_gc_decref( priv->p_item );
246

247
    vlc_mutex_destroy( &priv->counters.counters_lock );
248

249
    for( int i = 0; i < priv->i_control; i++ )
250
    {
251
        input_control_t *p_ctrl = &priv->control[i];
252 253 254
        ControlRelease( p_ctrl->i_type, p_ctrl->val );
    }

255 256
    vlc_cond_destroy( &priv->wait_control );
    vlc_mutex_destroy( &priv->lock_control );
257 258
}

259 260 261 262 263 264 265 266
/**
 * 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 )
{
267 268
    assert( p_input != NULL );
    return input_priv(p_input)->p_item;
269 270
}

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

    priv = vlc_custom_create( p_parent, sizeof( *priv ), "input" );
    if( unlikely(priv == NULL) )
286
        return NULL;
287

288 289
    input_thread_t *p_input = &priv->input;

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

296 297
    msg_Dbg( p_input, "Creating an input for %s'%s'",
             b_preparsing ? "preparsing " : "", psz_name);
298

299 300
    free( psz_name );

301
    /* Parse input options */
302
    input_item_ApplyOptions( VLC_OBJECT(p_input), p_item );
303

304
    p_input->obj.header = psz_header ? strdup( psz_header ) : NULL;
305

306
    /* Init Common fields */
307
    priv->b_preparsing = b_preparsing;
308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325
    priv->b_can_pace_control = true;
    priv->i_start = 0;
    priv->i_time  = 0;
    priv->i_stop  = 0;
    priv->i_title = 0;
    priv->title = NULL;
    priv->i_title_offset = input_priv(p_input)->i_seekpoint_offset = 0;
    priv->i_state = INIT_S;
    priv->is_running = false;
    priv->is_stopped = false;
    priv->b_recording = false;
    priv->i_rate = INPUT_RATE_DEFAULT;
    memset( &priv->bookmark, 0, sizeof(priv->bookmark) );
    TAB_INIT( priv->i_bookmark, priv->pp_bookmark );
    TAB_INIT( priv->i_attachment, priv->attachment );
    priv->attachment_demux = NULL;
    priv->p_sout   = NULL;
    priv->b_out_pace_control = false;
326

Pierre's avatar
Pierre committed
327
    vlc_gc_incref( p_item ); /* Released in Destructor() */
328
    priv->p_item = p_item;
329 330

    /* Init Input fields */
331
    priv->master = NULL;
332
    vlc_mutex_lock( &p_item->lock );
333 334

    if( !p_item->p_stats )
335
        p_item->p_stats = stats_NewInputStats( p_input );
336 337 338

    /* setup the preparse depth of the item
     * if we are preparsing, use the i_preparse_depth of the parent item */
339
    if( !priv->b_preparsing )
340 341 342 343 344 345 346 347 348 349 350 351 352 353 354
    {
        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;
    }
355
    else
356
        p_input->obj.flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;
357 358 359

    /* Make sure the interaction option is honored */
    if( !var_InheritBool( p_input, "interact" ) )
360
        p_input->obj.flags |= OBJECT_FLAGS_NOINTERACT;
361 362 363
    else if( p_item->b_preparse_interact )
    {
        /* If true, this item was asked explicitly to interact with the user
364
         * (via libvlc_MetadataRequest). Sub items created from this input won't
365
         * have this flag and won't interact with the user */
366
        p_input->obj.flags &= ~OBJECT_FLAGS_NOINTERACT;
367 368
    }

369
    vlc_mutex_unlock( &p_item->lock );
370

371
    /* No slave */
372 373
    priv->i_slave = 0;
    priv->slave   = NULL;
374

375
    /* */
376
    if( p_resource )
377
    {
378 379
        priv->p_resource_private = NULL;
        priv->p_resource = input_resource_Hold( p_resource );
380
    }
381
    else
382
    {
383 384
        priv->p_resource_private = input_resource_New( VLC_OBJECT( p_input ) );
        priv->p_resource = input_resource_Hold( priv->p_resource_private );
385
    }
386
    input_resource_SetInput( priv->p_resource, p_input );
387

388
    /* Init control buffer */
389 390 391 392
    vlc_mutex_init( &priv->lock_control );
    vlc_cond_init( &priv->wait_control );
    priv->i_control = 0;
    vlc_interrupt_init(&priv->interrupt);
393

394 395
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
396

397
    /* Create Objects variables for public Get and Set */
398
    input_ControlVarInit( p_input );
399

400
    /* */
401
    if( !priv->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
402
    {
403 404
        char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
        if( psz_bookmarks )
Gildas Bazin's avatar
Gildas Bazin committed
405
        {
406 407
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
408
            psz_parser = psz_bookmarks;
409
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
410
            {
411
                 seekpoint_t *p_seekpoint;
412 413 414 415 416 417 418 419
                 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 = ',';
420 421

                 p_seekpoint = vlc_seekpoint_New();
422

423 424
                 if( unlikely( p_seekpoint == NULL ) )
                     break;
425

426 427 428 429 430
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
431 432
                         free( p_seekpoint->psz_name );

433
                         p_seekpoint->psz_name = strdup(psz_start + 5);
434 435 436
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
437
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
Ilkka Ollakka's avatar
Ilkka Ollakka committed
438
                                                        CLOCK_FREQ;
439 440
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
441
                }
442 443
                msg_Dbg( p_input, "adding bookmark: %s, time=%"PRId64,
                                  p_seekpoint->psz_name,
444 445 446 447
                                  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
448
            }
449
            free( psz_bookmarks );
Gildas Bazin's avatar
Gildas Bazin committed
450 451 452
        }
    }

453
    /* Remove 'Now playing' info as it is probably outdated */
454
    input_item_SetNowPlaying( p_item, NULL );
455
    input_item_SetESNowPlaying( p_item, NULL );
456
    input_SendEventMeta( p_input );
457

458
    /* */
459 460
    memset( &priv->counters, 0, sizeof( priv->counters ) );
    vlc_mutex_init( &priv->counters.counters_lock );
461

462 463
    priv->p_es_out_display = input_EsOutNew( p_input, priv->i_rate );
    priv->p_es_out = NULL;
464

465
    /* Set the destructor when we are sure we are initialized */
466
    vlc_object_set_destructor( p_input, input_Destructor );
467

468 469 470
    return p_input;
}

471
/*****************************************************************************
472
 * Run: main thread loop
473 474
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
475
 *****************************************************************************/
476
static void *Run( void *data )
Michel Kaempf's avatar
Michel Kaempf committed
477
{
478 479
    input_thread_private_t *priv = data;
    input_thread_t *p_input = &priv->input;
480

481
    vlc_interrupt_set(&priv->interrupt);
482

483 484
    if( !Init( p_input ) )
    {
485
        if( priv->b_can_pace_control && priv->b_out_pace_control )
486 487 488
        {
            /* We don't want a high input priority here or we'll
             * end-up sucking up all the CPU time */
489
            vlc_set_priority( priv->thread, VLC_THREAD_PRIORITY_LOW );
490 491
        }

492
        MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
493

494 495 496
        /* Clean up */
        End( p_input );
    }
497

498
    input_SendEventDead( p_input );
499
    return NULL;
500 501
}

502
static void *Preparse( void *data )
503
{
504 505
    input_thread_private_t *priv = data;
    input_thread_t *p_input = &priv->input;
506

507
    vlc_interrupt_set(&priv->interrupt);
508 509 510 511 512 513

    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;

514 515
        if ( input_item_ShouldPreparseSubItems( priv->p_item )
          && demux_Control( priv->master->p_demux, DEMUX_IS_PLAYLIST,
516 517 518 519 520 521 522 523 524 525 526
                            &b_is_playlist ) )
            b_is_playlist = false;
        if( b_is_playlist )
            MainLoop( p_input, false );
        End( p_input );
    }

    input_SendEventDead( p_input );
    return NULL;
}

527 528
bool input_Stopped( input_thread_t *input )
{
529
    input_thread_private_t *sys = input_priv(input);
530 531 532 533 534 535 536 537
    bool ret;

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

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

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
546
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed )
547
{
548
    int i_ret;
549
    demux_t *p_demux = input_priv(p_input)->master->p_demux;
550

551
    *pb_changed = false;
552

553
    if( input_priv(p_input)->i_stop > 0 && input_priv(p_input)->i_time >= input_priv(p_input)->i_stop )
554
        i_ret = VLC_DEMUXER_EOF;
555
    else
Steve Lhomme's avatar
Steve Lhomme committed
556
        i_ret = demux_Demux( p_demux );
557

558 559 560
    i_ret = i_ret > 0 ? VLC_DEMUXER_SUCCESS : ( i_ret < 0 ? VLC_DEMUXER_EGENERIC : VLC_DEMUXER_EOF);

    if( i_ret == VLC_DEMUXER_SUCCESS )
561
    {
562 563 564
        if( demux_TestAndClearFlags( p_demux, INPUT_UPDATE_TITLE_LIST ) )
            UpdateTitleListfromDemux( p_input );

565
        if( input_priv(p_input)->master->b_title_demux )
566
        {
567 568
            i_ret = UpdateTitleSeekpointFromDemux( p_input );
            *pb_changed = true;
569
        }
570 571

        UpdateGenericFromDemux( p_input );
572
    }
573

574
    if( i_ret == VLC_DEMUXER_EOF )
575
    {
576
        msg_Dbg( p_input, "EOF reached" );
577 578
        input_priv(p_input)->master->b_eof = true;
        es_out_Eos(input_priv(p_input)->p_es_out);
579
    }
580
    else if( i_ret == VLC_DEMUXER_EGENERIC )
581 582 583
    {
        input_ChangeState( p_input, ERROR_S );
    }
584
    else if( input_priv(p_input)->i_slave > 0 )
585
        SlaveDemux( p_input );
586 587
}

588
static int MainLoopTryRepeat( input_thread_t *p_input )
589 590
{
    int i_repeat = var_GetInteger( p_input, "input-repeat" );
591
    if( i_repeat <= 0 )
592 593 594 595 596 597 598 599 600 601 602 603
        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 */
604 605 606
    val.i_int = input_priv(p_input)->master->i_title_start -
        input_priv(p_input)->master->i_title_offset;
    if( val.i_int < 0 || val.i_int >= input_priv(p_input)->master->i_title )
607 608 609 610
        val.i_int = 0;
    input_ControlPush( p_input,
                       INPUT_CONTROL_SET_TITLE, &val );

611 612
    val.i_int = input_priv(p_input)->master->i_seekpoint_start -
        input_priv(p_input)->master->i_seekpoint_offset;
613 614 615 616 617
    if( val.i_int > 0 /* TODO: check upper boundary */ )
        input_ControlPush( p_input,
                           INPUT_CONTROL_SET_SEEKPOINT, &val );

    /* Seek to start position */
618
    if( input_priv(p_input)->i_start > 0 )
619
    {
620
        val.i_int = input_priv(p_input)->i_start;
621 622 623 624
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
    }
    else
    {
625
        val.f_float = 0.f;
626 627 628 629 630 631
        input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
    }

    return VLC_SUCCESS;
}

632
/**
633
 * Update timing infos and statistics.
634
 */
635
static void MainLoopStatistics( input_thread_t *p_input )
636
{
637 638 639
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
640 641

    /* update input status variables */
642
    if( demux_Control( input_priv(p_input)->master->p_demux,
643 644
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
645

646
    if( demux_Control( input_priv(p_input)->master->p_demux,
647 648
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
649
    input_priv(p_input)->i_time = i_time;
650

651
    if( demux_Control( input_priv(p_input)->master->p_demux,
652 653
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
654

655
    es_out_SetTimes( input_priv(p_input)->p_es_out, f_position, i_time, i_length );
656 657

    /* update current bookmark */
658 659 660
    vlc_mutex_lock( &input_priv(p_input)->p_item->lock );
    input_priv(p_input)->bookmark.i_time_offset = i_time;
    vlc_mutex_unlock( &input_priv(p_input)->p_item->lock );
661

662
    stats_ComputeInputStats( p_input, input_priv(p_input)->p_item->p_stats );
663
    input_SendEventStatistics( p_input );
664 665 666 667 668 669
}

/**
 * MainLoop
 * The main input loop.
 */
670
static void MainLoop( input_thread_t *p_input, bool b_interactive )
671
{
672
    mtime_t i_intf_update = 0;
673
    mtime_t i_last_seek_mdate = 0;
674 675

    if( b_interactive && var_InheritBool( p_input, "start-paused" ) )
676
        ControlPause( p_input, mdate() );
677

678
    bool b_pause_after_eof = b_interactive &&
679
                             var_InheritBool( p_input, "play-and-pause" );
680

681
    demux_t *p_demux = input_priv(p_input)->master->p_demux;
682 683
    const bool b_can_demux = p_demux->pf_demux != NULL;

684
    while( !input_Stopped( p_input ) && input_priv(p_input)->i_state != ERROR_S )
685
    {
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
686
        mtime_t i_wakeup = -1;
687 688
        bool b_paused = input_priv(p_input)->i_state == PAUSE_S;
        /* FIXME if input_priv(p_input)->i_state == PAUSE_S the access/access_demux
689 690
         * is paused -> this may cause problem with some of them
         * The same problem can be seen when seeking while paused */
691
        if( b_paused )
692 693
            b_paused = !es_out_GetBuffering( input_priv(p_input)->p_es_out )
                    || input_priv(p_input)->master->b_eof;
694 695

        if( !b_paused )
696
        {
697
            if( !input_priv(p_input)->master->b_eof )
698
            {
699
                bool b_force_update = false;
700

701
                MainLoopDemux( p_input, &b_force_update );
702

703
                if( b_can_demux )
704
                    i_wakeup = es_out_GetWakeup( input_priv(p_input)->p_es_out );
705 706
                if( b_force_update )
                    i_intf_update = 0;
707
            }
708
            else if( !es_out_GetEmpty( input_priv(p_input)->p_es_out ) )
709 710 711 712
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
713 714
            /* Pause after eof only if the input is pausable.
             * This way we won't trigger timeshifting for nothing */
715
            else if( b_pause_after_eof && input_priv(p_input)->b_can_pause )
716
            {
717 718
                vlc_value_t val = { .i_int = PAUSE_S };

719 720 721 722 723
                msg_Dbg( p_input, "pausing at EOF (pause after each)");
                Control( p_input, INPUT_CONTROL_SET_STATE, val );

                b_paused = true;
            }
724 725
            else
            {
726
                if( MainLoopTryRepeat( p_input ) )
727
                    break;
728
            }
729 730 731 732 733 734 735 736

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

739 740 741
        /* Handle control */
        for( ;; )
        {
742
            mtime_t i_deadline = i_wakeup;
743 744 745

            /* Postpone seeking until ES buffering is complete or at most
             * 125 ms. */
746 747
            bool b_postpone = es_out_GetBuffering( input_priv(p_input)->p_es_out )
                            && !input_priv(p_input)->master->b_eof;
748
            if( b_postpone )
749
            {
750 751 752 753
                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
754
                 && (i_deadline < 0 || i_deadline > now + INT64_C(20000)) )
755 756 757 758
                    i_deadline = now + INT64_C(20000);
                else
                    b_postpone = false;
            }
759

760 761
            int i_type;
            vlc_value_t val;
762

763 764 765 766 767 768
            if( ControlPop( p_input, &i_type, &val, i_deadline, b_postpone ) )
            {
                if( b_postpone )
                    continue;
                break; /* Wake-up time reached */
            }
769

770
#ifndef NDEBUG
771
            msg_Dbg( p_input, "control type=%d", i_type );
772
#endif
773 774 775 776 777
            if( Control( p_input, i_type, val ) )
            {
                if( ControlIsSeekRequest( i_type ) )
                    i_last_seek_mdate = mdate();
                i_intf_update = 0;
778
            }
779

780
            /* Update the wakeup time */
781
            if( i_wakeup != 0 )
782
                i_wakeup = es_out_GetWakeup( input_priv(p_input)->p_es_out );
783
        }
784
    }
785 786
}

787
static void InitStatistics( input_thread_t *p_input )
Michel Kaempf's avatar
Michel Kaempf committed
788
{
789 790
    input_thread_private_t *priv = input_priv(p_input);

791
    if( priv->b_preparsing ) return;
792

793
    /* Prepare statistics */
794
#define INIT_COUNTER( c, compute ) priv->counters.p_##c = \
795
 stats_CounterCreate( STATS_##compute);
796
    if( libvlc_stats( p_input ) )
797
    {
798 799 800 801 802 803 804 805 806 807 808 809 810 811
        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 );
812 813 814
        priv->counters.p_sout_send_bitrate = NULL;
        priv->counters.p_sout_sent_packets = NULL;
        priv->counters.p_sout_sent_bytes = NULL;
815
    }
816
}
817

818
#ifdef ENABLE_SOUT
819 820
static int InitSout( input_thread_t * p_input )
{
821 822
    input_thread_private_t *priv = input_priv(p_input);

823
    if( priv->b_preparsing )
824
        return VLC_SUCCESS;
825 826

    /* Find a usable sout and attach it to p_input */
827
    char *psz = var_GetNonEmptyString( p_input, "sout" );
828
    if( psz && strncasecmp( priv->p_item->psz_uri, "vlc:", 4 ) )
829
    {
830 831
        priv->p_sout  = input_resource_RequestSout( priv->p_resource, NULL, psz );
        if( priv->p_sout == NULL )
Clément Stenac's avatar
Clément Stenac committed
832
        {
833 834 835 836 837
            input_ChangeState( p_input, ERROR_S );
            msg_Err( p_input, "cannot start stream output instance, " \
                              "aborting" );
            free( psz );
            return VLC_EGENERIC;
838
        }
839
        if( libvlc_stats( p_input ) )
840
        {
841 842 843
            INIT_COUNTER( sout_sent_packets, COUNTER );
            INIT_COUNTER( sout_sent_bytes, COUNTER );
            INIT_COUNTER( sout_send_bitrate, DERIVATIVE );
844
        }
845
    }
846
    else
847
    {
848
        input_resource_RequestSout( priv->p_resource, NULL, NULL );
849
    }
850
    free( psz );
851

852 853
    return VLC_SUCCESS;
}
854
#endif
855

856 857
static void InitTitle( input_thread_t * p_input )
{
858 859
    input_thread_private_t *priv = input_priv(p_input);
    input_source_t *p_master = priv->master;
860

861
    if( priv->b_preparsing )
Laurent Aimar's avatar
Laurent Aimar committed
862
        return;
863

864
    vlc_mutex_lock( &priv->p_item->lock );
865
    /* Create global title (from master) */
866 867 868 869 870
    priv->i_title = p_master->i_title;
    priv->title   = p_master->title;
    priv->i_title_offset = p_master->i_title_offset;
    priv->i_seekpoint_offset = p_master->i_seekpoint_offset;
    if( priv->i_title > 0 )
871 872 873
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
874
        input_SendEventTitle( p_input, 0 );
875 876 877
    }

    /* Global flag */
878 879 880 881
    priv->b_can_pace_control = p_master->b_can_pace_control;
    priv->b_can_pause        = p_master->b_can_pause;
    priv->b_can_rate_control = p_master->b_can_rate_control;
    vlc_mutex_unlock( &priv->p_item->lock );
882
}
883

884 885
static void StartTitle( input_thread_t * p_input )
{
886
    input_thread_private_t *priv = input_priv(p_input);
887
    vlc_value_t val;
888

889
    /* Start title/chapter */
890 891
    val.i_int = priv->master->i_title_start - priv->master->i_title_offset;
    if( val.i_int > 0 && val.i_int < priv->master->i_title )
892
        input_ControlPush( p_input, INPUT_CONTROL_SET_TITLE, &val );
Laurent Aimar's avatar
Laurent Aimar committed
893

894 895
    val.i_int = priv->master->i_seekpoint_start -
                priv->master->i_seekpoint_offset;
896 897 898
    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
899
    /* Start/stop/run time */
900
    priv->i_start = llroundf(1000000.f