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

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_fs.h>
55
#include <vlc_strings.h>
56
#include <vlc_modules.h>
57

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

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

67
static  void *Run            ( void * );
68

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

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

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

82 83 84 85 86
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
87

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

static input_source_t *InputSourceNew( input_thread_t *);
Laurent Aimar's avatar
 
Laurent Aimar committed
91
static int  InputSourceInit( input_thread_t *, input_source_t *,
92 93
                             const char *, const char *psz_forced_demux,
                             bool b_in_can_fail );
94
static void InputSourceClean( input_source_t * );
Laurent Aimar's avatar
Laurent Aimar committed
95 96
static void InputSourceMeta( input_thread_t *, input_source_t *, vlc_meta_t * );

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

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

108 109 110
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

111 112 113
enum {
    SUB_NOFLAG = 0x00,
    SUB_FORCED = 0x01,
114
    SUB_CANFAIL = 0x02,
115 116
};
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, unsigned i_flags );
117

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

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

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

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

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

175 176
    if( !Init( p_input ) )
    {
177
        MainLoop( p_input, false );
178 179 180 181
        End( p_input );
    }

    vlc_object_release( p_input );
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
    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. */
220 221 222
    p_input->p->is_running = !vlc_clone( &p_input->p->thread,
                                         Run, p_input, VLC_THREAD_PRIORITY_INPUT );
    if( !p_input->p->is_running )
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
    {
        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 );
}

255 256 257 258 259 260 261 262 263 264 265
void input_Join( input_thread_t *p_input )
{
    if( p_input->p->is_running )
        vlc_join( p_input->p->thread, NULL );
}

void input_Release( input_thread_t *p_input )
{
    vlc_object_release( p_input );
}

Laurent Aimar's avatar
Laurent Aimar committed
266 267 268 269 270
/**
 * Close an input
 *
 * It does not call input_Stop itself.
 */
271
void input_Close( input_thread_t *p_input )
Laurent Aimar's avatar
Laurent Aimar committed
272
{
273 274
    input_Join( p_input );
    input_Release( p_input );
Laurent Aimar's avatar
Laurent Aimar committed
275 276
}

277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296
/**
 * 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;

    /* FIXME ObjectKillChildrens seems a very bad idea in fact */
297
    if( p_obj == VLC_OBJECT(p_input->p->p_sout) )
298 299 300 301 302
        return;

    vlc_object_kill( p_obj );

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

308
/*****************************************************************************
309 310
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
311
 *
Laurent Aimar's avatar
Laurent Aimar committed
312
 * XXX Do not forget to update vlc_input.h if you add new variables.
313
 *****************************************************************************/
314
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
315
                               const char *psz_header, bool b_quick,
316
                               input_resource_t *p_resource )
Michel Kaempf's avatar
Michel Kaempf committed
317
{
318
    input_thread_t *p_input = NULL;                 /* thread descriptor */
319
    int i;
320

321
    /* Allocate descriptor */
322
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ), "input" );
323
    if( p_input == NULL )
324
        return NULL;
325 326 327 328 329 330

    /* 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 );
331 332 333

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

334 335 336 337 338 339 340
    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 );

341 342 343
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
344

345 346 347 348 349 350 351 352
    /* Parse input options */
    vlc_mutex_lock( &p_item->lock );
    assert( (int)p_item->optflagc == p_item->i_options );
    for( i = 0; i < p_item->i_options; i++ )
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
    vlc_mutex_unlock( &p_item->lock );

353
    p_input->b_preparsing = b_quick;
354
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
355

356
    /* Init Common fields */
357
    p_input->b_eof = false;
358
    p_input->p->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
359
    p_input->p->i_start = 0;
Laurent Aimar's avatar
Laurent Aimar committed
360
    p_input->p->i_time  = 0;
Clément Stenac's avatar
Clément Stenac committed
361
    p_input->p->i_stop  = 0;
362
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
363
    p_input->p->i_title = 0;
364
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
365
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
Laurent Aimar's avatar
Laurent Aimar committed
366
    p_input->p->i_state = INIT_S;
367
    p_input->p->i_rate = INPUT_RATE_DEFAULT;
368
    p_input->p->b_recording = false;
369 370
    memset( &p_input->p->bookmark, 0, sizeof(p_input->p->bookmark) );
    TAB_INIT( p_input->p->i_bookmark, p_input->p->pp_bookmark );
371
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
372
    p_input->p->p_sout   = NULL;
373
    p_input->p->b_out_pace_control = false;
374

Pierre's avatar
Pierre committed
375
    vlc_gc_incref( p_item ); /* Released in Destructor() */
376 377 378
    p_input->p->p_item = p_item;

    /* Init Input fields */
Clément Stenac's avatar
Clément Stenac committed
379 380 381
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
382
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
383 384 385
    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;
386 387 388 389
    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
390

391
    vlc_mutex_lock( &p_item->lock );
392 393

    if( !p_item->p_stats )
394 395
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
396

397
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
398 399
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
400

401
    /* */
402
    if( p_resource )
403 404
    {
        p_input->p->p_resource_private = NULL;
405
        p_input->p->p_resource = input_resource_Hold( p_resource );
406
    }
407
    else
408 409
    {
        p_input->p->p_resource_private = input_resource_New( VLC_OBJECT( p_input ) );
410
        p_input->p->p_resource = input_resource_Hold( p_input->p->p_resource_private );
411
    }
412
    input_resource_SetInput( p_input->p->p_resource, p_input );
413

414
    /* Init control buffer */
415
    vlc_mutex_init( &p_input->p->lock_control );
416
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
417
    p_input->p->i_control = 0;
418
    p_input->p->b_abort = false;
419
    p_input->p->is_running = false;
420

421 422
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
423

424
    /* Create Objects variables for public Get and Set */
425
    input_ControlVarInit( p_input );
426

427
    /* */
428
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
429
    {
430 431
        char *psz_bookmarks = var_GetNonEmptyString( p_input, "bookmarks" );
        if( psz_bookmarks )
Gildas Bazin's avatar
Gildas Bazin committed
432
        {
433 434
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
435
            psz_parser = psz_bookmarks;
436
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
437
            {
438
                 seekpoint_t *p_seekpoint;
439 440 441 442 443 444 445 446
                 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 = ',';
447 448

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

478
    /* Remove 'Now playing' info as it is probably outdated */
479
    input_item_SetNowPlaying( p_item, NULL );
480
    input_SendEventMeta( p_input );
481

482 483 484 485
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

486 487 488 489
    /* Make sure the interaction option is honored */
    if( !var_InheritBool( p_input, "interact" ) )
        p_input->i_flags |= OBJECT_FLAGS_NOINTERACT;

490
    /* */
491
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
492
    vlc_mutex_init( &p_input->p->counters.counters_lock );
493

494 495 496
    p_input->p->p_es_out_display = input_EsOutNew( p_input, p_input->p->i_rate );
    p_input->p->p_es_out = NULL;

497 498 499
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

500 501 502
    return p_input;
}

503 504 505 506
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
507
{
508
#ifndef NDEBUG
509
    char * psz_name = input_item_GetName( p_input->p->p_item );
510 511 512 513
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

514 515
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
516

517 518 519
    if( p_input->p->p_es_out_display )
        es_out_Delete( p_input->p->p_es_out_display );

520 521
    if( p_input->p->p_resource )
        input_resource_Release( p_input->p->p_resource );
522
    if( p_input->p->p_resource_private )
523
        input_resource_Release( p_input->p->p_resource_private );
524

525
    vlc_gc_decref( p_input->p->p_item );
Pierre's avatar
Pierre committed
526

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

529
    for( int i = 0; i < p_input->p->i_control; i++ )
Laurent Aimar's avatar
Laurent Aimar committed
530 531 532 533
    {
        input_control_t *p_ctrl = &p_input->p->control[i];
        ControlRelease( p_ctrl->i_type, p_ctrl->val );
    }
534

535
    vlc_cond_destroy( &p_input->p->wait_control );
536 537
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
538
}
539

540
/*****************************************************************************
541
 * Run: main thread loop
542 543
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
544
 *****************************************************************************/
545
static void *Run( void *obj )
Michel Kaempf's avatar
Michel Kaempf committed
546
{
547
    input_thread_t *p_input = (input_thread_t *)obj;
548
    const int canc = vlc_savecancel();
549

550
    if( Init( p_input ) )
551
        goto exit;
Michel Kaempf's avatar
Michel Kaempf committed
552

553
    MainLoop( p_input, true ); /* FIXME it can be wrong (like with VLM) */
554 555 556

    /* Clean up */
    End( p_input );
557 558

exit:
559
    /* Tell we're dead */
560 561 562 563 564
    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 )
565
        input_SendEventAbort( p_input );
566
    input_SendEventDead( p_input );
567

568
    vlc_restorecancel( canc );
569
    return NULL;
570 571 572 573 574
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
575 576 577 578 579

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
580
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, bool *pb_demux_polled, mtime_t i_start_mdate )
581
{
582
    int i_ret;
583

584
    *pb_changed = false;
585
    *pb_demux_polled = p_input->p->input.p_demux->pf_demux != NULL;
586

Laurent Aimar's avatar
Laurent Aimar committed
587
    if( ( p_input->p->i_stop > 0 && p_input->p->i_time >= p_input->p->i_stop ) ||
588
        ( p_input->p->i_run > 0 && i_start_mdate+p_input->p->i_run < mdate() ) )
589 590
        i_ret = 0; /* EOF */
    else
Laurent Aimar's avatar
Laurent Aimar committed
591
        i_ret = demux_Demux( p_input->p->input.p_demux );
592 593

    if( i_ret > 0 )
Sam Hocevar's avatar
 
Sam Hocevar committed
594
    {
595
        if( p_input->p->input.p_demux->info.i_update )
596
        {
597 598 599 600 601 602
            if( p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromDemux( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromDemux( p_input );
603
        }
604 605
        else if( p_input->p->input.p_access &&
                 p_input->p->input.p_access->info.i_update )
606
        {
607 608 609 610 611 612
            if( !p_input->p->input.b_title_demux )
            {
                i_ret = UpdateTitleSeekpointFromAccess( p_input );
                *pb_changed = true;
            }
            UpdateGenericFromAccess( p_input );
613 614
        }
    }
615

616 617
    if( i_ret == 0 )    /* EOF */
    {
618 619
        msg_Dbg( p_input, "EOF reached" );
        p_input->p->input.b_eof = true;
620
        es_out_Eos(p_input->p->p_es_out);
621 622 623 624 625 626 627 628
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
629 630 631 632
        bool b_demux_polled;
        SlaveDemux( p_input, &b_demux_polled );

        *pb_demux_polled |= b_demux_polled;
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 665 666 667 668 669 670 671 672 673 674 675 676 677 678 679 680 681
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;
}

682 683 684 685 686 687
/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
688 689 690
    double f_position = 0.0;
    mtime_t i_time = 0;
    mtime_t i_length = 0;
691 692

    /* update input status variables */
693
    if( demux_Control( p_input->p->input.p_demux,
694 695
                       DEMUX_GET_POSITION, &f_position ) )
        f_position = 0.0;
696

697
    if( demux_Control( p_input->p->input.p_demux,
698 699
                       DEMUX_GET_TIME, &i_time ) )
        i_time = 0;
Laurent Aimar's avatar
Laurent Aimar committed
700
    p_input->p->i_time = i_time;
701 702

    if( demux_Control( p_input->p->input.p_demux,
703 704
                       DEMUX_GET_LENGTH, &i_length ) )
        i_length = 0;
705

706
    es_out_SetTimes( p_input->p->p_es_out, f_position, i_time, i_length );
707 708 709 710 711 712 713

    /* 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 );
714 715 716 717 718 719 720 721
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
722
    stats_ComputeInputStats( p_input, p_input->p->p_item->p_stats );
723
    input_SendEventStatistics( p_input );
724 725 726 727 728 729
}

/**
 * MainLoop
 * The main input loop.
 */
730
static void MainLoop( input_thread_t *p_input, bool b_interactive )
731 732
{
    mtime_t i_start_mdate = mdate();
733 734
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
735
    mtime_t i_last_seek_mdate = 0;
736 737
    bool b_pause_after_eof = b_interactive &&
                             var_CreateGetBool( p_input, "play-and-pause" );
738 739 740 741

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

742
    while( vlc_object_alive( p_input ) && !p_input->b_error )
743 744 745
    {
        bool b_force_update;
        vlc_value_t val;
746
        mtime_t i_current;
747
        mtime_t i_wakeup;
748
        bool b_paused;
749
        bool b_demux_polled;
750

751 752
        /* Demux data */
        b_force_update = false;
753
        i_wakeup = 0;
Laurent Aimar's avatar
Laurent Aimar committed
754
        /* FIXME if p_input->p->i_state == PAUSE_S the access/access_demux
755 756
         * 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
757
        b_paused = p_input->p->i_state == PAUSE_S &&
758
                   ( !es_out_GetBuffering( p_input->p->p_es_out ) || p_input->p->input.b_eof );
759

760
        b_demux_polled = true;
761
        if( !b_paused )
762
        {
763 764
            if( !p_input->p->input.b_eof )
            {
765
                MainLoopDemux( p_input, &b_force_update, &b_demux_polled, i_start_mdate );
766

767 768
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
769
            else if( !es_out_GetEmpty( p_input->p->p_es_out ) )
770 771 772 773
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
774 775 776
            /* 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 )
777 778 779 780 781 782 783
            {
                msg_Dbg( p_input, "pausing at EOF (pause after each)");
                val.i_int = PAUSE_S;
                Control( p_input, INPUT_CONTROL_SET_STATE, val );

                b_paused = true;
            }
784 785
            else
            {
786 787
                if( MainLoopTryRepeat( p_input, &i_start_mdate ) )
                    break;
788
                b_pause_after_eof = var_GetBool( p_input, "play-and-pause" );
789
            }
790
        }
791 792

        /* */
793
        do {
794
            mtime_t i_deadline = i_wakeup;
795
            if( b_paused || !b_demux_polled )
796 797 798
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
799
            for( ;; )
800
            {
801 802 803 804 805 806 807 808 809 810 811 812 813 814 815 816 817 818 819 820 821 822
                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;
                }
823

824
#ifndef NDEBUG
825
                msg_Dbg( p_input, "control type=%d", i_type );
826
#endif
827

828
                if( Control( p_input, i_type, val ) )
829 830 831
                {
                    if( ControlIsSeekRequest( i_type ) )
                        i_last_seek_mdate = mdate();
832
                    b_force_update = true;
833
                }
834
            }
835

836 837 838 839 840 841 842 843 844 845 846 847 848
            /* 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);
            }
849

850
            /* Update the wakeup time */
851
            if( i_wakeup != 0 )
852
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
853
        } while( i_current < i_wakeup );
854
    }
855

856
    if( !p_input->b_error )
857
        input_ChangeState( p_input, END_S );
858 859
}

860
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
861
{
862
    if( p_input->b_preparsing ) return;
863

864 865 866
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
867
    if( libvlc_stats( p_input ) )
868 869 870 871 872 873
    {
        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 );
874 875
        INIT_COUNTER( demux_corrupted, INTEGER, COUNTER );
        INIT_COUNTER( demux_discontinuity, INTEGER, COUNTER );
876 877 878 879 880 881 882 883 884 885 886 887 888 889
        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;
890
    }
891
}
892

893
#ifdef ENABLE_SOUT
894 895
static int InitSout( input_thread_t * p_input )
{
896 897
    if( p_input->b_preparsing )
        return VLC_SUCCESS;
898 899

    /* Find a usable sout and attach it to p_input */
900
    char *psz = var_GetNonEmptyString( p_input, "sout" );
901
    if( psz && strncasecmp( p_input->p->p_item->psz_uri, "vlc:", 4 ) )
902
    {
903
        p_input->p->p_sout  = input_resource_RequestSout( p_input->p->p_resource, NULL, psz );
904
        if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
905
        {
906 907 908 909 910
            input_ChangeState( p_input, ERROR_S );
            msg_Err( p_input, "cannot start stream output instance, " \
                              "aborting" );
            free( psz );
            return VLC_EGENERIC;
911
        }
912
        if( libvlc_stats( p_input ) )
913
        {
914
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
915
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
916 917 918 919
            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;
920
        }
921
    }
922
    else
923
    {
924
        input_resource_RequestSout( p_input->p->p_resource, NULL, NULL );
925
    }
926
    free( psz );
927

928 929
    return VLC_SUCCESS;
}
930
#endif
931

932 933
static void InitTitle( input_thread_t * p_input )
{
Laurent Aimar's avatar
Laurent Aimar committed
934
    input_source_t *p_master = &p_input->p->input;
935

Laurent Aimar's avatar
Laurent Aimar committed
936 937
    if( p_input->b_preparsing )
        return;
938

939
    vlc_mutex_lock( &p_input->p->p_item->lock );
940
    /* Create global title (from master) */
Laurent Aimar's avatar
Laurent Aimar committed
941 942 943 944
    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;
945 946 947 948
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
949
        input_SendEventTitle( p_input, 0 );
950 951 952
    }

    /* Global flag */
953
    p_input->p->b_can_pace_control    = p_master->b_can_pace_control;
Laurent Aimar's avatar
Laurent Aimar committed
954 955
    p_input->p->b_can_pause        = p_master->b_can_pause;
    p_input->p->b_can_rate_control = p_master->b_can_rate_control;
956
    vlc_mutex_unlock( &p_input->p->p_item->lock );
957
}
Gildas Bazin's avatar
 
Gildas Bazin committed
958

959 960 961
static void StartTitle( input_thread_t * p_input )
{
    vlc_value_t val;
962

963 964 965 966 967
    /* 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
968

969 970 971 972 973
    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
974
    /* Start/stop/run time */
975 976 977 978 979 980
    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" ));
981
    if( p_input->p->i_run < 0 )
982
    {
983 984
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
985
    }
986

987
    if( p_input->p->i_start > 0 )
988
    {
989
        vlc_value_t s;
990

991 992
        msg_Dbg( p_input, "starting at time: %ds",
                 (int)( p_input->p->i_start / INT64_C(1000000) ) );
993

994 995
        s.i_time = p_input->p->i_start;
        input_ControlPush( p_input, INPUT_CONTROL_SET_TIME, &s );
996 997 998 999 1000 1001
    }
    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;
    }
1002
    p_input->p->b_fast_seek = var_GetBool( p_input, "input-fast-seek" );
Laurent Aimar's avatar
Laurent Aimar committed
1003
}
1004

Laurent Aimar's avatar
Laurent Aimar committed
1005 1006