input.c 102 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 "es_out.h"
40
#include "access.h"
41
#include "demux.h"
42

Clément Stenac's avatar
Clément Stenac committed
43 44
#include <vlc_sout.h>
#include "../stream_output/stream_output.h"
45

Clément Stenac's avatar
Clément Stenac committed
46 47 48
#include <vlc_interface.h>
#include <vlc_url.h>
#include <vlc_charset.h>
49
#include <vlc_strings.h>
50

51 52 53 54
#ifdef HAVE_SYS_STAT_H
#   include <sys/stat.h>
#endif

55
/*****************************************************************************
Michel Kaempf's avatar
Michel Kaempf committed
56
 * Local prototypes
57
 *****************************************************************************/
58 59
static void Destructor( input_thread_t * p_input );

60 61
static  void* Run            ( vlc_object_t *p_this );
static  void* RunAndDestroy  ( vlc_object_t *p_this );
62

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

70
static inline int ControlPopNoLock( input_thread_t *, int *, vlc_value_t *, mtime_t i_deadline );
71
static void       ControlReduce( input_thread_t * );
72
static bool Control( input_thread_t *, int, vlc_value_t );
73

74 75
static int  UpdateFromAccess( input_thread_t * );
static int  UpdateFromDemux( input_thread_t * );
Michel Kaempf's avatar
Michel Kaempf committed
76

77
static void UpdateItemLength( input_thread_t *, int64_t i_length );
78

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

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

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

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

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

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

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

    /* 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 );
153 154 155

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

156 157 158 159 160 161 162
    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 );

Clément Stenac's avatar
Clément Stenac committed
163
    MALLOC_NULL( p_input->p, input_thread_private_t );
Rafaël Carré's avatar
Rafaël Carré committed
164
    memset( p_input->p, 0, sizeof( input_thread_private_t ) );
165 166 167

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

177
    p_input->b_preparsing = b_quick;
178
    p_input->psz_header = psz_header ? strdup( psz_header ) : NULL;
179

180
    /* Init events */
181 182 183
    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 );
184
    vlc_event_manager_register_event_type( p_em, vlc_InputSelectedStreamChanged );
185

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

    /* Init Input fields */
Pierre's avatar
Pierre committed
207
    vlc_gc_incref( p_item ); /* Released in Destructor() */
Clément Stenac's avatar
Clément Stenac committed
208 209 210 211
    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;
212
    p_input->p->input.b_title_demux = false;
Clément Stenac's avatar
Clément Stenac committed
213 214 215
    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;
216 217 218 219
    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
220 221
    p_input->p->input.i_cr_average = 0;

222
    vlc_mutex_lock( &p_item->lock );
223 224

    if( !p_item->p_stats )
225 226
        p_item->p_stats = stats_NewInputStats( p_input );
    vlc_mutex_unlock( &p_item->lock );
227

228
    /* No slave */
Clément Stenac's avatar
Clément Stenac committed
229 230
    p_input->p->i_slave = 0;
    p_input->p->slave   = NULL;
231

232
    /* Init control buffer */
233
    vlc_mutex_init( &p_input->p->lock_control );
234
    vlc_cond_init( &p_input->p->wait_control );
Clément Stenac's avatar
Clément Stenac committed
235
    p_input->p->i_control = 0;
236

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

245 246
    /* Create Object Variables for private use only */
    input_ConfigVarInit( p_input );
Michel Kaempf's avatar
Michel Kaempf committed
247

248
    /* Create Objects variables for public Get and Set */
249
    input_ControlVarInit( p_input );
250

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

254
    if( !p_input->b_preparsing )
Gildas Bazin's avatar
Gildas Bazin committed
255
    {
256 257
        var_Get( p_input, "bookmarks", &val );
        if( val.psz_string )
Gildas Bazin's avatar
Gildas Bazin committed
258
        {
259 260 261 262
            /* 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
263
            {
264
                 seekpoint_t *p_seekpoint;
265 266 267 268 269 270 271 272
                 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 = ',';
273 274

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

304
    /* Remove 'Now playing' info as it is probably outdated */
305
    input_item_SetNowPlaying( p_item, NULL );
306

307 308 309 310
    /* */
    if( p_input->b_preparsing )
        p_input->i_flags |= OBJECT_FLAGS_QUIET | OBJECT_FLAGS_NOINTERACT;

311 312 313 314
    /* */
    if( p_sout )
        p_input->p->p_sout = p_sout;

315
    memset( &p_input->p->counters, 0, sizeof( p_input->p->counters ) );
316
    vlc_mutex_init( &p_input->p->counters.counters_lock );
317

318 319 320
    /* Set the destructor when we are sure we are initialized */
    vlc_object_set_destructor( p_input, (vlc_destructor_t)Destructor );

321 322 323
    /* Attach only once we are ready */
    vlc_object_attach( p_input, p_parent );

324 325 326
    return p_input;
}

327 328 329 330
/**
 * Input destructor (called when the object's refcount reaches 0).
 */
static void Destructor( input_thread_t * p_input )
331
{
332 333 334 335 336 337
#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

338 339
    vlc_event_manager_fini( &p_input->p->event_manager );

340 341
    stats_TimerDump( p_input, STATS_TIMER_INPUT_LAUNCHING );
    stats_TimerClean( p_input, STATS_TIMER_INPUT_LAUNCHING );
342
#ifdef ENABLE_SOUT
343 344
    if( p_input->p->p_sout )
        sout_DeleteInstance( p_input->p->p_sout );
345
#endif
Pierre's avatar
Pierre committed
346 347
    vlc_gc_decref( p_input->p->input.p_item );

348 349
    vlc_mutex_destroy( &p_input->p->counters.counters_lock );

350
    vlc_cond_destroy( &p_input->p->wait_control );
351 352
    vlc_mutex_destroy( &p_input->p->lock_control );
    free( p_input->p );
353
}
354

355
/**
356 357
 * Initialize an input thread and run it. You will need to monitor the
 * thread to clean up after it is done
358 359 360 361 362 363 364
 *
 * \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 )
365
{
366
    return __input_CreateThreadExtended( p_parent, p_item, NULL, NULL );
367 368
}

369 370 371 372
/* */
input_thread_t *__input_CreateThreadExtended( vlc_object_t *p_parent,
                                              input_item_t *p_item,
                                              const char *psz_log, sout_instance_t *p_sout )
373
{
374
    input_thread_t *p_input;
375

376
    p_input = Create( p_parent, p_item, psz_log, false, p_sout );
377 378 379
    if( !p_input )
        return NULL;

Sam Hocevar's avatar
Sam Hocevar committed
380
    /* Create thread and wait for its readiness. */
381
    if( vlc_thread_create( p_input, "input", Run,
382
                           VLC_THREAD_PRIORITY_INPUT, false ) )
Michel Kaempf's avatar
Michel Kaempf committed
383
    {
384
        input_ChangeState( p_input, ERROR_S );
385
        msg_Err( p_input, "cannot create input thread" );
386 387
        vlc_object_detach( p_input );
        vlc_object_release( p_input );
388
        return NULL;
Michel Kaempf's avatar
Michel Kaempf committed
389
    }
390

391
    return p_input;
Michel Kaempf's avatar
Michel Kaempf committed
392 393
}

394
/**
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
395
 * Initialize an input thread and run it. This thread will clean after itself,
396 397 398 399 400
 * 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 ?
401
 * \return an error code, VLC_SUCCESS on success
402
 */
403
int __input_Read( vlc_object_t *p_parent, input_item_t *p_item,
404
                   bool b_block )
405
{
406
    input_thread_t *p_input;
407

408
    p_input = Create( p_parent, p_item, NULL, false, NULL );
409
    if( !p_input )
410 411
        return VLC_EGENERIC;

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

431 432 433 434 435 436 437 438 439 440
/**
 * 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 )
{
441
    input_thread_t *p_input;
442

443
    /* Allocate descriptor */
444
    p_input = Create( p_parent, p_item, NULL, true, NULL );
445 446 447
    if( !p_input )
        return VLC_EGENERIC;

448 449
    if( !Init( p_input ) )
        End( p_input );
450

451 452
    vlc_object_detach( p_input );
    vlc_object_release( p_input );
453 454 455 456

    return VLC_SUCCESS;
}

457 458 459 460 461
/**
 * Request a running input thread to stop and die
 *
 * \param the input thread to stop
 */
462
static void ObjectKillChildrens( input_thread_t *p_input, vlc_object_t *p_obj )
Michel Kaempf's avatar
Michel Kaempf committed
463
{
464 465
    vlc_list_t *p_list;
    int i;
466 467 468 469 470 471

    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;

472
    vlc_object_kill( p_obj );
473

474
    p_list = vlc_list_children( p_obj );
475
    for( i = 0; i < p_list->i_count; i++ )
476
        ObjectKillChildrens( p_input, p_list->p_values[i].p_object );
477
    vlc_list_release( p_list );
478 479 480 481 482 483
}
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 */
484
    ObjectKillChildrens( p_input, VLC_OBJECT(p_input) );
Michel Kaempf's avatar
Michel Kaempf committed
485

486
    input_ControlPush( p_input, INPUT_CONTROL_SET_DIE, NULL );
487 488
}

489 490
sout_instance_t * input_DetachSout( input_thread_t *p_input )
{
491 492 493 494
    sout_instance_t *p_sout = p_input->p->p_sout;
    vlc_object_detach( p_sout );
    p_input->p->p_sout = NULL;
    return p_sout;
495 496
}

497
/*****************************************************************************
498
 * Run: main thread loop
499 500
 * This is the "normal" thread that spawns the input processing chain,
 * reads the stream, cleans up and waits
501
 *****************************************************************************/
502
static void* Run( vlc_object_t *p_this )
Michel Kaempf's avatar
Michel Kaempf committed
503
{
504
    input_thread_t *p_input = (input_thread_t *)p_this;
505
    const int canc = vlc_savecancel();
506

507
    if( Init( p_input ) )
508 509
    {
        /* If we failed, wait before we are killed, and exit */
510
        WaitDie( p_input );
511
        goto exit;
512
    }
Michel Kaempf's avatar
Michel Kaempf committed
513

514 515
    MainLoop( p_input );

516
    /* Wait until we are asked to die */
517
    if( !p_input->b_die )
518
        WaitDie( p_input );
519 520 521

    /* Clean up */
    End( p_input );
522 523 524

exit:
    p_input->b_dead = true;
525
    vlc_restorecancel( canc );
526
    return NULL;
527 528 529
}

/*****************************************************************************
530
 * RunAndDestroy: main thread loop
531 532 533
 * This is the "just forget me" thread that spawns the input processing chain,
 * reads the stream, cleans up and releases memory
 *****************************************************************************/
534
static void* RunAndDestroy( vlc_object_t *p_this )
535
{
536
    input_thread_t *p_input = (input_thread_t *)p_this;
537
    const int canc = vlc_savecancel();
538

539
    if( Init( p_input ) )
540
        goto exit;
541 542 543 544 545 546

    MainLoop( p_input );

    /* Clean up */
    End( p_input );

547
exit:
548
    /* Release memory */
549
    vlc_object_release( p_input );
550 551
    vlc_restorecancel( canc );
    return NULL;
552 553 554 555 556
}

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

/**
 * 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 )
563
{
564
    int i_ret;
565

566
    *pb_changed = false;
567

568 569 570 571 572 573 574
    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 )
575
    {
576 577 578 579 580 581 582 583 584 585 586 587 588 589 590
        /* 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;
        }
    }
591

592 593 594 595 596 597
    if( i_ret == 0 )    /* EOF */
    {
        vlc_value_t repeat;

        var_Get( p_input, "input-repeat", &repeat );
        if( repeat.i_int == 0 )
598
        {
599 600 601 602 603 604 605 606
            /* 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;
607

608 609 610
            msg_Dbg( p_input, "repeating the same input (%d)",
                     repeat.i_int );
            if( repeat.i_int > 0 )
611
            {
612 613
                repeat.i_int--;
                var_Set( p_input, "input-repeat", repeat );
614
            }
615

616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631
            /* 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 )
632
            {
633 634 635
                val.i_time = p_input->p->i_start;
                input_ControlPush( p_input, INPUT_CONTROL_SET_TIME,
                                   &val );
636
            }
637
            else
638
            {
639 640 641
                val.f_float = 0.0;
                input_ControlPush( p_input, INPUT_CONTROL_SET_POSITION,
                                   &val );
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 682 683 684 685 686 687 688 689 690 691 692 693 694 695 696 697 698 699 700 701 702 703 704 705 706 707 708 709 710 711 712
            /* */
            *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 )
{
    vlc_value_t val;
    double f_pos;
    int64_t i_time, i_length;

    /* update input status variables */
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_POSITION, &f_pos ) )
    {
        val.f_float = (float)f_pos;
        var_Change( p_input, "position", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_TIME, &i_time ) )
    {
        p_input->i_time = i_time;
        val.i_time = i_time;
        var_Change( p_input, "time", VLC_VAR_SETVALUE, &val, NULL );
    }
    if( !demux_Control( p_input->p->input.p_demux,
                         DEMUX_GET_LENGTH, &i_length ) )
    {
        vlc_value_t old_val;
        var_Get( p_input, "length", &old_val );
        val.i_time = i_length;
        var_Change( p_input, "length", VLC_VAR_SETVALUE, &val, NULL );

        if( old_val.i_time != val.i_time )
        {
            UpdateItemLength( p_input, i_length );
        }
    }

    var_SetBool( p_input, "intf-change", true );
}

/**
 * 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 );
    }
713
    var_SetBool( p_input, "stats-change", true );
714 715 716 717 718 719 720 721 722
}

/**
 * MainLoop
 * The main input loop.
 */
static void MainLoop( input_thread_t *p_input )
{
    mtime_t i_start_mdate = mdate();
723 724
    mtime_t i_intf_update = 0;
    mtime_t i_statistic_update = 0;
725 726 727 728 729 730 731 732 733

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

    while( !p_input->b_die && !p_input->b_error && !p_input->p->input.b_eof )
    {
        bool b_force_update;
        int i_type;
        vlc_value_t val;
734
        mtime_t i_current;
735
        mtime_t i_deadline;
736
        mtime_t i_wakeup;
737
        bool b_paused;
738

739 740
        /* Demux data */
        b_force_update = false;
741
        i_wakeup = 0;
742 743 744 745
        b_paused = p_input->i_state == PAUSE_S &&
                   !input_EsOutIsBuffering( p_input->p->p_es_out );

        if( !b_paused )
746
        {
747
            MainLoopDemux( p_input, &b_force_update, &i_start_mdate );
748 749
            i_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
        }
750 751

        /* */
752 753
        do {
            i_deadline = i_wakeup;
754
            if( b_paused )
755 756 757 758 759 760 761 762 763 764 765 766
                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 );
                if( Control( p_input, i_type, val ) )
                    b_force_update = true;
            }
            vlc_mutex_unlock( &p_input->p->lock_control );
767

768 769 770 771 772 773 774 775 776 777 778 779 780
            /* 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);
            }
781 782 783 784 785 786 787 788

            /* Check if i_wakeup is still valid */
            if( i_wakeup != 0 )
            {
                mtime_t i_new_wakeup = input_EsOutGetWakeup( p_input->p->p_es_out );
                if( !i_new_wakeup )
                    i_wakeup = 0;
            }
789
        } while( i_current < i_wakeup );
790
    }
791 792 793 794

    if( !p_input->b_eof && !p_input->b_error && p_input->p->input.b_eof )
    {
        /* We have finish to demux data but not to play them */
795
        while( vlc_object_alive( p_input ) )
796
        {
797
            if( input_EsOutDecodersIsEmpty( p_input->p->p_es_out ) )
798 799 800 801 802 803 804 805 806 807
                break;

            msg_Dbg( p_input, "waiting decoder fifos to empty" );

            msleep( INPUT_IDLE_SLEEP );
        }

        /* We have finished */
        input_ChangeState( p_input, END_S );
    }
808 809
}

810
static void InitStatistics( input_thread_t * p_input )
Michel Kaempf's avatar
Michel Kaempf committed
811
{
812
    if( p_input->b_preparsing ) return;
813

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

841
#ifdef ENABLE_SOUT
842 843 844 845 846 847 848 849 850
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 ) )
851
    {
852 853
        /* Check the validity of the provided sout */
        if( p_input->p->p_sout )
Clément Stenac's avatar
Clément Stenac committed
854
        {
855
            if( strcmp( p_input->p->p_sout->psz_sout, psz ) )
856
            {
857
                msg_Dbg( p_input, "destroying unusable sout" );
858

859 860
                sout_DeleteInstance( p_input->p->p_sout );
                p_input->p->p_sout = NULL;
861
            }
862
        }
863

864 865 866 867 868 869 870 871 872 873 874 875 876
        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
877
            {
878 879 880 881 882
                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
883
            }
884
        }
885
        if( libvlc_stats( p_input ) )
886
        {
887
            INIT_COUNTER( sout_sent_packets, INTEGER, COUNTER );
888
            INIT_COUNTER( sout_sent_bytes, INTEGER, COUNTER );
889 890 891 892
            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;
893
        }
894
    }
895
    else if( p_input->p->p_sout )
896
    {
897 898 899 900
        msg_Dbg( p_input, "destroying useless sout" );

        sout_DeleteInstance( p_input->p->p_sout );
        p_input->p->p_sout = NULL;
901
    }
902
    free( psz );
903

904 905
    return VLC_SUCCESS;
}
906
#endif
907

908 909 910
static void InitTitle( input_thread_t * p_input )
{
    vlc_value_t val;
911

912
    if( p_input->b_preparsing ) return;
913

914 915 916 917 918 919 920 921 922 923 924 925 926 927 928 929 930 931 932 933 934 935 936 937
    /* 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 );
938 939
    if( val.i_int < 0 )
        p_input->i_pts_delay -= (val.i_int * 1000);
940 941 942 943 944 945

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

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

956 957 958
    /* Start title/chapter */

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

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

    /* Start time*/
    /* Set start time */
Rémi Denis-Courmont's avatar
Rémi Denis-Courmont committed
975 976 977
    p_input->p->i_start = INT64_C(1000000) * var_GetInteger( p_input, "start-time" );
    p_input->p->i_stop  = INT64_C(1000000) * var_GetInteger( p_input, "stop-time" );
    p_input->p->i_run   = INT64_C(1000000) * var_GetInteger( p_input, "run-time" );
978
    i_length = var_GetTime( p_input, "length" );
979
    if( p_input->p->i_run < 0 )
980
    {
981 982
        msg_Warn( p_input, "invalid run-time ignored" );
        p_input->p->i_run = 0;
Rafaël Carré's avatar
Rafaël Carré committed
983
    }
984

985
    if( p_input->p->i_start > 0 )
986
    {
987
        if( p_input->p->i_start >= i_length )
988
        {
989
            msg_Warn( p_input, "invalid start-time ignored" );
990
        }
991
        else
992
        {
993
            vlc_value_t s;
994

995
            msg_Dbg( p_input, "starting at time: %ds",