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

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

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

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

Laurent Aimar's avatar
Laurent Aimar committed
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"
Sam Hocevar's avatar
 
Sam Hocevar committed
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_strings.h>
55

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

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

65
static  void *Run            ( vlc_object_t *p_this );
Laurent Aimar's avatar
Laurent Aimar committed
66

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

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

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

80 81 82 83 84
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
85

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

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

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

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

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

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

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

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

115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156
/**
 * 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
 */

input_thread_t *__input_Create( vlc_object_t *p_parent,
                                input_item_t *p_item,
                                const char *psz_log, input_resource_t *p_resource )
{

    return Create( p_parent, p_item, psz_log, false, p_resource );
}

/**
 * Create a new input_thread_t and start it.
 *
 * Provided for convenience.
 *
 * \see input_Create
 */
input_thread_t *__input_CreateAndStart( vlc_object_t *p_parent,
                                        input_item_t *p_item, const char *psz_log )
{
    input_thread_t *p_input = __input_Create( p_parent, p_item, psz_log, NULL );

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

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

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

    vlc_object_release( p_input );
176 177 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
    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) ||
284
        i == VLC_OBJECT_DECODER )
285 286 287 288 289 290 291 292 293 294
        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 );
}

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

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

315 316
    vlc_object_attach( p_input, p_parent );

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

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

325 326 327 328 329 330 331
    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 );

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

336
    p_input->b_preparsing = b_quick;
337
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
338

Laurent Aimar's avatar
Laurent Aimar committed
339
    /* Init Common fields */
340
    p_input->b_eof = false;
341
    p_input->p->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
342
    p_input->p->i_start = 0;
Laurent Aimar's avatar
Laurent Aimar committed
343
    p_input->p->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
344
    p_input->p->i_stop  = 0;
345
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
346
    p_input->p->i_title = 0;
347
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
348
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
Laurent Aimar's avatar
Laurent Aimar committed
349
    p_input->p->i_state = INIT_S;
350 351 352 353 354
    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" );
355
    p_input->p->b_recording = false;
356 357
    memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
    TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
358
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
359 360
    p_input->p->p_es_out_display = NULL;
    p_input->p->p_es_out = NULL;
361
    p_input->p->p_sout   = NULL;
362
    p_input->p->b_out_pace_control = false;
Laurent Aimar's avatar
Laurent Aimar committed
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 );
Clément Stenac's avatar
Clément Stenac committed
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

Laurent Aimar's avatar
Laurent Aimar committed
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

Gildas Bazin's avatar
 
Gildas Bazin committed
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 );
Gildas Bazin's avatar
 
Gildas Bazin committed
410

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

Laurent Aimar's avatar
Laurent Aimar committed
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
    {
Laurent Aimar's avatar
Laurent Aimar committed
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;
Laurent Aimar's avatar
Laurent Aimar committed
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
            }
Laurent Aimar's avatar
Laurent Aimar committed
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
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

483 484 485
    return p_input;
}

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

497 498
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
499

500 501
    if( p_input->p->p_resource )
        input_resource_Delete( p_input->p->p_resource );
502

503
    vlc_gc_decref( p_input->p->p_item );
Pierre's avatar
Pierre committed
504

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

507
    for( int i = 0; i < p_input->p->i_control; i++ )
Laurent Aimar's avatar
Laurent Aimar committed
508 509 510 511
    {
        input_control_t *p_ctrl = &p_input->p->control[i];
        ControlRelease( p_ctrl->i_type, p_ctrl->val );
    }
512

513
    vlc_cond_destroy( &p_input->p->wait_control );
514 515
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
516
}
517

518
/*****************************************************************************
Laurent Aimar's avatar
Laurent Aimar committed
519
 * Run: main thread loop
520 521
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
522
 *****************************************************************************/
523
static void *Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
524
{
525
    input_thread_t *p_input = (input_thread_t *)p_this;
526
    const int canc = vlc_savecancel();
527

528
    if( Init( p_input ) )
529
        goto exit;
Michel Kaempf's avatar
Michel Kaempf committed
530

531
    MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
532 533 534

    /* Clean up */
    End( p_input );
535 536

exit:
537
    /* Tell we're dead */
538 539 540 541 542
    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 )
543
        input_SendEventAbort( p_input );
544
    input_SendEventDead( p_input );
545

546
    vlc_restorecancel( canc );
547
    return NULL;
548 549 550 551 552
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
553 554 555 556 557

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
558
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, bool *pb_demux_polled, mtime_t i_start_mdate )
559
{
560
    int i_ret;
561

562
    *pb_changed = false;
563
    *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
564

Laurent Aimar's avatar
Laurent Aimar committed
565
    if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
566
        ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
567 568
        i_ret = 0; /* EOF */
    else
Laurent Aimar's avatar
Laurent Aimar committed
569
        i_ret = demux_Demux( p_input->p->input.p_demux );
570 571

    if( i_ret > 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
572
    {
573
        if( p_input->p->input.p_demux->info.i_update )
574
        {
575 576 577 578 579 580
            if( p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromDemux( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromDemux( p_input );
581
        }
582 583
        else if( p_input->p->input.p_access &&
                 p_input->p->input.p_access->info.i_update )
584
        {
585 586 587 588 589 590
            if( !p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromAccess( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromAccess( p_input );
591 592
        }
    }
593

594 595
    if( i_ret == 0 )    /* EOF */
    {
596 597
        msg_Dbg( p_input, "EOF reached" );
        p_input->p->input.b_eof = true;
598 599 600 601 602 603 604 605
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
606 607 608 609
        bool b_demux_polled;
        SlaveDemux( p_input, &b_demux_polled );

        *pb_demux_polled |= b_demux_polled;
610 611 612
    }
}

613 614 615 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
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;
}

659 660 661 662 663 664
/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
665 666 667
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
668 669

    /* update input status variables */
670
    if( demux_Control( p_input->p->input.p_demux,
671 672
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
673

674
    if( demux_Control( p_input->p->input.p_demux,
675 676
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
Laurent Aimar's avatar
Laurent Aimar committed
677
    p_input->p->i_time = i_time;
678 679

    if( demux_Control( p_input->p->input.p_demux,
680 681
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
682

683
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
684 685 686 687 688 689 690

    /* 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 );
691 692 693 694 695 696 697 698
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
699
    stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
700
    input_SendEventStatistics( p_input );
701 702 703 704 705 706
}

/**
 * MainLoop
 * The main input loop.
 */
707
static void MainLoop( input_thread_t *p_input, bool b_interactive )
708 709
{
    mtime_t i_start_mdate = mdate();
710 711
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
712
    mtime_t i_last_seek_mdate = 0;
713 714
    bool b_pause_after_eof = b_interactive &&
                             var_CreateGetBool( p_input, "play-and-pause" );
715 716 717 718

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

719
    while( vlc_object_alive( p_input ) && !p_input->b_error )
720 721 722
    {
        bool b_force_update;
        vlc_value_t val;
723
        mtime_t i_current;
724
        mtime_t i_wakeup;
725
        bool b_paused;
726
        bool b_demux_polled;
727

728 729
        /* Demux data */
        b_force_update = false;
730
        i_wakeup = 0;
Laurent Aimar's avatar
Laurent Aimar committed
731
        /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
732 733
         * 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
734
        b_paused = p_input->p->i_state == PAUSE_S &&
735
                   ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
736

737
        b_demux_polled = true;
738
        if( !b_paused )
739
        {
740 741
            if( !p_input->p->input.b_eof )
            {
742
                MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
743

744 745
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
746
            else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
747 748 749 750
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
751 752 753
            /* 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 )
754 755 756 757 758 759 760 761
            {
                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;
            }
762 763
            else
            {
764 765
                if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
                    break;
766
                b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
767
            }
768
        }
769 770

        /* */
771
        do {
772
            mtime_t i_deadline = i_wakeup;
773
            if( b_paused || !b_demux_polled )
774 775 776
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
777
            for( ;; )
778
            {
779 780 781 782 783 784 785 786 787 788 789 790 791 792 793 794 795 796 797 798 799 800
                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;
                }
801

802
                msg_Dbg( p_input, "control type=%d", i_type );
803

804
                if( Control( p_input, i_type, val ) )
805 806 807
                {
                    if( ControlIsSeekRequest( i_type ) )
                        i_last_seek_mdate = mdate();
808
                    b_force_update = true;
809
                }
810
            }
811

812 813 814 815 816 817 818 819 820 821 822 823 824
            /* 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);
            }
825

826
            /* Update the wakeup time */
827
            if( i_wakeup != 0 )
828
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
829
        } while( i_current < i_wakeup );
Laurent Aimar's avatar
Laurent Aimar committed
830
    }
831

832
    if( !p_input->b_error )
833
        input_ChangeState( p_input, END_S );
834 835
}

836
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
837
{
838
    if( p_input->b_preparsing ) return;
839

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

869
#ifdef ENABLE_SOUT
870 871
static int InitSout( input_thread_t * p_input )
{
872 873
    if( p_input->b_preparsing )
        return VLC_SUCCESS;
874 875

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

904 905
    return VLC_SUCCESS;
}
906
#endif
907

908 909
static void InitTitle( input_thread_t * p_input )
{
Laurent Aimar's avatar
Laurent Aimar committed
910
    input_source_t *p_master = &p_input->p->input;
Laurent Aimar's avatar
Laurent Aimar committed
911

Laurent Aimar's avatar
Laurent Aimar committed
912 913
    if( p_input->b_preparsing )
        return;
914

915
    /* Create global title (from master) */
Laurent Aimar's avatar
Laurent Aimar committed
916 917 918 919
    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;
920 921 922 923
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
924
        input_SendEventTitle( p_input, 0 );
925 926 927
    }

    /* Global flag */
928
    p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
Laurent Aimar's avatar
Laurent Aimar committed
929 930
    p_input->p->b_can_pause        = p_master->b_can_pause;
    p_input->p->b_can_rate_control = p_master->b_can_rate_control;
931
}
Gildas Bazin's avatar
 
Gildas Bazin committed
932