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

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

32
#include <vlc_common.h>
33

34
#include <ctype.h>
Christophe Mutricy's avatar
Christophe Mutricy committed
35
#include <limits.h>
36
#include <assert.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

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

Clément Stenac's avatar
Clément Stenac committed
49 50 51
#include <vlc_interface.h>
#include <vlc_url.h>
#include <vlc_charset.h>
52
#include <vlc_strings.h>
53

54 55 56 57
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

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

63 64
static  void *Run            ( vlc_object_t *p_this );
static  void *RunAndDestroy  ( vlc_object_t *p_this );
65

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

73
static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
74
static void       ControlReduce( input_thread_t * );
75
static bool Control( input_thread_t *, int, vlc_value_t );
76

77 78
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
79

80
static void MRLSections( input_thread_t *, char *, int *, int *, int *, int *);
81 82

static input_source_t *InputSourceNew( input_thread_t *);
83
static int  InputSourceInit( input_thread_t *, input_source_t *,
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
84
                             const char *, const char *psz_forced_demux );
85
static void InputSourceClean( input_source_t * );
86 87
/* TODO */
//static void InputGetAttachments( input_thread_t *, input_source_t * );
88 89
static void SlaveDemux( input_thread_t *p_input );
static void SlaveSeek( input_thread_t *p_input );
90

91 92
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 );
93 94
static char *InputGetExtraFiles( input_thread_t *p_input,
                                 const char *psz_access, const char *psz_path );
95

96
static void DemuxMeta( input_thread_t *p_input, vlc_meta_t *p_meta, demux_t *p_demux );
97
static void AccessMeta( input_thread_t * p_input, vlc_meta_t *p_meta );
98 99 100
static void AppendAttachment( int *pi_attachment, input_attachment_t ***ppp_attachment,
                              int i_new, input_attachment_t **pp_new );

101 102
static void SubtitleAdd( input_thread_t *p_input, char *psz_subtitle, bool b_forced );

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

105
/*****************************************************************************
106 107
 * This function creates a new input, and returns a pointer
 * to its description. On error, it returns NULL.
108 109 110 111 112 113 114 115 116 117
 *
 * Variables for _public_ use:
 * * Get and Set:
 *  - state
 *  - rate,rate-slower, rate-faster
 *  - position, position-offset
 *  - time, time-offset
 *  - title,title-next,title-prev
 *  - chapter,chapter-next, chapter-prev
 *  - program, audio-es, video-es, spu-es
118
 *  - audio-delay, spu-delay
119 120 121 122
 *  - bookmark
 * * Get only:
 *  - length
 *  - bookmarks
123
 *  - seekable (if you can seek, it doesn't say if 'bar display' has be shown FIXME rename can-seek
124
 *    or not, for that check position != 0.0)
125
 *  - can-pause
126
 *  - can-record (if a stream can be recorded while playing)
127
 *  - teletext-es to get the index of spu track that is teletext --1 if no teletext)
128
 * * For intf callback upon changes:
129
 *  - intf-change
130
 *  - intf-change-vout for when a vout is created or destroyed
131
 *  - rate-change for when playback rate changes
132
 *  - stats-change for when statistics are updated
133 134
 * TODO explain when Callback is called
 * TODO complete this list (?)
135
 *****************************************************************************/
136
static input_thread_t *Create( vlc_object_t *p_parent, input_item_t *p_item,
137
                               const char *psz_header, bool b_quick,
138
                               sout_instance_t *p_sout )
Michel Kaempf's avatar
Michel Kaempf committed
139
{
140
    static const char input_name[] = "input";
141
    input_thread_t *p_input = NULL;                 /* thread descriptor */
142 143
    vlc_value_t val;
    int i;
144

145
    /* Allocate descriptor */
146 147
    p_input = vlc_custom_create( p_parent, sizeof( *p_input ),
                                 VLC_OBJECT_INPUT, input_name );
148
    if( p_input == NULL )
149
        return NULL;
150 151 152 153 154 155

    /* 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 );
156 157 158

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

159 160 161 162 163 164 165
    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 );

166 167 168
    p_input->p = calloc( 1, sizeof( input_thread_private_t ) );
    if( !p_input->p )
        return NULL;
169 170 171

    /* One "randomly" selected input thread is responsible for computing
     * the global stats. Check if there is already someone doing this */
172
    if( p_input->p_libvlc->p_stats && !b_quick )
173
    {
174
        libvlc_priv_t *p_private = libvlc_priv( p_input->p_libvlc );
175
        vlc_mutex_lock( &p_input->p_libvlc->p_stats->lock );
176 177
        if( p_private->p_stats_computer == NULL )
            p_private->p_stats_computer = p_input;
178
        vlc_mutex_unlock( &p_input->p_libvlc->p_stats->lock );
179 180
    }

181
    p_input->b_preparsing = b_quick;
182
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
183

184
    /* Init events */
185 186 187
    vlc_event_manager_t * p_em = &p_input->p->event_manager;
    vlc_event_manager_init_with_vlc_object( p_em, p_input );
    vlc_event_manager_register_event_type( p_em, vlc_InputStateChanged );
188
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
189

190
    /* Init Common fields */
191 192
    p_input->b_eof = false;
    p_input->b_can_pace_control = true;
Clément Stenac's avatar
Clément Stenac committed
193
    p_input->p->i_start = 0;
194
    p_input->i_time     = 0;
Clément Stenac's avatar
Clément Stenac committed
195
    p_input->p->i_stop  = 0;
196
    p_input->p->i_run   = 0;
Clément Stenac's avatar
Clément Stenac committed
197
    p_input->p->i_title = 0;
198
    p_input->p->title = NULL;
Clément Stenac's avatar
Clément Stenac committed
199
    p_input->p->i_title_offset = p_input->p->i_seekpoint_offset = 0;
200
    p_input->i_state = INIT_S;
201
    p_input->p->i_rate = INPUT_RATE_DEFAULT;
202
    p_input->p->b_recording = false;
203 204
    TAB_INIT( p_input->p->i_bookmark, p_input->p->bookmark );
    TAB_INIT( p_input->p->i_attachment, p_input->p->attachment );
205 206
    p_input->p->p_es_out_display = NULL;
    p_input->p->p_es_out = NULL;
207
    p_input->p->p_sout   = NULL;
208
    p_input->p->b_out_pace_control = false;
209 210 211
    p_input->i_pts_delay = 0;

    /* Init Input fields */
Pierre's avatar
Pierre committed
212
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
213 214 215 216
    p_input->p->input.p_item = p_item;
    p_input->p->input.p_access = NULL;
    p_input->p->input.p_stream = NULL;
    p_input->p->input.p_demux  = NULL;
217
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
218 219 220
    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;
221 222 223 224
    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
225 226
    p_input->p->input.i_cr_average = 0;

227
    vlc_mutex_lock( &p_item->lock );
228 229

    if( !p_item->p_stats )
230 231
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
232

233
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
234 235
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
236

237
    /* Init control buffer */
238
    vlc_mutex_init( &p_input->p->lock_control );
239
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
240
    p_input->p->i_control = 0;
241

242
    /* Parse input options */
243
    vlc_mutex_lock( &p_item->lock );
Pierre d'Herbemont's avatar
Pierre d'Herbemont committed
244
    assert( (int)p_item->optflagc == p_item->i_options );
245
    for( i = 0; i < p_item->i_options; i++ )
246 247
        var_OptionParse( VLC_OBJECT(p_input), p_item->ppsz_options[i],
                         !!(p_item->optflagv[i] & VLC_INPUT_OPTION_TRUSTED) );
248
    vlc_mutex_unlock( &p_item->lock );
249

250 251
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
252

253
    /* Create Objects variables for public Get and Set */
254
    input_ControlVarInit( p_input );
255

256
    /* */
Clément Stenac's avatar
Clément Stenac committed
257
    p_input->p->input.i_cr_average = var_GetInteger( p_input, "cr-average" );
Gildas Bazin's avatar
Gildas Bazin committed
258

259
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
260
    {
261 262
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
263
        {
264 265 266 267
            /* FIXME: have a common cfg parsing routine used by sout and others */
            char *psz_parser, *psz_start, *psz_end;
            psz_parser = val.psz_string;
            while( (psz_start = strchr( psz_parser, '{' ) ) )
Gildas Bazin's avatar
Gildas Bazin committed
268
            {
269
                 seekpoint_t *p_seekpoint;
270 271 272 273 274 275 276 277
                 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 = ',';
278 279

                 p_seekpoint = vlc_seekpoint_New();
280 281 282 283 284
                 while( (psz_end = strchr( psz_start, ',' ) ) )
                 {
                     *psz_end = 0;
                     if( !strncmp( psz_start, "name=", 5 ) )
                     {
285
                         p_seekpoint->psz_name = strdup(psz_start + 5);
286 287 288 289 290 291 292
                     }
                     else if( !strncmp( psz_start, "bytes=", 6 ) )
                     {
                         p_seekpoint->i_byte_offset = atoll(psz_start + 6);
                     }
                     else if( !strncmp( psz_start, "time=", 5 ) )
                     {
293 294
                         p_seekpoint->i_time_offset = atoll(psz_start + 5) *
                                                        1000000;
295 296
                     }
                     psz_start = psz_end + 1;
Gildas Bazin's avatar
Gildas Bazin committed
297
                }
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
298
                msg_Dbg( p_input, "adding bookmark: %s, bytes=%"PRId64", time=%"PRId64,
299 300 301 302 303
                                  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
304
            }
305
            free( val.psz_string );
Gildas Bazin's avatar
Gildas Bazin committed
306 307 308
        }
    }

309
    /* Remove 'Now playing' info as it is probably outdated */
310
    input_item_SetNowPlaying( p_item, NULL );
311
    input_SendEventMeta( p_input );
312

313 314 315 316
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

317 318 319 320
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

321
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
322
    vlc_mutex_init( &p_input->p->counters.counters_lock );
323

324 325 326
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

327 328 329
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

330 331 332
    return p_input;
}

333 334 335 336
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
337
{
338 339 340 341 342 343
#ifndef NDEBUG
    char * psz_name = input_item_GetName( p_input->p->input.p_item );
    msg_Dbg( p_input, "Destroying the input for '%s'", psz_name);
    free( psz_name );
#endif

344 345
    vlc_event_manager_fini( &p_input->p->event_manager );

346 347
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
348
#ifdef ENABLE_SOUT
349 350
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
351
#endif
Pierre's avatar
Pierre committed
352 353
    vlc_gc_decref( p_input->p->input.p_item );

354 355
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

356
    vlc_cond_destroy( &p_input->p->wait_control );
357 358
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
359
}
360

361
/**
362 363
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
364 365 366 367 368 369 370
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \return a pointer to the spawned input thread
 */
input_thread_t *__input_CreateThread( vlc_object_t *p_parent,
                                      input_item_t *p_item )
371
{
372
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
373 374
}

375 376 377 378
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
379
{
380
    input_thread_t *p_input;
381

382
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
383 384 385
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
386
    /* Create thread and wait for its readiness. */
387
    if( vlc_thread_create( p_input, "input", Run,
388
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
389
    {
390
        input_ChangeState( p_input, ERROR_S );
391
        msg_Err( p_input, "cannot create input thread" );
392 393
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
394
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
395
    }
396

397
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
398 399
}

400
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
401
 * Initialize an input thread and run it. This thread will clean after itself,
402 403 404 405 406
 * you can forget about it. It can work either in blocking or non-blocking mode
 *
 * \param p_parent a vlc_object
 * \param p_item an input item
 * \param b_block should we block until read is finished ?
407
 * \return an error code, VLC_SUCCESS on success
408
 */
409
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
410
                   bool b_block )
411
{
412
    input_thread_t *p_input;
413

414
    p_input = Create( p_parent, p_item, NULL, false, NULL );
415
    if( !p_input )
416 417
        return VLC_EGENERIC;

418
    if( b_block )
419
    {
420
        RunAndDestroy( VLC_OBJECT(p_input) );
Clément Stenac's avatar
Clément Stenac committed
421
        return VLC_SUCCESS;
422
    }
423
    else
424
    {
425
        if( vlc_thread_create( p_input, "input", RunAndDestroy,
426
                               VLC_THREAD_PRIORITY_INPUT, false ) )
427
        {
428
            input_ChangeState( p_input, ERROR_S );
429
            msg_Err( p_input, "cannot create input thread" );
430
            vlc_object_release( p_input );
Clément Stenac's avatar
Clément Stenac committed
431
            return VLC_EGENERIC;
432
        }
433
    }
434
    return VLC_SUCCESS;
435
}
436

437 438 439 440 441 442 443 444 445 446
/**
 * Initialize an input and initialize it to preparse the item
 * This function is blocking. It will only accept to parse 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 )
{
447
    input_thread_t *p_input;
448

449
    /* Allocate descriptor */
450
    p_input = Create( p_parent, p_item, NULL, true, NULL );
451 452 453
    if( !p_input )
        return VLC_EGENERIC;

454 455
    if( !Init( p_input ) )
        End( p_input );
456

457 458
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
459 460 461 462

    return VLC_SUCCESS;
}

463 464 465 466 467
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
468
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
469
{
470 471
    vlc_list_t *p_list;
    int i;
472 473 474 475 476 477

    if( p_obj->i_object_type == VLC_OBJECT_VOUT ||
        p_obj->i_object_type == VLC_OBJECT_AOUT ||
        p_obj == VLC_OBJECT(p_input->p->p_sout) )
        return;

478
    vlc_object_kill( p_obj );
479

480
    p_list = vlc_list_children( p_obj );
481
    for( i = 0; i < p_list->i_count; i++ )
482
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
483
    vlc_list_release( p_list );
484 485 486 487 488 489
}
void input_StopThread( input_thread_t *p_input )
{
    /* 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 */
490
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
491

492
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
493 494
}

495
sout_instance_t *input_DetachSout( input_thread_t *p_input )
496
{
497
    assert( p_input->b_dead );
498 499 500 501
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
502 503
}

504
/*****************************************************************************
505
 * Run: main thread loop
506 507
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
508
 *****************************************************************************/
509
static void *Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
510
{
511
    input_thread_t *p_input = (input_thread_t *)p_this;
512
    const int canc = vlc_savecancel();
513

514
    if( Init( p_input ) )
515 516
    {
        /* If we failed, wait before we are killed, and exit */
517
        WaitDie( p_input );
518
        goto exit;
519
    }
Michel Kaempf's avatar
Michel Kaempf committed
520

521 522
    MainLoop( p_input );

523
    /* Wait until we are asked to die */
524
    if( !p_input->b_die )
525
        WaitDie( p_input );
526 527 528

    /* Clean up */
    End( p_input );
529 530 531

exit:
    p_input->b_dead = true;
532
    vlc_restorecancel( canc );
533
    return NULL;
534 535 536
}

/*****************************************************************************
537
 * RunAndDestroy: main thread loop
538 539 540
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
541
static void *RunAndDestroy( vlc_object_t *p_this )
542
{
543
    input_thread_t *p_input = (input_thread_t *)p_this;
544
    const int canc = vlc_savecancel();
545

546
    if( Init( p_input ) )
547
        goto exit;
548 549 550 551 552 553

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

554
exit:
555
    /* Release memory */
556
    vlc_object_release( p_input );
557 558
    vlc_restorecancel( canc );
    return NULL;
559 560 561 562 563
}

/*****************************************************************************
 * Main loop: Fill buffers from access, and demux
 *****************************************************************************/
564 565 566 567 568 569

/**
 * MainLoopDemux
 * It asks the demuxer to demux some data
 */
static void MainLoopDemux( input_thread_t *p_input, bool *pb_changed, mtime_t *pi_start_mdate )
570
{
571
    int i_ret;
572

573
    *pb_changed = false;
574

575 576 577 578 579 580 581
    if( ( p_input->p->i_stop > 0 && p_input->i_time >= p_input->p->i_stop ) ||
        ( p_input->p->i_run > 0 && *pi_start_mdate+p_input->p->i_run < mdate() ) )
        i_ret = 0; /* EOF */
    else
        i_ret = p_input->p->input.p_demux->pf_demux(p_input->p->input.p_demux);

    if( i_ret > 0 )
582
    {
583 584 585 586 587 588 589 590 591 592 593 594 595 596 597
        /* TODO */
        if( p_input->p->input.b_title_demux &&
            p_input->p->input.p_demux->info.i_update )
        {
            i_ret = UpdateFromDemux( p_input );
            *pb_changed = true;
        }
        else if( !p_input->p->input.b_title_demux &&
                  p_input->p->input.p_access &&
                  p_input->p->input.p_access->info.i_update )
        {
            i_ret = UpdateFromAccess( p_input );
            *pb_changed = true;
        }
    }
598

599 600 601 602 603 604
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
605
        {
606 607 608 609 610 611 612 613
            /* End of file - we do not set b_die because only the
             * playlist is allowed to do so. */
            msg_Dbg( p_input, "EOF reached" );
            p_input->p->input.b_eof = true;
        }
        else
        {
            vlc_value_t val;
614

615 616 617
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
618
            {
619 620
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
621
            }
622

623 624 625 626 627 628 629 630 631 632 633 634 635 636 637 638
            /* 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 )
639
            {
640 641 642
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
643
            }
644
            else
645
            {
646 647 648
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
649
            }
650

651 652 653 654 655 656 657 658 659 660 661 662 663 664 665 666 667 668 669 670 671
            /* */
            *pi_start_mdate = mdate();
        }
    }
    else if( i_ret < 0 )
    {
        input_ChangeState( p_input, ERROR_S );
    }

    if( i_ret > 0 && p_input->p->i_slave > 0 )
    {
        SlaveDemux( p_input );
    }
}

/**
 * MainLoopInterface
 * It update the variables used by the interfaces
 */
static void MainLoopInterface( input_thread_t *p_input )
{
672 673 674 675 676
    input_event_times_t ev;

    ev.f_position = 0.0;
    ev.i_time = 0;
    ev.i_length = 0;
677 678

    /* update input status variables */
679 680 681
    if( demux_Control( p_input->p->input.p_demux,
                       DEMUX_GET_POSITION, &ev.f_position ) )
        ev.f_position = 0.0;
682

683 684 685 686 687 688 689
    if( demux_Control( p_input->p->input.p_demux,
                       DEMUX_GET_TIME, &ev.i_time ) )
        ev.i_time = 0;

    if( demux_Control( p_input->p->input.p_demux,
                       DEMUX_GET_LENGTH, &ev.i_length ) )
        ev.i_length = 0;
690

691
    input_SendEventTimes( p_input, &ev );
692 693 694 695 696 697 698 699 700 701 702 703 704 705 706
}

/**
 * MainLoopStatistic
 * It updates the globals statics
 */
static void MainLoopStatistic( input_thread_t *p_input )
{
    stats_ComputeInputStats( p_input, p_input->p->input.p_item->p_stats );
    /* Are we the thread responsible for computing global stats ? */
    if( libvlc_priv( p_input->p_libvlc )->p_stats_computer == p_input )
    {
        stats_ComputeGlobalStats( p_input->p_libvlc,
                                  p_input->p_libvlc->p_stats );
    }
707
    input_SendEventStatistics( p_input );
708 709 710 711 712 713 714 715 716
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
717 718
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
719 720 721 722

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

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

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

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

748 749 750 751 752 753 754 755 756 757 758
                i_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
            }
            else if( !p_input->b_eof && !es_out_GetEmpty( p_input->p->p_es_out ) )
            {
                msg_Dbg( p_input, "waiting decoder fifos to empty" );
                i_wakeup = mdate() + INPUT_IDLE_SLEEP;
            }
            else
            {
                break;
            }
759
        }
760 761

        /* */
762 763
        do {
            i_deadline = i_wakeup;
764
            if( b_paused )
765 766 767 768 769 770 771 772
                i_deadline = __MIN( i_intf_update, i_statistic_update );

            /* Handle control */
            vlc_mutex_lock( &p_input->p->lock_control );
            ControlReduce( p_input );
            while( !ControlPopNoLock( p_input, &i_type, &val, i_deadline ) )
            {
                msg_Dbg( p_input, "control type=%d", i_type );
773

774 775 776 777
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
778

779 780 781 782 783 784 785 786 787 788 789 790 791
            /* 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);
            }
792 793 794 795

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
796
                mtime_t i_new_wakeup = es_out_GetWakeup( p_input->p->p_es_out );
797 798 799
                if( !i_new_wakeup )
                    i_wakeup = 0;
            }
800
        } while( i_current < i_wakeup );
801
    }
802

803
    if( !p_input->b_error )
804
        input_ChangeState( p_input, END_S );
805 806
}

807
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
808
{
809
    if( p_input->b_preparsing ) return;
810

811 812 813
    /* Prepare statistics */
#define INIT_COUNTER( c, type, compute ) p_input->p->counters.p_##c = \
 stats_CounterCreate( p_input, VLC_VAR_##type, STATS_##compute);
814
    if( libvlc_stats( p_input ) )
815 816 817 818 819 820 821 822 823 824 825 826 827 828 829 830 831 832 833 834
    {
        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 );
        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;
835
    }
836
}
837

838
#ifdef ENABLE_SOUT
839 840 841 842 843 844 845 846 847
static int InitSout( input_thread_t * p_input )
{
    char *psz;

    if( p_input->b_preparsing ) return VLC_SUCCESS;

    /* Find a usable sout and attach it to p_input */
    psz = var_GetNonEmptyString( p_input, "sout" );
    if( psz && strncasecmp( p_input->p->input.p_item->psz_uri, "vlc:", 4 ) )
848
    {
849 850
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
851
        {
852
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
853
            {
854
                msg_Dbg( p_input, "destroying unusable sout" );
855

856 857
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
858
            }
859
        }
860

861 862 863 864 865 866 867 868 869 870 871 872 873
        if( p_input->p->p_sout )
        {
            /* Reuse it */
            msg_Dbg( p_input, "sout keep: reusing sout" );
            msg_Dbg( p_input, "sout keep: you probably want to use "
                              "gather stream_out" );
            vlc_object_attach( p_input->p->p_sout, p_input );
        }
        else
        {
            /* Create a new one */
            p_input->p->p_sout = sout_NewInstance( p_input, psz );
            if( !p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
874
            {
875 876 877 878 879
                input_ChangeState( p_input, ERROR_S );
                msg_Err( p_input, "cannot start stream output instance, " \
                                  "aborting" );
                free( psz );
                return VLC_EGENERIC;
Clément Stenac's avatar
Clément Stenac committed
880
            }
881
        }
882
        if( libvlc_stats( p_input ) )
883
        {
884
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
885
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
886 887 888 889
            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;
890
        }
891
    }
892
    else if( p_input->p->p_sout )
893
    {
894 895 896 897
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
898
    }
899
    free( psz );
900

901 902
    return VLC_SUCCESS;
}
903
#endif
904

905 906 907
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
908

909
    if( p_input->b_preparsing ) return;
910

911 912 913 914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934
    /* Create global title (from master) */
    p_input->p->i_title = p_input->p->input.i_title;
    p_input->p->title   = p_input->p->input.title;
    p_input->p->i_title_offset = p_input->p->input.i_title_offset;
    p_input->p->i_seekpoint_offset = p_input->p->input.i_seekpoint_offset;
    if( p_input->p->i_title > 0 )
    {
        /* Setup variables */
        input_ControlVarNavigation( p_input );
        input_ControlVarTitle( p_input, 0 );
    }

    /* Global flag */
    p_input->b_can_pace_control = p_input->p->input.b_can_pace_control;
    p_input->p->b_can_pause        = p_input->p->input.b_can_pause;
    p_input->p->b_can_rate_control = p_input->p->input.b_can_rate_control;

    /* Fix pts delay */
    if( p_input->i_pts_delay < 0 )
        p_input->i_pts_delay = 0;

    /* If the desynchronisation requested by the user is < 0, we need to
     * cache more data. */
    var_Get( p_input, "audio-desync", &val );
935 936
    if( val.i_int < 0 )
        p_input->i_pts_delay -= (val.i_int * 1000);
937 938 939 940 941 942

    /* Update cr_average depending on the caching */
    p_input->p->input.i_cr_average *= (10 * p_input->i_pts_delay / 200000);
    p_input->p->input.i_cr_average /= 10;
    if( p_input->p->input.i_cr_average < 10 ) p_input->p->input.i_cr_average = 10;
}
943

944 945 946 947
static void StartTitle( input_thread_t * p_input )
{
    double f_fps;
    vlc_value_t val;
948
    int i_delay;
949 950
    char *psz;
    char *psz_subtitle;
951
    int64_t i_length;
952

953 954 955
    /* Start title/chapter */

    if( p_input->b_preparsing )
956
    {
957 958
        p_input->p->i_start = 0;
        return;
959
    }
960 961 962 963 964 965 966 967 968 969 970 971

    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 );
    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