input.c 110 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

Christophe Mutricy's avatar
Christophe Mutricy committed
34
#include <limits.h>
35
#include <assert.h>
36
#include <errno.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
#include "item.h"
46
#include "resource.h"
47

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

51
#include <vlc_dialog.h>
Clément Stenac's avatar
Clément Stenac committed
52 53
#include <vlc_url.h>
#include <vlc_charset.h>
54
#include <vlc_fs.h>
55
#include <vlc_strings.h>
56

57 58 59 60
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

61
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
62
 * Local prototypes
63
 *****************************************************************************/
64 65
static void Destructor( input_thread_t * p_input );

66
static  void *Run            ( vlc_object_t *p_this );
67

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

Laurent Aimar's avatar
Laurent Aimar committed
74 75
static void ObjectKillChildrens( input_thread_t *, vlc_object_t * );

76
static inline int ControlPop( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline, bool b_postpone_seek );
77
static void       ControlRelease( int i_type, vlc_value_t val );
78
static bool       ControlIsSeekRequest( int i_type );
79
static bool       Control( input_thread_t *, int, vlc_value_t );
80

81 82 83 84 85
static int  UpdateTitleSeekpointFromAccess( input_thread_t * );
static void UpdateGenericFromAccess( input_thread_t * );

static int  UpdateTitleSeekpointFromDemux( input_thread_t * );
static void UpdateGenericFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
86

87
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
88 89

static input_source_t *InputSourceNew( input_thread_t *);
90
static int  InputSourceInit( input_thread_t *, input_source_t *,
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
91
                             const char *, const char *psz_forced_demux );
92
static void InputSourceClean( input_source_t * );
Laurent Aimar's avatar
Laurent Aimar committed
93 94
static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );

95 96
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
97
static void SlaveDemux( input_thread_t *p_input, bool *pb_demux_polled );
98
static void SlaveSeek( input_thread_t *p_input );
99

100 101
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 );
102 103 104
static void InputGetExtraFiles( input_thread_t *p_input,
                                int *pi_list, char ***pppsz_list,
                                const char *psz_access, const char *psz_path );
105

106 107 108
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

109 110
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );

111 112
static void input_ChangeState( input_thread_t *p_input, int i_state ); /* TODO fix name */

113
/* Do not let a pts_delay from access/demux go beyong 60s */
114
#define INPUT_PTS_DELAY_MAX INT64_C(60000000)
115

116
#undef input_Create
117 118 119 120 121 122 123 124 125 126 127 128
/**
 * 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
 */
129 130 131
input_thread_t *input_Create( vlc_object_t *p_parent,
                              input_item_t *p_item,
                              const char *psz_log, input_resource_t *p_resource )
132 133 134 135
{
    return Create( p_parent, p_item, psz_log, false, p_resource );
}

136
#undef input_CreateAndStart
137 138 139 140 141 142 143
/**
 * Create a new input_thread_t and start it.
 *
 * Provided for convenience.
 *
 * \see input_Create
 */
144 145
input_thread_t *input_CreateAndStart( vlc_object_t *p_parent,
                                      input_item_t *p_item, const char *psz_log )
146
{
147
    input_thread_t *p_input = input_Create( p_parent, p_item, psz_log, NULL );
148 149 150 151 152 153 154 155 156

    if( input_Start( p_input ) )
    {
        vlc_object_release( p_input );
        return NULL;
    }
    return p_input;
}

157
#undef input_Read
158
/**
159
 * Initialize an input thread and run it until it stops by itself.
160 161 162 163 164
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \return an error code, VLC_SUCCESS on success
 */
165
int input_Read( vlc_object_t *p_parent, input_item_t *p_item )
166
{
167
    input_thread_t *p_input = Create( p_parent, p_item, NULL, false, NULL );
168 169 170
    if( !p_input )
        return VLC_EGENERIC;

171 172
    if( !Init( p_input ) )
    {
173
        MainLoop( p_input, false );
174 175 176 177
        End( p_input );
    }

    vlc_object_release( p_input );
178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 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 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285
    return VLC_SUCCESS;
}

/**
 * Initialize an input and initialize it to preparse the item
 * This function is blocking. It will only accept parsing regular 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 )
{
    input_thread_t *p_input;

    /* Allocate descriptor */
    p_input = Create( p_parent, p_item, NULL, true, NULL );
    if( !p_input )
        return VLC_EGENERIC;

    if( !Init( p_input ) )
        End( p_input );

    vlc_object_release( p_input );

    return VLC_SUCCESS;
}

/**
 * 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 )
{
    /* Create thread and wait for its readiness. */
    if( vlc_thread_create( p_input, "input", Run,
                           VLC_THREAD_PRIORITY_INPUT ) )
    {
        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
 *
 * b_abort must be true when a user stop is requested and not because you have
 * detected an error or an eof. It will be used to properly send the
 * INPUT_EVENT_ABORT event.
 *
 * \param p_input the input thread to stop
 * \param b_abort true if the input has been aborted by a user request
 */
void input_Stop( input_thread_t *p_input, bool b_abort )
{
    /* 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 */
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );

    vlc_mutex_lock( &p_input->p->lock_control );
    p_input->p->b_abort |= b_abort;
    vlc_mutex_unlock( &p_input->p->lock_control );

    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
}

input_resource_t *input_DetachResource( input_thread_t *p_input )
{
    assert( p_input->b_dead );

    input_resource_SetInput( p_input->p->p_resource, NULL );

    input_resource_t *p_resource = input_resource_Detach( p_input->p->p_resource );
    p_input->p->p_sout = NULL;

    return p_resource;
}

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

/*****************************************************************************
 * ObjectKillChildrens
 *****************************************************************************/
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
{
    vlc_list_t *p_list;
    int i;

    /* FIXME ObjectKillChildrens seems a very bad idea in fact */
    i = vlc_internals( p_obj )->i_object_type;
    if( i == VLC_OBJECT_VOUT ||i == VLC_OBJECT_AOUT ||
        p_obj == VLC_OBJECT(p_input->p->p_sout) ||
286
        i == VLC_OBJECT_DECODER )
287 288 289 290 291 292 293 294 295 296
        return;

    vlc_object_kill( p_obj );

    p_list = vlc_list_children( p_obj );
    for( i = 0; i < p_list->i_count; i++ )
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
    vlc_list_release( p_list );
}

297
/*****************************************************************************
298 299
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
300
 *
Laurent Aimar's avatar
Laurent Aimar committed
301
 * XXX Do not forget to update vlc_input.h if you add new variables.
302
 *****************************************************************************/
303
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
304
                               const char *psz_header, bool b_quick,
305
                               input_resource_t *p_resource )
Michel Kaempf's avatar
Michel Kaempf committed
306
{
307
    static const char input_name[] = "input";
308
    input_thread_t *p_input = NULL;                 /* thread descriptor */
309
    int i;
310

311
    /* Allocate descriptor */
312 313
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
314
    if( p_input == NULL )
315
        return NULL;
316

317 318
    vlc_object_attach( p_input, p_parent );

319 320 321 322 323
    /* 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 );
324 325 326

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

327 328 329 330 331 332 333
    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 );

334 335 336
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
337

338
    p_input->b_preparsing = b_quick;
339
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
340

341
    /* Init Common fields */
342
    p_input->b_eof = false;
343
    p_input->p->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
344
    p_input->p->i_start = 0;
Laurent Aimar's avatar
Laurent Aimar committed
345
    p_input->p->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
346
    p_input->p->i_stop  = 0;
347
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
348
    p_input->p->i_title = 0;
349
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
350
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
Laurent Aimar's avatar
Laurent Aimar committed
351
    p_input->p->i_state = INIT_S;
352 353 354 355 356
    p_input->p->i_rate = INPUT_RATE_DEFAULT
                         / var_CreateGetFloat( p_input, "rate" );
    /* Currently, the input rate variable is an integer. So we need to destroy
     * the float variable inherited from the configuration. */
    var_Destroy( p_input, "rate" );
357
    p_input->p->b_recording = false;
358 359
    memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
    TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
360
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
361
    p_input->p->p_sout   = NULL;
362
    p_input->p->b_out_pace_control = false;
363

Pierre's avatar
Pierre committed
364
    vlc_gc_incref( p_item ); /* Released in Destructor() */
365 366 367
    p_input->p->p_item = p_item;

    /* Init Input fields */
Clément Stenac's avatar
Clément Stenac committed
368 369 370
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
371
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
372 373 374
    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;
375 376 377 378
    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
379

380
    vlc_mutex_lock( &p_item->lock );
381 382

    if( !p_item->p_stats )
383 384
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
385

386
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
387 388
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
389

390
    /* */
391 392
    if( p_resource )
        p_input->p->p_resource = p_resource;
393
    else
394 395
        p_input->p->p_resource = input_resource_New();
    input_resource_SetInput( p_input->p->p_resource, p_input );
396

397
    /* Init control buffer */
398
    vlc_mutex_init( &p_input->p->lock_control );
399
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
400
    p_input->p->i_control = 0;
401
    p_input->p->b_abort = false;
402

403
    /* Parse input options */
404
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
405
    assert( (int)p_item->optflagc == p_item->i_options );
406
    for( i = 0; i < p_item->i_options; i++ )
407 408
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
409
    vlc_mutex_unlock( &p_item->lock );
410

411 412
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
413

414
    /* Create Objects variables for public Get and Set */
415
    input_ControlVarInit( p_input );
416

417
    /* */
418
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
419
    {
420 421
        char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
        if( psz_bookmarks )
Gildas Bazin's avatar
Gildas Bazin committed
422
        {
423 424
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
425
            psz_parser = psz_bookmarks;
426
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
427
            {
428
                 seekpoint_t *p_seekpoint;
429 430 431 432 433 434 435 436
                 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 = ',';
437 438

                 p_seekpoint = vlc_seekpoint_New();
439 440 441 442 443
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
444
                         p_seekpoint->psz_name = strdup(psz_start + 5);
445 446 447 448 449 450 451
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
452 453
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
454 455
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
456
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
457
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
458 459 460 461 462
                                  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
463
            }
464
            free( psz_bookmarks );
Gildas Bazin's avatar
Gildas Bazin committed
465 466 467
        }
    }

468
    /* Remove 'Now playing' info as it is probably outdated */
469
    input_item_SetNowPlaying( p_item, NULL );
470
    input_SendEventMeta( p_input );
471

472 473 474 475
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

476
    /* */
477
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
478
    vlc_mutex_init( &p_input->p->counters.counters_lock );
479

480 481 482
    p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
    p_input->p->p_es_out = NULL;

483 484 485
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

486 487 488
    return p_input;
}

489 490 491 492
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
493
{
494
#ifndef NDEBUG
495
    char * psz_name = input_item_GetName( p_input->p->p_item );
496 497 498 499
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

500 501
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
502

503 504 505
    if( p_input->p->p_es_out_display )
        es_out_Delete( p_input->p->p_es_out_display );

506 507
    if( p_input->p->p_resource )
        input_resource_Delete( p_input->p->p_resource );
508

509
    vlc_gc_decref( p_input->p->p_item );
Pierre's avatar
Pierre committed
510

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

513
    for( int i = 0; i < p_input->p->i_control; i++ )
Laurent Aimar's avatar
Laurent Aimar committed
514 515 516 517
    {
        input_control_t *p_ctrl = &p_input->p->control[i];
        ControlRelease( p_ctrl->i_type, p_ctrl->val );
    }
518

519
    vlc_cond_destroy( &p_input->p->wait_control );
520 521
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
522
}
523

524
/*****************************************************************************
525
 * Run: main thread loop
526 527
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
528
 *****************************************************************************/
529
static void *Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
530
{
531
    input_thread_t *p_input = (input_thread_t *)p_this;
532
    const int canc = vlc_savecancel();
533

534
    if( Init( p_input ) )
535
        goto exit;
Michel Kaempf's avatar
Michel Kaempf committed
536

537
    MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
538 539 540

    /* Clean up */
    End( p_input );
541 542

exit:
543
    /* Tell we're dead */
544 545 546 547 548
    vlc_mutex_lock( &p_input->p->lock_control );
    const bool b_abort = p_input->p->b_abort;
    vlc_mutex_unlock( &p_input->p->lock_control );

    if( b_abort )
549
        input_SendEventAbort( p_input );
550
    input_SendEventDead( p_input );
551

552
    vlc_restorecancel( canc );
553
    return NULL;
554 555 556 557 558
}

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

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

568
    *pb_changed = false;
569
    *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
570

Laurent Aimar's avatar
Laurent Aimar committed
571
    if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
572
        ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
573 574
        i_ret = 0; /* EOF */
    else
Laurent Aimar's avatar
Laurent Aimar committed
575
        i_ret = demux_Demux( p_input->p->input.p_demux );
576 577

    if( i_ret > 0 )
578
    {
579
        if( p_input->p->input.p_demux->info.i_update )
580
        {
581 582 583 584 585 586
            if( p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromDemux( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromDemux( p_input );
587
        }
588 589
        else if( p_input->p->input.p_access &&
                 p_input->p->input.p_access->info.i_update )
590
        {
591 592 593 594 595 596
            if( !p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromAccess( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromAccess( p_input );
597 598
        }
    }
599

600 601
    if( i_ret == 0 )    /* EOF */
    {
602 603
        msg_Dbg( p_input, "EOF reached" );
        p_input->p->input.b_eof = true;
604 605 606 607 608 609 610 611
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
612 613 614 615
        bool b_demux_polled;
        SlaveDemux( p_input, &b_demux_polled );

        *pb_demux_polled |= b_demux_polled;
616 617 618
    }
}

619 620 621 622 623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649 650 651 652 653 654 655 656 657 658 659 660 661 662 663 664
static int MainLoopTryRepeat( input_thread_t *p_input, mtime_t *pi_start_mdate )
{
    int i_repeat = var_GetInteger( p_input, "input-repeat" );
    if( i_repeat == 0 )
        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 */
    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 )
    {
        val.i_time = p_input->p->i_start;
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &val );
    }
    else
    {
        val.f_float = 0.0;
        input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION, &val );
    }

    /* */
    *pi_start_mdate = mdate();
    return VLC_SUCCESS;
}

665 666 667 668 669 670
/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
671 672 673
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
674 675

    /* update input status variables */
676
    if( demux_Control( p_input->p->input.p_demux,
677 678
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
679

680
    if( demux_Control( p_input->p->input.p_demux,
681 682
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
Laurent Aimar's avatar
Laurent Aimar committed
683
    p_input->p->i_time = i_time;
684 685

    if( demux_Control( p_input->p->input.p_demux,
686 687
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
688

689
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
690 691 692 693 694 695 696

    /* update current bookmark */
    vlc_mutex_lock( &p_input->p->p_item->lock );
    p_input->p->bookmark.i_time_offset = i_time;
    if( p_input->p->input.p_stream )
        p_input->p->bookmark.i_byte_offset = stream_Tell( p_input->p->input.p_stream );
    vlc_mutex_unlock( &p_input->p->p_item->lock );
697 698 699 700 701 702 703 704
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
705
    stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
706
    input_SendEventStatistics( p_input );
707 708 709 710 711 712
}

/**
 * MainLoop
 * The main input loop.
 */
713
static void MainLoop( input_thread_t *p_input, bool b_interactive )
714 715
{
    mtime_t i_start_mdate = mdate();
716 717
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
718
    mtime_t i_last_seek_mdate = 0;
719 720
    bool b_pause_after_eof = b_interactive &&
                             var_CreateGetBool( p_input, "play-and-pause" );
721 722 723 724

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

725
    while( vlc_object_alive( p_input ) && !p_input->b_error )
726 727 728
    {
        bool b_force_update;
        vlc_value_t val;
729
        mtime_t i_current;
730
        mtime_t i_wakeup;
731
        bool b_paused;
732
        bool b_demux_polled;
733

734 735
        /* Demux data */
        b_force_update = false;
736
        i_wakeup = 0;
Laurent Aimar's avatar
Laurent Aimar committed
737
        /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
738 739
         * is paused -> this may cause problem with some of them
         * The same problem can be seen when seeking while paused */
Laurent Aimar's avatar
Laurent Aimar committed
740
        b_paused = p_input->p->i_state == PAUSE_S &&
741
                   ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
742

743
        b_demux_polled = true;
744
        if( !b_paused )
745
        {
746 747
            if( !p_input->p->input.b_eof )
            {
748
                MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
749

750 751
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
752
            else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
753 754 755 756
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
757 758 759
            /* 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 )
760 761 762 763 764 765 766 767
            {
                msg_Dbg( p_input, "pausing at EOF (pause after each)");
                val.i_int = PAUSE_S;
                Control( p_input, INPUT_CONTROL_SET_STATE, val );

                b_pause_after_eof = false;
                b_paused = true;
            }
768 769
            else
            {
770 771
                if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
                    break;
772
                b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
773
            }
774
        }
775 776

        /* */
777
        do {
778
            mtime_t i_deadline = i_wakeup;
779
            if( b_paused || !b_demux_polled )
780 781 782
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
783
            for( ;; )
784
            {
785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800 801 802 803 804 805 806
                mtime_t i_limit = i_deadline;

                /* We will postpone the execution of a seek until we have
                 * finished the ES bufferisation (postpone is limited to
                 * 125ms) */
                bool b_buffering = es_out_GetBuffering( p_input->p->p_es_out ) &&
                                   !p_input->p->input.b_eof;
                if( b_buffering )
                {
                    /* When postpone is in order, check the ES level every 20ms */
                    mtime_t i_current = mdate();
                    if( i_last_seek_mdate + INT64_C(125000) >= i_current )
                        i_limit = __MIN( i_deadline, i_current + INT64_C(20000) );
                }

                int i_type;
                if( ControlPop( p_input, &i_type, &val, i_limit, b_buffering ) )
                {
                    if( b_buffering && i_limit < i_deadline )
                        continue;
                    break;
                }
807

808
                msg_Dbg( p_input, "control type=%d", i_type );
809

810
                if( Control( p_input, i_type, val ) )
811 812 813
                {
                    if( ControlIsSeekRequest( i_type ) )
                        i_last_seek_mdate = mdate();
814
                    b_force_update = true;
815
                }
816
            }
817

818 819 820 821 822 823 824 825 826 827 828 829 830
            /* 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);
            }
831

832
            /* Update the wakeup time */
833
            if( i_wakeup != 0 )
834
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
835
        } while( i_current < i_wakeup );
836
    }
837

838
    if( !p_input->b_error )
839
        input_ChangeState( p_input, END_S );
840 841
}

842
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
843
{
844
    if( p_input->b_preparsing ) return;
845

846 847 848
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
849
    if( libvlc_stats( p_input ) )
850 851 852 853 854 855
    {
        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 );
856 857
        INIT_COUNTER( demux_corrupted, INTEGER, COUNTER );
        INIT_COUNTER( demux_discontinuity, INTEGER, COUNTER );
858 859 860 861 862 863 864 865 866 867 868 869 870 871
        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;
872
    }
873
}
874

875
#ifdef ENABLE_SOUT
876 877
static int InitSout( input_thread_t * p_input )
{
878 879
    if( p_input->b_preparsing )
        return VLC_SUCCESS;
880 881

    /* Find a usable sout and attach it to p_input */
882
    char *psz = var_GetNonEmptyString( p_input, "sout" );
883
    if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
884
    {
885
        p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
886
        if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
887
        {
888 889 890 891 892
            input_ChangeState( p_input, ERROR_S );
            msg_Err( p_input, "cannot start stream output instance, " \
                              "aborting" );
            free( psz );
            return VLC_EGENERIC;
893
        }
894
        if( libvlc_stats( p_input ) )
895
        {
896
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
897
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
898 899 900 901
            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;
902
        }
903
    }
904
    else
905
    {
906
        input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
907
    }
908
    free( psz );
909

910 911
    return VLC_SUCCESS;
}
912
#endif
913

914 915
static void InitTitle( input_thread_t * p_input )
{
Laurent Aimar's avatar
Laurent Aimar committed
916
    input_source_t *p_master = &p_input->p->input;
917

Laurent Aimar's avatar
Laurent Aimar committed
918 919
    if( p_input->b_preparsing )
        return;
920

921
    /* Create global title (from master) */
Laurent Aimar's avatar
Laurent Aimar committed
922 923 924 925
    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;
926 927 928 929
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
930
        input_SendEventTitle( p_input, 0 );
931 932 933
    }

    /* Global flag */
934
    p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
Laurent Aimar's avatar
Laurent Aimar committed
935 936
    p_input->p->b_can_pause        = p_master->b_can_pause;
    p_input->p->b_can_rate_control = p_master->b_can_rate_control;
937
}
938

939 940 941
static void StartTitle( input_thread_t * p_input )
{
    vlc_value_t val;
942

943 944 945 946 947
    /* Start title/chapter */
    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 );
Laurent Aimar's avatar
Laurent Aimar committed
948

949 950 951 952 953
    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 );

Laurent Aimar's avatar
Laurent Aimar committed
954
    /* Start/stop/run time */
955 956 957 958 959 960
    p_input->p->i_start = (int64_t)(1000000.0
                                     * var_GetFloat( p_input, "start-time" ));
    p_input->p->i_stop  = (int64_t)(1000000.0
                                     * var_GetFloat( p_input, "stop-time" ));
    p_input->p->i_run   = (int64_t)(1000000.0
                                     * var_GetFloat( p_input, "run-time" ));
961
    if( p_input->p->i_run < 0 )
962
    {
963 964
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
965
    }
966

967
    if( p_input->p->i_start > 0 )
968
    {
969
        vlc_value_t s;
970

971 972
        msg_Dbg( p_input, "starting at time: %ds",
                 (int)( p_input->p->i_start / INT64_C(1000000) ) );
973

974 975
        s.i_time = p_input->p->i_start;
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
976 977 978 979 980 981
    }
    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;
    }
982
    p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
Laurent Aimar's avatar
Laurent Aimar committed
983
}
984

Laurent Aimar's avatar
Laurent Aimar committed
985 986
static void LoadSubtitles( input_thread_t *p_input )
{
987 988
    /* Load subtitles */
    /* Get fps and set it if not already set */
989 990
    const double f_fps = p_input->p->f_fps;
    if( f_fps > 1.0 )
991 992
    {
        float f_requested_fps;
993

994 995
        var_Create( p_input, "sub-original-fps", VLC_VAR_FLOAT );
        var_SetFloat( p_input, "sub-original-fps", f_fps );
996

997 998
        f_requested_fps = var_CreateGetFloat( p_input, "sub-fps" );
        if( f_requested_fps != f_fps )
999
        {
1000 1001 1002
            var_Create( p_input, "sub-fps", VLC_VAR_FLOAT|
                                            VLC_VAR_DOINHERIT );
            var_SetFloat( p_input, "sub-fps", f_requested_fps );
1003
        }
1004
    }
1005

Laurent Aimar's avatar
Laurent Aimar committed
1006
    const int i_delay = var_CreateGetInteger( p_input, "sub-delay" );
1007 1008 1009 1010
    if( i_delay != 0 )
        var_SetTime( p_input, "spu-delay", (mtime_t)i_delay * 100000 );

    /* Look for and add subtitle files */
1011 1012
    bool b_forced = true;