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 317 318 319

    /* 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 );
320 321 322

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

323 324 325 326 327 328 329
    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 );

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

334
    p_input->b_preparsing = b_quick;
335
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
336

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

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

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

378
    vlc_mutex_lock( &p_item->lock );
379 380

    if( !p_item->p_stats )
381 382
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
Clément Stenac's avatar
Clément Stenac committed
383

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

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

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

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

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

Laurent Aimar's avatar
Laurent Aimar committed
412
    /* Create Objects variables for public Get and Set */
413
    input_ControlVarInit( p_input );
414

415
    /* */
416
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
417
    {
Laurent Aimar's avatar
Laurent Aimar committed
418 419
        char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
        if( psz_bookmarks )
Gildas Bazin's avatar
Gildas Bazin committed
420
        {
421 422
            /* 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
423
            psz_parser = psz_bookmarks;
424
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
425
            {
426
                 seekpoint_t *p_seekpoint;
427 428 429 430 431 432 433 434
                 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 = ',';
435 436

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

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

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

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

478 479 480
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

481 482 483
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

484 485 486
    return p_input;
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

        *pb_demux_polled |= b_demux_polled;
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 659
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;
}

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

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

905 906
    return VLC_SUCCESS;
}
907
#endif
908

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

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

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

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

934